From 02847f6dc7d46489b862fbd9674f17d99d26edcd Mon Sep 17 00:00:00 2001 From: Leonardo de Moura Date: Wed, 5 Jun 2019 15:29:13 -0700 Subject: [PATCH] chore(stage0): update --- src/stage0/CMakeLists.txt | 2 +- src/stage0/init/lean/attributes.cpp | 16 +- src/stage0/init/lean/default.cpp | 5 +- src/stage0/init/lean/elaborator.cpp | 44746 ------------- src/stage0/init/lean/expander.cpp | 26573 -------- src/stage0/init/lean/frontend.cpp | 7591 --- src/stage0/init/lean/message.cpp | 20 +- src/stage0/init/lean/name_mangling.cpp | 5 +- src/stage0/init/lean/parser/basic.cpp | 11971 ---- src/stage0/init/lean/parser/combinators.cpp | 4610 -- src/stage0/init/lean/parser/command.cpp | 15204 ----- src/stage0/init/lean/parser/declaration.cpp | 34992 ---------- src/stage0/init/lean/parser/identifier.cpp | 1987 - src/stage0/init/lean/parser/level.cpp | 10734 --- src/stage0/init/lean/parser/module.cpp | 9068 --- src/stage0/init/lean/parser/notation.cpp | 23813 ------- src/stage0/init/lean/parser/parsec.cpp | 11101 ---- src/stage0/init/lean/parser/pratt.cpp | 947 - src/stage0/init/lean/parser/rec.cpp | 436 - src/stage0/init/lean/parser/stringliteral.cpp | 1085 - src/stage0/init/lean/parser/syntax.cpp | 3813 -- src/stage0/init/lean/parser/term.cpp | 53942 ---------------- src/stage0/init/lean/parser/token.cpp | 34704 ---------- src/stage0/init/lean/parser/trie.cpp | 11306 ---- src/stage0/init/lean/position.cpp | 2731 +- 25 files changed, 31 insertions(+), 311371 deletions(-) delete mode 100644 src/stage0/init/lean/elaborator.cpp delete mode 100644 src/stage0/init/lean/expander.cpp delete mode 100644 src/stage0/init/lean/frontend.cpp delete mode 100644 src/stage0/init/lean/parser/basic.cpp delete mode 100644 src/stage0/init/lean/parser/combinators.cpp delete mode 100644 src/stage0/init/lean/parser/command.cpp delete mode 100644 src/stage0/init/lean/parser/declaration.cpp delete mode 100644 src/stage0/init/lean/parser/identifier.cpp delete mode 100644 src/stage0/init/lean/parser/level.cpp delete mode 100644 src/stage0/init/lean/parser/module.cpp delete mode 100644 src/stage0/init/lean/parser/notation.cpp delete mode 100644 src/stage0/init/lean/parser/parsec.cpp delete mode 100644 src/stage0/init/lean/parser/pratt.cpp delete mode 100644 src/stage0/init/lean/parser/rec.cpp delete mode 100644 src/stage0/init/lean/parser/stringliteral.cpp delete mode 100644 src/stage0/init/lean/parser/syntax.cpp delete mode 100644 src/stage0/init/lean/parser/term.cpp delete mode 100644 src/stage0/init/lean/parser/token.cpp delete mode 100644 src/stage0/init/lean/parser/trie.cpp diff --git a/src/stage0/CMakeLists.txt b/src/stage0/CMakeLists.txt index 754dc2e910..0e4c7d8c3a 100644 --- a/src/stage0/CMakeLists.txt +++ b/src/stage0/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT ./init/coe.cpp ./init/control/alternative.cpp ./init/control/applicative.cpp ./init/control/combinators.cpp ./init/control/conditional.cpp ./init/control/default.cpp ./init/control/estate.cpp ./init/control/except.cpp ./init/control/functor.cpp ./init/control/id.cpp ./init/control/lift.cpp ./init/control/monad.cpp ./init/control/monadfail.cpp ./init/control/option.cpp ./init/control/reader.cpp ./init/control/state.cpp ./init/core.cpp ./init/data/array/basic.cpp ./init/data/array/binsearch.cpp ./init/data/array/default.cpp ./init/data/array/qsort.cpp ./init/data/assoclist.cpp ./init/data/basic.cpp ./init/data/bytearray/basic.cpp ./init/data/bytearray/default.cpp ./init/data/char/basic.cpp ./init/data/char/default.cpp ./init/data/default.cpp ./init/data/dlist.cpp ./init/data/fin/basic.cpp ./init/data/fin/default.cpp ./init/data/hashable.cpp ./init/data/hashmap/basic.cpp ./init/data/hashmap/default.cpp ./init/data/int/basic.cpp ./init/data/int/default.cpp ./init/data/list/basic.cpp ./init/data/list/default.cpp ./init/data/list/instances.cpp ./init/data/nat/basic.cpp ./init/data/nat/bitwise.cpp ./init/data/nat/default.cpp ./init/data/nat/div.cpp ./init/data/option/basic.cpp ./init/data/option/instances.cpp ./init/data/ordering/basic.cpp ./init/data/ordering/default.cpp ./init/data/persistentarray/basic.cpp ./init/data/persistentarray/default.cpp ./init/data/random.cpp ./init/data/rbmap/basic.cpp ./init/data/rbmap/default.cpp ./init/data/rbtree/basic.cpp ./init/data/rbtree/default.cpp ./init/data/repr.cpp ./init/data/string/basic.cpp ./init/data/string/default.cpp ./init/data/tostring.cpp ./init/data/uint.cpp ./init/default.cpp ./init/env_ext.cpp ./init/fix.cpp ./init/io.cpp ./init/lean/attributes.cpp ./init/lean/compiler/closedtermcache.cpp ./init/lean/compiler/constfolding.cpp ./init/lean/compiler/default.cpp ./init/lean/compiler/export.cpp ./init/lean/compiler/initattr.cpp ./init/lean/compiler/ir/basic.cpp ./init/lean/compiler/ir/borrow.cpp ./init/lean/compiler/ir/boxing.cpp ./init/lean/compiler/ir/checker.cpp ./init/lean/compiler/ir/compilerm.cpp ./init/lean/compiler/ir/default.cpp ./init/lean/compiler/ir/elimdead.cpp ./init/lean/compiler/ir/emitcpp.cpp ./init/lean/compiler/ir/emitutil.cpp ./init/lean/compiler/ir/expandresetreuse.cpp ./init/lean/compiler/ir/format.cpp ./init/lean/compiler/ir/freevars.cpp ./init/lean/compiler/ir/livevars.cpp ./init/lean/compiler/ir/normids.cpp ./init/lean/compiler/ir/pushproj.cpp ./init/lean/compiler/ir/rc.cpp ./init/lean/compiler/ir/resetreuse.cpp ./init/lean/compiler/ir/simpcase.cpp ./init/lean/compiler/util.cpp ./init/lean/declaration.cpp ./init/lean/default.cpp ./init/lean/disjoint_set.cpp ./init/lean/elaborator.cpp ./init/lean/environment.cpp ./init/lean/expander.cpp ./init/lean/expr.cpp ./init/lean/extern.cpp ./init/lean/format.cpp ./init/lean/frontend.cpp ./init/lean/kvmap.cpp ./init/lean/level.cpp ./init/lean/message.cpp ./init/lean/modifiers.cpp ./init/lean/name.cpp ./init/lean/name_mangling.cpp ./init/lean/options.cpp ./init/lean/parser/basic.cpp ./init/lean/parser/combinators.cpp ./init/lean/parser/command.cpp ./init/lean/parser/declaration.cpp ./init/lean/parser/identifier.cpp ./init/lean/parser/level.cpp ./init/lean/parser/module.cpp ./init/lean/parser/notation.cpp ./init/lean/parser/parsec.cpp ./init/lean/parser/pratt.cpp ./init/lean/parser/rec.cpp ./init/lean/parser/stringliteral.cpp ./init/lean/parser/syntax.cpp ./init/lean/parser/term.cpp ./init/lean/parser/token.cpp ./init/lean/parser/trie.cpp ./init/lean/position.cpp ./init/lean/runtime.cpp ./init/lean/smap.cpp ./init/lean/trace.cpp ./init/lean/util.cpp ./init/platform.cpp ./init/util.cpp ./init/wf.cpp) +add_library (stage0 OBJECT ./init/coe.cpp ./init/control/alternative.cpp ./init/control/applicative.cpp ./init/control/combinators.cpp ./init/control/conditional.cpp ./init/control/default.cpp ./init/control/estate.cpp ./init/control/except.cpp ./init/control/functor.cpp ./init/control/id.cpp ./init/control/lift.cpp ./init/control/monad.cpp ./init/control/monadfail.cpp ./init/control/option.cpp ./init/control/reader.cpp ./init/control/state.cpp ./init/core.cpp ./init/data/array/basic.cpp ./init/data/array/binsearch.cpp ./init/data/array/default.cpp ./init/data/array/qsort.cpp ./init/data/assoclist.cpp ./init/data/basic.cpp ./init/data/bytearray/basic.cpp ./init/data/bytearray/default.cpp ./init/data/char/basic.cpp ./init/data/char/default.cpp ./init/data/default.cpp ./init/data/dlist.cpp ./init/data/fin/basic.cpp ./init/data/fin/default.cpp ./init/data/hashable.cpp ./init/data/hashmap/basic.cpp ./init/data/hashmap/default.cpp ./init/data/int/basic.cpp ./init/data/int/default.cpp ./init/data/list/basic.cpp ./init/data/list/default.cpp ./init/data/list/instances.cpp ./init/data/nat/basic.cpp ./init/data/nat/bitwise.cpp ./init/data/nat/default.cpp ./init/data/nat/div.cpp ./init/data/option/basic.cpp ./init/data/option/instances.cpp ./init/data/ordering/basic.cpp ./init/data/ordering/default.cpp ./init/data/persistentarray/basic.cpp ./init/data/persistentarray/default.cpp ./init/data/random.cpp ./init/data/rbmap/basic.cpp ./init/data/rbmap/default.cpp ./init/data/rbtree/basic.cpp ./init/data/rbtree/default.cpp ./init/data/repr.cpp ./init/data/string/basic.cpp ./init/data/string/default.cpp ./init/data/tostring.cpp ./init/data/uint.cpp ./init/default.cpp ./init/env_ext.cpp ./init/fix.cpp ./init/io.cpp ./init/lean/attributes.cpp ./init/lean/compiler/closedtermcache.cpp ./init/lean/compiler/constfolding.cpp ./init/lean/compiler/default.cpp ./init/lean/compiler/export.cpp ./init/lean/compiler/initattr.cpp ./init/lean/compiler/ir/basic.cpp ./init/lean/compiler/ir/borrow.cpp ./init/lean/compiler/ir/boxing.cpp ./init/lean/compiler/ir/checker.cpp ./init/lean/compiler/ir/compilerm.cpp ./init/lean/compiler/ir/default.cpp ./init/lean/compiler/ir/elimdead.cpp ./init/lean/compiler/ir/emitcpp.cpp ./init/lean/compiler/ir/emitutil.cpp ./init/lean/compiler/ir/expandresetreuse.cpp ./init/lean/compiler/ir/format.cpp ./init/lean/compiler/ir/freevars.cpp ./init/lean/compiler/ir/livevars.cpp ./init/lean/compiler/ir/normids.cpp ./init/lean/compiler/ir/pushproj.cpp ./init/lean/compiler/ir/rc.cpp ./init/lean/compiler/ir/resetreuse.cpp ./init/lean/compiler/ir/simpcase.cpp ./init/lean/compiler/util.cpp ./init/lean/declaration.cpp ./init/lean/default.cpp ./init/lean/disjoint_set.cpp ./init/lean/environment.cpp ./init/lean/expr.cpp ./init/lean/extern.cpp ./init/lean/format.cpp ./init/lean/kvmap.cpp ./init/lean/level.cpp ./init/lean/message.cpp ./init/lean/modifiers.cpp ./init/lean/name.cpp ./init/lean/name_mangling.cpp ./init/lean/options.cpp ./init/lean/position.cpp ./init/lean/runtime.cpp ./init/lean/smap.cpp ./init/lean/trace.cpp ./init/lean/util.cpp ./init/platform.cpp ./init/util.cpp ./init/wf.cpp) diff --git a/src/stage0/init/lean/attributes.cpp b/src/stage0/init/lean/attributes.cpp index 0f78388462..f7b9fbd1ae 100644 --- a/src/stage0/init/lean/attributes.cpp +++ b/src/stage0/init/lean/attributes.cpp @@ -1,6 +1,6 @@ // Lean compiler output // Module: init.lean.attributes -// Imports: init.lean.environment init.lean.parser.syntax +// Imports: init.lean.environment #include "runtime/object.h" #include "runtime/apply.h" typedef lean::object obj; typedef lean::usize usize; @@ -166,6 +166,7 @@ obj* l_Lean_Environment_pushScopeCore(obj*, obj*, uint8); obj* l_AssocList_replace___main___at_Lean_registerAttribute___spec__7(obj*, obj*, obj*); obj* l_Lean_Environment_isNamespace___boxed(obj*, obj*); obj* l_Array_miterateAux___main___at_Lean_Environment_getAttributeNames___spec__2___boxed(obj*, obj*, obj*, obj*); +obj* l_Lean_Syntax_missing; obj* l_Lean_attributeMapRef; obj* l_Lean_Environment_hasOpenScopes___boxed(obj*); namespace lean { @@ -186,6 +187,14 @@ obj* l_Lean_Environment_eraseAttribute___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_Lean_Environment_isAttribute(obj*); obj* l_Lean_regScopeManagerExtension___lambda__3(obj*); obj* l_Array_miterateAux___main___at_Lean_Environment_getAttributeNames___spec__2(obj*, obj*, obj*, obj*); +obj* _init_l_Lean_Syntax_missing() { +_start: +{ +obj* x_1; +x_1 = lean::box(0); +return x_1; +} +} obj* _init_l_Lean_ScopeManagerState_Inhabited() { _start: { @@ -4408,7 +4417,6 @@ return x_6; } } obj* initialize_init_lean_environment(obj*); -obj* initialize_init_lean_parser_syntax(obj*); static bool _G_initialized = false; obj* initialize_init_lean_attributes(obj* w) { if (_G_initialized) return w; @@ -4416,8 +4424,8 @@ _G_initialized = true; if (io_result_is_error(w)) return w; w = initialize_init_lean_environment(w); if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_syntax(w); -if (io_result_is_error(w)) return w; +l_Lean_Syntax_missing = _init_l_Lean_Syntax_missing(); +lean::mark_persistent(l_Lean_Syntax_missing); l_Lean_ScopeManagerState_Inhabited = _init_l_Lean_ScopeManagerState_Inhabited(); lean::mark_persistent(l_Lean_ScopeManagerState_Inhabited); l_Lean_regScopeManagerExtension___lambda__2___closed__1 = _init_l_Lean_regScopeManagerExtension___lambda__2___closed__1(); diff --git a/src/stage0/init/lean/default.cpp b/src/stage0/init/lean/default.cpp index 59cc3adf20..19f69ec5ef 100644 --- a/src/stage0/init/lean/default.cpp +++ b/src/stage0/init/lean/default.cpp @@ -1,6 +1,6 @@ // Lean compiler output // Module: init.lean.default -// Imports: init.lean.compiler.default init.lean.frontend init.lean.extern init.lean.environment init.lean.modifiers init.lean.runtime init.lean.attributes +// Imports: init.lean.compiler.default init.lean.extern init.lean.environment init.lean.modifiers init.lean.runtime init.lean.attributes #include "runtime/object.h" #include "runtime/apply.h" typedef lean::object obj; typedef lean::usize usize; @@ -15,7 +15,6 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64; #pragma GCC diagnostic ignored "-Wunused-but-set-variable" #endif obj* initialize_init_lean_compiler_default(obj*); -obj* initialize_init_lean_frontend(obj*); obj* initialize_init_lean_extern(obj*); obj* initialize_init_lean_environment(obj*); obj* initialize_init_lean_modifiers(obj*); @@ -28,8 +27,6 @@ _G_initialized = true; if (io_result_is_error(w)) return w; w = initialize_init_lean_compiler_default(w); if (io_result_is_error(w)) return w; -w = initialize_init_lean_frontend(w); -if (io_result_is_error(w)) return w; w = initialize_init_lean_extern(w); if (io_result_is_error(w)) return w; w = initialize_init_lean_environment(w); diff --git a/src/stage0/init/lean/elaborator.cpp b/src/stage0/init/lean/elaborator.cpp deleted file mode 100644 index e2ce3f8f23..0000000000 --- a/src/stage0/init/lean/elaborator.cpp +++ /dev/null @@ -1,44746 +0,0 @@ -// Lean compiler output -// Module: init.lean.elaborator -// Imports: init.lean.parser.module init.lean.expander init.lean.expr init.lean.options init.lean.environment -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_RBTree_toList___at_Lean_Elaborator_oldElabCommand___spec__1___boxed(obj*); -obj* l_List_foldr___main___at_Lean_Elaborator_matchOpenSpec___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Elaborator_currentScope___boxed(obj*, obj*, obj*); -obj* l_RBNode_setBlack___main___rarg(obj*); -extern "C" obj* lean_expr_mk_mdata(obj*, obj*); -obj* l_Lean_Expander_getOptType___main(obj*); -obj* l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1(obj*); -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_inferModToPexpr___closed__2; -obj* l_Lean_Elaborator_notation_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_postprocessNotationSpec___closed__1; -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__2; -obj* l_Lean_Elaborator_include_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_precToNat(obj*); -obj* l_Lean_Parser_stringLit_View_value(obj*); -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_Lean_Elaborator_open_elaborate(obj*, obj*, obj*, obj*); -obj* l_List_zipWith___main___rarg(obj*, obj*, obj*); -extern obj* l_Lean_Expander_getOptType___main___closed__1; -obj* l_Lean_Elaborator_dummy; -obj* l_Lean_Elaborator_toPexpr___main___closed__8; -extern obj* l_Lean_MessageLog_empty; -obj* l_Lean_Elaborator_toPexpr___main___closed__46; -extern "C" obj* lean_expr_mk_sort(obj*); -obj* l_Lean_KVMap_setBool(obj*, obj*, uint8); -uint8 l_List_foldr___main___at_Lean_Elaborator_matchOpenSpec___spec__1(obj*, uint8, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1; -obj* l_Lean_Elaborator_mkState___closed__3; -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_List_map___main___at_Lean_Elaborator_toPexpr___main___spec__2(obj*); -obj* l_Lean_Elaborator_processCommand(obj*, obj*, obj*); -obj* l_Lean_Elaborator_toLevel___main___closed__1; -obj* l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Format_pretty(obj*, obj*); -obj* l_Lean_Elaborator_mkNotationKind___rarg___closed__1; -obj* l_Lean_Elaborator_ElaboratorM_MonadExcept; -obj* l_Lean_Elaborator_attribute_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__6; -obj* l_RBNode_find___main___at_Lean_Elaborator_processCommand___spec__3___boxed(obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__21; -obj* l_Lean_Elaborator_matchSpec(obj*, obj*); -obj* l_Lean_Elaborator_matchOpenSpec(obj*, obj*); -obj* l_Lean_Elaborator_declaration_elaborate___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_RBTree_toList___at_Lean_Elaborator_oldElabCommand___spec__1(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_elaboratorInh(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_OrderedRBMap_empty___rarg(obj*); -obj* l_Lean_Elaborator_declModifiersToPexpr___closed__3; -obj* l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1___closed__1; -obj* l_List_foldl___main___at_Lean_Elaborator_toPexpr___main___spec__16(obj*, obj*); -extern obj* l_Lean_Parser_command_namespace; -extern obj* l_Lean_Parser_Level_trailing_HasView; -obj* l_List_lengthAux___main___rarg(obj*, obj*); -extern obj* l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -obj* l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1(obj*, obj*); -obj* l_Lean_Elaborator_identUnivParamsToPexpr(obj*); -obj* l_Lean_Elaborator_OrderedRBMap_ofList___rarg(obj*, obj*); -extern obj* l_Lean_Parser_Module_header; -obj* l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__22; -obj* l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_ElaboratorM_MonadState; -obj* l_Lean_Elaborator_elaborators; -obj* l_StateT_Monad___rarg(obj*); -extern "C" obj* lean_expr_mk_pi(obj*, uint8, obj*, obj*); -obj* l_Lean_Elaborator_resolveContext___main___closed__1; -obj* l_Lean_Elaborator_section_elaborate(obj*, obj*, obj*, obj*); -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_variables_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_reserveNotation_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_processCommand___lambda__1___closed__2; -obj* l_Lean_Elaborator_declaration_elaborate___closed__3; -obj* l_Lean_Elaborator_variables_elaborate(obj*, obj*, obj*, obj*); -obj* l_ReaderT_bind___at_Lean_Elaborator_declaration_elaborate___spec__1(obj*, obj*); -obj* l_Lean_Elaborator_oldElabCommand(obj*, obj*, obj*, obj*, obj*); -uint8 l_Lean_Elaborator_isOpenNamespace(obj*, obj*); -extern obj* l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -obj* l_Lean_Elaborator_toPexpr___main___closed__37; -extern "C" obj* level_mk_mvar(obj*); -obj* l_List_foldl___main___at_Lean_Elaborator_include_elaborate___spec__1(obj*, obj*); -obj* l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1___rarg(obj*); -extern "C" obj* lean_expr_local(obj*, obj*, obj*, uint8); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1; -extern "C" obj* lean_expr_mk_app(obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__3; -obj* l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(obj*, obj*); -obj* l_List_reverse___rarg(obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__9; -extern obj* l_Lean_Parser_command_attribute; -obj* l_Lean_Parser_TokenMap_insert___rarg(obj*, obj*, obj*); -obj* l_RBNode_insert___rarg(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1(obj*); -obj* l_List_foldr___main___at_Lean_Elaborator_isOpenNamespace___main___spec__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__30; -extern "C" obj* lean_expr_mk_let(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_modifyCurrentScope___boxed(obj*, obj*, obj*, obj*); -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -extern obj* l_Lean_Parser_command_variables; -obj* l_Lean_Elaborator_elabDefLike(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_KVMap_setNat(obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__4; -obj* l_Lean_Elaborator_declModifiersToPexpr___closed__2; -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__17(obj*, obj*, obj*, obj*); -obj* l_List_foldl___main___at_Lean_Elaborator_mangleIdent___spec__1(obj*, obj*); -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_inferModToPexpr___closed__3; -obj* l_Lean_Elaborator_elabDefLike___lambda__1(obj*, obj*); -obj* l_Lean_Name_toStringWithSep___main(obj*, obj*); -obj* l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__28; -extern obj* l_Lean_Parser_Term_have_HasView; -obj* l_Lean_Expr_mkCapp(obj*, obj*); -obj* l_Lean_Elaborator_end_elaborate___closed__1; -obj* l_Lean_Elaborator_toPexpr___main___closed__19; -obj* l_Lean_Elaborator_declaration_elaborate___closed__1; -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__31; -extern obj* l_Lean_Parser_Term_structInst_HasView; -obj* l_Lean_Elaborator_universe_elaborate___closed__1; -obj* l_List_map___main___at_Lean_Elaborator_namesToPexpr___spec__1(obj*); -obj* l_Lean_Elaborator_mkNotationKind(obj*, obj*); -obj* l_Lean_Elaborator_command_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__34; -obj* l_List_mmap___main___at_Lean_Elaborator_simpleBindersToPexpr___spec__1(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Elaborator_export_elaborate___spec__1(obj*, obj*); -obj* l_List_foldl___main___at_Lean_Elaborator_elaborators___spec__3(obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__45; -obj* l_Lean_Elaborator_toLevel___main___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Options_empty; -obj* l_Lean_Elaborator_section_elaborate___closed__2; -obj* l_Lean_Elaborator_universe_elaborate___closed__2; -obj* l_Lean_Elaborator_toPexpr___main___closed__1; -extern obj* l_Lean_Parser_number_HasView; -obj* l_Lean_Elaborator_check_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_OrderedRBMap_empty___rarg___boxed(obj*); -obj* l_monadStateTrans___rarg(obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__5(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_namesToPexpr(obj*); -obj* l_Lean_Name_quickLt___boxed(obj*, obj*); -obj* l_Lean_Elaborator_toLevel___main___closed__4; -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_notation_elaborate___closed__1; -obj* l_Lean_Elaborator_mkState___closed__4; -obj* l_RBTree_ofList___main___at_Lean_Elaborator_oldElabCommand___spec__3(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__15___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Level_ofNat___main(obj*); -obj* l_Lean_Elaborator_export_elaborate___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_section; -obj* l_Lean_Elaborator_toPexpr___main___closed__14; -obj* l_ExceptT_MonadExcept___rarg(obj*); -extern obj* l_Lean_Parser_command_attribute_HasView; -obj* l_Lean_Elaborator_toPexpr___main___closed__32; -extern obj* l_Lean_Parser_command_reserveNotation_HasView; -obj* l_List_spanAux___main___at_Lean_Elaborator_toPexpr___main___spec__5(obj*, obj*); -extern obj* l_Id_Monad; -extern obj* l_Lean_Parser_command_export_HasView; -obj* l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_resolveContext___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_inferModToPexpr___closed__1; -extern obj* l_Lean_Parser_command_declaration_HasView; -obj* l_Lean_Elaborator_notation_elaborateAux(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_variables_HasView; -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderIdent_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_resolveContext___main___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__18; -obj* l_Lean_Elaborator_declModifiersToPexpr___closed__6; -obj* l_Lean_Elaborator_toPexpr___main___closed__10; -obj* l_ReaderT_read___rarg(obj*, obj*); -obj* l_Lean_Elaborator_include_elaborate___lambda__1(obj*, obj*); -obj* l_Lean_Elaborator_simpleBindersToPexpr___boxed(obj*, obj*, obj*, obj*); -obj* l_List_foldl___main___at_Lean_Elaborator_elabDefLike___spec__3(obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__44; -obj* l_Lean_Elaborator_declaration_elaborate___lambda__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_levelAdd___main(obj*, obj*); -extern obj* l_Lean_Parser_command_end_HasView; -obj* l_Lean_Elaborator_attribute_elaborate___closed__2; -obj* l_Lean_Elaborator_elaboratorInh___closed__1; -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -obj* l_List_foldl___main___at_Lean_Elaborator_OrderedRBMap_ofList___spec__1(obj*, obj*); -obj* l_Lean_Elaborator_attribute_elaborate(obj*, obj*, obj*, obj*); -obj* l_RBNode_insert___at_Lean_NameSet_insert___spec__1(obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__4; -obj* l_Lean_Elaborator_OrderedRBMap_insert(obj*, obj*); -obj* l_fix1___rarg___lambda__1___boxed(obj*, obj*); -extern obj* l_Lean_Parser_command_end; -extern obj* l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Elaborator_toPexpr___main___closed__27; -obj* l_ReaderT_lift___rarg___boxed(obj*, obj*); -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__3(obj*, obj*, obj*); -obj* l_Lean_Elaborator_preresolve___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_Module_header_elaborate(obj*, obj*, obj*, obj*); -extern "C" obj* lean_expr_mk_const(obj*, obj*); -obj* l_Lean_Elaborator_toLevel___boxed(obj*, obj*, obj*, obj*); -extern "C" obj* level_mk_param(obj*); -obj* l_List_enumFrom___main___rarg(obj*, obj*); -extern obj* l_Lean_Parser_command_export; -obj* l_Lean_Elaborator_end_elaborate___closed__4; -obj* l_Lean_Elaborator_mangleIdent(obj*); -obj* l_Lean_Elaborator_universe_elaborate___lambda__1(obj*, obj*); -uint8 l_Lean_Elaborator_isOpenNamespace___main(obj*, obj*); -obj* l_ReaderT_Monad___rarg(obj*); -obj* l_Lean_Parser_Term_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_foldl___main___at_Lean_Expr_mkApp___spec__1(obj*, obj*); -obj* l_Lean_Elaborator_initQuot_elaborate(obj*, obj*, obj*, obj*); -obj* l_RBNode_revFold___main___at_Lean_Elaborator_oldElabCommand___spec__2___boxed(obj*, obj*); -obj* l_Lean_Elaborator_resolveContext___main(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__12; -obj* l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__2; -obj* l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2___boxed(obj*, obj*); -extern obj* l_Lean_Parser_Term_show_HasView; -obj* l_List_join___main___rarg(obj*); -obj* l_Lean_Expander_mkNotationTransformer___boxed(obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_declModifiersToPexpr(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__29; -extern obj* l_Lean_Parser_Term_structInstItem_HasView; -obj* l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__1; -extern obj* l_Lean_Parser_command_setOption_HasView; -obj* l_Lean_Elaborator_Expr_mkAnnotation___closed__1; -obj* l_Lean_Elaborator_ElaboratorM_Lean_Parser_MonadRec; -obj* l_Lean_Elaborator_declaration_elaborate___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__2; -obj* l_Lean_Elaborator_registerNotationMacro(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__20; -extern obj* l_Lean_Parser_command_initQuot; -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__5___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_KVMap_setName(obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_open_HasView; -obj* l_Lean_Elaborator_inferModToPexpr___boxed(obj*); -obj* l_Lean_Elaborator_OrderedRBMap_find___rarg(obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_check; -extern obj* l_Lean_Parser_Term_explicit_HasView; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__17; -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__15(obj*, obj*, obj*, obj*); -obj* l_List_mfor___main___at_Lean_Elaborator_noKind_elaborate___spec__1(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -namespace lean { -uint8 nat_dec_lt(obj*, obj*); -} -extern obj* l_Lean_Parser_command_include_HasView; -obj* l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1; -obj* l_Lean_Elaborator_end_elaborate___closed__3; -obj* l_Lean_Elaborator_toPexpr___main___closed__33; -obj* l_Lean_Elaborator_notation_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_reserveNotation_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toLevel(obj*, obj*, obj*, obj*); -obj* l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(obj*, obj*, obj*); -obj* l_Lean_Elaborator_mkEqns___closed__1; -obj* l_Lean_Parser_Syntax_getPos(obj*); -extern obj* l_Lean_Expander_builtinTransformers; -obj* l_Lean_Elaborator_declModifiersToPexpr___closed__4; -extern obj* l_Char_HasRepr___closed__1; -extern obj* l_Lean_Parser_noKind; -obj* l_Lean_Elaborator_toPexpr___main___closed__39; -extern obj* l_Lean_Parser_Term_lambda_HasView; -obj* l_Lean_Elaborator_mkState(obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__36; -obj* l_List_append___rarg(obj*, obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_preresolve___main___boxed(obj*, obj*, obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_Lean_Elaborator_oldElabCommand___lambda__1(obj*, obj*); -obj* l_Lean_Elaborator_notation_elaborateAux___boxed(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__3; -obj* l_Lean_Elaborator_isOpenNamespace___main___boxed(obj*, obj*); -extern obj* l_Lean_Parser_Module_header_HasView; -obj* l_List_spanAux___main___at_Lean_Elaborator_toPexpr___main___spec__4(obj*, obj*); -extern obj* l_Lean_Parser_command_setOption; -obj* l_Lean_Elaborator_toPexpr___main___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_notation; -obj* l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__5(obj*, obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Elaborator_matchPrecedence___main___boxed(obj*, obj*); -obj* l_Lean_Elaborator_declaration_elaborate___closed__2; -obj* l_RBNode_insert___at_Lean_Elaborator_elaborators___spec__1(obj*, obj*, obj*); -extern obj* l_Lean_Parser_Module_eoi; -obj* l_Lean_Elaborator_attrsToPexpr(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_elaborateCommand___boxed(obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Elaborator_identUnivParamsToPexpr___spec__1(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -uint8 l_List_foldr___main___at_Lean_Elaborator_notation_elaborate___spec__1(uint8, obj*); -obj* l_Lean_Elaborator_inferModToPexpr(obj*); -obj* l_Lean_Elaborator_Expr_mkAnnotation(obj*, obj*); -obj* l_StateT_MonadExcept___rarg(obj*, obj*, obj*); -obj* l_Lean_Elaborator_section_elaborate___closed__1; -obj* l_Lean_Elaborator_currentScope___closed__1; -uint8 l_RBNode_isRed___main___rarg(obj*); -obj* l_Lean_Elaborator_OrderedRBMap_ofList(obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2(obj*); -obj* l_Lean_Elaborator_setOption_elaborate___lambda__1(obj*, obj*); -obj* l_Lean_Elaborator_noKind_elaborate___closed__1; -obj* l_Lean_Elaborator_declaration_elaborate___lambda__3___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_CommandParserConfig_registerNotationTokens(obj*, obj*); -obj* l_Lean_Elaborator_updateParserConfig___boxed(obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__11; -obj* l_Lean_Elaborator_toPexpr___main___closed__40; -obj* l_Lean_Elaborator_eoi_elaborate___closed__1; -obj* l_Lean_Elaborator_toLevel___main___closed__3; -obj* l_Lean_Elaborator_end_elaborate___closed__2; -extern "C" obj* level_mk_imax(obj*, obj*); -obj* l_Lean_Elaborator_section_elaborate___boxed(obj*, obj*, obj*, obj*); -uint8 l_List_foldr___main___at_Lean_Elaborator_isOpenNamespace___main___spec__2(obj*, uint8, obj*); -obj* l_Lean_Elaborator_mkState___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_universe_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(obj*, obj*); -extern obj* l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Elaborator_OrderedRBMap_find(obj*, obj*); -obj* l_Lean_Elaborator_preresolve(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Expander_expandBracketedBinder___main___closed__4; -obj* l_Lean_Elaborator_toPexpr___main___closed__13; -obj* l_Lean_Elaborator_processCommand___lambda__1___closed__1; -obj* l_Lean_Elaborator_mkEqns___closed__2; -namespace lean { -uint8 string_dec_eq(obj*, obj*); -} -obj* l_Lean_Elaborator_processCommand___closed__1; -obj* l_Lean_Elaborator_check_elaborate___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_open; -obj* l_Lean_Elaborator_namespace_elaborate(obj*, obj*, obj*, obj*); -obj* l_coe___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__4___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_notation_HasView; -extern obj* l_Lean_Parser_command_section_HasView; -obj* l_List_filterMap___main___at_Lean_Elaborator_notation_elaborateAux___spec__1(obj*, obj*); -obj* l_Lean_Elaborator_levelAdd___main___boxed(obj*, obj*); -extern obj* l_Lean_Parser_Term_app_HasView; -obj* l_coe___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -obj* l_List_foldl___main___at_Lean_Elaborator_OrderedRBMap_ofList___spec__1___rarg(obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_open_elaborate___lambda__1(obj*, obj*); -uint8 l_Lean_Elaborator_matchPrecedence(obj*, obj*); -obj* l_Lean_Elaborator_toLevel___main___closed__2; -obj* l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_projection_HasView; -obj* l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_simpleBindersToPexpr___spec__1___boxed(obj*, obj*, obj*, obj*); -extern "C" obj* lean_expr_mk_mvar(obj*, obj*); -extern obj* l_Lean_Parser_maxPrec; -extern "C" obj* lean_expr_mk_bvar(obj*); -extern "C" obj* lean_elaborator_elaborate_command(obj*, obj*, obj*); -obj* l_Lean_Elaborator_setOption_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_open_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___rarg(obj*, obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__2(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_sortApp_HasView; -obj* l_Lean_Elaborator_mkNotationKind___boxed(obj*, obj*); -obj* l_Lean_Elaborator_OrderedRBMap_empty(obj*, obj*); -obj* l_Lean_Elaborator_mkEqns(obj*, obj*); -obj* l_Lean_Elaborator_namespace_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_isOpenNamespace___boxed(obj*, obj*); -obj* l_String_trim(obj*); -extern obj* l_Lean_Parser_command_universe; -obj* l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__2(obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1___rarg___boxed(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___boxed(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Name_replacePrefix___main(obj*, obj*, obj*); -obj* l_Lean_Elaborator_declModifiersToPexpr___closed__7; -extern "C" obj* level_mk_succ(obj*); -obj* l_Lean_Elaborator_levelGetAppArgs___main___closed__1; -obj* l_Lean_Elaborator_toPexpr___main___closed__43; -extern obj* l_Lean_Expander_bindingAnnotationUpdate; -obj* l_Lean_Elaborator_toPexpr___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_levelAdd___boxed(obj*, obj*); -extern obj* l_Lean_Parser_command_namespace_HasView; -obj* l_Lean_Elaborator_setOption_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_levelGetAppArgs(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_elabDefLike___closed__1; -obj* l_Lean_Elaborator_levelGetAppArgs___main(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_declaration; -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_levelGetAppArgs___main___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_namespace_elaborate___closed__1; -obj* l_Lean_Elaborator_declaration_elaborate___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__4___boxed(obj*, obj*, obj*); -obj* l_Lean_Elaborator_mkState___closed__1; -obj* l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_modifyCurrentScope___closed__1; -uint8 l_Lean_Name_quickLt(obj*, obj*); -obj* l_ReaderT_MonadExcept___rarg(obj*); -obj* l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__3(obj*); -obj* l_Lean_Parser_Syntax_format___main(obj*); -obj* l_Lean_Elaborator_getNamespace___boxed(obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_universe_HasView; -extern "C" obj* lean_name_mk_numeral(obj*, obj*); -obj* l_Lean_Elaborator_OrderedRBMap_insert___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_simpleBindersToPexpr(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_declModifiersToPexpr___closed__5; -obj* l_Lean_Elaborator_levelGetAppArgs___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_anonymousConstructor_HasView; -obj* l_Lean_Elaborator_end_elaborate(obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(obj*); -obj* l_Lean_Elaborator_elaboratorConfigCoeFrontendConfig(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_oldElabCommand___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__6(obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__24; -obj* l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__2; -uint8 l_List_decidableMem___main___at_Lean_Elaborator_isOpenNamespace___main___spec__1(obj*, obj*); -obj* l_Lean_Elaborator_initQuot_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_View_ofNat(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_borrowed_HasView; -obj* l_Lean_Elaborator_declaration_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__26; -obj* l_fixCore3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Level_leading_HasView; -obj* l_Lean_Elaborator_eoi_elaborate___boxed(obj*, obj*, obj*, obj*); -extern obj* l_List_zip___rarg___closed__1; -obj* l_Lean_KVMap_setString(obj*, obj*, obj*); -obj* l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -obj* l_Lean_Parser_RecT_recurse___rarg(obj*, obj*); -obj* l_Lean_Elaborator_notation_elaborate___lambda__1(obj*, obj*); -obj* l_Lean_Elaborator_declaration_elaborate___closed__4; -obj* l_Lean_Elaborator_elabDefLike___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_ExceptT_Monad___rarg(obj*); -extern obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Elaborator_preresolve___main(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2(obj*); -obj* l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__38; -obj* l_RBNode_revFold___main___at_Lean_Elaborator_oldElabCommand___spec__2(obj*, obj*); -extern obj* l_Lean_Parser_command_check_HasView; -obj* l_Lean_Elaborator_variables_elaborate___closed__2; -obj* l_Lean_Elaborator_processCommand___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_KVMap_insertCore___main(obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__16; -obj* l_ReaderT_bind___at_Lean_Elaborator_declaration_elaborate___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__35; -obj* l_Lean_Elaborator_toPexpr___main___closed__7; -obj* l_Lean_Elaborator_Module_header_elaborate___closed__1; -extern obj* l_Lean_Name_toString___closed__1; -obj* l_Lean_Elaborator_declModifiersToPexpr___boxed(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_updateParserConfig(obj*, obj*, obj*); -obj* l_Lean_Elaborator_ElaboratorM_MonadReader; -obj* l_Lean_Elaborator_toPexpr___main___closed__41; -obj* l_Lean_Elaborator_toPexpr___main___closed__25; -uint8 l_Lean_Environment_contains(obj*, obj*); -obj* l_Lean_Elaborator_attribute_elaborate___closed__1; -obj* l_RBNode_find___main___at_Lean_Elaborator_processCommand___spec__3(obj*, obj*); -obj* l_Lean_Elaborator_matchPrecedence___boxed(obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___closed__1; -obj* l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1(obj*, obj*); -extern "C" obj* lean_expr_mk_lambda(obj*, uint8, obj*, obj*); -obj* l_Lean_Elaborator_end_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_kind___main(obj*); -obj* l_Lean_Elaborator_elabDefLike___closed__2; -obj* l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__5; -obj* l_Lean_Elaborator_variables_elaborate___closed__1; -obj* l_Lean_Elaborator_modifyCurrentScope(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_elaboratorInh___boxed(obj*, obj*, obj*, obj*); -obj* l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(obj*, obj*, obj*); -obj* l_Lean_Elaborator_export_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__5; -obj* l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_ElaboratorM_Monad; -obj* l_Lean_Elaborator_levelAdd(obj*, obj*); -obj* l_Lean_Elaborator_eoi_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_noKind_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_Module_header_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__6___boxed(obj*, obj*, obj*); -obj* l_Lean_FileMap_toPosition(obj*, obj*); -obj* l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(obj*, obj*); -extern obj* l_Lean_Parser_stringLit_HasView; -obj* l_Lean_Elaborator_toLevel___main(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_currentScope(obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_inaccessible_HasView; -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__4___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_precToNat___main(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_include_elaborate___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__1(obj*); -obj* l_Lean_Elaborator_declModifiersToPexpr___closed__1; -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_registerNotationMacro___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_match_HasView; -obj* l_Lean_Parser_Term_getLeading___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_mkNotationKind___rarg(obj*); -obj* l_Lean_Elaborator_elaboratorConfigCoeFrontendConfig___boxed(obj*); -obj* l_Lean_Expr_local___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Substring_ofString(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__4(obj*, obj*, obj*); -extern obj* l_Lean_Expander_noExpansion___closed__1; -extern obj* l_Lean_Parser_Term_sort_HasView; -obj* l_Lean_Elaborator_resolveContext(obj*, obj*, obj*, obj*); -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__3___boxed(obj*, obj*, obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__23; -obj* l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__1; -obj* l_ReaderT_lift___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_declaration_elaborate___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3___boxed(obj*, obj*); -extern obj* l_Lean_Parser_identUnivs_HasView; -obj* l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_notation_elaborate___closed__2; -extern obj* l_Lean_Parser_command_reserveNotation; -obj* l_Lean_Name_append___main(obj*, obj*); -obj* l_Lean_Elaborator_check_elaborate___closed__1; -obj* l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__17___boxed(obj*, obj*, obj*, obj*); -obj* l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7___boxed(obj*, obj*); -obj* l_List_foldr___main___at_Lean_Elaborator_notation_elaborate___spec__1___boxed(obj*, obj*); -obj* l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___lambda__1(obj*, uint8, obj*, obj*); -obj* l_List_map___main___at_Lean_Elaborator_declaration_elaborate___spec__3(obj*); -uint8 l_Lean_Elaborator_matchPrecedence___main(obj*, obj*); -obj* l_Lean_Elaborator_attrsToPexpr___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_mkState___closed__2; -obj* l_Lean_Elaborator_initQuot_elaborate___closed__1; -obj* l_StateT_MonadState___rarg(obj*); -obj* l_List_decidableMem___main___at_Lean_Elaborator_isOpenNamespace___main___spec__1___boxed(obj*, obj*); -extern obj* l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1___closed__1; -obj* l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_universe_elaborate(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_CommandParserConfig_registerNotationParser(obj*, obj*, obj*); -extern "C" obj* lean_expr_mk_lit(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_notation_elaborateAux___closed__1; -obj* l_Lean_Elaborator_getNamespace(obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_let_HasView; -obj* l_Lean_Parser_number_View_toNat___main(obj*); -extern "C" obj* level_mk_max(obj*, obj*); -obj* l_Lean_Parser_Term_binders_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__4(obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_declaration_elaborate___closed__5; -extern obj* l_Lean_Parser_Term_pi_HasView; -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__1___rarg(obj*, obj*, obj*, obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_matchSpec___spec__1(obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__42; -obj* l___private_init_lean_parser_trie_2__insertAux___main___rarg(obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_paren_transform___spec__1(obj*); -obj* l_Lean_Elaborator_toPexpr___main___closed__15; -obj* l_Lean_Elaborator_postprocessNotationSpec(obj*); -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(obj*, obj*, obj*, obj*, obj*); -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Elaborator_locally(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_include; -obj* l_Lean_Expr_local___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; obj* x_6; -x_5 = lean::unbox(x_4); -x_6 = lean_expr_local(x_1, x_2, x_3, x_5); -return x_6; -} -} -obj* l_Lean_Elaborator_elaborateCommand___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean_elaborator_elaborate_command(x_1, x_2, x_3); -return x_4; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_empty___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::box(0); -x_3 = lean::box(0); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::cnstr_set(x_5, 1, x_3); -lean::cnstr_set(x_5, 2, x_4); -return x_5; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_empty(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_OrderedRBMap_empty___rarg___boxed), 1, 0); -return x_3; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_empty___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Elaborator_OrderedRBMap_empty___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_insert___rarg(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_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -lean::inc(x_4); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -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::cnstr_get(x_2, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_2, 2); -lean::inc(x_9); -lean::dec(x_2); -lean::inc(x_9); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_4); -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_add(x_9, x_11); -lean::dec(x_9); -x_13 = l_RBNode_insert___rarg(x_1, x_8, x_3, x_10); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_13); -lean::cnstr_set(x_14, 2, x_12); -return x_14; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_insert(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_OrderedRBMap_insert___rarg), 4, 0); -return x_3; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_find___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = l_RBNode_find___main___rarg(x_1, lean::box(0), x_4, x_3); -return x_5; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_find(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_OrderedRBMap_find___rarg), 3, 0); -return x_3; -} -} -obj* l_List_foldl___main___at_Lean_Elaborator_OrderedRBMap_ofList___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -lean::dec(x_1); -return x_2; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -lean::dec(x_3); -x_6 = lean::cnstr_get(x_4, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_4, 1); -lean::inc(x_7); -lean::dec(x_4); -lean::inc(x_1); -x_8 = l_Lean_Elaborator_OrderedRBMap_insert___rarg(x_1, x_2, x_6, x_7); -x_2 = x_8; -x_3 = x_5; -goto _start; -} -} -} -obj* l_List_foldl___main___at_Lean_Elaborator_OrderedRBMap_ofList___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_List_foldl___main___at_Lean_Elaborator_OrderedRBMap_ofList___spec__1___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_ofList___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_Lean_Elaborator_OrderedRBMap_empty___rarg(x_1); -x_4 = l_List_foldl___main___at_Lean_Elaborator_OrderedRBMap_ofList___spec__1___rarg(x_1, x_3, x_2); -return x_4; -} -} -obj* l_Lean_Elaborator_OrderedRBMap_ofList(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_OrderedRBMap_ofList___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Elaborator_elaboratorConfigCoeFrontendConfig(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Elaborator_elaboratorConfigCoeFrontendConfig___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Elaborator_elaboratorConfigCoeFrontendConfig(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Elaborator_ElaboratorM_Monad() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Id_Monad; -x_2 = l_ExceptT_Monad___rarg(x_1); -x_3 = l_StateT_Monad___rarg(x_2); -x_4 = l_ReaderT_Monad___rarg(x_3); -x_5 = l_ReaderT_Monad___rarg(x_4); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_ElaboratorM_Lean_Parser_MonadRec() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___rarg), 2, 0); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_ElaboratorM_MonadReader() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Id_Monad; -x_2 = l_ExceptT_Monad___rarg(x_1); -x_3 = l_StateT_Monad___rarg(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_read___rarg), 2, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___rarg___boxed), 2, 1); -lean::closure_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_ElaboratorM_MonadState() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = l_Id_Monad; -x_2 = l_ExceptT_Monad___rarg(x_1); -lean::inc(x_2); -x_3 = l_StateT_Monad___rarg(x_2); -lean::inc(x_3); -x_4 = l_ReaderT_Monad___rarg(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 4, 3); -lean::closure_set(x_5, 0, lean::box(0)); -lean::closure_set(x_5, 1, lean::box(0)); -lean::closure_set(x_5, 2, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 4, 3); -lean::closure_set(x_6, 0, lean::box(0)); -lean::closure_set(x_6, 1, lean::box(0)); -lean::closure_set(x_6, 2, x_3); -x_7 = l_StateT_MonadState___rarg(x_2); -x_8 = l_monadStateTrans___rarg(x_6, x_7); -x_9 = l_monadStateTrans___rarg(x_5, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_ElaboratorM_MonadExcept() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Id_Monad; -x_2 = l_ExceptT_Monad___rarg(x_1); -x_3 = l_ExceptT_MonadExcept___rarg(x_1); -x_4 = l_StateT_MonadExcept___rarg(x_2, lean::box(0), x_3); -x_5 = l_ReaderT_MonadExcept___rarg(x_4); -x_6 = l_ReaderT_MonadExcept___rarg(x_5); -return x_6; -} -} -obj* _init_l_Lean_Elaborator_elaboratorInh___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; -x_1 = lean::mk_nat_obj(0u); -x_2 = lean::mk_nat_obj(1u); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string(""); -x_6 = 2; -lean::inc(x_5, 2); -x_7 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_4); -lean::cnstr_set(x_7, 3, x_5); -lean::cnstr_set(x_7, 4, x_5); -lean::cnstr_set_scalar(x_7, sizeof(void*)*5, x_6); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -obj* l_Lean_Elaborator_elaboratorInh(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_elaboratorInh___closed__1; -return x_5; -} -} -obj* l_Lean_Elaborator_elaboratorInh___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_elaboratorInh(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_command_elaborate(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::apply_3(x_2, x_1, x_3, x_4); -return x_5; -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(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; -x_6 = lean::cnstr_get(x_4, 0); -x_7 = lean::cnstr_get(x_6, 0); -x_8 = lean::cnstr_get(x_6, 2); -x_9 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_FileMap_toPosition(x_8, x_10); -x_12 = 2; -x_13 = l_String_splitAux___main___closed__1; -lean::inc(x_7); -x_14 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_11); -lean::cnstr_set(x_14, 2, x_9); -lean::cnstr_set(x_14, 3, x_13); -lean::cnstr_set(x_14, 4, x_2); -lean::cnstr_set_scalar(x_14, sizeof(void*)*5, x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = l_Lean_Parser_Syntax_getPos(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; uint8 x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::mk_nat_obj(0u); -x_19 = l_Lean_FileMap_toPosition(x_8, x_18); -x_20 = 2; -x_21 = l_String_splitAux___main___closed__1; -lean::inc(x_7); -x_22 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_22, 0, x_7); -lean::cnstr_set(x_22, 1, x_19); -lean::cnstr_set(x_22, 2, x_9); -lean::cnstr_set(x_22, 3, x_21); -lean::cnstr_set(x_22, 4, x_2); -lean::cnstr_set_scalar(x_22, sizeof(void*)*5, x_20); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -return x_23; -} -else -{ -obj* x_24; obj* x_25; uint8 x_26; obj* x_27; obj* x_28; obj* x_29; -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -lean::dec(x_17); -x_25 = l_Lean_FileMap_toPosition(x_8, x_24); -x_26 = 2; -x_27 = l_String_splitAux___main___closed__1; -lean::inc(x_7); -x_28 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_28, 0, x_7); -lean::cnstr_set(x_28, 1, x_25); -lean::cnstr_set(x_28, 2, x_9); -lean::cnstr_set(x_28, 3, x_27); -lean::cnstr_set(x_28, 4, x_2); -lean::cnstr_set_scalar(x_28, sizeof(void*)*5, x_26); -x_29 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -return x_29; -} -} -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg___boxed), 5, 0); -return x_2; -} -} -obj* _init_l_Lean_Elaborator_currentScope___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("currentScope: unreachable"); -return x_1; -} -} -obj* l_Lean_Elaborator_currentScope(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::cnstr_get(x_3, 4); -lean::inc(x_4); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = l_Lean_Elaborator_currentScope___closed__1; -x_7 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_5, x_6, x_1, x_2, x_3); -lean::dec(x_3); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_3); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -return x_10; -} -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Elaborator_currentScope___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Elaborator_currentScope(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Elaborator_modifyCurrentScope___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("modifyCurrentScope: unreachable"); -return x_1; -} -} -obj* l_Lean_Elaborator_modifyCurrentScope(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::cnstr_get(x_4, 4); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = l_Lean_Elaborator_modifyCurrentScope___closed__1; -x_8 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_6, x_7, x_2, x_3, x_4); -lean::dec(x_4); -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_4); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_4, 4); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_5); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_5, 0); -x_13 = lean::apply_1(x_1, x_12); -lean::cnstr_set(x_5, 0, x_13); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_4); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_17 = lean::cnstr_get(x_5, 0); -x_18 = lean::cnstr_get(x_5, 1); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_5); -x_19 = lean::apply_1(x_1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -lean::cnstr_set(x_4, 4, x_20); -x_21 = lean::box(0); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_4); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_24 = lean::cnstr_get(x_4, 0); -x_25 = lean::cnstr_get(x_4, 1); -x_26 = lean::cnstr_get(x_4, 2); -x_27 = lean::cnstr_get(x_4, 3); -x_28 = lean::cnstr_get(x_4, 5); -x_29 = lean::cnstr_get(x_4, 6); -x_30 = lean::cnstr_get(x_4, 7); -x_31 = lean::cnstr_get(x_4, 8); -x_32 = lean::cnstr_get(x_4, 9); -x_33 = lean::cnstr_get(x_4, 10); -lean::inc(x_33); -lean::inc(x_32); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::inc(x_28); -lean::inc(x_27); -lean::inc(x_26); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_4); -x_34 = lean::cnstr_get(x_5, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_5, 1); -lean::inc(x_35); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - x_36 = x_5; -} else { - lean::dec_ref(x_5); - x_36 = lean::box(0); -} -x_37 = lean::apply_1(x_1, x_34); -if (lean::is_scalar(x_36)) { - x_38 = lean::alloc_cnstr(1, 2, 0); -} else { - x_38 = x_36; -} -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_35); -x_39 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_39, 0, x_24); -lean::cnstr_set(x_39, 1, x_25); -lean::cnstr_set(x_39, 2, x_26); -lean::cnstr_set(x_39, 3, x_27); -lean::cnstr_set(x_39, 4, x_38); -lean::cnstr_set(x_39, 5, x_28); -lean::cnstr_set(x_39, 6, x_29); -lean::cnstr_set(x_39, 7, x_30); -lean::cnstr_set(x_39, 8, x_31); -lean::cnstr_set(x_39, 9, x_32); -lean::cnstr_set(x_39, 10, x_33); -x_40 = lean::box(0); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_39); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -return x_42; -} -} -} -} -obj* l_Lean_Elaborator_modifyCurrentScope___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_modifyCurrentScope(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_foldl___main___at_Lean_Elaborator_mangleIdent___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean_name_mk_numeral(x_1, x_3); -x_1 = x_5; -x_2 = x_4; -goto _start; -} -} -} -obj* l_Lean_Elaborator_mangleIdent(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 2); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 4); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_foldl___main___at_Lean_Elaborator_mangleIdent___spec__1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Elaborator_levelGetAppArgs___main___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("levelGetAppArgs: unexpected input: "); -return x_1; -} -} -obj* l_Lean_Elaborator_levelGetAppArgs___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_Syntax_kind___main(x_1); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -lean::inc(x_1); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_1); -x_7 = l_Lean_Parser_Syntax_format___main(x_1); -x_8 = l_Lean_Options_empty; -x_9 = l_Lean_Format_pretty(x_7, x_8); -x_10 = l_Lean_Elaborator_levelGetAppArgs___main___closed__1; -x_11 = lean::string_append(x_10, x_9); -lean::dec(x_9); -x_12 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_6, x_11, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_6); -return x_12; -} -else -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_5); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; uint8 x_16; -x_14 = lean::cnstr_get(x_5, 0); -x_15 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -x_16 = lean_name_dec_eq(x_14, x_15); -if (x_16 == 0) -{ -obj* x_17; uint8 x_18; -x_17 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -x_18 = lean_name_dec_eq(x_14, x_17); -lean::dec(x_14); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -lean::inc(x_1); -lean::cnstr_set(x_5, 0, x_1); -x_19 = l_Lean_Parser_Syntax_format___main(x_1); -x_20 = l_Lean_Options_empty; -x_21 = l_Lean_Format_pretty(x_19, x_20); -x_22 = l_Lean_Elaborator_levelGetAppArgs___main___closed__1; -x_23 = lean::string_append(x_22, x_21); -lean::dec(x_21); -x_24 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_5, x_23, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_5); -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; -lean::free_heap_obj(x_5); -x_25 = l_Lean_Parser_Level_trailing_HasView; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::inc(x_1); -x_27 = lean::apply_1(x_26, x_1); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_1); -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -lean::dec(x_27); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -x_30 = l_Lean_Elaborator_levelGetAppArgs___main(x_29, x_2, x_3, x_4); -if (lean::obj_tag(x_30) == 0) -{ -uint8 x_31; -lean::dec(x_28); -x_31 = !lean::is_exclusive(x_30); -if (x_31 == 0) -{ -return x_30; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_30); -if (x_34 == 0) -{ -obj* x_35; uint8 x_36; -x_35 = lean::cnstr_get(x_30, 0); -x_36 = !lean::is_exclusive(x_35); -if (x_36 == 0) -{ -obj* x_37; uint8 x_38; -x_37 = lean::cnstr_get(x_35, 0); -x_38 = !lean::is_exclusive(x_37); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; obj* x_41; -x_39 = lean::cnstr_get(x_37, 1); -x_40 = lean::cnstr_get(x_28, 1); -lean::inc(x_40); -lean::dec(x_28); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_39); -lean::cnstr_set(x_37, 1, x_41); -return x_30; -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_42 = lean::cnstr_get(x_37, 0); -x_43 = lean::cnstr_get(x_37, 1); -lean::inc(x_43); -lean::inc(x_42); -lean::dec(x_37); -x_44 = lean::cnstr_get(x_28, 1); -lean::inc(x_44); -lean::dec(x_28); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_43); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_42); -lean::cnstr_set(x_46, 1, x_45); -lean::cnstr_set(x_35, 0, x_46); -return x_30; -} -} -else -{ -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; -x_47 = lean::cnstr_get(x_35, 0); -x_48 = lean::cnstr_get(x_35, 1); -lean::inc(x_48); -lean::inc(x_47); -lean::dec(x_35); -x_49 = lean::cnstr_get(x_47, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_47, 1); -lean::inc(x_50); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - x_51 = x_47; -} else { - lean::dec_ref(x_47); - x_51 = lean::box(0); -} -x_52 = lean::cnstr_get(x_28, 1); -lean::inc(x_52); -lean::dec(x_28); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_50); -if (lean::is_scalar(x_51)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_51; -} -lean::cnstr_set(x_54, 0, x_49); -lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_48); -lean::cnstr_set(x_30, 0, x_55); -return x_30; -} -} -else -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_56 = lean::cnstr_get(x_30, 0); -lean::inc(x_56); -lean::dec(x_30); -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - lean::cnstr_release(x_56, 1); - x_59 = x_56; -} else { - lean::dec_ref(x_56); - x_59 = lean::box(0); -} -x_60 = lean::cnstr_get(x_57, 0); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_57, 1); -lean::inc(x_61); -if (lean::is_exclusive(x_57)) { - lean::cnstr_release(x_57, 0); - lean::cnstr_release(x_57, 1); - x_62 = x_57; -} else { - lean::dec_ref(x_57); - x_62 = lean::box(0); -} -x_63 = lean::cnstr_get(x_28, 1); -lean::inc(x_63); -lean::dec(x_28); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_61); -if (lean::is_scalar(x_62)) { - x_65 = lean::alloc_cnstr(0, 2, 0); -} else { - x_65 = x_62; -} -lean::cnstr_set(x_65, 0, x_60); -lean::cnstr_set(x_65, 1, x_64); -if (lean::is_scalar(x_59)) { - x_66 = lean::alloc_cnstr(0, 2, 0); -} else { - x_66 = x_59; -} -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_58); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -return x_67; -} -} -} -else -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; -lean::dec(x_27); -x_68 = lean::box(0); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_1); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_4); -x_71 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_71, 0, x_70); -return x_71; -} -} -} -else -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; -lean::free_heap_obj(x_5); -lean::dec(x_14); -x_72 = lean::box(0); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_1); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_4); -x_75 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_75, 0, x_74); -return x_75; -} -} -else -{ -obj* x_76; obj* x_77; uint8 x_78; -x_76 = lean::cnstr_get(x_5, 0); -lean::inc(x_76); -lean::dec(x_5); -x_77 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -x_78 = lean_name_dec_eq(x_76, x_77); -if (x_78 == 0) -{ -obj* x_79; uint8 x_80; -x_79 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -x_80 = lean_name_dec_eq(x_76, x_79); -lean::dec(x_76); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; -lean::inc(x_1); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_1); -x_82 = l_Lean_Parser_Syntax_format___main(x_1); -x_83 = l_Lean_Options_empty; -x_84 = l_Lean_Format_pretty(x_82, x_83); -x_85 = l_Lean_Elaborator_levelGetAppArgs___main___closed__1; -x_86 = lean::string_append(x_85, x_84); -lean::dec(x_84); -x_87 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_81, x_86, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_81); -return x_87; -} -else -{ -obj* x_88; obj* x_89; obj* x_90; -x_88 = l_Lean_Parser_Level_trailing_HasView; -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -lean::inc(x_1); -x_90 = lean::apply_1(x_89, x_1); -if (lean::obj_tag(x_90) == 0) -{ -obj* x_91; obj* x_92; obj* x_93; -lean::dec(x_1); -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -lean::dec(x_90); -x_92 = lean::cnstr_get(x_91, 0); -lean::inc(x_92); -x_93 = l_Lean_Elaborator_levelGetAppArgs___main(x_92, x_2, x_3, x_4); -if (lean::obj_tag(x_93) == 0) -{ -obj* x_94; obj* x_95; obj* x_96; -lean::dec(x_91); -x_94 = lean::cnstr_get(x_93, 0); -lean::inc(x_94); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - x_95 = x_93; -} else { - lean::dec_ref(x_93); - x_95 = lean::box(0); -} -if (lean::is_scalar(x_95)) { - x_96 = lean::alloc_cnstr(0, 1, 0); -} else { - x_96 = x_95; -} -lean::cnstr_set(x_96, 0, x_94); -return x_96; -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; -x_97 = lean::cnstr_get(x_93, 0); -lean::inc(x_97); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - x_98 = x_93; -} else { - lean::dec_ref(x_93); - x_98 = lean::box(0); -} -x_99 = lean::cnstr_get(x_97, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_97, 1); -lean::inc(x_100); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - x_101 = x_97; -} else { - lean::dec_ref(x_97); - x_101 = lean::box(0); -} -x_102 = lean::cnstr_get(x_99, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_99, 1); -lean::inc(x_103); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - lean::cnstr_release(x_99, 1); - x_104 = x_99; -} else { - lean::dec_ref(x_99); - x_104 = lean::box(0); -} -x_105 = lean::cnstr_get(x_91, 1); -lean::inc(x_105); -lean::dec(x_91); -x_106 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_106, 0, x_105); -lean::cnstr_set(x_106, 1, x_103); -if (lean::is_scalar(x_104)) { - x_107 = lean::alloc_cnstr(0, 2, 0); -} else { - x_107 = x_104; -} -lean::cnstr_set(x_107, 0, x_102); -lean::cnstr_set(x_107, 1, x_106); -if (lean::is_scalar(x_101)) { - x_108 = lean::alloc_cnstr(0, 2, 0); -} else { - x_108 = x_101; -} -lean::cnstr_set(x_108, 0, x_107); -lean::cnstr_set(x_108, 1, x_100); -if (lean::is_scalar(x_98)) { - x_109 = lean::alloc_cnstr(1, 1, 0); -} else { - x_109 = x_98; -} -lean::cnstr_set(x_109, 0, x_108); -return x_109; -} -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; -lean::dec(x_90); -x_110 = lean::box(0); -x_111 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_111, 0, x_1); -lean::cnstr_set(x_111, 1, x_110); -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_4); -x_113 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_113, 0, x_112); -return x_113; -} -} -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; -lean::dec(x_76); -x_114 = lean::box(0); -x_115 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_115, 0, x_1); -lean::cnstr_set(x_115, 1, x_114); -x_116 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_116, 0, x_115); -lean::cnstr_set(x_116, 1, x_4); -x_117 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_117, 0, x_116); -return x_117; -} -} -} -} -} -obj* l_Lean_Elaborator_levelGetAppArgs___main___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_levelGetAppArgs___main(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_levelGetAppArgs(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_levelGetAppArgs___main(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l_Lean_Elaborator_levelGetAppArgs___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_levelGetAppArgs(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_levelAdd___main(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_2, x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = lean::mk_nat_obj(1u); -x_6 = lean::nat_sub(x_2, x_5); -x_7 = l_Lean_Elaborator_levelAdd___main(x_1, x_6); -lean::dec(x_6); -x_8 = level_mk_succ(x_7); -return x_8; -} -else -{ -lean::inc(x_1); -return x_1; -} -} -} -obj* l_Lean_Elaborator_levelAdd___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Elaborator_levelAdd___main(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Elaborator_levelAdd(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Elaborator_levelAdd___main(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_levelAdd___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Elaborator_levelAdd(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = l_Lean_Elaborator_toLevel___main(x_9, x_2, x_3, x_4); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_10, x_2, x_3, x_17); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_16); -lean::free_heap_obj(x_1); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_23, 0); -lean::cnstr_set(x_1, 1, x_25); -lean::cnstr_set(x_1, 0, x_16); -lean::cnstr_set(x_23, 0, x_1); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_23, 0); -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_23); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_16); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_1); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_18, 0, x_28); -return x_18; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_18, 0); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - lean::cnstr_release(x_29, 1); - x_32 = x_29; -} else { - lean::dec_ref(x_29); - x_32 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_30); -lean::cnstr_set(x_1, 0, x_16); -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_1); -x_37 = l_Lean_Elaborator_toLevel___main(x_35, x_2, x_3, x_4); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_36); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - x_39 = x_37; -} else { - lean::dec_ref(x_37); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(0, 1, 0); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_38); -return x_40; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_36, x_2, x_3, x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_42); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_46 = x_44; -} else { - lean::dec_ref(x_44); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(0, 1, 0); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_49 = x_44; -} else { - lean::dec_ref(x_44); - x_49 = lean::box(0); -} -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_52 = x_48; -} else { - lean::dec_ref(x_48); - x_52 = lean::box(0); -} -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_42); -lean::cnstr_set(x_53, 1, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -if (lean::is_scalar(x_49)) { - x_55 = lean::alloc_cnstr(1, 1, 0); -} else { - x_55 = x_49; -} -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -} -} -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -lean::inc(x_1); -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(x_1, x_4); -x_6 = level_mk_max(x_3, x_5); -return x_6; -} -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -lean::inc(x_1); -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(x_1, x_4); -x_6 = level_mk_imax(x_3, x_5); -return x_6; -} -} -} -obj* _init_l_Lean_Elaborator_toLevel___main___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("toLevel: unexpected input: "); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toLevel___main___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("ill-formed universe Level"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toLevel___main___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = level_mk_mvar(x_1); -return x_2; -} -} -obj* _init_l_Lean_Elaborator_toLevel___main___closed__4() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("unknown universe variable '"); -return x_1; -} -} -obj* l_Lean_Elaborator_toLevel___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -lean::inc(x_1); -x_5 = l_Lean_Elaborator_levelGetAppArgs___main(x_1, x_2, x_3, x_4); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -lean::dec(x_1); -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_5, 0); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -lean::dec(x_10); -x_14 = l_Lean_Elaborator_currentScope(x_2, x_3, x_11); -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_15; -lean::dec(x_13); -lean::dec(x_12); -lean::dec(x_1); -x_15 = !lean::is_exclusive(x_14); -if (x_15 == 0) -{ -return x_14; -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_14, 0); -lean::inc(x_16); -lean::dec(x_14); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -return x_17; -} -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_14); -if (x_18 == 0) -{ -obj* x_19; uint8 x_20; -x_19 = lean::cnstr_get(x_14, 0); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = lean::cnstr_get(x_19, 1); -x_23 = l_Lean_Parser_Syntax_kind___main(x_12); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -lean::dec(x_13); -lean::dec(x_12); -lean::inc(x_1); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_1); -x_25 = l_Lean_Parser_Syntax_format___main(x_1); -x_26 = l_Lean_Options_empty; -x_27 = l_Lean_Format_pretty(x_25, x_26); -x_28 = l_Lean_Elaborator_toLevel___main___closed__1; -x_29 = lean::string_append(x_28, x_27); -lean::dec(x_27); -x_30 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_24, x_29, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_24); -return x_30; -} -else -{ -uint8 x_31; -x_31 = !lean::is_exclusive(x_23); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; uint8 x_34; -x_32 = lean::cnstr_get(x_23, 0); -x_33 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -x_34 = lean_name_dec_eq(x_32, x_33); -if (x_34 == 0) -{ -obj* x_35; uint8 x_36; -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -x_35 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -x_36 = lean_name_dec_eq(x_32, x_35); -lean::dec(x_32); -if (x_36 == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_13); -lean::dec(x_12); -lean::inc(x_1); -lean::cnstr_set(x_23, 0, x_1); -x_37 = l_Lean_Parser_Syntax_format___main(x_1); -x_38 = l_Lean_Options_empty; -x_39 = l_Lean_Format_pretty(x_37, x_38); -x_40 = l_Lean_Elaborator_toLevel___main___closed__1; -x_41 = lean::string_append(x_40, x_39); -lean::dec(x_39); -x_42 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_41, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_42; -} -else -{ -obj* x_43; obj* x_44; obj* x_45; -x_43 = l_Lean_Parser_Level_trailing_HasView; -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -x_45 = lean::apply_1(x_44, x_12); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; obj* x_47; -lean::dec(x_45); -lean::dec(x_13); -lean::cnstr_set(x_23, 0, x_1); -x_46 = l_Lean_Elaborator_toLevel___main___closed__2; -x_47 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_46, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_47; -} -else -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; -lean::free_heap_obj(x_23); -lean::dec(x_1); -x_48 = lean::cnstr_get(x_45, 0); -lean::inc(x_48); -lean::dec(x_45); -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = l_Lean_Elaborator_toLevel___main(x_49, x_2, x_3, x_22); -if (lean::obj_tag(x_50) == 0) -{ -uint8 x_51; -lean::dec(x_48); -x_51 = !lean::is_exclusive(x_50); -if (x_51 == 0) -{ -return x_50; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -return x_53; -} -} -else -{ -uint8 x_54; -x_54 = !lean::is_exclusive(x_50); -if (x_54 == 0) -{ -obj* x_55; uint8 x_56; -x_55 = lean::cnstr_get(x_50, 0); -x_56 = !lean::is_exclusive(x_55); -if (x_56 == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_57 = lean::cnstr_get(x_55, 0); -x_58 = lean::cnstr_get(x_48, 2); -lean::inc(x_58); -lean::dec(x_48); -x_59 = l_Lean_Parser_number_View_toNat___main(x_58); -x_60 = l_Lean_Elaborator_levelAdd___main(x_57, x_59); -lean::dec(x_59); -lean::dec(x_57); -lean::cnstr_set(x_55, 0, x_60); -return x_50; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_61 = lean::cnstr_get(x_55, 0); -x_62 = lean::cnstr_get(x_55, 1); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_55); -x_63 = lean::cnstr_get(x_48, 2); -lean::inc(x_63); -lean::dec(x_48); -x_64 = l_Lean_Parser_number_View_toNat___main(x_63); -x_65 = l_Lean_Elaborator_levelAdd___main(x_61, x_64); -lean::dec(x_64); -lean::dec(x_61); -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_62); -lean::cnstr_set(x_50, 0, x_66); -return x_50; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_67 = lean::cnstr_get(x_50, 0); -lean::inc(x_67); -lean::dec(x_50); -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_67, 1); -lean::inc(x_69); -if (lean::is_exclusive(x_67)) { - lean::cnstr_release(x_67, 0); - lean::cnstr_release(x_67, 1); - x_70 = x_67; -} else { - lean::dec_ref(x_67); - x_70 = lean::box(0); -} -x_71 = lean::cnstr_get(x_48, 2); -lean::inc(x_71); -lean::dec(x_48); -x_72 = l_Lean_Parser_number_View_toNat___main(x_71); -x_73 = l_Lean_Elaborator_levelAdd___main(x_68, x_72); -lean::dec(x_72); -lean::dec(x_68); -if (lean::is_scalar(x_70)) { - x_74 = lean::alloc_cnstr(0, 2, 0); -} else { - x_74 = x_70; -} -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_69); -x_75 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_75, 0, x_74); -return x_75; -} -} -} -else -{ -obj* x_76; obj* x_77; -lean::dec(x_45); -lean::dec(x_13); -lean::cnstr_set(x_23, 0, x_1); -x_76 = l_Lean_Elaborator_toLevel___main___closed__2; -x_77 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_76, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_77; -} -} -} -} -else -{ -obj* x_78; obj* x_79; obj* x_80; -lean::dec(x_32); -x_78 = l_Lean_Parser_Level_leading_HasView; -x_79 = lean::cnstr_get(x_78, 0); -lean::inc(x_79); -x_80 = lean::apply_1(x_79, x_12); -switch (lean::obj_tag(x_80)) { -case 0: -{ -lean::dec(x_80); -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_81; obj* x_82; -lean::cnstr_set(x_23, 0, x_1); -x_81 = l_Lean_Elaborator_toLevel___main___closed__2; -x_82 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_81, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_82; -} -else -{ -obj* x_83; obj* x_84; obj* x_85; -lean::free_heap_obj(x_23); -lean::dec(x_1); -x_83 = lean::cnstr_get(x_13, 0); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_13, 1); -lean::inc(x_84); -lean::dec(x_13); -x_85 = l_Lean_Elaborator_toLevel___main(x_83, x_2, x_3, x_22); -if (lean::obj_tag(x_85) == 0) -{ -uint8 x_86; -lean::dec(x_84); -x_86 = !lean::is_exclusive(x_85); -if (x_86 == 0) -{ -return x_85; -} -else -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_85, 0); -lean::inc(x_87); -lean::dec(x_85); -x_88 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_88, 0, x_87); -return x_88; -} -} -else -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_89 = lean::cnstr_get(x_85, 0); -lean::inc(x_89); -lean::dec(x_85); -x_90 = lean::cnstr_get(x_89, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_89, 1); -lean::inc(x_91); -lean::dec(x_89); -x_92 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_84, x_2, x_3, x_91); -if (lean::obj_tag(x_92) == 0) -{ -uint8 x_93; -lean::dec(x_90); -x_93 = !lean::is_exclusive(x_92); -if (x_93 == 0) -{ -return x_92; -} -else -{ -obj* x_94; obj* x_95; -x_94 = lean::cnstr_get(x_92, 0); -lean::inc(x_94); -lean::dec(x_92); -x_95 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -return x_95; -} -} -else -{ -uint8 x_96; -x_96 = !lean::is_exclusive(x_92); -if (x_96 == 0) -{ -obj* x_97; uint8 x_98; -x_97 = lean::cnstr_get(x_92, 0); -x_98 = !lean::is_exclusive(x_97); -if (x_98 == 0) -{ -obj* x_99; obj* x_100; -x_99 = lean::cnstr_get(x_97, 0); -x_100 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(x_90, x_99); -lean::dec(x_90); -lean::cnstr_set(x_97, 0, x_100); -return x_92; -} -else -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_101 = lean::cnstr_get(x_97, 0); -x_102 = lean::cnstr_get(x_97, 1); -lean::inc(x_102); -lean::inc(x_101); -lean::dec(x_97); -x_103 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(x_90, x_101); -lean::dec(x_90); -x_104 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_102); -lean::cnstr_set(x_92, 0, x_104); -return x_92; -} -} -else -{ -obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_105 = lean::cnstr_get(x_92, 0); -lean::inc(x_105); -lean::dec(x_92); -x_106 = lean::cnstr_get(x_105, 0); -lean::inc(x_106); -x_107 = lean::cnstr_get(x_105, 1); -lean::inc(x_107); -if (lean::is_exclusive(x_105)) { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - x_108 = x_105; -} else { - lean::dec_ref(x_105); - x_108 = lean::box(0); -} -x_109 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(x_90, x_106); -lean::dec(x_90); -if (lean::is_scalar(x_108)) { - x_110 = lean::alloc_cnstr(0, 2, 0); -} else { - x_110 = x_108; -} -lean::cnstr_set(x_110, 0, x_109); -lean::cnstr_set(x_110, 1, x_107); -x_111 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_111, 0, x_110); -return x_111; -} -} -} -} -} -case 1: -{ -lean::dec(x_80); -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_112; obj* x_113; -lean::cnstr_set(x_23, 0, x_1); -x_112 = l_Lean_Elaborator_toLevel___main___closed__2; -x_113 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_112, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_113; -} -else -{ -obj* x_114; obj* x_115; obj* x_116; -lean::free_heap_obj(x_23); -lean::dec(x_1); -x_114 = lean::cnstr_get(x_13, 0); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_13, 1); -lean::inc(x_115); -lean::dec(x_13); -x_116 = l_Lean_Elaborator_toLevel___main(x_114, x_2, x_3, x_22); -if (lean::obj_tag(x_116) == 0) -{ -uint8 x_117; -lean::dec(x_115); -x_117 = !lean::is_exclusive(x_116); -if (x_117 == 0) -{ -return x_116; -} -else -{ -obj* x_118; obj* x_119; -x_118 = lean::cnstr_get(x_116, 0); -lean::inc(x_118); -lean::dec(x_116); -x_119 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_119, 0, x_118); -return x_119; -} -} -else -{ -obj* x_120; obj* x_121; obj* x_122; obj* x_123; -x_120 = lean::cnstr_get(x_116, 0); -lean::inc(x_120); -lean::dec(x_116); -x_121 = lean::cnstr_get(x_120, 0); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_120, 1); -lean::inc(x_122); -lean::dec(x_120); -x_123 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_115, x_2, x_3, x_122); -if (lean::obj_tag(x_123) == 0) -{ -uint8 x_124; -lean::dec(x_121); -x_124 = !lean::is_exclusive(x_123); -if (x_124 == 0) -{ -return x_123; -} -else -{ -obj* x_125; obj* x_126; -x_125 = lean::cnstr_get(x_123, 0); -lean::inc(x_125); -lean::dec(x_123); -x_126 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_126, 0, x_125); -return x_126; -} -} -else -{ -uint8 x_127; -x_127 = !lean::is_exclusive(x_123); -if (x_127 == 0) -{ -obj* x_128; uint8 x_129; -x_128 = lean::cnstr_get(x_123, 0); -x_129 = !lean::is_exclusive(x_128); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; -x_130 = lean::cnstr_get(x_128, 0); -x_131 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(x_121, x_130); -lean::dec(x_121); -lean::cnstr_set(x_128, 0, x_131); -return x_123; -} -else -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; -x_132 = lean::cnstr_get(x_128, 0); -x_133 = lean::cnstr_get(x_128, 1); -lean::inc(x_133); -lean::inc(x_132); -lean::dec(x_128); -x_134 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(x_121, x_132); -lean::dec(x_121); -x_135 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_135, 0, x_134); -lean::cnstr_set(x_135, 1, x_133); -lean::cnstr_set(x_123, 0, x_135); -return x_123; -} -} -else -{ -obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -x_136 = lean::cnstr_get(x_123, 0); -lean::inc(x_136); -lean::dec(x_123); -x_137 = lean::cnstr_get(x_136, 0); -lean::inc(x_137); -x_138 = lean::cnstr_get(x_136, 1); -lean::inc(x_138); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_139 = x_136; -} else { - lean::dec_ref(x_136); - x_139 = lean::box(0); -} -x_140 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(x_121, x_137); -lean::dec(x_121); -if (lean::is_scalar(x_139)) { - x_141 = lean::alloc_cnstr(0, 2, 0); -} else { - x_141 = x_139; -} -lean::cnstr_set(x_141, 0, x_140); -lean::cnstr_set(x_141, 1, x_138); -x_142 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_142, 0, x_141); -return x_142; -} -} -} -} -} -case 2: -{ -lean::dec(x_80); -lean::dec(x_21); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_143; -lean::free_heap_obj(x_23); -lean::dec(x_1); -x_143 = l_Lean_Elaborator_toLevel___main___closed__3; -lean::cnstr_set(x_19, 0, x_143); -return x_14; -} -else -{ -obj* x_144; obj* x_145; -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_14); -lean::dec(x_13); -lean::cnstr_set(x_23, 0, x_1); -x_144 = l_Lean_Elaborator_toLevel___main___closed__2; -x_145 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_144, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_145; -} -} -case 3: -{ -obj* x_146; obj* x_147; -lean::dec(x_80); -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -lean::dec(x_13); -lean::cnstr_set(x_23, 0, x_1); -x_146 = l_Lean_Elaborator_toLevel___main___closed__2; -x_147 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_146, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_147; -} -case 4: -{ -lean::dec(x_21); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_148; obj* x_149; obj* x_150; -lean::free_heap_obj(x_23); -lean::dec(x_1); -x_148 = lean::cnstr_get(x_80, 0); -lean::inc(x_148); -lean::dec(x_80); -x_149 = l_Lean_Parser_number_View_toNat___main(x_148); -x_150 = l_Lean_Level_ofNat___main(x_149); -lean::dec(x_149); -lean::cnstr_set(x_19, 0, x_150); -return x_14; -} -else -{ -obj* x_151; obj* x_152; -lean::dec(x_80); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_14); -lean::dec(x_13); -lean::cnstr_set(x_23, 0, x_1); -x_151 = l_Lean_Elaborator_toLevel___main___closed__2; -x_152 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_151, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_152; -} -} -default: -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; -x_153 = lean::cnstr_get(x_80, 0); -lean::inc(x_153); -lean::dec(x_80); -x_154 = l_Lean_Elaborator_mangleIdent(x_153); -x_155 = lean::cnstr_get(x_21, 3); -lean::inc(x_155); -lean::dec(x_21); -x_156 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_154); -x_157 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_156, x_155, x_154); -if (lean::obj_tag(x_157) == 0) -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_14); -lean::cnstr_set(x_23, 0, x_1); -x_158 = l_Lean_Name_toString___closed__1; -x_159 = l_Lean_Name_toStringWithSep___main(x_158, x_154); -x_160 = l_Lean_Elaborator_toLevel___main___closed__4; -x_161 = lean::string_append(x_160, x_159); -lean::dec(x_159); -x_162 = l_Char_HasRepr___closed__1; -x_163 = lean::string_append(x_161, x_162); -x_164 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_163, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_164; -} -else -{ -obj* x_165; -lean::dec(x_157); -lean::free_heap_obj(x_23); -lean::dec(x_1); -x_165 = level_mk_param(x_154); -lean::cnstr_set(x_19, 0, x_165); -return x_14; -} -} -else -{ -obj* x_166; obj* x_167; -lean::dec(x_80); -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -lean::dec(x_13); -lean::cnstr_set(x_23, 0, x_1); -x_166 = l_Lean_Elaborator_toLevel___main___closed__2; -x_167 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_23, x_166, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_23); -return x_167; -} -} -} -} -} -else -{ -obj* x_168; obj* x_169; uint8 x_170; -x_168 = lean::cnstr_get(x_23, 0); -lean::inc(x_168); -lean::dec(x_23); -x_169 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -x_170 = lean_name_dec_eq(x_168, x_169); -if (x_170 == 0) -{ -obj* x_171; uint8 x_172; -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -x_171 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -x_172 = lean_name_dec_eq(x_168, x_171); -lean::dec(x_168); -if (x_172 == 0) -{ -obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; -lean::dec(x_13); -lean::dec(x_12); -lean::inc(x_1); -x_173 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_173, 0, x_1); -x_174 = l_Lean_Parser_Syntax_format___main(x_1); -x_175 = l_Lean_Options_empty; -x_176 = l_Lean_Format_pretty(x_174, x_175); -x_177 = l_Lean_Elaborator_toLevel___main___closed__1; -x_178 = lean::string_append(x_177, x_176); -lean::dec(x_176); -x_179 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_173, x_178, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_173); -return x_179; -} -else -{ -obj* x_180; obj* x_181; obj* x_182; -x_180 = l_Lean_Parser_Level_trailing_HasView; -x_181 = lean::cnstr_get(x_180, 0); -lean::inc(x_181); -x_182 = lean::apply_1(x_181, x_12); -if (lean::obj_tag(x_182) == 0) -{ -obj* x_183; obj* x_184; obj* x_185; -lean::dec(x_182); -lean::dec(x_13); -x_183 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_183, 0, x_1); -x_184 = l_Lean_Elaborator_toLevel___main___closed__2; -x_185 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_183, x_184, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_183); -return x_185; -} -else -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_186; obj* x_187; obj* x_188; -lean::dec(x_1); -x_186 = lean::cnstr_get(x_182, 0); -lean::inc(x_186); -lean::dec(x_182); -x_187 = lean::cnstr_get(x_186, 0); -lean::inc(x_187); -x_188 = l_Lean_Elaborator_toLevel___main(x_187, x_2, x_3, x_22); -if (lean::obj_tag(x_188) == 0) -{ -obj* x_189; obj* x_190; obj* x_191; -lean::dec(x_186); -x_189 = lean::cnstr_get(x_188, 0); -lean::inc(x_189); -if (lean::is_exclusive(x_188)) { - lean::cnstr_release(x_188, 0); - x_190 = x_188; -} else { - lean::dec_ref(x_188); - x_190 = lean::box(0); -} -if (lean::is_scalar(x_190)) { - x_191 = lean::alloc_cnstr(0, 1, 0); -} else { - x_191 = x_190; -} -lean::cnstr_set(x_191, 0, x_189); -return x_191; -} -else -{ -obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; -x_192 = lean::cnstr_get(x_188, 0); -lean::inc(x_192); -if (lean::is_exclusive(x_188)) { - lean::cnstr_release(x_188, 0); - x_193 = x_188; -} else { - lean::dec_ref(x_188); - x_193 = lean::box(0); -} -x_194 = lean::cnstr_get(x_192, 0); -lean::inc(x_194); -x_195 = lean::cnstr_get(x_192, 1); -lean::inc(x_195); -if (lean::is_exclusive(x_192)) { - lean::cnstr_release(x_192, 0); - lean::cnstr_release(x_192, 1); - x_196 = x_192; -} else { - lean::dec_ref(x_192); - x_196 = lean::box(0); -} -x_197 = lean::cnstr_get(x_186, 2); -lean::inc(x_197); -lean::dec(x_186); -x_198 = l_Lean_Parser_number_View_toNat___main(x_197); -x_199 = l_Lean_Elaborator_levelAdd___main(x_194, x_198); -lean::dec(x_198); -lean::dec(x_194); -if (lean::is_scalar(x_196)) { - x_200 = lean::alloc_cnstr(0, 2, 0); -} else { - x_200 = x_196; -} -lean::cnstr_set(x_200, 0, x_199); -lean::cnstr_set(x_200, 1, x_195); -if (lean::is_scalar(x_193)) { - x_201 = lean::alloc_cnstr(1, 1, 0); -} else { - x_201 = x_193; -} -lean::cnstr_set(x_201, 0, x_200); -return x_201; -} -} -else -{ -obj* x_202; obj* x_203; obj* x_204; -lean::dec(x_182); -lean::dec(x_13); -x_202 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_202, 0, x_1); -x_203 = l_Lean_Elaborator_toLevel___main___closed__2; -x_204 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_202, x_203, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_202); -return x_204; -} -} -} -} -else -{ -obj* x_205; obj* x_206; obj* x_207; -lean::dec(x_168); -x_205 = l_Lean_Parser_Level_leading_HasView; -x_206 = lean::cnstr_get(x_205, 0); -lean::inc(x_206); -x_207 = lean::apply_1(x_206, x_12); -switch (lean::obj_tag(x_207)) { -case 0: -{ -lean::dec(x_207); -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_208; obj* x_209; obj* x_210; -x_208 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_208, 0, x_1); -x_209 = l_Lean_Elaborator_toLevel___main___closed__2; -x_210 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_208, x_209, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_208); -return x_210; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; -lean::dec(x_1); -x_211 = lean::cnstr_get(x_13, 0); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_13, 1); -lean::inc(x_212); -lean::dec(x_13); -x_213 = l_Lean_Elaborator_toLevel___main(x_211, x_2, x_3, x_22); -if (lean::obj_tag(x_213) == 0) -{ -obj* x_214; obj* x_215; obj* x_216; -lean::dec(x_212); -x_214 = lean::cnstr_get(x_213, 0); -lean::inc(x_214); -if (lean::is_exclusive(x_213)) { - lean::cnstr_release(x_213, 0); - x_215 = x_213; -} else { - lean::dec_ref(x_213); - x_215 = lean::box(0); -} -if (lean::is_scalar(x_215)) { - x_216 = lean::alloc_cnstr(0, 1, 0); -} else { - x_216 = x_215; -} -lean::cnstr_set(x_216, 0, x_214); -return x_216; -} -else -{ -obj* x_217; obj* x_218; obj* x_219; obj* x_220; -x_217 = lean::cnstr_get(x_213, 0); -lean::inc(x_217); -lean::dec(x_213); -x_218 = lean::cnstr_get(x_217, 0); -lean::inc(x_218); -x_219 = lean::cnstr_get(x_217, 1); -lean::inc(x_219); -lean::dec(x_217); -x_220 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_212, x_2, x_3, x_219); -if (lean::obj_tag(x_220) == 0) -{ -obj* x_221; obj* x_222; obj* x_223; -lean::dec(x_218); -x_221 = lean::cnstr_get(x_220, 0); -lean::inc(x_221); -if (lean::is_exclusive(x_220)) { - lean::cnstr_release(x_220, 0); - x_222 = x_220; -} else { - lean::dec_ref(x_220); - x_222 = lean::box(0); -} -if (lean::is_scalar(x_222)) { - x_223 = lean::alloc_cnstr(0, 1, 0); -} else { - x_223 = x_222; -} -lean::cnstr_set(x_223, 0, x_221); -return x_223; -} -else -{ -obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_231; -x_224 = lean::cnstr_get(x_220, 0); -lean::inc(x_224); -if (lean::is_exclusive(x_220)) { - lean::cnstr_release(x_220, 0); - x_225 = x_220; -} else { - lean::dec_ref(x_220); - x_225 = lean::box(0); -} -x_226 = lean::cnstr_get(x_224, 0); -lean::inc(x_226); -x_227 = lean::cnstr_get(x_224, 1); -lean::inc(x_227); -if (lean::is_exclusive(x_224)) { - lean::cnstr_release(x_224, 0); - lean::cnstr_release(x_224, 1); - x_228 = x_224; -} else { - lean::dec_ref(x_224); - x_228 = lean::box(0); -} -x_229 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(x_218, x_226); -lean::dec(x_218); -if (lean::is_scalar(x_228)) { - x_230 = lean::alloc_cnstr(0, 2, 0); -} else { - x_230 = x_228; -} -lean::cnstr_set(x_230, 0, x_229); -lean::cnstr_set(x_230, 1, x_227); -if (lean::is_scalar(x_225)) { - x_231 = lean::alloc_cnstr(1, 1, 0); -} else { - x_231 = x_225; -} -lean::cnstr_set(x_231, 0, x_230); -return x_231; -} -} -} -} -case 1: -{ -lean::dec(x_207); -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_232; obj* x_233; obj* x_234; -x_232 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_232, 0, x_1); -x_233 = l_Lean_Elaborator_toLevel___main___closed__2; -x_234 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_232, x_233, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_232); -return x_234; -} -else -{ -obj* x_235; obj* x_236; obj* x_237; -lean::dec(x_1); -x_235 = lean::cnstr_get(x_13, 0); -lean::inc(x_235); -x_236 = lean::cnstr_get(x_13, 1); -lean::inc(x_236); -lean::dec(x_13); -x_237 = l_Lean_Elaborator_toLevel___main(x_235, x_2, x_3, x_22); -if (lean::obj_tag(x_237) == 0) -{ -obj* x_238; obj* x_239; obj* x_240; -lean::dec(x_236); -x_238 = lean::cnstr_get(x_237, 0); -lean::inc(x_238); -if (lean::is_exclusive(x_237)) { - lean::cnstr_release(x_237, 0); - x_239 = x_237; -} else { - lean::dec_ref(x_237); - x_239 = lean::box(0); -} -if (lean::is_scalar(x_239)) { - x_240 = lean::alloc_cnstr(0, 1, 0); -} else { - x_240 = x_239; -} -lean::cnstr_set(x_240, 0, x_238); -return x_240; -} -else -{ -obj* x_241; obj* x_242; obj* x_243; obj* x_244; -x_241 = lean::cnstr_get(x_237, 0); -lean::inc(x_241); -lean::dec(x_237); -x_242 = lean::cnstr_get(x_241, 0); -lean::inc(x_242); -x_243 = lean::cnstr_get(x_241, 1); -lean::inc(x_243); -lean::dec(x_241); -x_244 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_236, x_2, x_3, x_243); -if (lean::obj_tag(x_244) == 0) -{ -obj* x_245; obj* x_246; obj* x_247; -lean::dec(x_242); -x_245 = lean::cnstr_get(x_244, 0); -lean::inc(x_245); -if (lean::is_exclusive(x_244)) { - lean::cnstr_release(x_244, 0); - x_246 = x_244; -} else { - lean::dec_ref(x_244); - x_246 = lean::box(0); -} -if (lean::is_scalar(x_246)) { - x_247 = lean::alloc_cnstr(0, 1, 0); -} else { - x_247 = x_246; -} -lean::cnstr_set(x_247, 0, x_245); -return x_247; -} -else -{ -obj* x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; -x_248 = lean::cnstr_get(x_244, 0); -lean::inc(x_248); -if (lean::is_exclusive(x_244)) { - lean::cnstr_release(x_244, 0); - x_249 = x_244; -} else { - lean::dec_ref(x_244); - x_249 = lean::box(0); -} -x_250 = lean::cnstr_get(x_248, 0); -lean::inc(x_250); -x_251 = lean::cnstr_get(x_248, 1); -lean::inc(x_251); -if (lean::is_exclusive(x_248)) { - lean::cnstr_release(x_248, 0); - lean::cnstr_release(x_248, 1); - x_252 = x_248; -} else { - lean::dec_ref(x_248); - x_252 = lean::box(0); -} -x_253 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(x_242, x_250); -lean::dec(x_242); -if (lean::is_scalar(x_252)) { - x_254 = lean::alloc_cnstr(0, 2, 0); -} else { - x_254 = x_252; -} -lean::cnstr_set(x_254, 0, x_253); -lean::cnstr_set(x_254, 1, x_251); -if (lean::is_scalar(x_249)) { - x_255 = lean::alloc_cnstr(1, 1, 0); -} else { - x_255 = x_249; -} -lean::cnstr_set(x_255, 0, x_254); -return x_255; -} -} -} -} -case 2: -{ -lean::dec(x_207); -lean::dec(x_21); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_256; -lean::dec(x_1); -x_256 = l_Lean_Elaborator_toLevel___main___closed__3; -lean::cnstr_set(x_19, 0, x_256); -return x_14; -} -else -{ -obj* x_257; obj* x_258; obj* x_259; -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_14); -lean::dec(x_13); -x_257 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_257, 0, x_1); -x_258 = l_Lean_Elaborator_toLevel___main___closed__2; -x_259 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_257, x_258, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_257); -return x_259; -} -} -case 3: -{ -obj* x_260; obj* x_261; obj* x_262; -lean::dec(x_207); -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -lean::dec(x_13); -x_260 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_260, 0, x_1); -x_261 = l_Lean_Elaborator_toLevel___main___closed__2; -x_262 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_260, x_261, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_260); -return x_262; -} -case 4: -{ -lean::dec(x_21); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_263; obj* x_264; obj* x_265; -lean::dec(x_1); -x_263 = lean::cnstr_get(x_207, 0); -lean::inc(x_263); -lean::dec(x_207); -x_264 = l_Lean_Parser_number_View_toNat___main(x_263); -x_265 = l_Lean_Level_ofNat___main(x_264); -lean::dec(x_264); -lean::cnstr_set(x_19, 0, x_265); -return x_14; -} -else -{ -obj* x_266; obj* x_267; obj* x_268; -lean::dec(x_207); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_14); -lean::dec(x_13); -x_266 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_266, 0, x_1); -x_267 = l_Lean_Elaborator_toLevel___main___closed__2; -x_268 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_266, x_267, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_266); -return x_268; -} -} -default: -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_273; -x_269 = lean::cnstr_get(x_207, 0); -lean::inc(x_269); -lean::dec(x_207); -x_270 = l_Lean_Elaborator_mangleIdent(x_269); -x_271 = lean::cnstr_get(x_21, 3); -lean::inc(x_271); -lean::dec(x_21); -x_272 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_270); -x_273 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_272, x_271, x_270); -if (lean::obj_tag(x_273) == 0) -{ -obj* x_274; obj* x_275; obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_14); -x_274 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_274, 0, x_1); -x_275 = l_Lean_Name_toString___closed__1; -x_276 = l_Lean_Name_toStringWithSep___main(x_275, x_270); -x_277 = l_Lean_Elaborator_toLevel___main___closed__4; -x_278 = lean::string_append(x_277, x_276); -lean::dec(x_276); -x_279 = l_Char_HasRepr___closed__1; -x_280 = lean::string_append(x_278, x_279); -x_281 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_274, x_280, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_274); -return x_281; -} -else -{ -obj* x_282; -lean::dec(x_273); -lean::dec(x_1); -x_282 = level_mk_param(x_270); -lean::cnstr_set(x_19, 0, x_282); -return x_14; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; -lean::dec(x_207); -lean::free_heap_obj(x_19); -lean::dec(x_21); -lean::free_heap_obj(x_14); -lean::dec(x_13); -x_283 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_283, 0, x_1); -x_284 = l_Lean_Elaborator_toLevel___main___closed__2; -x_285 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_283, x_284, x_2, x_3, x_22); -lean::dec(x_22); -lean::dec(x_283); -return x_285; -} -} -} -} -} -} -} -else -{ -obj* x_286; obj* x_287; obj* x_288; -x_286 = lean::cnstr_get(x_19, 0); -x_287 = lean::cnstr_get(x_19, 1); -lean::inc(x_287); -lean::inc(x_286); -lean::dec(x_19); -x_288 = l_Lean_Parser_Syntax_kind___main(x_12); -if (lean::obj_tag(x_288) == 0) -{ -obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; obj* x_294; obj* x_295; -lean::dec(x_286); -lean::free_heap_obj(x_14); -lean::dec(x_13); -lean::dec(x_12); -lean::inc(x_1); -x_289 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_289, 0, x_1); -x_290 = l_Lean_Parser_Syntax_format___main(x_1); -x_291 = l_Lean_Options_empty; -x_292 = l_Lean_Format_pretty(x_290, x_291); -x_293 = l_Lean_Elaborator_toLevel___main___closed__1; -x_294 = lean::string_append(x_293, x_292); -lean::dec(x_292); -x_295 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_289, x_294, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_289); -return x_295; -} -else -{ -obj* x_296; obj* x_297; obj* x_298; uint8 x_299; -x_296 = lean::cnstr_get(x_288, 0); -lean::inc(x_296); -if (lean::is_exclusive(x_288)) { - lean::cnstr_release(x_288, 0); - x_297 = x_288; -} else { - lean::dec_ref(x_288); - x_297 = lean::box(0); -} -x_298 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -x_299 = lean_name_dec_eq(x_296, x_298); -if (x_299 == 0) -{ -obj* x_300; uint8 x_301; -lean::dec(x_286); -lean::free_heap_obj(x_14); -x_300 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -x_301 = lean_name_dec_eq(x_296, x_300); -lean::dec(x_296); -if (x_301 == 0) -{ -obj* x_302; obj* x_303; obj* x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; -lean::dec(x_13); -lean::dec(x_12); -lean::inc(x_1); -if (lean::is_scalar(x_297)) { - x_302 = lean::alloc_cnstr(1, 1, 0); -} else { - x_302 = x_297; -} -lean::cnstr_set(x_302, 0, x_1); -x_303 = l_Lean_Parser_Syntax_format___main(x_1); -x_304 = l_Lean_Options_empty; -x_305 = l_Lean_Format_pretty(x_303, x_304); -x_306 = l_Lean_Elaborator_toLevel___main___closed__1; -x_307 = lean::string_append(x_306, x_305); -lean::dec(x_305); -x_308 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_302, x_307, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_302); -return x_308; -} -else -{ -obj* x_309; obj* x_310; obj* x_311; -x_309 = l_Lean_Parser_Level_trailing_HasView; -x_310 = lean::cnstr_get(x_309, 0); -lean::inc(x_310); -x_311 = lean::apply_1(x_310, x_12); -if (lean::obj_tag(x_311) == 0) -{ -obj* x_312; obj* x_313; obj* x_314; -lean::dec(x_311); -lean::dec(x_13); -if (lean::is_scalar(x_297)) { - x_312 = lean::alloc_cnstr(1, 1, 0); -} else { - x_312 = x_297; -} -lean::cnstr_set(x_312, 0, x_1); -x_313 = l_Lean_Elaborator_toLevel___main___closed__2; -x_314 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_312, x_313, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_312); -return x_314; -} -else -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_315; obj* x_316; obj* x_317; -lean::dec(x_297); -lean::dec(x_1); -x_315 = lean::cnstr_get(x_311, 0); -lean::inc(x_315); -lean::dec(x_311); -x_316 = lean::cnstr_get(x_315, 0); -lean::inc(x_316); -x_317 = l_Lean_Elaborator_toLevel___main(x_316, x_2, x_3, x_287); -if (lean::obj_tag(x_317) == 0) -{ -obj* x_318; obj* x_319; obj* x_320; -lean::dec(x_315); -x_318 = lean::cnstr_get(x_317, 0); -lean::inc(x_318); -if (lean::is_exclusive(x_317)) { - lean::cnstr_release(x_317, 0); - x_319 = x_317; -} else { - lean::dec_ref(x_317); - x_319 = lean::box(0); -} -if (lean::is_scalar(x_319)) { - x_320 = lean::alloc_cnstr(0, 1, 0); -} else { - x_320 = x_319; -} -lean::cnstr_set(x_320, 0, x_318); -return x_320; -} -else -{ -obj* x_321; obj* x_322; obj* x_323; obj* x_324; obj* x_325; obj* x_326; obj* x_327; obj* x_328; obj* x_329; obj* x_330; -x_321 = lean::cnstr_get(x_317, 0); -lean::inc(x_321); -if (lean::is_exclusive(x_317)) { - lean::cnstr_release(x_317, 0); - x_322 = x_317; -} else { - lean::dec_ref(x_317); - x_322 = lean::box(0); -} -x_323 = lean::cnstr_get(x_321, 0); -lean::inc(x_323); -x_324 = lean::cnstr_get(x_321, 1); -lean::inc(x_324); -if (lean::is_exclusive(x_321)) { - lean::cnstr_release(x_321, 0); - lean::cnstr_release(x_321, 1); - x_325 = x_321; -} else { - lean::dec_ref(x_321); - x_325 = lean::box(0); -} -x_326 = lean::cnstr_get(x_315, 2); -lean::inc(x_326); -lean::dec(x_315); -x_327 = l_Lean_Parser_number_View_toNat___main(x_326); -x_328 = l_Lean_Elaborator_levelAdd___main(x_323, x_327); -lean::dec(x_327); -lean::dec(x_323); -if (lean::is_scalar(x_325)) { - x_329 = lean::alloc_cnstr(0, 2, 0); -} else { - x_329 = x_325; -} -lean::cnstr_set(x_329, 0, x_328); -lean::cnstr_set(x_329, 1, x_324); -if (lean::is_scalar(x_322)) { - x_330 = lean::alloc_cnstr(1, 1, 0); -} else { - x_330 = x_322; -} -lean::cnstr_set(x_330, 0, x_329); -return x_330; -} -} -else -{ -obj* x_331; obj* x_332; obj* x_333; -lean::dec(x_311); -lean::dec(x_13); -if (lean::is_scalar(x_297)) { - x_331 = lean::alloc_cnstr(1, 1, 0); -} else { - x_331 = x_297; -} -lean::cnstr_set(x_331, 0, x_1); -x_332 = l_Lean_Elaborator_toLevel___main___closed__2; -x_333 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_331, x_332, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_331); -return x_333; -} -} -} -} -else -{ -obj* x_334; obj* x_335; obj* x_336; -lean::dec(x_296); -x_334 = l_Lean_Parser_Level_leading_HasView; -x_335 = lean::cnstr_get(x_334, 0); -lean::inc(x_335); -x_336 = lean::apply_1(x_335, x_12); -switch (lean::obj_tag(x_336)) { -case 0: -{ -lean::dec(x_336); -lean::dec(x_286); -lean::free_heap_obj(x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_337; obj* x_338; obj* x_339; -if (lean::is_scalar(x_297)) { - x_337 = lean::alloc_cnstr(1, 1, 0); -} else { - x_337 = x_297; -} -lean::cnstr_set(x_337, 0, x_1); -x_338 = l_Lean_Elaborator_toLevel___main___closed__2; -x_339 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_337, x_338, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_337); -return x_339; -} -else -{ -obj* x_340; obj* x_341; obj* x_342; -lean::dec(x_297); -lean::dec(x_1); -x_340 = lean::cnstr_get(x_13, 0); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_13, 1); -lean::inc(x_341); -lean::dec(x_13); -x_342 = l_Lean_Elaborator_toLevel___main(x_340, x_2, x_3, x_287); -if (lean::obj_tag(x_342) == 0) -{ -obj* x_343; obj* x_344; obj* x_345; -lean::dec(x_341); -x_343 = lean::cnstr_get(x_342, 0); -lean::inc(x_343); -if (lean::is_exclusive(x_342)) { - lean::cnstr_release(x_342, 0); - x_344 = x_342; -} else { - lean::dec_ref(x_342); - x_344 = lean::box(0); -} -if (lean::is_scalar(x_344)) { - x_345 = lean::alloc_cnstr(0, 1, 0); -} else { - x_345 = x_344; -} -lean::cnstr_set(x_345, 0, x_343); -return x_345; -} -else -{ -obj* x_346; obj* x_347; obj* x_348; obj* x_349; -x_346 = lean::cnstr_get(x_342, 0); -lean::inc(x_346); -lean::dec(x_342); -x_347 = lean::cnstr_get(x_346, 0); -lean::inc(x_347); -x_348 = lean::cnstr_get(x_346, 1); -lean::inc(x_348); -lean::dec(x_346); -x_349 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_341, x_2, x_3, x_348); -if (lean::obj_tag(x_349) == 0) -{ -obj* x_350; obj* x_351; obj* x_352; -lean::dec(x_347); -x_350 = lean::cnstr_get(x_349, 0); -lean::inc(x_350); -if (lean::is_exclusive(x_349)) { - lean::cnstr_release(x_349, 0); - x_351 = x_349; -} else { - lean::dec_ref(x_349); - x_351 = lean::box(0); -} -if (lean::is_scalar(x_351)) { - x_352 = lean::alloc_cnstr(0, 1, 0); -} else { - x_352 = x_351; -} -lean::cnstr_set(x_352, 0, x_350); -return x_352; -} -else -{ -obj* x_353; obj* x_354; obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; -x_353 = lean::cnstr_get(x_349, 0); -lean::inc(x_353); -if (lean::is_exclusive(x_349)) { - lean::cnstr_release(x_349, 0); - x_354 = x_349; -} else { - lean::dec_ref(x_349); - x_354 = lean::box(0); -} -x_355 = lean::cnstr_get(x_353, 0); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_353, 1); -lean::inc(x_356); -if (lean::is_exclusive(x_353)) { - lean::cnstr_release(x_353, 0); - lean::cnstr_release(x_353, 1); - x_357 = x_353; -} else { - lean::dec_ref(x_353); - x_357 = lean::box(0); -} -x_358 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(x_347, x_355); -lean::dec(x_347); -if (lean::is_scalar(x_357)) { - x_359 = lean::alloc_cnstr(0, 2, 0); -} else { - x_359 = x_357; -} -lean::cnstr_set(x_359, 0, x_358); -lean::cnstr_set(x_359, 1, x_356); -if (lean::is_scalar(x_354)) { - x_360 = lean::alloc_cnstr(1, 1, 0); -} else { - x_360 = x_354; -} -lean::cnstr_set(x_360, 0, x_359); -return x_360; -} -} -} -} -case 1: -{ -lean::dec(x_336); -lean::dec(x_286); -lean::free_heap_obj(x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_361; obj* x_362; obj* x_363; -if (lean::is_scalar(x_297)) { - x_361 = lean::alloc_cnstr(1, 1, 0); -} else { - x_361 = x_297; -} -lean::cnstr_set(x_361, 0, x_1); -x_362 = l_Lean_Elaborator_toLevel___main___closed__2; -x_363 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_361, x_362, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_361); -return x_363; -} -else -{ -obj* x_364; obj* x_365; obj* x_366; -lean::dec(x_297); -lean::dec(x_1); -x_364 = lean::cnstr_get(x_13, 0); -lean::inc(x_364); -x_365 = lean::cnstr_get(x_13, 1); -lean::inc(x_365); -lean::dec(x_13); -x_366 = l_Lean_Elaborator_toLevel___main(x_364, x_2, x_3, x_287); -if (lean::obj_tag(x_366) == 0) -{ -obj* x_367; obj* x_368; obj* x_369; -lean::dec(x_365); -x_367 = lean::cnstr_get(x_366, 0); -lean::inc(x_367); -if (lean::is_exclusive(x_366)) { - lean::cnstr_release(x_366, 0); - x_368 = x_366; -} else { - lean::dec_ref(x_366); - x_368 = lean::box(0); -} -if (lean::is_scalar(x_368)) { - x_369 = lean::alloc_cnstr(0, 1, 0); -} else { - x_369 = x_368; -} -lean::cnstr_set(x_369, 0, x_367); -return x_369; -} -else -{ -obj* x_370; obj* x_371; obj* x_372; obj* x_373; -x_370 = lean::cnstr_get(x_366, 0); -lean::inc(x_370); -lean::dec(x_366); -x_371 = lean::cnstr_get(x_370, 0); -lean::inc(x_371); -x_372 = lean::cnstr_get(x_370, 1); -lean::inc(x_372); -lean::dec(x_370); -x_373 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_365, x_2, x_3, x_372); -if (lean::obj_tag(x_373) == 0) -{ -obj* x_374; obj* x_375; obj* x_376; -lean::dec(x_371); -x_374 = lean::cnstr_get(x_373, 0); -lean::inc(x_374); -if (lean::is_exclusive(x_373)) { - lean::cnstr_release(x_373, 0); - x_375 = x_373; -} else { - lean::dec_ref(x_373); - x_375 = lean::box(0); -} -if (lean::is_scalar(x_375)) { - x_376 = lean::alloc_cnstr(0, 1, 0); -} else { - x_376 = x_375; -} -lean::cnstr_set(x_376, 0, x_374); -return x_376; -} -else -{ -obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; -x_377 = lean::cnstr_get(x_373, 0); -lean::inc(x_377); -if (lean::is_exclusive(x_373)) { - lean::cnstr_release(x_373, 0); - x_378 = x_373; -} else { - lean::dec_ref(x_373); - x_378 = lean::box(0); -} -x_379 = lean::cnstr_get(x_377, 0); -lean::inc(x_379); -x_380 = lean::cnstr_get(x_377, 1); -lean::inc(x_380); -if (lean::is_exclusive(x_377)) { - lean::cnstr_release(x_377, 0); - lean::cnstr_release(x_377, 1); - x_381 = x_377; -} else { - lean::dec_ref(x_377); - x_381 = lean::box(0); -} -x_382 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(x_371, x_379); -lean::dec(x_371); -if (lean::is_scalar(x_381)) { - x_383 = lean::alloc_cnstr(0, 2, 0); -} else { - x_383 = x_381; -} -lean::cnstr_set(x_383, 0, x_382); -lean::cnstr_set(x_383, 1, x_380); -if (lean::is_scalar(x_378)) { - x_384 = lean::alloc_cnstr(1, 1, 0); -} else { - x_384 = x_378; -} -lean::cnstr_set(x_384, 0, x_383); -return x_384; -} -} -} -} -case 2: -{ -lean::dec(x_336); -lean::dec(x_286); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_385; obj* x_386; -lean::dec(x_297); -lean::dec(x_1); -x_385 = l_Lean_Elaborator_toLevel___main___closed__3; -x_386 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_386, 0, x_385); -lean::cnstr_set(x_386, 1, x_287); -lean::cnstr_set(x_14, 0, x_386); -return x_14; -} -else -{ -obj* x_387; obj* x_388; obj* x_389; -lean::free_heap_obj(x_14); -lean::dec(x_13); -if (lean::is_scalar(x_297)) { - x_387 = lean::alloc_cnstr(1, 1, 0); -} else { - x_387 = x_297; -} -lean::cnstr_set(x_387, 0, x_1); -x_388 = l_Lean_Elaborator_toLevel___main___closed__2; -x_389 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_387, x_388, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_387); -return x_389; -} -} -case 3: -{ -obj* x_390; obj* x_391; obj* x_392; -lean::dec(x_336); -lean::dec(x_286); -lean::free_heap_obj(x_14); -lean::dec(x_13); -if (lean::is_scalar(x_297)) { - x_390 = lean::alloc_cnstr(1, 1, 0); -} else { - x_390 = x_297; -} -lean::cnstr_set(x_390, 0, x_1); -x_391 = l_Lean_Elaborator_toLevel___main___closed__2; -x_392 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_390, x_391, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_390); -return x_392; -} -case 4: -{ -lean::dec(x_286); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_393; obj* x_394; obj* x_395; obj* x_396; -lean::dec(x_297); -lean::dec(x_1); -x_393 = lean::cnstr_get(x_336, 0); -lean::inc(x_393); -lean::dec(x_336); -x_394 = l_Lean_Parser_number_View_toNat___main(x_393); -x_395 = l_Lean_Level_ofNat___main(x_394); -lean::dec(x_394); -x_396 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_396, 0, x_395); -lean::cnstr_set(x_396, 1, x_287); -lean::cnstr_set(x_14, 0, x_396); -return x_14; -} -else -{ -obj* x_397; obj* x_398; obj* x_399; -lean::dec(x_336); -lean::free_heap_obj(x_14); -lean::dec(x_13); -if (lean::is_scalar(x_297)) { - x_397 = lean::alloc_cnstr(1, 1, 0); -} else { - x_397 = x_297; -} -lean::cnstr_set(x_397, 0, x_1); -x_398 = l_Lean_Elaborator_toLevel___main___closed__2; -x_399 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_397, x_398, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_397); -return x_399; -} -} -default: -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_400; obj* x_401; obj* x_402; obj* x_403; obj* x_404; -x_400 = lean::cnstr_get(x_336, 0); -lean::inc(x_400); -lean::dec(x_336); -x_401 = l_Lean_Elaborator_mangleIdent(x_400); -x_402 = lean::cnstr_get(x_286, 3); -lean::inc(x_402); -lean::dec(x_286); -x_403 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_401); -x_404 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_403, x_402, x_401); -if (lean::obj_tag(x_404) == 0) -{ -obj* x_405; obj* x_406; obj* x_407; obj* x_408; obj* x_409; obj* x_410; obj* x_411; obj* x_412; -lean::free_heap_obj(x_14); -if (lean::is_scalar(x_297)) { - x_405 = lean::alloc_cnstr(1, 1, 0); -} else { - x_405 = x_297; -} -lean::cnstr_set(x_405, 0, x_1); -x_406 = l_Lean_Name_toString___closed__1; -x_407 = l_Lean_Name_toStringWithSep___main(x_406, x_401); -x_408 = l_Lean_Elaborator_toLevel___main___closed__4; -x_409 = lean::string_append(x_408, x_407); -lean::dec(x_407); -x_410 = l_Char_HasRepr___closed__1; -x_411 = lean::string_append(x_409, x_410); -x_412 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_405, x_411, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_405); -return x_412; -} -else -{ -obj* x_413; obj* x_414; -lean::dec(x_404); -lean::dec(x_297); -lean::dec(x_1); -x_413 = level_mk_param(x_401); -x_414 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_414, 0, x_413); -lean::cnstr_set(x_414, 1, x_287); -lean::cnstr_set(x_14, 0, x_414); -return x_14; -} -} -else -{ -obj* x_415; obj* x_416; obj* x_417; -lean::dec(x_336); -lean::dec(x_286); -lean::free_heap_obj(x_14); -lean::dec(x_13); -if (lean::is_scalar(x_297)) { - x_415 = lean::alloc_cnstr(1, 1, 0); -} else { - x_415 = x_297; -} -lean::cnstr_set(x_415, 0, x_1); -x_416 = l_Lean_Elaborator_toLevel___main___closed__2; -x_417 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_415, x_416, x_2, x_3, x_287); -lean::dec(x_287); -lean::dec(x_415); -return x_417; -} -} -} -} -} -} -} -else -{ -obj* x_418; obj* x_419; obj* x_420; obj* x_421; obj* x_422; -x_418 = lean::cnstr_get(x_14, 0); -lean::inc(x_418); -lean::dec(x_14); -x_419 = lean::cnstr_get(x_418, 0); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_418, 1); -lean::inc(x_420); -if (lean::is_exclusive(x_418)) { - lean::cnstr_release(x_418, 0); - lean::cnstr_release(x_418, 1); - x_421 = x_418; -} else { - lean::dec_ref(x_418); - x_421 = lean::box(0); -} -x_422 = l_Lean_Parser_Syntax_kind___main(x_12); -if (lean::obj_tag(x_422) == 0) -{ -obj* x_423; obj* x_424; obj* x_425; obj* x_426; obj* x_427; obj* x_428; obj* x_429; -lean::dec(x_421); -lean::dec(x_419); -lean::dec(x_13); -lean::dec(x_12); -lean::inc(x_1); -x_423 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_423, 0, x_1); -x_424 = l_Lean_Parser_Syntax_format___main(x_1); -x_425 = l_Lean_Options_empty; -x_426 = l_Lean_Format_pretty(x_424, x_425); -x_427 = l_Lean_Elaborator_toLevel___main___closed__1; -x_428 = lean::string_append(x_427, x_426); -lean::dec(x_426); -x_429 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_423, x_428, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_423); -return x_429; -} -else -{ -obj* x_430; obj* x_431; obj* x_432; uint8 x_433; -x_430 = lean::cnstr_get(x_422, 0); -lean::inc(x_430); -if (lean::is_exclusive(x_422)) { - lean::cnstr_release(x_422, 0); - x_431 = x_422; -} else { - lean::dec_ref(x_422); - x_431 = lean::box(0); -} -x_432 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -x_433 = lean_name_dec_eq(x_430, x_432); -if (x_433 == 0) -{ -obj* x_434; uint8 x_435; -lean::dec(x_421); -lean::dec(x_419); -x_434 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -x_435 = lean_name_dec_eq(x_430, x_434); -lean::dec(x_430); -if (x_435 == 0) -{ -obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; obj* x_442; -lean::dec(x_13); -lean::dec(x_12); -lean::inc(x_1); -if (lean::is_scalar(x_431)) { - x_436 = lean::alloc_cnstr(1, 1, 0); -} else { - x_436 = x_431; -} -lean::cnstr_set(x_436, 0, x_1); -x_437 = l_Lean_Parser_Syntax_format___main(x_1); -x_438 = l_Lean_Options_empty; -x_439 = l_Lean_Format_pretty(x_437, x_438); -x_440 = l_Lean_Elaborator_toLevel___main___closed__1; -x_441 = lean::string_append(x_440, x_439); -lean::dec(x_439); -x_442 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_436, x_441, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_436); -return x_442; -} -else -{ -obj* x_443; obj* x_444; obj* x_445; -x_443 = l_Lean_Parser_Level_trailing_HasView; -x_444 = lean::cnstr_get(x_443, 0); -lean::inc(x_444); -x_445 = lean::apply_1(x_444, x_12); -if (lean::obj_tag(x_445) == 0) -{ -obj* x_446; obj* x_447; obj* x_448; -lean::dec(x_445); -lean::dec(x_13); -if (lean::is_scalar(x_431)) { - x_446 = lean::alloc_cnstr(1, 1, 0); -} else { - x_446 = x_431; -} -lean::cnstr_set(x_446, 0, x_1); -x_447 = l_Lean_Elaborator_toLevel___main___closed__2; -x_448 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_446, x_447, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_446); -return x_448; -} -else -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_449; obj* x_450; obj* x_451; -lean::dec(x_431); -lean::dec(x_1); -x_449 = lean::cnstr_get(x_445, 0); -lean::inc(x_449); -lean::dec(x_445); -x_450 = lean::cnstr_get(x_449, 0); -lean::inc(x_450); -x_451 = l_Lean_Elaborator_toLevel___main(x_450, x_2, x_3, x_420); -if (lean::obj_tag(x_451) == 0) -{ -obj* x_452; obj* x_453; obj* x_454; -lean::dec(x_449); -x_452 = lean::cnstr_get(x_451, 0); -lean::inc(x_452); -if (lean::is_exclusive(x_451)) { - lean::cnstr_release(x_451, 0); - x_453 = x_451; -} else { - lean::dec_ref(x_451); - x_453 = lean::box(0); -} -if (lean::is_scalar(x_453)) { - x_454 = lean::alloc_cnstr(0, 1, 0); -} else { - x_454 = x_453; -} -lean::cnstr_set(x_454, 0, x_452); -return x_454; -} -else -{ -obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; -x_455 = lean::cnstr_get(x_451, 0); -lean::inc(x_455); -if (lean::is_exclusive(x_451)) { - lean::cnstr_release(x_451, 0); - x_456 = x_451; -} else { - lean::dec_ref(x_451); - x_456 = lean::box(0); -} -x_457 = lean::cnstr_get(x_455, 0); -lean::inc(x_457); -x_458 = lean::cnstr_get(x_455, 1); -lean::inc(x_458); -if (lean::is_exclusive(x_455)) { - lean::cnstr_release(x_455, 0); - lean::cnstr_release(x_455, 1); - x_459 = x_455; -} else { - lean::dec_ref(x_455); - x_459 = lean::box(0); -} -x_460 = lean::cnstr_get(x_449, 2); -lean::inc(x_460); -lean::dec(x_449); -x_461 = l_Lean_Parser_number_View_toNat___main(x_460); -x_462 = l_Lean_Elaborator_levelAdd___main(x_457, x_461); -lean::dec(x_461); -lean::dec(x_457); -if (lean::is_scalar(x_459)) { - x_463 = lean::alloc_cnstr(0, 2, 0); -} else { - x_463 = x_459; -} -lean::cnstr_set(x_463, 0, x_462); -lean::cnstr_set(x_463, 1, x_458); -if (lean::is_scalar(x_456)) { - x_464 = lean::alloc_cnstr(1, 1, 0); -} else { - x_464 = x_456; -} -lean::cnstr_set(x_464, 0, x_463); -return x_464; -} -} -else -{ -obj* x_465; obj* x_466; obj* x_467; -lean::dec(x_445); -lean::dec(x_13); -if (lean::is_scalar(x_431)) { - x_465 = lean::alloc_cnstr(1, 1, 0); -} else { - x_465 = x_431; -} -lean::cnstr_set(x_465, 0, x_1); -x_466 = l_Lean_Elaborator_toLevel___main___closed__2; -x_467 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_465, x_466, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_465); -return x_467; -} -} -} -} -else -{ -obj* x_468; obj* x_469; obj* x_470; -lean::dec(x_430); -x_468 = l_Lean_Parser_Level_leading_HasView; -x_469 = lean::cnstr_get(x_468, 0); -lean::inc(x_469); -x_470 = lean::apply_1(x_469, x_12); -switch (lean::obj_tag(x_470)) { -case 0: -{ -lean::dec(x_470); -lean::dec(x_421); -lean::dec(x_419); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_471; obj* x_472; obj* x_473; -if (lean::is_scalar(x_431)) { - x_471 = lean::alloc_cnstr(1, 1, 0); -} else { - x_471 = x_431; -} -lean::cnstr_set(x_471, 0, x_1); -x_472 = l_Lean_Elaborator_toLevel___main___closed__2; -x_473 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_471, x_472, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_471); -return x_473; -} -else -{ -obj* x_474; obj* x_475; obj* x_476; -lean::dec(x_431); -lean::dec(x_1); -x_474 = lean::cnstr_get(x_13, 0); -lean::inc(x_474); -x_475 = lean::cnstr_get(x_13, 1); -lean::inc(x_475); -lean::dec(x_13); -x_476 = l_Lean_Elaborator_toLevel___main(x_474, x_2, x_3, x_420); -if (lean::obj_tag(x_476) == 0) -{ -obj* x_477; obj* x_478; obj* x_479; -lean::dec(x_475); -x_477 = lean::cnstr_get(x_476, 0); -lean::inc(x_477); -if (lean::is_exclusive(x_476)) { - lean::cnstr_release(x_476, 0); - x_478 = x_476; -} else { - lean::dec_ref(x_476); - x_478 = lean::box(0); -} -if (lean::is_scalar(x_478)) { - x_479 = lean::alloc_cnstr(0, 1, 0); -} else { - x_479 = x_478; -} -lean::cnstr_set(x_479, 0, x_477); -return x_479; -} -else -{ -obj* x_480; obj* x_481; obj* x_482; obj* x_483; -x_480 = lean::cnstr_get(x_476, 0); -lean::inc(x_480); -lean::dec(x_476); -x_481 = lean::cnstr_get(x_480, 0); -lean::inc(x_481); -x_482 = lean::cnstr_get(x_480, 1); -lean::inc(x_482); -lean::dec(x_480); -x_483 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_475, x_2, x_3, x_482); -if (lean::obj_tag(x_483) == 0) -{ -obj* x_484; obj* x_485; obj* x_486; -lean::dec(x_481); -x_484 = lean::cnstr_get(x_483, 0); -lean::inc(x_484); -if (lean::is_exclusive(x_483)) { - lean::cnstr_release(x_483, 0); - x_485 = x_483; -} else { - lean::dec_ref(x_483); - x_485 = lean::box(0); -} -if (lean::is_scalar(x_485)) { - x_486 = lean::alloc_cnstr(0, 1, 0); -} else { - x_486 = x_485; -} -lean::cnstr_set(x_486, 0, x_484); -return x_486; -} -else -{ -obj* x_487; obj* x_488; obj* x_489; obj* x_490; obj* x_491; obj* x_492; obj* x_493; obj* x_494; -x_487 = lean::cnstr_get(x_483, 0); -lean::inc(x_487); -if (lean::is_exclusive(x_483)) { - lean::cnstr_release(x_483, 0); - x_488 = x_483; -} else { - lean::dec_ref(x_483); - x_488 = lean::box(0); -} -x_489 = lean::cnstr_get(x_487, 0); -lean::inc(x_489); -x_490 = lean::cnstr_get(x_487, 1); -lean::inc(x_490); -if (lean::is_exclusive(x_487)) { - lean::cnstr_release(x_487, 0); - lean::cnstr_release(x_487, 1); - x_491 = x_487; -} else { - lean::dec_ref(x_487); - x_491 = lean::box(0); -} -x_492 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(x_481, x_489); -lean::dec(x_481); -if (lean::is_scalar(x_491)) { - x_493 = lean::alloc_cnstr(0, 2, 0); -} else { - x_493 = x_491; -} -lean::cnstr_set(x_493, 0, x_492); -lean::cnstr_set(x_493, 1, x_490); -if (lean::is_scalar(x_488)) { - x_494 = lean::alloc_cnstr(1, 1, 0); -} else { - x_494 = x_488; -} -lean::cnstr_set(x_494, 0, x_493); -return x_494; -} -} -} -} -case 1: -{ -lean::dec(x_470); -lean::dec(x_421); -lean::dec(x_419); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_495; obj* x_496; obj* x_497; -if (lean::is_scalar(x_431)) { - x_495 = lean::alloc_cnstr(1, 1, 0); -} else { - x_495 = x_431; -} -lean::cnstr_set(x_495, 0, x_1); -x_496 = l_Lean_Elaborator_toLevel___main___closed__2; -x_497 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_495, x_496, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_495); -return x_497; -} -else -{ -obj* x_498; obj* x_499; obj* x_500; -lean::dec(x_431); -lean::dec(x_1); -x_498 = lean::cnstr_get(x_13, 0); -lean::inc(x_498); -x_499 = lean::cnstr_get(x_13, 1); -lean::inc(x_499); -lean::dec(x_13); -x_500 = l_Lean_Elaborator_toLevel___main(x_498, x_2, x_3, x_420); -if (lean::obj_tag(x_500) == 0) -{ -obj* x_501; obj* x_502; obj* x_503; -lean::dec(x_499); -x_501 = lean::cnstr_get(x_500, 0); -lean::inc(x_501); -if (lean::is_exclusive(x_500)) { - lean::cnstr_release(x_500, 0); - x_502 = x_500; -} else { - lean::dec_ref(x_500); - x_502 = lean::box(0); -} -if (lean::is_scalar(x_502)) { - x_503 = lean::alloc_cnstr(0, 1, 0); -} else { - x_503 = x_502; -} -lean::cnstr_set(x_503, 0, x_501); -return x_503; -} -else -{ -obj* x_504; obj* x_505; obj* x_506; obj* x_507; -x_504 = lean::cnstr_get(x_500, 0); -lean::inc(x_504); -lean::dec(x_500); -x_505 = lean::cnstr_get(x_504, 0); -lean::inc(x_505); -x_506 = lean::cnstr_get(x_504, 1); -lean::inc(x_506); -lean::dec(x_504); -x_507 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_499, x_2, x_3, x_506); -if (lean::obj_tag(x_507) == 0) -{ -obj* x_508; obj* x_509; obj* x_510; -lean::dec(x_505); -x_508 = lean::cnstr_get(x_507, 0); -lean::inc(x_508); -if (lean::is_exclusive(x_507)) { - lean::cnstr_release(x_507, 0); - x_509 = x_507; -} else { - lean::dec_ref(x_507); - x_509 = lean::box(0); -} -if (lean::is_scalar(x_509)) { - x_510 = lean::alloc_cnstr(0, 1, 0); -} else { - x_510 = x_509; -} -lean::cnstr_set(x_510, 0, x_508); -return x_510; -} -else -{ -obj* x_511; obj* x_512; obj* x_513; obj* x_514; obj* x_515; obj* x_516; obj* x_517; obj* x_518; -x_511 = lean::cnstr_get(x_507, 0); -lean::inc(x_511); -if (lean::is_exclusive(x_507)) { - lean::cnstr_release(x_507, 0); - x_512 = x_507; -} else { - lean::dec_ref(x_507); - x_512 = lean::box(0); -} -x_513 = lean::cnstr_get(x_511, 0); -lean::inc(x_513); -x_514 = lean::cnstr_get(x_511, 1); -lean::inc(x_514); -if (lean::is_exclusive(x_511)) { - lean::cnstr_release(x_511, 0); - lean::cnstr_release(x_511, 1); - x_515 = x_511; -} else { - lean::dec_ref(x_511); - x_515 = lean::box(0); -} -x_516 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(x_505, x_513); -lean::dec(x_505); -if (lean::is_scalar(x_515)) { - x_517 = lean::alloc_cnstr(0, 2, 0); -} else { - x_517 = x_515; -} -lean::cnstr_set(x_517, 0, x_516); -lean::cnstr_set(x_517, 1, x_514); -if (lean::is_scalar(x_512)) { - x_518 = lean::alloc_cnstr(1, 1, 0); -} else { - x_518 = x_512; -} -lean::cnstr_set(x_518, 0, x_517); -return x_518; -} -} -} -} -case 2: -{ -lean::dec(x_470); -lean::dec(x_419); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_519; obj* x_520; obj* x_521; -lean::dec(x_431); -lean::dec(x_1); -x_519 = l_Lean_Elaborator_toLevel___main___closed__3; -if (lean::is_scalar(x_421)) { - x_520 = lean::alloc_cnstr(0, 2, 0); -} else { - x_520 = x_421; -} -lean::cnstr_set(x_520, 0, x_519); -lean::cnstr_set(x_520, 1, x_420); -x_521 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_521, 0, x_520); -return x_521; -} -else -{ -obj* x_522; obj* x_523; obj* x_524; -lean::dec(x_421); -lean::dec(x_13); -if (lean::is_scalar(x_431)) { - x_522 = lean::alloc_cnstr(1, 1, 0); -} else { - x_522 = x_431; -} -lean::cnstr_set(x_522, 0, x_1); -x_523 = l_Lean_Elaborator_toLevel___main___closed__2; -x_524 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_522, x_523, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_522); -return x_524; -} -} -case 3: -{ -obj* x_525; obj* x_526; obj* x_527; -lean::dec(x_470); -lean::dec(x_421); -lean::dec(x_419); -lean::dec(x_13); -if (lean::is_scalar(x_431)) { - x_525 = lean::alloc_cnstr(1, 1, 0); -} else { - x_525 = x_431; -} -lean::cnstr_set(x_525, 0, x_1); -x_526 = l_Lean_Elaborator_toLevel___main___closed__2; -x_527 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_525, x_526, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_525); -return x_527; -} -case 4: -{ -lean::dec(x_419); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_528; obj* x_529; obj* x_530; obj* x_531; obj* x_532; -lean::dec(x_431); -lean::dec(x_1); -x_528 = lean::cnstr_get(x_470, 0); -lean::inc(x_528); -lean::dec(x_470); -x_529 = l_Lean_Parser_number_View_toNat___main(x_528); -x_530 = l_Lean_Level_ofNat___main(x_529); -lean::dec(x_529); -if (lean::is_scalar(x_421)) { - x_531 = lean::alloc_cnstr(0, 2, 0); -} else { - x_531 = x_421; -} -lean::cnstr_set(x_531, 0, x_530); -lean::cnstr_set(x_531, 1, x_420); -x_532 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_532, 0, x_531); -return x_532; -} -else -{ -obj* x_533; obj* x_534; obj* x_535; -lean::dec(x_470); -lean::dec(x_421); -lean::dec(x_13); -if (lean::is_scalar(x_431)) { - x_533 = lean::alloc_cnstr(1, 1, 0); -} else { - x_533 = x_431; -} -lean::cnstr_set(x_533, 0, x_1); -x_534 = l_Lean_Elaborator_toLevel___main___closed__2; -x_535 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_533, x_534, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_533); -return x_535; -} -} -default: -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_536; obj* x_537; obj* x_538; obj* x_539; obj* x_540; -x_536 = lean::cnstr_get(x_470, 0); -lean::inc(x_536); -lean::dec(x_470); -x_537 = l_Lean_Elaborator_mangleIdent(x_536); -x_538 = lean::cnstr_get(x_419, 3); -lean::inc(x_538); -lean::dec(x_419); -x_539 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_537); -x_540 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_539, x_538, x_537); -if (lean::obj_tag(x_540) == 0) -{ -obj* x_541; obj* x_542; obj* x_543; obj* x_544; obj* x_545; obj* x_546; obj* x_547; obj* x_548; -lean::dec(x_421); -if (lean::is_scalar(x_431)) { - x_541 = lean::alloc_cnstr(1, 1, 0); -} else { - x_541 = x_431; -} -lean::cnstr_set(x_541, 0, x_1); -x_542 = l_Lean_Name_toString___closed__1; -x_543 = l_Lean_Name_toStringWithSep___main(x_542, x_537); -x_544 = l_Lean_Elaborator_toLevel___main___closed__4; -x_545 = lean::string_append(x_544, x_543); -lean::dec(x_543); -x_546 = l_Char_HasRepr___closed__1; -x_547 = lean::string_append(x_545, x_546); -x_548 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_541, x_547, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_541); -return x_548; -} -else -{ -obj* x_549; obj* x_550; obj* x_551; -lean::dec(x_540); -lean::dec(x_431); -lean::dec(x_1); -x_549 = level_mk_param(x_537); -if (lean::is_scalar(x_421)) { - x_550 = lean::alloc_cnstr(0, 2, 0); -} else { - x_550 = x_421; -} -lean::cnstr_set(x_550, 0, x_549); -lean::cnstr_set(x_550, 1, x_420); -x_551 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_551, 0, x_550); -return x_551; -} -} -else -{ -obj* x_552; obj* x_553; obj* x_554; -lean::dec(x_470); -lean::dec(x_421); -lean::dec(x_419); -lean::dec(x_13); -if (lean::is_scalar(x_431)) { - x_552 = lean::alloc_cnstr(1, 1, 0); -} else { - x_552 = x_431; -} -lean::cnstr_set(x_552, 0, x_1); -x_553 = l_Lean_Elaborator_toLevel___main___closed__2; -x_554 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_552, x_553, x_2, x_3, x_420); -lean::dec(x_420); -lean::dec(x_552); -return x_554; -} -} -} -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_toLevel___main___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__2(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_foldr___main___at_Lean_Elaborator_toLevel___main___spec__3(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Elaborator_toLevel___main___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_toLevel___main(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_toLevel(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_toLevel___main(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l_Lean_Elaborator_toLevel___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_toLevel(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_Expr_mkAnnotation___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("annotation"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_Expr_mkAnnotation(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::box(0); -x_4 = l_Lean_Elaborator_Expr_mkAnnotation___closed__1; -x_5 = l_Lean_KVMap_setName(x_3, x_4, x_1); -x_6 = lean_expr_mk_mdata(x_5, x_2); -return x_6; -} -} -obj* _init_l_Lean_Elaborator_dummy() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("Prop"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean_expr_mk_const(x_3, x_4); -return x_5; -} -} -obj* _init_l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("@"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_1); -x_7 = l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1(x_1, x_6); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_5, 0); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -lean::dec(x_8); -x_12 = 4; -lean::inc(x_9); -x_13 = lean_expr_local(x_9, x_9, x_1, x_12); -x_14 = l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1; -x_15 = l_Lean_Elaborator_Expr_mkAnnotation(x_14, x_13); -x_16 = l_List_foldl___main___at_Lean_Expr_mkApp___spec__1(x_15, x_10); -x_17 = lean_expr_mk_app(x_16, x_11); -lean::cnstr_set(x_2, 1, x_7); -lean::cnstr_set(x_2, 0, x_17); -return x_2; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_18 = lean::cnstr_get(x_2, 0); -x_19 = lean::cnstr_get(x_2, 1); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_2); -lean::inc(x_1); -x_20 = l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1(x_1, x_19); -x_21 = lean::cnstr_get(x_18, 1); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_18, 0); -lean::inc(x_22); -lean::dec(x_18); -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = 4; -lean::inc(x_22); -x_26 = lean_expr_local(x_22, x_22, x_1, x_25); -x_27 = l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1; -x_28 = l_Lean_Elaborator_Expr_mkAnnotation(x_27, x_26); -x_29 = l_List_foldl___main___at_Lean_Expr_mkApp___spec__1(x_28, x_23); -x_30 = lean_expr_mk_app(x_29, x_24); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_20); -return x_31; -} -} -} -} -obj* _init_l_Lean_Elaborator_mkEqns___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("_"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_mkEqns___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("preEquations"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_mkEqns(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1(x_1, x_2); -x_4 = l_Lean_Elaborator_mkEqns___closed__1; -x_5 = l_Lean_Expr_mkCapp(x_4, x_3); -x_6 = l_Lean_Elaborator_mkEqns___closed__2; -x_7 = l_Lean_Elaborator_Expr_mkAnnotation(x_6, x_5); -return x_7; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -x_12 = l_Lean_Elaborator_toPexpr___main(x_11, x_2, x_3, x_4); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_12, 0); -lean::inc(x_16); -lean::dec(x_12); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_16, 1); -lean::inc(x_18); -lean::dec(x_16); -x_19 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1(x_10, x_2, x_3, x_18); -if (lean::obj_tag(x_19) == 0) -{ -uint8 x_20; -lean::dec(x_17); -lean::free_heap_obj(x_1); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -return x_19; -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_19, 0); -lean::inc(x_21); -lean::dec(x_19); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -} -else -{ -uint8 x_23; -x_23 = !lean::is_exclusive(x_19); -if (x_23 == 0) -{ -obj* x_24; uint8 x_25; -x_24 = lean::cnstr_get(x_19, 0); -x_25 = !lean::is_exclusive(x_24); -if (x_25 == 0) -{ -obj* x_26; -x_26 = lean::cnstr_get(x_24, 0); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_17); -lean::cnstr_set(x_24, 0, x_1); -return x_19; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_24, 0); -x_28 = lean::cnstr_get(x_24, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_24); -lean::cnstr_set(x_1, 1, x_27); -lean::cnstr_set(x_1, 0, x_17); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_1); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_19, 0, x_29); -return x_19; -} -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_30 = lean::cnstr_get(x_19, 0); -lean::inc(x_30); -lean::dec(x_19); -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_30, 1); -lean::inc(x_32); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - lean::cnstr_release(x_30, 1); - x_33 = x_30; -} else { - lean::dec_ref(x_30); - x_33 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_31); -lean::cnstr_set(x_1, 0, x_17); -if (lean::is_scalar(x_33)) { - x_34 = lean::alloc_cnstr(0, 2, 0); -} else { - x_34 = x_33; -} -lean::cnstr_set(x_34, 0, x_1); -lean::cnstr_set(x_34, 1, x_32); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -} -} -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_1, 0); -x_37 = lean::cnstr_get(x_1, 1); -lean::inc(x_37); -lean::inc(x_36); -lean::dec(x_1); -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -lean::dec(x_36); -x_39 = l_Lean_Elaborator_toPexpr___main(x_38, x_2, x_3, x_4); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_37); -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -if (lean::is_exclusive(x_39)) { - lean::cnstr_release(x_39, 0); - x_41 = x_39; -} else { - lean::dec_ref(x_39); - x_41 = lean::box(0); -} -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(0, 1, 0); -} else { - x_42 = x_41; -} -lean::cnstr_set(x_42, 0, x_40); -return x_42; -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_43 = lean::cnstr_get(x_39, 0); -lean::inc(x_43); -lean::dec(x_39); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_43, 1); -lean::inc(x_45); -lean::dec(x_43); -x_46 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1(x_37, x_2, x_3, x_45); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; -lean::dec(x_44); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_48 = x_46; -} else { - lean::dec_ref(x_46); - x_48 = lean::box(0); -} -if (lean::is_scalar(x_48)) { - x_49 = lean::alloc_cnstr(0, 1, 0); -} else { - x_49 = x_48; -} -lean::cnstr_set(x_49, 0, x_47); -return x_49; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_50 = lean::cnstr_get(x_46, 0); -lean::inc(x_50); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_51 = x_46; -} else { - lean::dec_ref(x_46); - x_51 = lean::box(0); -} -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_50, 1); -lean::inc(x_53); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - x_54 = x_50; -} else { - lean::dec_ref(x_50); - x_54 = lean::box(0); -} -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_44); -lean::cnstr_set(x_55, 1, x_52); -if (lean::is_scalar(x_54)) { - x_56 = lean::alloc_cnstr(0, 2, 0); -} else { - x_56 = x_54; -} -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_53); -if (lean::is_scalar(x_51)) { - x_57 = lean::alloc_cnstr(1, 1, 0); -} else { - x_57 = x_51; -} -lean::cnstr_set(x_57, 0, x_56); -return x_57; -} -} -} -} -} -} -obj* l_List_map___main___at_Lean_Elaborator_toPexpr___main___spec__2(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_4, 0); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_List_map___main___at_Lean_Elaborator_toPexpr___main___spec__2(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -x_11 = l_List_map___main___at_Lean_Elaborator_toPexpr___main___spec__2(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_11); -return x_12; -} -} -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("_matchFn"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -x_12 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1(x_11, x_2, x_3, x_4); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -lean::free_heap_obj(x_1); -lean::dec(x_10); -lean::dec(x_9); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -} -else -{ -obj* x_16; uint8 x_17; -x_16 = lean::cnstr_get(x_12, 0); -lean::inc(x_16); -lean::dec(x_12); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_18 = lean::cnstr_get(x_16, 0); -x_19 = lean::cnstr_get(x_16, 1); -x_20 = lean::cnstr_get(x_9, 2); -lean::inc(x_20); -lean::dec(x_9); -x_21 = l_Lean_Elaborator_toPexpr___main(x_20, x_2, x_3, x_19); -if (lean::obj_tag(x_21) == 0) -{ -uint8 x_22; -lean::free_heap_obj(x_16); -lean::dec(x_18); -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_22 = !lean::is_exclusive(x_21); -if (x_22 == 0) -{ -return x_21; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -return x_24; -} -} -else -{ -obj* x_25; uint8 x_26; -x_25 = lean::cnstr_get(x_21, 0); -lean::inc(x_25); -lean::dec(x_21); -x_26 = !lean::is_exclusive(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_25, 0); -x_28 = lean::cnstr_get(x_25, 1); -lean::cnstr_set(x_25, 1, x_27); -lean::cnstr_set(x_25, 0, x_18); -x_29 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1; -lean::cnstr_set(x_16, 1, x_25); -lean::cnstr_set(x_16, 0, x_29); -x_30 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3(x_10, x_2, x_3, x_28); -if (lean::obj_tag(x_30) == 0) -{ -uint8 x_31; -lean::dec(x_16); -lean::free_heap_obj(x_1); -x_31 = !lean::is_exclusive(x_30); -if (x_31 == 0) -{ -return x_30; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_30); -if (x_34 == 0) -{ -obj* x_35; uint8 x_36; -x_35 = lean::cnstr_get(x_30, 0); -x_36 = !lean::is_exclusive(x_35); -if (x_36 == 0) -{ -obj* x_37; -x_37 = lean::cnstr_get(x_35, 0); -lean::cnstr_set(x_1, 1, x_37); -lean::cnstr_set(x_1, 0, x_16); -lean::cnstr_set(x_35, 0, x_1); -return x_30; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_35, 0); -x_39 = lean::cnstr_get(x_35, 1); -lean::inc(x_39); -lean::inc(x_38); -lean::dec(x_35); -lean::cnstr_set(x_1, 1, x_38); -lean::cnstr_set(x_1, 0, x_16); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_1); -lean::cnstr_set(x_40, 1, x_39); -lean::cnstr_set(x_30, 0, x_40); -return x_30; -} -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_41 = lean::cnstr_get(x_30, 0); -lean::inc(x_41); -lean::dec(x_30); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -if (lean::is_exclusive(x_41)) { - lean::cnstr_release(x_41, 0); - lean::cnstr_release(x_41, 1); - x_44 = x_41; -} else { - lean::dec_ref(x_41); - x_44 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_42); -lean::cnstr_set(x_1, 0, x_16); -if (lean::is_scalar(x_44)) { - x_45 = lean::alloc_cnstr(0, 2, 0); -} else { - x_45 = x_44; -} -lean::cnstr_set(x_45, 0, x_1); -lean::cnstr_set(x_45, 1, x_43); -x_46 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -return x_46; -} -} -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = lean::cnstr_get(x_25, 0); -x_48 = lean::cnstr_get(x_25, 1); -lean::inc(x_48); -lean::inc(x_47); -lean::dec(x_25); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_18); -lean::cnstr_set(x_49, 1, x_47); -x_50 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1; -lean::cnstr_set(x_16, 1, x_49); -lean::cnstr_set(x_16, 0, x_50); -x_51 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3(x_10, x_2, x_3, x_48); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_16); -lean::free_heap_obj(x_1); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - x_53 = x_51; -} else { - lean::dec_ref(x_51); - x_53 = lean::box(0); -} -if (lean::is_scalar(x_53)) { - x_54 = lean::alloc_cnstr(0, 1, 0); -} else { - x_54 = x_53; -} -lean::cnstr_set(x_54, 0, x_52); -return x_54; -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_55 = lean::cnstr_get(x_51, 0); -lean::inc(x_55); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - x_56 = x_51; -} else { - lean::dec_ref(x_51); - x_56 = lean::box(0); -} -x_57 = lean::cnstr_get(x_55, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_55, 1); -lean::inc(x_58); -if (lean::is_exclusive(x_55)) { - lean::cnstr_release(x_55, 0); - lean::cnstr_release(x_55, 1); - x_59 = x_55; -} else { - lean::dec_ref(x_55); - x_59 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_57); -lean::cnstr_set(x_1, 0, x_16); -if (lean::is_scalar(x_59)) { - x_60 = lean::alloc_cnstr(0, 2, 0); -} else { - x_60 = x_59; -} -lean::cnstr_set(x_60, 0, x_1); -lean::cnstr_set(x_60, 1, x_58); -if (lean::is_scalar(x_56)) { - x_61 = lean::alloc_cnstr(1, 1, 0); -} else { - x_61 = x_56; -} -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -} -} -else -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_62 = lean::cnstr_get(x_16, 0); -x_63 = lean::cnstr_get(x_16, 1); -lean::inc(x_63); -lean::inc(x_62); -lean::dec(x_16); -x_64 = lean::cnstr_get(x_9, 2); -lean::inc(x_64); -lean::dec(x_9); -x_65 = l_Lean_Elaborator_toPexpr___main(x_64, x_2, x_3, x_63); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; obj* x_67; obj* x_68; -lean::dec(x_62); -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_66 = lean::cnstr_get(x_65, 0); -lean::inc(x_66); -if (lean::is_exclusive(x_65)) { - lean::cnstr_release(x_65, 0); - x_67 = x_65; -} else { - lean::dec_ref(x_65); - x_67 = lean::box(0); -} -if (lean::is_scalar(x_67)) { - x_68 = lean::alloc_cnstr(0, 1, 0); -} else { - x_68 = x_67; -} -lean::cnstr_set(x_68, 0, x_66); -return x_68; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_69 = lean::cnstr_get(x_65, 0); -lean::inc(x_69); -lean::dec(x_65); -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -if (lean::is_exclusive(x_69)) { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_72 = x_69; -} else { - lean::dec_ref(x_69); - x_72 = lean::box(0); -} -if (lean::is_scalar(x_72)) { - x_73 = lean::alloc_cnstr(0, 2, 0); -} else { - x_73 = x_72; -} -lean::cnstr_set(x_73, 0, x_62); -lean::cnstr_set(x_73, 1, x_70); -x_74 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1; -x_75 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_73); -x_76 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3(x_10, x_2, x_3, x_71); -if (lean::obj_tag(x_76) == 0) -{ -obj* x_77; obj* x_78; obj* x_79; -lean::dec(x_75); -lean::free_heap_obj(x_1); -x_77 = lean::cnstr_get(x_76, 0); -lean::inc(x_77); -if (lean::is_exclusive(x_76)) { - lean::cnstr_release(x_76, 0); - x_78 = x_76; -} else { - lean::dec_ref(x_76); - x_78 = lean::box(0); -} -if (lean::is_scalar(x_78)) { - x_79 = lean::alloc_cnstr(0, 1, 0); -} else { - x_79 = x_78; -} -lean::cnstr_set(x_79, 0, x_77); -return x_79; -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_80 = lean::cnstr_get(x_76, 0); -lean::inc(x_80); -if (lean::is_exclusive(x_76)) { - lean::cnstr_release(x_76, 0); - x_81 = x_76; -} else { - lean::dec_ref(x_76); - x_81 = lean::box(0); -} -x_82 = lean::cnstr_get(x_80, 0); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_80, 1); -lean::inc(x_83); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - lean::cnstr_release(x_80, 1); - x_84 = x_80; -} else { - lean::dec_ref(x_80); - x_84 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_82); -lean::cnstr_set(x_1, 0, x_75); -if (lean::is_scalar(x_84)) { - x_85 = lean::alloc_cnstr(0, 2, 0); -} else { - x_85 = x_84; -} -lean::cnstr_set(x_85, 0, x_1); -lean::cnstr_set(x_85, 1, x_83); -if (lean::is_scalar(x_81)) { - x_86 = lean::alloc_cnstr(1, 1, 0); -} else { - x_86 = x_81; -} -lean::cnstr_set(x_86, 0, x_85); -return x_86; -} -} -} -} -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_87 = lean::cnstr_get(x_1, 0); -x_88 = lean::cnstr_get(x_1, 1); -lean::inc(x_88); -lean::inc(x_87); -lean::dec(x_1); -x_89 = lean::cnstr_get(x_87, 0); -lean::inc(x_89); -x_90 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1(x_89, x_2, x_3, x_4); -if (lean::obj_tag(x_90) == 0) -{ -obj* x_91; obj* x_92; obj* x_93; -lean::dec(x_88); -lean::dec(x_87); -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -if (lean::is_exclusive(x_90)) { - lean::cnstr_release(x_90, 0); - x_92 = x_90; -} else { - lean::dec_ref(x_90); - x_92 = lean::box(0); -} -if (lean::is_scalar(x_92)) { - x_93 = lean::alloc_cnstr(0, 1, 0); -} else { - x_93 = x_92; -} -lean::cnstr_set(x_93, 0, x_91); -return x_93; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -x_94 = lean::cnstr_get(x_90, 0); -lean::inc(x_94); -lean::dec(x_90); -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_94, 1); -lean::inc(x_96); -if (lean::is_exclusive(x_94)) { - lean::cnstr_release(x_94, 0); - lean::cnstr_release(x_94, 1); - x_97 = x_94; -} else { - lean::dec_ref(x_94); - x_97 = lean::box(0); -} -x_98 = lean::cnstr_get(x_87, 2); -lean::inc(x_98); -lean::dec(x_87); -x_99 = l_Lean_Elaborator_toPexpr___main(x_98, x_2, x_3, x_96); -if (lean::obj_tag(x_99) == 0) -{ -obj* x_100; obj* x_101; obj* x_102; -lean::dec(x_97); -lean::dec(x_95); -lean::dec(x_88); -x_100 = lean::cnstr_get(x_99, 0); -lean::inc(x_100); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - x_101 = x_99; -} else { - lean::dec_ref(x_99); - x_101 = lean::box(0); -} -if (lean::is_scalar(x_101)) { - x_102 = lean::alloc_cnstr(0, 1, 0); -} else { - x_102 = x_101; -} -lean::cnstr_set(x_102, 0, x_100); -return x_102; -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -x_103 = lean::cnstr_get(x_99, 0); -lean::inc(x_103); -lean::dec(x_99); -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_103, 1); -lean::inc(x_105); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - lean::cnstr_release(x_103, 1); - x_106 = x_103; -} else { - lean::dec_ref(x_103); - x_106 = lean::box(0); -} -if (lean::is_scalar(x_106)) { - x_107 = lean::alloc_cnstr(0, 2, 0); -} else { - x_107 = x_106; -} -lean::cnstr_set(x_107, 0, x_95); -lean::cnstr_set(x_107, 1, x_104); -x_108 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1; -if (lean::is_scalar(x_97)) { - x_109 = lean::alloc_cnstr(0, 2, 0); -} else { - x_109 = x_97; -} -lean::cnstr_set(x_109, 0, x_108); -lean::cnstr_set(x_109, 1, x_107); -x_110 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3(x_88, x_2, x_3, x_105); -if (lean::obj_tag(x_110) == 0) -{ -obj* x_111; obj* x_112; obj* x_113; -lean::dec(x_109); -x_111 = lean::cnstr_get(x_110, 0); -lean::inc(x_111); -if (lean::is_exclusive(x_110)) { - lean::cnstr_release(x_110, 0); - x_112 = x_110; -} else { - lean::dec_ref(x_110); - x_112 = lean::box(0); -} -if (lean::is_scalar(x_112)) { - x_113 = lean::alloc_cnstr(0, 1, 0); -} else { - x_113 = x_112; -} -lean::cnstr_set(x_113, 0, x_111); -return x_113; -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_114 = lean::cnstr_get(x_110, 0); -lean::inc(x_114); -if (lean::is_exclusive(x_110)) { - lean::cnstr_release(x_110, 0); - x_115 = x_110; -} else { - lean::dec_ref(x_110); - x_115 = lean::box(0); -} -x_116 = lean::cnstr_get(x_114, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_114, 1); -lean::inc(x_117); -if (lean::is_exclusive(x_114)) { - lean::cnstr_release(x_114, 0); - lean::cnstr_release(x_114, 1); - x_118 = x_114; -} else { - lean::dec_ref(x_114); - x_118 = lean::box(0); -} -x_119 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_119, 0, x_109); -lean::cnstr_set(x_119, 1, x_116); -if (lean::is_scalar(x_118)) { - x_120 = lean::alloc_cnstr(0, 2, 0); -} else { - x_120 = x_118; -} -lean::cnstr_set(x_120, 0, x_119); -lean::cnstr_set(x_120, 1, x_117); -if (lean::is_scalar(x_115)) { - x_121 = lean::alloc_cnstr(1, 1, 0); -} else { - x_121 = x_115; -} -lean::cnstr_set(x_121, 0, x_120); -return x_121; -} -} -} -} -} -} -} -obj* l_List_spanAux___main___at_Lean_Elaborator_toPexpr___main___spec__4(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; obj* x_4; -x_3 = l_List_reverse___rarg(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -return x_4; -} -else -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -lean::dec(x_6); -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_1, 1); -x_9 = lean::cnstr_get(x_1, 0); -lean::dec(x_9); -lean::cnstr_set(x_1, 1, x_2); -{ -obj* _tmp_0 = x_8; -obj* _tmp_1 = x_1; -x_1 = _tmp_0; -x_2 = _tmp_1; -} -goto _start; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_1, 1); -lean::inc(x_11); -lean::dec(x_1); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_2); -x_1 = x_11; -x_2 = x_12; -goto _start; -} -} -else -{ -obj* x_14; obj* x_15; -lean::dec(x_6); -lean::dec(x_5); -x_14 = l_List_reverse___rarg(x_2); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -return x_15; -} -} -} -} -obj* l_List_spanAux___main___at_Lean_Elaborator_toPexpr___main___spec__5(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; obj* x_4; -x_3 = l_List_reverse___rarg(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -return x_4; -} -else -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -lean::dec(x_6); -lean::dec(x_5); -x_7 = l_List_reverse___rarg(x_2); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -lean::dec(x_5); -x_11 = l_List_reverse___rarg(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_1); -return x_12; -} -else -{ -uint8 x_13; -lean::dec(x_10); -x_13 = !lean::is_exclusive(x_1); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_1, 1); -x_15 = lean::cnstr_get(x_1, 0); -lean::dec(x_15); -lean::cnstr_set(x_1, 1, x_2); -{ -obj* _tmp_0 = x_14; -obj* _tmp_1 = x_1; -x_1 = _tmp_0; -x_2 = _tmp_1; -} -goto _start; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_1, 1); -lean::inc(x_17); -lean::dec(x_1); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_5); -lean::cnstr_set(x_18, 1, x_2); -x_1 = x_17; -x_2 = x_18; -goto _start; -} -} -} -} -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("field"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("toPexpr: unreachable"); -return x_1; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::cnstr_get(x_14, 2); -lean::inc(x_15); -x_16 = l_Lean_Elaborator_toPexpr___main(x_15, x_3, x_4, x_5); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -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_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = lean::cnstr_get(x_14, 0); -lean::inc(x_23); -lean::dec(x_14); -x_24 = l_Lean_Elaborator_mangleIdent(x_23); -x_25 = lean::box(0); -x_26 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -x_27 = l_Lean_KVMap_setName(x_25, x_26, x_24); -x_28 = lean_expr_mk_mdata(x_27, x_21); -x_29 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6(x_1, x_12, x_3, x_4, x_22); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -lean::dec(x_28); -lean::free_heap_obj(x_2); -x_30 = !lean::is_exclusive(x_29); -if (x_30 == 0) -{ -return x_29; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -return x_32; -} -} -else -{ -uint8 x_33; -x_33 = !lean::is_exclusive(x_29); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::cnstr_get(x_29, 0); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; -x_36 = lean::cnstr_get(x_34, 0); -lean::cnstr_set(x_2, 1, x_36); -lean::cnstr_set(x_2, 0, x_28); -lean::cnstr_set(x_34, 0, x_2); -return x_29; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; -x_37 = lean::cnstr_get(x_34, 0); -x_38 = lean::cnstr_get(x_34, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_34); -lean::cnstr_set(x_2, 1, x_37); -lean::cnstr_set(x_2, 0, x_28); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_2); -lean::cnstr_set(x_39, 1, x_38); -lean::cnstr_set(x_29, 0, x_39); -return x_29; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_29, 0); -lean::inc(x_40); -lean::dec(x_29); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - x_43 = x_40; -} else { - lean::dec_ref(x_40); - x_43 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_41); -lean::cnstr_set(x_2, 0, x_28); -if (lean::is_scalar(x_43)) { - x_44 = lean::alloc_cnstr(0, 2, 0); -} else { - x_44 = x_43; -} -lean::cnstr_set(x_44, 0, x_2); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_46 = lean::cnstr_get(x_2, 1); -lean::inc(x_46); -lean::dec(x_2); -x_47 = lean::cnstr_get(x_10, 0); -lean::inc(x_47); -lean::dec(x_10); -x_48 = lean::cnstr_get(x_47, 2); -lean::inc(x_48); -x_49 = l_Lean_Elaborator_toPexpr___main(x_48, x_3, x_4, x_5); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; obj* x_52; -lean::dec(x_47); -lean::dec(x_46); -lean::dec(x_1); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - x_51 = x_49; -} else { - lean::dec_ref(x_49); - x_51 = lean::box(0); -} -if (lean::is_scalar(x_51)) { - x_52 = lean::alloc_cnstr(0, 1, 0); -} else { - x_52 = x_51; -} -lean::cnstr_set(x_52, 0, x_50); -return x_52; -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_53 = lean::cnstr_get(x_49, 0); -lean::inc(x_53); -lean::dec(x_49); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::cnstr_get(x_47, 0); -lean::inc(x_56); -lean::dec(x_47); -x_57 = l_Lean_Elaborator_mangleIdent(x_56); -x_58 = lean::box(0); -x_59 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -x_60 = l_Lean_KVMap_setName(x_58, x_59, x_57); -x_61 = lean_expr_mk_mdata(x_60, x_54); -x_62 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6(x_1, x_46, x_3, x_4, x_55); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; -lean::dec(x_61); -x_63 = lean::cnstr_get(x_62, 0); -lean::inc(x_63); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_64 = x_62; -} else { - lean::dec_ref(x_62); - x_64 = lean::box(0); -} -if (lean::is_scalar(x_64)) { - x_65 = lean::alloc_cnstr(0, 1, 0); -} else { - x_65 = x_64; -} -lean::cnstr_set(x_65, 0, x_63); -return x_65; -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_66 = lean::cnstr_get(x_62, 0); -lean::inc(x_66); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_67 = x_62; -} else { - lean::dec_ref(x_62); - x_67 = lean::box(0); -} -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_66, 1); -lean::inc(x_69); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - x_70 = x_66; -} else { - lean::dec_ref(x_66); - x_70 = lean::box(0); -} -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_61); -lean::cnstr_set(x_71, 1, x_68); -if (lean::is_scalar(x_70)) { - x_72 = lean::alloc_cnstr(0, 2, 0); -} else { - x_72 = x_70; -} -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_69); -if (lean::is_scalar(x_67)) { - x_73 = lean::alloc_cnstr(1, 1, 0); -} else { - x_73 = x_67; -} -lean::cnstr_set(x_73, 0, x_72); -return x_73; -} -} -} -} -else -{ -uint8 x_74; -lean::dec(x_10); -x_74 = !lean::is_exclusive(x_2); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_75 = lean::cnstr_get(x_2, 1); -x_76 = lean::cnstr_get(x_2, 0); -lean::dec(x_76); -lean::inc(x_1); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_1); -x_78 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_79 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_77, x_78, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_77); -if (lean::obj_tag(x_79) == 0) -{ -uint8 x_80; -lean::free_heap_obj(x_2); -lean::dec(x_75); -lean::dec(x_1); -x_80 = !lean::is_exclusive(x_79); -if (x_80 == 0) -{ -return x_79; -} -else -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_79, 0); -lean::inc(x_81); -lean::dec(x_79); -x_82 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} -} -else -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_79, 0); -lean::inc(x_83); -lean::dec(x_79); -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_83, 1); -lean::inc(x_85); -lean::dec(x_83); -x_86 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6(x_1, x_75, x_3, x_4, x_85); -if (lean::obj_tag(x_86) == 0) -{ -uint8 x_87; -lean::dec(x_84); -lean::free_heap_obj(x_2); -x_87 = !lean::is_exclusive(x_86); -if (x_87 == 0) -{ -return x_86; -} -else -{ -obj* x_88; obj* x_89; -x_88 = lean::cnstr_get(x_86, 0); -lean::inc(x_88); -lean::dec(x_86); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; -} -} -else -{ -uint8 x_90; -x_90 = !lean::is_exclusive(x_86); -if (x_90 == 0) -{ -obj* x_91; uint8 x_92; -x_91 = lean::cnstr_get(x_86, 0); -x_92 = !lean::is_exclusive(x_91); -if (x_92 == 0) -{ -obj* x_93; -x_93 = lean::cnstr_get(x_91, 0); -lean::cnstr_set(x_2, 1, x_93); -lean::cnstr_set(x_2, 0, x_84); -lean::cnstr_set(x_91, 0, x_2); -return x_86; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; -x_94 = lean::cnstr_get(x_91, 0); -x_95 = lean::cnstr_get(x_91, 1); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_91); -lean::cnstr_set(x_2, 1, x_94); -lean::cnstr_set(x_2, 0, x_84); -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_2); -lean::cnstr_set(x_96, 1, x_95); -lean::cnstr_set(x_86, 0, x_96); -return x_86; -} -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_97 = lean::cnstr_get(x_86, 0); -lean::inc(x_97); -lean::dec(x_86); -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_97, 1); -lean::inc(x_99); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - x_100 = x_97; -} else { - lean::dec_ref(x_97); - x_100 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_98); -lean::cnstr_set(x_2, 0, x_84); -if (lean::is_scalar(x_100)) { - x_101 = lean::alloc_cnstr(0, 2, 0); -} else { - x_101 = x_100; -} -lean::cnstr_set(x_101, 0, x_2); -lean::cnstr_set(x_101, 1, x_99); -x_102 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_102, 0, x_101); -return x_102; -} -} -} -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_103 = lean::cnstr_get(x_2, 1); -lean::inc(x_103); -lean::dec(x_2); -lean::inc(x_1); -x_104 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_104, 0, x_1); -x_105 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_106 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_104, x_105, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_104); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; -lean::dec(x_103); -lean::dec(x_1); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - x_108 = x_106; -} else { - lean::dec_ref(x_106); - x_108 = lean::box(0); -} -if (lean::is_scalar(x_108)) { - x_109 = lean::alloc_cnstr(0, 1, 0); -} else { - x_109 = x_108; -} -lean::cnstr_set(x_109, 0, x_107); -return x_109; -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_110 = lean::cnstr_get(x_106, 0); -lean::inc(x_110); -lean::dec(x_106); -x_111 = lean::cnstr_get(x_110, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_110, 1); -lean::inc(x_112); -lean::dec(x_110); -x_113 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6(x_1, x_103, x_3, x_4, x_112); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_114; obj* x_115; obj* x_116; -lean::dec(x_111); -x_114 = lean::cnstr_get(x_113, 0); -lean::inc(x_114); -if (lean::is_exclusive(x_113)) { - lean::cnstr_release(x_113, 0); - x_115 = x_113; -} else { - lean::dec_ref(x_113); - x_115 = lean::box(0); -} -if (lean::is_scalar(x_115)) { - x_116 = lean::alloc_cnstr(0, 1, 0); -} else { - x_116 = x_115; -} -lean::cnstr_set(x_116, 0, x_114); -return x_116; -} -else -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_117 = lean::cnstr_get(x_113, 0); -lean::inc(x_117); -if (lean::is_exclusive(x_113)) { - lean::cnstr_release(x_113, 0); - x_118 = x_113; -} else { - lean::dec_ref(x_113); - x_118 = lean::box(0); -} -x_119 = lean::cnstr_get(x_117, 0); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_117, 1); -lean::inc(x_120); -if (lean::is_exclusive(x_117)) { - lean::cnstr_release(x_117, 0); - lean::cnstr_release(x_117, 1); - x_121 = x_117; -} else { - lean::dec_ref(x_117); - x_121 = lean::box(0); -} -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_111); -lean::cnstr_set(x_122, 1, x_119); -if (lean::is_scalar(x_121)) { - x_123 = lean::alloc_cnstr(0, 2, 0); -} else { - x_123 = x_121; -} -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_120); -if (lean::is_scalar(x_118)) { - x_124 = lean::alloc_cnstr(1, 1, 0); -} else { - x_124 = x_118; -} -lean::cnstr_set(x_124, 0, x_123); -return x_124; -} -} -} -} -} -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -lean::inc(x_1); -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_1, x_4); -x_6 = lean_expr_mk_app(x_3, x_5); -return x_6; -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -lean::inc(x_1); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_1); -x_15 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_16 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_14, x_15, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_14); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(x_1, x_12, x_3, x_4, x_22); -if (lean::obj_tag(x_23) == 0) -{ -uint8 x_24; -lean::dec(x_21); -lean::free_heap_obj(x_2); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -return x_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_23); -if (x_27 == 0) -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_23, 0); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; -x_30 = lean::cnstr_get(x_28, 0); -lean::cnstr_set(x_2, 1, x_30); -lean::cnstr_set(x_2, 0, x_21); -lean::cnstr_set(x_28, 0, x_2); -return x_23; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::cnstr_get(x_28, 0); -x_32 = lean::cnstr_get(x_28, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_2, 1, x_31); -lean::cnstr_set(x_2, 0, x_21); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_2); -lean::cnstr_set(x_33, 1, x_32); -lean::cnstr_set(x_23, 0, x_33); -return x_23; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_23, 0); -lean::inc(x_34); -lean::dec(x_23); -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 1); -lean::inc(x_36); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - x_37 = x_34; -} else { - lean::dec_ref(x_34); - x_37 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_35); -lean::cnstr_set(x_2, 0, x_21); -if (lean::is_scalar(x_37)) { - x_38 = lean::alloc_cnstr(0, 2, 0); -} else { - x_38 = x_37; -} -lean::cnstr_set(x_38, 0, x_2); -lean::cnstr_set(x_38, 1, x_36); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_40 = lean::cnstr_get(x_2, 1); -lean::inc(x_40); -lean::dec(x_2); -lean::inc(x_1); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_1); -x_42 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_43 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_41, x_42, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_41); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_40); -lean::dec(x_1); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - x_45 = x_43; -} else { - lean::dec_ref(x_43); - x_45 = lean::box(0); -} -if (lean::is_scalar(x_45)) { - x_46 = lean::alloc_cnstr(0, 1, 0); -} else { - x_46 = x_45; -} -lean::cnstr_set(x_46, 0, x_44); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -lean::dec(x_47); -x_50 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(x_1, x_40, x_3, x_4, x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; -lean::dec(x_48); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_52 = x_50; -} else { - lean::dec_ref(x_50); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(0, 1, 0); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_51); -return x_53; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_54 = lean::cnstr_get(x_50, 0); -lean::inc(x_54); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_55 = x_50; -} else { - lean::dec_ref(x_50); - x_55 = lean::box(0); -} -x_56 = lean::cnstr_get(x_54, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_54, 1); -lean::inc(x_57); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - lean::cnstr_release(x_54, 1); - x_58 = x_54; -} else { - lean::dec_ref(x_54); - x_58 = lean::box(0); -} -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_48); -lean::cnstr_set(x_59, 1, x_56); -if (lean::is_scalar(x_58)) { - x_60 = lean::alloc_cnstr(0, 2, 0); -} else { - x_60 = x_58; -} -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_57); -if (lean::is_scalar(x_55)) { - x_61 = lean::alloc_cnstr(1, 1, 0); -} else { - x_61 = x_55; -} -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -} -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_10, 0); -lean::inc(x_62); -lean::dec(x_10); -x_63 = lean::cnstr_get(x_62, 1); -lean::inc(x_63); -lean::dec(x_62); -if (lean::obj_tag(x_63) == 0) -{ -uint8 x_64; -x_64 = !lean::is_exclusive(x_2); -if (x_64 == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_65 = lean::cnstr_get(x_2, 1); -x_66 = lean::cnstr_get(x_2, 0); -lean::dec(x_66); -lean::inc(x_1); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_1); -x_68 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_69 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_67, x_68, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_67); -if (lean::obj_tag(x_69) == 0) -{ -uint8 x_70; -lean::free_heap_obj(x_2); -lean::dec(x_65); -lean::dec(x_1); -x_70 = !lean::is_exclusive(x_69); -if (x_70 == 0) -{ -return x_69; -} -else -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_69, 0); -lean::inc(x_71); -lean::dec(x_69); -x_72 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -return x_72; -} -} -else -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_73 = lean::cnstr_get(x_69, 0); -lean::inc(x_73); -lean::dec(x_69); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -lean::dec(x_73); -x_76 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(x_1, x_65, x_3, x_4, x_75); -if (lean::obj_tag(x_76) == 0) -{ -uint8 x_77; -lean::dec(x_74); -lean::free_heap_obj(x_2); -x_77 = !lean::is_exclusive(x_76); -if (x_77 == 0) -{ -return x_76; -} -else -{ -obj* x_78; obj* x_79; -x_78 = lean::cnstr_get(x_76, 0); -lean::inc(x_78); -lean::dec(x_76); -x_79 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -return x_79; -} -} -else -{ -uint8 x_80; -x_80 = !lean::is_exclusive(x_76); -if (x_80 == 0) -{ -obj* x_81; uint8 x_82; -x_81 = lean::cnstr_get(x_76, 0); -x_82 = !lean::is_exclusive(x_81); -if (x_82 == 0) -{ -obj* x_83; -x_83 = lean::cnstr_get(x_81, 0); -lean::cnstr_set(x_2, 1, x_83); -lean::cnstr_set(x_2, 0, x_74); -lean::cnstr_set(x_81, 0, x_2); -return x_76; -} -else -{ -obj* x_84; obj* x_85; obj* x_86; -x_84 = lean::cnstr_get(x_81, 0); -x_85 = lean::cnstr_get(x_81, 1); -lean::inc(x_85); -lean::inc(x_84); -lean::dec(x_81); -lean::cnstr_set(x_2, 1, x_84); -lean::cnstr_set(x_2, 0, x_74); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_2); -lean::cnstr_set(x_86, 1, x_85); -lean::cnstr_set(x_76, 0, x_86); -return x_76; -} -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_87 = lean::cnstr_get(x_76, 0); -lean::inc(x_87); -lean::dec(x_76); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -if (lean::is_exclusive(x_87)) { - lean::cnstr_release(x_87, 0); - lean::cnstr_release(x_87, 1); - x_90 = x_87; -} else { - lean::dec_ref(x_87); - x_90 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_88); -lean::cnstr_set(x_2, 0, x_74); -if (lean::is_scalar(x_90)) { - x_91 = lean::alloc_cnstr(0, 2, 0); -} else { - x_91 = x_90; -} -lean::cnstr_set(x_91, 0, x_2); -lean::cnstr_set(x_91, 1, x_89); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; -} -} -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_93 = lean::cnstr_get(x_2, 1); -lean::inc(x_93); -lean::dec(x_2); -lean::inc(x_1); -x_94 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_94, 0, x_1); -x_95 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_96 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_94, x_95, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_94); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; obj* x_98; obj* x_99; -lean::dec(x_93); -lean::dec(x_1); -x_97 = lean::cnstr_get(x_96, 0); -lean::inc(x_97); -if (lean::is_exclusive(x_96)) { - lean::cnstr_release(x_96, 0); - x_98 = x_96; -} else { - lean::dec_ref(x_96); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(0, 1, 0); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_97); -return x_99; -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_100 = lean::cnstr_get(x_96, 0); -lean::inc(x_100); -lean::dec(x_96); -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -lean::dec(x_100); -x_103 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(x_1, x_93, x_3, x_4, x_102); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_101); -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_105 = x_103; -} else { - lean::dec_ref(x_103); - x_105 = lean::box(0); -} -if (lean::is_scalar(x_105)) { - x_106 = lean::alloc_cnstr(0, 1, 0); -} else { - x_106 = x_105; -} -lean::cnstr_set(x_106, 0, x_104); -return x_106; -} -else -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_107 = lean::cnstr_get(x_103, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_108 = x_103; -} else { - lean::dec_ref(x_103); - x_108 = lean::box(0); -} -x_109 = lean::cnstr_get(x_107, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_107, 1); -lean::inc(x_110); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - x_111 = x_107; -} else { - lean::dec_ref(x_107); - x_111 = lean::box(0); -} -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_101); -lean::cnstr_set(x_112, 1, x_109); -if (lean::is_scalar(x_111)) { - x_113 = lean::alloc_cnstr(0, 2, 0); -} else { - x_113 = x_111; -} -lean::cnstr_set(x_113, 0, x_112); -lean::cnstr_set(x_113, 1, x_110); -if (lean::is_scalar(x_108)) { - x_114 = lean::alloc_cnstr(1, 1, 0); -} else { - x_114 = x_108; -} -lean::cnstr_set(x_114, 0, x_113); -return x_114; -} -} -} -} -else -{ -uint8 x_115; -x_115 = !lean::is_exclusive(x_2); -if (x_115 == 0) -{ -obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_116 = lean::cnstr_get(x_2, 1); -x_117 = lean::cnstr_get(x_2, 0); -lean::dec(x_117); -x_118 = lean::cnstr_get(x_63, 0); -lean::inc(x_118); -lean::dec(x_63); -x_119 = l_Lean_Elaborator_toPexpr___main(x_118, x_3, x_4, x_5); -if (lean::obj_tag(x_119) == 0) -{ -uint8 x_120; -lean::free_heap_obj(x_2); -lean::dec(x_116); -lean::dec(x_1); -x_120 = !lean::is_exclusive(x_119); -if (x_120 == 0) -{ -return x_119; -} -else -{ -obj* x_121; obj* x_122; -x_121 = lean::cnstr_get(x_119, 0); -lean::inc(x_121); -lean::dec(x_119); -x_122 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_122, 0, x_121); -return x_122; -} -} -else -{ -obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_123 = lean::cnstr_get(x_119, 0); -lean::inc(x_123); -lean::dec(x_119); -x_124 = lean::cnstr_get(x_123, 0); -lean::inc(x_124); -x_125 = lean::cnstr_get(x_123, 1); -lean::inc(x_125); -lean::dec(x_123); -x_126 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(x_1, x_116, x_3, x_4, x_125); -if (lean::obj_tag(x_126) == 0) -{ -uint8 x_127; -lean::dec(x_124); -lean::free_heap_obj(x_2); -x_127 = !lean::is_exclusive(x_126); -if (x_127 == 0) -{ -return x_126; -} -else -{ -obj* x_128; obj* x_129; -x_128 = lean::cnstr_get(x_126, 0); -lean::inc(x_128); -lean::dec(x_126); -x_129 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_129, 0, x_128); -return x_129; -} -} -else -{ -uint8 x_130; -x_130 = !lean::is_exclusive(x_126); -if (x_130 == 0) -{ -obj* x_131; uint8 x_132; -x_131 = lean::cnstr_get(x_126, 0); -x_132 = !lean::is_exclusive(x_131); -if (x_132 == 0) -{ -obj* x_133; -x_133 = lean::cnstr_get(x_131, 0); -lean::cnstr_set(x_2, 1, x_133); -lean::cnstr_set(x_2, 0, x_124); -lean::cnstr_set(x_131, 0, x_2); -return x_126; -} -else -{ -obj* x_134; obj* x_135; obj* x_136; -x_134 = lean::cnstr_get(x_131, 0); -x_135 = lean::cnstr_get(x_131, 1); -lean::inc(x_135); -lean::inc(x_134); -lean::dec(x_131); -lean::cnstr_set(x_2, 1, x_134); -lean::cnstr_set(x_2, 0, x_124); -x_136 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_136, 0, x_2); -lean::cnstr_set(x_136, 1, x_135); -lean::cnstr_set(x_126, 0, x_136); -return x_126; -} -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -x_137 = lean::cnstr_get(x_126, 0); -lean::inc(x_137); -lean::dec(x_126); -x_138 = lean::cnstr_get(x_137, 0); -lean::inc(x_138); -x_139 = lean::cnstr_get(x_137, 1); -lean::inc(x_139); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - x_140 = x_137; -} else { - lean::dec_ref(x_137); - x_140 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_138); -lean::cnstr_set(x_2, 0, x_124); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(0, 2, 0); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_2); -lean::cnstr_set(x_141, 1, x_139); -x_142 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_142, 0, x_141); -return x_142; -} -} -} -} -else -{ -obj* x_143; obj* x_144; obj* x_145; -x_143 = lean::cnstr_get(x_2, 1); -lean::inc(x_143); -lean::dec(x_2); -x_144 = lean::cnstr_get(x_63, 0); -lean::inc(x_144); -lean::dec(x_63); -x_145 = l_Lean_Elaborator_toPexpr___main(x_144, x_3, x_4, x_5); -if (lean::obj_tag(x_145) == 0) -{ -obj* x_146; obj* x_147; obj* x_148; -lean::dec(x_143); -lean::dec(x_1); -x_146 = lean::cnstr_get(x_145, 0); -lean::inc(x_146); -if (lean::is_exclusive(x_145)) { - lean::cnstr_release(x_145, 0); - x_147 = x_145; -} else { - lean::dec_ref(x_145); - x_147 = lean::box(0); -} -if (lean::is_scalar(x_147)) { - x_148 = lean::alloc_cnstr(0, 1, 0); -} else { - x_148 = x_147; -} -lean::cnstr_set(x_148, 0, x_146); -return x_148; -} -else -{ -obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_149 = lean::cnstr_get(x_145, 0); -lean::inc(x_149); -lean::dec(x_145); -x_150 = lean::cnstr_get(x_149, 0); -lean::inc(x_150); -x_151 = lean::cnstr_get(x_149, 1); -lean::inc(x_151); -lean::dec(x_149); -x_152 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(x_1, x_143, x_3, x_4, x_151); -if (lean::obj_tag(x_152) == 0) -{ -obj* x_153; obj* x_154; obj* x_155; -lean::dec(x_150); -x_153 = lean::cnstr_get(x_152, 0); -lean::inc(x_153); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - x_154 = x_152; -} else { - lean::dec_ref(x_152); - x_154 = lean::box(0); -} -if (lean::is_scalar(x_154)) { - x_155 = lean::alloc_cnstr(0, 1, 0); -} else { - x_155 = x_154; -} -lean::cnstr_set(x_155, 0, x_153); -return x_155; -} -else -{ -obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; -x_156 = lean::cnstr_get(x_152, 0); -lean::inc(x_156); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - x_157 = x_152; -} else { - lean::dec_ref(x_152); - x_157 = lean::box(0); -} -x_158 = lean::cnstr_get(x_156, 0); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_156, 1); -lean::inc(x_159); -if (lean::is_exclusive(x_156)) { - lean::cnstr_release(x_156, 0); - lean::cnstr_release(x_156, 1); - x_160 = x_156; -} else { - lean::dec_ref(x_156); - x_160 = lean::box(0); -} -x_161 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_161, 0, x_150); -lean::cnstr_set(x_161, 1, x_158); -if (lean::is_scalar(x_160)) { - x_162 = lean::alloc_cnstr(0, 2, 0); -} else { - x_162 = x_160; -} -lean::cnstr_set(x_162, 0, x_161); -lean::cnstr_set(x_162, 1, x_159); -if (lean::is_scalar(x_157)) { - x_163 = lean::alloc_cnstr(1, 1, 0); -} else { - x_163 = x_157; -} -lean::cnstr_set(x_163, 0, x_162); -return x_163; -} -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::cnstr_get(x_14, 2); -lean::inc(x_15); -x_16 = l_Lean_Elaborator_toPexpr___main(x_15, x_3, x_4, x_5); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -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_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = lean::cnstr_get(x_14, 0); -lean::inc(x_23); -lean::dec(x_14); -x_24 = l_Lean_Elaborator_mangleIdent(x_23); -x_25 = lean::box(0); -x_26 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -x_27 = l_Lean_KVMap_setName(x_25, x_26, x_24); -x_28 = lean_expr_mk_mdata(x_27, x_21); -x_29 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(x_1, x_12, x_3, x_4, x_22); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -lean::dec(x_28); -lean::free_heap_obj(x_2); -x_30 = !lean::is_exclusive(x_29); -if (x_30 == 0) -{ -return x_29; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -return x_32; -} -} -else -{ -uint8 x_33; -x_33 = !lean::is_exclusive(x_29); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::cnstr_get(x_29, 0); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; -x_36 = lean::cnstr_get(x_34, 0); -lean::cnstr_set(x_2, 1, x_36); -lean::cnstr_set(x_2, 0, x_28); -lean::cnstr_set(x_34, 0, x_2); -return x_29; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; -x_37 = lean::cnstr_get(x_34, 0); -x_38 = lean::cnstr_get(x_34, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_34); -lean::cnstr_set(x_2, 1, x_37); -lean::cnstr_set(x_2, 0, x_28); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_2); -lean::cnstr_set(x_39, 1, x_38); -lean::cnstr_set(x_29, 0, x_39); -return x_29; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_29, 0); -lean::inc(x_40); -lean::dec(x_29); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - x_43 = x_40; -} else { - lean::dec_ref(x_40); - x_43 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_41); -lean::cnstr_set(x_2, 0, x_28); -if (lean::is_scalar(x_43)) { - x_44 = lean::alloc_cnstr(0, 2, 0); -} else { - x_44 = x_43; -} -lean::cnstr_set(x_44, 0, x_2); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_46 = lean::cnstr_get(x_2, 1); -lean::inc(x_46); -lean::dec(x_2); -x_47 = lean::cnstr_get(x_10, 0); -lean::inc(x_47); -lean::dec(x_10); -x_48 = lean::cnstr_get(x_47, 2); -lean::inc(x_48); -x_49 = l_Lean_Elaborator_toPexpr___main(x_48, x_3, x_4, x_5); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; obj* x_52; -lean::dec(x_47); -lean::dec(x_46); -lean::dec(x_1); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - x_51 = x_49; -} else { - lean::dec_ref(x_49); - x_51 = lean::box(0); -} -if (lean::is_scalar(x_51)) { - x_52 = lean::alloc_cnstr(0, 1, 0); -} else { - x_52 = x_51; -} -lean::cnstr_set(x_52, 0, x_50); -return x_52; -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_53 = lean::cnstr_get(x_49, 0); -lean::inc(x_53); -lean::dec(x_49); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::cnstr_get(x_47, 0); -lean::inc(x_56); -lean::dec(x_47); -x_57 = l_Lean_Elaborator_mangleIdent(x_56); -x_58 = lean::box(0); -x_59 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -x_60 = l_Lean_KVMap_setName(x_58, x_59, x_57); -x_61 = lean_expr_mk_mdata(x_60, x_54); -x_62 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(x_1, x_46, x_3, x_4, x_55); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; -lean::dec(x_61); -x_63 = lean::cnstr_get(x_62, 0); -lean::inc(x_63); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_64 = x_62; -} else { - lean::dec_ref(x_62); - x_64 = lean::box(0); -} -if (lean::is_scalar(x_64)) { - x_65 = lean::alloc_cnstr(0, 1, 0); -} else { - x_65 = x_64; -} -lean::cnstr_set(x_65, 0, x_63); -return x_65; -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_66 = lean::cnstr_get(x_62, 0); -lean::inc(x_66); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_67 = x_62; -} else { - lean::dec_ref(x_62); - x_67 = lean::box(0); -} -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_66, 1); -lean::inc(x_69); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - x_70 = x_66; -} else { - lean::dec_ref(x_66); - x_70 = lean::box(0); -} -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_61); -lean::cnstr_set(x_71, 1, x_68); -if (lean::is_scalar(x_70)) { - x_72 = lean::alloc_cnstr(0, 2, 0); -} else { - x_72 = x_70; -} -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_69); -if (lean::is_scalar(x_67)) { - x_73 = lean::alloc_cnstr(1, 1, 0); -} else { - x_73 = x_67; -} -lean::cnstr_set(x_73, 0, x_72); -return x_73; -} -} -} -} -else -{ -uint8 x_74; -lean::dec(x_10); -x_74 = !lean::is_exclusive(x_2); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_75 = lean::cnstr_get(x_2, 1); -x_76 = lean::cnstr_get(x_2, 0); -lean::dec(x_76); -lean::inc(x_1); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_1); -x_78 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_79 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_77, x_78, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_77); -if (lean::obj_tag(x_79) == 0) -{ -uint8 x_80; -lean::free_heap_obj(x_2); -lean::dec(x_75); -lean::dec(x_1); -x_80 = !lean::is_exclusive(x_79); -if (x_80 == 0) -{ -return x_79; -} -else -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_79, 0); -lean::inc(x_81); -lean::dec(x_79); -x_82 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} -} -else -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_79, 0); -lean::inc(x_83); -lean::dec(x_79); -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_83, 1); -lean::inc(x_85); -lean::dec(x_83); -x_86 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(x_1, x_75, x_3, x_4, x_85); -if (lean::obj_tag(x_86) == 0) -{ -uint8 x_87; -lean::dec(x_84); -lean::free_heap_obj(x_2); -x_87 = !lean::is_exclusive(x_86); -if (x_87 == 0) -{ -return x_86; -} -else -{ -obj* x_88; obj* x_89; -x_88 = lean::cnstr_get(x_86, 0); -lean::inc(x_88); -lean::dec(x_86); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; -} -} -else -{ -uint8 x_90; -x_90 = !lean::is_exclusive(x_86); -if (x_90 == 0) -{ -obj* x_91; uint8 x_92; -x_91 = lean::cnstr_get(x_86, 0); -x_92 = !lean::is_exclusive(x_91); -if (x_92 == 0) -{ -obj* x_93; -x_93 = lean::cnstr_get(x_91, 0); -lean::cnstr_set(x_2, 1, x_93); -lean::cnstr_set(x_2, 0, x_84); -lean::cnstr_set(x_91, 0, x_2); -return x_86; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; -x_94 = lean::cnstr_get(x_91, 0); -x_95 = lean::cnstr_get(x_91, 1); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_91); -lean::cnstr_set(x_2, 1, x_94); -lean::cnstr_set(x_2, 0, x_84); -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_2); -lean::cnstr_set(x_96, 1, x_95); -lean::cnstr_set(x_86, 0, x_96); -return x_86; -} -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_97 = lean::cnstr_get(x_86, 0); -lean::inc(x_97); -lean::dec(x_86); -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_97, 1); -lean::inc(x_99); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - x_100 = x_97; -} else { - lean::dec_ref(x_97); - x_100 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_98); -lean::cnstr_set(x_2, 0, x_84); -if (lean::is_scalar(x_100)) { - x_101 = lean::alloc_cnstr(0, 2, 0); -} else { - x_101 = x_100; -} -lean::cnstr_set(x_101, 0, x_2); -lean::cnstr_set(x_101, 1, x_99); -x_102 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_102, 0, x_101); -return x_102; -} -} -} -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_103 = lean::cnstr_get(x_2, 1); -lean::inc(x_103); -lean::dec(x_2); -lean::inc(x_1); -x_104 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_104, 0, x_1); -x_105 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_106 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_104, x_105, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_104); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; -lean::dec(x_103); -lean::dec(x_1); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - x_108 = x_106; -} else { - lean::dec_ref(x_106); - x_108 = lean::box(0); -} -if (lean::is_scalar(x_108)) { - x_109 = lean::alloc_cnstr(0, 1, 0); -} else { - x_109 = x_108; -} -lean::cnstr_set(x_109, 0, x_107); -return x_109; -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_110 = lean::cnstr_get(x_106, 0); -lean::inc(x_110); -lean::dec(x_106); -x_111 = lean::cnstr_get(x_110, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_110, 1); -lean::inc(x_112); -lean::dec(x_110); -x_113 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(x_1, x_103, x_3, x_4, x_112); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_114; obj* x_115; obj* x_116; -lean::dec(x_111); -x_114 = lean::cnstr_get(x_113, 0); -lean::inc(x_114); -if (lean::is_exclusive(x_113)) { - lean::cnstr_release(x_113, 0); - x_115 = x_113; -} else { - lean::dec_ref(x_113); - x_115 = lean::box(0); -} -if (lean::is_scalar(x_115)) { - x_116 = lean::alloc_cnstr(0, 1, 0); -} else { - x_116 = x_115; -} -lean::cnstr_set(x_116, 0, x_114); -return x_116; -} -else -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_117 = lean::cnstr_get(x_113, 0); -lean::inc(x_117); -if (lean::is_exclusive(x_113)) { - lean::cnstr_release(x_113, 0); - x_118 = x_113; -} else { - lean::dec_ref(x_113); - x_118 = lean::box(0); -} -x_119 = lean::cnstr_get(x_117, 0); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_117, 1); -lean::inc(x_120); -if (lean::is_exclusive(x_117)) { - lean::cnstr_release(x_117, 0); - lean::cnstr_release(x_117, 1); - x_121 = x_117; -} else { - lean::dec_ref(x_117); - x_121 = lean::box(0); -} -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_111); -lean::cnstr_set(x_122, 1, x_119); -if (lean::is_scalar(x_121)) { - x_123 = lean::alloc_cnstr(0, 2, 0); -} else { - x_123 = x_121; -} -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_120); -if (lean::is_scalar(x_118)) { - x_124 = lean::alloc_cnstr(1, 1, 0); -} else { - x_124 = x_118; -} -lean::cnstr_set(x_124, 0, x_123); -return x_124; -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -lean::inc(x_1); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_1); -x_15 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_16 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_14, x_15, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_14); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_12, x_3, x_4, x_22); -if (lean::obj_tag(x_23) == 0) -{ -uint8 x_24; -lean::dec(x_21); -lean::free_heap_obj(x_2); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -return x_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_23); -if (x_27 == 0) -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_23, 0); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; -x_30 = lean::cnstr_get(x_28, 0); -lean::cnstr_set(x_2, 1, x_30); -lean::cnstr_set(x_2, 0, x_21); -lean::cnstr_set(x_28, 0, x_2); -return x_23; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::cnstr_get(x_28, 0); -x_32 = lean::cnstr_get(x_28, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_2, 1, x_31); -lean::cnstr_set(x_2, 0, x_21); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_2); -lean::cnstr_set(x_33, 1, x_32); -lean::cnstr_set(x_23, 0, x_33); -return x_23; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_23, 0); -lean::inc(x_34); -lean::dec(x_23); -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 1); -lean::inc(x_36); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - x_37 = x_34; -} else { - lean::dec_ref(x_34); - x_37 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_35); -lean::cnstr_set(x_2, 0, x_21); -if (lean::is_scalar(x_37)) { - x_38 = lean::alloc_cnstr(0, 2, 0); -} else { - x_38 = x_37; -} -lean::cnstr_set(x_38, 0, x_2); -lean::cnstr_set(x_38, 1, x_36); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_40 = lean::cnstr_get(x_2, 1); -lean::inc(x_40); -lean::dec(x_2); -lean::inc(x_1); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_1); -x_42 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_43 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_41, x_42, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_41); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_40); -lean::dec(x_1); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - x_45 = x_43; -} else { - lean::dec_ref(x_43); - x_45 = lean::box(0); -} -if (lean::is_scalar(x_45)) { - x_46 = lean::alloc_cnstr(0, 1, 0); -} else { - x_46 = x_45; -} -lean::cnstr_set(x_46, 0, x_44); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -lean::dec(x_47); -x_50 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_40, x_3, x_4, x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; -lean::dec(x_48); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_52 = x_50; -} else { - lean::dec_ref(x_50); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(0, 1, 0); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_51); -return x_53; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_54 = lean::cnstr_get(x_50, 0); -lean::inc(x_54); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_55 = x_50; -} else { - lean::dec_ref(x_50); - x_55 = lean::box(0); -} -x_56 = lean::cnstr_get(x_54, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_54, 1); -lean::inc(x_57); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - lean::cnstr_release(x_54, 1); - x_58 = x_54; -} else { - lean::dec_ref(x_54); - x_58 = lean::box(0); -} -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_48); -lean::cnstr_set(x_59, 1, x_56); -if (lean::is_scalar(x_58)) { - x_60 = lean::alloc_cnstr(0, 2, 0); -} else { - x_60 = x_58; -} -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_57); -if (lean::is_scalar(x_55)) { - x_61 = lean::alloc_cnstr(1, 1, 0); -} else { - x_61 = x_55; -} -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -} -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_10, 0); -lean::inc(x_62); -lean::dec(x_10); -x_63 = lean::cnstr_get(x_62, 1); -lean::inc(x_63); -lean::dec(x_62); -if (lean::obj_tag(x_63) == 0) -{ -uint8 x_64; -x_64 = !lean::is_exclusive(x_2); -if (x_64 == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_65 = lean::cnstr_get(x_2, 1); -x_66 = lean::cnstr_get(x_2, 0); -lean::dec(x_66); -lean::inc(x_1); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_1); -x_68 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_69 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_67, x_68, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_67); -if (lean::obj_tag(x_69) == 0) -{ -uint8 x_70; -lean::free_heap_obj(x_2); -lean::dec(x_65); -lean::dec(x_1); -x_70 = !lean::is_exclusive(x_69); -if (x_70 == 0) -{ -return x_69; -} -else -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_69, 0); -lean::inc(x_71); -lean::dec(x_69); -x_72 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -return x_72; -} -} -else -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_73 = lean::cnstr_get(x_69, 0); -lean::inc(x_73); -lean::dec(x_69); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -lean::dec(x_73); -x_76 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_65, x_3, x_4, x_75); -if (lean::obj_tag(x_76) == 0) -{ -uint8 x_77; -lean::dec(x_74); -lean::free_heap_obj(x_2); -x_77 = !lean::is_exclusive(x_76); -if (x_77 == 0) -{ -return x_76; -} -else -{ -obj* x_78; obj* x_79; -x_78 = lean::cnstr_get(x_76, 0); -lean::inc(x_78); -lean::dec(x_76); -x_79 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -return x_79; -} -} -else -{ -uint8 x_80; -x_80 = !lean::is_exclusive(x_76); -if (x_80 == 0) -{ -obj* x_81; uint8 x_82; -x_81 = lean::cnstr_get(x_76, 0); -x_82 = !lean::is_exclusive(x_81); -if (x_82 == 0) -{ -obj* x_83; -x_83 = lean::cnstr_get(x_81, 0); -lean::cnstr_set(x_2, 1, x_83); -lean::cnstr_set(x_2, 0, x_74); -lean::cnstr_set(x_81, 0, x_2); -return x_76; -} -else -{ -obj* x_84; obj* x_85; obj* x_86; -x_84 = lean::cnstr_get(x_81, 0); -x_85 = lean::cnstr_get(x_81, 1); -lean::inc(x_85); -lean::inc(x_84); -lean::dec(x_81); -lean::cnstr_set(x_2, 1, x_84); -lean::cnstr_set(x_2, 0, x_74); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_2); -lean::cnstr_set(x_86, 1, x_85); -lean::cnstr_set(x_76, 0, x_86); -return x_76; -} -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_87 = lean::cnstr_get(x_76, 0); -lean::inc(x_87); -lean::dec(x_76); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -if (lean::is_exclusive(x_87)) { - lean::cnstr_release(x_87, 0); - lean::cnstr_release(x_87, 1); - x_90 = x_87; -} else { - lean::dec_ref(x_87); - x_90 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_88); -lean::cnstr_set(x_2, 0, x_74); -if (lean::is_scalar(x_90)) { - x_91 = lean::alloc_cnstr(0, 2, 0); -} else { - x_91 = x_90; -} -lean::cnstr_set(x_91, 0, x_2); -lean::cnstr_set(x_91, 1, x_89); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; -} -} -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_93 = lean::cnstr_get(x_2, 1); -lean::inc(x_93); -lean::dec(x_2); -lean::inc(x_1); -x_94 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_94, 0, x_1); -x_95 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_96 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_94, x_95, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_94); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; obj* x_98; obj* x_99; -lean::dec(x_93); -lean::dec(x_1); -x_97 = lean::cnstr_get(x_96, 0); -lean::inc(x_97); -if (lean::is_exclusive(x_96)) { - lean::cnstr_release(x_96, 0); - x_98 = x_96; -} else { - lean::dec_ref(x_96); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(0, 1, 0); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_97); -return x_99; -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_100 = lean::cnstr_get(x_96, 0); -lean::inc(x_100); -lean::dec(x_96); -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -lean::dec(x_100); -x_103 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_93, x_3, x_4, x_102); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_101); -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_105 = x_103; -} else { - lean::dec_ref(x_103); - x_105 = lean::box(0); -} -if (lean::is_scalar(x_105)) { - x_106 = lean::alloc_cnstr(0, 1, 0); -} else { - x_106 = x_105; -} -lean::cnstr_set(x_106, 0, x_104); -return x_106; -} -else -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_107 = lean::cnstr_get(x_103, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_108 = x_103; -} else { - lean::dec_ref(x_103); - x_108 = lean::box(0); -} -x_109 = lean::cnstr_get(x_107, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_107, 1); -lean::inc(x_110); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - x_111 = x_107; -} else { - lean::dec_ref(x_107); - x_111 = lean::box(0); -} -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_101); -lean::cnstr_set(x_112, 1, x_109); -if (lean::is_scalar(x_111)) { - x_113 = lean::alloc_cnstr(0, 2, 0); -} else { - x_113 = x_111; -} -lean::cnstr_set(x_113, 0, x_112); -lean::cnstr_set(x_113, 1, x_110); -if (lean::is_scalar(x_108)) { - x_114 = lean::alloc_cnstr(1, 1, 0); -} else { - x_114 = x_108; -} -lean::cnstr_set(x_114, 0, x_113); -return x_114; -} -} -} -} -else -{ -uint8 x_115; -x_115 = !lean::is_exclusive(x_2); -if (x_115 == 0) -{ -obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_116 = lean::cnstr_get(x_2, 1); -x_117 = lean::cnstr_get(x_2, 0); -lean::dec(x_117); -x_118 = lean::cnstr_get(x_63, 0); -lean::inc(x_118); -lean::dec(x_63); -x_119 = l_Lean_Elaborator_toPexpr___main(x_118, x_3, x_4, x_5); -if (lean::obj_tag(x_119) == 0) -{ -uint8 x_120; -lean::free_heap_obj(x_2); -lean::dec(x_116); -lean::dec(x_1); -x_120 = !lean::is_exclusive(x_119); -if (x_120 == 0) -{ -return x_119; -} -else -{ -obj* x_121; obj* x_122; -x_121 = lean::cnstr_get(x_119, 0); -lean::inc(x_121); -lean::dec(x_119); -x_122 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_122, 0, x_121); -return x_122; -} -} -else -{ -obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_123 = lean::cnstr_get(x_119, 0); -lean::inc(x_123); -lean::dec(x_119); -x_124 = lean::cnstr_get(x_123, 0); -lean::inc(x_124); -x_125 = lean::cnstr_get(x_123, 1); -lean::inc(x_125); -lean::dec(x_123); -x_126 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_116, x_3, x_4, x_125); -if (lean::obj_tag(x_126) == 0) -{ -uint8 x_127; -lean::dec(x_124); -lean::free_heap_obj(x_2); -x_127 = !lean::is_exclusive(x_126); -if (x_127 == 0) -{ -return x_126; -} -else -{ -obj* x_128; obj* x_129; -x_128 = lean::cnstr_get(x_126, 0); -lean::inc(x_128); -lean::dec(x_126); -x_129 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_129, 0, x_128); -return x_129; -} -} -else -{ -uint8 x_130; -x_130 = !lean::is_exclusive(x_126); -if (x_130 == 0) -{ -obj* x_131; uint8 x_132; -x_131 = lean::cnstr_get(x_126, 0); -x_132 = !lean::is_exclusive(x_131); -if (x_132 == 0) -{ -obj* x_133; -x_133 = lean::cnstr_get(x_131, 0); -lean::cnstr_set(x_2, 1, x_133); -lean::cnstr_set(x_2, 0, x_124); -lean::cnstr_set(x_131, 0, x_2); -return x_126; -} -else -{ -obj* x_134; obj* x_135; obj* x_136; -x_134 = lean::cnstr_get(x_131, 0); -x_135 = lean::cnstr_get(x_131, 1); -lean::inc(x_135); -lean::inc(x_134); -lean::dec(x_131); -lean::cnstr_set(x_2, 1, x_134); -lean::cnstr_set(x_2, 0, x_124); -x_136 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_136, 0, x_2); -lean::cnstr_set(x_136, 1, x_135); -lean::cnstr_set(x_126, 0, x_136); -return x_126; -} -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -x_137 = lean::cnstr_get(x_126, 0); -lean::inc(x_137); -lean::dec(x_126); -x_138 = lean::cnstr_get(x_137, 0); -lean::inc(x_138); -x_139 = lean::cnstr_get(x_137, 1); -lean::inc(x_139); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - x_140 = x_137; -} else { - lean::dec_ref(x_137); - x_140 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_138); -lean::cnstr_set(x_2, 0, x_124); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(0, 2, 0); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_2); -lean::cnstr_set(x_141, 1, x_139); -x_142 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_142, 0, x_141); -return x_142; -} -} -} -} -else -{ -obj* x_143; obj* x_144; obj* x_145; -x_143 = lean::cnstr_get(x_2, 1); -lean::inc(x_143); -lean::dec(x_2); -x_144 = lean::cnstr_get(x_63, 0); -lean::inc(x_144); -lean::dec(x_63); -x_145 = l_Lean_Elaborator_toPexpr___main(x_144, x_3, x_4, x_5); -if (lean::obj_tag(x_145) == 0) -{ -obj* x_146; obj* x_147; obj* x_148; -lean::dec(x_143); -lean::dec(x_1); -x_146 = lean::cnstr_get(x_145, 0); -lean::inc(x_146); -if (lean::is_exclusive(x_145)) { - lean::cnstr_release(x_145, 0); - x_147 = x_145; -} else { - lean::dec_ref(x_145); - x_147 = lean::box(0); -} -if (lean::is_scalar(x_147)) { - x_148 = lean::alloc_cnstr(0, 1, 0); -} else { - x_148 = x_147; -} -lean::cnstr_set(x_148, 0, x_146); -return x_148; -} -else -{ -obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_149 = lean::cnstr_get(x_145, 0); -lean::inc(x_149); -lean::dec(x_145); -x_150 = lean::cnstr_get(x_149, 0); -lean::inc(x_150); -x_151 = lean::cnstr_get(x_149, 1); -lean::inc(x_151); -lean::dec(x_149); -x_152 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_143, x_3, x_4, x_151); -if (lean::obj_tag(x_152) == 0) -{ -obj* x_153; obj* x_154; obj* x_155; -lean::dec(x_150); -x_153 = lean::cnstr_get(x_152, 0); -lean::inc(x_153); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - x_154 = x_152; -} else { - lean::dec_ref(x_152); - x_154 = lean::box(0); -} -if (lean::is_scalar(x_154)) { - x_155 = lean::alloc_cnstr(0, 1, 0); -} else { - x_155 = x_154; -} -lean::cnstr_set(x_155, 0, x_153); -return x_155; -} -else -{ -obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; -x_156 = lean::cnstr_get(x_152, 0); -lean::inc(x_156); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - x_157 = x_152; -} else { - lean::dec_ref(x_152); - x_157 = lean::box(0); -} -x_158 = lean::cnstr_get(x_156, 0); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_156, 1); -lean::inc(x_159); -if (lean::is_exclusive(x_156)) { - lean::cnstr_release(x_156, 0); - lean::cnstr_release(x_156, 1); - x_160 = x_156; -} else { - lean::dec_ref(x_156); - x_160 = lean::box(0); -} -x_161 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_161, 0, x_150); -lean::cnstr_set(x_161, 1, x_158); -if (lean::is_scalar(x_160)) { - x_162 = lean::alloc_cnstr(0, 2, 0); -} else { - x_162 = x_160; -} -lean::cnstr_set(x_162, 0, x_161); -lean::cnstr_set(x_162, 1, x_159); -if (lean::is_scalar(x_157)) { - x_163 = lean::alloc_cnstr(1, 1, 0); -} else { - x_163 = x_157; -} -lean::cnstr_set(x_163, 0, x_162); -return x_163; -} -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::cnstr_get(x_14, 2); -lean::inc(x_15); -x_16 = l_Lean_Elaborator_toPexpr___main(x_15, x_3, x_4, x_5); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -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_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = lean::cnstr_get(x_14, 0); -lean::inc(x_23); -lean::dec(x_14); -x_24 = l_Lean_Elaborator_mangleIdent(x_23); -x_25 = lean::box(0); -x_26 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -x_27 = l_Lean_KVMap_setName(x_25, x_26, x_24); -x_28 = lean_expr_mk_mdata(x_27, x_21); -x_29 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(x_1, x_12, x_3, x_4, x_22); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -lean::dec(x_28); -lean::free_heap_obj(x_2); -x_30 = !lean::is_exclusive(x_29); -if (x_30 == 0) -{ -return x_29; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -return x_32; -} -} -else -{ -uint8 x_33; -x_33 = !lean::is_exclusive(x_29); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::cnstr_get(x_29, 0); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; -x_36 = lean::cnstr_get(x_34, 0); -lean::cnstr_set(x_2, 1, x_36); -lean::cnstr_set(x_2, 0, x_28); -lean::cnstr_set(x_34, 0, x_2); -return x_29; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; -x_37 = lean::cnstr_get(x_34, 0); -x_38 = lean::cnstr_get(x_34, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_34); -lean::cnstr_set(x_2, 1, x_37); -lean::cnstr_set(x_2, 0, x_28); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_2); -lean::cnstr_set(x_39, 1, x_38); -lean::cnstr_set(x_29, 0, x_39); -return x_29; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_29, 0); -lean::inc(x_40); -lean::dec(x_29); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - x_43 = x_40; -} else { - lean::dec_ref(x_40); - x_43 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_41); -lean::cnstr_set(x_2, 0, x_28); -if (lean::is_scalar(x_43)) { - x_44 = lean::alloc_cnstr(0, 2, 0); -} else { - x_44 = x_43; -} -lean::cnstr_set(x_44, 0, x_2); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_46 = lean::cnstr_get(x_2, 1); -lean::inc(x_46); -lean::dec(x_2); -x_47 = lean::cnstr_get(x_10, 0); -lean::inc(x_47); -lean::dec(x_10); -x_48 = lean::cnstr_get(x_47, 2); -lean::inc(x_48); -x_49 = l_Lean_Elaborator_toPexpr___main(x_48, x_3, x_4, x_5); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; obj* x_52; -lean::dec(x_47); -lean::dec(x_46); -lean::dec(x_1); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - x_51 = x_49; -} else { - lean::dec_ref(x_49); - x_51 = lean::box(0); -} -if (lean::is_scalar(x_51)) { - x_52 = lean::alloc_cnstr(0, 1, 0); -} else { - x_52 = x_51; -} -lean::cnstr_set(x_52, 0, x_50); -return x_52; -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_53 = lean::cnstr_get(x_49, 0); -lean::inc(x_53); -lean::dec(x_49); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::cnstr_get(x_47, 0); -lean::inc(x_56); -lean::dec(x_47); -x_57 = l_Lean_Elaborator_mangleIdent(x_56); -x_58 = lean::box(0); -x_59 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -x_60 = l_Lean_KVMap_setName(x_58, x_59, x_57); -x_61 = lean_expr_mk_mdata(x_60, x_54); -x_62 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(x_1, x_46, x_3, x_4, x_55); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; -lean::dec(x_61); -x_63 = lean::cnstr_get(x_62, 0); -lean::inc(x_63); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_64 = x_62; -} else { - lean::dec_ref(x_62); - x_64 = lean::box(0); -} -if (lean::is_scalar(x_64)) { - x_65 = lean::alloc_cnstr(0, 1, 0); -} else { - x_65 = x_64; -} -lean::cnstr_set(x_65, 0, x_63); -return x_65; -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_66 = lean::cnstr_get(x_62, 0); -lean::inc(x_66); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_67 = x_62; -} else { - lean::dec_ref(x_62); - x_67 = lean::box(0); -} -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_66, 1); -lean::inc(x_69); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - x_70 = x_66; -} else { - lean::dec_ref(x_66); - x_70 = lean::box(0); -} -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_61); -lean::cnstr_set(x_71, 1, x_68); -if (lean::is_scalar(x_70)) { - x_72 = lean::alloc_cnstr(0, 2, 0); -} else { - x_72 = x_70; -} -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_69); -if (lean::is_scalar(x_67)) { - x_73 = lean::alloc_cnstr(1, 1, 0); -} else { - x_73 = x_67; -} -lean::cnstr_set(x_73, 0, x_72); -return x_73; -} -} -} -} -else -{ -uint8 x_74; -lean::dec(x_10); -x_74 = !lean::is_exclusive(x_2); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_75 = lean::cnstr_get(x_2, 1); -x_76 = lean::cnstr_get(x_2, 0); -lean::dec(x_76); -lean::inc(x_1); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_1); -x_78 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_79 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_77, x_78, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_77); -if (lean::obj_tag(x_79) == 0) -{ -uint8 x_80; -lean::free_heap_obj(x_2); -lean::dec(x_75); -lean::dec(x_1); -x_80 = !lean::is_exclusive(x_79); -if (x_80 == 0) -{ -return x_79; -} -else -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_79, 0); -lean::inc(x_81); -lean::dec(x_79); -x_82 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} -} -else -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_79, 0); -lean::inc(x_83); -lean::dec(x_79); -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_83, 1); -lean::inc(x_85); -lean::dec(x_83); -x_86 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(x_1, x_75, x_3, x_4, x_85); -if (lean::obj_tag(x_86) == 0) -{ -uint8 x_87; -lean::dec(x_84); -lean::free_heap_obj(x_2); -x_87 = !lean::is_exclusive(x_86); -if (x_87 == 0) -{ -return x_86; -} -else -{ -obj* x_88; obj* x_89; -x_88 = lean::cnstr_get(x_86, 0); -lean::inc(x_88); -lean::dec(x_86); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; -} -} -else -{ -uint8 x_90; -x_90 = !lean::is_exclusive(x_86); -if (x_90 == 0) -{ -obj* x_91; uint8 x_92; -x_91 = lean::cnstr_get(x_86, 0); -x_92 = !lean::is_exclusive(x_91); -if (x_92 == 0) -{ -obj* x_93; -x_93 = lean::cnstr_get(x_91, 0); -lean::cnstr_set(x_2, 1, x_93); -lean::cnstr_set(x_2, 0, x_84); -lean::cnstr_set(x_91, 0, x_2); -return x_86; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; -x_94 = lean::cnstr_get(x_91, 0); -x_95 = lean::cnstr_get(x_91, 1); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_91); -lean::cnstr_set(x_2, 1, x_94); -lean::cnstr_set(x_2, 0, x_84); -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_2); -lean::cnstr_set(x_96, 1, x_95); -lean::cnstr_set(x_86, 0, x_96); -return x_86; -} -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_97 = lean::cnstr_get(x_86, 0); -lean::inc(x_97); -lean::dec(x_86); -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_97, 1); -lean::inc(x_99); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - x_100 = x_97; -} else { - lean::dec_ref(x_97); - x_100 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_98); -lean::cnstr_set(x_2, 0, x_84); -if (lean::is_scalar(x_100)) { - x_101 = lean::alloc_cnstr(0, 2, 0); -} else { - x_101 = x_100; -} -lean::cnstr_set(x_101, 0, x_2); -lean::cnstr_set(x_101, 1, x_99); -x_102 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_102, 0, x_101); -return x_102; -} -} -} -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_103 = lean::cnstr_get(x_2, 1); -lean::inc(x_103); -lean::dec(x_2); -lean::inc(x_1); -x_104 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_104, 0, x_1); -x_105 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_106 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_104, x_105, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_104); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; -lean::dec(x_103); -lean::dec(x_1); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - x_108 = x_106; -} else { - lean::dec_ref(x_106); - x_108 = lean::box(0); -} -if (lean::is_scalar(x_108)) { - x_109 = lean::alloc_cnstr(0, 1, 0); -} else { - x_109 = x_108; -} -lean::cnstr_set(x_109, 0, x_107); -return x_109; -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_110 = lean::cnstr_get(x_106, 0); -lean::inc(x_110); -lean::dec(x_106); -x_111 = lean::cnstr_get(x_110, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_110, 1); -lean::inc(x_112); -lean::dec(x_110); -x_113 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(x_1, x_103, x_3, x_4, x_112); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_114; obj* x_115; obj* x_116; -lean::dec(x_111); -x_114 = lean::cnstr_get(x_113, 0); -lean::inc(x_114); -if (lean::is_exclusive(x_113)) { - lean::cnstr_release(x_113, 0); - x_115 = x_113; -} else { - lean::dec_ref(x_113); - x_115 = lean::box(0); -} -if (lean::is_scalar(x_115)) { - x_116 = lean::alloc_cnstr(0, 1, 0); -} else { - x_116 = x_115; -} -lean::cnstr_set(x_116, 0, x_114); -return x_116; -} -else -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_117 = lean::cnstr_get(x_113, 0); -lean::inc(x_117); -if (lean::is_exclusive(x_113)) { - lean::cnstr_release(x_113, 0); - x_118 = x_113; -} else { - lean::dec_ref(x_113); - x_118 = lean::box(0); -} -x_119 = lean::cnstr_get(x_117, 0); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_117, 1); -lean::inc(x_120); -if (lean::is_exclusive(x_117)) { - lean::cnstr_release(x_117, 0); - lean::cnstr_release(x_117, 1); - x_121 = x_117; -} else { - lean::dec_ref(x_117); - x_121 = lean::box(0); -} -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_111); -lean::cnstr_set(x_122, 1, x_119); -if (lean::is_scalar(x_121)) { - x_123 = lean::alloc_cnstr(0, 2, 0); -} else { - x_123 = x_121; -} -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_120); -if (lean::is_scalar(x_118)) { - x_124 = lean::alloc_cnstr(1, 1, 0); -} else { - x_124 = x_118; -} -lean::cnstr_set(x_124, 0, x_123); -return x_124; -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -lean::inc(x_1); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_1); -x_15 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_16 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_14, x_15, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_14); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_12, x_3, x_4, x_22); -if (lean::obj_tag(x_23) == 0) -{ -uint8 x_24; -lean::dec(x_21); -lean::free_heap_obj(x_2); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -return x_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_23); -if (x_27 == 0) -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_23, 0); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; -x_30 = lean::cnstr_get(x_28, 0); -lean::cnstr_set(x_2, 1, x_30); -lean::cnstr_set(x_2, 0, x_21); -lean::cnstr_set(x_28, 0, x_2); -return x_23; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::cnstr_get(x_28, 0); -x_32 = lean::cnstr_get(x_28, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_2, 1, x_31); -lean::cnstr_set(x_2, 0, x_21); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_2); -lean::cnstr_set(x_33, 1, x_32); -lean::cnstr_set(x_23, 0, x_33); -return x_23; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_23, 0); -lean::inc(x_34); -lean::dec(x_23); -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 1); -lean::inc(x_36); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - x_37 = x_34; -} else { - lean::dec_ref(x_34); - x_37 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_35); -lean::cnstr_set(x_2, 0, x_21); -if (lean::is_scalar(x_37)) { - x_38 = lean::alloc_cnstr(0, 2, 0); -} else { - x_38 = x_37; -} -lean::cnstr_set(x_38, 0, x_2); -lean::cnstr_set(x_38, 1, x_36); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_40 = lean::cnstr_get(x_2, 1); -lean::inc(x_40); -lean::dec(x_2); -lean::inc(x_1); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_1); -x_42 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_43 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_41, x_42, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_41); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_40); -lean::dec(x_1); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - x_45 = x_43; -} else { - lean::dec_ref(x_43); - x_45 = lean::box(0); -} -if (lean::is_scalar(x_45)) { - x_46 = lean::alloc_cnstr(0, 1, 0); -} else { - x_46 = x_45; -} -lean::cnstr_set(x_46, 0, x_44); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -lean::dec(x_47); -x_50 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_40, x_3, x_4, x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; -lean::dec(x_48); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_52 = x_50; -} else { - lean::dec_ref(x_50); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(0, 1, 0); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_51); -return x_53; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_54 = lean::cnstr_get(x_50, 0); -lean::inc(x_54); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_55 = x_50; -} else { - lean::dec_ref(x_50); - x_55 = lean::box(0); -} -x_56 = lean::cnstr_get(x_54, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_54, 1); -lean::inc(x_57); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - lean::cnstr_release(x_54, 1); - x_58 = x_54; -} else { - lean::dec_ref(x_54); - x_58 = lean::box(0); -} -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_48); -lean::cnstr_set(x_59, 1, x_56); -if (lean::is_scalar(x_58)) { - x_60 = lean::alloc_cnstr(0, 2, 0); -} else { - x_60 = x_58; -} -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_57); -if (lean::is_scalar(x_55)) { - x_61 = lean::alloc_cnstr(1, 1, 0); -} else { - x_61 = x_55; -} -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -} -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_10, 0); -lean::inc(x_62); -lean::dec(x_10); -x_63 = lean::cnstr_get(x_62, 1); -lean::inc(x_63); -lean::dec(x_62); -if (lean::obj_tag(x_63) == 0) -{ -uint8 x_64; -x_64 = !lean::is_exclusive(x_2); -if (x_64 == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_65 = lean::cnstr_get(x_2, 1); -x_66 = lean::cnstr_get(x_2, 0); -lean::dec(x_66); -lean::inc(x_1); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_1); -x_68 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_69 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_67, x_68, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_67); -if (lean::obj_tag(x_69) == 0) -{ -uint8 x_70; -lean::free_heap_obj(x_2); -lean::dec(x_65); -lean::dec(x_1); -x_70 = !lean::is_exclusive(x_69); -if (x_70 == 0) -{ -return x_69; -} -else -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_69, 0); -lean::inc(x_71); -lean::dec(x_69); -x_72 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -return x_72; -} -} -else -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_73 = lean::cnstr_get(x_69, 0); -lean::inc(x_73); -lean::dec(x_69); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -lean::dec(x_73); -x_76 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_65, x_3, x_4, x_75); -if (lean::obj_tag(x_76) == 0) -{ -uint8 x_77; -lean::dec(x_74); -lean::free_heap_obj(x_2); -x_77 = !lean::is_exclusive(x_76); -if (x_77 == 0) -{ -return x_76; -} -else -{ -obj* x_78; obj* x_79; -x_78 = lean::cnstr_get(x_76, 0); -lean::inc(x_78); -lean::dec(x_76); -x_79 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -return x_79; -} -} -else -{ -uint8 x_80; -x_80 = !lean::is_exclusive(x_76); -if (x_80 == 0) -{ -obj* x_81; uint8 x_82; -x_81 = lean::cnstr_get(x_76, 0); -x_82 = !lean::is_exclusive(x_81); -if (x_82 == 0) -{ -obj* x_83; -x_83 = lean::cnstr_get(x_81, 0); -lean::cnstr_set(x_2, 1, x_83); -lean::cnstr_set(x_2, 0, x_74); -lean::cnstr_set(x_81, 0, x_2); -return x_76; -} -else -{ -obj* x_84; obj* x_85; obj* x_86; -x_84 = lean::cnstr_get(x_81, 0); -x_85 = lean::cnstr_get(x_81, 1); -lean::inc(x_85); -lean::inc(x_84); -lean::dec(x_81); -lean::cnstr_set(x_2, 1, x_84); -lean::cnstr_set(x_2, 0, x_74); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_2); -lean::cnstr_set(x_86, 1, x_85); -lean::cnstr_set(x_76, 0, x_86); -return x_76; -} -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_87 = lean::cnstr_get(x_76, 0); -lean::inc(x_87); -lean::dec(x_76); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -if (lean::is_exclusive(x_87)) { - lean::cnstr_release(x_87, 0); - lean::cnstr_release(x_87, 1); - x_90 = x_87; -} else { - lean::dec_ref(x_87); - x_90 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_88); -lean::cnstr_set(x_2, 0, x_74); -if (lean::is_scalar(x_90)) { - x_91 = lean::alloc_cnstr(0, 2, 0); -} else { - x_91 = x_90; -} -lean::cnstr_set(x_91, 0, x_2); -lean::cnstr_set(x_91, 1, x_89); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; -} -} -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_93 = lean::cnstr_get(x_2, 1); -lean::inc(x_93); -lean::dec(x_2); -lean::inc(x_1); -x_94 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_94, 0, x_1); -x_95 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_96 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_94, x_95, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_94); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; obj* x_98; obj* x_99; -lean::dec(x_93); -lean::dec(x_1); -x_97 = lean::cnstr_get(x_96, 0); -lean::inc(x_97); -if (lean::is_exclusive(x_96)) { - lean::cnstr_release(x_96, 0); - x_98 = x_96; -} else { - lean::dec_ref(x_96); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(0, 1, 0); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_97); -return x_99; -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_100 = lean::cnstr_get(x_96, 0); -lean::inc(x_100); -lean::dec(x_96); -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -lean::dec(x_100); -x_103 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_93, x_3, x_4, x_102); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_101); -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_105 = x_103; -} else { - lean::dec_ref(x_103); - x_105 = lean::box(0); -} -if (lean::is_scalar(x_105)) { - x_106 = lean::alloc_cnstr(0, 1, 0); -} else { - x_106 = x_105; -} -lean::cnstr_set(x_106, 0, x_104); -return x_106; -} -else -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_107 = lean::cnstr_get(x_103, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_108 = x_103; -} else { - lean::dec_ref(x_103); - x_108 = lean::box(0); -} -x_109 = lean::cnstr_get(x_107, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_107, 1); -lean::inc(x_110); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - x_111 = x_107; -} else { - lean::dec_ref(x_107); - x_111 = lean::box(0); -} -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_101); -lean::cnstr_set(x_112, 1, x_109); -if (lean::is_scalar(x_111)) { - x_113 = lean::alloc_cnstr(0, 2, 0); -} else { - x_113 = x_111; -} -lean::cnstr_set(x_113, 0, x_112); -lean::cnstr_set(x_113, 1, x_110); -if (lean::is_scalar(x_108)) { - x_114 = lean::alloc_cnstr(1, 1, 0); -} else { - x_114 = x_108; -} -lean::cnstr_set(x_114, 0, x_113); -return x_114; -} -} -} -} -else -{ -uint8 x_115; -x_115 = !lean::is_exclusive(x_2); -if (x_115 == 0) -{ -obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_116 = lean::cnstr_get(x_2, 1); -x_117 = lean::cnstr_get(x_2, 0); -lean::dec(x_117); -x_118 = lean::cnstr_get(x_63, 0); -lean::inc(x_118); -lean::dec(x_63); -x_119 = l_Lean_Elaborator_toPexpr___main(x_118, x_3, x_4, x_5); -if (lean::obj_tag(x_119) == 0) -{ -uint8 x_120; -lean::free_heap_obj(x_2); -lean::dec(x_116); -lean::dec(x_1); -x_120 = !lean::is_exclusive(x_119); -if (x_120 == 0) -{ -return x_119; -} -else -{ -obj* x_121; obj* x_122; -x_121 = lean::cnstr_get(x_119, 0); -lean::inc(x_121); -lean::dec(x_119); -x_122 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_122, 0, x_121); -return x_122; -} -} -else -{ -obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_123 = lean::cnstr_get(x_119, 0); -lean::inc(x_123); -lean::dec(x_119); -x_124 = lean::cnstr_get(x_123, 0); -lean::inc(x_124); -x_125 = lean::cnstr_get(x_123, 1); -lean::inc(x_125); -lean::dec(x_123); -x_126 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_116, x_3, x_4, x_125); -if (lean::obj_tag(x_126) == 0) -{ -uint8 x_127; -lean::dec(x_124); -lean::free_heap_obj(x_2); -x_127 = !lean::is_exclusive(x_126); -if (x_127 == 0) -{ -return x_126; -} -else -{ -obj* x_128; obj* x_129; -x_128 = lean::cnstr_get(x_126, 0); -lean::inc(x_128); -lean::dec(x_126); -x_129 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_129, 0, x_128); -return x_129; -} -} -else -{ -uint8 x_130; -x_130 = !lean::is_exclusive(x_126); -if (x_130 == 0) -{ -obj* x_131; uint8 x_132; -x_131 = lean::cnstr_get(x_126, 0); -x_132 = !lean::is_exclusive(x_131); -if (x_132 == 0) -{ -obj* x_133; -x_133 = lean::cnstr_get(x_131, 0); -lean::cnstr_set(x_2, 1, x_133); -lean::cnstr_set(x_2, 0, x_124); -lean::cnstr_set(x_131, 0, x_2); -return x_126; -} -else -{ -obj* x_134; obj* x_135; obj* x_136; -x_134 = lean::cnstr_get(x_131, 0); -x_135 = lean::cnstr_get(x_131, 1); -lean::inc(x_135); -lean::inc(x_134); -lean::dec(x_131); -lean::cnstr_set(x_2, 1, x_134); -lean::cnstr_set(x_2, 0, x_124); -x_136 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_136, 0, x_2); -lean::cnstr_set(x_136, 1, x_135); -lean::cnstr_set(x_126, 0, x_136); -return x_126; -} -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -x_137 = lean::cnstr_get(x_126, 0); -lean::inc(x_137); -lean::dec(x_126); -x_138 = lean::cnstr_get(x_137, 0); -lean::inc(x_138); -x_139 = lean::cnstr_get(x_137, 1); -lean::inc(x_139); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - x_140 = x_137; -} else { - lean::dec_ref(x_137); - x_140 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_138); -lean::cnstr_set(x_2, 0, x_124); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(0, 2, 0); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_2); -lean::cnstr_set(x_141, 1, x_139); -x_142 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_142, 0, x_141); -return x_142; -} -} -} -} -else -{ -obj* x_143; obj* x_144; obj* x_145; -x_143 = lean::cnstr_get(x_2, 1); -lean::inc(x_143); -lean::dec(x_2); -x_144 = lean::cnstr_get(x_63, 0); -lean::inc(x_144); -lean::dec(x_63); -x_145 = l_Lean_Elaborator_toPexpr___main(x_144, x_3, x_4, x_5); -if (lean::obj_tag(x_145) == 0) -{ -obj* x_146; obj* x_147; obj* x_148; -lean::dec(x_143); -lean::dec(x_1); -x_146 = lean::cnstr_get(x_145, 0); -lean::inc(x_146); -if (lean::is_exclusive(x_145)) { - lean::cnstr_release(x_145, 0); - x_147 = x_145; -} else { - lean::dec_ref(x_145); - x_147 = lean::box(0); -} -if (lean::is_scalar(x_147)) { - x_148 = lean::alloc_cnstr(0, 1, 0); -} else { - x_148 = x_147; -} -lean::cnstr_set(x_148, 0, x_146); -return x_148; -} -else -{ -obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_149 = lean::cnstr_get(x_145, 0); -lean::inc(x_149); -lean::dec(x_145); -x_150 = lean::cnstr_get(x_149, 0); -lean::inc(x_150); -x_151 = lean::cnstr_get(x_149, 1); -lean::inc(x_151); -lean::dec(x_149); -x_152 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_143, x_3, x_4, x_151); -if (lean::obj_tag(x_152) == 0) -{ -obj* x_153; obj* x_154; obj* x_155; -lean::dec(x_150); -x_153 = lean::cnstr_get(x_152, 0); -lean::inc(x_153); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - x_154 = x_152; -} else { - lean::dec_ref(x_152); - x_154 = lean::box(0); -} -if (lean::is_scalar(x_154)) { - x_155 = lean::alloc_cnstr(0, 1, 0); -} else { - x_155 = x_154; -} -lean::cnstr_set(x_155, 0, x_153); -return x_155; -} -else -{ -obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; -x_156 = lean::cnstr_get(x_152, 0); -lean::inc(x_156); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - x_157 = x_152; -} else { - lean::dec_ref(x_152); - x_157 = lean::box(0); -} -x_158 = lean::cnstr_get(x_156, 0); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_156, 1); -lean::inc(x_159); -if (lean::is_exclusive(x_156)) { - lean::cnstr_release(x_156, 0); - lean::cnstr_release(x_156, 1); - x_160 = x_156; -} else { - lean::dec_ref(x_156); - x_160 = lean::box(0); -} -x_161 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_161, 0, x_150); -lean::cnstr_set(x_161, 1, x_158); -if (lean::is_scalar(x_160)) { - x_162 = lean::alloc_cnstr(0, 2, 0); -} else { - x_162 = x_160; -} -lean::cnstr_set(x_162, 0, x_161); -lean::cnstr_set(x_162, 1, x_159); -if (lean::is_scalar(x_157)) { - x_163 = lean::alloc_cnstr(1, 1, 0); -} else { - x_163 = x_157; -} -lean::cnstr_set(x_163, 0, x_162); -return x_163; -} -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::cnstr_get(x_14, 2); -lean::inc(x_15); -x_16 = l_Lean_Elaborator_toPexpr___main(x_15, x_3, x_4, x_5); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -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_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = lean::cnstr_get(x_14, 0); -lean::inc(x_23); -lean::dec(x_14); -x_24 = l_Lean_Elaborator_mangleIdent(x_23); -x_25 = lean::box(0); -x_26 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -x_27 = l_Lean_KVMap_setName(x_25, x_26, x_24); -x_28 = lean_expr_mk_mdata(x_27, x_21); -x_29 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(x_1, x_12, x_3, x_4, x_22); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -lean::dec(x_28); -lean::free_heap_obj(x_2); -x_30 = !lean::is_exclusive(x_29); -if (x_30 == 0) -{ -return x_29; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -return x_32; -} -} -else -{ -uint8 x_33; -x_33 = !lean::is_exclusive(x_29); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::cnstr_get(x_29, 0); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; -x_36 = lean::cnstr_get(x_34, 0); -lean::cnstr_set(x_2, 1, x_36); -lean::cnstr_set(x_2, 0, x_28); -lean::cnstr_set(x_34, 0, x_2); -return x_29; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; -x_37 = lean::cnstr_get(x_34, 0); -x_38 = lean::cnstr_get(x_34, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_34); -lean::cnstr_set(x_2, 1, x_37); -lean::cnstr_set(x_2, 0, x_28); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_2); -lean::cnstr_set(x_39, 1, x_38); -lean::cnstr_set(x_29, 0, x_39); -return x_29; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_29, 0); -lean::inc(x_40); -lean::dec(x_29); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - x_43 = x_40; -} else { - lean::dec_ref(x_40); - x_43 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_41); -lean::cnstr_set(x_2, 0, x_28); -if (lean::is_scalar(x_43)) { - x_44 = lean::alloc_cnstr(0, 2, 0); -} else { - x_44 = x_43; -} -lean::cnstr_set(x_44, 0, x_2); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_46 = lean::cnstr_get(x_2, 1); -lean::inc(x_46); -lean::dec(x_2); -x_47 = lean::cnstr_get(x_10, 0); -lean::inc(x_47); -lean::dec(x_10); -x_48 = lean::cnstr_get(x_47, 2); -lean::inc(x_48); -x_49 = l_Lean_Elaborator_toPexpr___main(x_48, x_3, x_4, x_5); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; obj* x_52; -lean::dec(x_47); -lean::dec(x_46); -lean::dec(x_1); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - x_51 = x_49; -} else { - lean::dec_ref(x_49); - x_51 = lean::box(0); -} -if (lean::is_scalar(x_51)) { - x_52 = lean::alloc_cnstr(0, 1, 0); -} else { - x_52 = x_51; -} -lean::cnstr_set(x_52, 0, x_50); -return x_52; -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_53 = lean::cnstr_get(x_49, 0); -lean::inc(x_53); -lean::dec(x_49); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::cnstr_get(x_47, 0); -lean::inc(x_56); -lean::dec(x_47); -x_57 = l_Lean_Elaborator_mangleIdent(x_56); -x_58 = lean::box(0); -x_59 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1; -x_60 = l_Lean_KVMap_setName(x_58, x_59, x_57); -x_61 = lean_expr_mk_mdata(x_60, x_54); -x_62 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(x_1, x_46, x_3, x_4, x_55); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; -lean::dec(x_61); -x_63 = lean::cnstr_get(x_62, 0); -lean::inc(x_63); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_64 = x_62; -} else { - lean::dec_ref(x_62); - x_64 = lean::box(0); -} -if (lean::is_scalar(x_64)) { - x_65 = lean::alloc_cnstr(0, 1, 0); -} else { - x_65 = x_64; -} -lean::cnstr_set(x_65, 0, x_63); -return x_65; -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_66 = lean::cnstr_get(x_62, 0); -lean::inc(x_66); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_67 = x_62; -} else { - lean::dec_ref(x_62); - x_67 = lean::box(0); -} -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_66, 1); -lean::inc(x_69); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - x_70 = x_66; -} else { - lean::dec_ref(x_66); - x_70 = lean::box(0); -} -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_61); -lean::cnstr_set(x_71, 1, x_68); -if (lean::is_scalar(x_70)) { - x_72 = lean::alloc_cnstr(0, 2, 0); -} else { - x_72 = x_70; -} -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_69); -if (lean::is_scalar(x_67)) { - x_73 = lean::alloc_cnstr(1, 1, 0); -} else { - x_73 = x_67; -} -lean::cnstr_set(x_73, 0, x_72); -return x_73; -} -} -} -} -else -{ -uint8 x_74; -lean::dec(x_10); -x_74 = !lean::is_exclusive(x_2); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_75 = lean::cnstr_get(x_2, 1); -x_76 = lean::cnstr_get(x_2, 0); -lean::dec(x_76); -lean::inc(x_1); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_1); -x_78 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_79 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_77, x_78, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_77); -if (lean::obj_tag(x_79) == 0) -{ -uint8 x_80; -lean::free_heap_obj(x_2); -lean::dec(x_75); -lean::dec(x_1); -x_80 = !lean::is_exclusive(x_79); -if (x_80 == 0) -{ -return x_79; -} -else -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_79, 0); -lean::inc(x_81); -lean::dec(x_79); -x_82 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} -} -else -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_79, 0); -lean::inc(x_83); -lean::dec(x_79); -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_83, 1); -lean::inc(x_85); -lean::dec(x_83); -x_86 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(x_1, x_75, x_3, x_4, x_85); -if (lean::obj_tag(x_86) == 0) -{ -uint8 x_87; -lean::dec(x_84); -lean::free_heap_obj(x_2); -x_87 = !lean::is_exclusive(x_86); -if (x_87 == 0) -{ -return x_86; -} -else -{ -obj* x_88; obj* x_89; -x_88 = lean::cnstr_get(x_86, 0); -lean::inc(x_88); -lean::dec(x_86); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; -} -} -else -{ -uint8 x_90; -x_90 = !lean::is_exclusive(x_86); -if (x_90 == 0) -{ -obj* x_91; uint8 x_92; -x_91 = lean::cnstr_get(x_86, 0); -x_92 = !lean::is_exclusive(x_91); -if (x_92 == 0) -{ -obj* x_93; -x_93 = lean::cnstr_get(x_91, 0); -lean::cnstr_set(x_2, 1, x_93); -lean::cnstr_set(x_2, 0, x_84); -lean::cnstr_set(x_91, 0, x_2); -return x_86; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; -x_94 = lean::cnstr_get(x_91, 0); -x_95 = lean::cnstr_get(x_91, 1); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_91); -lean::cnstr_set(x_2, 1, x_94); -lean::cnstr_set(x_2, 0, x_84); -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_2); -lean::cnstr_set(x_96, 1, x_95); -lean::cnstr_set(x_86, 0, x_96); -return x_86; -} -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_97 = lean::cnstr_get(x_86, 0); -lean::inc(x_97); -lean::dec(x_86); -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_97, 1); -lean::inc(x_99); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - x_100 = x_97; -} else { - lean::dec_ref(x_97); - x_100 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_98); -lean::cnstr_set(x_2, 0, x_84); -if (lean::is_scalar(x_100)) { - x_101 = lean::alloc_cnstr(0, 2, 0); -} else { - x_101 = x_100; -} -lean::cnstr_set(x_101, 0, x_2); -lean::cnstr_set(x_101, 1, x_99); -x_102 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_102, 0, x_101); -return x_102; -} -} -} -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_103 = lean::cnstr_get(x_2, 1); -lean::inc(x_103); -lean::dec(x_2); -lean::inc(x_1); -x_104 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_104, 0, x_1); -x_105 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_106 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_104, x_105, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_104); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; -lean::dec(x_103); -lean::dec(x_1); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - x_108 = x_106; -} else { - lean::dec_ref(x_106); - x_108 = lean::box(0); -} -if (lean::is_scalar(x_108)) { - x_109 = lean::alloc_cnstr(0, 1, 0); -} else { - x_109 = x_108; -} -lean::cnstr_set(x_109, 0, x_107); -return x_109; -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_110 = lean::cnstr_get(x_106, 0); -lean::inc(x_110); -lean::dec(x_106); -x_111 = lean::cnstr_get(x_110, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_110, 1); -lean::inc(x_112); -lean::dec(x_110); -x_113 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(x_1, x_103, x_3, x_4, x_112); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_114; obj* x_115; obj* x_116; -lean::dec(x_111); -x_114 = lean::cnstr_get(x_113, 0); -lean::inc(x_114); -if (lean::is_exclusive(x_113)) { - lean::cnstr_release(x_113, 0); - x_115 = x_113; -} else { - lean::dec_ref(x_113); - x_115 = lean::box(0); -} -if (lean::is_scalar(x_115)) { - x_116 = lean::alloc_cnstr(0, 1, 0); -} else { - x_116 = x_115; -} -lean::cnstr_set(x_116, 0, x_114); -return x_116; -} -else -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_117 = lean::cnstr_get(x_113, 0); -lean::inc(x_117); -if (lean::is_exclusive(x_113)) { - lean::cnstr_release(x_113, 0); - x_118 = x_113; -} else { - lean::dec_ref(x_113); - x_118 = lean::box(0); -} -x_119 = lean::cnstr_get(x_117, 0); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_117, 1); -lean::inc(x_120); -if (lean::is_exclusive(x_117)) { - lean::cnstr_release(x_117, 0); - lean::cnstr_release(x_117, 1); - x_121 = x_117; -} else { - lean::dec_ref(x_117); - x_121 = lean::box(0); -} -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_111); -lean::cnstr_set(x_122, 1, x_119); -if (lean::is_scalar(x_121)) { - x_123 = lean::alloc_cnstr(0, 2, 0); -} else { - x_123 = x_121; -} -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_120); -if (lean::is_scalar(x_118)) { - x_124 = lean::alloc_cnstr(1, 1, 0); -} else { - x_124 = x_118; -} -lean::cnstr_set(x_124, 0, x_123); -return x_124; -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -lean::inc(x_1); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_1); -x_15 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_16 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_14, x_15, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_14); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_12, x_3, x_4, x_22); -if (lean::obj_tag(x_23) == 0) -{ -uint8 x_24; -lean::dec(x_21); -lean::free_heap_obj(x_2); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -return x_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_23); -if (x_27 == 0) -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_23, 0); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; -x_30 = lean::cnstr_get(x_28, 0); -lean::cnstr_set(x_2, 1, x_30); -lean::cnstr_set(x_2, 0, x_21); -lean::cnstr_set(x_28, 0, x_2); -return x_23; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::cnstr_get(x_28, 0); -x_32 = lean::cnstr_get(x_28, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_2, 1, x_31); -lean::cnstr_set(x_2, 0, x_21); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_2); -lean::cnstr_set(x_33, 1, x_32); -lean::cnstr_set(x_23, 0, x_33); -return x_23; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_23, 0); -lean::inc(x_34); -lean::dec(x_23); -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 1); -lean::inc(x_36); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - x_37 = x_34; -} else { - lean::dec_ref(x_34); - x_37 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_35); -lean::cnstr_set(x_2, 0, x_21); -if (lean::is_scalar(x_37)) { - x_38 = lean::alloc_cnstr(0, 2, 0); -} else { - x_38 = x_37; -} -lean::cnstr_set(x_38, 0, x_2); -lean::cnstr_set(x_38, 1, x_36); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_40 = lean::cnstr_get(x_2, 1); -lean::inc(x_40); -lean::dec(x_2); -lean::inc(x_1); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_1); -x_42 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_43 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_41, x_42, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_41); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_40); -lean::dec(x_1); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - x_45 = x_43; -} else { - lean::dec_ref(x_43); - x_45 = lean::box(0); -} -if (lean::is_scalar(x_45)) { - x_46 = lean::alloc_cnstr(0, 1, 0); -} else { - x_46 = x_45; -} -lean::cnstr_set(x_46, 0, x_44); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -lean::dec(x_47); -x_50 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_40, x_3, x_4, x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; -lean::dec(x_48); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_52 = x_50; -} else { - lean::dec_ref(x_50); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(0, 1, 0); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_51); -return x_53; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_54 = lean::cnstr_get(x_50, 0); -lean::inc(x_54); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_55 = x_50; -} else { - lean::dec_ref(x_50); - x_55 = lean::box(0); -} -x_56 = lean::cnstr_get(x_54, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_54, 1); -lean::inc(x_57); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - lean::cnstr_release(x_54, 1); - x_58 = x_54; -} else { - lean::dec_ref(x_54); - x_58 = lean::box(0); -} -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_48); -lean::cnstr_set(x_59, 1, x_56); -if (lean::is_scalar(x_58)) { - x_60 = lean::alloc_cnstr(0, 2, 0); -} else { - x_60 = x_58; -} -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_57); -if (lean::is_scalar(x_55)) { - x_61 = lean::alloc_cnstr(1, 1, 0); -} else { - x_61 = x_55; -} -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -} -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_10, 0); -lean::inc(x_62); -lean::dec(x_10); -x_63 = lean::cnstr_get(x_62, 1); -lean::inc(x_63); -lean::dec(x_62); -if (lean::obj_tag(x_63) == 0) -{ -uint8 x_64; -x_64 = !lean::is_exclusive(x_2); -if (x_64 == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_65 = lean::cnstr_get(x_2, 1); -x_66 = lean::cnstr_get(x_2, 0); -lean::dec(x_66); -lean::inc(x_1); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_1); -x_68 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_69 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_67, x_68, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_67); -if (lean::obj_tag(x_69) == 0) -{ -uint8 x_70; -lean::free_heap_obj(x_2); -lean::dec(x_65); -lean::dec(x_1); -x_70 = !lean::is_exclusive(x_69); -if (x_70 == 0) -{ -return x_69; -} -else -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_69, 0); -lean::inc(x_71); -lean::dec(x_69); -x_72 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -return x_72; -} -} -else -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_73 = lean::cnstr_get(x_69, 0); -lean::inc(x_73); -lean::dec(x_69); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -lean::dec(x_73); -x_76 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_65, x_3, x_4, x_75); -if (lean::obj_tag(x_76) == 0) -{ -uint8 x_77; -lean::dec(x_74); -lean::free_heap_obj(x_2); -x_77 = !lean::is_exclusive(x_76); -if (x_77 == 0) -{ -return x_76; -} -else -{ -obj* x_78; obj* x_79; -x_78 = lean::cnstr_get(x_76, 0); -lean::inc(x_78); -lean::dec(x_76); -x_79 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -return x_79; -} -} -else -{ -uint8 x_80; -x_80 = !lean::is_exclusive(x_76); -if (x_80 == 0) -{ -obj* x_81; uint8 x_82; -x_81 = lean::cnstr_get(x_76, 0); -x_82 = !lean::is_exclusive(x_81); -if (x_82 == 0) -{ -obj* x_83; -x_83 = lean::cnstr_get(x_81, 0); -lean::cnstr_set(x_2, 1, x_83); -lean::cnstr_set(x_2, 0, x_74); -lean::cnstr_set(x_81, 0, x_2); -return x_76; -} -else -{ -obj* x_84; obj* x_85; obj* x_86; -x_84 = lean::cnstr_get(x_81, 0); -x_85 = lean::cnstr_get(x_81, 1); -lean::inc(x_85); -lean::inc(x_84); -lean::dec(x_81); -lean::cnstr_set(x_2, 1, x_84); -lean::cnstr_set(x_2, 0, x_74); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_2); -lean::cnstr_set(x_86, 1, x_85); -lean::cnstr_set(x_76, 0, x_86); -return x_76; -} -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_87 = lean::cnstr_get(x_76, 0); -lean::inc(x_87); -lean::dec(x_76); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -if (lean::is_exclusive(x_87)) { - lean::cnstr_release(x_87, 0); - lean::cnstr_release(x_87, 1); - x_90 = x_87; -} else { - lean::dec_ref(x_87); - x_90 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_88); -lean::cnstr_set(x_2, 0, x_74); -if (lean::is_scalar(x_90)) { - x_91 = lean::alloc_cnstr(0, 2, 0); -} else { - x_91 = x_90; -} -lean::cnstr_set(x_91, 0, x_2); -lean::cnstr_set(x_91, 1, x_89); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; -} -} -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_93 = lean::cnstr_get(x_2, 1); -lean::inc(x_93); -lean::dec(x_2); -lean::inc(x_1); -x_94 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_94, 0, x_1); -x_95 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_96 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_94, x_95, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_94); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; obj* x_98; obj* x_99; -lean::dec(x_93); -lean::dec(x_1); -x_97 = lean::cnstr_get(x_96, 0); -lean::inc(x_97); -if (lean::is_exclusive(x_96)) { - lean::cnstr_release(x_96, 0); - x_98 = x_96; -} else { - lean::dec_ref(x_96); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(0, 1, 0); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_97); -return x_99; -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_100 = lean::cnstr_get(x_96, 0); -lean::inc(x_100); -lean::dec(x_96); -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -lean::dec(x_100); -x_103 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_93, x_3, x_4, x_102); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_101); -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_105 = x_103; -} else { - lean::dec_ref(x_103); - x_105 = lean::box(0); -} -if (lean::is_scalar(x_105)) { - x_106 = lean::alloc_cnstr(0, 1, 0); -} else { - x_106 = x_105; -} -lean::cnstr_set(x_106, 0, x_104); -return x_106; -} -else -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_107 = lean::cnstr_get(x_103, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_108 = x_103; -} else { - lean::dec_ref(x_103); - x_108 = lean::box(0); -} -x_109 = lean::cnstr_get(x_107, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_107, 1); -lean::inc(x_110); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - x_111 = x_107; -} else { - lean::dec_ref(x_107); - x_111 = lean::box(0); -} -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_101); -lean::cnstr_set(x_112, 1, x_109); -if (lean::is_scalar(x_111)) { - x_113 = lean::alloc_cnstr(0, 2, 0); -} else { - x_113 = x_111; -} -lean::cnstr_set(x_113, 0, x_112); -lean::cnstr_set(x_113, 1, x_110); -if (lean::is_scalar(x_108)) { - x_114 = lean::alloc_cnstr(1, 1, 0); -} else { - x_114 = x_108; -} -lean::cnstr_set(x_114, 0, x_113); -return x_114; -} -} -} -} -else -{ -uint8 x_115; -x_115 = !lean::is_exclusive(x_2); -if (x_115 == 0) -{ -obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_116 = lean::cnstr_get(x_2, 1); -x_117 = lean::cnstr_get(x_2, 0); -lean::dec(x_117); -x_118 = lean::cnstr_get(x_63, 0); -lean::inc(x_118); -lean::dec(x_63); -x_119 = l_Lean_Elaborator_toPexpr___main(x_118, x_3, x_4, x_5); -if (lean::obj_tag(x_119) == 0) -{ -uint8 x_120; -lean::free_heap_obj(x_2); -lean::dec(x_116); -lean::dec(x_1); -x_120 = !lean::is_exclusive(x_119); -if (x_120 == 0) -{ -return x_119; -} -else -{ -obj* x_121; obj* x_122; -x_121 = lean::cnstr_get(x_119, 0); -lean::inc(x_121); -lean::dec(x_119); -x_122 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_122, 0, x_121); -return x_122; -} -} -else -{ -obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_123 = lean::cnstr_get(x_119, 0); -lean::inc(x_123); -lean::dec(x_119); -x_124 = lean::cnstr_get(x_123, 0); -lean::inc(x_124); -x_125 = lean::cnstr_get(x_123, 1); -lean::inc(x_125); -lean::dec(x_123); -x_126 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_116, x_3, x_4, x_125); -if (lean::obj_tag(x_126) == 0) -{ -uint8 x_127; -lean::dec(x_124); -lean::free_heap_obj(x_2); -x_127 = !lean::is_exclusive(x_126); -if (x_127 == 0) -{ -return x_126; -} -else -{ -obj* x_128; obj* x_129; -x_128 = lean::cnstr_get(x_126, 0); -lean::inc(x_128); -lean::dec(x_126); -x_129 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_129, 0, x_128); -return x_129; -} -} -else -{ -uint8 x_130; -x_130 = !lean::is_exclusive(x_126); -if (x_130 == 0) -{ -obj* x_131; uint8 x_132; -x_131 = lean::cnstr_get(x_126, 0); -x_132 = !lean::is_exclusive(x_131); -if (x_132 == 0) -{ -obj* x_133; -x_133 = lean::cnstr_get(x_131, 0); -lean::cnstr_set(x_2, 1, x_133); -lean::cnstr_set(x_2, 0, x_124); -lean::cnstr_set(x_131, 0, x_2); -return x_126; -} -else -{ -obj* x_134; obj* x_135; obj* x_136; -x_134 = lean::cnstr_get(x_131, 0); -x_135 = lean::cnstr_get(x_131, 1); -lean::inc(x_135); -lean::inc(x_134); -lean::dec(x_131); -lean::cnstr_set(x_2, 1, x_134); -lean::cnstr_set(x_2, 0, x_124); -x_136 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_136, 0, x_2); -lean::cnstr_set(x_136, 1, x_135); -lean::cnstr_set(x_126, 0, x_136); -return x_126; -} -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -x_137 = lean::cnstr_get(x_126, 0); -lean::inc(x_137); -lean::dec(x_126); -x_138 = lean::cnstr_get(x_137, 0); -lean::inc(x_138); -x_139 = lean::cnstr_get(x_137, 1); -lean::inc(x_139); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - x_140 = x_137; -} else { - lean::dec_ref(x_137); - x_140 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_138); -lean::cnstr_set(x_2, 0, x_124); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(0, 2, 0); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_2); -lean::cnstr_set(x_141, 1, x_139); -x_142 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_142, 0, x_141); -return x_142; -} -} -} -} -else -{ -obj* x_143; obj* x_144; obj* x_145; -x_143 = lean::cnstr_get(x_2, 1); -lean::inc(x_143); -lean::dec(x_2); -x_144 = lean::cnstr_get(x_63, 0); -lean::inc(x_144); -lean::dec(x_63); -x_145 = l_Lean_Elaborator_toPexpr___main(x_144, x_3, x_4, x_5); -if (lean::obj_tag(x_145) == 0) -{ -obj* x_146; obj* x_147; obj* x_148; -lean::dec(x_143); -lean::dec(x_1); -x_146 = lean::cnstr_get(x_145, 0); -lean::inc(x_146); -if (lean::is_exclusive(x_145)) { - lean::cnstr_release(x_145, 0); - x_147 = x_145; -} else { - lean::dec_ref(x_145); - x_147 = lean::box(0); -} -if (lean::is_scalar(x_147)) { - x_148 = lean::alloc_cnstr(0, 1, 0); -} else { - x_148 = x_147; -} -lean::cnstr_set(x_148, 0, x_146); -return x_148; -} -else -{ -obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_149 = lean::cnstr_get(x_145, 0); -lean::inc(x_149); -lean::dec(x_145); -x_150 = lean::cnstr_get(x_149, 0); -lean::inc(x_150); -x_151 = lean::cnstr_get(x_149, 1); -lean::inc(x_151); -lean::dec(x_149); -x_152 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_143, x_3, x_4, x_151); -if (lean::obj_tag(x_152) == 0) -{ -obj* x_153; obj* x_154; obj* x_155; -lean::dec(x_150); -x_153 = lean::cnstr_get(x_152, 0); -lean::inc(x_153); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - x_154 = x_152; -} else { - lean::dec_ref(x_152); - x_154 = lean::box(0); -} -if (lean::is_scalar(x_154)) { - x_155 = lean::alloc_cnstr(0, 1, 0); -} else { - x_155 = x_154; -} -lean::cnstr_set(x_155, 0, x_153); -return x_155; -} -else -{ -obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; -x_156 = lean::cnstr_get(x_152, 0); -lean::inc(x_156); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - x_157 = x_152; -} else { - lean::dec_ref(x_152); - x_157 = lean::box(0); -} -x_158 = lean::cnstr_get(x_156, 0); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_156, 1); -lean::inc(x_159); -if (lean::is_exclusive(x_156)) { - lean::cnstr_release(x_156, 0); - lean::cnstr_release(x_156, 1); - x_160 = x_156; -} else { - lean::dec_ref(x_156); - x_160 = lean::box(0); -} -x_161 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_161, 0, x_150); -lean::cnstr_set(x_161, 1, x_158); -if (lean::is_scalar(x_160)) { - x_162 = lean::alloc_cnstr(0, 2, 0); -} else { - x_162 = x_160; -} -lean::cnstr_set(x_162, 0, x_161); -lean::cnstr_set(x_162, 1, x_159); -if (lean::is_scalar(x_157)) { - x_163 = lean::alloc_cnstr(1, 1, 0); -} else { - x_163 = x_157; -} -lean::cnstr_set(x_163, 0, x_162); -return x_163; -} -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__15(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = l_Lean_Elaborator_toPexpr___main(x_9, x_2, x_3, x_4); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__15(x_10, x_2, x_3, x_17); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_16); -lean::free_heap_obj(x_1); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_23, 0); -lean::cnstr_set(x_1, 1, x_25); -lean::cnstr_set(x_1, 0, x_16); -lean::cnstr_set(x_23, 0, x_1); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_23, 0); -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_23); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_16); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_1); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_18, 0, x_28); -return x_18; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_18, 0); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - lean::cnstr_release(x_29, 1); - x_32 = x_29; -} else { - lean::dec_ref(x_29); - x_32 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_30); -lean::cnstr_set(x_1, 0, x_16); -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_1); -x_37 = l_Lean_Elaborator_toPexpr___main(x_35, x_2, x_3, x_4); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_36); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - x_39 = x_37; -} else { - lean::dec_ref(x_37); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(0, 1, 0); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_38); -return x_40; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__15(x_36, x_2, x_3, x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_42); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_46 = x_44; -} else { - lean::dec_ref(x_44); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(0, 1, 0); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_49 = x_44; -} else { - lean::dec_ref(x_44); - x_49 = lean::box(0); -} -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_52 = x_48; -} else { - lean::dec_ref(x_48); - x_52 = lean::box(0); -} -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_42); -lean::cnstr_set(x_53, 1, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -if (lean::is_scalar(x_49)) { - x_55 = lean::alloc_cnstr(1, 1, 0); -} else { - x_55 = x_49; -} -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -} -} -} -} -obj* l_List_foldl___main___at_Lean_Elaborator_toPexpr___main___spec__16(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_3, 1); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::box(0); -x_8 = lean_name_mk_numeral(x_7, x_5); -x_9 = l_Lean_KVMap_setName(x_1, x_8, x_6); -x_1 = x_9; -x_2 = x_4; -goto _start; -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__17(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = l_Lean_Elaborator_toLevel___main(x_9, x_2, x_3, x_4); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__17(x_10, x_2, x_3, x_17); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_16); -lean::free_heap_obj(x_1); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_23, 0); -lean::cnstr_set(x_1, 1, x_25); -lean::cnstr_set(x_1, 0, x_16); -lean::cnstr_set(x_23, 0, x_1); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_23, 0); -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_23); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_16); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_1); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_18, 0, x_28); -return x_18; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_18, 0); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - lean::cnstr_release(x_29, 1); - x_32 = x_29; -} else { - lean::dec_ref(x_29); - x_32 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_30); -lean::cnstr_set(x_1, 0, x_16); -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_1); -x_37 = l_Lean_Elaborator_toLevel___main(x_35, x_2, x_3, x_4); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_36); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - x_39 = x_37; -} else { - lean::dec_ref(x_37); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(0, 1, 0); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_38); -return x_40; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__17(x_36, x_2, x_3, x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_42); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_46 = x_44; -} else { - lean::dec_ref(x_44); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(0, 1, 0); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_49 = x_44; -} else { - lean::dec_ref(x_44); - x_49 = lean::box(0); -} -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_52 = x_48; -} else { - lean::dec_ref(x_48); - x_52 = lean::box(0); -} -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_42); -lean::cnstr_set(x_53, 1, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -if (lean::is_scalar(x_49)) { - x_55 = lean::alloc_cnstr(1, 1, 0); -} else { - x_55 = x_49; -} -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -} -} -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("toPexpr: unexpected: "); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("app"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("column"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("row"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("identUnivs"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("lambda"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__7() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("pi"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__8() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("sortApp"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__9() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("anonymousConstructor"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__10() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("hole"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__11() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("have"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__12() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("show"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__13() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("let"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__14() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("projection"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__15() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("explicit"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__16() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("inaccessible"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__17() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("borrowed"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__18() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("choice"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__19() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structInst"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__20() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("match"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__21() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("toPexpr: unexpected Node: "); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__22() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("match"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__23() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("structure instance"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__24() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("catchall"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__25() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean_expr_mk_sort(x_1); -return x_2; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__26() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("struct"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__27() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("unexpected item in structure instance notation"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__28() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("ill-formed choice"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__29() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("choice"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__30() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("NOTAString"); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = lean_expr_mk_lit(x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__31() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("borrowed"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__32() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("innaccessible"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__33() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("@@"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__34() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("fieldNotation"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__35() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("ill-formed let"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__36() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("this"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__37() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_nat_obj(0u); -x_2 = lean_expr_mk_bvar(x_1); -return x_2; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__38() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("show"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__39() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("have"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__40() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Elaborator_dummy; -x_3 = lean_expr_mk_mvar(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__41() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("anonymousConstructor"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__42() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = level_mk_succ(x_1); -x_3 = lean_expr_mk_sort(x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__43() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("ill-formed pi"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__44() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("ill-formed lambda"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__45() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_string("annotation"); -x_4 = lean_name_mk_string(x_2, x_3); -x_5 = lean::mk_string("preresolved"); -x_6 = lean_name_mk_string(x_2, x_5); -x_7 = l_Lean_KVMap_setName(x_1, x_4, x_6); -return x_7; -} -} -obj* _init_l_Lean_Elaborator_toPexpr___main___closed__46() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("annotation"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("preresolved"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -return x_7; -} -} -obj* l_Lean_Elaborator_toPexpr___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -if (lean::obj_tag(x_1) == 2) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_86; obj* x_131; uint8 x_132; -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_14, 1); -lean::inc(x_16); -lean::dec(x_14); -x_131 = l_Lean_Elaborator_toPexpr___main___closed__5; -x_132 = lean_name_dec_eq(x_15, x_131); -if (x_132 == 0) -{ -obj* x_133; uint8 x_134; -x_133 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_134 = lean_name_dec_eq(x_15, x_133); -if (x_134 == 0) -{ -obj* x_135; uint8 x_136; -x_135 = l_Lean_Elaborator_toPexpr___main___closed__6; -x_136 = lean_name_dec_eq(x_15, x_135); -if (x_136 == 0) -{ -obj* x_137; uint8 x_138; -x_137 = l_Lean_Elaborator_toPexpr___main___closed__7; -x_138 = lean_name_dec_eq(x_15, x_137); -if (x_138 == 0) -{ -obj* x_139; uint8 x_140; -x_139 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__4; -x_140 = lean_name_dec_eq(x_15, x_139); -if (x_140 == 0) -{ -obj* x_141; uint8 x_142; -x_141 = l_Lean_Elaborator_toPexpr___main___closed__8; -x_142 = lean_name_dec_eq(x_15, x_141); -if (x_142 == 0) -{ -obj* x_143; uint8 x_144; -x_143 = l_Lean_Elaborator_toPexpr___main___closed__9; -x_144 = lean_name_dec_eq(x_15, x_143); -if (x_144 == 0) -{ -obj* x_145; uint8 x_146; -x_145 = l_Lean_Elaborator_toPexpr___main___closed__10; -x_146 = lean_name_dec_eq(x_15, x_145); -if (x_146 == 0) -{ -obj* x_147; uint8 x_148; -x_147 = l_Lean_Elaborator_toPexpr___main___closed__11; -x_148 = lean_name_dec_eq(x_15, x_147); -if (x_148 == 0) -{ -obj* x_149; uint8 x_150; -x_149 = l_Lean_Elaborator_toPexpr___main___closed__12; -x_150 = lean_name_dec_eq(x_15, x_149); -if (x_150 == 0) -{ -obj* x_151; uint8 x_152; -x_151 = l_Lean_Elaborator_toPexpr___main___closed__13; -x_152 = lean_name_dec_eq(x_15, x_151); -if (x_152 == 0) -{ -obj* x_153; uint8 x_154; -x_153 = l_Lean_Elaborator_toPexpr___main___closed__14; -x_154 = lean_name_dec_eq(x_15, x_153); -if (x_154 == 0) -{ -obj* x_155; uint8 x_156; -x_155 = l_Lean_Elaborator_toPexpr___main___closed__15; -x_156 = lean_name_dec_eq(x_15, x_155); -if (x_156 == 0) -{ -obj* x_157; uint8 x_158; -x_157 = l_Lean_Elaborator_toPexpr___main___closed__16; -x_158 = lean_name_dec_eq(x_15, x_157); -if (x_158 == 0) -{ -obj* x_159; uint8 x_160; -x_159 = l_Lean_Elaborator_toPexpr___main___closed__17; -x_160 = lean_name_dec_eq(x_15, x_159); -if (x_160 == 0) -{ -obj* x_161; uint8 x_162; -x_161 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_162 = lean_name_dec_eq(x_15, x_161); -if (x_162 == 0) -{ -obj* x_163; uint8 x_164; -x_163 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -x_164 = lean_name_dec_eq(x_15, x_163); -if (x_164 == 0) -{ -obj* x_165; uint8 x_166; -x_165 = l_Lean_Elaborator_toPexpr___main___closed__18; -x_166 = lean_name_dec_eq(x_15, x_165); -if (x_166 == 0) -{ -obj* x_167; uint8 x_168; -lean::dec(x_16); -x_167 = l_Lean_Elaborator_toPexpr___main___closed__19; -x_168 = lean_name_dec_eq(x_15, x_167); -if (x_168 == 0) -{ -obj* x_169; uint8 x_170; -x_169 = l_Lean_Elaborator_toPexpr___main___closed__20; -x_170 = lean_name_dec_eq(x_15, x_169); -if (x_170 == 0) -{ -obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; -lean::inc(x_1); -x_171 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_171, 0, x_1); -x_172 = l_Lean_Name_toString___closed__1; -x_173 = l_Lean_Name_toStringWithSep___main(x_172, x_15); -x_174 = l_Lean_Elaborator_toPexpr___main___closed__21; -x_175 = lean::string_append(x_174, x_173); -lean::dec(x_173); -x_176 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_171, x_175, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_171); -if (lean::obj_tag(x_176) == 0) -{ -uint8 x_177; -lean::dec(x_1); -x_177 = !lean::is_exclusive(x_176); -if (x_177 == 0) -{ -return x_176; -} -else -{ -obj* x_178; obj* x_179; -x_178 = lean::cnstr_get(x_176, 0); -lean::inc(x_178); -lean::dec(x_176); -x_179 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_179, 0, x_178); -return x_179; -} -} -else -{ -uint8 x_180; -x_180 = !lean::is_exclusive(x_176); -if (x_180 == 0) -{ -obj* x_181; uint8 x_182; -x_181 = lean::cnstr_get(x_176, 0); -x_182 = !lean::is_exclusive(x_181); -if (x_182 == 0) -{ -obj* x_183; obj* x_184; -x_183 = lean::cnstr_get(x_181, 0); -x_184 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_184) == 0) -{ -return x_176; -} -else -{ -obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; -x_185 = lean::cnstr_get(x_184, 0); -lean::inc(x_185); -lean::dec(x_184); -x_186 = lean::cnstr_get(x_3, 0); -x_187 = lean::cnstr_get(x_186, 2); -x_188 = l_Lean_FileMap_toPosition(x_187, x_185); -x_189 = lean::cnstr_get(x_188, 1); -lean::inc(x_189); -x_190 = lean::box(0); -x_191 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_192 = l_Lean_KVMap_setNat(x_190, x_191, x_189); -x_193 = lean::cnstr_get(x_188, 0); -lean::inc(x_193); -lean::dec(x_188); -x_194 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_195 = l_Lean_KVMap_setNat(x_192, x_194, x_193); -x_196 = lean_expr_mk_mdata(x_195, x_183); -lean::cnstr_set(x_181, 0, x_196); -return x_176; -} -} -else -{ -obj* x_197; obj* x_198; obj* x_199; -x_197 = lean::cnstr_get(x_181, 0); -x_198 = lean::cnstr_get(x_181, 1); -lean::inc(x_198); -lean::inc(x_197); -lean::dec(x_181); -x_199 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_199) == 0) -{ -obj* x_200; -x_200 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_200, 0, x_197); -lean::cnstr_set(x_200, 1, x_198); -lean::cnstr_set(x_176, 0, x_200); -return x_176; -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; -x_201 = lean::cnstr_get(x_199, 0); -lean::inc(x_201); -lean::dec(x_199); -x_202 = lean::cnstr_get(x_3, 0); -x_203 = lean::cnstr_get(x_202, 2); -x_204 = l_Lean_FileMap_toPosition(x_203, x_201); -x_205 = lean::cnstr_get(x_204, 1); -lean::inc(x_205); -x_206 = lean::box(0); -x_207 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_208 = l_Lean_KVMap_setNat(x_206, x_207, x_205); -x_209 = lean::cnstr_get(x_204, 0); -lean::inc(x_209); -lean::dec(x_204); -x_210 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_211 = l_Lean_KVMap_setNat(x_208, x_210, x_209); -x_212 = lean_expr_mk_mdata(x_211, x_197); -x_213 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_213, 0, x_212); -lean::cnstr_set(x_213, 1, x_198); -lean::cnstr_set(x_176, 0, x_213); -return x_176; -} -} -} -else -{ -obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; -x_214 = lean::cnstr_get(x_176, 0); -lean::inc(x_214); -lean::dec(x_176); -x_215 = lean::cnstr_get(x_214, 0); -lean::inc(x_215); -x_216 = lean::cnstr_get(x_214, 1); -lean::inc(x_216); -if (lean::is_exclusive(x_214)) { - lean::cnstr_release(x_214, 0); - lean::cnstr_release(x_214, 1); - x_217 = x_214; -} else { - lean::dec_ref(x_214); - x_217 = lean::box(0); -} -x_218 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_218) == 0) -{ -obj* x_219; obj* x_220; -if (lean::is_scalar(x_217)) { - x_219 = lean::alloc_cnstr(0, 2, 0); -} else { - x_219 = x_217; -} -lean::cnstr_set(x_219, 0, x_215); -lean::cnstr_set(x_219, 1, x_216); -x_220 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_220, 0, x_219); -return x_220; -} -else -{ -obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; obj* x_233; obj* x_234; -x_221 = lean::cnstr_get(x_218, 0); -lean::inc(x_221); -lean::dec(x_218); -x_222 = lean::cnstr_get(x_3, 0); -x_223 = lean::cnstr_get(x_222, 2); -x_224 = l_Lean_FileMap_toPosition(x_223, x_221); -x_225 = lean::cnstr_get(x_224, 1); -lean::inc(x_225); -x_226 = lean::box(0); -x_227 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_228 = l_Lean_KVMap_setNat(x_226, x_227, x_225); -x_229 = lean::cnstr_get(x_224, 0); -lean::inc(x_229); -lean::dec(x_224); -x_230 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_231 = l_Lean_KVMap_setNat(x_228, x_230, x_229); -x_232 = lean_expr_mk_mdata(x_231, x_215); -if (lean::is_scalar(x_217)) { - x_233 = lean::alloc_cnstr(0, 2, 0); -} else { - x_233 = x_217; -} -lean::cnstr_set(x_233, 0, x_232); -lean::cnstr_set(x_233, 1, x_216); -x_234 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_234, 0, x_233); -return x_234; -} -} -} -} -else -{ -obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; -x_235 = l_Lean_Parser_Term_match_HasView; -x_236 = lean::cnstr_get(x_235, 0); -lean::inc(x_236); -lean::inc(x_1); -x_237 = lean::apply_1(x_236, x_1); -x_238 = lean::cnstr_get(x_237, 5); -lean::inc(x_238); -x_239 = l_List_map___main___at_Lean_Elaborator_toPexpr___main___spec__2(x_238); -x_240 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3(x_239, x_2, x_3, x_4); -if (lean::obj_tag(x_240) == 0) -{ -uint8 x_241; -lean::dec(x_237); -x_241 = !lean::is_exclusive(x_240); -if (x_241 == 0) -{ -x_17 = x_240; -goto block_85; -} -else -{ -obj* x_242; obj* x_243; -x_242 = lean::cnstr_get(x_240, 0); -lean::inc(x_242); -lean::dec(x_240); -x_243 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_243, 0, x_242); -x_17 = x_243; -goto block_85; -} -} -else -{ -obj* x_244; obj* x_245; obj* x_246; obj* x_247; obj* x_248; obj* x_249; -x_244 = lean::cnstr_get(x_240, 0); -lean::inc(x_244); -lean::dec(x_240); -x_245 = lean::cnstr_get(x_244, 0); -lean::inc(x_245); -x_246 = lean::cnstr_get(x_244, 1); -lean::inc(x_246); -lean::dec(x_244); -x_247 = lean::cnstr_get(x_237, 2); -lean::inc(x_247); -x_248 = l_Lean_Expander_getOptType___main(x_247); -lean::dec(x_247); -x_249 = l_Lean_Elaborator_toPexpr___main(x_248, x_2, x_3, x_246); -if (lean::obj_tag(x_249) == 0) -{ -uint8 x_250; -lean::dec(x_245); -lean::dec(x_237); -x_250 = !lean::is_exclusive(x_249); -if (x_250 == 0) -{ -x_17 = x_249; -goto block_85; -} -else -{ -obj* x_251; obj* x_252; -x_251 = lean::cnstr_get(x_249, 0); -lean::inc(x_251); -lean::dec(x_249); -x_252 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_252, 0, x_251); -x_17 = x_252; -goto block_85; -} -} -else -{ -obj* x_253; obj* x_254; obj* x_255; obj* x_256; -x_253 = lean::cnstr_get(x_249, 0); -lean::inc(x_253); -lean::dec(x_249); -x_254 = lean::cnstr_get(x_253, 0); -lean::inc(x_254); -x_255 = lean::cnstr_get(x_253, 1); -lean::inc(x_255); -lean::dec(x_253); -x_256 = l_Lean_Elaborator_mkEqns(x_254, x_245); -if (lean::obj_tag(x_256) == 10) -{ -obj* x_257; obj* x_258; obj* x_259; uint8 x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_264; -x_257 = lean::cnstr_get(x_256, 0); -lean::inc(x_257); -x_258 = lean::cnstr_get(x_256, 1); -lean::inc(x_258); -lean::dec(x_256); -x_259 = l_Lean_Elaborator_toPexpr___main___closed__22; -x_260 = 1; -x_261 = l_Lean_KVMap_setBool(x_257, x_259, x_260); -x_262 = lean_expr_mk_mdata(x_261, x_258); -x_263 = lean::cnstr_get(x_237, 1); -lean::inc(x_263); -lean::dec(x_237); -x_264 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1(x_263, x_2, x_3, x_255); -if (lean::obj_tag(x_264) == 0) -{ -uint8 x_265; -lean::dec(x_262); -x_265 = !lean::is_exclusive(x_264); -if (x_265 == 0) -{ -x_17 = x_264; -goto block_85; -} -else -{ -obj* x_266; obj* x_267; -x_266 = lean::cnstr_get(x_264, 0); -lean::inc(x_266); -lean::dec(x_264); -x_267 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_267, 0, x_266); -x_17 = x_267; -goto block_85; -} -} -else -{ -uint8 x_268; -x_268 = !lean::is_exclusive(x_264); -if (x_268 == 0) -{ -obj* x_269; uint8 x_270; -x_269 = lean::cnstr_get(x_264, 0); -x_270 = !lean::is_exclusive(x_269); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; -x_271 = lean::cnstr_get(x_269, 0); -x_272 = l_List_foldl___main___at_Lean_Expr_mkApp___spec__1(x_262, x_271); -lean::cnstr_set(x_269, 0, x_272); -x_17 = x_264; -goto block_85; -} -else -{ -obj* x_273; obj* x_274; obj* x_275; obj* x_276; -x_273 = lean::cnstr_get(x_269, 0); -x_274 = lean::cnstr_get(x_269, 1); -lean::inc(x_274); -lean::inc(x_273); -lean::dec(x_269); -x_275 = l_List_foldl___main___at_Lean_Expr_mkApp___spec__1(x_262, x_273); -x_276 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_276, 0, x_275); -lean::cnstr_set(x_276, 1, x_274); -lean::cnstr_set(x_264, 0, x_276); -x_17 = x_264; -goto block_85; -} -} -else -{ -obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; obj* x_283; -x_277 = lean::cnstr_get(x_264, 0); -lean::inc(x_277); -lean::dec(x_264); -x_278 = lean::cnstr_get(x_277, 0); -lean::inc(x_278); -x_279 = lean::cnstr_get(x_277, 1); -lean::inc(x_279); -if (lean::is_exclusive(x_277)) { - lean::cnstr_release(x_277, 0); - lean::cnstr_release(x_277, 1); - x_280 = x_277; -} else { - lean::dec_ref(x_277); - x_280 = lean::box(0); -} -x_281 = l_List_foldl___main___at_Lean_Expr_mkApp___spec__1(x_262, x_278); -if (lean::is_scalar(x_280)) { - x_282 = lean::alloc_cnstr(0, 2, 0); -} else { - x_282 = x_280; -} -lean::cnstr_set(x_282, 0, x_281); -lean::cnstr_set(x_282, 1, x_279); -x_283 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_283, 0, x_282); -x_17 = x_283; -goto block_85; -} -} -} -else -{ -obj* x_284; obj* x_285; obj* x_286; -lean::dec(x_256); -lean::dec(x_237); -lean::inc(x_1); -x_284 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_284, 0, x_1); -x_285 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2; -x_286 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_284, x_285, x_2, x_3, x_255); -lean::dec(x_255); -lean::dec(x_284); -x_17 = x_286; -goto block_85; -} -} -} -} -} -else -{ -obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; obj* x_294; obj* x_295; obj* x_296; -x_287 = l_Lean_Parser_Term_structInst_HasView; -x_288 = lean::cnstr_get(x_287, 0); -lean::inc(x_288); -lean::inc(x_1); -x_289 = lean::apply_1(x_288, x_1); -x_290 = lean::cnstr_get(x_289, 3); -lean::inc(x_290); -x_291 = lean::box(0); -x_292 = l_List_spanAux___main___at_Lean_Elaborator_toPexpr___main___spec__4(x_290, x_291); -x_293 = lean::cnstr_get(x_292, 0); -lean::inc(x_293); -x_294 = lean::cnstr_get(x_292, 1); -lean::inc(x_294); -lean::dec(x_292); -x_295 = l_List_spanAux___main___at_Lean_Elaborator_toPexpr___main___spec__5(x_294, x_291); -x_296 = lean::cnstr_get(x_295, 1); -lean::inc(x_296); -if (lean::obj_tag(x_296) == 0) -{ -obj* x_297; obj* x_298; -x_297 = lean::cnstr_get(x_295, 0); -lean::inc(x_297); -lean::dec(x_295); -lean::inc(x_1); -x_298 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6(x_1, x_293, x_2, x_3, x_4); -if (lean::obj_tag(x_298) == 0) -{ -uint8 x_299; -lean::dec(x_297); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_299 = !lean::is_exclusive(x_298); -if (x_299 == 0) -{ -return x_298; -} -else -{ -obj* x_300; obj* x_301; -x_300 = lean::cnstr_get(x_298, 0); -lean::inc(x_300); -lean::dec(x_298); -x_301 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_301, 0, x_300); -return x_301; -} -} -else -{ -obj* x_302; obj* x_303; obj* x_304; obj* x_305; obj* x_355; -x_302 = lean::cnstr_get(x_298, 0); -lean::inc(x_302); -lean::dec(x_298); -x_303 = lean::cnstr_get(x_302, 0); -lean::inc(x_303); -x_304 = lean::cnstr_get(x_302, 1); -lean::inc(x_304); -lean::dec(x_302); -lean::inc(x_1); -x_355 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(x_1, x_297, x_2, x_3, x_304); -if (lean::obj_tag(x_355) == 0) -{ -uint8 x_356; -lean::dec(x_303); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_356 = !lean::is_exclusive(x_355); -if (x_356 == 0) -{ -return x_355; -} -else -{ -obj* x_357; obj* x_358; -x_357 = lean::cnstr_get(x_355, 0); -lean::inc(x_357); -lean::dec(x_355); -x_358 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_358, 0, x_357); -return x_358; -} -} -else -{ -obj* x_359; obj* x_360; -x_359 = lean::cnstr_get(x_355, 0); -lean::inc(x_359); -lean::dec(x_355); -x_360 = lean::cnstr_get(x_289, 2); -lean::inc(x_360); -if (lean::obj_tag(x_360) == 0) -{ -uint8 x_361; -x_361 = !lean::is_exclusive(x_359); -if (x_361 == 0) -{ -x_305 = x_359; -goto block_354; -} -else -{ -obj* x_362; obj* x_363; obj* x_364; -x_362 = lean::cnstr_get(x_359, 0); -x_363 = lean::cnstr_get(x_359, 1); -lean::inc(x_363); -lean::inc(x_362); -lean::dec(x_359); -x_364 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_364, 0, x_362); -lean::cnstr_set(x_364, 1, x_363); -x_305 = x_364; -goto block_354; -} -} -else -{ -obj* x_365; obj* x_366; obj* x_367; obj* x_368; obj* x_369; -x_365 = lean::cnstr_get(x_359, 0); -lean::inc(x_365); -x_366 = lean::cnstr_get(x_359, 1); -lean::inc(x_366); -lean::dec(x_359); -x_367 = lean::cnstr_get(x_360, 0); -lean::inc(x_367); -lean::dec(x_360); -x_368 = lean::cnstr_get(x_367, 0); -lean::inc(x_368); -lean::dec(x_367); -x_369 = l_Lean_Elaborator_toPexpr___main(x_368, x_2, x_3, x_366); -if (lean::obj_tag(x_369) == 0) -{ -uint8 x_370; -lean::dec(x_365); -lean::dec(x_303); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_370 = !lean::is_exclusive(x_369); -if (x_370 == 0) -{ -return x_369; -} -else -{ -obj* x_371; obj* x_372; -x_371 = lean::cnstr_get(x_369, 0); -lean::inc(x_371); -lean::dec(x_369); -x_372 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_372, 0, x_371); -return x_372; -} -} -else -{ -obj* x_373; uint8 x_374; -x_373 = lean::cnstr_get(x_369, 0); -lean::inc(x_373); -lean::dec(x_369); -x_374 = !lean::is_exclusive(x_373); -if (x_374 == 0) -{ -obj* x_375; obj* x_376; obj* x_377; -x_375 = lean::cnstr_get(x_373, 0); -x_376 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_376, 0, x_375); -lean::cnstr_set(x_376, 1, x_291); -x_377 = l_List_append___rarg(x_365, x_376); -lean::cnstr_set(x_373, 0, x_377); -x_305 = x_373; -goto block_354; -} -else -{ -obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; -x_378 = lean::cnstr_get(x_373, 0); -x_379 = lean::cnstr_get(x_373, 1); -lean::inc(x_379); -lean::inc(x_378); -lean::dec(x_373); -x_380 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_380, 0, x_378); -lean::cnstr_set(x_380, 1, x_291); -x_381 = l_List_append___rarg(x_365, x_380); -x_382 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_382, 0, x_381); -lean::cnstr_set(x_382, 1, x_379); -x_305 = x_382; -goto block_354; -} -} -} -} -block_354: -{ -uint8 x_306; -x_306 = !lean::is_exclusive(x_305); -if (x_306 == 0) -{ -obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; uint8 x_313; obj* x_314; obj* x_315; obj* x_316; obj* x_317; obj* x_318; -x_307 = lean::cnstr_get(x_305, 0); -x_308 = lean::mk_nat_obj(0u); -x_309 = l_List_lengthAux___main___rarg(x_303, x_308); -x_310 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_311 = l_Lean_KVMap_setNat(x_291, x_310, x_309); -x_312 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_313 = 0; -x_314 = l_Lean_KVMap_setBool(x_311, x_312, x_313); -x_315 = lean::cnstr_get(x_289, 1); -lean::inc(x_315); -lean::dec(x_289); -x_316 = l_List_append___rarg(x_303, x_307); -x_317 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_318 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_317, x_316); -if (lean::obj_tag(x_315) == 0) -{ -obj* x_319; obj* x_320; obj* x_321; obj* x_322; -x_319 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_320 = lean::box(0); -x_321 = l_Lean_KVMap_setName(x_314, x_319, x_320); -x_322 = lean_expr_mk_mdata(x_321, x_318); -lean::cnstr_set(x_305, 0, x_322); -x_86 = x_305; -goto block_130; -} -else -{ -obj* x_323; obj* x_324; obj* x_325; obj* x_326; obj* x_327; obj* x_328; -x_323 = lean::cnstr_get(x_315, 0); -lean::inc(x_323); -lean::dec(x_315); -x_324 = lean::cnstr_get(x_323, 0); -lean::inc(x_324); -lean::dec(x_323); -x_325 = l_Lean_Elaborator_mangleIdent(x_324); -x_326 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_327 = l_Lean_KVMap_setName(x_314, x_326, x_325); -x_328 = lean_expr_mk_mdata(x_327, x_318); -lean::cnstr_set(x_305, 0, x_328); -x_86 = x_305; -goto block_130; -} -} -else -{ -obj* x_329; obj* x_330; obj* x_331; obj* x_332; obj* x_333; obj* x_334; obj* x_335; uint8 x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; -x_329 = lean::cnstr_get(x_305, 0); -x_330 = lean::cnstr_get(x_305, 1); -lean::inc(x_330); -lean::inc(x_329); -lean::dec(x_305); -x_331 = lean::mk_nat_obj(0u); -x_332 = l_List_lengthAux___main___rarg(x_303, x_331); -x_333 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_334 = l_Lean_KVMap_setNat(x_291, x_333, x_332); -x_335 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_336 = 0; -x_337 = l_Lean_KVMap_setBool(x_334, x_335, x_336); -x_338 = lean::cnstr_get(x_289, 1); -lean::inc(x_338); -lean::dec(x_289); -x_339 = l_List_append___rarg(x_303, x_329); -x_340 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_341 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_340, x_339); -if (lean::obj_tag(x_338) == 0) -{ -obj* x_342; obj* x_343; obj* x_344; obj* x_345; obj* x_346; -x_342 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_343 = lean::box(0); -x_344 = l_Lean_KVMap_setName(x_337, x_342, x_343); -x_345 = lean_expr_mk_mdata(x_344, x_341); -x_346 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_346, 0, x_345); -lean::cnstr_set(x_346, 1, x_330); -x_86 = x_346; -goto block_130; -} -else -{ -obj* x_347; obj* x_348; obj* x_349; obj* x_350; obj* x_351; obj* x_352; obj* x_353; -x_347 = lean::cnstr_get(x_338, 0); -lean::inc(x_347); -lean::dec(x_338); -x_348 = lean::cnstr_get(x_347, 0); -lean::inc(x_348); -lean::dec(x_347); -x_349 = l_Lean_Elaborator_mangleIdent(x_348); -x_350 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_351 = l_Lean_KVMap_setName(x_337, x_350, x_349); -x_352 = lean_expr_mk_mdata(x_351, x_341); -x_353 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_353, 0, x_352); -lean::cnstr_set(x_353, 1, x_330); -x_86 = x_353; -goto block_130; -} -} -} -} -} -else -{ -obj* x_383; obj* x_384; -x_383 = lean::cnstr_get(x_296, 0); -lean::inc(x_383); -x_384 = lean::cnstr_get(x_383, 0); -lean::inc(x_384); -lean::dec(x_383); -if (lean::obj_tag(x_384) == 0) -{ -uint8 x_385; -x_385 = !lean::is_exclusive(x_296); -if (x_385 == 0) -{ -obj* x_386; obj* x_387; obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; -x_386 = lean::cnstr_get(x_296, 1); -lean::dec(x_386); -x_387 = lean::cnstr_get(x_296, 0); -lean::dec(x_387); -x_388 = lean::cnstr_get(x_295, 0); -lean::inc(x_388); -lean::dec(x_295); -x_389 = l_Lean_Parser_Term_structInstItem_HasView; -x_390 = lean::cnstr_get(x_389, 1); -lean::inc(x_390); -x_391 = lean::apply_1(x_390, x_384); -x_392 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_392, 0, x_391); -x_393 = l_Lean_Elaborator_toPexpr___main___closed__27; -x_394 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_392, x_393, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_392); -if (lean::obj_tag(x_394) == 0) -{ -uint8 x_395; -lean::dec(x_388); -lean::free_heap_obj(x_296); -lean::dec(x_293); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_395 = !lean::is_exclusive(x_394); -if (x_395 == 0) -{ -return x_394; -} -else -{ -obj* x_396; obj* x_397; -x_396 = lean::cnstr_get(x_394, 0); -lean::inc(x_396); -lean::dec(x_394); -x_397 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_397, 0, x_396); -return x_397; -} -} -else -{ -obj* x_398; obj* x_399; obj* x_400; obj* x_401; -x_398 = lean::cnstr_get(x_394, 0); -lean::inc(x_398); -lean::dec(x_394); -x_399 = lean::cnstr_get(x_398, 0); -lean::inc(x_399); -x_400 = lean::cnstr_get(x_398, 1); -lean::inc(x_400); -lean::dec(x_398); -lean::inc(x_1); -x_401 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(x_1, x_293, x_2, x_3, x_400); -if (lean::obj_tag(x_401) == 0) -{ -uint8 x_402; -lean::dec(x_399); -lean::dec(x_388); -lean::free_heap_obj(x_296); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_402 = !lean::is_exclusive(x_401); -if (x_402 == 0) -{ -return x_401; -} -else -{ -obj* x_403; obj* x_404; -x_403 = lean::cnstr_get(x_401, 0); -lean::inc(x_403); -lean::dec(x_401); -x_404 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_404, 0, x_403); -return x_404; -} -} -else -{ -obj* x_405; obj* x_406; obj* x_407; obj* x_408; obj* x_458; -x_405 = lean::cnstr_get(x_401, 0); -lean::inc(x_405); -lean::dec(x_401); -x_406 = lean::cnstr_get(x_405, 0); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_405, 1); -lean::inc(x_407); -lean::dec(x_405); -lean::inc(x_1); -x_458 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_388, x_2, x_3, x_407); -if (lean::obj_tag(x_458) == 0) -{ -uint8 x_459; -lean::dec(x_406); -lean::dec(x_399); -lean::free_heap_obj(x_296); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_459 = !lean::is_exclusive(x_458); -if (x_459 == 0) -{ -return x_458; -} -else -{ -obj* x_460; obj* x_461; -x_460 = lean::cnstr_get(x_458, 0); -lean::inc(x_460); -lean::dec(x_458); -x_461 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_461, 0, x_460); -return x_461; -} -} -else -{ -obj* x_462; obj* x_463; -x_462 = lean::cnstr_get(x_458, 0); -lean::inc(x_462); -lean::dec(x_458); -x_463 = lean::cnstr_get(x_289, 2); -lean::inc(x_463); -if (lean::obj_tag(x_463) == 0) -{ -uint8 x_464; -lean::free_heap_obj(x_296); -x_464 = !lean::is_exclusive(x_462); -if (x_464 == 0) -{ -x_408 = x_462; -goto block_457; -} -else -{ -obj* x_465; obj* x_466; obj* x_467; -x_465 = lean::cnstr_get(x_462, 0); -x_466 = lean::cnstr_get(x_462, 1); -lean::inc(x_466); -lean::inc(x_465); -lean::dec(x_462); -x_467 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_467, 0, x_465); -lean::cnstr_set(x_467, 1, x_466); -x_408 = x_467; -goto block_457; -} -} -else -{ -obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; -x_468 = lean::cnstr_get(x_462, 0); -lean::inc(x_468); -x_469 = lean::cnstr_get(x_462, 1); -lean::inc(x_469); -lean::dec(x_462); -x_470 = lean::cnstr_get(x_463, 0); -lean::inc(x_470); -lean::dec(x_463); -x_471 = lean::cnstr_get(x_470, 0); -lean::inc(x_471); -lean::dec(x_470); -x_472 = l_Lean_Elaborator_toPexpr___main(x_471, x_2, x_3, x_469); -if (lean::obj_tag(x_472) == 0) -{ -uint8 x_473; -lean::dec(x_468); -lean::dec(x_406); -lean::dec(x_399); -lean::free_heap_obj(x_296); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_473 = !lean::is_exclusive(x_472); -if (x_473 == 0) -{ -return x_472; -} -else -{ -obj* x_474; obj* x_475; -x_474 = lean::cnstr_get(x_472, 0); -lean::inc(x_474); -lean::dec(x_472); -x_475 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_475, 0, x_474); -return x_475; -} -} -else -{ -obj* x_476; uint8 x_477; -x_476 = lean::cnstr_get(x_472, 0); -lean::inc(x_476); -lean::dec(x_472); -x_477 = !lean::is_exclusive(x_476); -if (x_477 == 0) -{ -obj* x_478; obj* x_479; -x_478 = lean::cnstr_get(x_476, 0); -lean::cnstr_set(x_296, 1, x_291); -lean::cnstr_set(x_296, 0, x_478); -x_479 = l_List_append___rarg(x_468, x_296); -lean::cnstr_set(x_476, 0, x_479); -x_408 = x_476; -goto block_457; -} -else -{ -obj* x_480; obj* x_481; obj* x_482; obj* x_483; -x_480 = lean::cnstr_get(x_476, 0); -x_481 = lean::cnstr_get(x_476, 1); -lean::inc(x_481); -lean::inc(x_480); -lean::dec(x_476); -lean::cnstr_set(x_296, 1, x_291); -lean::cnstr_set(x_296, 0, x_480); -x_482 = l_List_append___rarg(x_468, x_296); -x_483 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_483, 0, x_482); -lean::cnstr_set(x_483, 1, x_481); -x_408 = x_483; -goto block_457; -} -} -} -} -block_457: -{ -uint8 x_409; -x_409 = !lean::is_exclusive(x_408); -if (x_409 == 0) -{ -obj* x_410; obj* x_411; obj* x_412; obj* x_413; obj* x_414; obj* x_415; uint8 x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; -x_410 = lean::cnstr_get(x_408, 0); -x_411 = lean::mk_nat_obj(0u); -x_412 = l_List_lengthAux___main___rarg(x_406, x_411); -x_413 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_414 = l_Lean_KVMap_setNat(x_291, x_413, x_412); -x_415 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_416 = lean::unbox(x_399); -lean::dec(x_399); -x_417 = l_Lean_KVMap_setBool(x_414, x_415, x_416); -x_418 = lean::cnstr_get(x_289, 1); -lean::inc(x_418); -lean::dec(x_289); -x_419 = l_List_append___rarg(x_406, x_410); -x_420 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_421 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_420, x_419); -if (lean::obj_tag(x_418) == 0) -{ -obj* x_422; obj* x_423; obj* x_424; obj* x_425; -x_422 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_423 = lean::box(0); -x_424 = l_Lean_KVMap_setName(x_417, x_422, x_423); -x_425 = lean_expr_mk_mdata(x_424, x_421); -lean::cnstr_set(x_408, 0, x_425); -x_86 = x_408; -goto block_130; -} -else -{ -obj* x_426; obj* x_427; obj* x_428; obj* x_429; obj* x_430; obj* x_431; -x_426 = lean::cnstr_get(x_418, 0); -lean::inc(x_426); -lean::dec(x_418); -x_427 = lean::cnstr_get(x_426, 0); -lean::inc(x_427); -lean::dec(x_426); -x_428 = l_Lean_Elaborator_mangleIdent(x_427); -x_429 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_430 = l_Lean_KVMap_setName(x_417, x_429, x_428); -x_431 = lean_expr_mk_mdata(x_430, x_421); -lean::cnstr_set(x_408, 0, x_431); -x_86 = x_408; -goto block_130; -} -} -else -{ -obj* x_432; obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; uint8 x_439; obj* x_440; obj* x_441; obj* x_442; obj* x_443; obj* x_444; -x_432 = lean::cnstr_get(x_408, 0); -x_433 = lean::cnstr_get(x_408, 1); -lean::inc(x_433); -lean::inc(x_432); -lean::dec(x_408); -x_434 = lean::mk_nat_obj(0u); -x_435 = l_List_lengthAux___main___rarg(x_406, x_434); -x_436 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_437 = l_Lean_KVMap_setNat(x_291, x_436, x_435); -x_438 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_439 = lean::unbox(x_399); -lean::dec(x_399); -x_440 = l_Lean_KVMap_setBool(x_437, x_438, x_439); -x_441 = lean::cnstr_get(x_289, 1); -lean::inc(x_441); -lean::dec(x_289); -x_442 = l_List_append___rarg(x_406, x_432); -x_443 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_444 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_443, x_442); -if (lean::obj_tag(x_441) == 0) -{ -obj* x_445; obj* x_446; obj* x_447; obj* x_448; obj* x_449; -x_445 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_446 = lean::box(0); -x_447 = l_Lean_KVMap_setName(x_440, x_445, x_446); -x_448 = lean_expr_mk_mdata(x_447, x_444); -x_449 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_449, 0, x_448); -lean::cnstr_set(x_449, 1, x_433); -x_86 = x_449; -goto block_130; -} -else -{ -obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; obj* x_455; obj* x_456; -x_450 = lean::cnstr_get(x_441, 0); -lean::inc(x_450); -lean::dec(x_441); -x_451 = lean::cnstr_get(x_450, 0); -lean::inc(x_451); -lean::dec(x_450); -x_452 = l_Lean_Elaborator_mangleIdent(x_451); -x_453 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_454 = l_Lean_KVMap_setName(x_440, x_453, x_452); -x_455 = lean_expr_mk_mdata(x_454, x_444); -x_456 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_456, 0, x_455); -lean::cnstr_set(x_456, 1, x_433); -x_86 = x_456; -goto block_130; -} -} -} -} -} -} -else -{ -obj* x_484; obj* x_485; obj* x_486; obj* x_487; obj* x_488; obj* x_489; obj* x_490; -lean::dec(x_296); -x_484 = lean::cnstr_get(x_295, 0); -lean::inc(x_484); -lean::dec(x_295); -x_485 = l_Lean_Parser_Term_structInstItem_HasView; -x_486 = lean::cnstr_get(x_485, 1); -lean::inc(x_486); -x_487 = lean::apply_1(x_486, x_384); -x_488 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_488, 0, x_487); -x_489 = l_Lean_Elaborator_toPexpr___main___closed__27; -x_490 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_488, x_489, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_488); -if (lean::obj_tag(x_490) == 0) -{ -obj* x_491; obj* x_492; obj* x_493; -lean::dec(x_484); -lean::dec(x_293); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_491 = lean::cnstr_get(x_490, 0); -lean::inc(x_491); -if (lean::is_exclusive(x_490)) { - lean::cnstr_release(x_490, 0); - x_492 = x_490; -} else { - lean::dec_ref(x_490); - x_492 = lean::box(0); -} -if (lean::is_scalar(x_492)) { - x_493 = lean::alloc_cnstr(0, 1, 0); -} else { - x_493 = x_492; -} -lean::cnstr_set(x_493, 0, x_491); -return x_493; -} -else -{ -obj* x_494; obj* x_495; obj* x_496; obj* x_497; -x_494 = lean::cnstr_get(x_490, 0); -lean::inc(x_494); -lean::dec(x_490); -x_495 = lean::cnstr_get(x_494, 0); -lean::inc(x_495); -x_496 = lean::cnstr_get(x_494, 1); -lean::inc(x_496); -lean::dec(x_494); -lean::inc(x_1); -x_497 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(x_1, x_293, x_2, x_3, x_496); -if (lean::obj_tag(x_497) == 0) -{ -obj* x_498; obj* x_499; obj* x_500; -lean::dec(x_495); -lean::dec(x_484); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_498 = lean::cnstr_get(x_497, 0); -lean::inc(x_498); -if (lean::is_exclusive(x_497)) { - lean::cnstr_release(x_497, 0); - x_499 = x_497; -} else { - lean::dec_ref(x_497); - x_499 = lean::box(0); -} -if (lean::is_scalar(x_499)) { - x_500 = lean::alloc_cnstr(0, 1, 0); -} else { - x_500 = x_499; -} -lean::cnstr_set(x_500, 0, x_498); -return x_500; -} -else -{ -obj* x_501; obj* x_502; obj* x_503; obj* x_504; obj* x_532; -x_501 = lean::cnstr_get(x_497, 0); -lean::inc(x_501); -lean::dec(x_497); -x_502 = lean::cnstr_get(x_501, 0); -lean::inc(x_502); -x_503 = lean::cnstr_get(x_501, 1); -lean::inc(x_503); -lean::dec(x_501); -lean::inc(x_1); -x_532 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_484, x_2, x_3, x_503); -if (lean::obj_tag(x_532) == 0) -{ -obj* x_533; obj* x_534; obj* x_535; -lean::dec(x_502); -lean::dec(x_495); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_533 = lean::cnstr_get(x_532, 0); -lean::inc(x_533); -if (lean::is_exclusive(x_532)) { - lean::cnstr_release(x_532, 0); - x_534 = x_532; -} else { - lean::dec_ref(x_532); - x_534 = lean::box(0); -} -if (lean::is_scalar(x_534)) { - x_535 = lean::alloc_cnstr(0, 1, 0); -} else { - x_535 = x_534; -} -lean::cnstr_set(x_535, 0, x_533); -return x_535; -} -else -{ -obj* x_536; obj* x_537; -x_536 = lean::cnstr_get(x_532, 0); -lean::inc(x_536); -lean::dec(x_532); -x_537 = lean::cnstr_get(x_289, 2); -lean::inc(x_537); -if (lean::obj_tag(x_537) == 0) -{ -obj* x_538; obj* x_539; obj* x_540; obj* x_541; -x_538 = lean::cnstr_get(x_536, 0); -lean::inc(x_538); -x_539 = lean::cnstr_get(x_536, 1); -lean::inc(x_539); -if (lean::is_exclusive(x_536)) { - lean::cnstr_release(x_536, 0); - lean::cnstr_release(x_536, 1); - x_540 = x_536; -} else { - lean::dec_ref(x_536); - x_540 = lean::box(0); -} -if (lean::is_scalar(x_540)) { - x_541 = lean::alloc_cnstr(0, 2, 0); -} else { - x_541 = x_540; -} -lean::cnstr_set(x_541, 0, x_538); -lean::cnstr_set(x_541, 1, x_539); -x_504 = x_541; -goto block_531; -} -else -{ -obj* x_542; obj* x_543; obj* x_544; obj* x_545; obj* x_546; -x_542 = lean::cnstr_get(x_536, 0); -lean::inc(x_542); -x_543 = lean::cnstr_get(x_536, 1); -lean::inc(x_543); -lean::dec(x_536); -x_544 = lean::cnstr_get(x_537, 0); -lean::inc(x_544); -lean::dec(x_537); -x_545 = lean::cnstr_get(x_544, 0); -lean::inc(x_545); -lean::dec(x_544); -x_546 = l_Lean_Elaborator_toPexpr___main(x_545, x_2, x_3, x_543); -if (lean::obj_tag(x_546) == 0) -{ -obj* x_547; obj* x_548; obj* x_549; -lean::dec(x_542); -lean::dec(x_502); -lean::dec(x_495); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_547 = lean::cnstr_get(x_546, 0); -lean::inc(x_547); -if (lean::is_exclusive(x_546)) { - lean::cnstr_release(x_546, 0); - x_548 = x_546; -} else { - lean::dec_ref(x_546); - x_548 = lean::box(0); -} -if (lean::is_scalar(x_548)) { - x_549 = lean::alloc_cnstr(0, 1, 0); -} else { - x_549 = x_548; -} -lean::cnstr_set(x_549, 0, x_547); -return x_549; -} -else -{ -obj* x_550; obj* x_551; obj* x_552; obj* x_553; obj* x_554; obj* x_555; obj* x_556; -x_550 = lean::cnstr_get(x_546, 0); -lean::inc(x_550); -lean::dec(x_546); -x_551 = lean::cnstr_get(x_550, 0); -lean::inc(x_551); -x_552 = lean::cnstr_get(x_550, 1); -lean::inc(x_552); -if (lean::is_exclusive(x_550)) { - lean::cnstr_release(x_550, 0); - lean::cnstr_release(x_550, 1); - x_553 = x_550; -} else { - lean::dec_ref(x_550); - x_553 = lean::box(0); -} -x_554 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_554, 0, x_551); -lean::cnstr_set(x_554, 1, x_291); -x_555 = l_List_append___rarg(x_542, x_554); -if (lean::is_scalar(x_553)) { - x_556 = lean::alloc_cnstr(0, 2, 0); -} else { - x_556 = x_553; -} -lean::cnstr_set(x_556, 0, x_555); -lean::cnstr_set(x_556, 1, x_552); -x_504 = x_556; -goto block_531; -} -} -} -block_531: -{ -obj* x_505; obj* x_506; obj* x_507; obj* x_508; obj* x_509; obj* x_510; obj* x_511; obj* x_512; uint8 x_513; obj* x_514; obj* x_515; obj* x_516; obj* x_517; obj* x_518; -x_505 = lean::cnstr_get(x_504, 0); -lean::inc(x_505); -x_506 = lean::cnstr_get(x_504, 1); -lean::inc(x_506); -if (lean::is_exclusive(x_504)) { - lean::cnstr_release(x_504, 0); - lean::cnstr_release(x_504, 1); - x_507 = x_504; -} else { - lean::dec_ref(x_504); - x_507 = lean::box(0); -} -x_508 = lean::mk_nat_obj(0u); -x_509 = l_List_lengthAux___main___rarg(x_502, x_508); -x_510 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_511 = l_Lean_KVMap_setNat(x_291, x_510, x_509); -x_512 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_513 = lean::unbox(x_495); -lean::dec(x_495); -x_514 = l_Lean_KVMap_setBool(x_511, x_512, x_513); -x_515 = lean::cnstr_get(x_289, 1); -lean::inc(x_515); -lean::dec(x_289); -x_516 = l_List_append___rarg(x_502, x_505); -x_517 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_518 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_517, x_516); -if (lean::obj_tag(x_515) == 0) -{ -obj* x_519; obj* x_520; obj* x_521; obj* x_522; obj* x_523; -x_519 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_520 = lean::box(0); -x_521 = l_Lean_KVMap_setName(x_514, x_519, x_520); -x_522 = lean_expr_mk_mdata(x_521, x_518); -if (lean::is_scalar(x_507)) { - x_523 = lean::alloc_cnstr(0, 2, 0); -} else { - x_523 = x_507; -} -lean::cnstr_set(x_523, 0, x_522); -lean::cnstr_set(x_523, 1, x_506); -x_86 = x_523; -goto block_130; -} -else -{ -obj* x_524; obj* x_525; obj* x_526; obj* x_527; obj* x_528; obj* x_529; obj* x_530; -x_524 = lean::cnstr_get(x_515, 0); -lean::inc(x_524); -lean::dec(x_515); -x_525 = lean::cnstr_get(x_524, 0); -lean::inc(x_525); -lean::dec(x_524); -x_526 = l_Lean_Elaborator_mangleIdent(x_525); -x_527 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_528 = l_Lean_KVMap_setName(x_514, x_527, x_526); -x_529 = lean_expr_mk_mdata(x_528, x_518); -if (lean::is_scalar(x_507)) { - x_530 = lean::alloc_cnstr(0, 2, 0); -} else { - x_530 = x_507; -} -lean::cnstr_set(x_530, 0, x_529); -lean::cnstr_set(x_530, 1, x_506); -x_86 = x_530; -goto block_130; -} -} -} -} -} -} -else -{ -uint8 x_557; -x_557 = !lean::is_exclusive(x_296); -if (x_557 == 0) -{ -obj* x_558; obj* x_559; -x_558 = lean::cnstr_get(x_296, 1); -x_559 = lean::cnstr_get(x_296, 0); -lean::dec(x_559); -if (lean::obj_tag(x_558) == 0) -{ -obj* x_560; obj* x_561; -lean::dec(x_384); -x_560 = lean::cnstr_get(x_295, 0); -lean::inc(x_560); -lean::dec(x_295); -lean::inc(x_1); -x_561 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(x_1, x_293, x_2, x_3, x_4); -if (lean::obj_tag(x_561) == 0) -{ -uint8 x_562; -lean::dec(x_560); -lean::free_heap_obj(x_296); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_562 = !lean::is_exclusive(x_561); -if (x_562 == 0) -{ -return x_561; -} -else -{ -obj* x_563; obj* x_564; -x_563 = lean::cnstr_get(x_561, 0); -lean::inc(x_563); -lean::dec(x_561); -x_564 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_564, 0, x_563); -return x_564; -} -} -else -{ -obj* x_565; obj* x_566; obj* x_567; obj* x_568; obj* x_618; -x_565 = lean::cnstr_get(x_561, 0); -lean::inc(x_565); -lean::dec(x_561); -x_566 = lean::cnstr_get(x_565, 0); -lean::inc(x_566); -x_567 = lean::cnstr_get(x_565, 1); -lean::inc(x_567); -lean::dec(x_565); -lean::inc(x_1); -x_618 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_560, x_2, x_3, x_567); -if (lean::obj_tag(x_618) == 0) -{ -uint8 x_619; -lean::dec(x_566); -lean::free_heap_obj(x_296); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_619 = !lean::is_exclusive(x_618); -if (x_619 == 0) -{ -return x_618; -} -else -{ -obj* x_620; obj* x_621; -x_620 = lean::cnstr_get(x_618, 0); -lean::inc(x_620); -lean::dec(x_618); -x_621 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_621, 0, x_620); -return x_621; -} -} -else -{ -obj* x_622; obj* x_623; -x_622 = lean::cnstr_get(x_618, 0); -lean::inc(x_622); -lean::dec(x_618); -x_623 = lean::cnstr_get(x_289, 2); -lean::inc(x_623); -if (lean::obj_tag(x_623) == 0) -{ -uint8 x_624; -lean::free_heap_obj(x_296); -x_624 = !lean::is_exclusive(x_622); -if (x_624 == 0) -{ -x_568 = x_622; -goto block_617; -} -else -{ -obj* x_625; obj* x_626; obj* x_627; -x_625 = lean::cnstr_get(x_622, 0); -x_626 = lean::cnstr_get(x_622, 1); -lean::inc(x_626); -lean::inc(x_625); -lean::dec(x_622); -x_627 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_627, 0, x_625); -lean::cnstr_set(x_627, 1, x_626); -x_568 = x_627; -goto block_617; -} -} -else -{ -obj* x_628; obj* x_629; obj* x_630; obj* x_631; obj* x_632; -x_628 = lean::cnstr_get(x_622, 0); -lean::inc(x_628); -x_629 = lean::cnstr_get(x_622, 1); -lean::inc(x_629); -lean::dec(x_622); -x_630 = lean::cnstr_get(x_623, 0); -lean::inc(x_630); -lean::dec(x_623); -x_631 = lean::cnstr_get(x_630, 0); -lean::inc(x_631); -lean::dec(x_630); -x_632 = l_Lean_Elaborator_toPexpr___main(x_631, x_2, x_3, x_629); -if (lean::obj_tag(x_632) == 0) -{ -uint8 x_633; -lean::dec(x_628); -lean::dec(x_566); -lean::free_heap_obj(x_296); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_633 = !lean::is_exclusive(x_632); -if (x_633 == 0) -{ -return x_632; -} -else -{ -obj* x_634; obj* x_635; -x_634 = lean::cnstr_get(x_632, 0); -lean::inc(x_634); -lean::dec(x_632); -x_635 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_635, 0, x_634); -return x_635; -} -} -else -{ -obj* x_636; uint8 x_637; -x_636 = lean::cnstr_get(x_632, 0); -lean::inc(x_636); -lean::dec(x_632); -x_637 = !lean::is_exclusive(x_636); -if (x_637 == 0) -{ -obj* x_638; obj* x_639; -x_638 = lean::cnstr_get(x_636, 0); -lean::cnstr_set(x_296, 1, x_291); -lean::cnstr_set(x_296, 0, x_638); -x_639 = l_List_append___rarg(x_628, x_296); -lean::cnstr_set(x_636, 0, x_639); -x_568 = x_636; -goto block_617; -} -else -{ -obj* x_640; obj* x_641; obj* x_642; obj* x_643; -x_640 = lean::cnstr_get(x_636, 0); -x_641 = lean::cnstr_get(x_636, 1); -lean::inc(x_641); -lean::inc(x_640); -lean::dec(x_636); -lean::cnstr_set(x_296, 1, x_291); -lean::cnstr_set(x_296, 0, x_640); -x_642 = l_List_append___rarg(x_628, x_296); -x_643 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_643, 0, x_642); -lean::cnstr_set(x_643, 1, x_641); -x_568 = x_643; -goto block_617; -} -} -} -} -block_617: -{ -uint8 x_569; -x_569 = !lean::is_exclusive(x_568); -if (x_569 == 0) -{ -obj* x_570; obj* x_571; obj* x_572; obj* x_573; obj* x_574; obj* x_575; uint8 x_576; obj* x_577; obj* x_578; obj* x_579; obj* x_580; obj* x_581; -x_570 = lean::cnstr_get(x_568, 0); -x_571 = lean::mk_nat_obj(0u); -x_572 = l_List_lengthAux___main___rarg(x_566, x_571); -x_573 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_574 = l_Lean_KVMap_setNat(x_291, x_573, x_572); -x_575 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_576 = 1; -x_577 = l_Lean_KVMap_setBool(x_574, x_575, x_576); -x_578 = lean::cnstr_get(x_289, 1); -lean::inc(x_578); -lean::dec(x_289); -x_579 = l_List_append___rarg(x_566, x_570); -x_580 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_581 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_580, x_579); -if (lean::obj_tag(x_578) == 0) -{ -obj* x_582; obj* x_583; obj* x_584; obj* x_585; -x_582 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_583 = lean::box(0); -x_584 = l_Lean_KVMap_setName(x_577, x_582, x_583); -x_585 = lean_expr_mk_mdata(x_584, x_581); -lean::cnstr_set(x_568, 0, x_585); -x_86 = x_568; -goto block_130; -} -else -{ -obj* x_586; obj* x_587; obj* x_588; obj* x_589; obj* x_590; obj* x_591; -x_586 = lean::cnstr_get(x_578, 0); -lean::inc(x_586); -lean::dec(x_578); -x_587 = lean::cnstr_get(x_586, 0); -lean::inc(x_587); -lean::dec(x_586); -x_588 = l_Lean_Elaborator_mangleIdent(x_587); -x_589 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_590 = l_Lean_KVMap_setName(x_577, x_589, x_588); -x_591 = lean_expr_mk_mdata(x_590, x_581); -lean::cnstr_set(x_568, 0, x_591); -x_86 = x_568; -goto block_130; -} -} -else -{ -obj* x_592; obj* x_593; obj* x_594; obj* x_595; obj* x_596; obj* x_597; obj* x_598; uint8 x_599; obj* x_600; obj* x_601; obj* x_602; obj* x_603; obj* x_604; -x_592 = lean::cnstr_get(x_568, 0); -x_593 = lean::cnstr_get(x_568, 1); -lean::inc(x_593); -lean::inc(x_592); -lean::dec(x_568); -x_594 = lean::mk_nat_obj(0u); -x_595 = l_List_lengthAux___main___rarg(x_566, x_594); -x_596 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_597 = l_Lean_KVMap_setNat(x_291, x_596, x_595); -x_598 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_599 = 1; -x_600 = l_Lean_KVMap_setBool(x_597, x_598, x_599); -x_601 = lean::cnstr_get(x_289, 1); -lean::inc(x_601); -lean::dec(x_289); -x_602 = l_List_append___rarg(x_566, x_592); -x_603 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_604 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_603, x_602); -if (lean::obj_tag(x_601) == 0) -{ -obj* x_605; obj* x_606; obj* x_607; obj* x_608; obj* x_609; -x_605 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_606 = lean::box(0); -x_607 = l_Lean_KVMap_setName(x_600, x_605, x_606); -x_608 = lean_expr_mk_mdata(x_607, x_604); -x_609 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_609, 0, x_608); -lean::cnstr_set(x_609, 1, x_593); -x_86 = x_609; -goto block_130; -} -else -{ -obj* x_610; obj* x_611; obj* x_612; obj* x_613; obj* x_614; obj* x_615; obj* x_616; -x_610 = lean::cnstr_get(x_601, 0); -lean::inc(x_610); -lean::dec(x_601); -x_611 = lean::cnstr_get(x_610, 0); -lean::inc(x_611); -lean::dec(x_610); -x_612 = l_Lean_Elaborator_mangleIdent(x_611); -x_613 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_614 = l_Lean_KVMap_setName(x_600, x_613, x_612); -x_615 = lean_expr_mk_mdata(x_614, x_604); -x_616 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_616, 0, x_615); -lean::cnstr_set(x_616, 1, x_593); -x_86 = x_616; -goto block_130; -} -} -} -} -} -else -{ -uint8 x_644; -lean::free_heap_obj(x_296); -x_644 = !lean::is_exclusive(x_558); -if (x_644 == 0) -{ -obj* x_645; obj* x_646; obj* x_647; obj* x_648; obj* x_649; obj* x_650; obj* x_651; obj* x_652; obj* x_653; -x_645 = lean::cnstr_get(x_558, 1); -lean::dec(x_645); -x_646 = lean::cnstr_get(x_558, 0); -lean::dec(x_646); -x_647 = lean::cnstr_get(x_295, 0); -lean::inc(x_647); -lean::dec(x_295); -x_648 = l_Lean_Parser_Term_structInstItem_HasView; -x_649 = lean::cnstr_get(x_648, 1); -lean::inc(x_649); -x_650 = lean::apply_1(x_649, x_384); -x_651 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_651, 0, x_650); -x_652 = l_Lean_Elaborator_toPexpr___main___closed__27; -x_653 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_651, x_652, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_651); -if (lean::obj_tag(x_653) == 0) -{ -uint8 x_654; -lean::dec(x_647); -lean::free_heap_obj(x_558); -lean::dec(x_293); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_654 = !lean::is_exclusive(x_653); -if (x_654 == 0) -{ -return x_653; -} -else -{ -obj* x_655; obj* x_656; -x_655 = lean::cnstr_get(x_653, 0); -lean::inc(x_655); -lean::dec(x_653); -x_656 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_656, 0, x_655); -return x_656; -} -} -else -{ -obj* x_657; obj* x_658; obj* x_659; obj* x_660; -x_657 = lean::cnstr_get(x_653, 0); -lean::inc(x_657); -lean::dec(x_653); -x_658 = lean::cnstr_get(x_657, 0); -lean::inc(x_658); -x_659 = lean::cnstr_get(x_657, 1); -lean::inc(x_659); -lean::dec(x_657); -lean::inc(x_1); -x_660 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(x_1, x_293, x_2, x_3, x_659); -if (lean::obj_tag(x_660) == 0) -{ -uint8 x_661; -lean::dec(x_658); -lean::dec(x_647); -lean::free_heap_obj(x_558); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_661 = !lean::is_exclusive(x_660); -if (x_661 == 0) -{ -return x_660; -} -else -{ -obj* x_662; obj* x_663; -x_662 = lean::cnstr_get(x_660, 0); -lean::inc(x_662); -lean::dec(x_660); -x_663 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_663, 0, x_662); -return x_663; -} -} -else -{ -obj* x_664; obj* x_665; obj* x_666; obj* x_667; obj* x_717; -x_664 = lean::cnstr_get(x_660, 0); -lean::inc(x_664); -lean::dec(x_660); -x_665 = lean::cnstr_get(x_664, 0); -lean::inc(x_665); -x_666 = lean::cnstr_get(x_664, 1); -lean::inc(x_666); -lean::dec(x_664); -lean::inc(x_1); -x_717 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_647, x_2, x_3, x_666); -if (lean::obj_tag(x_717) == 0) -{ -uint8 x_718; -lean::dec(x_665); -lean::dec(x_658); -lean::free_heap_obj(x_558); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_718 = !lean::is_exclusive(x_717); -if (x_718 == 0) -{ -return x_717; -} -else -{ -obj* x_719; obj* x_720; -x_719 = lean::cnstr_get(x_717, 0); -lean::inc(x_719); -lean::dec(x_717); -x_720 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_720, 0, x_719); -return x_720; -} -} -else -{ -obj* x_721; obj* x_722; -x_721 = lean::cnstr_get(x_717, 0); -lean::inc(x_721); -lean::dec(x_717); -x_722 = lean::cnstr_get(x_289, 2); -lean::inc(x_722); -if (lean::obj_tag(x_722) == 0) -{ -uint8 x_723; -lean::free_heap_obj(x_558); -x_723 = !lean::is_exclusive(x_721); -if (x_723 == 0) -{ -x_667 = x_721; -goto block_716; -} -else -{ -obj* x_724; obj* x_725; obj* x_726; -x_724 = lean::cnstr_get(x_721, 0); -x_725 = lean::cnstr_get(x_721, 1); -lean::inc(x_725); -lean::inc(x_724); -lean::dec(x_721); -x_726 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_726, 0, x_724); -lean::cnstr_set(x_726, 1, x_725); -x_667 = x_726; -goto block_716; -} -} -else -{ -obj* x_727; obj* x_728; obj* x_729; obj* x_730; obj* x_731; -x_727 = lean::cnstr_get(x_721, 0); -lean::inc(x_727); -x_728 = lean::cnstr_get(x_721, 1); -lean::inc(x_728); -lean::dec(x_721); -x_729 = lean::cnstr_get(x_722, 0); -lean::inc(x_729); -lean::dec(x_722); -x_730 = lean::cnstr_get(x_729, 0); -lean::inc(x_730); -lean::dec(x_729); -x_731 = l_Lean_Elaborator_toPexpr___main(x_730, x_2, x_3, x_728); -if (lean::obj_tag(x_731) == 0) -{ -uint8 x_732; -lean::dec(x_727); -lean::dec(x_665); -lean::dec(x_658); -lean::free_heap_obj(x_558); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_732 = !lean::is_exclusive(x_731); -if (x_732 == 0) -{ -return x_731; -} -else -{ -obj* x_733; obj* x_734; -x_733 = lean::cnstr_get(x_731, 0); -lean::inc(x_733); -lean::dec(x_731); -x_734 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_734, 0, x_733); -return x_734; -} -} -else -{ -obj* x_735; uint8 x_736; -x_735 = lean::cnstr_get(x_731, 0); -lean::inc(x_735); -lean::dec(x_731); -x_736 = !lean::is_exclusive(x_735); -if (x_736 == 0) -{ -obj* x_737; obj* x_738; -x_737 = lean::cnstr_get(x_735, 0); -lean::cnstr_set(x_558, 1, x_291); -lean::cnstr_set(x_558, 0, x_737); -x_738 = l_List_append___rarg(x_727, x_558); -lean::cnstr_set(x_735, 0, x_738); -x_667 = x_735; -goto block_716; -} -else -{ -obj* x_739; obj* x_740; obj* x_741; obj* x_742; -x_739 = lean::cnstr_get(x_735, 0); -x_740 = lean::cnstr_get(x_735, 1); -lean::inc(x_740); -lean::inc(x_739); -lean::dec(x_735); -lean::cnstr_set(x_558, 1, x_291); -lean::cnstr_set(x_558, 0, x_739); -x_741 = l_List_append___rarg(x_727, x_558); -x_742 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_742, 0, x_741); -lean::cnstr_set(x_742, 1, x_740); -x_667 = x_742; -goto block_716; -} -} -} -} -block_716: -{ -uint8 x_668; -x_668 = !lean::is_exclusive(x_667); -if (x_668 == 0) -{ -obj* x_669; obj* x_670; obj* x_671; obj* x_672; obj* x_673; obj* x_674; uint8 x_675; obj* x_676; obj* x_677; obj* x_678; obj* x_679; obj* x_680; -x_669 = lean::cnstr_get(x_667, 0); -x_670 = lean::mk_nat_obj(0u); -x_671 = l_List_lengthAux___main___rarg(x_665, x_670); -x_672 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_673 = l_Lean_KVMap_setNat(x_291, x_672, x_671); -x_674 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_675 = lean::unbox(x_658); -lean::dec(x_658); -x_676 = l_Lean_KVMap_setBool(x_673, x_674, x_675); -x_677 = lean::cnstr_get(x_289, 1); -lean::inc(x_677); -lean::dec(x_289); -x_678 = l_List_append___rarg(x_665, x_669); -x_679 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_680 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_679, x_678); -if (lean::obj_tag(x_677) == 0) -{ -obj* x_681; obj* x_682; obj* x_683; obj* x_684; -x_681 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_682 = lean::box(0); -x_683 = l_Lean_KVMap_setName(x_676, x_681, x_682); -x_684 = lean_expr_mk_mdata(x_683, x_680); -lean::cnstr_set(x_667, 0, x_684); -x_86 = x_667; -goto block_130; -} -else -{ -obj* x_685; obj* x_686; obj* x_687; obj* x_688; obj* x_689; obj* x_690; -x_685 = lean::cnstr_get(x_677, 0); -lean::inc(x_685); -lean::dec(x_677); -x_686 = lean::cnstr_get(x_685, 0); -lean::inc(x_686); -lean::dec(x_685); -x_687 = l_Lean_Elaborator_mangleIdent(x_686); -x_688 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_689 = l_Lean_KVMap_setName(x_676, x_688, x_687); -x_690 = lean_expr_mk_mdata(x_689, x_680); -lean::cnstr_set(x_667, 0, x_690); -x_86 = x_667; -goto block_130; -} -} -else -{ -obj* x_691; obj* x_692; obj* x_693; obj* x_694; obj* x_695; obj* x_696; obj* x_697; uint8 x_698; obj* x_699; obj* x_700; obj* x_701; obj* x_702; obj* x_703; -x_691 = lean::cnstr_get(x_667, 0); -x_692 = lean::cnstr_get(x_667, 1); -lean::inc(x_692); -lean::inc(x_691); -lean::dec(x_667); -x_693 = lean::mk_nat_obj(0u); -x_694 = l_List_lengthAux___main___rarg(x_665, x_693); -x_695 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_696 = l_Lean_KVMap_setNat(x_291, x_695, x_694); -x_697 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_698 = lean::unbox(x_658); -lean::dec(x_658); -x_699 = l_Lean_KVMap_setBool(x_696, x_697, x_698); -x_700 = lean::cnstr_get(x_289, 1); -lean::inc(x_700); -lean::dec(x_289); -x_701 = l_List_append___rarg(x_665, x_691); -x_702 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_703 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_702, x_701); -if (lean::obj_tag(x_700) == 0) -{ -obj* x_704; obj* x_705; obj* x_706; obj* x_707; obj* x_708; -x_704 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_705 = lean::box(0); -x_706 = l_Lean_KVMap_setName(x_699, x_704, x_705); -x_707 = lean_expr_mk_mdata(x_706, x_703); -x_708 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_708, 0, x_707); -lean::cnstr_set(x_708, 1, x_692); -x_86 = x_708; -goto block_130; -} -else -{ -obj* x_709; obj* x_710; obj* x_711; obj* x_712; obj* x_713; obj* x_714; obj* x_715; -x_709 = lean::cnstr_get(x_700, 0); -lean::inc(x_709); -lean::dec(x_700); -x_710 = lean::cnstr_get(x_709, 0); -lean::inc(x_710); -lean::dec(x_709); -x_711 = l_Lean_Elaborator_mangleIdent(x_710); -x_712 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_713 = l_Lean_KVMap_setName(x_699, x_712, x_711); -x_714 = lean_expr_mk_mdata(x_713, x_703); -x_715 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_715, 0, x_714); -lean::cnstr_set(x_715, 1, x_692); -x_86 = x_715; -goto block_130; -} -} -} -} -} -} -else -{ -obj* x_743; obj* x_744; obj* x_745; obj* x_746; obj* x_747; obj* x_748; obj* x_749; -lean::dec(x_558); -x_743 = lean::cnstr_get(x_295, 0); -lean::inc(x_743); -lean::dec(x_295); -x_744 = l_Lean_Parser_Term_structInstItem_HasView; -x_745 = lean::cnstr_get(x_744, 1); -lean::inc(x_745); -x_746 = lean::apply_1(x_745, x_384); -x_747 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_747, 0, x_746); -x_748 = l_Lean_Elaborator_toPexpr___main___closed__27; -x_749 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_747, x_748, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_747); -if (lean::obj_tag(x_749) == 0) -{ -obj* x_750; obj* x_751; obj* x_752; -lean::dec(x_743); -lean::dec(x_293); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_750 = lean::cnstr_get(x_749, 0); -lean::inc(x_750); -if (lean::is_exclusive(x_749)) { - lean::cnstr_release(x_749, 0); - x_751 = x_749; -} else { - lean::dec_ref(x_749); - x_751 = lean::box(0); -} -if (lean::is_scalar(x_751)) { - x_752 = lean::alloc_cnstr(0, 1, 0); -} else { - x_752 = x_751; -} -lean::cnstr_set(x_752, 0, x_750); -return x_752; -} -else -{ -obj* x_753; obj* x_754; obj* x_755; obj* x_756; -x_753 = lean::cnstr_get(x_749, 0); -lean::inc(x_753); -lean::dec(x_749); -x_754 = lean::cnstr_get(x_753, 0); -lean::inc(x_754); -x_755 = lean::cnstr_get(x_753, 1); -lean::inc(x_755); -lean::dec(x_753); -lean::inc(x_1); -x_756 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(x_1, x_293, x_2, x_3, x_755); -if (lean::obj_tag(x_756) == 0) -{ -obj* x_757; obj* x_758; obj* x_759; -lean::dec(x_754); -lean::dec(x_743); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_757 = lean::cnstr_get(x_756, 0); -lean::inc(x_757); -if (lean::is_exclusive(x_756)) { - lean::cnstr_release(x_756, 0); - x_758 = x_756; -} else { - lean::dec_ref(x_756); - x_758 = lean::box(0); -} -if (lean::is_scalar(x_758)) { - x_759 = lean::alloc_cnstr(0, 1, 0); -} else { - x_759 = x_758; -} -lean::cnstr_set(x_759, 0, x_757); -return x_759; -} -else -{ -obj* x_760; obj* x_761; obj* x_762; obj* x_763; obj* x_791; -x_760 = lean::cnstr_get(x_756, 0); -lean::inc(x_760); -lean::dec(x_756); -x_761 = lean::cnstr_get(x_760, 0); -lean::inc(x_761); -x_762 = lean::cnstr_get(x_760, 1); -lean::inc(x_762); -lean::dec(x_760); -lean::inc(x_1); -x_791 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_743, x_2, x_3, x_762); -if (lean::obj_tag(x_791) == 0) -{ -obj* x_792; obj* x_793; obj* x_794; -lean::dec(x_761); -lean::dec(x_754); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_792 = lean::cnstr_get(x_791, 0); -lean::inc(x_792); -if (lean::is_exclusive(x_791)) { - lean::cnstr_release(x_791, 0); - x_793 = x_791; -} else { - lean::dec_ref(x_791); - x_793 = lean::box(0); -} -if (lean::is_scalar(x_793)) { - x_794 = lean::alloc_cnstr(0, 1, 0); -} else { - x_794 = x_793; -} -lean::cnstr_set(x_794, 0, x_792); -return x_794; -} -else -{ -obj* x_795; obj* x_796; -x_795 = lean::cnstr_get(x_791, 0); -lean::inc(x_795); -lean::dec(x_791); -x_796 = lean::cnstr_get(x_289, 2); -lean::inc(x_796); -if (lean::obj_tag(x_796) == 0) -{ -obj* x_797; obj* x_798; obj* x_799; obj* x_800; -x_797 = lean::cnstr_get(x_795, 0); -lean::inc(x_797); -x_798 = lean::cnstr_get(x_795, 1); -lean::inc(x_798); -if (lean::is_exclusive(x_795)) { - lean::cnstr_release(x_795, 0); - lean::cnstr_release(x_795, 1); - x_799 = x_795; -} else { - lean::dec_ref(x_795); - x_799 = lean::box(0); -} -if (lean::is_scalar(x_799)) { - x_800 = lean::alloc_cnstr(0, 2, 0); -} else { - x_800 = x_799; -} -lean::cnstr_set(x_800, 0, x_797); -lean::cnstr_set(x_800, 1, x_798); -x_763 = x_800; -goto block_790; -} -else -{ -obj* x_801; obj* x_802; obj* x_803; obj* x_804; obj* x_805; -x_801 = lean::cnstr_get(x_795, 0); -lean::inc(x_801); -x_802 = lean::cnstr_get(x_795, 1); -lean::inc(x_802); -lean::dec(x_795); -x_803 = lean::cnstr_get(x_796, 0); -lean::inc(x_803); -lean::dec(x_796); -x_804 = lean::cnstr_get(x_803, 0); -lean::inc(x_804); -lean::dec(x_803); -x_805 = l_Lean_Elaborator_toPexpr___main(x_804, x_2, x_3, x_802); -if (lean::obj_tag(x_805) == 0) -{ -obj* x_806; obj* x_807; obj* x_808; -lean::dec(x_801); -lean::dec(x_761); -lean::dec(x_754); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_806 = lean::cnstr_get(x_805, 0); -lean::inc(x_806); -if (lean::is_exclusive(x_805)) { - lean::cnstr_release(x_805, 0); - x_807 = x_805; -} else { - lean::dec_ref(x_805); - x_807 = lean::box(0); -} -if (lean::is_scalar(x_807)) { - x_808 = lean::alloc_cnstr(0, 1, 0); -} else { - x_808 = x_807; -} -lean::cnstr_set(x_808, 0, x_806); -return x_808; -} -else -{ -obj* x_809; obj* x_810; obj* x_811; obj* x_812; obj* x_813; obj* x_814; obj* x_815; -x_809 = lean::cnstr_get(x_805, 0); -lean::inc(x_809); -lean::dec(x_805); -x_810 = lean::cnstr_get(x_809, 0); -lean::inc(x_810); -x_811 = lean::cnstr_get(x_809, 1); -lean::inc(x_811); -if (lean::is_exclusive(x_809)) { - lean::cnstr_release(x_809, 0); - lean::cnstr_release(x_809, 1); - x_812 = x_809; -} else { - lean::dec_ref(x_809); - x_812 = lean::box(0); -} -x_813 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_813, 0, x_810); -lean::cnstr_set(x_813, 1, x_291); -x_814 = l_List_append___rarg(x_801, x_813); -if (lean::is_scalar(x_812)) { - x_815 = lean::alloc_cnstr(0, 2, 0); -} else { - x_815 = x_812; -} -lean::cnstr_set(x_815, 0, x_814); -lean::cnstr_set(x_815, 1, x_811); -x_763 = x_815; -goto block_790; -} -} -} -block_790: -{ -obj* x_764; obj* x_765; obj* x_766; obj* x_767; obj* x_768; obj* x_769; obj* x_770; obj* x_771; uint8 x_772; obj* x_773; obj* x_774; obj* x_775; obj* x_776; obj* x_777; -x_764 = lean::cnstr_get(x_763, 0); -lean::inc(x_764); -x_765 = lean::cnstr_get(x_763, 1); -lean::inc(x_765); -if (lean::is_exclusive(x_763)) { - lean::cnstr_release(x_763, 0); - lean::cnstr_release(x_763, 1); - x_766 = x_763; -} else { - lean::dec_ref(x_763); - x_766 = lean::box(0); -} -x_767 = lean::mk_nat_obj(0u); -x_768 = l_List_lengthAux___main___rarg(x_761, x_767); -x_769 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_770 = l_Lean_KVMap_setNat(x_291, x_769, x_768); -x_771 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_772 = lean::unbox(x_754); -lean::dec(x_754); -x_773 = l_Lean_KVMap_setBool(x_770, x_771, x_772); -x_774 = lean::cnstr_get(x_289, 1); -lean::inc(x_774); -lean::dec(x_289); -x_775 = l_List_append___rarg(x_761, x_764); -x_776 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_777 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_776, x_775); -if (lean::obj_tag(x_774) == 0) -{ -obj* x_778; obj* x_779; obj* x_780; obj* x_781; obj* x_782; -x_778 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_779 = lean::box(0); -x_780 = l_Lean_KVMap_setName(x_773, x_778, x_779); -x_781 = lean_expr_mk_mdata(x_780, x_777); -if (lean::is_scalar(x_766)) { - x_782 = lean::alloc_cnstr(0, 2, 0); -} else { - x_782 = x_766; -} -lean::cnstr_set(x_782, 0, x_781); -lean::cnstr_set(x_782, 1, x_765); -x_86 = x_782; -goto block_130; -} -else -{ -obj* x_783; obj* x_784; obj* x_785; obj* x_786; obj* x_787; obj* x_788; obj* x_789; -x_783 = lean::cnstr_get(x_774, 0); -lean::inc(x_783); -lean::dec(x_774); -x_784 = lean::cnstr_get(x_783, 0); -lean::inc(x_784); -lean::dec(x_783); -x_785 = l_Lean_Elaborator_mangleIdent(x_784); -x_786 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_787 = l_Lean_KVMap_setName(x_773, x_786, x_785); -x_788 = lean_expr_mk_mdata(x_787, x_777); -if (lean::is_scalar(x_766)) { - x_789 = lean::alloc_cnstr(0, 2, 0); -} else { - x_789 = x_766; -} -lean::cnstr_set(x_789, 0, x_788); -lean::cnstr_set(x_789, 1, x_765); -x_86 = x_789; -goto block_130; -} -} -} -} -} -} -} -else -{ -obj* x_816; -x_816 = lean::cnstr_get(x_296, 1); -lean::inc(x_816); -lean::dec(x_296); -if (lean::obj_tag(x_816) == 0) -{ -obj* x_817; obj* x_818; -lean::dec(x_384); -x_817 = lean::cnstr_get(x_295, 0); -lean::inc(x_817); -lean::dec(x_295); -lean::inc(x_1); -x_818 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(x_1, x_293, x_2, x_3, x_4); -if (lean::obj_tag(x_818) == 0) -{ -obj* x_819; obj* x_820; obj* x_821; -lean::dec(x_817); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_819 = lean::cnstr_get(x_818, 0); -lean::inc(x_819); -if (lean::is_exclusive(x_818)) { - lean::cnstr_release(x_818, 0); - x_820 = x_818; -} else { - lean::dec_ref(x_818); - x_820 = lean::box(0); -} -if (lean::is_scalar(x_820)) { - x_821 = lean::alloc_cnstr(0, 1, 0); -} else { - x_821 = x_820; -} -lean::cnstr_set(x_821, 0, x_819); -return x_821; -} -else -{ -obj* x_822; obj* x_823; obj* x_824; obj* x_825; obj* x_853; -x_822 = lean::cnstr_get(x_818, 0); -lean::inc(x_822); -lean::dec(x_818); -x_823 = lean::cnstr_get(x_822, 0); -lean::inc(x_823); -x_824 = lean::cnstr_get(x_822, 1); -lean::inc(x_824); -lean::dec(x_822); -lean::inc(x_1); -x_853 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_817, x_2, x_3, x_824); -if (lean::obj_tag(x_853) == 0) -{ -obj* x_854; obj* x_855; obj* x_856; -lean::dec(x_823); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_854 = lean::cnstr_get(x_853, 0); -lean::inc(x_854); -if (lean::is_exclusive(x_853)) { - lean::cnstr_release(x_853, 0); - x_855 = x_853; -} else { - lean::dec_ref(x_853); - x_855 = lean::box(0); -} -if (lean::is_scalar(x_855)) { - x_856 = lean::alloc_cnstr(0, 1, 0); -} else { - x_856 = x_855; -} -lean::cnstr_set(x_856, 0, x_854); -return x_856; -} -else -{ -obj* x_857; obj* x_858; -x_857 = lean::cnstr_get(x_853, 0); -lean::inc(x_857); -lean::dec(x_853); -x_858 = lean::cnstr_get(x_289, 2); -lean::inc(x_858); -if (lean::obj_tag(x_858) == 0) -{ -obj* x_859; obj* x_860; obj* x_861; obj* x_862; -x_859 = lean::cnstr_get(x_857, 0); -lean::inc(x_859); -x_860 = lean::cnstr_get(x_857, 1); -lean::inc(x_860); -if (lean::is_exclusive(x_857)) { - lean::cnstr_release(x_857, 0); - lean::cnstr_release(x_857, 1); - x_861 = x_857; -} else { - lean::dec_ref(x_857); - x_861 = lean::box(0); -} -if (lean::is_scalar(x_861)) { - x_862 = lean::alloc_cnstr(0, 2, 0); -} else { - x_862 = x_861; -} -lean::cnstr_set(x_862, 0, x_859); -lean::cnstr_set(x_862, 1, x_860); -x_825 = x_862; -goto block_852; -} -else -{ -obj* x_863; obj* x_864; obj* x_865; obj* x_866; obj* x_867; -x_863 = lean::cnstr_get(x_857, 0); -lean::inc(x_863); -x_864 = lean::cnstr_get(x_857, 1); -lean::inc(x_864); -lean::dec(x_857); -x_865 = lean::cnstr_get(x_858, 0); -lean::inc(x_865); -lean::dec(x_858); -x_866 = lean::cnstr_get(x_865, 0); -lean::inc(x_866); -lean::dec(x_865); -x_867 = l_Lean_Elaborator_toPexpr___main(x_866, x_2, x_3, x_864); -if (lean::obj_tag(x_867) == 0) -{ -obj* x_868; obj* x_869; obj* x_870; -lean::dec(x_863); -lean::dec(x_823); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_868 = lean::cnstr_get(x_867, 0); -lean::inc(x_868); -if (lean::is_exclusive(x_867)) { - lean::cnstr_release(x_867, 0); - x_869 = x_867; -} else { - lean::dec_ref(x_867); - x_869 = lean::box(0); -} -if (lean::is_scalar(x_869)) { - x_870 = lean::alloc_cnstr(0, 1, 0); -} else { - x_870 = x_869; -} -lean::cnstr_set(x_870, 0, x_868); -return x_870; -} -else -{ -obj* x_871; obj* x_872; obj* x_873; obj* x_874; obj* x_875; obj* x_876; obj* x_877; -x_871 = lean::cnstr_get(x_867, 0); -lean::inc(x_871); -lean::dec(x_867); -x_872 = lean::cnstr_get(x_871, 0); -lean::inc(x_872); -x_873 = lean::cnstr_get(x_871, 1); -lean::inc(x_873); -if (lean::is_exclusive(x_871)) { - lean::cnstr_release(x_871, 0); - lean::cnstr_release(x_871, 1); - x_874 = x_871; -} else { - lean::dec_ref(x_871); - x_874 = lean::box(0); -} -x_875 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_875, 0, x_872); -lean::cnstr_set(x_875, 1, x_291); -x_876 = l_List_append___rarg(x_863, x_875); -if (lean::is_scalar(x_874)) { - x_877 = lean::alloc_cnstr(0, 2, 0); -} else { - x_877 = x_874; -} -lean::cnstr_set(x_877, 0, x_876); -lean::cnstr_set(x_877, 1, x_873); -x_825 = x_877; -goto block_852; -} -} -} -block_852: -{ -obj* x_826; obj* x_827; obj* x_828; obj* x_829; obj* x_830; obj* x_831; obj* x_832; obj* x_833; uint8 x_834; obj* x_835; obj* x_836; obj* x_837; obj* x_838; obj* x_839; -x_826 = lean::cnstr_get(x_825, 0); -lean::inc(x_826); -x_827 = lean::cnstr_get(x_825, 1); -lean::inc(x_827); -if (lean::is_exclusive(x_825)) { - lean::cnstr_release(x_825, 0); - lean::cnstr_release(x_825, 1); - x_828 = x_825; -} else { - lean::dec_ref(x_825); - x_828 = lean::box(0); -} -x_829 = lean::mk_nat_obj(0u); -x_830 = l_List_lengthAux___main___rarg(x_823, x_829); -x_831 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_832 = l_Lean_KVMap_setNat(x_291, x_831, x_830); -x_833 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_834 = 1; -x_835 = l_Lean_KVMap_setBool(x_832, x_833, x_834); -x_836 = lean::cnstr_get(x_289, 1); -lean::inc(x_836); -lean::dec(x_289); -x_837 = l_List_append___rarg(x_823, x_826); -x_838 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_839 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_838, x_837); -if (lean::obj_tag(x_836) == 0) -{ -obj* x_840; obj* x_841; obj* x_842; obj* x_843; obj* x_844; -x_840 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_841 = lean::box(0); -x_842 = l_Lean_KVMap_setName(x_835, x_840, x_841); -x_843 = lean_expr_mk_mdata(x_842, x_839); -if (lean::is_scalar(x_828)) { - x_844 = lean::alloc_cnstr(0, 2, 0); -} else { - x_844 = x_828; -} -lean::cnstr_set(x_844, 0, x_843); -lean::cnstr_set(x_844, 1, x_827); -x_86 = x_844; -goto block_130; -} -else -{ -obj* x_845; obj* x_846; obj* x_847; obj* x_848; obj* x_849; obj* x_850; obj* x_851; -x_845 = lean::cnstr_get(x_836, 0); -lean::inc(x_845); -lean::dec(x_836); -x_846 = lean::cnstr_get(x_845, 0); -lean::inc(x_846); -lean::dec(x_845); -x_847 = l_Lean_Elaborator_mangleIdent(x_846); -x_848 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_849 = l_Lean_KVMap_setName(x_835, x_848, x_847); -x_850 = lean_expr_mk_mdata(x_849, x_839); -if (lean::is_scalar(x_828)) { - x_851 = lean::alloc_cnstr(0, 2, 0); -} else { - x_851 = x_828; -} -lean::cnstr_set(x_851, 0, x_850); -lean::cnstr_set(x_851, 1, x_827); -x_86 = x_851; -goto block_130; -} -} -} -} -else -{ -obj* x_878; obj* x_879; obj* x_880; obj* x_881; obj* x_882; obj* x_883; obj* x_884; obj* x_885; -if (lean::is_exclusive(x_816)) { - lean::cnstr_release(x_816, 0); - lean::cnstr_release(x_816, 1); - x_878 = x_816; -} else { - lean::dec_ref(x_816); - x_878 = lean::box(0); -} -x_879 = lean::cnstr_get(x_295, 0); -lean::inc(x_879); -lean::dec(x_295); -x_880 = l_Lean_Parser_Term_structInstItem_HasView; -x_881 = lean::cnstr_get(x_880, 1); -lean::inc(x_881); -x_882 = lean::apply_1(x_881, x_384); -x_883 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_883, 0, x_882); -x_884 = l_Lean_Elaborator_toPexpr___main___closed__27; -x_885 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_883, x_884, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_883); -if (lean::obj_tag(x_885) == 0) -{ -obj* x_886; obj* x_887; obj* x_888; -lean::dec(x_879); -lean::dec(x_878); -lean::dec(x_293); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_886 = lean::cnstr_get(x_885, 0); -lean::inc(x_886); -if (lean::is_exclusive(x_885)) { - lean::cnstr_release(x_885, 0); - x_887 = x_885; -} else { - lean::dec_ref(x_885); - x_887 = lean::box(0); -} -if (lean::is_scalar(x_887)) { - x_888 = lean::alloc_cnstr(0, 1, 0); -} else { - x_888 = x_887; -} -lean::cnstr_set(x_888, 0, x_886); -return x_888; -} -else -{ -obj* x_889; obj* x_890; obj* x_891; obj* x_892; -x_889 = lean::cnstr_get(x_885, 0); -lean::inc(x_889); -lean::dec(x_885); -x_890 = lean::cnstr_get(x_889, 0); -lean::inc(x_890); -x_891 = lean::cnstr_get(x_889, 1); -lean::inc(x_891); -lean::dec(x_889); -lean::inc(x_1); -x_892 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(x_1, x_293, x_2, x_3, x_891); -if (lean::obj_tag(x_892) == 0) -{ -obj* x_893; obj* x_894; obj* x_895; -lean::dec(x_890); -lean::dec(x_879); -lean::dec(x_878); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_893 = lean::cnstr_get(x_892, 0); -lean::inc(x_893); -if (lean::is_exclusive(x_892)) { - lean::cnstr_release(x_892, 0); - x_894 = x_892; -} else { - lean::dec_ref(x_892); - x_894 = lean::box(0); -} -if (lean::is_scalar(x_894)) { - x_895 = lean::alloc_cnstr(0, 1, 0); -} else { - x_895 = x_894; -} -lean::cnstr_set(x_895, 0, x_893); -return x_895; -} -else -{ -obj* x_896; obj* x_897; obj* x_898; obj* x_899; obj* x_927; -x_896 = lean::cnstr_get(x_892, 0); -lean::inc(x_896); -lean::dec(x_892); -x_897 = lean::cnstr_get(x_896, 0); -lean::inc(x_897); -x_898 = lean::cnstr_get(x_896, 1); -lean::inc(x_898); -lean::dec(x_896); -lean::inc(x_1); -x_927 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_879, x_2, x_3, x_898); -if (lean::obj_tag(x_927) == 0) -{ -obj* x_928; obj* x_929; obj* x_930; -lean::dec(x_897); -lean::dec(x_890); -lean::dec(x_878); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_928 = lean::cnstr_get(x_927, 0); -lean::inc(x_928); -if (lean::is_exclusive(x_927)) { - lean::cnstr_release(x_927, 0); - x_929 = x_927; -} else { - lean::dec_ref(x_927); - x_929 = lean::box(0); -} -if (lean::is_scalar(x_929)) { - x_930 = lean::alloc_cnstr(0, 1, 0); -} else { - x_930 = x_929; -} -lean::cnstr_set(x_930, 0, x_928); -return x_930; -} -else -{ -obj* x_931; obj* x_932; -x_931 = lean::cnstr_get(x_927, 0); -lean::inc(x_931); -lean::dec(x_927); -x_932 = lean::cnstr_get(x_289, 2); -lean::inc(x_932); -if (lean::obj_tag(x_932) == 0) -{ -obj* x_933; obj* x_934; obj* x_935; obj* x_936; -lean::dec(x_878); -x_933 = lean::cnstr_get(x_931, 0); -lean::inc(x_933); -x_934 = lean::cnstr_get(x_931, 1); -lean::inc(x_934); -if (lean::is_exclusive(x_931)) { - lean::cnstr_release(x_931, 0); - lean::cnstr_release(x_931, 1); - x_935 = x_931; -} else { - lean::dec_ref(x_931); - x_935 = lean::box(0); -} -if (lean::is_scalar(x_935)) { - x_936 = lean::alloc_cnstr(0, 2, 0); -} else { - x_936 = x_935; -} -lean::cnstr_set(x_936, 0, x_933); -lean::cnstr_set(x_936, 1, x_934); -x_899 = x_936; -goto block_926; -} -else -{ -obj* x_937; obj* x_938; obj* x_939; obj* x_940; obj* x_941; -x_937 = lean::cnstr_get(x_931, 0); -lean::inc(x_937); -x_938 = lean::cnstr_get(x_931, 1); -lean::inc(x_938); -lean::dec(x_931); -x_939 = lean::cnstr_get(x_932, 0); -lean::inc(x_939); -lean::dec(x_932); -x_940 = lean::cnstr_get(x_939, 0); -lean::inc(x_940); -lean::dec(x_939); -x_941 = l_Lean_Elaborator_toPexpr___main(x_940, x_2, x_3, x_938); -if (lean::obj_tag(x_941) == 0) -{ -obj* x_942; obj* x_943; obj* x_944; -lean::dec(x_937); -lean::dec(x_897); -lean::dec(x_890); -lean::dec(x_878); -lean::dec(x_289); -lean::dec(x_15); -lean::dec(x_1); -x_942 = lean::cnstr_get(x_941, 0); -lean::inc(x_942); -if (lean::is_exclusive(x_941)) { - lean::cnstr_release(x_941, 0); - x_943 = x_941; -} else { - lean::dec_ref(x_941); - x_943 = lean::box(0); -} -if (lean::is_scalar(x_943)) { - x_944 = lean::alloc_cnstr(0, 1, 0); -} else { - x_944 = x_943; -} -lean::cnstr_set(x_944, 0, x_942); -return x_944; -} -else -{ -obj* x_945; obj* x_946; obj* x_947; obj* x_948; obj* x_949; obj* x_950; obj* x_951; -x_945 = lean::cnstr_get(x_941, 0); -lean::inc(x_945); -lean::dec(x_941); -x_946 = lean::cnstr_get(x_945, 0); -lean::inc(x_946); -x_947 = lean::cnstr_get(x_945, 1); -lean::inc(x_947); -if (lean::is_exclusive(x_945)) { - lean::cnstr_release(x_945, 0); - lean::cnstr_release(x_945, 1); - x_948 = x_945; -} else { - lean::dec_ref(x_945); - x_948 = lean::box(0); -} -if (lean::is_scalar(x_878)) { - x_949 = lean::alloc_cnstr(1, 2, 0); -} else { - x_949 = x_878; -} -lean::cnstr_set(x_949, 0, x_946); -lean::cnstr_set(x_949, 1, x_291); -x_950 = l_List_append___rarg(x_937, x_949); -if (lean::is_scalar(x_948)) { - x_951 = lean::alloc_cnstr(0, 2, 0); -} else { - x_951 = x_948; -} -lean::cnstr_set(x_951, 0, x_950); -lean::cnstr_set(x_951, 1, x_947); -x_899 = x_951; -goto block_926; -} -} -} -block_926: -{ -obj* x_900; obj* x_901; obj* x_902; obj* x_903; obj* x_904; obj* x_905; obj* x_906; obj* x_907; uint8 x_908; obj* x_909; obj* x_910; obj* x_911; obj* x_912; obj* x_913; -x_900 = lean::cnstr_get(x_899, 0); -lean::inc(x_900); -x_901 = lean::cnstr_get(x_899, 1); -lean::inc(x_901); -if (lean::is_exclusive(x_899)) { - lean::cnstr_release(x_899, 0); - lean::cnstr_release(x_899, 1); - x_902 = x_899; -} else { - lean::dec_ref(x_899); - x_902 = lean::box(0); -} -x_903 = lean::mk_nat_obj(0u); -x_904 = l_List_lengthAux___main___rarg(x_897, x_903); -x_905 = l_Lean_Elaborator_toPexpr___main___closed__23; -x_906 = l_Lean_KVMap_setNat(x_291, x_905, x_904); -x_907 = l_Lean_Elaborator_toPexpr___main___closed__24; -x_908 = lean::unbox(x_890); -lean::dec(x_890); -x_909 = l_Lean_KVMap_setBool(x_906, x_907, x_908); -x_910 = lean::cnstr_get(x_289, 1); -lean::inc(x_910); -lean::dec(x_289); -x_911 = l_List_append___rarg(x_897, x_900); -x_912 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_913 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_912, x_911); -if (lean::obj_tag(x_910) == 0) -{ -obj* x_914; obj* x_915; obj* x_916; obj* x_917; obj* x_918; -x_914 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_915 = lean::box(0); -x_916 = l_Lean_KVMap_setName(x_909, x_914, x_915); -x_917 = lean_expr_mk_mdata(x_916, x_913); -if (lean::is_scalar(x_902)) { - x_918 = lean::alloc_cnstr(0, 2, 0); -} else { - x_918 = x_902; -} -lean::cnstr_set(x_918, 0, x_917); -lean::cnstr_set(x_918, 1, x_901); -x_86 = x_918; -goto block_130; -} -else -{ -obj* x_919; obj* x_920; obj* x_921; obj* x_922; obj* x_923; obj* x_924; obj* x_925; -x_919 = lean::cnstr_get(x_910, 0); -lean::inc(x_919); -lean::dec(x_910); -x_920 = lean::cnstr_get(x_919, 0); -lean::inc(x_920); -lean::dec(x_919); -x_921 = l_Lean_Elaborator_mangleIdent(x_920); -x_922 = l_Lean_Elaborator_toPexpr___main___closed__26; -x_923 = l_Lean_KVMap_setName(x_909, x_922, x_921); -x_924 = lean_expr_mk_mdata(x_923, x_913); -if (lean::is_scalar(x_902)) { - x_925 = lean::alloc_cnstr(0, 2, 0); -} else { - x_925 = x_902; -} -lean::cnstr_set(x_925, 0, x_924); -lean::cnstr_set(x_925, 1, x_901); -x_86 = x_925; -goto block_130; -} -} -} -} -} -} -} -} -} -} -else -{ -obj* x_952; -lean::inc(x_16); -x_952 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__15(x_16, x_2, x_3, x_4); -if (lean::obj_tag(x_952) == 0) -{ -uint8 x_953; -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_1); -x_953 = !lean::is_exclusive(x_952); -if (x_953 == 0) -{ -return x_952; -} -else -{ -obj* x_954; obj* x_955; -x_954 = lean::cnstr_get(x_952, 0); -lean::inc(x_954); -lean::dec(x_952); -x_955 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_955, 0, x_954); -return x_955; -} -} -else -{ -obj* x_956; uint8 x_957; -x_956 = lean::cnstr_get(x_952, 0); -lean::inc(x_956); -lean::dec(x_952); -x_957 = !lean::is_exclusive(x_956); -if (x_957 == 0) -{ -obj* x_958; obj* x_959; obj* x_960; -x_958 = lean::cnstr_get(x_956, 0); -x_959 = lean::cnstr_get(x_956, 1); -x_960 = l_List_reverse___rarg(x_958); -if (lean::obj_tag(x_960) == 0) -{ -obj* x_961; obj* x_962; obj* x_963; -lean::free_heap_obj(x_956); -lean::dec(x_16); -lean::inc(x_1); -x_961 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_961, 0, x_1); -x_962 = l_Lean_Elaborator_toPexpr___main___closed__28; -x_963 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_961, x_962, x_2, x_3, x_959); -lean::dec(x_959); -lean::dec(x_961); -if (lean::obj_tag(x_963) == 0) -{ -uint8 x_964; -lean::dec(x_15); -lean::dec(x_1); -x_964 = !lean::is_exclusive(x_963); -if (x_964 == 0) -{ -return x_963; -} -else -{ -obj* x_965; obj* x_966; -x_965 = lean::cnstr_get(x_963, 0); -lean::inc(x_965); -lean::dec(x_963); -x_966 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_966, 0, x_965); -return x_966; -} -} -else -{ -obj* x_967; -x_967 = lean::cnstr_get(x_963, 0); -lean::inc(x_967); -lean::dec(x_963); -x_86 = x_967; -goto block_130; -} -} -else -{ -obj* x_968; obj* x_969; obj* x_970; obj* x_971; obj* x_972; obj* x_973; obj* x_974; obj* x_975; obj* x_976; obj* x_977; -x_968 = lean::cnstr_get(x_960, 0); -lean::inc(x_968); -x_969 = lean::cnstr_get(x_960, 1); -lean::inc(x_969); -lean::dec(x_960); -x_970 = lean::mk_nat_obj(0u); -x_971 = l_List_lengthAux___main___rarg(x_16, x_970); -lean::dec(x_16); -x_972 = lean::box(0); -x_973 = l_Lean_Elaborator_toPexpr___main___closed__29; -x_974 = l_Lean_KVMap_setNat(x_972, x_973, x_971); -x_975 = l_List_reverse___rarg(x_969); -x_976 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_968, x_975); -lean::dec(x_968); -x_977 = lean_expr_mk_mdata(x_974, x_976); -lean::cnstr_set(x_956, 0, x_977); -x_86 = x_956; -goto block_130; -} -} -else -{ -obj* x_978; obj* x_979; obj* x_980; -x_978 = lean::cnstr_get(x_956, 0); -x_979 = lean::cnstr_get(x_956, 1); -lean::inc(x_979); -lean::inc(x_978); -lean::dec(x_956); -x_980 = l_List_reverse___rarg(x_978); -if (lean::obj_tag(x_980) == 0) -{ -obj* x_981; obj* x_982; obj* x_983; -lean::dec(x_16); -lean::inc(x_1); -x_981 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_981, 0, x_1); -x_982 = l_Lean_Elaborator_toPexpr___main___closed__28; -x_983 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_981, x_982, x_2, x_3, x_979); -lean::dec(x_979); -lean::dec(x_981); -if (lean::obj_tag(x_983) == 0) -{ -obj* x_984; obj* x_985; obj* x_986; -lean::dec(x_15); -lean::dec(x_1); -x_984 = lean::cnstr_get(x_983, 0); -lean::inc(x_984); -if (lean::is_exclusive(x_983)) { - lean::cnstr_release(x_983, 0); - x_985 = x_983; -} else { - lean::dec_ref(x_983); - x_985 = lean::box(0); -} -if (lean::is_scalar(x_985)) { - x_986 = lean::alloc_cnstr(0, 1, 0); -} else { - x_986 = x_985; -} -lean::cnstr_set(x_986, 0, x_984); -return x_986; -} -else -{ -obj* x_987; -x_987 = lean::cnstr_get(x_983, 0); -lean::inc(x_987); -lean::dec(x_983); -x_86 = x_987; -goto block_130; -} -} -else -{ -obj* x_988; obj* x_989; obj* x_990; obj* x_991; obj* x_992; obj* x_993; obj* x_994; obj* x_995; obj* x_996; obj* x_997; obj* x_998; -x_988 = lean::cnstr_get(x_980, 0); -lean::inc(x_988); -x_989 = lean::cnstr_get(x_980, 1); -lean::inc(x_989); -lean::dec(x_980); -x_990 = lean::mk_nat_obj(0u); -x_991 = l_List_lengthAux___main___rarg(x_16, x_990); -lean::dec(x_16); -x_992 = lean::box(0); -x_993 = l_Lean_Elaborator_toPexpr___main___closed__29; -x_994 = l_Lean_KVMap_setNat(x_992, x_993, x_991); -x_995 = l_List_reverse___rarg(x_989); -x_996 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_988, x_995); -lean::dec(x_988); -x_997 = lean_expr_mk_mdata(x_994, x_996); -x_998 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_998, 0, x_997); -lean::cnstr_set(x_998, 1, x_979); -x_86 = x_998; -goto block_130; -} -} -} -} -} -else -{ -obj* x_999; obj* x_1000; obj* x_1001; obj* x_1002; -lean::dec(x_16); -lean::dec(x_15); -x_999 = l_Lean_Parser_stringLit_HasView; -x_1000 = lean::cnstr_get(x_999, 0); -lean::inc(x_1000); -lean::inc(x_1); -x_1001 = lean::apply_1(x_1000, x_1); -x_1002 = l_Lean_Parser_stringLit_View_value(x_1001); -if (lean::obj_tag(x_1002) == 0) -{ -obj* x_1003; -x_1003 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1003) == 0) -{ -obj* x_1004; obj* x_1005; obj* x_1006; -x_1004 = l_Lean_Elaborator_toPexpr___main___closed__30; -x_1005 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1005, 0, x_1004); -lean::cnstr_set(x_1005, 1, x_4); -x_1006 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1006, 0, x_1005); -return x_1006; -} -else -{ -obj* x_1007; obj* x_1008; obj* x_1009; obj* x_1010; obj* x_1011; obj* x_1012; obj* x_1013; obj* x_1014; obj* x_1015; obj* x_1016; obj* x_1017; obj* x_1018; obj* x_1019; obj* x_1020; obj* x_1021; -x_1007 = lean::cnstr_get(x_1003, 0); -lean::inc(x_1007); -lean::dec(x_1003); -x_1008 = lean::cnstr_get(x_3, 0); -x_1009 = lean::cnstr_get(x_1008, 2); -x_1010 = l_Lean_FileMap_toPosition(x_1009, x_1007); -x_1011 = lean::cnstr_get(x_1010, 1); -lean::inc(x_1011); -x_1012 = lean::box(0); -x_1013 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1014 = l_Lean_KVMap_setNat(x_1012, x_1013, x_1011); -x_1015 = lean::cnstr_get(x_1010, 0); -lean::inc(x_1015); -lean::dec(x_1010); -x_1016 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1017 = l_Lean_KVMap_setNat(x_1014, x_1016, x_1015); -x_1018 = l_Lean_Elaborator_toPexpr___main___closed__30; -x_1019 = lean_expr_mk_mdata(x_1017, x_1018); -x_1020 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1020, 0, x_1019); -lean::cnstr_set(x_1020, 1, x_4); -x_1021 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1021, 0, x_1020); -return x_1021; -} -} -else -{ -obj* x_1022; obj* x_1023; obj* x_1024; obj* x_1025; -x_1022 = lean::cnstr_get(x_1002, 0); -lean::inc(x_1022); -lean::dec(x_1002); -x_1023 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1023, 0, x_1022); -x_1024 = lean_expr_mk_lit(x_1023); -x_1025 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1025) == 0) -{ -obj* x_1026; obj* x_1027; -x_1026 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1026, 0, x_1024); -lean::cnstr_set(x_1026, 1, x_4); -x_1027 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1027, 0, x_1026); -return x_1027; -} -else -{ -obj* x_1028; obj* x_1029; obj* x_1030; obj* x_1031; obj* x_1032; obj* x_1033; obj* x_1034; obj* x_1035; obj* x_1036; obj* x_1037; obj* x_1038; obj* x_1039; obj* x_1040; obj* x_1041; -x_1028 = lean::cnstr_get(x_1025, 0); -lean::inc(x_1028); -lean::dec(x_1025); -x_1029 = lean::cnstr_get(x_3, 0); -x_1030 = lean::cnstr_get(x_1029, 2); -x_1031 = l_Lean_FileMap_toPosition(x_1030, x_1028); -x_1032 = lean::cnstr_get(x_1031, 1); -lean::inc(x_1032); -x_1033 = lean::box(0); -x_1034 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1035 = l_Lean_KVMap_setNat(x_1033, x_1034, x_1032); -x_1036 = lean::cnstr_get(x_1031, 0); -lean::inc(x_1036); -lean::dec(x_1031); -x_1037 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1038 = l_Lean_KVMap_setNat(x_1035, x_1037, x_1036); -x_1039 = lean_expr_mk_mdata(x_1038, x_1024); -x_1040 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1040, 0, x_1039); -lean::cnstr_set(x_1040, 1, x_4); -x_1041 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1041, 0, x_1040); -return x_1041; -} -} -} -} -else -{ -obj* x_1042; obj* x_1043; obj* x_1044; obj* x_1045; obj* x_1046; obj* x_1047; obj* x_1048; -lean::dec(x_16); -lean::dec(x_15); -x_1042 = l_Lean_Parser_number_HasView; -x_1043 = lean::cnstr_get(x_1042, 0); -lean::inc(x_1043); -lean::inc(x_1); -x_1044 = lean::apply_1(x_1043, x_1); -x_1045 = l_Lean_Parser_number_View_toNat___main(x_1044); -x_1046 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1046, 0, x_1045); -x_1047 = lean_expr_mk_lit(x_1046); -x_1048 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1048) == 0) -{ -obj* x_1049; obj* x_1050; -x_1049 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1049, 0, x_1047); -lean::cnstr_set(x_1049, 1, x_4); -x_1050 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1050, 0, x_1049); -return x_1050; -} -else -{ -obj* x_1051; obj* x_1052; obj* x_1053; obj* x_1054; obj* x_1055; obj* x_1056; obj* x_1057; obj* x_1058; obj* x_1059; obj* x_1060; obj* x_1061; obj* x_1062; obj* x_1063; obj* x_1064; -x_1051 = lean::cnstr_get(x_1048, 0); -lean::inc(x_1051); -lean::dec(x_1048); -x_1052 = lean::cnstr_get(x_3, 0); -x_1053 = lean::cnstr_get(x_1052, 2); -x_1054 = l_Lean_FileMap_toPosition(x_1053, x_1051); -x_1055 = lean::cnstr_get(x_1054, 1); -lean::inc(x_1055); -x_1056 = lean::box(0); -x_1057 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1058 = l_Lean_KVMap_setNat(x_1056, x_1057, x_1055); -x_1059 = lean::cnstr_get(x_1054, 0); -lean::inc(x_1059); -lean::dec(x_1054); -x_1060 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1061 = l_Lean_KVMap_setNat(x_1058, x_1060, x_1059); -x_1062 = lean_expr_mk_mdata(x_1061, x_1047); -x_1063 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1063, 0, x_1062); -lean::cnstr_set(x_1063, 1, x_4); -x_1064 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1064, 0, x_1063); -return x_1064; -} -} -} -else -{ -obj* x_1065; obj* x_1066; obj* x_1067; obj* x_1068; obj* x_1069; -lean::dec(x_16); -lean::dec(x_15); -x_1065 = l_Lean_Parser_Term_borrowed_HasView; -x_1066 = lean::cnstr_get(x_1065, 0); -lean::inc(x_1066); -lean::inc(x_1); -x_1067 = lean::apply_1(x_1066, x_1); -x_1068 = lean::cnstr_get(x_1067, 1); -lean::inc(x_1068); -lean::dec(x_1067); -x_1069 = l_Lean_Elaborator_toPexpr___main(x_1068, x_2, x_3, x_4); -if (lean::obj_tag(x_1069) == 0) -{ -uint8 x_1070; -lean::dec(x_1); -x_1070 = !lean::is_exclusive(x_1069); -if (x_1070 == 0) -{ -return x_1069; -} -else -{ -obj* x_1071; obj* x_1072; -x_1071 = lean::cnstr_get(x_1069, 0); -lean::inc(x_1071); -lean::dec(x_1069); -x_1072 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1072, 0, x_1071); -return x_1072; -} -} -else -{ -uint8 x_1073; -x_1073 = !lean::is_exclusive(x_1069); -if (x_1073 == 0) -{ -obj* x_1074; uint8 x_1075; -x_1074 = lean::cnstr_get(x_1069, 0); -x_1075 = !lean::is_exclusive(x_1074); -if (x_1075 == 0) -{ -obj* x_1076; obj* x_1077; obj* x_1078; obj* x_1079; -x_1076 = lean::cnstr_get(x_1074, 0); -x_1077 = l_Lean_Elaborator_toPexpr___main___closed__31; -x_1078 = l_Lean_Elaborator_Expr_mkAnnotation(x_1077, x_1076); -x_1079 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1079) == 0) -{ -lean::cnstr_set(x_1074, 0, x_1078); -return x_1069; -} -else -{ -obj* x_1080; obj* x_1081; obj* x_1082; obj* x_1083; obj* x_1084; obj* x_1085; obj* x_1086; obj* x_1087; obj* x_1088; obj* x_1089; obj* x_1090; obj* x_1091; -x_1080 = lean::cnstr_get(x_1079, 0); -lean::inc(x_1080); -lean::dec(x_1079); -x_1081 = lean::cnstr_get(x_3, 0); -x_1082 = lean::cnstr_get(x_1081, 2); -x_1083 = l_Lean_FileMap_toPosition(x_1082, x_1080); -x_1084 = lean::cnstr_get(x_1083, 1); -lean::inc(x_1084); -x_1085 = lean::box(0); -x_1086 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1087 = l_Lean_KVMap_setNat(x_1085, x_1086, x_1084); -x_1088 = lean::cnstr_get(x_1083, 0); -lean::inc(x_1088); -lean::dec(x_1083); -x_1089 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1090 = l_Lean_KVMap_setNat(x_1087, x_1089, x_1088); -x_1091 = lean_expr_mk_mdata(x_1090, x_1078); -lean::cnstr_set(x_1074, 0, x_1091); -return x_1069; -} -} -else -{ -obj* x_1092; obj* x_1093; obj* x_1094; obj* x_1095; obj* x_1096; -x_1092 = lean::cnstr_get(x_1074, 0); -x_1093 = lean::cnstr_get(x_1074, 1); -lean::inc(x_1093); -lean::inc(x_1092); -lean::dec(x_1074); -x_1094 = l_Lean_Elaborator_toPexpr___main___closed__31; -x_1095 = l_Lean_Elaborator_Expr_mkAnnotation(x_1094, x_1092); -x_1096 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1096) == 0) -{ -obj* x_1097; -x_1097 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1097, 0, x_1095); -lean::cnstr_set(x_1097, 1, x_1093); -lean::cnstr_set(x_1069, 0, x_1097); -return x_1069; -} -else -{ -obj* x_1098; obj* x_1099; obj* x_1100; obj* x_1101; obj* x_1102; obj* x_1103; obj* x_1104; obj* x_1105; obj* x_1106; obj* x_1107; obj* x_1108; obj* x_1109; obj* x_1110; -x_1098 = lean::cnstr_get(x_1096, 0); -lean::inc(x_1098); -lean::dec(x_1096); -x_1099 = lean::cnstr_get(x_3, 0); -x_1100 = lean::cnstr_get(x_1099, 2); -x_1101 = l_Lean_FileMap_toPosition(x_1100, x_1098); -x_1102 = lean::cnstr_get(x_1101, 1); -lean::inc(x_1102); -x_1103 = lean::box(0); -x_1104 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1105 = l_Lean_KVMap_setNat(x_1103, x_1104, x_1102); -x_1106 = lean::cnstr_get(x_1101, 0); -lean::inc(x_1106); -lean::dec(x_1101); -x_1107 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1108 = l_Lean_KVMap_setNat(x_1105, x_1107, x_1106); -x_1109 = lean_expr_mk_mdata(x_1108, x_1095); -x_1110 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1110, 0, x_1109); -lean::cnstr_set(x_1110, 1, x_1093); -lean::cnstr_set(x_1069, 0, x_1110); -return x_1069; -} -} -} -else -{ -obj* x_1111; obj* x_1112; obj* x_1113; obj* x_1114; obj* x_1115; obj* x_1116; obj* x_1117; -x_1111 = lean::cnstr_get(x_1069, 0); -lean::inc(x_1111); -lean::dec(x_1069); -x_1112 = lean::cnstr_get(x_1111, 0); -lean::inc(x_1112); -x_1113 = lean::cnstr_get(x_1111, 1); -lean::inc(x_1113); -if (lean::is_exclusive(x_1111)) { - lean::cnstr_release(x_1111, 0); - lean::cnstr_release(x_1111, 1); - x_1114 = x_1111; -} else { - lean::dec_ref(x_1111); - x_1114 = lean::box(0); -} -x_1115 = l_Lean_Elaborator_toPexpr___main___closed__31; -x_1116 = l_Lean_Elaborator_Expr_mkAnnotation(x_1115, x_1112); -x_1117 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1117) == 0) -{ -obj* x_1118; obj* x_1119; -if (lean::is_scalar(x_1114)) { - x_1118 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1118 = x_1114; -} -lean::cnstr_set(x_1118, 0, x_1116); -lean::cnstr_set(x_1118, 1, x_1113); -x_1119 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1119, 0, x_1118); -return x_1119; -} -else -{ -obj* x_1120; obj* x_1121; obj* x_1122; obj* x_1123; obj* x_1124; obj* x_1125; obj* x_1126; obj* x_1127; obj* x_1128; obj* x_1129; obj* x_1130; obj* x_1131; obj* x_1132; obj* x_1133; -x_1120 = lean::cnstr_get(x_1117, 0); -lean::inc(x_1120); -lean::dec(x_1117); -x_1121 = lean::cnstr_get(x_3, 0); -x_1122 = lean::cnstr_get(x_1121, 2); -x_1123 = l_Lean_FileMap_toPosition(x_1122, x_1120); -x_1124 = lean::cnstr_get(x_1123, 1); -lean::inc(x_1124); -x_1125 = lean::box(0); -x_1126 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1127 = l_Lean_KVMap_setNat(x_1125, x_1126, x_1124); -x_1128 = lean::cnstr_get(x_1123, 0); -lean::inc(x_1128); -lean::dec(x_1123); -x_1129 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1130 = l_Lean_KVMap_setNat(x_1127, x_1129, x_1128); -x_1131 = lean_expr_mk_mdata(x_1130, x_1116); -if (lean::is_scalar(x_1114)) { - x_1132 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1132 = x_1114; -} -lean::cnstr_set(x_1132, 0, x_1131); -lean::cnstr_set(x_1132, 1, x_1113); -x_1133 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1133, 0, x_1132); -return x_1133; -} -} -} -} -} -else -{ -obj* x_1134; obj* x_1135; obj* x_1136; obj* x_1137; obj* x_1138; -lean::dec(x_16); -lean::dec(x_15); -x_1134 = l_Lean_Parser_Term_inaccessible_HasView; -x_1135 = lean::cnstr_get(x_1134, 0); -lean::inc(x_1135); -lean::inc(x_1); -x_1136 = lean::apply_1(x_1135, x_1); -x_1137 = lean::cnstr_get(x_1136, 1); -lean::inc(x_1137); -lean::dec(x_1136); -x_1138 = l_Lean_Elaborator_toPexpr___main(x_1137, x_2, x_3, x_4); -if (lean::obj_tag(x_1138) == 0) -{ -uint8 x_1139; -lean::dec(x_1); -x_1139 = !lean::is_exclusive(x_1138); -if (x_1139 == 0) -{ -return x_1138; -} -else -{ -obj* x_1140; obj* x_1141; -x_1140 = lean::cnstr_get(x_1138, 0); -lean::inc(x_1140); -lean::dec(x_1138); -x_1141 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1141, 0, x_1140); -return x_1141; -} -} -else -{ -uint8 x_1142; -x_1142 = !lean::is_exclusive(x_1138); -if (x_1142 == 0) -{ -obj* x_1143; uint8 x_1144; -x_1143 = lean::cnstr_get(x_1138, 0); -x_1144 = !lean::is_exclusive(x_1143); -if (x_1144 == 0) -{ -obj* x_1145; obj* x_1146; obj* x_1147; obj* x_1148; -x_1145 = lean::cnstr_get(x_1143, 0); -x_1146 = l_Lean_Elaborator_toPexpr___main___closed__32; -x_1147 = l_Lean_Elaborator_Expr_mkAnnotation(x_1146, x_1145); -x_1148 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1148) == 0) -{ -lean::cnstr_set(x_1143, 0, x_1147); -return x_1138; -} -else -{ -obj* x_1149; obj* x_1150; obj* x_1151; obj* x_1152; obj* x_1153; obj* x_1154; obj* x_1155; obj* x_1156; obj* x_1157; obj* x_1158; obj* x_1159; obj* x_1160; -x_1149 = lean::cnstr_get(x_1148, 0); -lean::inc(x_1149); -lean::dec(x_1148); -x_1150 = lean::cnstr_get(x_3, 0); -x_1151 = lean::cnstr_get(x_1150, 2); -x_1152 = l_Lean_FileMap_toPosition(x_1151, x_1149); -x_1153 = lean::cnstr_get(x_1152, 1); -lean::inc(x_1153); -x_1154 = lean::box(0); -x_1155 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1156 = l_Lean_KVMap_setNat(x_1154, x_1155, x_1153); -x_1157 = lean::cnstr_get(x_1152, 0); -lean::inc(x_1157); -lean::dec(x_1152); -x_1158 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1159 = l_Lean_KVMap_setNat(x_1156, x_1158, x_1157); -x_1160 = lean_expr_mk_mdata(x_1159, x_1147); -lean::cnstr_set(x_1143, 0, x_1160); -return x_1138; -} -} -else -{ -obj* x_1161; obj* x_1162; obj* x_1163; obj* x_1164; obj* x_1165; -x_1161 = lean::cnstr_get(x_1143, 0); -x_1162 = lean::cnstr_get(x_1143, 1); -lean::inc(x_1162); -lean::inc(x_1161); -lean::dec(x_1143); -x_1163 = l_Lean_Elaborator_toPexpr___main___closed__32; -x_1164 = l_Lean_Elaborator_Expr_mkAnnotation(x_1163, x_1161); -x_1165 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1165) == 0) -{ -obj* x_1166; -x_1166 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1166, 0, x_1164); -lean::cnstr_set(x_1166, 1, x_1162); -lean::cnstr_set(x_1138, 0, x_1166); -return x_1138; -} -else -{ -obj* x_1167; obj* x_1168; obj* x_1169; obj* x_1170; obj* x_1171; obj* x_1172; obj* x_1173; obj* x_1174; obj* x_1175; obj* x_1176; obj* x_1177; obj* x_1178; obj* x_1179; -x_1167 = lean::cnstr_get(x_1165, 0); -lean::inc(x_1167); -lean::dec(x_1165); -x_1168 = lean::cnstr_get(x_3, 0); -x_1169 = lean::cnstr_get(x_1168, 2); -x_1170 = l_Lean_FileMap_toPosition(x_1169, x_1167); -x_1171 = lean::cnstr_get(x_1170, 1); -lean::inc(x_1171); -x_1172 = lean::box(0); -x_1173 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1174 = l_Lean_KVMap_setNat(x_1172, x_1173, x_1171); -x_1175 = lean::cnstr_get(x_1170, 0); -lean::inc(x_1175); -lean::dec(x_1170); -x_1176 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1177 = l_Lean_KVMap_setNat(x_1174, x_1176, x_1175); -x_1178 = lean_expr_mk_mdata(x_1177, x_1164); -x_1179 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1179, 0, x_1178); -lean::cnstr_set(x_1179, 1, x_1162); -lean::cnstr_set(x_1138, 0, x_1179); -return x_1138; -} -} -} -else -{ -obj* x_1180; obj* x_1181; obj* x_1182; obj* x_1183; obj* x_1184; obj* x_1185; obj* x_1186; -x_1180 = lean::cnstr_get(x_1138, 0); -lean::inc(x_1180); -lean::dec(x_1138); -x_1181 = lean::cnstr_get(x_1180, 0); -lean::inc(x_1181); -x_1182 = lean::cnstr_get(x_1180, 1); -lean::inc(x_1182); -if (lean::is_exclusive(x_1180)) { - lean::cnstr_release(x_1180, 0); - lean::cnstr_release(x_1180, 1); - x_1183 = x_1180; -} else { - lean::dec_ref(x_1180); - x_1183 = lean::box(0); -} -x_1184 = l_Lean_Elaborator_toPexpr___main___closed__32; -x_1185 = l_Lean_Elaborator_Expr_mkAnnotation(x_1184, x_1181); -x_1186 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1186) == 0) -{ -obj* x_1187; obj* x_1188; -if (lean::is_scalar(x_1183)) { - x_1187 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1187 = x_1183; -} -lean::cnstr_set(x_1187, 0, x_1185); -lean::cnstr_set(x_1187, 1, x_1182); -x_1188 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1188, 0, x_1187); -return x_1188; -} -else -{ -obj* x_1189; obj* x_1190; obj* x_1191; obj* x_1192; obj* x_1193; obj* x_1194; obj* x_1195; obj* x_1196; obj* x_1197; obj* x_1198; obj* x_1199; obj* x_1200; obj* x_1201; obj* x_1202; -x_1189 = lean::cnstr_get(x_1186, 0); -lean::inc(x_1189); -lean::dec(x_1186); -x_1190 = lean::cnstr_get(x_3, 0); -x_1191 = lean::cnstr_get(x_1190, 2); -x_1192 = l_Lean_FileMap_toPosition(x_1191, x_1189); -x_1193 = lean::cnstr_get(x_1192, 1); -lean::inc(x_1193); -x_1194 = lean::box(0); -x_1195 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1196 = l_Lean_KVMap_setNat(x_1194, x_1195, x_1193); -x_1197 = lean::cnstr_get(x_1192, 0); -lean::inc(x_1197); -lean::dec(x_1192); -x_1198 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1199 = l_Lean_KVMap_setNat(x_1196, x_1198, x_1197); -x_1200 = lean_expr_mk_mdata(x_1199, x_1185); -if (lean::is_scalar(x_1183)) { - x_1201 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1201 = x_1183; -} -lean::cnstr_set(x_1201, 0, x_1200); -lean::cnstr_set(x_1201, 1, x_1182); -x_1202 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1202, 0, x_1201); -return x_1202; -} -} -} -} -} -else -{ -obj* x_1203; obj* x_1204; obj* x_1205; obj* x_1206; obj* x_1207; obj* x_1208; obj* x_1209; obj* x_1210; -lean::dec(x_16); -lean::dec(x_15); -x_1203 = l_Lean_Parser_Term_explicit_HasView; -x_1204 = lean::cnstr_get(x_1203, 0); -lean::inc(x_1204); -lean::inc(x_1); -x_1205 = lean::apply_1(x_1204, x_1); -x_1206 = lean::cnstr_get(x_1205, 0); -lean::inc(x_1206); -x_1207 = l_Lean_Parser_identUnivs_HasView; -x_1208 = lean::cnstr_get(x_1207, 1); -lean::inc(x_1208); -x_1209 = lean::cnstr_get(x_1205, 1); -lean::inc(x_1209); -lean::dec(x_1205); -x_1210 = lean::apply_1(x_1208, x_1209); -if (lean::obj_tag(x_1206) == 0) -{ -obj* x_1211; -lean::dec(x_1206); -x_1211 = l_Lean_Elaborator_toPexpr___main(x_1210, x_2, x_3, x_4); -if (lean::obj_tag(x_1211) == 0) -{ -uint8 x_1212; -lean::dec(x_1); -x_1212 = !lean::is_exclusive(x_1211); -if (x_1212 == 0) -{ -return x_1211; -} -else -{ -obj* x_1213; obj* x_1214; -x_1213 = lean::cnstr_get(x_1211, 0); -lean::inc(x_1213); -lean::dec(x_1211); -x_1214 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1214, 0, x_1213); -return x_1214; -} -} -else -{ -uint8 x_1215; -x_1215 = !lean::is_exclusive(x_1211); -if (x_1215 == 0) -{ -obj* x_1216; uint8 x_1217; -x_1216 = lean::cnstr_get(x_1211, 0); -x_1217 = !lean::is_exclusive(x_1216); -if (x_1217 == 0) -{ -obj* x_1218; obj* x_1219; obj* x_1220; obj* x_1221; -x_1218 = lean::cnstr_get(x_1216, 0); -x_1219 = l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1; -x_1220 = l_Lean_Elaborator_Expr_mkAnnotation(x_1219, x_1218); -x_1221 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1221) == 0) -{ -lean::cnstr_set(x_1216, 0, x_1220); -return x_1211; -} -else -{ -obj* x_1222; obj* x_1223; obj* x_1224; obj* x_1225; obj* x_1226; obj* x_1227; obj* x_1228; obj* x_1229; obj* x_1230; obj* x_1231; obj* x_1232; obj* x_1233; -x_1222 = lean::cnstr_get(x_1221, 0); -lean::inc(x_1222); -lean::dec(x_1221); -x_1223 = lean::cnstr_get(x_3, 0); -x_1224 = lean::cnstr_get(x_1223, 2); -x_1225 = l_Lean_FileMap_toPosition(x_1224, x_1222); -x_1226 = lean::cnstr_get(x_1225, 1); -lean::inc(x_1226); -x_1227 = lean::box(0); -x_1228 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1229 = l_Lean_KVMap_setNat(x_1227, x_1228, x_1226); -x_1230 = lean::cnstr_get(x_1225, 0); -lean::inc(x_1230); -lean::dec(x_1225); -x_1231 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1232 = l_Lean_KVMap_setNat(x_1229, x_1231, x_1230); -x_1233 = lean_expr_mk_mdata(x_1232, x_1220); -lean::cnstr_set(x_1216, 0, x_1233); -return x_1211; -} -} -else -{ -obj* x_1234; obj* x_1235; obj* x_1236; obj* x_1237; obj* x_1238; -x_1234 = lean::cnstr_get(x_1216, 0); -x_1235 = lean::cnstr_get(x_1216, 1); -lean::inc(x_1235); -lean::inc(x_1234); -lean::dec(x_1216); -x_1236 = l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1; -x_1237 = l_Lean_Elaborator_Expr_mkAnnotation(x_1236, x_1234); -x_1238 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1238) == 0) -{ -obj* x_1239; -x_1239 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1239, 0, x_1237); -lean::cnstr_set(x_1239, 1, x_1235); -lean::cnstr_set(x_1211, 0, x_1239); -return x_1211; -} -else -{ -obj* x_1240; obj* x_1241; obj* x_1242; obj* x_1243; obj* x_1244; obj* x_1245; obj* x_1246; obj* x_1247; obj* x_1248; obj* x_1249; obj* x_1250; obj* x_1251; obj* x_1252; -x_1240 = lean::cnstr_get(x_1238, 0); -lean::inc(x_1240); -lean::dec(x_1238); -x_1241 = lean::cnstr_get(x_3, 0); -x_1242 = lean::cnstr_get(x_1241, 2); -x_1243 = l_Lean_FileMap_toPosition(x_1242, x_1240); -x_1244 = lean::cnstr_get(x_1243, 1); -lean::inc(x_1244); -x_1245 = lean::box(0); -x_1246 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1247 = l_Lean_KVMap_setNat(x_1245, x_1246, x_1244); -x_1248 = lean::cnstr_get(x_1243, 0); -lean::inc(x_1248); -lean::dec(x_1243); -x_1249 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1250 = l_Lean_KVMap_setNat(x_1247, x_1249, x_1248); -x_1251 = lean_expr_mk_mdata(x_1250, x_1237); -x_1252 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1252, 0, x_1251); -lean::cnstr_set(x_1252, 1, x_1235); -lean::cnstr_set(x_1211, 0, x_1252); -return x_1211; -} -} -} -else -{ -obj* x_1253; obj* x_1254; obj* x_1255; obj* x_1256; obj* x_1257; obj* x_1258; obj* x_1259; -x_1253 = lean::cnstr_get(x_1211, 0); -lean::inc(x_1253); -lean::dec(x_1211); -x_1254 = lean::cnstr_get(x_1253, 0); -lean::inc(x_1254); -x_1255 = lean::cnstr_get(x_1253, 1); -lean::inc(x_1255); -if (lean::is_exclusive(x_1253)) { - lean::cnstr_release(x_1253, 0); - lean::cnstr_release(x_1253, 1); - x_1256 = x_1253; -} else { - lean::dec_ref(x_1253); - x_1256 = lean::box(0); -} -x_1257 = l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1; -x_1258 = l_Lean_Elaborator_Expr_mkAnnotation(x_1257, x_1254); -x_1259 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1259) == 0) -{ -obj* x_1260; obj* x_1261; -if (lean::is_scalar(x_1256)) { - x_1260 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1260 = x_1256; -} -lean::cnstr_set(x_1260, 0, x_1258); -lean::cnstr_set(x_1260, 1, x_1255); -x_1261 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1261, 0, x_1260); -return x_1261; -} -else -{ -obj* x_1262; obj* x_1263; obj* x_1264; obj* x_1265; obj* x_1266; obj* x_1267; obj* x_1268; obj* x_1269; obj* x_1270; obj* x_1271; obj* x_1272; obj* x_1273; obj* x_1274; obj* x_1275; -x_1262 = lean::cnstr_get(x_1259, 0); -lean::inc(x_1262); -lean::dec(x_1259); -x_1263 = lean::cnstr_get(x_3, 0); -x_1264 = lean::cnstr_get(x_1263, 2); -x_1265 = l_Lean_FileMap_toPosition(x_1264, x_1262); -x_1266 = lean::cnstr_get(x_1265, 1); -lean::inc(x_1266); -x_1267 = lean::box(0); -x_1268 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1269 = l_Lean_KVMap_setNat(x_1267, x_1268, x_1266); -x_1270 = lean::cnstr_get(x_1265, 0); -lean::inc(x_1270); -lean::dec(x_1265); -x_1271 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1272 = l_Lean_KVMap_setNat(x_1269, x_1271, x_1270); -x_1273 = lean_expr_mk_mdata(x_1272, x_1258); -if (lean::is_scalar(x_1256)) { - x_1274 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1274 = x_1256; -} -lean::cnstr_set(x_1274, 0, x_1273); -lean::cnstr_set(x_1274, 1, x_1255); -x_1275 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1275, 0, x_1274); -return x_1275; -} -} -} -} -else -{ -obj* x_1276; -lean::dec(x_1206); -x_1276 = l_Lean_Elaborator_toPexpr___main(x_1210, x_2, x_3, x_4); -if (lean::obj_tag(x_1276) == 0) -{ -uint8 x_1277; -lean::dec(x_1); -x_1277 = !lean::is_exclusive(x_1276); -if (x_1277 == 0) -{ -return x_1276; -} -else -{ -obj* x_1278; obj* x_1279; -x_1278 = lean::cnstr_get(x_1276, 0); -lean::inc(x_1278); -lean::dec(x_1276); -x_1279 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1279, 0, x_1278); -return x_1279; -} -} -else -{ -uint8 x_1280; -x_1280 = !lean::is_exclusive(x_1276); -if (x_1280 == 0) -{ -obj* x_1281; uint8 x_1282; -x_1281 = lean::cnstr_get(x_1276, 0); -x_1282 = !lean::is_exclusive(x_1281); -if (x_1282 == 0) -{ -obj* x_1283; obj* x_1284; obj* x_1285; obj* x_1286; -x_1283 = lean::cnstr_get(x_1281, 0); -x_1284 = l_Lean_Elaborator_toPexpr___main___closed__33; -x_1285 = l_Lean_Elaborator_Expr_mkAnnotation(x_1284, x_1283); -x_1286 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1286) == 0) -{ -lean::cnstr_set(x_1281, 0, x_1285); -return x_1276; -} -else -{ -obj* x_1287; obj* x_1288; obj* x_1289; obj* x_1290; obj* x_1291; obj* x_1292; obj* x_1293; obj* x_1294; obj* x_1295; obj* x_1296; obj* x_1297; obj* x_1298; -x_1287 = lean::cnstr_get(x_1286, 0); -lean::inc(x_1287); -lean::dec(x_1286); -x_1288 = lean::cnstr_get(x_3, 0); -x_1289 = lean::cnstr_get(x_1288, 2); -x_1290 = l_Lean_FileMap_toPosition(x_1289, x_1287); -x_1291 = lean::cnstr_get(x_1290, 1); -lean::inc(x_1291); -x_1292 = lean::box(0); -x_1293 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1294 = l_Lean_KVMap_setNat(x_1292, x_1293, x_1291); -x_1295 = lean::cnstr_get(x_1290, 0); -lean::inc(x_1295); -lean::dec(x_1290); -x_1296 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1297 = l_Lean_KVMap_setNat(x_1294, x_1296, x_1295); -x_1298 = lean_expr_mk_mdata(x_1297, x_1285); -lean::cnstr_set(x_1281, 0, x_1298); -return x_1276; -} -} -else -{ -obj* x_1299; obj* x_1300; obj* x_1301; obj* x_1302; obj* x_1303; -x_1299 = lean::cnstr_get(x_1281, 0); -x_1300 = lean::cnstr_get(x_1281, 1); -lean::inc(x_1300); -lean::inc(x_1299); -lean::dec(x_1281); -x_1301 = l_Lean_Elaborator_toPexpr___main___closed__33; -x_1302 = l_Lean_Elaborator_Expr_mkAnnotation(x_1301, x_1299); -x_1303 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1303) == 0) -{ -obj* x_1304; -x_1304 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1304, 0, x_1302); -lean::cnstr_set(x_1304, 1, x_1300); -lean::cnstr_set(x_1276, 0, x_1304); -return x_1276; -} -else -{ -obj* x_1305; obj* x_1306; obj* x_1307; obj* x_1308; obj* x_1309; obj* x_1310; obj* x_1311; obj* x_1312; obj* x_1313; obj* x_1314; obj* x_1315; obj* x_1316; obj* x_1317; -x_1305 = lean::cnstr_get(x_1303, 0); -lean::inc(x_1305); -lean::dec(x_1303); -x_1306 = lean::cnstr_get(x_3, 0); -x_1307 = lean::cnstr_get(x_1306, 2); -x_1308 = l_Lean_FileMap_toPosition(x_1307, x_1305); -x_1309 = lean::cnstr_get(x_1308, 1); -lean::inc(x_1309); -x_1310 = lean::box(0); -x_1311 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1312 = l_Lean_KVMap_setNat(x_1310, x_1311, x_1309); -x_1313 = lean::cnstr_get(x_1308, 0); -lean::inc(x_1313); -lean::dec(x_1308); -x_1314 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1315 = l_Lean_KVMap_setNat(x_1312, x_1314, x_1313); -x_1316 = lean_expr_mk_mdata(x_1315, x_1302); -x_1317 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1317, 0, x_1316); -lean::cnstr_set(x_1317, 1, x_1300); -lean::cnstr_set(x_1276, 0, x_1317); -return x_1276; -} -} -} -else -{ -obj* x_1318; obj* x_1319; obj* x_1320; obj* x_1321; obj* x_1322; obj* x_1323; obj* x_1324; -x_1318 = lean::cnstr_get(x_1276, 0); -lean::inc(x_1318); -lean::dec(x_1276); -x_1319 = lean::cnstr_get(x_1318, 0); -lean::inc(x_1319); -x_1320 = lean::cnstr_get(x_1318, 1); -lean::inc(x_1320); -if (lean::is_exclusive(x_1318)) { - lean::cnstr_release(x_1318, 0); - lean::cnstr_release(x_1318, 1); - x_1321 = x_1318; -} else { - lean::dec_ref(x_1318); - x_1321 = lean::box(0); -} -x_1322 = l_Lean_Elaborator_toPexpr___main___closed__33; -x_1323 = l_Lean_Elaborator_Expr_mkAnnotation(x_1322, x_1319); -x_1324 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1324) == 0) -{ -obj* x_1325; obj* x_1326; -if (lean::is_scalar(x_1321)) { - x_1325 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1325 = x_1321; -} -lean::cnstr_set(x_1325, 0, x_1323); -lean::cnstr_set(x_1325, 1, x_1320); -x_1326 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1326, 0, x_1325); -return x_1326; -} -else -{ -obj* x_1327; obj* x_1328; obj* x_1329; obj* x_1330; obj* x_1331; obj* x_1332; obj* x_1333; obj* x_1334; obj* x_1335; obj* x_1336; obj* x_1337; obj* x_1338; obj* x_1339; obj* x_1340; -x_1327 = lean::cnstr_get(x_1324, 0); -lean::inc(x_1327); -lean::dec(x_1324); -x_1328 = lean::cnstr_get(x_3, 0); -x_1329 = lean::cnstr_get(x_1328, 2); -x_1330 = l_Lean_FileMap_toPosition(x_1329, x_1327); -x_1331 = lean::cnstr_get(x_1330, 1); -lean::inc(x_1331); -x_1332 = lean::box(0); -x_1333 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1334 = l_Lean_KVMap_setNat(x_1332, x_1333, x_1331); -x_1335 = lean::cnstr_get(x_1330, 0); -lean::inc(x_1335); -lean::dec(x_1330); -x_1336 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1337 = l_Lean_KVMap_setNat(x_1334, x_1336, x_1335); -x_1338 = lean_expr_mk_mdata(x_1337, x_1323); -if (lean::is_scalar(x_1321)) { - x_1339 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1339 = x_1321; -} -lean::cnstr_set(x_1339, 0, x_1338); -lean::cnstr_set(x_1339, 1, x_1320); -x_1340 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1340, 0, x_1339); -return x_1340; -} -} -} -} -} -} -else -{ -obj* x_1341; obj* x_1342; obj* x_1343; obj* x_1344; -lean::dec(x_16); -lean::dec(x_15); -x_1341 = l_Lean_Parser_Term_projection_HasView; -x_1342 = lean::cnstr_get(x_1341, 0); -lean::inc(x_1342); -lean::inc(x_1); -x_1343 = lean::apply_1(x_1342, x_1); -x_1344 = lean::cnstr_get(x_1343, 2); -lean::inc(x_1344); -if (lean::obj_tag(x_1344) == 0) -{ -obj* x_1345; obj* x_1346; obj* x_1347; obj* x_1348; obj* x_1349; -x_1345 = lean::cnstr_get(x_1343, 0); -lean::inc(x_1345); -lean::dec(x_1343); -x_1346 = lean::cnstr_get(x_1344, 0); -lean::inc(x_1346); -lean::dec(x_1344); -x_1347 = lean::cnstr_get(x_1346, 2); -lean::inc(x_1347); -lean::dec(x_1346); -x_1348 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_1348, 0, x_1347); -x_1349 = l_Lean_Elaborator_toPexpr___main(x_1345, x_2, x_3, x_4); -if (lean::obj_tag(x_1349) == 0) -{ -uint8 x_1350; -lean::dec(x_1348); -lean::dec(x_1); -x_1350 = !lean::is_exclusive(x_1349); -if (x_1350 == 0) -{ -return x_1349; -} -else -{ -obj* x_1351; obj* x_1352; -x_1351 = lean::cnstr_get(x_1349, 0); -lean::inc(x_1351); -lean::dec(x_1349); -x_1352 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1352, 0, x_1351); -return x_1352; -} -} -else -{ -uint8 x_1353; -x_1353 = !lean::is_exclusive(x_1349); -if (x_1353 == 0) -{ -obj* x_1354; uint8 x_1355; -x_1354 = lean::cnstr_get(x_1349, 0); -x_1355 = !lean::is_exclusive(x_1354); -if (x_1355 == 0) -{ -obj* x_1356; obj* x_1357; obj* x_1358; obj* x_1359; obj* x_1360; obj* x_1361; -x_1356 = lean::cnstr_get(x_1354, 0); -x_1357 = lean::box(0); -x_1358 = l_Lean_Elaborator_toPexpr___main___closed__34; -x_1359 = l_Lean_KVMap_insertCore___main(x_1357, x_1358, x_1348); -x_1360 = lean_expr_mk_mdata(x_1359, x_1356); -x_1361 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1361) == 0) -{ -lean::cnstr_set(x_1354, 0, x_1360); -return x_1349; -} -else -{ -obj* x_1362; obj* x_1363; obj* x_1364; obj* x_1365; obj* x_1366; obj* x_1367; obj* x_1368; obj* x_1369; obj* x_1370; obj* x_1371; obj* x_1372; -x_1362 = lean::cnstr_get(x_1361, 0); -lean::inc(x_1362); -lean::dec(x_1361); -x_1363 = lean::cnstr_get(x_3, 0); -x_1364 = lean::cnstr_get(x_1363, 2); -x_1365 = l_Lean_FileMap_toPosition(x_1364, x_1362); -x_1366 = lean::cnstr_get(x_1365, 1); -lean::inc(x_1366); -x_1367 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1368 = l_Lean_KVMap_setNat(x_1357, x_1367, x_1366); -x_1369 = lean::cnstr_get(x_1365, 0); -lean::inc(x_1369); -lean::dec(x_1365); -x_1370 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1371 = l_Lean_KVMap_setNat(x_1368, x_1370, x_1369); -x_1372 = lean_expr_mk_mdata(x_1371, x_1360); -lean::cnstr_set(x_1354, 0, x_1372); -return x_1349; -} -} -else -{ -obj* x_1373; obj* x_1374; obj* x_1375; obj* x_1376; obj* x_1377; obj* x_1378; obj* x_1379; -x_1373 = lean::cnstr_get(x_1354, 0); -x_1374 = lean::cnstr_get(x_1354, 1); -lean::inc(x_1374); -lean::inc(x_1373); -lean::dec(x_1354); -x_1375 = lean::box(0); -x_1376 = l_Lean_Elaborator_toPexpr___main___closed__34; -x_1377 = l_Lean_KVMap_insertCore___main(x_1375, x_1376, x_1348); -x_1378 = lean_expr_mk_mdata(x_1377, x_1373); -x_1379 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1379) == 0) -{ -obj* x_1380; -x_1380 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1380, 0, x_1378); -lean::cnstr_set(x_1380, 1, x_1374); -lean::cnstr_set(x_1349, 0, x_1380); -return x_1349; -} -else -{ -obj* x_1381; obj* x_1382; obj* x_1383; obj* x_1384; obj* x_1385; obj* x_1386; obj* x_1387; obj* x_1388; obj* x_1389; obj* x_1390; obj* x_1391; obj* x_1392; -x_1381 = lean::cnstr_get(x_1379, 0); -lean::inc(x_1381); -lean::dec(x_1379); -x_1382 = lean::cnstr_get(x_3, 0); -x_1383 = lean::cnstr_get(x_1382, 2); -x_1384 = l_Lean_FileMap_toPosition(x_1383, x_1381); -x_1385 = lean::cnstr_get(x_1384, 1); -lean::inc(x_1385); -x_1386 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1387 = l_Lean_KVMap_setNat(x_1375, x_1386, x_1385); -x_1388 = lean::cnstr_get(x_1384, 0); -lean::inc(x_1388); -lean::dec(x_1384); -x_1389 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1390 = l_Lean_KVMap_setNat(x_1387, x_1389, x_1388); -x_1391 = lean_expr_mk_mdata(x_1390, x_1378); -x_1392 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1392, 0, x_1391); -lean::cnstr_set(x_1392, 1, x_1374); -lean::cnstr_set(x_1349, 0, x_1392); -return x_1349; -} -} -} -else -{ -obj* x_1393; obj* x_1394; obj* x_1395; obj* x_1396; obj* x_1397; obj* x_1398; obj* x_1399; obj* x_1400; obj* x_1401; -x_1393 = lean::cnstr_get(x_1349, 0); -lean::inc(x_1393); -lean::dec(x_1349); -x_1394 = lean::cnstr_get(x_1393, 0); -lean::inc(x_1394); -x_1395 = lean::cnstr_get(x_1393, 1); -lean::inc(x_1395); -if (lean::is_exclusive(x_1393)) { - lean::cnstr_release(x_1393, 0); - lean::cnstr_release(x_1393, 1); - x_1396 = x_1393; -} else { - lean::dec_ref(x_1393); - x_1396 = lean::box(0); -} -x_1397 = lean::box(0); -x_1398 = l_Lean_Elaborator_toPexpr___main___closed__34; -x_1399 = l_Lean_KVMap_insertCore___main(x_1397, x_1398, x_1348); -x_1400 = lean_expr_mk_mdata(x_1399, x_1394); -x_1401 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1401) == 0) -{ -obj* x_1402; obj* x_1403; -if (lean::is_scalar(x_1396)) { - x_1402 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1402 = x_1396; -} -lean::cnstr_set(x_1402, 0, x_1400); -lean::cnstr_set(x_1402, 1, x_1395); -x_1403 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1403, 0, x_1402); -return x_1403; -} -else -{ -obj* x_1404; obj* x_1405; obj* x_1406; obj* x_1407; obj* x_1408; obj* x_1409; obj* x_1410; obj* x_1411; obj* x_1412; obj* x_1413; obj* x_1414; obj* x_1415; obj* x_1416; -x_1404 = lean::cnstr_get(x_1401, 0); -lean::inc(x_1404); -lean::dec(x_1401); -x_1405 = lean::cnstr_get(x_3, 0); -x_1406 = lean::cnstr_get(x_1405, 2); -x_1407 = l_Lean_FileMap_toPosition(x_1406, x_1404); -x_1408 = lean::cnstr_get(x_1407, 1); -lean::inc(x_1408); -x_1409 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1410 = l_Lean_KVMap_setNat(x_1397, x_1409, x_1408); -x_1411 = lean::cnstr_get(x_1407, 0); -lean::inc(x_1411); -lean::dec(x_1407); -x_1412 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1413 = l_Lean_KVMap_setNat(x_1410, x_1412, x_1411); -x_1414 = lean_expr_mk_mdata(x_1413, x_1400); -if (lean::is_scalar(x_1396)) { - x_1415 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1415 = x_1396; -} -lean::cnstr_set(x_1415, 0, x_1414); -lean::cnstr_set(x_1415, 1, x_1395); -x_1416 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1416, 0, x_1415); -return x_1416; -} -} -} -} -else -{ -obj* x_1417; obj* x_1418; obj* x_1419; obj* x_1420; obj* x_1421; -x_1417 = lean::cnstr_get(x_1343, 0); -lean::inc(x_1417); -lean::dec(x_1343); -x_1418 = lean::cnstr_get(x_1344, 0); -lean::inc(x_1418); -lean::dec(x_1344); -x_1419 = l_Lean_Parser_number_View_toNat___main(x_1418); -x_1420 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_1420, 0, x_1419); -x_1421 = l_Lean_Elaborator_toPexpr___main(x_1417, x_2, x_3, x_4); -if (lean::obj_tag(x_1421) == 0) -{ -uint8 x_1422; -lean::dec(x_1420); -lean::dec(x_1); -x_1422 = !lean::is_exclusive(x_1421); -if (x_1422 == 0) -{ -return x_1421; -} -else -{ -obj* x_1423; obj* x_1424; -x_1423 = lean::cnstr_get(x_1421, 0); -lean::inc(x_1423); -lean::dec(x_1421); -x_1424 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1424, 0, x_1423); -return x_1424; -} -} -else -{ -uint8 x_1425; -x_1425 = !lean::is_exclusive(x_1421); -if (x_1425 == 0) -{ -obj* x_1426; uint8 x_1427; -x_1426 = lean::cnstr_get(x_1421, 0); -x_1427 = !lean::is_exclusive(x_1426); -if (x_1427 == 0) -{ -obj* x_1428; obj* x_1429; obj* x_1430; obj* x_1431; obj* x_1432; obj* x_1433; -x_1428 = lean::cnstr_get(x_1426, 0); -x_1429 = lean::box(0); -x_1430 = l_Lean_Elaborator_toPexpr___main___closed__34; -x_1431 = l_Lean_KVMap_insertCore___main(x_1429, x_1430, x_1420); -x_1432 = lean_expr_mk_mdata(x_1431, x_1428); -x_1433 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1433) == 0) -{ -lean::cnstr_set(x_1426, 0, x_1432); -return x_1421; -} -else -{ -obj* x_1434; obj* x_1435; obj* x_1436; obj* x_1437; obj* x_1438; obj* x_1439; obj* x_1440; obj* x_1441; obj* x_1442; obj* x_1443; obj* x_1444; -x_1434 = lean::cnstr_get(x_1433, 0); -lean::inc(x_1434); -lean::dec(x_1433); -x_1435 = lean::cnstr_get(x_3, 0); -x_1436 = lean::cnstr_get(x_1435, 2); -x_1437 = l_Lean_FileMap_toPosition(x_1436, x_1434); -x_1438 = lean::cnstr_get(x_1437, 1); -lean::inc(x_1438); -x_1439 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1440 = l_Lean_KVMap_setNat(x_1429, x_1439, x_1438); -x_1441 = lean::cnstr_get(x_1437, 0); -lean::inc(x_1441); -lean::dec(x_1437); -x_1442 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1443 = l_Lean_KVMap_setNat(x_1440, x_1442, x_1441); -x_1444 = lean_expr_mk_mdata(x_1443, x_1432); -lean::cnstr_set(x_1426, 0, x_1444); -return x_1421; -} -} -else -{ -obj* x_1445; obj* x_1446; obj* x_1447; obj* x_1448; obj* x_1449; obj* x_1450; obj* x_1451; -x_1445 = lean::cnstr_get(x_1426, 0); -x_1446 = lean::cnstr_get(x_1426, 1); -lean::inc(x_1446); -lean::inc(x_1445); -lean::dec(x_1426); -x_1447 = lean::box(0); -x_1448 = l_Lean_Elaborator_toPexpr___main___closed__34; -x_1449 = l_Lean_KVMap_insertCore___main(x_1447, x_1448, x_1420); -x_1450 = lean_expr_mk_mdata(x_1449, x_1445); -x_1451 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1451) == 0) -{ -obj* x_1452; -x_1452 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1452, 0, x_1450); -lean::cnstr_set(x_1452, 1, x_1446); -lean::cnstr_set(x_1421, 0, x_1452); -return x_1421; -} -else -{ -obj* x_1453; obj* x_1454; obj* x_1455; obj* x_1456; obj* x_1457; obj* x_1458; obj* x_1459; obj* x_1460; obj* x_1461; obj* x_1462; obj* x_1463; obj* x_1464; -x_1453 = lean::cnstr_get(x_1451, 0); -lean::inc(x_1453); -lean::dec(x_1451); -x_1454 = lean::cnstr_get(x_3, 0); -x_1455 = lean::cnstr_get(x_1454, 2); -x_1456 = l_Lean_FileMap_toPosition(x_1455, x_1453); -x_1457 = lean::cnstr_get(x_1456, 1); -lean::inc(x_1457); -x_1458 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1459 = l_Lean_KVMap_setNat(x_1447, x_1458, x_1457); -x_1460 = lean::cnstr_get(x_1456, 0); -lean::inc(x_1460); -lean::dec(x_1456); -x_1461 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1462 = l_Lean_KVMap_setNat(x_1459, x_1461, x_1460); -x_1463 = lean_expr_mk_mdata(x_1462, x_1450); -x_1464 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1464, 0, x_1463); -lean::cnstr_set(x_1464, 1, x_1446); -lean::cnstr_set(x_1421, 0, x_1464); -return x_1421; -} -} -} -else -{ -obj* x_1465; obj* x_1466; obj* x_1467; obj* x_1468; obj* x_1469; obj* x_1470; obj* x_1471; obj* x_1472; obj* x_1473; -x_1465 = lean::cnstr_get(x_1421, 0); -lean::inc(x_1465); -lean::dec(x_1421); -x_1466 = lean::cnstr_get(x_1465, 0); -lean::inc(x_1466); -x_1467 = lean::cnstr_get(x_1465, 1); -lean::inc(x_1467); -if (lean::is_exclusive(x_1465)) { - lean::cnstr_release(x_1465, 0); - lean::cnstr_release(x_1465, 1); - x_1468 = x_1465; -} else { - lean::dec_ref(x_1465); - x_1468 = lean::box(0); -} -x_1469 = lean::box(0); -x_1470 = l_Lean_Elaborator_toPexpr___main___closed__34; -x_1471 = l_Lean_KVMap_insertCore___main(x_1469, x_1470, x_1420); -x_1472 = lean_expr_mk_mdata(x_1471, x_1466); -x_1473 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1473) == 0) -{ -obj* x_1474; obj* x_1475; -if (lean::is_scalar(x_1468)) { - x_1474 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1474 = x_1468; -} -lean::cnstr_set(x_1474, 0, x_1472); -lean::cnstr_set(x_1474, 1, x_1467); -x_1475 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1475, 0, x_1474); -return x_1475; -} -else -{ -obj* x_1476; obj* x_1477; obj* x_1478; obj* x_1479; obj* x_1480; obj* x_1481; obj* x_1482; obj* x_1483; obj* x_1484; obj* x_1485; obj* x_1486; obj* x_1487; obj* x_1488; -x_1476 = lean::cnstr_get(x_1473, 0); -lean::inc(x_1476); -lean::dec(x_1473); -x_1477 = lean::cnstr_get(x_3, 0); -x_1478 = lean::cnstr_get(x_1477, 2); -x_1479 = l_Lean_FileMap_toPosition(x_1478, x_1476); -x_1480 = lean::cnstr_get(x_1479, 1); -lean::inc(x_1480); -x_1481 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1482 = l_Lean_KVMap_setNat(x_1469, x_1481, x_1480); -x_1483 = lean::cnstr_get(x_1479, 0); -lean::inc(x_1483); -lean::dec(x_1479); -x_1484 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1485 = l_Lean_KVMap_setNat(x_1482, x_1484, x_1483); -x_1486 = lean_expr_mk_mdata(x_1485, x_1472); -if (lean::is_scalar(x_1468)) { - x_1487 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1487 = x_1468; -} -lean::cnstr_set(x_1487, 0, x_1486); -lean::cnstr_set(x_1487, 1, x_1467); -x_1488 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1488, 0, x_1487); -return x_1488; -} -} -} -} -} -} -else -{ -obj* x_1489; obj* x_1490; obj* x_1491; obj* x_1492; -lean::dec(x_16); -x_1489 = l_Lean_Parser_Term_let_HasView; -x_1490 = lean::cnstr_get(x_1489, 0); -lean::inc(x_1490); -lean::inc(x_1); -x_1491 = lean::apply_1(x_1490, x_1); -x_1492 = lean::cnstr_get(x_1491, 1); -lean::inc(x_1492); -if (lean::obj_tag(x_1492) == 0) -{ -obj* x_1493; obj* x_1494; -x_1493 = lean::cnstr_get(x_1492, 0); -lean::inc(x_1493); -lean::dec(x_1492); -x_1494 = lean::cnstr_get(x_1493, 1); -lean::inc(x_1494); -if (lean::obj_tag(x_1494) == 0) -{ -obj* x_1495; -x_1495 = lean::cnstr_get(x_1493, 2); -lean::inc(x_1495); -if (lean::obj_tag(x_1495) == 0) -{ -obj* x_1496; obj* x_1497; obj* x_1498; -lean::dec(x_1493); -lean::dec(x_1491); -lean::inc(x_1); -x_1496 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1496, 0, x_1); -x_1497 = l_Lean_Elaborator_toPexpr___main___closed__35; -x_1498 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_1496, x_1497, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_1496); -if (lean::obj_tag(x_1498) == 0) -{ -uint8 x_1499; -lean::dec(x_15); -lean::dec(x_1); -x_1499 = !lean::is_exclusive(x_1498); -if (x_1499 == 0) -{ -return x_1498; -} -else -{ -obj* x_1500; obj* x_1501; -x_1500 = lean::cnstr_get(x_1498, 0); -lean::inc(x_1500); -lean::dec(x_1498); -x_1501 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1501, 0, x_1500); -return x_1501; -} -} -else -{ -obj* x_1502; -x_1502 = lean::cnstr_get(x_1498, 0); -lean::inc(x_1502); -lean::dec(x_1498); -x_86 = x_1502; -goto block_130; -} -} -else -{ -obj* x_1503; obj* x_1504; obj* x_1505; obj* x_1506; obj* x_1507; obj* x_1508; -x_1503 = lean::cnstr_get(x_1493, 0); -lean::inc(x_1503); -lean::dec(x_1493); -x_1504 = lean::cnstr_get(x_1495, 0); -lean::inc(x_1504); -lean::dec(x_1495); -x_1505 = lean::cnstr_get(x_1504, 1); -lean::inc(x_1505); -lean::dec(x_1504); -x_1506 = lean::cnstr_get(x_1491, 3); -lean::inc(x_1506); -x_1507 = lean::cnstr_get(x_1491, 5); -lean::inc(x_1507); -lean::dec(x_1491); -x_1508 = l_Lean_Elaborator_toPexpr___main(x_1505, x_2, x_3, x_4); -if (lean::obj_tag(x_1508) == 0) -{ -uint8 x_1509; -lean::dec(x_1507); -lean::dec(x_1506); -lean::dec(x_1503); -lean::dec(x_15); -lean::dec(x_1); -x_1509 = !lean::is_exclusive(x_1508); -if (x_1509 == 0) -{ -return x_1508; -} -else -{ -obj* x_1510; obj* x_1511; -x_1510 = lean::cnstr_get(x_1508, 0); -lean::inc(x_1510); -lean::dec(x_1508); -x_1511 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1511, 0, x_1510); -return x_1511; -} -} -else -{ -obj* x_1512; obj* x_1513; obj* x_1514; obj* x_1515; -x_1512 = lean::cnstr_get(x_1508, 0); -lean::inc(x_1512); -lean::dec(x_1508); -x_1513 = lean::cnstr_get(x_1512, 0); -lean::inc(x_1513); -x_1514 = lean::cnstr_get(x_1512, 1); -lean::inc(x_1514); -lean::dec(x_1512); -x_1515 = l_Lean_Elaborator_toPexpr___main(x_1506, x_2, x_3, x_1514); -if (lean::obj_tag(x_1515) == 0) -{ -uint8 x_1516; -lean::dec(x_1513); -lean::dec(x_1507); -lean::dec(x_1503); -lean::dec(x_15); -lean::dec(x_1); -x_1516 = !lean::is_exclusive(x_1515); -if (x_1516 == 0) -{ -return x_1515; -} -else -{ -obj* x_1517; obj* x_1518; -x_1517 = lean::cnstr_get(x_1515, 0); -lean::inc(x_1517); -lean::dec(x_1515); -x_1518 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1518, 0, x_1517); -return x_1518; -} -} -else -{ -obj* x_1519; obj* x_1520; obj* x_1521; obj* x_1522; -x_1519 = lean::cnstr_get(x_1515, 0); -lean::inc(x_1519); -lean::dec(x_1515); -x_1520 = lean::cnstr_get(x_1519, 0); -lean::inc(x_1520); -x_1521 = lean::cnstr_get(x_1519, 1); -lean::inc(x_1521); -lean::dec(x_1519); -x_1522 = l_Lean_Elaborator_toPexpr___main(x_1507, x_2, x_3, x_1521); -if (lean::obj_tag(x_1522) == 0) -{ -uint8 x_1523; -lean::dec(x_1520); -lean::dec(x_1513); -lean::dec(x_1503); -lean::dec(x_15); -lean::dec(x_1); -x_1523 = !lean::is_exclusive(x_1522); -if (x_1523 == 0) -{ -return x_1522; -} -else -{ -obj* x_1524; obj* x_1525; -x_1524 = lean::cnstr_get(x_1522, 0); -lean::inc(x_1524); -lean::dec(x_1522); -x_1525 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1525, 0, x_1524); -return x_1525; -} -} -else -{ -obj* x_1526; uint8 x_1527; -x_1526 = lean::cnstr_get(x_1522, 0); -lean::inc(x_1526); -lean::dec(x_1522); -x_1527 = !lean::is_exclusive(x_1526); -if (x_1527 == 0) -{ -obj* x_1528; obj* x_1529; obj* x_1530; -x_1528 = lean::cnstr_get(x_1526, 0); -x_1529 = l_Lean_Elaborator_mangleIdent(x_1503); -x_1530 = lean_expr_mk_let(x_1529, x_1513, x_1520, x_1528); -lean::cnstr_set(x_1526, 0, x_1530); -x_86 = x_1526; -goto block_130; -} -else -{ -obj* x_1531; obj* x_1532; obj* x_1533; obj* x_1534; obj* x_1535; -x_1531 = lean::cnstr_get(x_1526, 0); -x_1532 = lean::cnstr_get(x_1526, 1); -lean::inc(x_1532); -lean::inc(x_1531); -lean::dec(x_1526); -x_1533 = l_Lean_Elaborator_mangleIdent(x_1503); -x_1534 = lean_expr_mk_let(x_1533, x_1513, x_1520, x_1531); -x_1535 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1535, 0, x_1534); -lean::cnstr_set(x_1535, 1, x_1532); -x_86 = x_1535; -goto block_130; -} -} -} -} -} -} -else -{ -obj* x_1536; obj* x_1537; obj* x_1538; -lean::dec(x_1494); -lean::dec(x_1493); -lean::dec(x_1491); -lean::inc(x_1); -x_1536 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1536, 0, x_1); -x_1537 = l_Lean_Elaborator_toPexpr___main___closed__35; -x_1538 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_1536, x_1537, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_1536); -if (lean::obj_tag(x_1538) == 0) -{ -uint8 x_1539; -lean::dec(x_15); -lean::dec(x_1); -x_1539 = !lean::is_exclusive(x_1538); -if (x_1539 == 0) -{ -return x_1538; -} -else -{ -obj* x_1540; obj* x_1541; -x_1540 = lean::cnstr_get(x_1538, 0); -lean::inc(x_1540); -lean::dec(x_1538); -x_1541 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1541, 0, x_1540); -return x_1541; -} -} -else -{ -obj* x_1542; -x_1542 = lean::cnstr_get(x_1538, 0); -lean::inc(x_1542); -lean::dec(x_1538); -x_86 = x_1542; -goto block_130; -} -} -} -else -{ -obj* x_1543; obj* x_1544; obj* x_1545; -lean::dec(x_1492); -lean::dec(x_1491); -lean::inc(x_1); -x_1543 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1543, 0, x_1); -x_1544 = l_Lean_Elaborator_toPexpr___main___closed__35; -x_1545 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_1543, x_1544, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_1543); -if (lean::obj_tag(x_1545) == 0) -{ -uint8 x_1546; -lean::dec(x_15); -lean::dec(x_1); -x_1546 = !lean::is_exclusive(x_1545); -if (x_1546 == 0) -{ -return x_1545; -} -else -{ -obj* x_1547; obj* x_1548; -x_1547 = lean::cnstr_get(x_1545, 0); -lean::inc(x_1547); -lean::dec(x_1545); -x_1548 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1548, 0, x_1547); -return x_1548; -} -} -else -{ -obj* x_1549; -x_1549 = lean::cnstr_get(x_1545, 0); -lean::inc(x_1549); -lean::dec(x_1545); -x_86 = x_1549; -goto block_130; -} -} -} -} -else -{ -obj* x_1550; obj* x_1551; obj* x_1552; obj* x_1553; obj* x_1554; -lean::dec(x_16); -lean::dec(x_15); -x_1550 = l_Lean_Parser_Term_show_HasView; -x_1551 = lean::cnstr_get(x_1550, 0); -lean::inc(x_1551); -lean::inc(x_1); -x_1552 = lean::apply_1(x_1551, x_1); -x_1553 = lean::cnstr_get(x_1552, 1); -lean::inc(x_1553); -x_1554 = l_Lean_Elaborator_toPexpr___main(x_1553, x_2, x_3, x_4); -if (lean::obj_tag(x_1554) == 0) -{ -uint8 x_1555; -lean::dec(x_1552); -lean::dec(x_1); -x_1555 = !lean::is_exclusive(x_1554); -if (x_1555 == 0) -{ -return x_1554; -} -else -{ -obj* x_1556; obj* x_1557; -x_1556 = lean::cnstr_get(x_1554, 0); -lean::inc(x_1556); -lean::dec(x_1554); -x_1557 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1557, 0, x_1556); -return x_1557; -} -} -else -{ -obj* x_1558; obj* x_1559; obj* x_1560; obj* x_1561; obj* x_1562; obj* x_1563; -x_1558 = lean::cnstr_get(x_1554, 0); -lean::inc(x_1558); -lean::dec(x_1554); -x_1559 = lean::cnstr_get(x_1558, 0); -lean::inc(x_1559); -x_1560 = lean::cnstr_get(x_1558, 1); -lean::inc(x_1560); -lean::dec(x_1558); -x_1561 = lean::cnstr_get(x_1552, 3); -lean::inc(x_1561); -lean::dec(x_1552); -x_1562 = lean::cnstr_get(x_1561, 1); -lean::inc(x_1562); -lean::dec(x_1561); -x_1563 = l_Lean_Elaborator_toPexpr___main(x_1562, x_2, x_3, x_1560); -if (lean::obj_tag(x_1563) == 0) -{ -uint8 x_1564; -lean::dec(x_1559); -lean::dec(x_1); -x_1564 = !lean::is_exclusive(x_1563); -if (x_1564 == 0) -{ -return x_1563; -} -else -{ -obj* x_1565; obj* x_1566; -x_1565 = lean::cnstr_get(x_1563, 0); -lean::inc(x_1565); -lean::dec(x_1563); -x_1566 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1566, 0, x_1565); -return x_1566; -} -} -else -{ -uint8 x_1567; -x_1567 = !lean::is_exclusive(x_1563); -if (x_1567 == 0) -{ -obj* x_1568; uint8 x_1569; -x_1568 = lean::cnstr_get(x_1563, 0); -x_1569 = !lean::is_exclusive(x_1568); -if (x_1569 == 0) -{ -obj* x_1570; obj* x_1571; uint8 x_1572; obj* x_1573; obj* x_1574; obj* x_1575; obj* x_1576; obj* x_1577; obj* x_1578; -x_1570 = lean::cnstr_get(x_1568, 0); -x_1571 = l_Lean_Elaborator_toPexpr___main___closed__36; -x_1572 = 0; -x_1573 = l_Lean_Elaborator_toPexpr___main___closed__37; -x_1574 = lean_expr_mk_lambda(x_1571, x_1572, x_1559, x_1573); -x_1575 = lean_expr_mk_app(x_1574, x_1570); -x_1576 = l_Lean_Elaborator_toPexpr___main___closed__38; -x_1577 = l_Lean_Elaborator_Expr_mkAnnotation(x_1576, x_1575); -x_1578 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1578) == 0) -{ -lean::cnstr_set(x_1568, 0, x_1577); -return x_1563; -} -else -{ -obj* x_1579; obj* x_1580; obj* x_1581; obj* x_1582; obj* x_1583; obj* x_1584; obj* x_1585; obj* x_1586; obj* x_1587; obj* x_1588; obj* x_1589; obj* x_1590; -x_1579 = lean::cnstr_get(x_1578, 0); -lean::inc(x_1579); -lean::dec(x_1578); -x_1580 = lean::cnstr_get(x_3, 0); -x_1581 = lean::cnstr_get(x_1580, 2); -x_1582 = l_Lean_FileMap_toPosition(x_1581, x_1579); -x_1583 = lean::cnstr_get(x_1582, 1); -lean::inc(x_1583); -x_1584 = lean::box(0); -x_1585 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1586 = l_Lean_KVMap_setNat(x_1584, x_1585, x_1583); -x_1587 = lean::cnstr_get(x_1582, 0); -lean::inc(x_1587); -lean::dec(x_1582); -x_1588 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1589 = l_Lean_KVMap_setNat(x_1586, x_1588, x_1587); -x_1590 = lean_expr_mk_mdata(x_1589, x_1577); -lean::cnstr_set(x_1568, 0, x_1590); -return x_1563; -} -} -else -{ -obj* x_1591; obj* x_1592; obj* x_1593; uint8 x_1594; obj* x_1595; obj* x_1596; obj* x_1597; obj* x_1598; obj* x_1599; obj* x_1600; -x_1591 = lean::cnstr_get(x_1568, 0); -x_1592 = lean::cnstr_get(x_1568, 1); -lean::inc(x_1592); -lean::inc(x_1591); -lean::dec(x_1568); -x_1593 = l_Lean_Elaborator_toPexpr___main___closed__36; -x_1594 = 0; -x_1595 = l_Lean_Elaborator_toPexpr___main___closed__37; -x_1596 = lean_expr_mk_lambda(x_1593, x_1594, x_1559, x_1595); -x_1597 = lean_expr_mk_app(x_1596, x_1591); -x_1598 = l_Lean_Elaborator_toPexpr___main___closed__38; -x_1599 = l_Lean_Elaborator_Expr_mkAnnotation(x_1598, x_1597); -x_1600 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1600) == 0) -{ -obj* x_1601; -x_1601 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1601, 0, x_1599); -lean::cnstr_set(x_1601, 1, x_1592); -lean::cnstr_set(x_1563, 0, x_1601); -return x_1563; -} -else -{ -obj* x_1602; obj* x_1603; obj* x_1604; obj* x_1605; obj* x_1606; obj* x_1607; obj* x_1608; obj* x_1609; obj* x_1610; obj* x_1611; obj* x_1612; obj* x_1613; obj* x_1614; -x_1602 = lean::cnstr_get(x_1600, 0); -lean::inc(x_1602); -lean::dec(x_1600); -x_1603 = lean::cnstr_get(x_3, 0); -x_1604 = lean::cnstr_get(x_1603, 2); -x_1605 = l_Lean_FileMap_toPosition(x_1604, x_1602); -x_1606 = lean::cnstr_get(x_1605, 1); -lean::inc(x_1606); -x_1607 = lean::box(0); -x_1608 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1609 = l_Lean_KVMap_setNat(x_1607, x_1608, x_1606); -x_1610 = lean::cnstr_get(x_1605, 0); -lean::inc(x_1610); -lean::dec(x_1605); -x_1611 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1612 = l_Lean_KVMap_setNat(x_1609, x_1611, x_1610); -x_1613 = lean_expr_mk_mdata(x_1612, x_1599); -x_1614 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1614, 0, x_1613); -lean::cnstr_set(x_1614, 1, x_1592); -lean::cnstr_set(x_1563, 0, x_1614); -return x_1563; -} -} -} -else -{ -obj* x_1615; obj* x_1616; obj* x_1617; obj* x_1618; obj* x_1619; uint8 x_1620; obj* x_1621; obj* x_1622; obj* x_1623; obj* x_1624; obj* x_1625; obj* x_1626; -x_1615 = lean::cnstr_get(x_1563, 0); -lean::inc(x_1615); -lean::dec(x_1563); -x_1616 = lean::cnstr_get(x_1615, 0); -lean::inc(x_1616); -x_1617 = lean::cnstr_get(x_1615, 1); -lean::inc(x_1617); -if (lean::is_exclusive(x_1615)) { - lean::cnstr_release(x_1615, 0); - lean::cnstr_release(x_1615, 1); - x_1618 = x_1615; -} else { - lean::dec_ref(x_1615); - x_1618 = lean::box(0); -} -x_1619 = l_Lean_Elaborator_toPexpr___main___closed__36; -x_1620 = 0; -x_1621 = l_Lean_Elaborator_toPexpr___main___closed__37; -x_1622 = lean_expr_mk_lambda(x_1619, x_1620, x_1559, x_1621); -x_1623 = lean_expr_mk_app(x_1622, x_1616); -x_1624 = l_Lean_Elaborator_toPexpr___main___closed__38; -x_1625 = l_Lean_Elaborator_Expr_mkAnnotation(x_1624, x_1623); -x_1626 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1626) == 0) -{ -obj* x_1627; obj* x_1628; -if (lean::is_scalar(x_1618)) { - x_1627 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1627 = x_1618; -} -lean::cnstr_set(x_1627, 0, x_1625); -lean::cnstr_set(x_1627, 1, x_1617); -x_1628 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1628, 0, x_1627); -return x_1628; -} -else -{ -obj* x_1629; obj* x_1630; obj* x_1631; obj* x_1632; obj* x_1633; obj* x_1634; obj* x_1635; obj* x_1636; obj* x_1637; obj* x_1638; obj* x_1639; obj* x_1640; obj* x_1641; obj* x_1642; -x_1629 = lean::cnstr_get(x_1626, 0); -lean::inc(x_1629); -lean::dec(x_1626); -x_1630 = lean::cnstr_get(x_3, 0); -x_1631 = lean::cnstr_get(x_1630, 2); -x_1632 = l_Lean_FileMap_toPosition(x_1631, x_1629); -x_1633 = lean::cnstr_get(x_1632, 1); -lean::inc(x_1633); -x_1634 = lean::box(0); -x_1635 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1636 = l_Lean_KVMap_setNat(x_1634, x_1635, x_1633); -x_1637 = lean::cnstr_get(x_1632, 0); -lean::inc(x_1637); -lean::dec(x_1632); -x_1638 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1639 = l_Lean_KVMap_setNat(x_1636, x_1638, x_1637); -x_1640 = lean_expr_mk_mdata(x_1639, x_1625); -if (lean::is_scalar(x_1618)) { - x_1641 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1641 = x_1618; -} -lean::cnstr_set(x_1641, 0, x_1640); -lean::cnstr_set(x_1641, 1, x_1617); -x_1642 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1642, 0, x_1641); -return x_1642; -} -} -} -} -} -} -else -{ -obj* x_1643; obj* x_1644; obj* x_1645; obj* x_1646; -lean::dec(x_16); -x_1643 = l_Lean_Parser_Term_have_HasView; -x_1644 = lean::cnstr_get(x_1643, 0); -lean::inc(x_1644); -lean::inc(x_1); -x_1645 = lean::apply_1(x_1644, x_1); -x_1646 = lean::cnstr_get(x_1645, 1); -lean::inc(x_1646); -if (lean::obj_tag(x_1646) == 0) -{ -obj* x_1647; obj* x_1648; obj* x_1649; -x_1647 = lean::cnstr_get(x_1645, 2); -lean::inc(x_1647); -x_1648 = lean::cnstr_get(x_1645, 5); -lean::inc(x_1648); -x_1649 = l_Lean_Elaborator_toPexpr___main(x_1647, x_2, x_3, x_4); -if (lean::obj_tag(x_1649) == 0) -{ -uint8 x_1650; -lean::dec(x_1648); -lean::dec(x_1645); -lean::dec(x_15); -lean::dec(x_1); -x_1650 = !lean::is_exclusive(x_1649); -if (x_1650 == 0) -{ -return x_1649; -} -else -{ -obj* x_1651; obj* x_1652; -x_1651 = lean::cnstr_get(x_1649, 0); -lean::inc(x_1651); -lean::dec(x_1649); -x_1652 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1652, 0, x_1651); -return x_1652; -} -} -else -{ -obj* x_1653; obj* x_1654; obj* x_1655; obj* x_1656; -x_1653 = lean::cnstr_get(x_1649, 0); -lean::inc(x_1653); -lean::dec(x_1649); -x_1654 = lean::cnstr_get(x_1653, 0); -lean::inc(x_1654); -x_1655 = lean::cnstr_get(x_1653, 1); -lean::inc(x_1655); -lean::dec(x_1653); -x_1656 = l_Lean_Elaborator_toPexpr___main(x_1648, x_2, x_3, x_1655); -if (lean::obj_tag(x_1656) == 0) -{ -uint8 x_1657; -lean::dec(x_1654); -lean::dec(x_1645); -lean::dec(x_15); -lean::dec(x_1); -x_1657 = !lean::is_exclusive(x_1656); -if (x_1657 == 0) -{ -return x_1656; -} -else -{ -obj* x_1658; obj* x_1659; -x_1658 = lean::cnstr_get(x_1656, 0); -lean::inc(x_1658); -lean::dec(x_1656); -x_1659 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1659, 0, x_1658); -return x_1659; -} -} -else -{ -obj* x_1660; obj* x_1661; obj* x_1662; obj* x_1663; uint8 x_1664; obj* x_1665; obj* x_1666; -x_1660 = lean::cnstr_get(x_1656, 0); -lean::inc(x_1660); -lean::dec(x_1656); -x_1661 = lean::cnstr_get(x_1660, 0); -lean::inc(x_1661); -x_1662 = lean::cnstr_get(x_1660, 1); -lean::inc(x_1662); -lean::dec(x_1660); -x_1663 = l_Lean_Elaborator_toPexpr___main___closed__36; -x_1664 = 0; -x_1665 = lean_expr_mk_lambda(x_1663, x_1664, x_1654, x_1661); -x_1666 = lean::cnstr_get(x_1645, 3); -lean::inc(x_1666); -lean::dec(x_1645); -if (lean::obj_tag(x_1666) == 0) -{ -obj* x_1667; obj* x_1668; obj* x_1669; -x_1667 = lean::cnstr_get(x_1666, 0); -lean::inc(x_1667); -lean::dec(x_1666); -x_1668 = lean::cnstr_get(x_1667, 1); -lean::inc(x_1668); -lean::dec(x_1667); -x_1669 = l_Lean_Elaborator_toPexpr___main(x_1668, x_2, x_3, x_1662); -if (lean::obj_tag(x_1669) == 0) -{ -uint8 x_1670; -lean::dec(x_1665); -lean::dec(x_15); -lean::dec(x_1); -x_1670 = !lean::is_exclusive(x_1669); -if (x_1670 == 0) -{ -return x_1669; -} -else -{ -obj* x_1671; obj* x_1672; -x_1671 = lean::cnstr_get(x_1669, 0); -lean::inc(x_1671); -lean::dec(x_1669); -x_1672 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1672, 0, x_1671); -return x_1672; -} -} -else -{ -obj* x_1673; uint8 x_1674; -x_1673 = lean::cnstr_get(x_1669, 0); -lean::inc(x_1673); -lean::dec(x_1669); -x_1674 = !lean::is_exclusive(x_1673); -if (x_1674 == 0) -{ -obj* x_1675; obj* x_1676; obj* x_1677; obj* x_1678; -x_1675 = lean::cnstr_get(x_1673, 0); -x_1676 = l_Lean_Elaborator_toPexpr___main___closed__39; -x_1677 = l_Lean_Elaborator_Expr_mkAnnotation(x_1676, x_1665); -x_1678 = lean_expr_mk_app(x_1677, x_1675); -lean::cnstr_set(x_1673, 0, x_1678); -x_86 = x_1673; -goto block_130; -} -else -{ -obj* x_1679; obj* x_1680; obj* x_1681; obj* x_1682; obj* x_1683; obj* x_1684; -x_1679 = lean::cnstr_get(x_1673, 0); -x_1680 = lean::cnstr_get(x_1673, 1); -lean::inc(x_1680); -lean::inc(x_1679); -lean::dec(x_1673); -x_1681 = l_Lean_Elaborator_toPexpr___main___closed__39; -x_1682 = l_Lean_Elaborator_Expr_mkAnnotation(x_1681, x_1665); -x_1683 = lean_expr_mk_app(x_1682, x_1679); -x_1684 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1684, 0, x_1683); -lean::cnstr_set(x_1684, 1, x_1680); -x_86 = x_1684; -goto block_130; -} -} -} -else -{ -obj* x_1685; obj* x_1686; obj* x_1687; obj* x_1688; -x_1685 = lean::cnstr_get(x_1666, 0); -lean::inc(x_1685); -lean::dec(x_1666); -x_1686 = lean::cnstr_get(x_1685, 1); -lean::inc(x_1686); -lean::dec(x_1685); -x_1687 = lean::cnstr_get(x_1686, 1); -lean::inc(x_1687); -lean::dec(x_1686); -x_1688 = l_Lean_Elaborator_toPexpr___main(x_1687, x_2, x_3, x_1662); -if (lean::obj_tag(x_1688) == 0) -{ -uint8 x_1689; -lean::dec(x_1665); -lean::dec(x_15); -lean::dec(x_1); -x_1689 = !lean::is_exclusive(x_1688); -if (x_1689 == 0) -{ -return x_1688; -} -else -{ -obj* x_1690; obj* x_1691; -x_1690 = lean::cnstr_get(x_1688, 0); -lean::inc(x_1690); -lean::dec(x_1688); -x_1691 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1691, 0, x_1690); -return x_1691; -} -} -else -{ -obj* x_1692; uint8 x_1693; -x_1692 = lean::cnstr_get(x_1688, 0); -lean::inc(x_1692); -lean::dec(x_1688); -x_1693 = !lean::is_exclusive(x_1692); -if (x_1693 == 0) -{ -obj* x_1694; obj* x_1695; obj* x_1696; obj* x_1697; -x_1694 = lean::cnstr_get(x_1692, 0); -x_1695 = l_Lean_Elaborator_toPexpr___main___closed__39; -x_1696 = l_Lean_Elaborator_Expr_mkAnnotation(x_1695, x_1665); -x_1697 = lean_expr_mk_app(x_1696, x_1694); -lean::cnstr_set(x_1692, 0, x_1697); -x_86 = x_1692; -goto block_130; -} -else -{ -obj* x_1698; obj* x_1699; obj* x_1700; obj* x_1701; obj* x_1702; obj* x_1703; -x_1698 = lean::cnstr_get(x_1692, 0); -x_1699 = lean::cnstr_get(x_1692, 1); -lean::inc(x_1699); -lean::inc(x_1698); -lean::dec(x_1692); -x_1700 = l_Lean_Elaborator_toPexpr___main___closed__39; -x_1701 = l_Lean_Elaborator_Expr_mkAnnotation(x_1700, x_1665); -x_1702 = lean_expr_mk_app(x_1701, x_1698); -x_1703 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1703, 0, x_1702); -lean::cnstr_set(x_1703, 1, x_1699); -x_86 = x_1703; -goto block_130; -} -} -} -} -} -} -else -{ -obj* x_1704; obj* x_1705; obj* x_1706; obj* x_1707; obj* x_1708; obj* x_1709; -x_1704 = lean::cnstr_get(x_1645, 2); -lean::inc(x_1704); -x_1705 = lean::cnstr_get(x_1645, 5); -lean::inc(x_1705); -x_1706 = lean::cnstr_get(x_1646, 0); -lean::inc(x_1706); -lean::dec(x_1646); -x_1707 = lean::cnstr_get(x_1706, 0); -lean::inc(x_1707); -lean::dec(x_1706); -x_1708 = l_Lean_Elaborator_mangleIdent(x_1707); -x_1709 = l_Lean_Elaborator_toPexpr___main(x_1704, x_2, x_3, x_4); -if (lean::obj_tag(x_1709) == 0) -{ -uint8 x_1710; -lean::dec(x_1708); -lean::dec(x_1705); -lean::dec(x_1645); -lean::dec(x_15); -lean::dec(x_1); -x_1710 = !lean::is_exclusive(x_1709); -if (x_1710 == 0) -{ -return x_1709; -} -else -{ -obj* x_1711; obj* x_1712; -x_1711 = lean::cnstr_get(x_1709, 0); -lean::inc(x_1711); -lean::dec(x_1709); -x_1712 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1712, 0, x_1711); -return x_1712; -} -} -else -{ -obj* x_1713; obj* x_1714; obj* x_1715; obj* x_1716; -x_1713 = lean::cnstr_get(x_1709, 0); -lean::inc(x_1713); -lean::dec(x_1709); -x_1714 = lean::cnstr_get(x_1713, 0); -lean::inc(x_1714); -x_1715 = lean::cnstr_get(x_1713, 1); -lean::inc(x_1715); -lean::dec(x_1713); -x_1716 = l_Lean_Elaborator_toPexpr___main(x_1705, x_2, x_3, x_1715); -if (lean::obj_tag(x_1716) == 0) -{ -uint8 x_1717; -lean::dec(x_1714); -lean::dec(x_1708); -lean::dec(x_1645); -lean::dec(x_15); -lean::dec(x_1); -x_1717 = !lean::is_exclusive(x_1716); -if (x_1717 == 0) -{ -return x_1716; -} -else -{ -obj* x_1718; obj* x_1719; -x_1718 = lean::cnstr_get(x_1716, 0); -lean::inc(x_1718); -lean::dec(x_1716); -x_1719 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1719, 0, x_1718); -return x_1719; -} -} -else -{ -obj* x_1720; obj* x_1721; obj* x_1722; uint8 x_1723; obj* x_1724; obj* x_1725; -x_1720 = lean::cnstr_get(x_1716, 0); -lean::inc(x_1720); -lean::dec(x_1716); -x_1721 = lean::cnstr_get(x_1720, 0); -lean::inc(x_1721); -x_1722 = lean::cnstr_get(x_1720, 1); -lean::inc(x_1722); -lean::dec(x_1720); -x_1723 = 0; -x_1724 = lean_expr_mk_lambda(x_1708, x_1723, x_1714, x_1721); -x_1725 = lean::cnstr_get(x_1645, 3); -lean::inc(x_1725); -lean::dec(x_1645); -if (lean::obj_tag(x_1725) == 0) -{ -obj* x_1726; obj* x_1727; obj* x_1728; -x_1726 = lean::cnstr_get(x_1725, 0); -lean::inc(x_1726); -lean::dec(x_1725); -x_1727 = lean::cnstr_get(x_1726, 1); -lean::inc(x_1727); -lean::dec(x_1726); -x_1728 = l_Lean_Elaborator_toPexpr___main(x_1727, x_2, x_3, x_1722); -if (lean::obj_tag(x_1728) == 0) -{ -uint8 x_1729; -lean::dec(x_1724); -lean::dec(x_15); -lean::dec(x_1); -x_1729 = !lean::is_exclusive(x_1728); -if (x_1729 == 0) -{ -return x_1728; -} -else -{ -obj* x_1730; obj* x_1731; -x_1730 = lean::cnstr_get(x_1728, 0); -lean::inc(x_1730); -lean::dec(x_1728); -x_1731 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1731, 0, x_1730); -return x_1731; -} -} -else -{ -obj* x_1732; uint8 x_1733; -x_1732 = lean::cnstr_get(x_1728, 0); -lean::inc(x_1732); -lean::dec(x_1728); -x_1733 = !lean::is_exclusive(x_1732); -if (x_1733 == 0) -{ -obj* x_1734; obj* x_1735; obj* x_1736; obj* x_1737; -x_1734 = lean::cnstr_get(x_1732, 0); -x_1735 = l_Lean_Elaborator_toPexpr___main___closed__39; -x_1736 = l_Lean_Elaborator_Expr_mkAnnotation(x_1735, x_1724); -x_1737 = lean_expr_mk_app(x_1736, x_1734); -lean::cnstr_set(x_1732, 0, x_1737); -x_86 = x_1732; -goto block_130; -} -else -{ -obj* x_1738; obj* x_1739; obj* x_1740; obj* x_1741; obj* x_1742; obj* x_1743; -x_1738 = lean::cnstr_get(x_1732, 0); -x_1739 = lean::cnstr_get(x_1732, 1); -lean::inc(x_1739); -lean::inc(x_1738); -lean::dec(x_1732); -x_1740 = l_Lean_Elaborator_toPexpr___main___closed__39; -x_1741 = l_Lean_Elaborator_Expr_mkAnnotation(x_1740, x_1724); -x_1742 = lean_expr_mk_app(x_1741, x_1738); -x_1743 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1743, 0, x_1742); -lean::cnstr_set(x_1743, 1, x_1739); -x_86 = x_1743; -goto block_130; -} -} -} -else -{ -obj* x_1744; obj* x_1745; obj* x_1746; obj* x_1747; -x_1744 = lean::cnstr_get(x_1725, 0); -lean::inc(x_1744); -lean::dec(x_1725); -x_1745 = lean::cnstr_get(x_1744, 1); -lean::inc(x_1745); -lean::dec(x_1744); -x_1746 = lean::cnstr_get(x_1745, 1); -lean::inc(x_1746); -lean::dec(x_1745); -x_1747 = l_Lean_Elaborator_toPexpr___main(x_1746, x_2, x_3, x_1722); -if (lean::obj_tag(x_1747) == 0) -{ -uint8 x_1748; -lean::dec(x_1724); -lean::dec(x_15); -lean::dec(x_1); -x_1748 = !lean::is_exclusive(x_1747); -if (x_1748 == 0) -{ -return x_1747; -} -else -{ -obj* x_1749; obj* x_1750; -x_1749 = lean::cnstr_get(x_1747, 0); -lean::inc(x_1749); -lean::dec(x_1747); -x_1750 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1750, 0, x_1749); -return x_1750; -} -} -else -{ -obj* x_1751; uint8 x_1752; -x_1751 = lean::cnstr_get(x_1747, 0); -lean::inc(x_1751); -lean::dec(x_1747); -x_1752 = !lean::is_exclusive(x_1751); -if (x_1752 == 0) -{ -obj* x_1753; obj* x_1754; obj* x_1755; obj* x_1756; -x_1753 = lean::cnstr_get(x_1751, 0); -x_1754 = l_Lean_Elaborator_toPexpr___main___closed__39; -x_1755 = l_Lean_Elaborator_Expr_mkAnnotation(x_1754, x_1724); -x_1756 = lean_expr_mk_app(x_1755, x_1753); -lean::cnstr_set(x_1751, 0, x_1756); -x_86 = x_1751; -goto block_130; -} -else -{ -obj* x_1757; obj* x_1758; obj* x_1759; obj* x_1760; obj* x_1761; obj* x_1762; -x_1757 = lean::cnstr_get(x_1751, 0); -x_1758 = lean::cnstr_get(x_1751, 1); -lean::inc(x_1758); -lean::inc(x_1757); -lean::dec(x_1751); -x_1759 = l_Lean_Elaborator_toPexpr___main___closed__39; -x_1760 = l_Lean_Elaborator_Expr_mkAnnotation(x_1759, x_1724); -x_1761 = lean_expr_mk_app(x_1760, x_1757); -x_1762 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1762, 0, x_1761); -lean::cnstr_set(x_1762, 1, x_1758); -x_86 = x_1762; -goto block_130; -} -} -} -} -} -} -} -} -else -{ -obj* x_1763; -lean::dec(x_16); -lean::dec(x_15); -x_1763 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1763) == 0) -{ -obj* x_1764; obj* x_1765; obj* x_1766; -x_1764 = l_Lean_Elaborator_toPexpr___main___closed__40; -x_1765 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1765, 0, x_1764); -lean::cnstr_set(x_1765, 1, x_4); -x_1766 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1766, 0, x_1765); -return x_1766; -} -else -{ -obj* x_1767; obj* x_1768; obj* x_1769; obj* x_1770; obj* x_1771; obj* x_1772; obj* x_1773; obj* x_1774; obj* x_1775; obj* x_1776; obj* x_1777; obj* x_1778; obj* x_1779; obj* x_1780; obj* x_1781; -x_1767 = lean::cnstr_get(x_1763, 0); -lean::inc(x_1767); -lean::dec(x_1763); -x_1768 = lean::cnstr_get(x_3, 0); -x_1769 = lean::cnstr_get(x_1768, 2); -x_1770 = l_Lean_FileMap_toPosition(x_1769, x_1767); -x_1771 = lean::cnstr_get(x_1770, 1); -lean::inc(x_1771); -x_1772 = lean::box(0); -x_1773 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1774 = l_Lean_KVMap_setNat(x_1772, x_1773, x_1771); -x_1775 = lean::cnstr_get(x_1770, 0); -lean::inc(x_1775); -lean::dec(x_1770); -x_1776 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1777 = l_Lean_KVMap_setNat(x_1774, x_1776, x_1775); -x_1778 = l_Lean_Elaborator_toPexpr___main___closed__40; -x_1779 = lean_expr_mk_mdata(x_1777, x_1778); -x_1780 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1780, 0, x_1779); -lean::cnstr_set(x_1780, 1, x_4); -x_1781 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1781, 0, x_1780); -return x_1781; -} -} -} -else -{ -obj* x_1782; obj* x_1783; obj* x_1784; obj* x_1785; obj* x_1786; obj* x_1787; obj* x_1788; obj* x_1789; -lean::dec(x_16); -lean::dec(x_15); -x_1782 = l_Lean_Parser_Term_anonymousConstructor_HasView; -x_1783 = lean::cnstr_get(x_1782, 0); -lean::inc(x_1783); -lean::inc(x_1); -x_1784 = lean::apply_1(x_1783, x_1); -x_1785 = lean::cnstr_get(x_1784, 1); -lean::inc(x_1785); -lean::dec(x_1784); -x_1786 = l_List_map___main___at_Lean_Expander_paren_transform___spec__1(x_1785); -x_1787 = l_Lean_Expander_getOptType___main___closed__1; -x_1788 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_1787, x_1786); -x_1789 = l_Lean_Elaborator_toPexpr___main(x_1788, x_2, x_3, x_4); -if (lean::obj_tag(x_1789) == 0) -{ -uint8 x_1790; -lean::dec(x_1); -x_1790 = !lean::is_exclusive(x_1789); -if (x_1790 == 0) -{ -return x_1789; -} -else -{ -obj* x_1791; obj* x_1792; -x_1791 = lean::cnstr_get(x_1789, 0); -lean::inc(x_1791); -lean::dec(x_1789); -x_1792 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1792, 0, x_1791); -return x_1792; -} -} -else -{ -uint8 x_1793; -x_1793 = !lean::is_exclusive(x_1789); -if (x_1793 == 0) -{ -obj* x_1794; uint8 x_1795; -x_1794 = lean::cnstr_get(x_1789, 0); -x_1795 = !lean::is_exclusive(x_1794); -if (x_1795 == 0) -{ -obj* x_1796; obj* x_1797; obj* x_1798; obj* x_1799; -x_1796 = lean::cnstr_get(x_1794, 0); -x_1797 = l_Lean_Elaborator_toPexpr___main___closed__41; -x_1798 = l_Lean_Elaborator_Expr_mkAnnotation(x_1797, x_1796); -x_1799 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1799) == 0) -{ -lean::cnstr_set(x_1794, 0, x_1798); -return x_1789; -} -else -{ -obj* x_1800; obj* x_1801; obj* x_1802; obj* x_1803; obj* x_1804; obj* x_1805; obj* x_1806; obj* x_1807; obj* x_1808; obj* x_1809; obj* x_1810; obj* x_1811; -x_1800 = lean::cnstr_get(x_1799, 0); -lean::inc(x_1800); -lean::dec(x_1799); -x_1801 = lean::cnstr_get(x_3, 0); -x_1802 = lean::cnstr_get(x_1801, 2); -x_1803 = l_Lean_FileMap_toPosition(x_1802, x_1800); -x_1804 = lean::cnstr_get(x_1803, 1); -lean::inc(x_1804); -x_1805 = lean::box(0); -x_1806 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1807 = l_Lean_KVMap_setNat(x_1805, x_1806, x_1804); -x_1808 = lean::cnstr_get(x_1803, 0); -lean::inc(x_1808); -lean::dec(x_1803); -x_1809 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1810 = l_Lean_KVMap_setNat(x_1807, x_1809, x_1808); -x_1811 = lean_expr_mk_mdata(x_1810, x_1798); -lean::cnstr_set(x_1794, 0, x_1811); -return x_1789; -} -} -else -{ -obj* x_1812; obj* x_1813; obj* x_1814; obj* x_1815; obj* x_1816; -x_1812 = lean::cnstr_get(x_1794, 0); -x_1813 = lean::cnstr_get(x_1794, 1); -lean::inc(x_1813); -lean::inc(x_1812); -lean::dec(x_1794); -x_1814 = l_Lean_Elaborator_toPexpr___main___closed__41; -x_1815 = l_Lean_Elaborator_Expr_mkAnnotation(x_1814, x_1812); -x_1816 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1816) == 0) -{ -obj* x_1817; -x_1817 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1817, 0, x_1815); -lean::cnstr_set(x_1817, 1, x_1813); -lean::cnstr_set(x_1789, 0, x_1817); -return x_1789; -} -else -{ -obj* x_1818; obj* x_1819; obj* x_1820; obj* x_1821; obj* x_1822; obj* x_1823; obj* x_1824; obj* x_1825; obj* x_1826; obj* x_1827; obj* x_1828; obj* x_1829; obj* x_1830; -x_1818 = lean::cnstr_get(x_1816, 0); -lean::inc(x_1818); -lean::dec(x_1816); -x_1819 = lean::cnstr_get(x_3, 0); -x_1820 = lean::cnstr_get(x_1819, 2); -x_1821 = l_Lean_FileMap_toPosition(x_1820, x_1818); -x_1822 = lean::cnstr_get(x_1821, 1); -lean::inc(x_1822); -x_1823 = lean::box(0); -x_1824 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1825 = l_Lean_KVMap_setNat(x_1823, x_1824, x_1822); -x_1826 = lean::cnstr_get(x_1821, 0); -lean::inc(x_1826); -lean::dec(x_1821); -x_1827 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1828 = l_Lean_KVMap_setNat(x_1825, x_1827, x_1826); -x_1829 = lean_expr_mk_mdata(x_1828, x_1815); -x_1830 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1830, 0, x_1829); -lean::cnstr_set(x_1830, 1, x_1813); -lean::cnstr_set(x_1789, 0, x_1830); -return x_1789; -} -} -} -else -{ -obj* x_1831; obj* x_1832; obj* x_1833; obj* x_1834; obj* x_1835; obj* x_1836; obj* x_1837; -x_1831 = lean::cnstr_get(x_1789, 0); -lean::inc(x_1831); -lean::dec(x_1789); -x_1832 = lean::cnstr_get(x_1831, 0); -lean::inc(x_1832); -x_1833 = lean::cnstr_get(x_1831, 1); -lean::inc(x_1833); -if (lean::is_exclusive(x_1831)) { - lean::cnstr_release(x_1831, 0); - lean::cnstr_release(x_1831, 1); - x_1834 = x_1831; -} else { - lean::dec_ref(x_1831); - x_1834 = lean::box(0); -} -x_1835 = l_Lean_Elaborator_toPexpr___main___closed__41; -x_1836 = l_Lean_Elaborator_Expr_mkAnnotation(x_1835, x_1832); -x_1837 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1837) == 0) -{ -obj* x_1838; obj* x_1839; -if (lean::is_scalar(x_1834)) { - x_1838 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1838 = x_1834; -} -lean::cnstr_set(x_1838, 0, x_1836); -lean::cnstr_set(x_1838, 1, x_1833); -x_1839 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1839, 0, x_1838); -return x_1839; -} -else -{ -obj* x_1840; obj* x_1841; obj* x_1842; obj* x_1843; obj* x_1844; obj* x_1845; obj* x_1846; obj* x_1847; obj* x_1848; obj* x_1849; obj* x_1850; obj* x_1851; obj* x_1852; obj* x_1853; -x_1840 = lean::cnstr_get(x_1837, 0); -lean::inc(x_1840); -lean::dec(x_1837); -x_1841 = lean::cnstr_get(x_3, 0); -x_1842 = lean::cnstr_get(x_1841, 2); -x_1843 = l_Lean_FileMap_toPosition(x_1842, x_1840); -x_1844 = lean::cnstr_get(x_1843, 1); -lean::inc(x_1844); -x_1845 = lean::box(0); -x_1846 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1847 = l_Lean_KVMap_setNat(x_1845, x_1846, x_1844); -x_1848 = lean::cnstr_get(x_1843, 0); -lean::inc(x_1848); -lean::dec(x_1843); -x_1849 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1850 = l_Lean_KVMap_setNat(x_1847, x_1849, x_1848); -x_1851 = lean_expr_mk_mdata(x_1850, x_1836); -if (lean::is_scalar(x_1834)) { - x_1852 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1852 = x_1834; -} -lean::cnstr_set(x_1852, 0, x_1851); -lean::cnstr_set(x_1852, 1, x_1833); -x_1853 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1853, 0, x_1852); -return x_1853; -} -} -} -} -} -else -{ -obj* x_1854; obj* x_1855; obj* x_1856; obj* x_1857; obj* x_1858; obj* x_1859; obj* x_1860; -lean::dec(x_16); -lean::dec(x_15); -x_1854 = l_Lean_Parser_Term_sortApp_HasView; -x_1855 = lean::cnstr_get(x_1854, 0); -lean::inc(x_1855); -lean::inc(x_1); -x_1856 = lean::apply_1(x_1855, x_1); -x_1857 = l_Lean_Parser_Term_sort_HasView; -x_1858 = lean::cnstr_get(x_1857, 0); -lean::inc(x_1858); -x_1859 = lean::cnstr_get(x_1856, 0); -lean::inc(x_1859); -x_1860 = lean::apply_1(x_1858, x_1859); -if (lean::obj_tag(x_1860) == 0) -{ -obj* x_1861; obj* x_1862; -lean::dec(x_1860); -x_1861 = lean::cnstr_get(x_1856, 1); -lean::inc(x_1861); -lean::dec(x_1856); -x_1862 = l_Lean_Elaborator_toLevel___main(x_1861, x_2, x_3, x_4); -if (lean::obj_tag(x_1862) == 0) -{ -uint8 x_1863; -lean::dec(x_1); -x_1863 = !lean::is_exclusive(x_1862); -if (x_1863 == 0) -{ -return x_1862; -} -else -{ -obj* x_1864; obj* x_1865; -x_1864 = lean::cnstr_get(x_1862, 0); -lean::inc(x_1864); -lean::dec(x_1862); -x_1865 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1865, 0, x_1864); -return x_1865; -} -} -else -{ -uint8 x_1866; -x_1866 = !lean::is_exclusive(x_1862); -if (x_1866 == 0) -{ -obj* x_1867; uint8 x_1868; -x_1867 = lean::cnstr_get(x_1862, 0); -x_1868 = !lean::is_exclusive(x_1867); -if (x_1868 == 0) -{ -obj* x_1869; obj* x_1870; obj* x_1871; -x_1869 = lean::cnstr_get(x_1867, 0); -x_1870 = lean_expr_mk_sort(x_1869); -x_1871 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1871) == 0) -{ -lean::cnstr_set(x_1867, 0, x_1870); -return x_1862; -} -else -{ -obj* x_1872; obj* x_1873; obj* x_1874; obj* x_1875; obj* x_1876; obj* x_1877; obj* x_1878; obj* x_1879; obj* x_1880; obj* x_1881; obj* x_1882; obj* x_1883; -x_1872 = lean::cnstr_get(x_1871, 0); -lean::inc(x_1872); -lean::dec(x_1871); -x_1873 = lean::cnstr_get(x_3, 0); -x_1874 = lean::cnstr_get(x_1873, 2); -x_1875 = l_Lean_FileMap_toPosition(x_1874, x_1872); -x_1876 = lean::cnstr_get(x_1875, 1); -lean::inc(x_1876); -x_1877 = lean::box(0); -x_1878 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1879 = l_Lean_KVMap_setNat(x_1877, x_1878, x_1876); -x_1880 = lean::cnstr_get(x_1875, 0); -lean::inc(x_1880); -lean::dec(x_1875); -x_1881 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1882 = l_Lean_KVMap_setNat(x_1879, x_1881, x_1880); -x_1883 = lean_expr_mk_mdata(x_1882, x_1870); -lean::cnstr_set(x_1867, 0, x_1883); -return x_1862; -} -} -else -{ -obj* x_1884; obj* x_1885; obj* x_1886; obj* x_1887; -x_1884 = lean::cnstr_get(x_1867, 0); -x_1885 = lean::cnstr_get(x_1867, 1); -lean::inc(x_1885); -lean::inc(x_1884); -lean::dec(x_1867); -x_1886 = lean_expr_mk_sort(x_1884); -x_1887 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1887) == 0) -{ -obj* x_1888; -x_1888 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1888, 0, x_1886); -lean::cnstr_set(x_1888, 1, x_1885); -lean::cnstr_set(x_1862, 0, x_1888); -return x_1862; -} -else -{ -obj* x_1889; obj* x_1890; obj* x_1891; obj* x_1892; obj* x_1893; obj* x_1894; obj* x_1895; obj* x_1896; obj* x_1897; obj* x_1898; obj* x_1899; obj* x_1900; obj* x_1901; -x_1889 = lean::cnstr_get(x_1887, 0); -lean::inc(x_1889); -lean::dec(x_1887); -x_1890 = lean::cnstr_get(x_3, 0); -x_1891 = lean::cnstr_get(x_1890, 2); -x_1892 = l_Lean_FileMap_toPosition(x_1891, x_1889); -x_1893 = lean::cnstr_get(x_1892, 1); -lean::inc(x_1893); -x_1894 = lean::box(0); -x_1895 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1896 = l_Lean_KVMap_setNat(x_1894, x_1895, x_1893); -x_1897 = lean::cnstr_get(x_1892, 0); -lean::inc(x_1897); -lean::dec(x_1892); -x_1898 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1899 = l_Lean_KVMap_setNat(x_1896, x_1898, x_1897); -x_1900 = lean_expr_mk_mdata(x_1899, x_1886); -x_1901 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1901, 0, x_1900); -lean::cnstr_set(x_1901, 1, x_1885); -lean::cnstr_set(x_1862, 0, x_1901); -return x_1862; -} -} -} -else -{ -obj* x_1902; obj* x_1903; obj* x_1904; obj* x_1905; obj* x_1906; obj* x_1907; -x_1902 = lean::cnstr_get(x_1862, 0); -lean::inc(x_1902); -lean::dec(x_1862); -x_1903 = lean::cnstr_get(x_1902, 0); -lean::inc(x_1903); -x_1904 = lean::cnstr_get(x_1902, 1); -lean::inc(x_1904); -if (lean::is_exclusive(x_1902)) { - lean::cnstr_release(x_1902, 0); - lean::cnstr_release(x_1902, 1); - x_1905 = x_1902; -} else { - lean::dec_ref(x_1902); - x_1905 = lean::box(0); -} -x_1906 = lean_expr_mk_sort(x_1903); -x_1907 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1907) == 0) -{ -obj* x_1908; obj* x_1909; -if (lean::is_scalar(x_1905)) { - x_1908 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1908 = x_1905; -} -lean::cnstr_set(x_1908, 0, x_1906); -lean::cnstr_set(x_1908, 1, x_1904); -x_1909 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1909, 0, x_1908); -return x_1909; -} -else -{ -obj* x_1910; obj* x_1911; obj* x_1912; obj* x_1913; obj* x_1914; obj* x_1915; obj* x_1916; obj* x_1917; obj* x_1918; obj* x_1919; obj* x_1920; obj* x_1921; obj* x_1922; obj* x_1923; -x_1910 = lean::cnstr_get(x_1907, 0); -lean::inc(x_1910); -lean::dec(x_1907); -x_1911 = lean::cnstr_get(x_3, 0); -x_1912 = lean::cnstr_get(x_1911, 2); -x_1913 = l_Lean_FileMap_toPosition(x_1912, x_1910); -x_1914 = lean::cnstr_get(x_1913, 1); -lean::inc(x_1914); -x_1915 = lean::box(0); -x_1916 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1917 = l_Lean_KVMap_setNat(x_1915, x_1916, x_1914); -x_1918 = lean::cnstr_get(x_1913, 0); -lean::inc(x_1918); -lean::dec(x_1913); -x_1919 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1920 = l_Lean_KVMap_setNat(x_1917, x_1919, x_1918); -x_1921 = lean_expr_mk_mdata(x_1920, x_1906); -if (lean::is_scalar(x_1905)) { - x_1922 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1922 = x_1905; -} -lean::cnstr_set(x_1922, 0, x_1921); -lean::cnstr_set(x_1922, 1, x_1904); -x_1923 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1923, 0, x_1922); -return x_1923; -} -} -} -} -else -{ -obj* x_1924; obj* x_1925; -lean::dec(x_1860); -x_1924 = lean::cnstr_get(x_1856, 1); -lean::inc(x_1924); -lean::dec(x_1856); -x_1925 = l_Lean_Elaborator_toLevel___main(x_1924, x_2, x_3, x_4); -if (lean::obj_tag(x_1925) == 0) -{ -uint8 x_1926; -lean::dec(x_1); -x_1926 = !lean::is_exclusive(x_1925); -if (x_1926 == 0) -{ -return x_1925; -} -else -{ -obj* x_1927; obj* x_1928; -x_1927 = lean::cnstr_get(x_1925, 0); -lean::inc(x_1927); -lean::dec(x_1925); -x_1928 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1928, 0, x_1927); -return x_1928; -} -} -else -{ -uint8 x_1929; -x_1929 = !lean::is_exclusive(x_1925); -if (x_1929 == 0) -{ -obj* x_1930; uint8 x_1931; -x_1930 = lean::cnstr_get(x_1925, 0); -x_1931 = !lean::is_exclusive(x_1930); -if (x_1931 == 0) -{ -obj* x_1932; obj* x_1933; obj* x_1934; obj* x_1935; -x_1932 = lean::cnstr_get(x_1930, 0); -x_1933 = level_mk_succ(x_1932); -x_1934 = lean_expr_mk_sort(x_1933); -x_1935 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1935) == 0) -{ -lean::cnstr_set(x_1930, 0, x_1934); -return x_1925; -} -else -{ -obj* x_1936; obj* x_1937; obj* x_1938; obj* x_1939; obj* x_1940; obj* x_1941; obj* x_1942; obj* x_1943; obj* x_1944; obj* x_1945; obj* x_1946; obj* x_1947; -x_1936 = lean::cnstr_get(x_1935, 0); -lean::inc(x_1936); -lean::dec(x_1935); -x_1937 = lean::cnstr_get(x_3, 0); -x_1938 = lean::cnstr_get(x_1937, 2); -x_1939 = l_Lean_FileMap_toPosition(x_1938, x_1936); -x_1940 = lean::cnstr_get(x_1939, 1); -lean::inc(x_1940); -x_1941 = lean::box(0); -x_1942 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1943 = l_Lean_KVMap_setNat(x_1941, x_1942, x_1940); -x_1944 = lean::cnstr_get(x_1939, 0); -lean::inc(x_1944); -lean::dec(x_1939); -x_1945 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1946 = l_Lean_KVMap_setNat(x_1943, x_1945, x_1944); -x_1947 = lean_expr_mk_mdata(x_1946, x_1934); -lean::cnstr_set(x_1930, 0, x_1947); -return x_1925; -} -} -else -{ -obj* x_1948; obj* x_1949; obj* x_1950; obj* x_1951; obj* x_1952; -x_1948 = lean::cnstr_get(x_1930, 0); -x_1949 = lean::cnstr_get(x_1930, 1); -lean::inc(x_1949); -lean::inc(x_1948); -lean::dec(x_1930); -x_1950 = level_mk_succ(x_1948); -x_1951 = lean_expr_mk_sort(x_1950); -x_1952 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1952) == 0) -{ -obj* x_1953; -x_1953 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1953, 0, x_1951); -lean::cnstr_set(x_1953, 1, x_1949); -lean::cnstr_set(x_1925, 0, x_1953); -return x_1925; -} -else -{ -obj* x_1954; obj* x_1955; obj* x_1956; obj* x_1957; obj* x_1958; obj* x_1959; obj* x_1960; obj* x_1961; obj* x_1962; obj* x_1963; obj* x_1964; obj* x_1965; obj* x_1966; -x_1954 = lean::cnstr_get(x_1952, 0); -lean::inc(x_1954); -lean::dec(x_1952); -x_1955 = lean::cnstr_get(x_3, 0); -x_1956 = lean::cnstr_get(x_1955, 2); -x_1957 = l_Lean_FileMap_toPosition(x_1956, x_1954); -x_1958 = lean::cnstr_get(x_1957, 1); -lean::inc(x_1958); -x_1959 = lean::box(0); -x_1960 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1961 = l_Lean_KVMap_setNat(x_1959, x_1960, x_1958); -x_1962 = lean::cnstr_get(x_1957, 0); -lean::inc(x_1962); -lean::dec(x_1957); -x_1963 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1964 = l_Lean_KVMap_setNat(x_1961, x_1963, x_1962); -x_1965 = lean_expr_mk_mdata(x_1964, x_1951); -x_1966 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1966, 0, x_1965); -lean::cnstr_set(x_1966, 1, x_1949); -lean::cnstr_set(x_1925, 0, x_1966); -return x_1925; -} -} -} -else -{ -obj* x_1967; obj* x_1968; obj* x_1969; obj* x_1970; obj* x_1971; obj* x_1972; obj* x_1973; -x_1967 = lean::cnstr_get(x_1925, 0); -lean::inc(x_1967); -lean::dec(x_1925); -x_1968 = lean::cnstr_get(x_1967, 0); -lean::inc(x_1968); -x_1969 = lean::cnstr_get(x_1967, 1); -lean::inc(x_1969); -if (lean::is_exclusive(x_1967)) { - lean::cnstr_release(x_1967, 0); - lean::cnstr_release(x_1967, 1); - x_1970 = x_1967; -} else { - lean::dec_ref(x_1967); - x_1970 = lean::box(0); -} -x_1971 = level_mk_succ(x_1968); -x_1972 = lean_expr_mk_sort(x_1971); -x_1973 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1973) == 0) -{ -obj* x_1974; obj* x_1975; -if (lean::is_scalar(x_1970)) { - x_1974 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1974 = x_1970; -} -lean::cnstr_set(x_1974, 0, x_1972); -lean::cnstr_set(x_1974, 1, x_1969); -x_1975 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1975, 0, x_1974); -return x_1975; -} -else -{ -obj* x_1976; obj* x_1977; obj* x_1978; obj* x_1979; obj* x_1980; obj* x_1981; obj* x_1982; obj* x_1983; obj* x_1984; obj* x_1985; obj* x_1986; obj* x_1987; obj* x_1988; obj* x_1989; -x_1976 = lean::cnstr_get(x_1973, 0); -lean::inc(x_1976); -lean::dec(x_1973); -x_1977 = lean::cnstr_get(x_3, 0); -x_1978 = lean::cnstr_get(x_1977, 2); -x_1979 = l_Lean_FileMap_toPosition(x_1978, x_1976); -x_1980 = lean::cnstr_get(x_1979, 1); -lean::inc(x_1980); -x_1981 = lean::box(0); -x_1982 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_1983 = l_Lean_KVMap_setNat(x_1981, x_1982, x_1980); -x_1984 = lean::cnstr_get(x_1979, 0); -lean::inc(x_1984); -lean::dec(x_1979); -x_1985 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_1986 = l_Lean_KVMap_setNat(x_1983, x_1985, x_1984); -x_1987 = lean_expr_mk_mdata(x_1986, x_1972); -if (lean::is_scalar(x_1970)) { - x_1988 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1988 = x_1970; -} -lean::cnstr_set(x_1988, 0, x_1987); -lean::cnstr_set(x_1988, 1, x_1969); -x_1989 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1989, 0, x_1988); -return x_1989; -} -} -} -} -} -} -else -{ -obj* x_1990; obj* x_1991; obj* x_1992; -lean::dec(x_16); -lean::dec(x_15); -x_1990 = l_Lean_Parser_Term_sort_HasView; -x_1991 = lean::cnstr_get(x_1990, 0); -lean::inc(x_1991); -lean::inc(x_1); -x_1992 = lean::apply_1(x_1991, x_1); -if (lean::obj_tag(x_1992) == 0) -{ -obj* x_1993; -lean::dec(x_1992); -x_1993 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_1993) == 0) -{ -obj* x_1994; obj* x_1995; obj* x_1996; -x_1994 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_1995 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1995, 0, x_1994); -lean::cnstr_set(x_1995, 1, x_4); -x_1996 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1996, 0, x_1995); -return x_1996; -} -else -{ -obj* x_1997; obj* x_1998; obj* x_1999; obj* x_2000; obj* x_2001; obj* x_2002; obj* x_2003; obj* x_2004; obj* x_2005; obj* x_2006; obj* x_2007; obj* x_2008; obj* x_2009; obj* x_2010; obj* x_2011; -x_1997 = lean::cnstr_get(x_1993, 0); -lean::inc(x_1997); -lean::dec(x_1993); -x_1998 = lean::cnstr_get(x_3, 0); -x_1999 = lean::cnstr_get(x_1998, 2); -x_2000 = l_Lean_FileMap_toPosition(x_1999, x_1997); -x_2001 = lean::cnstr_get(x_2000, 1); -lean::inc(x_2001); -x_2002 = lean::box(0); -x_2003 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_2004 = l_Lean_KVMap_setNat(x_2002, x_2003, x_2001); -x_2005 = lean::cnstr_get(x_2000, 0); -lean::inc(x_2005); -lean::dec(x_2000); -x_2006 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_2007 = l_Lean_KVMap_setNat(x_2004, x_2006, x_2005); -x_2008 = l_Lean_Elaborator_toPexpr___main___closed__25; -x_2009 = lean_expr_mk_mdata(x_2007, x_2008); -x_2010 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2010, 0, x_2009); -lean::cnstr_set(x_2010, 1, x_4); -x_2011 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2011, 0, x_2010); -return x_2011; -} -} -else -{ -obj* x_2012; -lean::dec(x_1992); -x_2012 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_2012) == 0) -{ -obj* x_2013; obj* x_2014; obj* x_2015; -x_2013 = l_Lean_Elaborator_toPexpr___main___closed__42; -x_2014 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2014, 0, x_2013); -lean::cnstr_set(x_2014, 1, x_4); -x_2015 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2015, 0, x_2014); -return x_2015; -} -else -{ -obj* x_2016; obj* x_2017; obj* x_2018; obj* x_2019; obj* x_2020; obj* x_2021; obj* x_2022; obj* x_2023; obj* x_2024; obj* x_2025; obj* x_2026; obj* x_2027; obj* x_2028; obj* x_2029; obj* x_2030; -x_2016 = lean::cnstr_get(x_2012, 0); -lean::inc(x_2016); -lean::dec(x_2012); -x_2017 = lean::cnstr_get(x_3, 0); -x_2018 = lean::cnstr_get(x_2017, 2); -x_2019 = l_Lean_FileMap_toPosition(x_2018, x_2016); -x_2020 = lean::cnstr_get(x_2019, 1); -lean::inc(x_2020); -x_2021 = lean::box(0); -x_2022 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_2023 = l_Lean_KVMap_setNat(x_2021, x_2022, x_2020); -x_2024 = lean::cnstr_get(x_2019, 0); -lean::inc(x_2024); -lean::dec(x_2019); -x_2025 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_2026 = l_Lean_KVMap_setNat(x_2023, x_2025, x_2024); -x_2027 = l_Lean_Elaborator_toPexpr___main___closed__42; -x_2028 = lean_expr_mk_mdata(x_2026, x_2027); -x_2029 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2029, 0, x_2028); -lean::cnstr_set(x_2029, 1, x_4); -x_2030 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2030, 0, x_2029); -return x_2030; -} -} -} -} -else -{ -obj* x_2031; obj* x_2032; obj* x_2033; obj* x_2034; -lean::dec(x_16); -x_2031 = l_Lean_Parser_Term_pi_HasView; -x_2032 = lean::cnstr_get(x_2031, 0); -lean::inc(x_2032); -lean::inc(x_1); -x_2033 = lean::apply_1(x_2032, x_1); -x_2034 = lean::cnstr_get(x_2033, 1); -lean::inc(x_2034); -if (lean::obj_tag(x_2034) == 0) -{ -obj* x_2035; obj* x_2036; obj* x_2037; -lean::dec(x_2034); -lean::dec(x_2033); -lean::inc(x_1); -x_2035 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2035, 0, x_1); -x_2036 = l_Lean_Elaborator_toPexpr___main___closed__43; -x_2037 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_2035, x_2036, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_2035); -if (lean::obj_tag(x_2037) == 0) -{ -uint8 x_2038; -lean::dec(x_15); -lean::dec(x_1); -x_2038 = !lean::is_exclusive(x_2037); -if (x_2038 == 0) -{ -return x_2037; -} -else -{ -obj* x_2039; obj* x_2040; -x_2039 = lean::cnstr_get(x_2037, 0); -lean::inc(x_2039); -lean::dec(x_2037); -x_2040 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2040, 0, x_2039); -return x_2040; -} -} -else -{ -obj* x_2041; -x_2041 = lean::cnstr_get(x_2037, 0); -lean::inc(x_2041); -lean::dec(x_2037); -x_86 = x_2041; -goto block_130; -} -} -else -{ -obj* x_2042; obj* x_2043; obj* x_2044; obj* x_2045; obj* x_2046; obj* x_2047; obj* x_2048; obj* x_2049; -x_2042 = lean::cnstr_get(x_2034, 0); -lean::inc(x_2042); -lean::dec(x_2034); -x_2043 = l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(x_2042); -lean::dec(x_2042); -x_2044 = lean::cnstr_get(x_2043, 1); -lean::inc(x_2044); -x_2045 = lean::cnstr_get(x_2043, 0); -lean::inc(x_2045); -lean::dec(x_2043); -x_2046 = lean::cnstr_get(x_2044, 0); -lean::inc(x_2046); -x_2047 = lean::cnstr_get(x_2044, 1); -lean::inc(x_2047); -lean::dec(x_2044); -x_2048 = lean::cnstr_get(x_2033, 3); -lean::inc(x_2048); -lean::dec(x_2033); -x_2049 = l_Lean_Elaborator_toPexpr___main(x_2047, x_2, x_3, x_4); -if (lean::obj_tag(x_2049) == 0) -{ -uint8 x_2050; -lean::dec(x_2048); -lean::dec(x_2046); -lean::dec(x_2045); -lean::dec(x_15); -lean::dec(x_1); -x_2050 = !lean::is_exclusive(x_2049); -if (x_2050 == 0) -{ -return x_2049; -} -else -{ -obj* x_2051; obj* x_2052; -x_2051 = lean::cnstr_get(x_2049, 0); -lean::inc(x_2051); -lean::dec(x_2049); -x_2052 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2052, 0, x_2051); -return x_2052; -} -} -else -{ -obj* x_2053; obj* x_2054; obj* x_2055; obj* x_2056; -x_2053 = lean::cnstr_get(x_2049, 0); -lean::inc(x_2053); -lean::dec(x_2049); -x_2054 = lean::cnstr_get(x_2053, 0); -lean::inc(x_2054); -x_2055 = lean::cnstr_get(x_2053, 1); -lean::inc(x_2055); -lean::dec(x_2053); -x_2056 = l_Lean_Elaborator_toPexpr___main(x_2048, x_2, x_3, x_2055); -if (lean::obj_tag(x_2056) == 0) -{ -uint8 x_2057; -lean::dec(x_2054); -lean::dec(x_2046); -lean::dec(x_2045); -lean::dec(x_15); -lean::dec(x_1); -x_2057 = !lean::is_exclusive(x_2056); -if (x_2057 == 0) -{ -return x_2056; -} -else -{ -obj* x_2058; obj* x_2059; -x_2058 = lean::cnstr_get(x_2056, 0); -lean::inc(x_2058); -lean::dec(x_2056); -x_2059 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2059, 0, x_2058); -return x_2059; -} -} -else -{ -obj* x_2060; uint8 x_2061; -x_2060 = lean::cnstr_get(x_2056, 0); -lean::inc(x_2060); -lean::dec(x_2056); -x_2061 = !lean::is_exclusive(x_2060); -if (x_2061 == 0) -{ -obj* x_2062; obj* x_2063; uint8 x_2064; obj* x_2065; -x_2062 = lean::cnstr_get(x_2060, 0); -x_2063 = l_Lean_Elaborator_mangleIdent(x_2046); -x_2064 = lean::unbox(x_2045); -lean::dec(x_2045); -x_2065 = lean_expr_mk_pi(x_2063, x_2064, x_2054, x_2062); -lean::cnstr_set(x_2060, 0, x_2065); -x_86 = x_2060; -goto block_130; -} -else -{ -obj* x_2066; obj* x_2067; obj* x_2068; uint8 x_2069; obj* x_2070; obj* x_2071; -x_2066 = lean::cnstr_get(x_2060, 0); -x_2067 = lean::cnstr_get(x_2060, 1); -lean::inc(x_2067); -lean::inc(x_2066); -lean::dec(x_2060); -x_2068 = l_Lean_Elaborator_mangleIdent(x_2046); -x_2069 = lean::unbox(x_2045); -lean::dec(x_2045); -x_2070 = lean_expr_mk_pi(x_2068, x_2069, x_2054, x_2066); -x_2071 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2071, 0, x_2070); -lean::cnstr_set(x_2071, 1, x_2067); -x_86 = x_2071; -goto block_130; -} -} -} -} -} -} -else -{ -obj* x_2072; obj* x_2073; obj* x_2074; obj* x_2075; -lean::dec(x_16); -x_2072 = l_Lean_Parser_Term_lambda_HasView; -x_2073 = lean::cnstr_get(x_2072, 0); -lean::inc(x_2073); -lean::inc(x_1); -x_2074 = lean::apply_1(x_2073, x_1); -x_2075 = lean::cnstr_get(x_2074, 1); -lean::inc(x_2075); -if (lean::obj_tag(x_2075) == 0) -{ -obj* x_2076; obj* x_2077; obj* x_2078; -lean::dec(x_2075); -lean::dec(x_2074); -lean::inc(x_1); -x_2076 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2076, 0, x_1); -x_2077 = l_Lean_Elaborator_toPexpr___main___closed__44; -x_2078 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_2076, x_2077, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_2076); -if (lean::obj_tag(x_2078) == 0) -{ -uint8 x_2079; -lean::dec(x_15); -lean::dec(x_1); -x_2079 = !lean::is_exclusive(x_2078); -if (x_2079 == 0) -{ -return x_2078; -} -else -{ -obj* x_2080; obj* x_2081; -x_2080 = lean::cnstr_get(x_2078, 0); -lean::inc(x_2080); -lean::dec(x_2078); -x_2081 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2081, 0, x_2080); -return x_2081; -} -} -else -{ -obj* x_2082; -x_2082 = lean::cnstr_get(x_2078, 0); -lean::inc(x_2082); -lean::dec(x_2078); -x_86 = x_2082; -goto block_130; -} -} -else -{ -obj* x_2083; obj* x_2084; obj* x_2085; obj* x_2086; obj* x_2087; obj* x_2088; obj* x_2089; obj* x_2090; -x_2083 = lean::cnstr_get(x_2075, 0); -lean::inc(x_2083); -lean::dec(x_2075); -x_2084 = l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(x_2083); -lean::dec(x_2083); -x_2085 = lean::cnstr_get(x_2084, 1); -lean::inc(x_2085); -x_2086 = lean::cnstr_get(x_2084, 0); -lean::inc(x_2086); -lean::dec(x_2084); -x_2087 = lean::cnstr_get(x_2085, 0); -lean::inc(x_2087); -x_2088 = lean::cnstr_get(x_2085, 1); -lean::inc(x_2088); -lean::dec(x_2085); -x_2089 = lean::cnstr_get(x_2074, 3); -lean::inc(x_2089); -lean::dec(x_2074); -x_2090 = l_Lean_Elaborator_toPexpr___main(x_2088, x_2, x_3, x_4); -if (lean::obj_tag(x_2090) == 0) -{ -uint8 x_2091; -lean::dec(x_2089); -lean::dec(x_2087); -lean::dec(x_2086); -lean::dec(x_15); -lean::dec(x_1); -x_2091 = !lean::is_exclusive(x_2090); -if (x_2091 == 0) -{ -return x_2090; -} -else -{ -obj* x_2092; obj* x_2093; -x_2092 = lean::cnstr_get(x_2090, 0); -lean::inc(x_2092); -lean::dec(x_2090); -x_2093 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2093, 0, x_2092); -return x_2093; -} -} -else -{ -obj* x_2094; obj* x_2095; obj* x_2096; obj* x_2097; -x_2094 = lean::cnstr_get(x_2090, 0); -lean::inc(x_2094); -lean::dec(x_2090); -x_2095 = lean::cnstr_get(x_2094, 0); -lean::inc(x_2095); -x_2096 = lean::cnstr_get(x_2094, 1); -lean::inc(x_2096); -lean::dec(x_2094); -x_2097 = l_Lean_Elaborator_toPexpr___main(x_2089, x_2, x_3, x_2096); -if (lean::obj_tag(x_2097) == 0) -{ -uint8 x_2098; -lean::dec(x_2095); -lean::dec(x_2087); -lean::dec(x_2086); -lean::dec(x_15); -lean::dec(x_1); -x_2098 = !lean::is_exclusive(x_2097); -if (x_2098 == 0) -{ -return x_2097; -} -else -{ -obj* x_2099; obj* x_2100; -x_2099 = lean::cnstr_get(x_2097, 0); -lean::inc(x_2099); -lean::dec(x_2097); -x_2100 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2100, 0, x_2099); -return x_2100; -} -} -else -{ -obj* x_2101; uint8 x_2102; -x_2101 = lean::cnstr_get(x_2097, 0); -lean::inc(x_2101); -lean::dec(x_2097); -x_2102 = !lean::is_exclusive(x_2101); -if (x_2102 == 0) -{ -obj* x_2103; obj* x_2104; uint8 x_2105; obj* x_2106; -x_2103 = lean::cnstr_get(x_2101, 0); -x_2104 = l_Lean_Elaborator_mangleIdent(x_2087); -x_2105 = lean::unbox(x_2086); -lean::dec(x_2086); -x_2106 = lean_expr_mk_lambda(x_2104, x_2105, x_2095, x_2103); -lean::cnstr_set(x_2101, 0, x_2106); -x_86 = x_2101; -goto block_130; -} -else -{ -obj* x_2107; obj* x_2108; obj* x_2109; uint8 x_2110; obj* x_2111; obj* x_2112; -x_2107 = lean::cnstr_get(x_2101, 0); -x_2108 = lean::cnstr_get(x_2101, 1); -lean::inc(x_2108); -lean::inc(x_2107); -lean::dec(x_2101); -x_2109 = l_Lean_Elaborator_mangleIdent(x_2087); -x_2110 = lean::unbox(x_2086); -lean::dec(x_2086); -x_2111 = lean_expr_mk_lambda(x_2109, x_2110, x_2095, x_2107); -x_2112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2112, 0, x_2111); -lean::cnstr_set(x_2112, 1, x_2108); -x_86 = x_2112; -goto block_130; -} -} -} -} -} -} -else -{ -obj* x_2113; obj* x_2114; obj* x_2115; obj* x_2116; obj* x_2117; obj* x_2118; -lean::dec(x_16); -lean::dec(x_15); -x_2113 = l_Lean_Parser_Term_app_HasView; -x_2114 = lean::cnstr_get(x_2113, 0); -lean::inc(x_2114); -x_2115 = lean::apply_1(x_2114, x_1); -x_2116 = lean::cnstr_get(x_2115, 0); -lean::inc(x_2116); -x_2117 = lean::cnstr_get(x_2115, 1); -lean::inc(x_2117); -lean::dec(x_2115); -x_2118 = l_Lean_Elaborator_toPexpr___main(x_2116, x_2, x_3, x_4); -if (lean::obj_tag(x_2118) == 0) -{ -uint8 x_2119; -lean::dec(x_2117); -x_2119 = !lean::is_exclusive(x_2118); -if (x_2119 == 0) -{ -return x_2118; -} -else -{ -obj* x_2120; obj* x_2121; -x_2120 = lean::cnstr_get(x_2118, 0); -lean::inc(x_2120); -lean::dec(x_2118); -x_2121 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2121, 0, x_2120); -return x_2121; -} -} -else -{ -obj* x_2122; obj* x_2123; obj* x_2124; obj* x_2125; -x_2122 = lean::cnstr_get(x_2118, 0); -lean::inc(x_2122); -lean::dec(x_2118); -x_2123 = lean::cnstr_get(x_2122, 0); -lean::inc(x_2123); -x_2124 = lean::cnstr_get(x_2122, 1); -lean::inc(x_2124); -lean::dec(x_2122); -x_2125 = l_Lean_Elaborator_toPexpr___main(x_2117, x_2, x_3, x_2124); -if (lean::obj_tag(x_2125) == 0) -{ -uint8 x_2126; -lean::dec(x_2123); -x_2126 = !lean::is_exclusive(x_2125); -if (x_2126 == 0) -{ -return x_2125; -} -else -{ -obj* x_2127; obj* x_2128; -x_2127 = lean::cnstr_get(x_2125, 0); -lean::inc(x_2127); -lean::dec(x_2125); -x_2128 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2128, 0, x_2127); -return x_2128; -} -} -else -{ -uint8 x_2129; -x_2129 = !lean::is_exclusive(x_2125); -if (x_2129 == 0) -{ -obj* x_2130; uint8 x_2131; -x_2130 = lean::cnstr_get(x_2125, 0); -x_2131 = !lean::is_exclusive(x_2130); -if (x_2131 == 0) -{ -obj* x_2132; obj* x_2133; -x_2132 = lean::cnstr_get(x_2130, 0); -x_2133 = lean_expr_mk_app(x_2123, x_2132); -lean::cnstr_set(x_2130, 0, x_2133); -return x_2125; -} -else -{ -obj* x_2134; obj* x_2135; obj* x_2136; obj* x_2137; -x_2134 = lean::cnstr_get(x_2130, 0); -x_2135 = lean::cnstr_get(x_2130, 1); -lean::inc(x_2135); -lean::inc(x_2134); -lean::dec(x_2130); -x_2136 = lean_expr_mk_app(x_2123, x_2134); -x_2137 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2137, 0, x_2136); -lean::cnstr_set(x_2137, 1, x_2135); -lean::cnstr_set(x_2125, 0, x_2137); -return x_2125; -} -} -else -{ -obj* x_2138; obj* x_2139; obj* x_2140; obj* x_2141; obj* x_2142; obj* x_2143; obj* x_2144; -x_2138 = lean::cnstr_get(x_2125, 0); -lean::inc(x_2138); -lean::dec(x_2125); -x_2139 = lean::cnstr_get(x_2138, 0); -lean::inc(x_2139); -x_2140 = lean::cnstr_get(x_2138, 1); -lean::inc(x_2140); -if (lean::is_exclusive(x_2138)) { - lean::cnstr_release(x_2138, 0); - lean::cnstr_release(x_2138, 1); - x_2141 = x_2138; -} else { - lean::dec_ref(x_2138); - x_2141 = lean::box(0); -} -x_2142 = lean_expr_mk_app(x_2123, x_2139); -if (lean::is_scalar(x_2141)) { - x_2143 = lean::alloc_cnstr(0, 2, 0); -} else { - x_2143 = x_2141; -} -lean::cnstr_set(x_2143, 0, x_2142); -lean::cnstr_set(x_2143, 1, x_2140); -x_2144 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2144, 0, x_2143); -return x_2144; -} -} -} -} -} -else -{ -obj* x_2145; obj* x_2146; obj* x_2147; obj* x_2148; -lean::dec(x_16); -x_2145 = l_Lean_Parser_identUnivs_HasView; -x_2146 = lean::cnstr_get(x_2145, 0); -lean::inc(x_2146); -lean::inc(x_1); -x_2147 = lean::apply_1(x_2146, x_1); -x_2148 = lean::cnstr_get(x_2147, 1); -lean::inc(x_2148); -if (lean::obj_tag(x_2148) == 0) -{ -obj* x_2149; obj* x_2150; obj* x_2151; obj* x_2152; obj* x_2153; obj* x_2154; obj* x_2155; obj* x_2156; obj* x_2157; obj* x_2158; obj* x_2159; uint8 x_2160; -x_2149 = lean::cnstr_get(x_2147, 0); -lean::inc(x_2149); -lean::dec(x_2147); -lean::inc(x_2149); -x_2150 = l_Lean_Elaborator_mangleIdent(x_2149); -x_2151 = lean::box(0); -x_2152 = lean_expr_mk_const(x_2150, x_2151); -x_2153 = lean::cnstr_get(x_2149, 3); -lean::inc(x_2153); -lean::dec(x_2149); -x_2154 = lean::mk_nat_obj(0u); -x_2155 = l_List_enumFrom___main___rarg(x_2154, x_2153); -x_2156 = l_Lean_Elaborator_toPexpr___main___closed__45; -x_2157 = l_List_foldl___main___at_Lean_Elaborator_toPexpr___main___spec__16(x_2156, x_2155); -x_2158 = lean_expr_mk_mdata(x_2157, x_2152); -x_2159 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_2160 = lean_name_dec_eq(x_15, x_2159); -lean::dec(x_15); -if (x_2160 == 0) -{ -obj* x_2161; -x_2161 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_2161) == 0) -{ -obj* x_2162; obj* x_2163; -x_2162 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2162, 0, x_2158); -lean::cnstr_set(x_2162, 1, x_4); -x_2163 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2163, 0, x_2162); -return x_2163; -} -else -{ -obj* x_2164; obj* x_2165; obj* x_2166; obj* x_2167; obj* x_2168; obj* x_2169; obj* x_2170; obj* x_2171; obj* x_2172; obj* x_2173; obj* x_2174; obj* x_2175; obj* x_2176; -x_2164 = lean::cnstr_get(x_2161, 0); -lean::inc(x_2164); -lean::dec(x_2161); -x_2165 = lean::cnstr_get(x_3, 0); -x_2166 = lean::cnstr_get(x_2165, 2); -x_2167 = l_Lean_FileMap_toPosition(x_2166, x_2164); -x_2168 = lean::cnstr_get(x_2167, 1); -lean::inc(x_2168); -x_2169 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_2170 = l_Lean_KVMap_setNat(x_2151, x_2169, x_2168); -x_2171 = lean::cnstr_get(x_2167, 0); -lean::inc(x_2171); -lean::dec(x_2167); -x_2172 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_2173 = l_Lean_KVMap_setNat(x_2170, x_2172, x_2171); -x_2174 = lean_expr_mk_mdata(x_2173, x_2158); -x_2175 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2175, 0, x_2174); -lean::cnstr_set(x_2175, 1, x_4); -x_2176 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2176, 0, x_2175); -return x_2176; -} -} -else -{ -obj* x_2177; obj* x_2178; -lean::dec(x_1); -x_2177 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2177, 0, x_2158); -lean::cnstr_set(x_2177, 1, x_4); -x_2178 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2178, 0, x_2177); -return x_2178; -} -} -else -{ -obj* x_2179; obj* x_2180; obj* x_2181; obj* x_2182; -x_2179 = lean::cnstr_get(x_2147, 0); -lean::inc(x_2179); -lean::dec(x_2147); -x_2180 = lean::cnstr_get(x_2148, 0); -lean::inc(x_2180); -lean::dec(x_2148); -x_2181 = lean::cnstr_get(x_2180, 1); -lean::inc(x_2181); -lean::dec(x_2180); -x_2182 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__17(x_2181, x_2, x_3, x_4); -if (lean::obj_tag(x_2182) == 0) -{ -uint8 x_2183; -lean::dec(x_2179); -lean::dec(x_15); -lean::dec(x_1); -x_2183 = !lean::is_exclusive(x_2182); -if (x_2183 == 0) -{ -return x_2182; -} -else -{ -obj* x_2184; obj* x_2185; -x_2184 = lean::cnstr_get(x_2182, 0); -lean::inc(x_2184); -lean::dec(x_2182); -x_2185 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2185, 0, x_2184); -return x_2185; -} -} -else -{ -uint8 x_2186; -x_2186 = !lean::is_exclusive(x_2182); -if (x_2186 == 0) -{ -obj* x_2187; uint8 x_2188; -x_2187 = lean::cnstr_get(x_2182, 0); -x_2188 = !lean::is_exclusive(x_2187); -if (x_2188 == 0) -{ -obj* x_2189; obj* x_2190; obj* x_2191; obj* x_2192; obj* x_2193; obj* x_2194; obj* x_2195; obj* x_2196; obj* x_2197; obj* x_2198; obj* x_2199; uint8 x_2200; -x_2189 = lean::cnstr_get(x_2187, 0); -lean::inc(x_2179); -x_2190 = l_Lean_Elaborator_mangleIdent(x_2179); -x_2191 = lean_expr_mk_const(x_2190, x_2189); -x_2192 = lean::box(0); -x_2193 = lean::cnstr_get(x_2179, 3); -lean::inc(x_2193); -lean::dec(x_2179); -x_2194 = lean::mk_nat_obj(0u); -x_2195 = l_List_enumFrom___main___rarg(x_2194, x_2193); -x_2196 = l_Lean_Elaborator_toPexpr___main___closed__46; -x_2197 = l_List_foldl___main___at_Lean_Elaborator_toPexpr___main___spec__16(x_2196, x_2195); -x_2198 = lean_expr_mk_mdata(x_2197, x_2191); -x_2199 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_2200 = lean_name_dec_eq(x_15, x_2199); -lean::dec(x_15); -if (x_2200 == 0) -{ -obj* x_2201; -x_2201 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_2201) == 0) -{ -lean::cnstr_set(x_2187, 0, x_2198); -return x_2182; -} -else -{ -obj* x_2202; obj* x_2203; obj* x_2204; obj* x_2205; obj* x_2206; obj* x_2207; obj* x_2208; obj* x_2209; obj* x_2210; obj* x_2211; obj* x_2212; -x_2202 = lean::cnstr_get(x_2201, 0); -lean::inc(x_2202); -lean::dec(x_2201); -x_2203 = lean::cnstr_get(x_3, 0); -x_2204 = lean::cnstr_get(x_2203, 2); -x_2205 = l_Lean_FileMap_toPosition(x_2204, x_2202); -x_2206 = lean::cnstr_get(x_2205, 1); -lean::inc(x_2206); -x_2207 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_2208 = l_Lean_KVMap_setNat(x_2192, x_2207, x_2206); -x_2209 = lean::cnstr_get(x_2205, 0); -lean::inc(x_2209); -lean::dec(x_2205); -x_2210 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_2211 = l_Lean_KVMap_setNat(x_2208, x_2210, x_2209); -x_2212 = lean_expr_mk_mdata(x_2211, x_2198); -lean::cnstr_set(x_2187, 0, x_2212); -return x_2182; -} -} -else -{ -lean::dec(x_1); -lean::cnstr_set(x_2187, 0, x_2198); -return x_2182; -} -} -else -{ -obj* x_2213; obj* x_2214; obj* x_2215; obj* x_2216; obj* x_2217; obj* x_2218; obj* x_2219; obj* x_2220; obj* x_2221; obj* x_2222; obj* x_2223; obj* x_2224; uint8 x_2225; -x_2213 = lean::cnstr_get(x_2187, 0); -x_2214 = lean::cnstr_get(x_2187, 1); -lean::inc(x_2214); -lean::inc(x_2213); -lean::dec(x_2187); -lean::inc(x_2179); -x_2215 = l_Lean_Elaborator_mangleIdent(x_2179); -x_2216 = lean_expr_mk_const(x_2215, x_2213); -x_2217 = lean::box(0); -x_2218 = lean::cnstr_get(x_2179, 3); -lean::inc(x_2218); -lean::dec(x_2179); -x_2219 = lean::mk_nat_obj(0u); -x_2220 = l_List_enumFrom___main___rarg(x_2219, x_2218); -x_2221 = l_Lean_Elaborator_toPexpr___main___closed__46; -x_2222 = l_List_foldl___main___at_Lean_Elaborator_toPexpr___main___spec__16(x_2221, x_2220); -x_2223 = lean_expr_mk_mdata(x_2222, x_2216); -x_2224 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_2225 = lean_name_dec_eq(x_15, x_2224); -lean::dec(x_15); -if (x_2225 == 0) -{ -obj* x_2226; -x_2226 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_2226) == 0) -{ -obj* x_2227; -x_2227 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2227, 0, x_2223); -lean::cnstr_set(x_2227, 1, x_2214); -lean::cnstr_set(x_2182, 0, x_2227); -return x_2182; -} -else -{ -obj* x_2228; obj* x_2229; obj* x_2230; obj* x_2231; obj* x_2232; obj* x_2233; obj* x_2234; obj* x_2235; obj* x_2236; obj* x_2237; obj* x_2238; obj* x_2239; -x_2228 = lean::cnstr_get(x_2226, 0); -lean::inc(x_2228); -lean::dec(x_2226); -x_2229 = lean::cnstr_get(x_3, 0); -x_2230 = lean::cnstr_get(x_2229, 2); -x_2231 = l_Lean_FileMap_toPosition(x_2230, x_2228); -x_2232 = lean::cnstr_get(x_2231, 1); -lean::inc(x_2232); -x_2233 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_2234 = l_Lean_KVMap_setNat(x_2217, x_2233, x_2232); -x_2235 = lean::cnstr_get(x_2231, 0); -lean::inc(x_2235); -lean::dec(x_2231); -x_2236 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_2237 = l_Lean_KVMap_setNat(x_2234, x_2236, x_2235); -x_2238 = lean_expr_mk_mdata(x_2237, x_2223); -x_2239 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2239, 0, x_2238); -lean::cnstr_set(x_2239, 1, x_2214); -lean::cnstr_set(x_2182, 0, x_2239); -return x_2182; -} -} -else -{ -obj* x_2240; -lean::dec(x_1); -x_2240 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2240, 0, x_2223); -lean::cnstr_set(x_2240, 1, x_2214); -lean::cnstr_set(x_2182, 0, x_2240); -return x_2182; -} -} -} -else -{ -obj* x_2241; obj* x_2242; obj* x_2243; obj* x_2244; obj* x_2245; obj* x_2246; obj* x_2247; obj* x_2248; obj* x_2249; obj* x_2250; obj* x_2251; obj* x_2252; obj* x_2253; obj* x_2254; uint8 x_2255; -x_2241 = lean::cnstr_get(x_2182, 0); -lean::inc(x_2241); -lean::dec(x_2182); -x_2242 = lean::cnstr_get(x_2241, 0); -lean::inc(x_2242); -x_2243 = lean::cnstr_get(x_2241, 1); -lean::inc(x_2243); -if (lean::is_exclusive(x_2241)) { - lean::cnstr_release(x_2241, 0); - lean::cnstr_release(x_2241, 1); - x_2244 = x_2241; -} else { - lean::dec_ref(x_2241); - x_2244 = lean::box(0); -} -lean::inc(x_2179); -x_2245 = l_Lean_Elaborator_mangleIdent(x_2179); -x_2246 = lean_expr_mk_const(x_2245, x_2242); -x_2247 = lean::box(0); -x_2248 = lean::cnstr_get(x_2179, 3); -lean::inc(x_2248); -lean::dec(x_2179); -x_2249 = lean::mk_nat_obj(0u); -x_2250 = l_List_enumFrom___main___rarg(x_2249, x_2248); -x_2251 = l_Lean_Elaborator_toPexpr___main___closed__46; -x_2252 = l_List_foldl___main___at_Lean_Elaborator_toPexpr___main___spec__16(x_2251, x_2250); -x_2253 = lean_expr_mk_mdata(x_2252, x_2246); -x_2254 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_2255 = lean_name_dec_eq(x_15, x_2254); -lean::dec(x_15); -if (x_2255 == 0) -{ -obj* x_2256; -x_2256 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_2256) == 0) -{ -obj* x_2257; obj* x_2258; -if (lean::is_scalar(x_2244)) { - x_2257 = lean::alloc_cnstr(0, 2, 0); -} else { - x_2257 = x_2244; -} -lean::cnstr_set(x_2257, 0, x_2253); -lean::cnstr_set(x_2257, 1, x_2243); -x_2258 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2258, 0, x_2257); -return x_2258; -} -else -{ -obj* x_2259; obj* x_2260; obj* x_2261; obj* x_2262; obj* x_2263; obj* x_2264; obj* x_2265; obj* x_2266; obj* x_2267; obj* x_2268; obj* x_2269; obj* x_2270; obj* x_2271; -x_2259 = lean::cnstr_get(x_2256, 0); -lean::inc(x_2259); -lean::dec(x_2256); -x_2260 = lean::cnstr_get(x_3, 0); -x_2261 = lean::cnstr_get(x_2260, 2); -x_2262 = l_Lean_FileMap_toPosition(x_2261, x_2259); -x_2263 = lean::cnstr_get(x_2262, 1); -lean::inc(x_2263); -x_2264 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_2265 = l_Lean_KVMap_setNat(x_2247, x_2264, x_2263); -x_2266 = lean::cnstr_get(x_2262, 0); -lean::inc(x_2266); -lean::dec(x_2262); -x_2267 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_2268 = l_Lean_KVMap_setNat(x_2265, x_2267, x_2266); -x_2269 = lean_expr_mk_mdata(x_2268, x_2253); -if (lean::is_scalar(x_2244)) { - x_2270 = lean::alloc_cnstr(0, 2, 0); -} else { - x_2270 = x_2244; -} -lean::cnstr_set(x_2270, 0, x_2269); -lean::cnstr_set(x_2270, 1, x_2243); -x_2271 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2271, 0, x_2270); -return x_2271; -} -} -else -{ -obj* x_2272; obj* x_2273; -lean::dec(x_1); -if (lean::is_scalar(x_2244)) { - x_2272 = lean::alloc_cnstr(0, 2, 0); -} else { - x_2272 = x_2244; -} -lean::cnstr_set(x_2272, 0, x_2253); -lean::cnstr_set(x_2272, 1, x_2243); -x_2273 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2273, 0, x_2272); -return x_2273; -} -} -} -} -} -block_85: -{ -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -lean::dec(x_15); -lean::dec(x_1); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -return x_17; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_17); -if (x_21 == 0) -{ -obj* x_22; uint8 x_23; -x_22 = lean::cnstr_get(x_17, 0); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; uint8 x_26; -x_24 = lean::cnstr_get(x_22, 0); -x_25 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_26 = lean_name_dec_eq(x_15, x_25); -lean::dec(x_15); -if (x_26 == 0) -{ -obj* x_27; -x_27 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_27) == 0) -{ -return x_17; -} -else -{ -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; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -lean::dec(x_27); -x_29 = lean::cnstr_get(x_3, 0); -x_30 = lean::cnstr_get(x_29, 2); -x_31 = l_Lean_FileMap_toPosition(x_30, x_28); -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = lean::box(0); -x_34 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_35 = l_Lean_KVMap_setNat(x_33, x_34, x_32); -x_36 = lean::cnstr_get(x_31, 0); -lean::inc(x_36); -lean::dec(x_31); -x_37 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_38 = l_Lean_KVMap_setNat(x_35, x_37, x_36); -x_39 = lean_expr_mk_mdata(x_38, x_24); -lean::cnstr_set(x_22, 0, x_39); -return x_17; -} -} -else -{ -lean::dec(x_1); -return x_17; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; uint8 x_43; -x_40 = lean::cnstr_get(x_22, 0); -x_41 = lean::cnstr_get(x_22, 1); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_22); -x_42 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_43 = lean_name_dec_eq(x_15, x_42); -lean::dec(x_15); -if (x_43 == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_40); -lean::cnstr_set(x_45, 1, x_41); -lean::cnstr_set(x_17, 0, x_45); -return x_17; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_46 = lean::cnstr_get(x_44, 0); -lean::inc(x_46); -lean::dec(x_44); -x_47 = lean::cnstr_get(x_3, 0); -x_48 = lean::cnstr_get(x_47, 2); -x_49 = l_Lean_FileMap_toPosition(x_48, x_46); -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -x_51 = lean::box(0); -x_52 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_53 = l_Lean_KVMap_setNat(x_51, x_52, x_50); -x_54 = lean::cnstr_get(x_49, 0); -lean::inc(x_54); -lean::dec(x_49); -x_55 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_56 = l_Lean_KVMap_setNat(x_53, x_55, x_54); -x_57 = lean_expr_mk_mdata(x_56, x_40); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_41); -lean::cnstr_set(x_17, 0, x_58); -return x_17; -} -} -else -{ -obj* x_59; -lean::dec(x_1); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_40); -lean::cnstr_set(x_59, 1, x_41); -lean::cnstr_set(x_17, 0, x_59); -return x_17; -} -} -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; -x_60 = lean::cnstr_get(x_17, 0); -lean::inc(x_60); -lean::dec(x_17); -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_60, 1); -lean::inc(x_62); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - lean::cnstr_release(x_60, 1); - x_63 = x_60; -} else { - lean::dec_ref(x_60); - x_63 = lean::box(0); -} -x_64 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_65 = lean_name_dec_eq(x_15, x_64); -lean::dec(x_15); -if (x_65 == 0) -{ -obj* x_66; -x_66 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; obj* x_68; -if (lean::is_scalar(x_63)) { - x_67 = lean::alloc_cnstr(0, 2, 0); -} else { - x_67 = x_63; -} -lean::cnstr_set(x_67, 0, x_61); -lean::cnstr_set(x_67, 1, x_62); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -return x_68; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_69 = lean::cnstr_get(x_66, 0); -lean::inc(x_69); -lean::dec(x_66); -x_70 = lean::cnstr_get(x_3, 0); -x_71 = lean::cnstr_get(x_70, 2); -x_72 = l_Lean_FileMap_toPosition(x_71, x_69); -x_73 = lean::cnstr_get(x_72, 1); -lean::inc(x_73); -x_74 = lean::box(0); -x_75 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_76 = l_Lean_KVMap_setNat(x_74, x_75, x_73); -x_77 = lean::cnstr_get(x_72, 0); -lean::inc(x_77); -lean::dec(x_72); -x_78 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_79 = l_Lean_KVMap_setNat(x_76, x_78, x_77); -x_80 = lean_expr_mk_mdata(x_79, x_61); -if (lean::is_scalar(x_63)) { - x_81 = lean::alloc_cnstr(0, 2, 0); -} else { - x_81 = x_63; -} -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_62); -x_82 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} -} -else -{ -obj* x_83; obj* x_84; -lean::dec(x_1); -if (lean::is_scalar(x_63)) { - x_83 = lean::alloc_cnstr(0, 2, 0); -} else { - x_83 = x_63; -} -lean::cnstr_set(x_83, 0, x_61); -lean::cnstr_set(x_83, 1, x_62); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; -} -} -} -} -block_130: -{ -uint8 x_87; -x_87 = !lean::is_exclusive(x_86); -if (x_87 == 0) -{ -obj* x_88; obj* x_89; uint8 x_90; -x_88 = lean::cnstr_get(x_86, 0); -x_89 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_90 = lean_name_dec_eq(x_15, x_89); -lean::dec(x_15); -if (x_90 == 0) -{ -obj* x_91; -x_91 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_91) == 0) -{ -obj* x_92; -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_86); -return x_92; -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; -x_93 = lean::cnstr_get(x_91, 0); -lean::inc(x_93); -lean::dec(x_91); -x_94 = lean::cnstr_get(x_3, 0); -x_95 = lean::cnstr_get(x_94, 2); -x_96 = l_Lean_FileMap_toPosition(x_95, x_93); -x_97 = lean::cnstr_get(x_96, 1); -lean::inc(x_97); -x_98 = lean::box(0); -x_99 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_100 = l_Lean_KVMap_setNat(x_98, x_99, x_97); -x_101 = lean::cnstr_get(x_96, 0); -lean::inc(x_101); -lean::dec(x_96); -x_102 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_103 = l_Lean_KVMap_setNat(x_100, x_102, x_101); -x_104 = lean_expr_mk_mdata(x_103, x_88); -lean::cnstr_set(x_86, 0, x_104); -x_105 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_105, 0, x_86); -return x_105; -} -} -else -{ -obj* x_106; -lean::dec(x_1); -x_106 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_106, 0, x_86); -return x_106; -} -} -else -{ -obj* x_107; obj* x_108; obj* x_109; uint8 x_110; -x_107 = lean::cnstr_get(x_86, 0); -x_108 = lean::cnstr_get(x_86, 1); -lean::inc(x_108); -lean::inc(x_107); -lean::dec(x_86); -x_109 = l_Lean_Elaborator_toPexpr___main___closed__2; -x_110 = lean_name_dec_eq(x_15, x_109); -lean::dec(x_15); -if (x_110 == 0) -{ -obj* x_111; -x_111 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_112; obj* x_113; -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_107); -lean::cnstr_set(x_112, 1, x_108); -x_113 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_113, 0, x_112); -return x_113; -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; -x_114 = lean::cnstr_get(x_111, 0); -lean::inc(x_114); -lean::dec(x_111); -x_115 = lean::cnstr_get(x_3, 0); -x_116 = lean::cnstr_get(x_115, 2); -x_117 = l_Lean_FileMap_toPosition(x_116, x_114); -x_118 = lean::cnstr_get(x_117, 1); -lean::inc(x_118); -x_119 = lean::box(0); -x_120 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_121 = l_Lean_KVMap_setNat(x_119, x_120, x_118); -x_122 = lean::cnstr_get(x_117, 0); -lean::inc(x_122); -lean::dec(x_117); -x_123 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_124 = l_Lean_KVMap_setNat(x_121, x_123, x_122); -x_125 = lean_expr_mk_mdata(x_124, x_107); -x_126 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_126, 0, x_125); -lean::cnstr_set(x_126, 1, x_108); -x_127 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_127, 0, x_126); -return x_127; -} -} -else -{ -obj* x_128; obj* x_129; -lean::dec(x_1); -x_128 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_128, 0, x_107); -lean::cnstr_set(x_128, 1, x_108); -x_129 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_129, 0, x_128); -return x_129; -} -} -} -} -else -{ -obj* x_2274; -x_2274 = lean::box(0); -x_5 = x_2274; -goto block_13; -} -block_13: -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_5); -lean::inc(x_1); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_1); -x_7 = l_Lean_Parser_Syntax_format___main(x_1); -x_8 = l_Lean_Options_empty; -x_9 = l_Lean_Format_pretty(x_7, x_8); -x_10 = l_Lean_Elaborator_toPexpr___main___closed__1; -x_11 = lean::string_append(x_10, x_9); -lean::dec(x_9); -x_12 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_6, x_11, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_6); -return x_12; -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_foldr___main___at_Lean_Elaborator_toPexpr___main___spec__7(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__8(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__9(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__10(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__11(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__12(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__13(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__14(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__15___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__15(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__17___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__17(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_toPexpr___main___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_toPexpr___main(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_toPexpr(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_toPexpr___main(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l_Lean_Elaborator_toPexpr___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_toPexpr(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_getNamespace(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Elaborator_currentScope(x_1, x_2, x_3); -if (lean::obj_tag(x_4) == 0) -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -return x_4; -} -else -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_4, 0); -lean::inc(x_6); -lean::dec(x_4); -x_7 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_4); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_4, 0); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_10, 6); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::dec(x_13); -x_14 = lean::box(0); -lean::cnstr_set(x_9, 0, x_14); -return x_4; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_9, 1); -lean::inc(x_15); -lean::dec(x_9); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_15); -lean::cnstr_set(x_4, 0, x_17); -return x_4; -} -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_9); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_9, 0); -lean::dec(x_19); -x_20 = lean::cnstr_get(x_11, 0); -lean::inc(x_20); -lean::dec(x_11); -lean::cnstr_set(x_9, 0, x_20); -return x_4; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::cnstr_get(x_9, 1); -lean::inc(x_21); -lean::dec(x_9); -x_22 = lean::cnstr_get(x_11, 0); -lean::inc(x_22); -lean::dec(x_11); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_21); -lean::cnstr_set(x_4, 0, x_23); -return x_4; -} -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_4, 0); -lean::inc(x_24); -lean::dec(x_4); -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_25, 6); -lean::inc(x_26); -lean::dec(x_25); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -if (lean::is_exclusive(x_24)) { - lean::cnstr_release(x_24, 0); - lean::cnstr_release(x_24, 1); - x_28 = x_24; -} else { - lean::dec_ref(x_24); - x_28 = lean::box(0); -} -x_29 = lean::box(0); -if (lean::is_scalar(x_28)) { - x_30 = lean::alloc_cnstr(0, 2, 0); -} else { - x_30 = x_28; -} -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_27); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -return x_31; -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = lean::cnstr_get(x_24, 1); -lean::inc(x_32); -if (lean::is_exclusive(x_24)) { - lean::cnstr_release(x_24, 0); - lean::cnstr_release(x_24, 1); - x_33 = x_24; -} else { - lean::dec_ref(x_24); - x_33 = lean::box(0); -} -x_34 = lean::cnstr_get(x_26, 0); -lean::inc(x_34); -lean::dec(x_26); -if (lean::is_scalar(x_33)) { - x_35 = lean::alloc_cnstr(0, 2, 0); -} else { - x_35 = x_33; -} -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_32); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -return x_36; -} -} -} -} -} -obj* l_Lean_Elaborator_getNamespace___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Elaborator_getNamespace(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_RBNode_revFold___main___at_Lean_Elaborator_oldElabCommand___spec__2(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_2, 0); -x_4 = lean::cnstr_get(x_2, 1); -x_5 = lean::cnstr_get(x_2, 3); -x_6 = l_RBNode_revFold___main___at_Lean_Elaborator_oldElabCommand___spec__2(x_1, x_5); -lean::inc(x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_6); -x_1 = x_7; -x_2 = x_3; -goto _start; -} -} -} -obj* l_RBTree_toList___at_Lean_Elaborator_oldElabCommand___spec__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = lean::box(0); -x_3 = l_RBNode_revFold___main___at_Lean_Elaborator_oldElabCommand___spec__2(x_2, x_1); -return x_3; -} -} -obj* l_RBTree_ofList___main___at_Lean_Elaborator_oldElabCommand___spec__3(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_RBTree_ofList___main___at_Lean_Elaborator_oldElabCommand___spec__3(x_4); -x_6 = lean::box(0); -x_7 = l_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_5, x_3, x_6); -return x_7; -} -} -} -obj* l_Lean_Elaborator_oldElabCommand___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_4 = lean::cnstr_get(x_2, 8); -lean::dec(x_4); -x_5 = lean::cnstr_get(x_2, 5); -lean::dec(x_5); -x_6 = lean::cnstr_get(x_2, 4); -lean::dec(x_6); -x_7 = lean::cnstr_get(x_2, 3); -lean::dec(x_7); -x_8 = lean::cnstr_get(x_1, 2); -lean::inc(x_8); -x_9 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -x_10 = l_Lean_Elaborator_OrderedRBMap_ofList___rarg(x_9, x_8); -x_11 = lean::cnstr_get(x_1, 3); -lean::inc(x_11); -x_12 = l_Lean_Elaborator_OrderedRBMap_ofList___rarg(x_9, x_11); -x_13 = lean::cnstr_get(x_1, 4); -lean::inc(x_13); -x_14 = l_RBTree_ofList___main___at_Lean_Elaborator_oldElabCommand___spec__3(x_13); -x_15 = lean::cnstr_get(x_1, 5); -lean::inc(x_15); -lean::dec(x_1); -lean::cnstr_set(x_2, 8, x_15); -lean::cnstr_set(x_2, 5, x_14); -lean::cnstr_set(x_2, 4, x_12); -lean::cnstr_set(x_2, 3, x_10); -return x_2; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_16 = lean::cnstr_get(x_2, 0); -x_17 = lean::cnstr_get(x_2, 1); -x_18 = lean::cnstr_get(x_2, 2); -x_19 = lean::cnstr_get(x_2, 6); -x_20 = lean::cnstr_get(x_2, 7); -lean::inc(x_20); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_1, 2); -lean::inc(x_21); -x_22 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -x_23 = l_Lean_Elaborator_OrderedRBMap_ofList___rarg(x_22, x_21); -x_24 = lean::cnstr_get(x_1, 3); -lean::inc(x_24); -x_25 = l_Lean_Elaborator_OrderedRBMap_ofList___rarg(x_22, x_24); -x_26 = lean::cnstr_get(x_1, 4); -lean::inc(x_26); -x_27 = l_RBTree_ofList___main___at_Lean_Elaborator_oldElabCommand___spec__3(x_26); -x_28 = lean::cnstr_get(x_1, 5); -lean::inc(x_28); -lean::dec(x_1); -x_29 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_29, 0, x_16); -lean::cnstr_set(x_29, 1, x_17); -lean::cnstr_set(x_29, 2, x_18); -lean::cnstr_set(x_29, 3, x_23); -lean::cnstr_set(x_29, 4, x_25); -lean::cnstr_set(x_29, 5, x_27); -lean::cnstr_set(x_29, 6, x_19); -lean::cnstr_set(x_29, 7, x_20); -lean::cnstr_set(x_29, 8, x_28); -return x_29; -} -} -} -obj* l_Lean_Elaborator_oldElabCommand(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_10; obj* x_219; -x_6 = lean::cnstr_get(x_4, 0); -x_7 = lean::cnstr_get(x_6, 2); -x_8 = l_Lean_Parser_Syntax_getPos(x_1); -lean::inc(x_5); -x_9 = l_Lean_Elaborator_currentScope(x_3, x_4, x_5); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_231; -x_231 = lean::mk_nat_obj(0u); -x_219 = x_231; -goto block_230; -} -else -{ -obj* x_232; -x_232 = lean::cnstr_get(x_8, 0); -lean::inc(x_232); -lean::dec(x_8); -x_219 = x_232; -goto block_230; -} -block_218: -{ -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_11; -lean::dec(x_10); -lean::dec(x_5); -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -return x_9; -} -else -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_9, 0); -lean::inc(x_12); -lean::dec(x_9); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::cnstr_get(x_9, 0); -lean::inc(x_14); -lean::dec(x_9); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_14, 1); -lean::inc(x_16); -lean::dec(x_14); -x_17 = l_Lean_Elaborator_getNamespace(x_3, x_4, x_16); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -lean::dec(x_15); -lean::dec(x_10); -lean::dec(x_5); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -return x_17; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_17); -if (x_21 == 0) -{ -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_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_22 = lean::cnstr_get(x_17, 0); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -lean::dec(x_22); -x_25 = lean::cnstr_get(x_6, 0); -x_26 = lean::cnstr_get(x_5, 8); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_5, 9); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_15, 3); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -lean::dec(x_28); -x_30 = l_List_reverse___rarg(x_29); -x_31 = lean::cnstr_get(x_15, 4); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -lean::dec(x_31); -x_33 = l_List_reverse___rarg(x_32); -x_34 = lean::cnstr_get(x_15, 5); -lean::inc(x_34); -x_35 = l_RBTree_toList___at_Lean_Elaborator_oldElabCommand___spec__1(x_34); -lean::dec(x_34); -x_36 = lean::cnstr_get(x_15, 8); -lean::inc(x_36); -lean::dec(x_15); -x_37 = lean::cnstr_get(x_5, 10); -lean::inc(x_37); -lean::dec(x_5); -x_38 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_38, 0, x_26); -lean::cnstr_set(x_38, 1, x_27); -lean::cnstr_set(x_38, 2, x_30); -lean::cnstr_set(x_38, 3, x_33); -lean::cnstr_set(x_38, 4, x_35); -lean::cnstr_set(x_38, 5, x_36); -lean::cnstr_set(x_38, 6, x_37); -lean::cnstr_set(x_38, 7, x_23); -x_39 = lean_elaborator_elaborate_command(x_25, x_10, x_38); -lean::dec(x_38); -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -if (lean::obj_tag(x_40) == 0) -{ -uint8 x_41; -x_41 = !lean::is_exclusive(x_39); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; uint8 x_44; -x_42 = lean::cnstr_get(x_39, 1); -x_43 = lean::cnstr_get(x_39, 0); -lean::dec(x_43); -x_44 = !lean::is_exclusive(x_24); -if (x_44 == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -x_45 = lean::cnstr_get(x_24, 5); -x_46 = l_List_append___rarg(x_42, x_45); -lean::cnstr_set(x_24, 5, x_46); -x_47 = lean::box(0); -lean::cnstr_set(x_39, 1, x_24); -lean::cnstr_set(x_39, 0, x_47); -lean::cnstr_set(x_17, 0, x_39); -return x_17; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_48 = lean::cnstr_get(x_24, 0); -x_49 = lean::cnstr_get(x_24, 1); -x_50 = lean::cnstr_get(x_24, 2); -x_51 = lean::cnstr_get(x_24, 3); -x_52 = lean::cnstr_get(x_24, 4); -x_53 = lean::cnstr_get(x_24, 5); -x_54 = lean::cnstr_get(x_24, 6); -x_55 = lean::cnstr_get(x_24, 7); -x_56 = lean::cnstr_get(x_24, 8); -x_57 = lean::cnstr_get(x_24, 9); -x_58 = lean::cnstr_get(x_24, 10); -lean::inc(x_58); -lean::inc(x_57); -lean::inc(x_56); -lean::inc(x_55); -lean::inc(x_54); -lean::inc(x_53); -lean::inc(x_52); -lean::inc(x_51); -lean::inc(x_50); -lean::inc(x_49); -lean::inc(x_48); -lean::dec(x_24); -x_59 = l_List_append___rarg(x_42, x_53); -x_60 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_60, 0, x_48); -lean::cnstr_set(x_60, 1, x_49); -lean::cnstr_set(x_60, 2, x_50); -lean::cnstr_set(x_60, 3, x_51); -lean::cnstr_set(x_60, 4, x_52); -lean::cnstr_set(x_60, 5, x_59); -lean::cnstr_set(x_60, 6, x_54); -lean::cnstr_set(x_60, 7, x_55); -lean::cnstr_set(x_60, 8, x_56); -lean::cnstr_set(x_60, 9, x_57); -lean::cnstr_set(x_60, 10, x_58); -x_61 = lean::box(0); -lean::cnstr_set(x_39, 1, x_60); -lean::cnstr_set(x_39, 0, x_61); -lean::cnstr_set(x_17, 0, x_39); -return x_17; -} -} -else -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_62 = lean::cnstr_get(x_39, 1); -lean::inc(x_62); -lean::dec(x_39); -x_63 = lean::cnstr_get(x_24, 0); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_24, 1); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_24, 2); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_24, 3); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_24, 4); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_24, 5); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_24, 6); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_24, 7); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_24, 8); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_24, 9); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_24, 10); -lean::inc(x_73); -if (lean::is_exclusive(x_24)) { - lean::cnstr_release(x_24, 0); - lean::cnstr_release(x_24, 1); - lean::cnstr_release(x_24, 2); - lean::cnstr_release(x_24, 3); - lean::cnstr_release(x_24, 4); - lean::cnstr_release(x_24, 5); - lean::cnstr_release(x_24, 6); - lean::cnstr_release(x_24, 7); - lean::cnstr_release(x_24, 8); - lean::cnstr_release(x_24, 9); - lean::cnstr_release(x_24, 10); - x_74 = x_24; -} else { - lean::dec_ref(x_24); - x_74 = lean::box(0); -} -x_75 = l_List_append___rarg(x_62, x_68); -if (lean::is_scalar(x_74)) { - x_76 = lean::alloc_cnstr(0, 11, 0); -} else { - x_76 = x_74; -} -lean::cnstr_set(x_76, 0, x_63); -lean::cnstr_set(x_76, 1, x_64); -lean::cnstr_set(x_76, 2, x_65); -lean::cnstr_set(x_76, 3, x_66); -lean::cnstr_set(x_76, 4, x_67); -lean::cnstr_set(x_76, 5, x_75); -lean::cnstr_set(x_76, 6, x_69); -lean::cnstr_set(x_76, 7, x_70); -lean::cnstr_set(x_76, 8, x_71); -lean::cnstr_set(x_76, 9, x_72); -lean::cnstr_set(x_76, 10, x_73); -x_77 = lean::box(0); -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_76); -lean::cnstr_set(x_17, 0, x_78); -return x_17; -} -} -else -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; -lean::free_heap_obj(x_17); -x_79 = lean::cnstr_get(x_39, 1); -lean::inc(x_79); -lean::dec(x_39); -x_80 = lean::cnstr_get(x_40, 0); -lean::inc(x_80); -lean::dec(x_40); -lean::inc(x_80); -x_81 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_oldElabCommand___lambda__1), 2, 1); -lean::closure_set(x_81, 0, x_80); -x_82 = l_Lean_Elaborator_modifyCurrentScope(x_81, x_3, x_4, x_24); -if (lean::obj_tag(x_82) == 0) -{ -uint8 x_83; -lean::dec(x_80); -lean::dec(x_79); -x_83 = !lean::is_exclusive(x_82); -if (x_83 == 0) -{ -return x_82; -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_82, 0); -lean::inc(x_84); -lean::dec(x_82); -x_85 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -return x_85; -} -} -else -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_82); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_82, 0); -x_88 = !lean::is_exclusive(x_87); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; uint8 x_91; -x_89 = lean::cnstr_get(x_87, 1); -x_90 = lean::cnstr_get(x_87, 0); -lean::dec(x_90); -x_91 = !lean::is_exclusive(x_89); -if (x_91 == 0) -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_92 = lean::cnstr_get(x_89, 5); -x_93 = lean::cnstr_get(x_89, 10); -lean::dec(x_93); -x_94 = lean::cnstr_get(x_89, 9); -lean::dec(x_94); -x_95 = lean::cnstr_get(x_89, 8); -lean::dec(x_95); -x_96 = lean::cnstr_get(x_80, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_80, 1); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_80, 6); -lean::inc(x_98); -lean::dec(x_80); -x_99 = l_List_append___rarg(x_79, x_92); -lean::cnstr_set(x_89, 10, x_98); -lean::cnstr_set(x_89, 9, x_97); -lean::cnstr_set(x_89, 8, x_96); -lean::cnstr_set(x_89, 5, x_99); -x_100 = lean::box(0); -lean::cnstr_set(x_87, 0, x_100); -return x_82; -} -else -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_101 = lean::cnstr_get(x_89, 0); -x_102 = lean::cnstr_get(x_89, 1); -x_103 = lean::cnstr_get(x_89, 2); -x_104 = lean::cnstr_get(x_89, 3); -x_105 = lean::cnstr_get(x_89, 4); -x_106 = lean::cnstr_get(x_89, 5); -x_107 = lean::cnstr_get(x_89, 6); -x_108 = lean::cnstr_get(x_89, 7); -lean::inc(x_108); -lean::inc(x_107); -lean::inc(x_106); -lean::inc(x_105); -lean::inc(x_104); -lean::inc(x_103); -lean::inc(x_102); -lean::inc(x_101); -lean::dec(x_89); -x_109 = lean::cnstr_get(x_80, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_80, 1); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_80, 6); -lean::inc(x_111); -lean::dec(x_80); -x_112 = l_List_append___rarg(x_79, x_106); -x_113 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_113, 0, x_101); -lean::cnstr_set(x_113, 1, x_102); -lean::cnstr_set(x_113, 2, x_103); -lean::cnstr_set(x_113, 3, x_104); -lean::cnstr_set(x_113, 4, x_105); -lean::cnstr_set(x_113, 5, x_112); -lean::cnstr_set(x_113, 6, x_107); -lean::cnstr_set(x_113, 7, x_108); -lean::cnstr_set(x_113, 8, x_109); -lean::cnstr_set(x_113, 9, x_110); -lean::cnstr_set(x_113, 10, x_111); -x_114 = lean::box(0); -lean::cnstr_set(x_87, 1, x_113); -lean::cnstr_set(x_87, 0, x_114); -return x_82; -} -} -else -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; -x_115 = lean::cnstr_get(x_87, 1); -lean::inc(x_115); -lean::dec(x_87); -x_116 = lean::cnstr_get(x_115, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_115, 1); -lean::inc(x_117); -x_118 = lean::cnstr_get(x_115, 2); -lean::inc(x_118); -x_119 = lean::cnstr_get(x_115, 3); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_115, 4); -lean::inc(x_120); -x_121 = lean::cnstr_get(x_115, 5); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_115, 6); -lean::inc(x_122); -x_123 = lean::cnstr_get(x_115, 7); -lean::inc(x_123); -if (lean::is_exclusive(x_115)) { - lean::cnstr_release(x_115, 0); - lean::cnstr_release(x_115, 1); - lean::cnstr_release(x_115, 2); - lean::cnstr_release(x_115, 3); - lean::cnstr_release(x_115, 4); - lean::cnstr_release(x_115, 5); - lean::cnstr_release(x_115, 6); - lean::cnstr_release(x_115, 7); - lean::cnstr_release(x_115, 8); - lean::cnstr_release(x_115, 9); - lean::cnstr_release(x_115, 10); - x_124 = x_115; -} else { - lean::dec_ref(x_115); - x_124 = lean::box(0); -} -x_125 = lean::cnstr_get(x_80, 0); -lean::inc(x_125); -x_126 = lean::cnstr_get(x_80, 1); -lean::inc(x_126); -x_127 = lean::cnstr_get(x_80, 6); -lean::inc(x_127); -lean::dec(x_80); -x_128 = l_List_append___rarg(x_79, x_121); -if (lean::is_scalar(x_124)) { - x_129 = lean::alloc_cnstr(0, 11, 0); -} else { - x_129 = x_124; -} -lean::cnstr_set(x_129, 0, x_116); -lean::cnstr_set(x_129, 1, x_117); -lean::cnstr_set(x_129, 2, x_118); -lean::cnstr_set(x_129, 3, x_119); -lean::cnstr_set(x_129, 4, x_120); -lean::cnstr_set(x_129, 5, x_128); -lean::cnstr_set(x_129, 6, x_122); -lean::cnstr_set(x_129, 7, x_123); -lean::cnstr_set(x_129, 8, x_125); -lean::cnstr_set(x_129, 9, x_126); -lean::cnstr_set(x_129, 10, x_127); -x_130 = lean::box(0); -x_131 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_129); -lean::cnstr_set(x_82, 0, x_131); -return x_82; -} -} -else -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_132 = lean::cnstr_get(x_82, 0); -lean::inc(x_132); -lean::dec(x_82); -x_133 = lean::cnstr_get(x_132, 1); -lean::inc(x_133); -if (lean::is_exclusive(x_132)) { - lean::cnstr_release(x_132, 0); - lean::cnstr_release(x_132, 1); - x_134 = x_132; -} else { - lean::dec_ref(x_132); - x_134 = lean::box(0); -} -x_135 = lean::cnstr_get(x_133, 0); -lean::inc(x_135); -x_136 = lean::cnstr_get(x_133, 1); -lean::inc(x_136); -x_137 = lean::cnstr_get(x_133, 2); -lean::inc(x_137); -x_138 = lean::cnstr_get(x_133, 3); -lean::inc(x_138); -x_139 = lean::cnstr_get(x_133, 4); -lean::inc(x_139); -x_140 = lean::cnstr_get(x_133, 5); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_133, 6); -lean::inc(x_141); -x_142 = lean::cnstr_get(x_133, 7); -lean::inc(x_142); -if (lean::is_exclusive(x_133)) { - lean::cnstr_release(x_133, 0); - lean::cnstr_release(x_133, 1); - lean::cnstr_release(x_133, 2); - lean::cnstr_release(x_133, 3); - lean::cnstr_release(x_133, 4); - lean::cnstr_release(x_133, 5); - lean::cnstr_release(x_133, 6); - lean::cnstr_release(x_133, 7); - lean::cnstr_release(x_133, 8); - lean::cnstr_release(x_133, 9); - lean::cnstr_release(x_133, 10); - x_143 = x_133; -} else { - lean::dec_ref(x_133); - x_143 = lean::box(0); -} -x_144 = lean::cnstr_get(x_80, 0); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_80, 1); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_80, 6); -lean::inc(x_146); -lean::dec(x_80); -x_147 = l_List_append___rarg(x_79, x_140); -if (lean::is_scalar(x_143)) { - x_148 = lean::alloc_cnstr(0, 11, 0); -} else { - x_148 = x_143; -} -lean::cnstr_set(x_148, 0, x_135); -lean::cnstr_set(x_148, 1, x_136); -lean::cnstr_set(x_148, 2, x_137); -lean::cnstr_set(x_148, 3, x_138); -lean::cnstr_set(x_148, 4, x_139); -lean::cnstr_set(x_148, 5, x_147); -lean::cnstr_set(x_148, 6, x_141); -lean::cnstr_set(x_148, 7, x_142); -lean::cnstr_set(x_148, 8, x_144); -lean::cnstr_set(x_148, 9, x_145); -lean::cnstr_set(x_148, 10, x_146); -x_149 = lean::box(0); -if (lean::is_scalar(x_134)) { - x_150 = lean::alloc_cnstr(0, 2, 0); -} else { - x_150 = x_134; -} -lean::cnstr_set(x_150, 0, x_149); -lean::cnstr_set(x_150, 1, x_148); -x_151 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_151, 0, x_150); -return x_151; -} -} -} -} -else -{ -obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; -x_152 = lean::cnstr_get(x_17, 0); -lean::inc(x_152); -lean::dec(x_17); -x_153 = lean::cnstr_get(x_152, 0); -lean::inc(x_153); -x_154 = lean::cnstr_get(x_152, 1); -lean::inc(x_154); -lean::dec(x_152); -x_155 = lean::cnstr_get(x_6, 0); -x_156 = lean::cnstr_get(x_5, 8); -lean::inc(x_156); -x_157 = lean::cnstr_get(x_5, 9); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_15, 3); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_158, 0); -lean::inc(x_159); -lean::dec(x_158); -x_160 = l_List_reverse___rarg(x_159); -x_161 = lean::cnstr_get(x_15, 4); -lean::inc(x_161); -x_162 = lean::cnstr_get(x_161, 0); -lean::inc(x_162); -lean::dec(x_161); -x_163 = l_List_reverse___rarg(x_162); -x_164 = lean::cnstr_get(x_15, 5); -lean::inc(x_164); -x_165 = l_RBTree_toList___at_Lean_Elaborator_oldElabCommand___spec__1(x_164); -lean::dec(x_164); -x_166 = lean::cnstr_get(x_15, 8); -lean::inc(x_166); -lean::dec(x_15); -x_167 = lean::cnstr_get(x_5, 10); -lean::inc(x_167); -lean::dec(x_5); -x_168 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_168, 0, x_156); -lean::cnstr_set(x_168, 1, x_157); -lean::cnstr_set(x_168, 2, x_160); -lean::cnstr_set(x_168, 3, x_163); -lean::cnstr_set(x_168, 4, x_165); -lean::cnstr_set(x_168, 5, x_166); -lean::cnstr_set(x_168, 6, x_167); -lean::cnstr_set(x_168, 7, x_153); -x_169 = lean_elaborator_elaborate_command(x_155, x_10, x_168); -lean::dec(x_168); -x_170 = lean::cnstr_get(x_169, 0); -lean::inc(x_170); -if (lean::obj_tag(x_170) == 0) -{ -obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; -x_171 = lean::cnstr_get(x_169, 1); -lean::inc(x_171); -if (lean::is_exclusive(x_169)) { - lean::cnstr_release(x_169, 0); - lean::cnstr_release(x_169, 1); - x_172 = x_169; -} else { - lean::dec_ref(x_169); - x_172 = lean::box(0); -} -x_173 = lean::cnstr_get(x_154, 0); -lean::inc(x_173); -x_174 = lean::cnstr_get(x_154, 1); -lean::inc(x_174); -x_175 = lean::cnstr_get(x_154, 2); -lean::inc(x_175); -x_176 = lean::cnstr_get(x_154, 3); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_154, 4); -lean::inc(x_177); -x_178 = lean::cnstr_get(x_154, 5); -lean::inc(x_178); -x_179 = lean::cnstr_get(x_154, 6); -lean::inc(x_179); -x_180 = lean::cnstr_get(x_154, 7); -lean::inc(x_180); -x_181 = lean::cnstr_get(x_154, 8); -lean::inc(x_181); -x_182 = lean::cnstr_get(x_154, 9); -lean::inc(x_182); -x_183 = lean::cnstr_get(x_154, 10); -lean::inc(x_183); -if (lean::is_exclusive(x_154)) { - lean::cnstr_release(x_154, 0); - lean::cnstr_release(x_154, 1); - lean::cnstr_release(x_154, 2); - lean::cnstr_release(x_154, 3); - lean::cnstr_release(x_154, 4); - lean::cnstr_release(x_154, 5); - lean::cnstr_release(x_154, 6); - lean::cnstr_release(x_154, 7); - lean::cnstr_release(x_154, 8); - lean::cnstr_release(x_154, 9); - lean::cnstr_release(x_154, 10); - x_184 = x_154; -} else { - lean::dec_ref(x_154); - x_184 = lean::box(0); -} -x_185 = l_List_append___rarg(x_171, x_178); -if (lean::is_scalar(x_184)) { - x_186 = lean::alloc_cnstr(0, 11, 0); -} else { - x_186 = x_184; -} -lean::cnstr_set(x_186, 0, x_173); -lean::cnstr_set(x_186, 1, x_174); -lean::cnstr_set(x_186, 2, x_175); -lean::cnstr_set(x_186, 3, x_176); -lean::cnstr_set(x_186, 4, x_177); -lean::cnstr_set(x_186, 5, x_185); -lean::cnstr_set(x_186, 6, x_179); -lean::cnstr_set(x_186, 7, x_180); -lean::cnstr_set(x_186, 8, x_181); -lean::cnstr_set(x_186, 9, x_182); -lean::cnstr_set(x_186, 10, x_183); -x_187 = lean::box(0); -if (lean::is_scalar(x_172)) { - x_188 = lean::alloc_cnstr(0, 2, 0); -} else { - x_188 = x_172; -} -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set(x_188, 1, x_186); -x_189 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_189, 0, x_188); -return x_189; -} -else -{ -obj* x_190; obj* x_191; obj* x_192; obj* x_193; -x_190 = lean::cnstr_get(x_169, 1); -lean::inc(x_190); -lean::dec(x_169); -x_191 = lean::cnstr_get(x_170, 0); -lean::inc(x_191); -lean::dec(x_170); -lean::inc(x_191); -x_192 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_oldElabCommand___lambda__1), 2, 1); -lean::closure_set(x_192, 0, x_191); -x_193 = l_Lean_Elaborator_modifyCurrentScope(x_192, x_3, x_4, x_154); -if (lean::obj_tag(x_193) == 0) -{ -obj* x_194; obj* x_195; obj* x_196; -lean::dec(x_191); -lean::dec(x_190); -x_194 = lean::cnstr_get(x_193, 0); -lean::inc(x_194); -if (lean::is_exclusive(x_193)) { - lean::cnstr_release(x_193, 0); - x_195 = x_193; -} else { - lean::dec_ref(x_193); - x_195 = lean::box(0); -} -if (lean::is_scalar(x_195)) { - x_196 = lean::alloc_cnstr(0, 1, 0); -} else { - x_196 = x_195; -} -lean::cnstr_set(x_196, 0, x_194); -return x_196; -} -else -{ -obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; -x_197 = lean::cnstr_get(x_193, 0); -lean::inc(x_197); -if (lean::is_exclusive(x_193)) { - lean::cnstr_release(x_193, 0); - x_198 = x_193; -} else { - lean::dec_ref(x_193); - x_198 = lean::box(0); -} -x_199 = lean::cnstr_get(x_197, 1); -lean::inc(x_199); -if (lean::is_exclusive(x_197)) { - lean::cnstr_release(x_197, 0); - lean::cnstr_release(x_197, 1); - x_200 = x_197; -} else { - lean::dec_ref(x_197); - x_200 = lean::box(0); -} -x_201 = lean::cnstr_get(x_199, 0); -lean::inc(x_201); -x_202 = lean::cnstr_get(x_199, 1); -lean::inc(x_202); -x_203 = lean::cnstr_get(x_199, 2); -lean::inc(x_203); -x_204 = lean::cnstr_get(x_199, 3); -lean::inc(x_204); -x_205 = lean::cnstr_get(x_199, 4); -lean::inc(x_205); -x_206 = lean::cnstr_get(x_199, 5); -lean::inc(x_206); -x_207 = lean::cnstr_get(x_199, 6); -lean::inc(x_207); -x_208 = lean::cnstr_get(x_199, 7); -lean::inc(x_208); -if (lean::is_exclusive(x_199)) { - lean::cnstr_release(x_199, 0); - lean::cnstr_release(x_199, 1); - lean::cnstr_release(x_199, 2); - lean::cnstr_release(x_199, 3); - lean::cnstr_release(x_199, 4); - lean::cnstr_release(x_199, 5); - lean::cnstr_release(x_199, 6); - lean::cnstr_release(x_199, 7); - lean::cnstr_release(x_199, 8); - lean::cnstr_release(x_199, 9); - lean::cnstr_release(x_199, 10); - x_209 = x_199; -} else { - lean::dec_ref(x_199); - x_209 = lean::box(0); -} -x_210 = lean::cnstr_get(x_191, 0); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_191, 1); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_191, 6); -lean::inc(x_212); -lean::dec(x_191); -x_213 = l_List_append___rarg(x_190, x_206); -if (lean::is_scalar(x_209)) { - x_214 = lean::alloc_cnstr(0, 11, 0); -} else { - x_214 = x_209; -} -lean::cnstr_set(x_214, 0, x_201); -lean::cnstr_set(x_214, 1, x_202); -lean::cnstr_set(x_214, 2, x_203); -lean::cnstr_set(x_214, 3, x_204); -lean::cnstr_set(x_214, 4, x_205); -lean::cnstr_set(x_214, 5, x_213); -lean::cnstr_set(x_214, 6, x_207); -lean::cnstr_set(x_214, 7, x_208); -lean::cnstr_set(x_214, 8, x_210); -lean::cnstr_set(x_214, 9, x_211); -lean::cnstr_set(x_214, 10, x_212); -x_215 = lean::box(0); -if (lean::is_scalar(x_200)) { - x_216 = lean::alloc_cnstr(0, 2, 0); -} else { - x_216 = x_200; -} -lean::cnstr_set(x_216, 0, x_215); -lean::cnstr_set(x_216, 1, x_214); -if (lean::is_scalar(x_198)) { - x_217 = lean::alloc_cnstr(1, 1, 0); -} else { - x_217 = x_198; -} -lean::cnstr_set(x_217, 0, x_216); -return x_217; -} -} -} -} -} -} -block_230: -{ -if (lean::obj_tag(x_2) == 10) -{ -obj* x_220; obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; -x_220 = lean::cnstr_get(x_2, 0); -lean::inc(x_220); -x_221 = lean::cnstr_get(x_2, 1); -lean::inc(x_221); -lean::dec(x_2); -x_222 = l_Lean_FileMap_toPosition(x_7, x_219); -x_223 = lean::cnstr_get(x_222, 1); -lean::inc(x_223); -x_224 = l_Lean_Elaborator_toPexpr___main___closed__3; -x_225 = l_Lean_KVMap_setNat(x_220, x_224, x_223); -x_226 = lean::cnstr_get(x_222, 0); -lean::inc(x_226); -lean::dec(x_222); -x_227 = l_Lean_Elaborator_toPexpr___main___closed__4; -x_228 = l_Lean_KVMap_setNat(x_225, x_227, x_226); -x_229 = lean_expr_mk_mdata(x_228, x_221); -x_10 = x_229; -goto block_218; -} -else -{ -lean::dec(x_219); -x_10 = x_2; -goto block_218; -} -} -} -} -obj* l_RBNode_revFold___main___at_Lean_Elaborator_oldElabCommand___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_revFold___main___at_Lean_Elaborator_oldElabCommand___spec__2(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_RBTree_toList___at_Lean_Elaborator_oldElabCommand___spec__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_RBTree_toList___at_Lean_Elaborator_oldElabCommand___spec__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Elaborator_oldElabCommand___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Elaborator_oldElabCommand(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l_List_map___main___at_Lean_Elaborator_namesToPexpr___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::box(0); -x_7 = lean_expr_mk_const(x_4, x_6); -x_8 = l_List_map___main___at_Lean_Elaborator_namesToPexpr___spec__1(x_5); -lean::cnstr_set(x_1, 1, x_8); -lean::cnstr_set(x_1, 0, x_7); -return x_1; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_1); -x_11 = lean::box(0); -x_12 = lean_expr_mk_const(x_9, x_11); -x_13 = l_List_map___main___at_Lean_Elaborator_namesToPexpr___spec__1(x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -} -} -obj* l_Lean_Elaborator_namesToPexpr(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = l_List_map___main___at_Lean_Elaborator_namesToPexpr___spec__1(x_1); -x_3 = l_Lean_Elaborator_mkEqns___closed__1; -x_4 = l_Lean_Expr_mkCapp(x_3, x_2); -return x_4; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = l_Lean_Elaborator_toPexpr___main(x_9, x_2, x_3, x_4); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(x_10, x_2, x_3, x_17); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_16); -lean::free_heap_obj(x_1); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_23, 0); -lean::cnstr_set(x_1, 1, x_25); -lean::cnstr_set(x_1, 0, x_16); -lean::cnstr_set(x_23, 0, x_1); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_23, 0); -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_23); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_16); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_1); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_18, 0, x_28); -return x_18; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_18, 0); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - lean::cnstr_release(x_29, 1); - x_32 = x_29; -} else { - lean::dec_ref(x_29); - x_32 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_30); -lean::cnstr_set(x_1, 0, x_16); -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_1); -x_37 = l_Lean_Elaborator_toPexpr___main(x_35, x_2, x_3, x_4); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_36); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - x_39 = x_37; -} else { - lean::dec_ref(x_37); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(0, 1, 0); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_38); -return x_40; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(x_36, x_2, x_3, x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_42); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_46 = x_44; -} else { - lean::dec_ref(x_44); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(0, 1, 0); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_49 = x_44; -} else { - lean::dec_ref(x_44); - x_49 = lean::box(0); -} -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_52 = x_48; -} else { - lean::dec_ref(x_48); - x_52 = lean::box(0); -} -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_42); -lean::cnstr_set(x_53, 1, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -if (lean::is_scalar(x_49)) { - x_55 = lean::alloc_cnstr(1, 1, 0); -} else { - x_55 = x_49; -} -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_12, 2); -lean::inc(x_13); -lean::dec(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -lean::dec(x_11); -x_15 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(x_14, x_2, x_3, x_4); -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_16; -lean::dec(x_13); -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -return x_15; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -return x_18; -} -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = lean::cnstr_get(x_15, 0); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -lean::dec(x_19); -x_22 = l_Lean_Expr_mkCapp(x_13, x_20); -x_23 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__2(x_10, x_2, x_3, x_21); -if (lean::obj_tag(x_23) == 0) -{ -uint8 x_24; -lean::dec(x_22); -lean::free_heap_obj(x_1); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -return x_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_23); -if (x_27 == 0) -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_23, 0); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; -x_30 = lean::cnstr_get(x_28, 0); -lean::cnstr_set(x_1, 1, x_30); -lean::cnstr_set(x_1, 0, x_22); -lean::cnstr_set(x_28, 0, x_1); -return x_23; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::cnstr_get(x_28, 0); -x_32 = lean::cnstr_get(x_28, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_1, 1, x_31); -lean::cnstr_set(x_1, 0, x_22); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_32); -lean::cnstr_set(x_23, 0, x_33); -return x_23; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_23, 0); -lean::inc(x_34); -lean::dec(x_23); -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 1); -lean::inc(x_36); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - x_37 = x_34; -} else { - lean::dec_ref(x_34); - x_37 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_35); -lean::cnstr_set(x_1, 0, x_22); -if (lean::is_scalar(x_37)) { - x_38 = lean::alloc_cnstr(0, 2, 0); -} else { - x_38 = x_37; -} -lean::cnstr_set(x_38, 0, x_1); -lean::cnstr_set(x_38, 1, x_36); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_40 = lean::cnstr_get(x_1, 0); -x_41 = lean::cnstr_get(x_1, 1); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_1); -x_42 = lean::cnstr_get(x_40, 0); -lean::inc(x_42); -lean::dec(x_40); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_43, 2); -lean::inc(x_44); -lean::dec(x_43); -x_45 = lean::cnstr_get(x_42, 1); -lean::inc(x_45); -lean::dec(x_42); -x_46 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(x_45, x_2, x_3, x_4); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; -lean::dec(x_44); -lean::dec(x_41); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_48 = x_46; -} else { - lean::dec_ref(x_46); - x_48 = lean::box(0); -} -if (lean::is_scalar(x_48)) { - x_49 = lean::alloc_cnstr(0, 1, 0); -} else { - x_49 = x_48; -} -lean::cnstr_set(x_49, 0, x_47); -return x_49; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_46, 0); -lean::inc(x_50); -lean::dec(x_46); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_50, 1); -lean::inc(x_52); -lean::dec(x_50); -x_53 = l_Lean_Expr_mkCapp(x_44, x_51); -x_54 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__2(x_41, x_2, x_3, x_52); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; obj* x_56; obj* x_57; -lean::dec(x_53); -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - x_56 = x_54; -} else { - lean::dec_ref(x_54); - x_56 = lean::box(0); -} -if (lean::is_scalar(x_56)) { - x_57 = lean::alloc_cnstr(0, 1, 0); -} else { - x_57 = x_56; -} -lean::cnstr_set(x_57, 0, x_55); -return x_57; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_58 = lean::cnstr_get(x_54, 0); -lean::inc(x_58); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - x_59 = x_54; -} else { - lean::dec_ref(x_54); - x_59 = lean::box(0); -} -x_60 = lean::cnstr_get(x_58, 0); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_58, 1); -lean::inc(x_61); -if (lean::is_exclusive(x_58)) { - lean::cnstr_release(x_58, 0); - lean::cnstr_release(x_58, 1); - x_62 = x_58; -} else { - lean::dec_ref(x_58); - x_62 = lean::box(0); -} -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_53); -lean::cnstr_set(x_63, 1, x_60); -if (lean::is_scalar(x_62)) { - x_64 = lean::alloc_cnstr(0, 2, 0); -} else { - x_64 = x_62; -} -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_61); -if (lean::is_scalar(x_59)) { - x_65 = lean::alloc_cnstr(1, 1, 0); -} else { - x_65 = x_59; -} -lean::cnstr_set(x_65, 0, x_64); -return x_65; -} -} -} -} -} -} -obj* l_Lean_Elaborator_attrsToPexpr(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__2(x_1, x_2, x_3, x_4); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_10, 0); -x_13 = l_Lean_Elaborator_mkEqns___closed__1; -x_14 = l_Lean_Expr_mkCapp(x_13, x_12); -lean::cnstr_set(x_10, 0, x_14); -return x_5; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_10, 0); -x_16 = lean::cnstr_get(x_10, 1); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_10); -x_17 = l_Lean_Elaborator_mkEqns___closed__1; -x_18 = l_Lean_Expr_mkCapp(x_17, x_15); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_16); -lean::cnstr_set(x_5, 0, x_19); -return x_5; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_20 = lean::cnstr_get(x_5, 0); -lean::inc(x_20); -lean::dec(x_5); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -if (lean::is_exclusive(x_20)) { - lean::cnstr_release(x_20, 0); - lean::cnstr_release(x_20, 1); - x_23 = x_20; -} else { - lean::dec_ref(x_20); - x_23 = lean::box(0); -} -x_24 = l_Lean_Elaborator_mkEqns___closed__1; -x_25 = l_Lean_Expr_mkCapp(x_24, x_21); -if (lean::is_scalar(x_23)) { - x_26 = lean::alloc_cnstr(0, 2, 0); -} else { - x_26 = x_23; -} -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_22); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__2(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_attrsToPexpr___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_attrsToPexpr(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_declModifiersToPexpr___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("noncomputable"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_declModifiersToPexpr___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("unsafe"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_declModifiersToPexpr___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; uint8 x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_string("private"); -x_4 = lean_name_mk_string(x_2, x_3); -x_5 = 1; -x_6 = l_Lean_KVMap_setBool(x_1, x_4, x_5); -return x_6; -} -} -obj* _init_l_Lean_Elaborator_declModifiersToPexpr___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; uint8 x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_string("protected"); -x_4 = lean_name_mk_string(x_2, x_3); -x_5 = 1; -x_6 = l_Lean_KVMap_setBool(x_1, x_4, x_5); -return x_6; -} -} -obj* _init_l_Lean_Elaborator_declModifiersToPexpr___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("docString"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_declModifiersToPexpr___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("private"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_declModifiersToPexpr___closed__7() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("protected"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_declModifiersToPexpr(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_9; obj* x_10; obj* x_11; -x_5 = lean::box(0); -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 2); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 3); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_1, 4); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -lean::dec(x_1); -if (lean::obj_tag(x_6) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -x_11 = x_5; -goto block_108; -} -else -{ -obj* x_109; -x_109 = lean::cnstr_get(x_7, 0); -lean::inc(x_109); -lean::dec(x_7); -if (lean::obj_tag(x_109) == 0) -{ -obj* x_110; -lean::dec(x_109); -x_110 = l_Lean_Elaborator_declModifiersToPexpr___closed__3; -x_11 = x_110; -goto block_108; -} -else -{ -obj* x_111; -lean::dec(x_109); -x_111 = l_Lean_Elaborator_declModifiersToPexpr___closed__4; -x_11 = x_111; -goto block_108; -} -} -} -else -{ -obj* x_112; obj* x_113; -x_112 = lean::cnstr_get(x_6, 0); -lean::inc(x_112); -lean::dec(x_6); -x_113 = lean::cnstr_get(x_112, 1); -lean::inc(x_113); -lean::dec(x_112); -if (lean::obj_tag(x_113) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -x_11 = x_5; -goto block_108; -} -else -{ -obj* x_114; -x_114 = lean::cnstr_get(x_7, 0); -lean::inc(x_114); -lean::dec(x_7); -if (lean::obj_tag(x_114) == 0) -{ -obj* x_115; -lean::dec(x_114); -x_115 = l_Lean_Elaborator_declModifiersToPexpr___closed__3; -x_11 = x_115; -goto block_108; -} -else -{ -obj* x_116; -lean::dec(x_114); -x_116 = l_Lean_Elaborator_declModifiersToPexpr___closed__4; -x_11 = x_116; -goto block_108; -} -} -} -else -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; -x_117 = lean::cnstr_get(x_113, 0); -lean::inc(x_117); -lean::dec(x_113); -x_118 = lean::cnstr_get(x_117, 1); -lean::inc(x_118); -lean::dec(x_117); -x_119 = l_Lean_Elaborator_declModifiersToPexpr___closed__5; -x_120 = l_Lean_KVMap_setString(x_5, x_119, x_118); -if (lean::obj_tag(x_7) == 0) -{ -x_11 = x_120; -goto block_108; -} -else -{ -obj* x_121; -x_121 = lean::cnstr_get(x_7, 0); -lean::inc(x_121); -lean::dec(x_7); -if (lean::obj_tag(x_121) == 0) -{ -obj* x_122; uint8 x_123; obj* x_124; -lean::dec(x_121); -x_122 = l_Lean_Elaborator_declModifiersToPexpr___closed__6; -x_123 = 1; -x_124 = l_Lean_KVMap_setBool(x_120, x_122, x_123); -x_11 = x_124; -goto block_108; -} -else -{ -obj* x_125; uint8 x_126; obj* x_127; -lean::dec(x_121); -x_125 = l_Lean_Elaborator_declModifiersToPexpr___closed__7; -x_126 = 1; -x_127 = l_Lean_KVMap_setBool(x_120, x_125, x_126); -x_11 = x_127; -goto block_108; -} -} -} -} -block_108: -{ -uint8 x_12; -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_106; -x_106 = 0; -x_12 = x_106; -goto block_105; -} -else -{ -uint8 x_107; -lean::dec(x_8); -x_107 = 1; -x_12 = x_107; -goto block_105; -} -block_105: -{ -obj* x_13; obj* x_14; -x_13 = l_Lean_Elaborator_declModifiersToPexpr___closed__1; -x_14 = l_Lean_KVMap_setBool(x_11, x_13, x_12); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_15; uint8 x_16; obj* x_17; -x_15 = l_Lean_Elaborator_declModifiersToPexpr___closed__2; -x_16 = 0; -x_17 = l_Lean_KVMap_setBool(x_14, x_15, x_16); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_18; -x_18 = l_Lean_Elaborator_attrsToPexpr(x_5, x_2, x_3, x_4); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_17); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_23, 0); -x_26 = lean_expr_mk_mdata(x_17, x_25); -lean::cnstr_set(x_23, 0, x_26); -return x_18; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_23, 0); -x_28 = lean::cnstr_get(x_23, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_23); -x_29 = lean_expr_mk_mdata(x_17, x_27); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -lean::cnstr_set(x_18, 0, x_30); -return x_18; -} -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_31 = lean::cnstr_get(x_18, 0); -lean::inc(x_31); -lean::dec(x_18); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_31, 1); -lean::inc(x_33); -if (lean::is_exclusive(x_31)) { - lean::cnstr_release(x_31, 0); - lean::cnstr_release(x_31, 1); - x_34 = x_31; -} else { - lean::dec_ref(x_31); - x_34 = lean::box(0); -} -x_35 = lean_expr_mk_mdata(x_17, x_32); -if (lean::is_scalar(x_34)) { - x_36 = lean::alloc_cnstr(0, 2, 0); -} else { - x_36 = x_34; -} -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_33); -x_37 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_10, 0); -lean::inc(x_38); -lean::dec(x_10); -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -lean::dec(x_38); -x_40 = l_Lean_Elaborator_attrsToPexpr(x_39, x_2, x_3, x_4); -if (lean::obj_tag(x_40) == 0) -{ -uint8 x_41; -lean::dec(x_17); -x_41 = !lean::is_exclusive(x_40); -if (x_41 == 0) -{ -return x_40; -} -else -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_40, 0); -lean::inc(x_42); -lean::dec(x_40); -x_43 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -else -{ -uint8 x_44; -x_44 = !lean::is_exclusive(x_40); -if (x_44 == 0) -{ -obj* x_45; uint8 x_46; -x_45 = lean::cnstr_get(x_40, 0); -x_46 = !lean::is_exclusive(x_45); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_45, 0); -x_48 = lean_expr_mk_mdata(x_17, x_47); -lean::cnstr_set(x_45, 0, x_48); -return x_40; -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_49 = lean::cnstr_get(x_45, 0); -x_50 = lean::cnstr_get(x_45, 1); -lean::inc(x_50); -lean::inc(x_49); -lean::dec(x_45); -x_51 = lean_expr_mk_mdata(x_17, x_49); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_50); -lean::cnstr_set(x_40, 0, x_52); -return x_40; -} -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_53 = lean::cnstr_get(x_40, 0); -lean::inc(x_53); -lean::dec(x_40); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -if (lean::is_exclusive(x_53)) { - lean::cnstr_release(x_53, 0); - lean::cnstr_release(x_53, 1); - x_56 = x_53; -} else { - lean::dec_ref(x_53); - x_56 = lean::box(0); -} -x_57 = lean_expr_mk_mdata(x_17, x_54); -if (lean::is_scalar(x_56)) { - x_58 = lean::alloc_cnstr(0, 2, 0); -} else { - x_58 = x_56; -} -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_55); -x_59 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -return x_59; -} -} -} -} -else -{ -obj* x_60; uint8 x_61; obj* x_62; -lean::dec(x_9); -x_60 = l_Lean_Elaborator_declModifiersToPexpr___closed__2; -x_61 = 1; -x_62 = l_Lean_KVMap_setBool(x_14, x_60, x_61); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_63; -x_63 = l_Lean_Elaborator_attrsToPexpr(x_5, x_2, x_3, x_4); -if (lean::obj_tag(x_63) == 0) -{ -uint8 x_64; -lean::dec(x_62); -x_64 = !lean::is_exclusive(x_63); -if (x_64 == 0) -{ -return x_63; -} -else -{ -obj* x_65; obj* x_66; -x_65 = lean::cnstr_get(x_63, 0); -lean::inc(x_65); -lean::dec(x_63); -x_66 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_66, 0, x_65); -return x_66; -} -} -else -{ -uint8 x_67; -x_67 = !lean::is_exclusive(x_63); -if (x_67 == 0) -{ -obj* x_68; uint8 x_69; -x_68 = lean::cnstr_get(x_63, 0); -x_69 = !lean::is_exclusive(x_68); -if (x_69 == 0) -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -x_71 = lean_expr_mk_mdata(x_62, x_70); -lean::cnstr_set(x_68, 0, x_71); -return x_63; -} -else -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_72 = lean::cnstr_get(x_68, 0); -x_73 = lean::cnstr_get(x_68, 1); -lean::inc(x_73); -lean::inc(x_72); -lean::dec(x_68); -x_74 = lean_expr_mk_mdata(x_62, x_72); -x_75 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_73); -lean::cnstr_set(x_63, 0, x_75); -return x_63; -} -} -else -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_76 = lean::cnstr_get(x_63, 0); -lean::inc(x_76); -lean::dec(x_63); -x_77 = lean::cnstr_get(x_76, 0); -lean::inc(x_77); -x_78 = lean::cnstr_get(x_76, 1); -lean::inc(x_78); -if (lean::is_exclusive(x_76)) { - lean::cnstr_release(x_76, 0); - lean::cnstr_release(x_76, 1); - x_79 = x_76; -} else { - lean::dec_ref(x_76); - x_79 = lean::box(0); -} -x_80 = lean_expr_mk_mdata(x_62, x_77); -if (lean::is_scalar(x_79)) { - x_81 = lean::alloc_cnstr(0, 2, 0); -} else { - x_81 = x_79; -} -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_78); -x_82 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} -} -} -else -{ -obj* x_83; obj* x_84; obj* x_85; -x_83 = lean::cnstr_get(x_10, 0); -lean::inc(x_83); -lean::dec(x_10); -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -lean::dec(x_83); -x_85 = l_Lean_Elaborator_attrsToPexpr(x_84, x_2, x_3, x_4); -if (lean::obj_tag(x_85) == 0) -{ -uint8 x_86; -lean::dec(x_62); -x_86 = !lean::is_exclusive(x_85); -if (x_86 == 0) -{ -return x_85; -} -else -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_85, 0); -lean::inc(x_87); -lean::dec(x_85); -x_88 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_88, 0, x_87); -return x_88; -} -} -else -{ -uint8 x_89; -x_89 = !lean::is_exclusive(x_85); -if (x_89 == 0) -{ -obj* x_90; uint8 x_91; -x_90 = lean::cnstr_get(x_85, 0); -x_91 = !lean::is_exclusive(x_90); -if (x_91 == 0) -{ -obj* x_92; obj* x_93; -x_92 = lean::cnstr_get(x_90, 0); -x_93 = lean_expr_mk_mdata(x_62, x_92); -lean::cnstr_set(x_90, 0, x_93); -return x_85; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_94 = lean::cnstr_get(x_90, 0); -x_95 = lean::cnstr_get(x_90, 1); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_90); -x_96 = lean_expr_mk_mdata(x_62, x_94); -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_95); -lean::cnstr_set(x_85, 0, x_97); -return x_85; -} -} -else -{ -obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_98 = lean::cnstr_get(x_85, 0); -lean::inc(x_98); -lean::dec(x_85); -x_99 = lean::cnstr_get(x_98, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_98, 1); -lean::inc(x_100); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - lean::cnstr_release(x_98, 1); - x_101 = x_98; -} else { - lean::dec_ref(x_98); - x_101 = lean::box(0); -} -x_102 = lean_expr_mk_mdata(x_62, x_99); -if (lean::is_scalar(x_101)) { - x_103 = lean::alloc_cnstr(0, 2, 0); -} else { - x_103 = x_101; -} -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_100); -x_104 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_104, 0, x_103); -return x_104; -} -} -} -} -} -} -} -} -obj* l_Lean_Elaborator_declModifiersToPexpr___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_declModifiersToPexpr(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Elaborator_identUnivParamsToPexpr___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_Lean_Elaborator_mangleIdent(x_4); -x_7 = level_mk_param(x_6); -x_8 = l_List_map___main___at_Lean_Elaborator_identUnivParamsToPexpr___spec__1(x_5); -lean::cnstr_set(x_1, 1, x_8); -lean::cnstr_set(x_1, 0, x_7); -return x_1; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_1); -x_11 = l_Lean_Elaborator_mangleIdent(x_9); -x_12 = level_mk_param(x_11); -x_13 = l_List_map___main___at_Lean_Elaborator_identUnivParamsToPexpr___spec__1(x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -} -} -obj* l_Lean_Elaborator_identUnivParamsToPexpr(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = l_Lean_Elaborator_mangleIdent(x_2); -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::box(0); -x_6 = lean_expr_mk_const(x_3, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_List_map___main___at_Lean_Elaborator_identUnivParamsToPexpr___spec__1(x_8); -x_10 = lean_expr_mk_const(x_3, x_9); -return x_10; -} -} -} -obj* l_Lean_Elaborator_locally(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_currentScope(x_2, x_3, x_4); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_5, 0); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -lean::inc(x_3); -lean::inc(x_2); -x_12 = lean::apply_3(x_1, x_2, x_3, x_11); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -lean::dec(x_10); -lean::dec(x_3); -lean::dec(x_2); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_12, 0); -lean::inc(x_16); -lean::dec(x_12); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_fix1___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_18, 0, x_10); -x_19 = l_Lean_Elaborator_modifyCurrentScope(x_18, x_2, x_3, x_17); -lean::dec(x_3); -lean::dec(x_2); -return x_19; -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_simpleBindersToPexpr___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(x_9); -lean::dec(x_9); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_12, 1); -lean::inc(x_15); -lean::dec(x_12); -x_16 = l_Lean_Elaborator_mangleIdent(x_14); -x_17 = l_Lean_Elaborator_toPexpr___main(x_15, x_2, x_3, x_4); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -lean::dec(x_16); -lean::dec(x_13); -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -return x_17; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -else -{ -obj* x_21; obj* x_22; obj* x_23; uint8 x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -lean::dec(x_17); -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_21, 1); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::unbox(x_13); -lean::dec(x_13); -lean::inc(x_16); -x_25 = lean_expr_local(x_16, x_16, x_22, x_24); -x_26 = l_List_mmap___main___at_Lean_Elaborator_simpleBindersToPexpr___spec__1(x_10, x_2, x_3, x_23); -if (lean::obj_tag(x_26) == 0) -{ -uint8 x_27; -lean::dec(x_25); -lean::free_heap_obj(x_1); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -return x_26; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_26, 0); -lean::inc(x_28); -lean::dec(x_26); -x_29 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -return x_29; -} -} -else -{ -uint8 x_30; -x_30 = !lean::is_exclusive(x_26); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::cnstr_get(x_26, 0); -x_32 = !lean::is_exclusive(x_31); -if (x_32 == 0) -{ -obj* x_33; -x_33 = lean::cnstr_get(x_31, 0); -lean::cnstr_set(x_1, 1, x_33); -lean::cnstr_set(x_1, 0, x_25); -lean::cnstr_set(x_31, 0, x_1); -return x_26; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; -x_34 = lean::cnstr_get(x_31, 0); -x_35 = lean::cnstr_get(x_31, 1); -lean::inc(x_35); -lean::inc(x_34); -lean::dec(x_31); -lean::cnstr_set(x_1, 1, x_34); -lean::cnstr_set(x_1, 0, x_25); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_1); -lean::cnstr_set(x_36, 1, x_35); -lean::cnstr_set(x_26, 0, x_36); -return x_26; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_26, 0); -lean::inc(x_37); -lean::dec(x_26); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_37, 1); -lean::inc(x_39); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - x_40 = x_37; -} else { - lean::dec_ref(x_37); - x_40 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_38); -lean::cnstr_set(x_1, 0, x_25); -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(0, 2, 0); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_1); -lean::cnstr_set(x_41, 1, x_39); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -return x_42; -} -} -} -} -else -{ -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; -x_43 = lean::cnstr_get(x_1, 0); -x_44 = lean::cnstr_get(x_1, 1); -lean::inc(x_44); -lean::inc(x_43); -lean::dec(x_1); -x_45 = l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(x_43); -lean::dec(x_43); -x_46 = lean::cnstr_get(x_45, 1); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_45, 0); -lean::inc(x_47); -lean::dec(x_45); -x_48 = lean::cnstr_get(x_46, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_46, 1); -lean::inc(x_49); -lean::dec(x_46); -x_50 = l_Lean_Elaborator_mangleIdent(x_48); -x_51 = l_Lean_Elaborator_toPexpr___main(x_49, x_2, x_3, x_4); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_50); -lean::dec(x_47); -lean::dec(x_44); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - x_53 = x_51; -} else { - lean::dec_ref(x_51); - x_53 = lean::box(0); -} -if (lean::is_scalar(x_53)) { - x_54 = lean::alloc_cnstr(0, 1, 0); -} else { - x_54 = x_53; -} -lean::cnstr_set(x_54, 0, x_52); -return x_54; -} -else -{ -obj* x_55; obj* x_56; obj* x_57; uint8 x_58; obj* x_59; obj* x_60; -x_55 = lean::cnstr_get(x_51, 0); -lean::inc(x_55); -lean::dec(x_51); -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 1); -lean::inc(x_57); -lean::dec(x_55); -x_58 = lean::unbox(x_47); -lean::dec(x_47); -lean::inc(x_50); -x_59 = lean_expr_local(x_50, x_50, x_56, x_58); -x_60 = l_List_mmap___main___at_Lean_Elaborator_simpleBindersToPexpr___spec__1(x_44, x_2, x_3, x_57); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; -lean::dec(x_59); -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - x_62 = x_60; -} else { - lean::dec_ref(x_60); - x_62 = lean::box(0); -} -if (lean::is_scalar(x_62)) { - x_63 = lean::alloc_cnstr(0, 1, 0); -} else { - x_63 = x_62; -} -lean::cnstr_set(x_63, 0, x_61); -return x_63; -} -else -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_64 = lean::cnstr_get(x_60, 0); -lean::inc(x_64); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - x_65 = x_60; -} else { - lean::dec_ref(x_60); - x_65 = lean::box(0); -} -x_66 = lean::cnstr_get(x_64, 0); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_64, 1); -lean::inc(x_67); -if (lean::is_exclusive(x_64)) { - lean::cnstr_release(x_64, 0); - lean::cnstr_release(x_64, 1); - x_68 = x_64; -} else { - lean::dec_ref(x_64); - x_68 = lean::box(0); -} -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_59); -lean::cnstr_set(x_69, 1, x_66); -if (lean::is_scalar(x_68)) { - x_70 = lean::alloc_cnstr(0, 2, 0); -} else { - x_70 = x_68; -} -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_67); -if (lean::is_scalar(x_65)) { - x_71 = lean::alloc_cnstr(1, 1, 0); -} else { - x_71 = x_65; -} -lean::cnstr_set(x_71, 0, x_70); -return x_71; -} -} -} -} -} -} -obj* l_Lean_Elaborator_simpleBindersToPexpr(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_simpleBindersToPexpr___spec__1(x_1, x_2, x_3, x_4); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_10, 0); -x_13 = l_Lean_Elaborator_mkEqns___closed__1; -x_14 = l_Lean_Expr_mkCapp(x_13, x_12); -lean::cnstr_set(x_10, 0, x_14); -return x_5; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_10, 0); -x_16 = lean::cnstr_get(x_10, 1); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_10); -x_17 = l_Lean_Elaborator_mkEqns___closed__1; -x_18 = l_Lean_Expr_mkCapp(x_17, x_15); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_16); -lean::cnstr_set(x_5, 0, x_19); -return x_5; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_20 = lean::cnstr_get(x_5, 0); -lean::inc(x_20); -lean::dec(x_5); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -if (lean::is_exclusive(x_20)) { - lean::cnstr_release(x_20, 0); - lean::cnstr_release(x_20, 1); - x_23 = x_20; -} else { - lean::dec_ref(x_20); - x_23 = lean::box(0); -} -x_24 = l_Lean_Elaborator_mkEqns___closed__1; -x_25 = l_Lean_Expr_mkCapp(x_24, x_21); -if (lean::is_scalar(x_23)) { - x_26 = lean::alloc_cnstr(0, 2, 0); -} else { - x_26 = x_23; -} -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_22); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_simpleBindersToPexpr___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_simpleBindersToPexpr___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_simpleBindersToPexpr___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_simpleBindersToPexpr(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_2); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_2, 0); -x_11 = lean::cnstr_get(x_2, 1); -x_12 = lean::cnstr_get(x_10, 1); -lean::inc(x_12); -x_13 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(x_12, x_3, x_4, x_5); -if (lean::obj_tag(x_13) == 0) -{ -uint8 x_14; -lean::free_heap_obj(x_2); -lean::dec(x_11); -lean::dec(x_10); -lean::dec(x_1); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -return x_13; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -} -else -{ -obj* x_17; uint8 x_18; -x_17 = lean::cnstr_get(x_13, 0); -lean::inc(x_17); -lean::dec(x_13); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = lean::cnstr_get(x_17, 1); -x_21 = lean::cnstr_get(x_10, 3); -lean::inc(x_21); -lean::dec(x_10); -x_22 = l_Lean_Elaborator_toPexpr___main(x_21, x_3, x_4, x_20); -if (lean::obj_tag(x_22) == 0) -{ -uint8 x_23; -lean::free_heap_obj(x_17); -lean::dec(x_19); -lean::free_heap_obj(x_2); -lean::dec(x_11); -lean::dec(x_1); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -return x_22; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_22, 0); -lean::inc(x_24); -lean::dec(x_22); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -return x_25; -} -} -else -{ -obj* x_26; uint8 x_27; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_26, 0); -x_29 = lean::cnstr_get(x_26, 1); -lean::cnstr_set(x_26, 1, x_28); -lean::cnstr_set(x_26, 0, x_19); -lean::inc(x_1); -lean::cnstr_set(x_17, 1, x_26); -lean::cnstr_set(x_17, 0, x_1); -x_30 = l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(x_1, x_11, x_3, x_4, x_29); -if (lean::obj_tag(x_30) == 0) -{ -uint8 x_31; -lean::dec(x_17); -lean::free_heap_obj(x_2); -x_31 = !lean::is_exclusive(x_30); -if (x_31 == 0) -{ -return x_30; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_30); -if (x_34 == 0) -{ -obj* x_35; uint8 x_36; -x_35 = lean::cnstr_get(x_30, 0); -x_36 = !lean::is_exclusive(x_35); -if (x_36 == 0) -{ -obj* x_37; -x_37 = lean::cnstr_get(x_35, 0); -lean::cnstr_set(x_2, 1, x_37); -lean::cnstr_set(x_2, 0, x_17); -lean::cnstr_set(x_35, 0, x_2); -return x_30; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_35, 0); -x_39 = lean::cnstr_get(x_35, 1); -lean::inc(x_39); -lean::inc(x_38); -lean::dec(x_35); -lean::cnstr_set(x_2, 1, x_38); -lean::cnstr_set(x_2, 0, x_17); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_2); -lean::cnstr_set(x_40, 1, x_39); -lean::cnstr_set(x_30, 0, x_40); -return x_30; -} -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_41 = lean::cnstr_get(x_30, 0); -lean::inc(x_41); -lean::dec(x_30); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -if (lean::is_exclusive(x_41)) { - lean::cnstr_release(x_41, 0); - lean::cnstr_release(x_41, 1); - x_44 = x_41; -} else { - lean::dec_ref(x_41); - x_44 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_42); -lean::cnstr_set(x_2, 0, x_17); -if (lean::is_scalar(x_44)) { - x_45 = lean::alloc_cnstr(0, 2, 0); -} else { - x_45 = x_44; -} -lean::cnstr_set(x_45, 0, x_2); -lean::cnstr_set(x_45, 1, x_43); -x_46 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -return x_46; -} -} -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_47 = lean::cnstr_get(x_26, 0); -x_48 = lean::cnstr_get(x_26, 1); -lean::inc(x_48); -lean::inc(x_47); -lean::dec(x_26); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_19); -lean::cnstr_set(x_49, 1, x_47); -lean::inc(x_1); -lean::cnstr_set(x_17, 1, x_49); -lean::cnstr_set(x_17, 0, x_1); -x_50 = l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(x_1, x_11, x_3, x_4, x_48); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; -lean::dec(x_17); -lean::free_heap_obj(x_2); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_52 = x_50; -} else { - lean::dec_ref(x_50); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(0, 1, 0); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_51); -return x_53; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_54 = lean::cnstr_get(x_50, 0); -lean::inc(x_54); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_55 = x_50; -} else { - lean::dec_ref(x_50); - x_55 = lean::box(0); -} -x_56 = lean::cnstr_get(x_54, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_54, 1); -lean::inc(x_57); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - lean::cnstr_release(x_54, 1); - x_58 = x_54; -} else { - lean::dec_ref(x_54); - x_58 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_56); -lean::cnstr_set(x_2, 0, x_17); -if (lean::is_scalar(x_58)) { - x_59 = lean::alloc_cnstr(0, 2, 0); -} else { - x_59 = x_58; -} -lean::cnstr_set(x_59, 0, x_2); -lean::cnstr_set(x_59, 1, x_57); -if (lean::is_scalar(x_55)) { - x_60 = lean::alloc_cnstr(1, 1, 0); -} else { - x_60 = x_55; -} -lean::cnstr_set(x_60, 0, x_59); -return x_60; -} -} -} -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_61 = lean::cnstr_get(x_17, 0); -x_62 = lean::cnstr_get(x_17, 1); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_17); -x_63 = lean::cnstr_get(x_10, 3); -lean::inc(x_63); -lean::dec(x_10); -x_64 = l_Lean_Elaborator_toPexpr___main(x_63, x_3, x_4, x_62); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; obj* x_66; obj* x_67; -lean::dec(x_61); -lean::free_heap_obj(x_2); -lean::dec(x_11); -lean::dec(x_1); -x_65 = lean::cnstr_get(x_64, 0); -lean::inc(x_65); -if (lean::is_exclusive(x_64)) { - lean::cnstr_release(x_64, 0); - x_66 = x_64; -} else { - lean::dec_ref(x_64); - x_66 = lean::box(0); -} -if (lean::is_scalar(x_66)) { - x_67 = lean::alloc_cnstr(0, 1, 0); -} else { - x_67 = x_66; -} -lean::cnstr_set(x_67, 0, x_65); -return x_67; -} -else -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_68 = lean::cnstr_get(x_64, 0); -lean::inc(x_68); -lean::dec(x_64); -x_69 = lean::cnstr_get(x_68, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_68, 1); -lean::inc(x_70); -if (lean::is_exclusive(x_68)) { - lean::cnstr_release(x_68, 0); - lean::cnstr_release(x_68, 1); - x_71 = x_68; -} else { - lean::dec_ref(x_68); - x_71 = lean::box(0); -} -if (lean::is_scalar(x_71)) { - x_72 = lean::alloc_cnstr(0, 2, 0); -} else { - x_72 = x_71; -} -lean::cnstr_set(x_72, 0, x_61); -lean::cnstr_set(x_72, 1, x_69); -lean::inc(x_1); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_1); -lean::cnstr_set(x_73, 1, x_72); -x_74 = l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(x_1, x_11, x_3, x_4, x_70); -if (lean::obj_tag(x_74) == 0) -{ -obj* x_75; obj* x_76; obj* x_77; -lean::dec(x_73); -lean::free_heap_obj(x_2); -x_75 = lean::cnstr_get(x_74, 0); -lean::inc(x_75); -if (lean::is_exclusive(x_74)) { - lean::cnstr_release(x_74, 0); - x_76 = x_74; -} else { - lean::dec_ref(x_74); - x_76 = lean::box(0); -} -if (lean::is_scalar(x_76)) { - x_77 = lean::alloc_cnstr(0, 1, 0); -} else { - x_77 = x_76; -} -lean::cnstr_set(x_77, 0, x_75); -return x_77; -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; -x_78 = lean::cnstr_get(x_74, 0); -lean::inc(x_78); -if (lean::is_exclusive(x_74)) { - lean::cnstr_release(x_74, 0); - x_79 = x_74; -} else { - lean::dec_ref(x_74); - x_79 = lean::box(0); -} -x_80 = lean::cnstr_get(x_78, 0); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_78, 1); -lean::inc(x_81); -if (lean::is_exclusive(x_78)) { - lean::cnstr_release(x_78, 0); - lean::cnstr_release(x_78, 1); - x_82 = x_78; -} else { - lean::dec_ref(x_78); - x_82 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_80); -lean::cnstr_set(x_2, 0, x_73); -if (lean::is_scalar(x_82)) { - x_83 = lean::alloc_cnstr(0, 2, 0); -} else { - x_83 = x_82; -} -lean::cnstr_set(x_83, 0, x_2); -lean::cnstr_set(x_83, 1, x_81); -if (lean::is_scalar(x_79)) { - x_84 = lean::alloc_cnstr(1, 1, 0); -} else { - x_84 = x_79; -} -lean::cnstr_set(x_84, 0, x_83); -return x_84; -} -} -} -} -} -else -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_85 = lean::cnstr_get(x_2, 0); -x_86 = lean::cnstr_get(x_2, 1); -lean::inc(x_86); -lean::inc(x_85); -lean::dec(x_2); -x_87 = lean::cnstr_get(x_85, 1); -lean::inc(x_87); -x_88 = l_List_mmap___main___at_Lean_Elaborator_attrsToPexpr___spec__1(x_87, x_3, x_4, x_5); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; obj* x_90; obj* x_91; -lean::dec(x_86); -lean::dec(x_85); -lean::dec(x_1); -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -if (lean::is_exclusive(x_88)) { - lean::cnstr_release(x_88, 0); - x_90 = x_88; -} else { - lean::dec_ref(x_88); - x_90 = lean::box(0); -} -if (lean::is_scalar(x_90)) { - x_91 = lean::alloc_cnstr(0, 1, 0); -} else { - x_91 = x_90; -} -lean::cnstr_set(x_91, 0, x_89); -return x_91; -} -else -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_92 = lean::cnstr_get(x_88, 0); -lean::inc(x_92); -lean::dec(x_88); -x_93 = lean::cnstr_get(x_92, 0); -lean::inc(x_93); -x_94 = lean::cnstr_get(x_92, 1); -lean::inc(x_94); -if (lean::is_exclusive(x_92)) { - lean::cnstr_release(x_92, 0); - lean::cnstr_release(x_92, 1); - x_95 = x_92; -} else { - lean::dec_ref(x_92); - x_95 = lean::box(0); -} -x_96 = lean::cnstr_get(x_85, 3); -lean::inc(x_96); -lean::dec(x_85); -x_97 = l_Lean_Elaborator_toPexpr___main(x_96, x_3, x_4, x_94); -if (lean::obj_tag(x_97) == 0) -{ -obj* x_98; obj* x_99; obj* x_100; -lean::dec(x_95); -lean::dec(x_93); -lean::dec(x_86); -lean::dec(x_1); -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - x_99 = x_97; -} else { - lean::dec_ref(x_97); - x_99 = lean::box(0); -} -if (lean::is_scalar(x_99)) { - x_100 = lean::alloc_cnstr(0, 1, 0); -} else { - x_100 = x_99; -} -lean::cnstr_set(x_100, 0, x_98); -return x_100; -} -else -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_101 = lean::cnstr_get(x_97, 0); -lean::inc(x_101); -lean::dec(x_97); -x_102 = lean::cnstr_get(x_101, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_101, 1); -lean::inc(x_103); -if (lean::is_exclusive(x_101)) { - lean::cnstr_release(x_101, 0); - lean::cnstr_release(x_101, 1); - x_104 = x_101; -} else { - lean::dec_ref(x_101); - x_104 = lean::box(0); -} -if (lean::is_scalar(x_104)) { - x_105 = lean::alloc_cnstr(0, 2, 0); -} else { - x_105 = x_104; -} -lean::cnstr_set(x_105, 0, x_93); -lean::cnstr_set(x_105, 1, x_102); -lean::inc(x_1); -if (lean::is_scalar(x_95)) { - x_106 = lean::alloc_cnstr(0, 2, 0); -} else { - x_106 = x_95; -} -lean::cnstr_set(x_106, 0, x_1); -lean::cnstr_set(x_106, 1, x_105); -x_107 = l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(x_1, x_86, x_3, x_4, x_103); -if (lean::obj_tag(x_107) == 0) -{ -obj* x_108; obj* x_109; obj* x_110; -lean::dec(x_106); -x_108 = lean::cnstr_get(x_107, 0); -lean::inc(x_108); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - x_109 = x_107; -} else { - lean::dec_ref(x_107); - x_109 = lean::box(0); -} -if (lean::is_scalar(x_109)) { - x_110 = lean::alloc_cnstr(0, 1, 0); -} else { - x_110 = x_109; -} -lean::cnstr_set(x_110, 0, x_108); -return x_110; -} -else -{ -obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_111 = lean::cnstr_get(x_107, 0); -lean::inc(x_111); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - x_112 = x_107; -} else { - lean::dec_ref(x_107); - x_112 = lean::box(0); -} -x_113 = lean::cnstr_get(x_111, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get(x_111, 1); -lean::inc(x_114); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - x_115 = x_111; -} else { - lean::dec_ref(x_111); - x_115 = lean::box(0); -} -x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_106); -lean::cnstr_set(x_116, 1, x_113); -if (lean::is_scalar(x_115)) { - x_117 = lean::alloc_cnstr(0, 2, 0); -} else { - x_117 = x_115; -} -lean::cnstr_set(x_117, 0, x_116); -lean::cnstr_set(x_117, 1, x_114); -if (lean::is_scalar(x_112)) { - x_118 = lean::alloc_cnstr(1, 1, 0); -} else { - x_118 = x_112; -} -lean::cnstr_set(x_118, 0, x_117); -return x_118; -} -} -} -} -} -} -} -obj* l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_Lean_Elaborator_mangleIdent(x_4); -x_7 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = l_Lean_Elaborator_mangleIdent(x_8); -x_11 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(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_11); -return x_12; -} -} -} -} -obj* l_List_foldl___main___at_Lean_Elaborator_elabDefLike___spec__3(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -lean::inc(x_3); -x_5 = level_mk_param(x_3); -x_6 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -x_7 = l_Lean_Elaborator_OrderedRBMap_insert___rarg(x_6, x_1, x_3, x_5); -x_1 = x_7; -x_2 = x_4; -goto _start; -} -} -} -obj* l_Lean_Elaborator_elabDefLike___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_2, 3); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_5); -x_7 = l_List_foldl___main___at_Lean_Elaborator_elabDefLike___spec__3(x_4, x_6); -lean::cnstr_set(x_2, 3, x_7); -return x_2; -} -else -{ -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; -x_8 = lean::cnstr_get(x_2, 0); -x_9 = lean::cnstr_get(x_2, 1); -x_10 = lean::cnstr_get(x_2, 2); -x_11 = lean::cnstr_get(x_2, 3); -x_12 = lean::cnstr_get(x_2, 4); -x_13 = lean::cnstr_get(x_2, 5); -x_14 = lean::cnstr_get(x_2, 6); -x_15 = lean::cnstr_get(x_2, 7); -x_16 = lean::cnstr_get(x_2, 8); -lean::inc(x_16); -lean::inc(x_15); -lean::inc(x_14); -lean::inc(x_13); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_1, 1); -lean::inc(x_17); -lean::dec(x_1); -x_18 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_17); -x_19 = l_List_foldl___main___at_Lean_Elaborator_elabDefLike___spec__3(x_11, x_18); -x_20 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_20, 0, x_8); -lean::cnstr_set(x_20, 1, x_9); -lean::cnstr_set(x_20, 2, x_10); -lean::cnstr_set(x_20, 3, x_19); -lean::cnstr_set(x_20, 4, x_12); -lean::cnstr_set(x_20, 5, x_13); -lean::cnstr_set(x_20, 6, x_14); -lean::cnstr_set(x_20, 7, x_15); -lean::cnstr_set(x_20, 8, x_16); -return x_20; -} -} -} -obj* _init_l_Lean_Elaborator_elabDefLike___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("elabDefLike: unexpected input"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_elabDefLike___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("command"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("defs"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -return x_7; -} -} -obj* l_Lean_Elaborator_elabDefLike(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; -x_8 = lean::cnstr_get(x_3, 3); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_1); -x_11 = l_Lean_Elaborator_elabDefLike___closed__1; -x_12 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_10, x_11, x_5, x_6, x_7); -lean::dec(x_7); -lean::dec(x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = lean::cnstr_get(x_3, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_3, 2); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_3, 4); -lean::inc(x_15); -lean::dec(x_3); -x_16 = lean::cnstr_get(x_8, 1); -lean::inc(x_16); -lean::dec(x_8); -x_17 = lean::cnstr_get(x_9, 0); -lean::inc(x_17); -lean::dec(x_9); -x_18 = lean::box(0); -x_19 = l_Lean_Elaborator_declModifiersToPexpr(x_2, x_5, x_6, x_7); -if (lean::obj_tag(x_19) == 0) -{ -uint8 x_20; -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_4); -lean::dec(x_1); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -return x_19; -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_19, 0); -lean::inc(x_21); -lean::dec(x_19); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -} -else -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_19, 0); -lean::inc(x_23); -lean::dec(x_19); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = lean::cnstr_get(x_23, 0); -x_26 = lean::cnstr_get(x_23, 1); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_4); -x_28 = lean_expr_mk_lit(x_27); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_144; -x_144 = lean::box(0); -lean::cnstr_set(x_23, 0, x_144); -x_29 = x_23; -goto block_143; -} -else -{ -obj* x_145; obj* x_146; obj* x_147; -lean::free_heap_obj(x_23); -x_145 = lean::cnstr_get(x_13, 0); -lean::inc(x_145); -x_146 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___lambda__1), 2, 1); -lean::closure_set(x_146, 0, x_145); -x_147 = l_Lean_Elaborator_modifyCurrentScope(x_146, x_5, x_6, x_26); -if (lean::obj_tag(x_147) == 0) -{ -uint8 x_148; -lean::dec(x_28); -lean::dec(x_25); -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_1); -x_148 = !lean::is_exclusive(x_147); -if (x_148 == 0) -{ -return x_147; -} -else -{ -obj* x_149; obj* x_150; -x_149 = lean::cnstr_get(x_147, 0); -lean::inc(x_149); -lean::dec(x_147); -x_150 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_150, 0, x_149); -return x_150; -} -} -else -{ -obj* x_151; -x_151 = lean::cnstr_get(x_147, 0); -lean::inc(x_151); -lean::dec(x_147); -x_29 = x_151; -goto block_143; -} -} -block_143: -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -x_31 = lean::cnstr_get(x_14, 0); -lean::inc(x_31); -lean::dec(x_14); -x_32 = l_Lean_Elaborator_mangleIdent(x_31); -x_33 = l_Lean_Expander_getOptType___main(x_16); -lean::dec(x_16); -x_34 = l_Lean_Elaborator_toPexpr___main(x_33, x_5, x_6, x_30); -if (lean::obj_tag(x_13) == 0) -{ -x_35 = x_18; -goto block_139; -} -else -{ -obj* x_140; obj* x_141; obj* x_142; -x_140 = lean::cnstr_get(x_13, 0); -lean::inc(x_140); -lean::dec(x_13); -x_141 = lean::cnstr_get(x_140, 1); -lean::inc(x_141); -lean::dec(x_140); -x_142 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_141); -x_35 = x_142; -goto block_139; -} -block_139: -{ -if (lean::obj_tag(x_34) == 0) -{ -uint8 x_36; -lean::dec(x_35); -lean::dec(x_32); -lean::dec(x_28); -lean::dec(x_25); -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_1); -x_36 = !lean::is_exclusive(x_34); -if (x_36 == 0) -{ -return x_34; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_34, 0); -lean::inc(x_37); -lean::dec(x_34); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -return x_38; -} -} -else -{ -obj* x_39; obj* x_40; uint8 x_41; -x_39 = lean::cnstr_get(x_34, 0); -lean::inc(x_39); -lean::dec(x_34); -x_40 = l_Lean_Elaborator_namesToPexpr(x_35); -x_41 = !lean::is_exclusive(x_39); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; uint8 x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_42 = lean::cnstr_get(x_39, 0); -x_43 = lean::cnstr_get(x_39, 1); -x_44 = 4; -lean::inc(x_42); -lean::inc(x_32, 2); -x_45 = lean_expr_local(x_32, x_32, x_42, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_18); -x_47 = l_Lean_Elaborator_mkEqns___closed__1; -x_48 = l_Lean_Expr_mkCapp(x_47, x_46); -switch (lean::obj_tag(x_15)) { -case 0: -{ -obj* x_70; obj* x_71; obj* x_72; -lean::free_heap_obj(x_39); -lean::dec(x_42); -lean::dec(x_32); -x_70 = lean::cnstr_get(x_15, 0); -lean::inc(x_70); -lean::dec(x_15); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -lean::dec(x_70); -x_72 = l_Lean_Elaborator_toPexpr___main(x_71, x_5, x_6, x_43); -if (lean::obj_tag(x_72) == 0) -{ -uint8 x_73; -lean::dec(x_48); -lean::dec(x_40); -lean::dec(x_28); -lean::dec(x_25); -lean::dec(x_17); -lean::dec(x_1); -x_73 = !lean::is_exclusive(x_72); -if (x_73 == 0) -{ -return x_72; -} -else -{ -obj* x_74; obj* x_75; -x_74 = lean::cnstr_get(x_72, 0); -lean::inc(x_74); -lean::dec(x_72); -x_75 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_75, 0, x_74); -return x_75; -} -} -else -{ -obj* x_76; -x_76 = lean::cnstr_get(x_72, 0); -lean::inc(x_76); -lean::dec(x_72); -x_49 = x_76; -goto block_69; -} -} -case 1: -{ -obj* x_77; -lean::dec(x_32); -lean::dec(x_15); -x_77 = l_Lean_Elaborator_mkEqns(x_42, x_18); -lean::cnstr_set(x_39, 0, x_77); -x_49 = x_39; -goto block_69; -} -default: -{ -obj* x_78; obj* x_79; -lean::free_heap_obj(x_39); -x_78 = lean::cnstr_get(x_15, 0); -lean::inc(x_78); -lean::dec(x_15); -x_79 = l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(x_32, x_78, x_5, x_6, x_43); -if (lean::obj_tag(x_79) == 0) -{ -uint8 x_80; -lean::dec(x_48); -lean::dec(x_42); -lean::dec(x_40); -lean::dec(x_28); -lean::dec(x_25); -lean::dec(x_17); -lean::dec(x_1); -x_80 = !lean::is_exclusive(x_79); -if (x_80 == 0) -{ -return x_79; -} -else -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_79, 0); -lean::inc(x_81); -lean::dec(x_79); -x_82 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} -} -else -{ -obj* x_83; uint8 x_84; -x_83 = lean::cnstr_get(x_79, 0); -lean::inc(x_83); -lean::dec(x_79); -x_84 = !lean::is_exclusive(x_83); -if (x_84 == 0) -{ -obj* x_85; obj* x_86; -x_85 = lean::cnstr_get(x_83, 0); -x_86 = l_Lean_Elaborator_mkEqns(x_42, x_85); -lean::cnstr_set(x_83, 0, x_86); -x_49 = x_83; -goto block_69; -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_87 = lean::cnstr_get(x_83, 0); -x_88 = lean::cnstr_get(x_83, 1); -lean::inc(x_88); -lean::inc(x_87); -lean::dec(x_83); -x_89 = l_Lean_Elaborator_mkEqns(x_42, x_87); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_88); -x_49 = x_90; -goto block_69; -} -} -} -} -block_69: -{ -obj* x_50; obj* x_51; obj* x_52; -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_49, 1); -lean::inc(x_51); -lean::dec(x_49); -x_52 = l_Lean_Elaborator_simpleBindersToPexpr(x_17, x_5, x_6, x_51); -if (lean::obj_tag(x_52) == 0) -{ -uint8 x_53; -lean::dec(x_50); -lean::dec(x_48); -lean::dec(x_40); -lean::dec(x_28); -lean::dec(x_25); -lean::dec(x_1); -x_53 = !lean::is_exclusive(x_52); -if (x_53 == 0) -{ -return x_52; -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_52, 0); -lean::inc(x_54); -lean::dec(x_52); -x_55 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -else -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_56 = lean::cnstr_get(x_52, 0); -lean::inc(x_56); -lean::dec(x_52); -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -lean::dec(x_56); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_50); -lean::cnstr_set(x_59, 1, x_18); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_57); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_48); -lean::cnstr_set(x_61, 1, x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_40); -lean::cnstr_set(x_62, 1, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_28); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_25); -lean::cnstr_set(x_64, 1, x_63); -x_65 = l_Lean_Expr_mkCapp(x_47, x_64); -x_66 = l_Lean_Elaborator_elabDefLike___closed__2; -x_67 = lean_expr_mk_mdata(x_66, x_65); -x_68 = l_Lean_Elaborator_oldElabCommand(x_1, x_67, x_5, x_6, x_58); -lean::dec(x_1); -return x_68; -} -} -} -else -{ -obj* x_91; obj* x_92; uint8 x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_91 = lean::cnstr_get(x_39, 0); -x_92 = lean::cnstr_get(x_39, 1); -lean::inc(x_92); -lean::inc(x_91); -lean::dec(x_39); -x_93 = 4; -lean::inc(x_91); -lean::inc(x_32, 2); -x_94 = lean_expr_local(x_32, x_32, x_91, x_93); -x_95 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_18); -x_96 = l_Lean_Elaborator_mkEqns___closed__1; -x_97 = l_Lean_Expr_mkCapp(x_96, x_95); -switch (lean::obj_tag(x_15)) { -case 0: -{ -obj* x_119; obj* x_120; obj* x_121; -lean::dec(x_91); -lean::dec(x_32); -x_119 = lean::cnstr_get(x_15, 0); -lean::inc(x_119); -lean::dec(x_15); -x_120 = lean::cnstr_get(x_119, 1); -lean::inc(x_120); -lean::dec(x_119); -x_121 = l_Lean_Elaborator_toPexpr___main(x_120, x_5, x_6, x_92); -if (lean::obj_tag(x_121) == 0) -{ -obj* x_122; obj* x_123; obj* x_124; -lean::dec(x_97); -lean::dec(x_40); -lean::dec(x_28); -lean::dec(x_25); -lean::dec(x_17); -lean::dec(x_1); -x_122 = lean::cnstr_get(x_121, 0); -lean::inc(x_122); -if (lean::is_exclusive(x_121)) { - lean::cnstr_release(x_121, 0); - x_123 = x_121; -} else { - lean::dec_ref(x_121); - x_123 = lean::box(0); -} -if (lean::is_scalar(x_123)) { - x_124 = lean::alloc_cnstr(0, 1, 0); -} else { - x_124 = x_123; -} -lean::cnstr_set(x_124, 0, x_122); -return x_124; -} -else -{ -obj* x_125; -x_125 = lean::cnstr_get(x_121, 0); -lean::inc(x_125); -lean::dec(x_121); -x_98 = x_125; -goto block_118; -} -} -case 1: -{ -obj* x_126; obj* x_127; -lean::dec(x_32); -lean::dec(x_15); -x_126 = l_Lean_Elaborator_mkEqns(x_91, x_18); -x_127 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_92); -x_98 = x_127; -goto block_118; -} -default: -{ -obj* x_128; obj* x_129; -x_128 = lean::cnstr_get(x_15, 0); -lean::inc(x_128); -lean::dec(x_15); -x_129 = l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(x_32, x_128, x_5, x_6, x_92); -if (lean::obj_tag(x_129) == 0) -{ -obj* x_130; obj* x_131; obj* x_132; -lean::dec(x_97); -lean::dec(x_91); -lean::dec(x_40); -lean::dec(x_28); -lean::dec(x_25); -lean::dec(x_17); -lean::dec(x_1); -x_130 = lean::cnstr_get(x_129, 0); -lean::inc(x_130); -if (lean::is_exclusive(x_129)) { - lean::cnstr_release(x_129, 0); - x_131 = x_129; -} else { - lean::dec_ref(x_129); - x_131 = lean::box(0); -} -if (lean::is_scalar(x_131)) { - x_132 = lean::alloc_cnstr(0, 1, 0); -} else { - x_132 = x_131; -} -lean::cnstr_set(x_132, 0, x_130); -return x_132; -} -else -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; -x_133 = lean::cnstr_get(x_129, 0); -lean::inc(x_133); -lean::dec(x_129); -x_134 = lean::cnstr_get(x_133, 0); -lean::inc(x_134); -x_135 = lean::cnstr_get(x_133, 1); -lean::inc(x_135); -if (lean::is_exclusive(x_133)) { - lean::cnstr_release(x_133, 0); - lean::cnstr_release(x_133, 1); - x_136 = x_133; -} else { - lean::dec_ref(x_133); - x_136 = lean::box(0); -} -x_137 = l_Lean_Elaborator_mkEqns(x_91, x_134); -if (lean::is_scalar(x_136)) { - x_138 = lean::alloc_cnstr(0, 2, 0); -} else { - x_138 = x_136; -} -lean::cnstr_set(x_138, 0, x_137); -lean::cnstr_set(x_138, 1, x_135); -x_98 = x_138; -goto block_118; -} -} -} -block_118: -{ -obj* x_99; obj* x_100; obj* x_101; -x_99 = lean::cnstr_get(x_98, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_98, 1); -lean::inc(x_100); -lean::dec(x_98); -x_101 = l_Lean_Elaborator_simpleBindersToPexpr(x_17, x_5, x_6, x_100); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; obj* x_103; obj* x_104; -lean::dec(x_99); -lean::dec(x_97); -lean::dec(x_40); -lean::dec(x_28); -lean::dec(x_25); -lean::dec(x_1); -x_102 = lean::cnstr_get(x_101, 0); -lean::inc(x_102); -if (lean::is_exclusive(x_101)) { - lean::cnstr_release(x_101, 0); - x_103 = x_101; -} else { - lean::dec_ref(x_101); - x_103 = lean::box(0); -} -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(0, 1, 0); -} else { - x_104 = x_103; -} -lean::cnstr_set(x_104, 0, x_102); -return x_104; -} -else -{ -obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; -x_105 = lean::cnstr_get(x_101, 0); -lean::inc(x_105); -lean::dec(x_101); -x_106 = lean::cnstr_get(x_105, 0); -lean::inc(x_106); -x_107 = lean::cnstr_get(x_105, 1); -lean::inc(x_107); -lean::dec(x_105); -x_108 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_108, 0, x_99); -lean::cnstr_set(x_108, 1, x_18); -x_109 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_109, 0, x_106); -lean::cnstr_set(x_109, 1, x_108); -x_110 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_110, 0, x_97); -lean::cnstr_set(x_110, 1, x_109); -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_40); -lean::cnstr_set(x_111, 1, x_110); -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_28); -lean::cnstr_set(x_112, 1, x_111); -x_113 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_113, 0, x_25); -lean::cnstr_set(x_113, 1, x_112); -x_114 = l_Lean_Expr_mkCapp(x_96, x_113); -x_115 = l_Lean_Elaborator_elabDefLike___closed__2; -x_116 = lean_expr_mk_mdata(x_115, x_114); -x_117 = l_Lean_Elaborator_oldElabCommand(x_1, x_116, x_5, x_6, x_107); -lean::dec(x_1); -return x_117; -} -} -} -} -} -} -} -else -{ -obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; -x_152 = lean::cnstr_get(x_23, 0); -x_153 = lean::cnstr_get(x_23, 1); -lean::inc(x_153); -lean::inc(x_152); -lean::dec(x_23); -x_154 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_154, 0, x_4); -x_155 = lean_expr_mk_lit(x_154); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_222; obj* x_223; -x_222 = lean::box(0); -x_223 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_223, 0, x_222); -lean::cnstr_set(x_223, 1, x_153); -x_156 = x_223; -goto block_221; -} -else -{ -obj* x_224; obj* x_225; obj* x_226; -x_224 = lean::cnstr_get(x_13, 0); -lean::inc(x_224); -x_225 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___lambda__1), 2, 1); -lean::closure_set(x_225, 0, x_224); -x_226 = l_Lean_Elaborator_modifyCurrentScope(x_225, x_5, x_6, x_153); -if (lean::obj_tag(x_226) == 0) -{ -obj* x_227; obj* x_228; obj* x_229; -lean::dec(x_155); -lean::dec(x_152); -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_1); -x_227 = lean::cnstr_get(x_226, 0); -lean::inc(x_227); -if (lean::is_exclusive(x_226)) { - lean::cnstr_release(x_226, 0); - x_228 = x_226; -} else { - lean::dec_ref(x_226); - x_228 = lean::box(0); -} -if (lean::is_scalar(x_228)) { - x_229 = lean::alloc_cnstr(0, 1, 0); -} else { - x_229 = x_228; -} -lean::cnstr_set(x_229, 0, x_227); -return x_229; -} -else -{ -obj* x_230; -x_230 = lean::cnstr_get(x_226, 0); -lean::inc(x_230); -lean::dec(x_226); -x_156 = x_230; -goto block_221; -} -} -block_221: -{ -obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -x_157 = lean::cnstr_get(x_156, 1); -lean::inc(x_157); -lean::dec(x_156); -x_158 = lean::cnstr_get(x_14, 0); -lean::inc(x_158); -lean::dec(x_14); -x_159 = l_Lean_Elaborator_mangleIdent(x_158); -x_160 = l_Lean_Expander_getOptType___main(x_16); -lean::dec(x_16); -x_161 = l_Lean_Elaborator_toPexpr___main(x_160, x_5, x_6, x_157); -if (lean::obj_tag(x_13) == 0) -{ -x_162 = x_18; -goto block_217; -} -else -{ -obj* x_218; obj* x_219; obj* x_220; -x_218 = lean::cnstr_get(x_13, 0); -lean::inc(x_218); -lean::dec(x_13); -x_219 = lean::cnstr_get(x_218, 1); -lean::inc(x_219); -lean::dec(x_218); -x_220 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_219); -x_162 = x_220; -goto block_217; -} -block_217: -{ -if (lean::obj_tag(x_161) == 0) -{ -obj* x_163; obj* x_164; obj* x_165; -lean::dec(x_162); -lean::dec(x_159); -lean::dec(x_155); -lean::dec(x_152); -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_1); -x_163 = lean::cnstr_get(x_161, 0); -lean::inc(x_163); -if (lean::is_exclusive(x_161)) { - lean::cnstr_release(x_161, 0); - x_164 = x_161; -} else { - lean::dec_ref(x_161); - x_164 = lean::box(0); -} -if (lean::is_scalar(x_164)) { - x_165 = lean::alloc_cnstr(0, 1, 0); -} else { - x_165 = x_164; -} -lean::cnstr_set(x_165, 0, x_163); -return x_165; -} -else -{ -obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; uint8 x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; -x_166 = lean::cnstr_get(x_161, 0); -lean::inc(x_166); -lean::dec(x_161); -x_167 = l_Lean_Elaborator_namesToPexpr(x_162); -x_168 = lean::cnstr_get(x_166, 0); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_166, 1); -lean::inc(x_169); -if (lean::is_exclusive(x_166)) { - lean::cnstr_release(x_166, 0); - lean::cnstr_release(x_166, 1); - x_170 = x_166; -} else { - lean::dec_ref(x_166); - x_170 = lean::box(0); -} -x_171 = 4; -lean::inc(x_168); -lean::inc(x_159, 2); -x_172 = lean_expr_local(x_159, x_159, x_168, x_171); -x_173 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_173, 0, x_172); -lean::cnstr_set(x_173, 1, x_18); -x_174 = l_Lean_Elaborator_mkEqns___closed__1; -x_175 = l_Lean_Expr_mkCapp(x_174, x_173); -switch (lean::obj_tag(x_15)) { -case 0: -{ -obj* x_197; obj* x_198; obj* x_199; -lean::dec(x_170); -lean::dec(x_168); -lean::dec(x_159); -x_197 = lean::cnstr_get(x_15, 0); -lean::inc(x_197); -lean::dec(x_15); -x_198 = lean::cnstr_get(x_197, 1); -lean::inc(x_198); -lean::dec(x_197); -x_199 = l_Lean_Elaborator_toPexpr___main(x_198, x_5, x_6, x_169); -if (lean::obj_tag(x_199) == 0) -{ -obj* x_200; obj* x_201; obj* x_202; -lean::dec(x_175); -lean::dec(x_167); -lean::dec(x_155); -lean::dec(x_152); -lean::dec(x_17); -lean::dec(x_1); -x_200 = lean::cnstr_get(x_199, 0); -lean::inc(x_200); -if (lean::is_exclusive(x_199)) { - lean::cnstr_release(x_199, 0); - x_201 = x_199; -} else { - lean::dec_ref(x_199); - x_201 = lean::box(0); -} -if (lean::is_scalar(x_201)) { - x_202 = lean::alloc_cnstr(0, 1, 0); -} else { - x_202 = x_201; -} -lean::cnstr_set(x_202, 0, x_200); -return x_202; -} -else -{ -obj* x_203; -x_203 = lean::cnstr_get(x_199, 0); -lean::inc(x_203); -lean::dec(x_199); -x_176 = x_203; -goto block_196; -} -} -case 1: -{ -obj* x_204; obj* x_205; -lean::dec(x_159); -lean::dec(x_15); -x_204 = l_Lean_Elaborator_mkEqns(x_168, x_18); -if (lean::is_scalar(x_170)) { - x_205 = lean::alloc_cnstr(0, 2, 0); -} else { - x_205 = x_170; -} -lean::cnstr_set(x_205, 0, x_204); -lean::cnstr_set(x_205, 1, x_169); -x_176 = x_205; -goto block_196; -} -default: -{ -obj* x_206; obj* x_207; -lean::dec(x_170); -x_206 = lean::cnstr_get(x_15, 0); -lean::inc(x_206); -lean::dec(x_15); -x_207 = l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(x_159, x_206, x_5, x_6, x_169); -if (lean::obj_tag(x_207) == 0) -{ -obj* x_208; obj* x_209; obj* x_210; -lean::dec(x_175); -lean::dec(x_168); -lean::dec(x_167); -lean::dec(x_155); -lean::dec(x_152); -lean::dec(x_17); -lean::dec(x_1); -x_208 = lean::cnstr_get(x_207, 0); -lean::inc(x_208); -if (lean::is_exclusive(x_207)) { - lean::cnstr_release(x_207, 0); - x_209 = x_207; -} else { - lean::dec_ref(x_207); - x_209 = lean::box(0); -} -if (lean::is_scalar(x_209)) { - x_210 = lean::alloc_cnstr(0, 1, 0); -} else { - x_210 = x_209; -} -lean::cnstr_set(x_210, 0, x_208); -return x_210; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_216; -x_211 = lean::cnstr_get(x_207, 0); -lean::inc(x_211); -lean::dec(x_207); -x_212 = lean::cnstr_get(x_211, 0); -lean::inc(x_212); -x_213 = lean::cnstr_get(x_211, 1); -lean::inc(x_213); -if (lean::is_exclusive(x_211)) { - lean::cnstr_release(x_211, 0); - lean::cnstr_release(x_211, 1); - x_214 = x_211; -} else { - lean::dec_ref(x_211); - x_214 = lean::box(0); -} -x_215 = l_Lean_Elaborator_mkEqns(x_168, x_212); -if (lean::is_scalar(x_214)) { - x_216 = lean::alloc_cnstr(0, 2, 0); -} else { - x_216 = x_214; -} -lean::cnstr_set(x_216, 0, x_215); -lean::cnstr_set(x_216, 1, x_213); -x_176 = x_216; -goto block_196; -} -} -} -block_196: -{ -obj* x_177; obj* x_178; obj* x_179; -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -x_178 = lean::cnstr_get(x_176, 1); -lean::inc(x_178); -lean::dec(x_176); -x_179 = l_Lean_Elaborator_simpleBindersToPexpr(x_17, x_5, x_6, x_178); -if (lean::obj_tag(x_179) == 0) -{ -obj* x_180; obj* x_181; obj* x_182; -lean::dec(x_177); -lean::dec(x_175); -lean::dec(x_167); -lean::dec(x_155); -lean::dec(x_152); -lean::dec(x_1); -x_180 = lean::cnstr_get(x_179, 0); -lean::inc(x_180); -if (lean::is_exclusive(x_179)) { - lean::cnstr_release(x_179, 0); - x_181 = x_179; -} else { - lean::dec_ref(x_179); - x_181 = lean::box(0); -} -if (lean::is_scalar(x_181)) { - x_182 = lean::alloc_cnstr(0, 1, 0); -} else { - x_182 = x_181; -} -lean::cnstr_set(x_182, 0, x_180); -return x_182; -} -else -{ -obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; -x_183 = lean::cnstr_get(x_179, 0); -lean::inc(x_183); -lean::dec(x_179); -x_184 = lean::cnstr_get(x_183, 0); -lean::inc(x_184); -x_185 = lean::cnstr_get(x_183, 1); -lean::inc(x_185); -lean::dec(x_183); -x_186 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_186, 0, x_177); -lean::cnstr_set(x_186, 1, x_18); -x_187 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_187, 0, x_184); -lean::cnstr_set(x_187, 1, x_186); -x_188 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_188, 0, x_175); -lean::cnstr_set(x_188, 1, x_187); -x_189 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_189, 0, x_167); -lean::cnstr_set(x_189, 1, x_188); -x_190 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_190, 0, x_155); -lean::cnstr_set(x_190, 1, x_189); -x_191 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_191, 0, x_152); -lean::cnstr_set(x_191, 1, x_190); -x_192 = l_Lean_Expr_mkCapp(x_174, x_191); -x_193 = l_Lean_Elaborator_elabDefLike___closed__2; -x_194 = lean_expr_mk_mdata(x_193, x_192); -x_195 = l_Lean_Elaborator_oldElabCommand(x_1, x_194, x_5, x_6, x_185); -lean::dec(x_1); -return x_195; -} -} -} -} -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_elabDefLike___spec__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Elaborator_elabDefLike___boxed(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; -x_8 = l_Lean_Elaborator_elabDefLike(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_6); -lean::dec(x_5); -return x_8; -} -} -obj* _init_l_Lean_Elaborator_inferModToPexpr___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_nat_obj(0u); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = lean_expr_mk_lit(x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_inferModToPexpr___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_nat_obj(1u); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = lean_expr_mk_lit(x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_inferModToPexpr___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_nat_obj(2u); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = lean_expr_mk_lit(x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_inferModToPexpr(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Elaborator_inferModToPexpr___closed__1; -return x_2; -} -else -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Elaborator_inferModToPexpr___closed__2; -return x_4; -} -else -{ -obj* x_5; -x_5 = l_Lean_Elaborator_inferModToPexpr___closed__3; -return x_5; -} -} -} -} -obj* l_Lean_Elaborator_inferModToPexpr___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Elaborator_inferModToPexpr(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_ReaderT_bind___at_Lean_Elaborator_declaration_elaborate___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -lean::inc(x_4); -lean::inc(x_3); -x_6 = lean::apply_3(x_1, x_3, x_4, x_5); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -return x_6; -} -else -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -x_9 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; -} -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_6, 0); -lean::inc(x_10); -lean::dec(x_6); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_10, 1); -lean::inc(x_12); -lean::dec(x_10); -x_13 = lean::apply_4(x_2, x_11, x_3, x_4, x_12); -return x_13; -} -} -} -obj* l_ReaderT_bind___at_Lean_Elaborator_declaration_elaborate___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Elaborator_declaration_elaborate___spec__1___rarg), 5, 0); -return x_3; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("declaration.elaborate: unexpected input"); -return x_1; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2(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_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_43; obj* x_44; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -if (lean::is_exclusive(x_2)) { - lean::cnstr_release(x_2, 0); - lean::cnstr_release(x_2, 1); - x_11 = x_2; -} else { - lean::dec_ref(x_2); - x_11 = lean::box(0); -} -x_43 = lean::cnstr_get(x_9, 3); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; -lean::dec(x_44); -lean::dec(x_43); -lean::dec(x_9); -x_45 = lean::box(0); -x_12 = x_45; -goto block_42; -} -else -{ -obj* x_46; -x_46 = lean::cnstr_get(x_44, 0); -lean::inc(x_46); -lean::dec(x_44); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; -x_47 = lean::cnstr_get(x_43, 1); -lean::inc(x_47); -lean::dec(x_43); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -lean::dec(x_9); -x_48 = lean::box(0); -x_12 = x_48; -goto block_42; -} -else -{ -obj* x_49; obj* x_50; obj* x_51; -lean::dec(x_11); -x_49 = lean::cnstr_get(x_47, 0); -lean::inc(x_49); -lean::dec(x_47); -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -lean::dec(x_49); -x_51 = l_Lean_Elaborator_toPexpr___main(x_50, x_3, x_4, x_5); -if (lean::obj_tag(x_51) == 0) -{ -uint8 x_52; -lean::dec(x_10); -lean::dec(x_9); -lean::dec(x_1); -x_52 = !lean::is_exclusive(x_51); -if (x_52 == 0) -{ -return x_51; -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_51, 0); -lean::inc(x_53); -lean::dec(x_51); -x_54 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -return x_54; -} -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; obj* x_61; obj* x_62; -x_55 = lean::cnstr_get(x_51, 0); -lean::inc(x_55); -lean::dec(x_51); -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 1); -lean::inc(x_57); -lean::dec(x_55); -x_58 = lean::cnstr_get(x_9, 1); -lean::inc(x_58); -lean::dec(x_9); -x_59 = l_Lean_Elaborator_mangleIdent(x_58); -x_60 = 0; -lean::inc(x_59); -x_61 = lean_expr_local(x_59, x_59, x_56, x_60); -x_62 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2(x_1, x_10, x_3, x_4, x_57); -if (lean::obj_tag(x_62) == 0) -{ -uint8 x_63; -lean::dec(x_61); -x_63 = !lean::is_exclusive(x_62); -if (x_63 == 0) -{ -return x_62; -} -else -{ -obj* x_64; obj* x_65; -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -lean::dec(x_62); -x_65 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_65, 0, x_64); -return x_65; -} -} -else -{ -uint8 x_66; -x_66 = !lean::is_exclusive(x_62); -if (x_66 == 0) -{ -obj* x_67; uint8 x_68; -x_67 = lean::cnstr_get(x_62, 0); -x_68 = !lean::is_exclusive(x_67); -if (x_68 == 0) -{ -obj* x_69; obj* x_70; -x_69 = lean::cnstr_get(x_67, 0); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_61); -lean::cnstr_set(x_70, 1, x_69); -lean::cnstr_set(x_67, 0, x_70); -return x_62; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_71 = lean::cnstr_get(x_67, 0); -x_72 = lean::cnstr_get(x_67, 1); -lean::inc(x_72); -lean::inc(x_71); -lean::dec(x_67); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_61); -lean::cnstr_set(x_73, 1, x_71); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_72); -lean::cnstr_set(x_62, 0, x_74); -return x_62; -} -} -else -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_75 = lean::cnstr_get(x_62, 0); -lean::inc(x_75); -lean::dec(x_62); -x_76 = lean::cnstr_get(x_75, 0); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_75, 1); -lean::inc(x_77); -if (lean::is_exclusive(x_75)) { - lean::cnstr_release(x_75, 0); - lean::cnstr_release(x_75, 1); - x_78 = x_75; -} else { - lean::dec_ref(x_75); - x_78 = lean::box(0); -} -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_61); -lean::cnstr_set(x_79, 1, x_76); -if (lean::is_scalar(x_78)) { - x_80 = lean::alloc_cnstr(0, 2, 0); -} else { - x_80 = x_78; -} -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_77); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -return x_81; -} -} -} -} -} -else -{ -obj* x_82; -lean::dec(x_46); -lean::dec(x_43); -lean::dec(x_9); -x_82 = lean::box(0); -x_12 = x_82; -goto block_42; -} -} -block_42: -{ -obj* x_13; obj* x_14; obj* x_15; -lean::dec(x_12); -lean::inc(x_1); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_1); -x_14 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___closed__1; -x_15 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_13, x_14, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_13); -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_16; -lean::dec(x_11); -lean::dec(x_10); -lean::dec(x_1); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -return x_15; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -return x_18; -} -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_15, 0); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -lean::dec(x_19); -x_22 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2(x_1, x_10, x_3, x_4, x_21); -if (lean::obj_tag(x_22) == 0) -{ -uint8 x_23; -lean::dec(x_20); -lean::dec(x_11); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -return x_22; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_22, 0); -lean::inc(x_24); -lean::dec(x_22); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -return x_25; -} -} -else -{ -uint8 x_26; -x_26 = !lean::is_exclusive(x_22); -if (x_26 == 0) -{ -obj* x_27; uint8 x_28; -x_27 = lean::cnstr_get(x_22, 0); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_27, 0); -if (lean::is_scalar(x_11)) { - x_30 = lean::alloc_cnstr(1, 2, 0); -} else { - x_30 = x_11; -} -lean::cnstr_set(x_30, 0, x_20); -lean::cnstr_set(x_30, 1, x_29); -lean::cnstr_set(x_27, 0, x_30); -return x_22; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_27, 0); -x_32 = lean::cnstr_get(x_27, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_27); -if (lean::is_scalar(x_11)) { - x_33 = lean::alloc_cnstr(1, 2, 0); -} else { - x_33 = x_11; -} -lean::cnstr_set(x_33, 0, x_20); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -lean::cnstr_set(x_22, 0, x_34); -return x_22; -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_35 = lean::cnstr_get(x_22, 0); -lean::inc(x_35); -lean::dec(x_22); -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_35, 1); -lean::inc(x_37); -if (lean::is_exclusive(x_35)) { - lean::cnstr_release(x_35, 0); - lean::cnstr_release(x_35, 1); - x_38 = x_35; -} else { - lean::dec_ref(x_35); - x_38 = lean::box(0); -} -if (lean::is_scalar(x_11)) { - x_39 = lean::alloc_cnstr(1, 2, 0); -} else { - x_39 = x_11; -} -lean::cnstr_set(x_39, 0, x_20); -lean::cnstr_set(x_39, 1, x_36); -if (lean::is_scalar(x_38)) { - x_40 = lean::alloc_cnstr(0, 2, 0); -} else { - x_40 = x_38; -} -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_37); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -return x_41; -} -} -} -} -} -} -} -obj* l_List_map___main___at_Lean_Elaborator_declaration_elaborate___spec__3(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_4, 2); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Elaborator_inferModToPexpr(x_6); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Elaborator_declaration_elaborate___spec__3(x_5); -lean::cnstr_set(x_1, 1, x_8); -lean::cnstr_set(x_1, 0, x_7); -return x_1; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_1); -x_11 = lean::cnstr_get(x_9, 2); -lean::inc(x_11); -lean::dec(x_9); -x_12 = l_Lean_Elaborator_inferModToPexpr(x_11); -lean::dec(x_11); -x_13 = l_List_map___main___at_Lean_Elaborator_declaration_elaborate___spec__3(x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__4(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -x_12 = l_Lean_Elaborator_toPexpr___main(x_11, x_2, x_3, x_4); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_12, 0); -lean::inc(x_16); -lean::dec(x_12); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_16, 1); -lean::inc(x_18); -lean::dec(x_16); -x_19 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__4(x_10, x_2, x_3, x_18); -if (lean::obj_tag(x_19) == 0) -{ -uint8 x_20; -lean::dec(x_17); -lean::free_heap_obj(x_1); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -return x_19; -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_19, 0); -lean::inc(x_21); -lean::dec(x_19); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -} -else -{ -uint8 x_23; -x_23 = !lean::is_exclusive(x_19); -if (x_23 == 0) -{ -obj* x_24; uint8 x_25; -x_24 = lean::cnstr_get(x_19, 0); -x_25 = !lean::is_exclusive(x_24); -if (x_25 == 0) -{ -obj* x_26; -x_26 = lean::cnstr_get(x_24, 0); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_17); -lean::cnstr_set(x_24, 0, x_1); -return x_19; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_24, 0); -x_28 = lean::cnstr_get(x_24, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_24); -lean::cnstr_set(x_1, 1, x_27); -lean::cnstr_set(x_1, 0, x_17); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_1); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_19, 0, x_29); -return x_19; -} -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_30 = lean::cnstr_get(x_19, 0); -lean::inc(x_30); -lean::dec(x_19); -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_30, 1); -lean::inc(x_32); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - lean::cnstr_release(x_30, 1); - x_33 = x_30; -} else { - lean::dec_ref(x_30); - x_33 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_31); -lean::cnstr_set(x_1, 0, x_17); -if (lean::is_scalar(x_33)) { - x_34 = lean::alloc_cnstr(0, 2, 0); -} else { - x_34 = x_33; -} -lean::cnstr_set(x_34, 0, x_1); -lean::cnstr_set(x_34, 1, x_32); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -} -} -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_1, 0); -x_37 = lean::cnstr_get(x_1, 1); -lean::inc(x_37); -lean::inc(x_36); -lean::dec(x_1); -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -lean::dec(x_36); -x_39 = l_Lean_Elaborator_toPexpr___main(x_38, x_2, x_3, x_4); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_37); -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -if (lean::is_exclusive(x_39)) { - lean::cnstr_release(x_39, 0); - x_41 = x_39; -} else { - lean::dec_ref(x_39); - x_41 = lean::box(0); -} -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(0, 1, 0); -} else { - x_42 = x_41; -} -lean::cnstr_set(x_42, 0, x_40); -return x_42; -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_43 = lean::cnstr_get(x_39, 0); -lean::inc(x_43); -lean::dec(x_39); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_43, 1); -lean::inc(x_45); -lean::dec(x_43); -x_46 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__4(x_37, x_2, x_3, x_45); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; -lean::dec(x_44); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_48 = x_46; -} else { - lean::dec_ref(x_46); - x_48 = lean::box(0); -} -if (lean::is_scalar(x_48)) { - x_49 = lean::alloc_cnstr(0, 1, 0); -} else { - x_49 = x_48; -} -lean::cnstr_set(x_49, 0, x_47); -return x_49; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_50 = lean::cnstr_get(x_46, 0); -lean::inc(x_50); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_51 = x_46; -} else { - lean::dec_ref(x_46); - x_51 = lean::box(0); -} -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_50, 1); -lean::inc(x_53); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - x_54 = x_50; -} else { - lean::dec_ref(x_50); - x_54 = lean::box(0); -} -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_44); -lean::cnstr_set(x_55, 1, x_52); -if (lean::is_scalar(x_54)) { - x_56 = lean::alloc_cnstr(0, 2, 0); -} else { - x_56 = x_54; -} -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_53); -if (lean::is_scalar(x_51)) { - x_57 = lean::alloc_cnstr(1, 1, 0); -} else { - x_57 = x_51; -} -lean::cnstr_set(x_57, 0, x_56); -return x_57; -} -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__5(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_2); -lean::dec(x_1); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_3, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_3, 1); -lean::inc(x_11); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_12 = x_3; -} else { - lean::dec_ref(x_3); - x_12 = lean::box(0); -} -switch (lean::obj_tag(x_10)) { -case 0: -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_10, 0); -lean::inc(x_63); -lean::dec(x_10); -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -lean::dec(x_63); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; obj* x_66; obj* x_67; -lean::dec(x_64); -lean::inc(x_1); -x_65 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_65, 0, x_1); -x_66 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___closed__1; -x_67 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_65, x_66, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_65); -if (lean::obj_tag(x_67) == 0) -{ -uint8 x_68; -lean::dec(x_12); -lean::dec(x_11); -lean::dec(x_2); -lean::dec(x_1); -x_68 = !lean::is_exclusive(x_67); -if (x_68 == 0) -{ -return x_67; -} -else -{ -obj* x_69; obj* x_70; -x_69 = lean::cnstr_get(x_67, 0); -lean::inc(x_69); -lean::dec(x_67); -x_70 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_70, 0, x_69); -return x_70; -} -} -else -{ -obj* x_71; -x_71 = lean::cnstr_get(x_67, 0); -lean::inc(x_71); -lean::dec(x_67); -x_13 = x_71; -goto block_62; -} -} -else -{ -obj* x_72; uint8 x_73; obj* x_74; obj* x_75; obj* x_76; -x_72 = lean::cnstr_get(x_64, 0); -lean::inc(x_72); -lean::dec(x_64); -x_73 = 0; -x_74 = lean::box(x_73); -x_75 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_72); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_6); -x_13 = x_76; -goto block_62; -} -} -case 1: -{ -obj* x_77; obj* x_78; uint8 x_79; obj* x_80; obj* x_81; obj* x_82; -x_77 = lean::cnstr_get(x_10, 0); -lean::inc(x_77); -lean::dec(x_10); -x_78 = lean::cnstr_get(x_77, 1); -lean::inc(x_78); -lean::dec(x_77); -x_79 = 1; -x_80 = lean::box(x_79); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_78); -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_6); -x_13 = x_82; -goto block_62; -} -case 2: -{ -obj* x_83; obj* x_84; uint8 x_85; obj* x_86; obj* x_87; obj* x_88; -x_83 = lean::cnstr_get(x_10, 0); -lean::inc(x_83); -lean::dec(x_10); -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -lean::dec(x_83); -x_85 = 2; -x_86 = lean::box(x_85); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_84); -x_88 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_6); -x_13 = x_88; -goto block_62; -} -default: -{ -obj* x_89; obj* x_90; uint8 x_91; obj* x_92; obj* x_93; obj* x_94; -x_89 = lean::cnstr_get(x_10, 0); -lean::inc(x_89); -lean::dec(x_10); -x_90 = lean::cnstr_get(x_89, 1); -lean::inc(x_90); -lean::dec(x_89); -x_91 = 3; -x_92 = lean::box(x_91); -x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set(x_93, 1, x_90); -x_94 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_6); -x_13 = x_94; -goto block_62; -} -} -block_62: -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 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_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_14, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_14, 1); -lean::inc(x_17); -lean::dec(x_14); -x_18 = l_Lean_Elaborator_dummy; -x_19 = lean::unbox(x_16); -lean::dec(x_16); -lean::inc(x_2, 2); -x_20 = lean_expr_local(x_2, x_2, x_18, x_19); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_21); -x_23 = l_Lean_Elaborator_namesToPexpr(x_22); -x_24 = lean::cnstr_get(x_17, 1); -lean::inc(x_24); -x_25 = l_Lean_Elaborator_inferModToPexpr(x_24); -lean::dec(x_24); -x_26 = lean::cnstr_get(x_17, 2); -lean::inc(x_26); -lean::dec(x_17); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -x_28 = l_Lean_Expander_getOptType___main(x_27); -lean::dec(x_27); -x_29 = l_Lean_Elaborator_toPexpr___main(x_28, x_4, x_5, x_15); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -lean::dec(x_25); -lean::dec(x_23); -lean::dec(x_20); -lean::dec(x_12); -lean::dec(x_11); -lean::dec(x_2); -lean::dec(x_1); -x_30 = !lean::is_exclusive(x_29); -if (x_30 == 0) -{ -return x_29; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -return x_32; -} -} -else -{ -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; -x_33 = lean::cnstr_get(x_29, 0); -lean::inc(x_33); -lean::dec(x_29); -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_33, 1); -lean::inc(x_35); -lean::dec(x_33); -x_36 = lean::box(0); -if (lean::is_scalar(x_12)) { - x_37 = lean::alloc_cnstr(1, 2, 0); -} else { - x_37 = x_12; -} -lean::cnstr_set(x_37, 0, x_34); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_25); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_20); -lean::cnstr_set(x_40, 1, x_39); -lean::inc(x_2); -x_41 = l_Lean_Expr_mkCapp(x_2, x_40); -x_42 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__5(x_1, x_2, x_11, x_4, x_5, x_35); -if (lean::obj_tag(x_42) == 0) -{ -uint8 x_43; -lean::dec(x_41); -x_43 = !lean::is_exclusive(x_42); -if (x_43 == 0) -{ -return x_42; -} -else -{ -obj* x_44; obj* x_45; -x_44 = lean::cnstr_get(x_42, 0); -lean::inc(x_44); -lean::dec(x_42); -x_45 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -else -{ -uint8 x_46; -x_46 = !lean::is_exclusive(x_42); -if (x_46 == 0) -{ -obj* x_47; uint8 x_48; -x_47 = lean::cnstr_get(x_42, 0); -x_48 = !lean::is_exclusive(x_47); -if (x_48 == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_47, 0); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_41); -lean::cnstr_set(x_50, 1, x_49); -lean::cnstr_set(x_47, 0, x_50); -return x_42; -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_51 = lean::cnstr_get(x_47, 0); -x_52 = lean::cnstr_get(x_47, 1); -lean::inc(x_52); -lean::inc(x_51); -lean::dec(x_47); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_41); -lean::cnstr_set(x_53, 1, x_51); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_52); -lean::cnstr_set(x_42, 0, x_54); -return x_42; -} -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_55 = lean::cnstr_get(x_42, 0); -lean::inc(x_55); -lean::dec(x_42); -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 1); -lean::inc(x_57); -if (lean::is_exclusive(x_55)) { - lean::cnstr_release(x_55, 0); - lean::cnstr_release(x_55, 1); - x_58 = x_55; -} else { - lean::dec_ref(x_55); - x_58 = lean::box(0); -} -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_41); -lean::cnstr_set(x_59, 1, x_56); -if (lean::is_scalar(x_58)) { - x_60 = lean::alloc_cnstr(0, 2, 0); -} else { - x_60 = x_58; -} -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_57); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -} -} -} -} -} -obj* l_Lean_Elaborator_declaration_elaborate___lambda__1(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: -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = l_Lean_Elaborator_identUnivParamsToPexpr(x_1); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::dec(x_2); -x_12 = l_Lean_Elaborator_toPexpr___main(x_11, x_7, x_8, x_9); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -lean::dec(x_10); -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_3); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_16 = lean::cnstr_get(x_12, 0); -lean::inc(x_16); -lean::dec(x_12); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_16, 1); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_10); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_6); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Elaborator_mkEqns___closed__1; -x_23 = l_Lean_Expr_mkCapp(x_22, x_21); -x_24 = lean_expr_mk_mdata(x_4, x_23); -x_25 = l_Lean_Elaborator_oldElabCommand(x_5, x_24, x_7, x_8, x_18); -return x_25; -} -} -} -obj* l_Lean_Elaborator_declaration_elaborate___lambda__2(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) { -_start: -{ -obj* x_14; obj* x_157; -x_157 = lean::cnstr_get(x_9, 1); -lean::inc(x_157); -lean::dec(x_9); -if (lean::obj_tag(x_157) == 0) -{ -lean::inc(x_1); -x_14 = x_1; -goto block_156; -} -else -{ -obj* x_158; obj* x_159; -x_158 = lean::cnstr_get(x_157, 0); -lean::inc(x_158); -lean::dec(x_157); -x_159 = lean::cnstr_get(x_158, 1); -lean::inc(x_159); -lean::dec(x_158); -x_14 = x_159; -goto block_156; -} -block_156: -{ -obj* x_15; -x_15 = l_Lean_Elaborator_attrsToPexpr(x_14, x_11, x_12, x_13); -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_16; -lean::dec(x_10); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -return x_15; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -return x_18; -} -} -else -{ -obj* x_19; uint8 x_20; -x_19 = lean::cnstr_get(x_15, 0); -lean::inc(x_19); -lean::dec(x_15); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_1); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_1); -x_24 = l_Lean_Elaborator_mkEqns___closed__1; -x_25 = l_Lean_Expr_mkCapp(x_24, x_23); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_80; -x_80 = lean::box(0); -lean::cnstr_set(x_19, 0, x_80); -x_26 = x_19; -goto block_79; -} -else -{ -obj* x_81; obj* x_82; obj* x_83; -lean::free_heap_obj(x_19); -x_81 = lean::cnstr_get(x_8, 0); -lean::inc(x_81); -x_82 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___lambda__1), 2, 1); -lean::closure_set(x_82, 0, x_81); -x_83 = l_Lean_Elaborator_modifyCurrentScope(x_82, x_11, x_12, x_22); -if (lean::obj_tag(x_83) == 0) -{ -uint8 x_84; -lean::dec(x_25); -lean::dec(x_10); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_84 = !lean::is_exclusive(x_83); -if (x_84 == 0) -{ -return x_83; -} -else -{ -obj* x_85; obj* x_86; -x_85 = lean::cnstr_get(x_83, 0); -lean::inc(x_85); -lean::dec(x_83); -x_86 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_86, 0, x_85); -return x_86; -} -} -else -{ -obj* x_87; -x_87 = lean::cnstr_get(x_83, 0); -lean::inc(x_87); -lean::dec(x_83); -x_26 = x_87; -goto block_79; -} -} -block_79: -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -x_28 = lean::cnstr_get(x_2, 0); -lean::inc(x_28); -lean::dec(x_2); -x_29 = l_Lean_Elaborator_mangleIdent(x_28); -x_30 = l_Lean_Expander_getOptType___main(x_3); -x_31 = l_Lean_Elaborator_toPexpr___main(x_30, x_11, x_12, x_27); -if (lean::obj_tag(x_8) == 0) -{ -lean::inc(x_1); -x_32 = x_1; -goto block_75; -} -else -{ -obj* x_76; obj* x_77; obj* x_78; -x_76 = lean::cnstr_get(x_8, 0); -lean::inc(x_76); -lean::dec(x_8); -x_77 = lean::cnstr_get(x_76, 1); -lean::inc(x_77); -lean::dec(x_76); -x_78 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_77); -x_32 = x_78; -goto block_75; -} -block_75: -{ -if (lean::obj_tag(x_31) == 0) -{ -uint8 x_33; -lean::dec(x_32); -lean::dec(x_29); -lean::dec(x_25); -lean::dec(x_10); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_33 = !lean::is_exclusive(x_31); -if (x_33 == 0) -{ -return x_31; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_31, 0); -lean::inc(x_34); -lean::dec(x_31); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_36 = lean::cnstr_get(x_31, 0); -lean::inc(x_36); -lean::dec(x_31); -x_37 = l_Lean_Elaborator_namesToPexpr(x_32); -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_36, 1); -lean::inc(x_39); -lean::dec(x_36); -x_40 = 0; -lean::inc(x_29); -x_41 = lean_expr_local(x_29, x_29, x_38, x_40); -lean::inc(x_1); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_1); -x_43 = l_Lean_Expr_mkCapp(x_24, x_42); -x_44 = l_Lean_Elaborator_simpleBindersToPexpr(x_4, x_11, x_12, x_39); -if (lean::obj_tag(x_44) == 0) -{ -uint8 x_45; -lean::dec(x_43); -lean::dec(x_37); -lean::dec(x_25); -lean::dec(x_10); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_45 = !lean::is_exclusive(x_44); -if (x_45 == 0) -{ -return x_44; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_44, 0); -lean::inc(x_46); -lean::dec(x_44); -x_47 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -return x_47; -} -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -lean::dec(x_44); -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_48, 1); -lean::inc(x_50); -lean::dec(x_48); -lean::inc(x_6); -lean::inc(x_5); -x_51 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2(x_5, x_6, x_11, x_12, x_50); -if (lean::obj_tag(x_51) == 0) -{ -uint8 x_52; -lean::dec(x_49); -lean::dec(x_43); -lean::dec(x_37); -lean::dec(x_25); -lean::dec(x_10); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_52 = !lean::is_exclusive(x_51); -if (x_52 == 0) -{ -return x_51; -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_51, 0); -lean::inc(x_53); -lean::dec(x_51); -x_54 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -return x_54; -} -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_55 = lean::cnstr_get(x_51, 0); -lean::inc(x_55); -lean::dec(x_51); -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 1); -lean::inc(x_57); -lean::dec(x_55); -x_58 = l_Lean_Expr_mkCapp(x_24, x_56); -lean::inc(x_1); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_1); -x_60 = l_Lean_Expr_mkCapp(x_24, x_59); -x_61 = l_List_map___main___at_Lean_Elaborator_declaration_elaborate___spec__3(x_6); -x_62 = l_Lean_Expr_mkCapp(x_24, x_61); -lean::inc(x_1); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_1); -x_64 = l_Lean_Expr_mkCapp(x_24, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_1); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_60); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_49); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_43); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_37); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_25); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_10); -lean::cnstr_set(x_71, 1, x_70); -x_72 = l_Lean_Expr_mkCapp(x_24, x_71); -x_73 = lean_expr_mk_mdata(x_7, x_72); -x_74 = l_Lean_Elaborator_oldElabCommand(x_5, x_73, x_11, x_12, x_57); -lean::dec(x_5); -return x_74; -} -} -} -} -} -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_88 = lean::cnstr_get(x_19, 0); -x_89 = lean::cnstr_get(x_19, 1); -lean::inc(x_89); -lean::inc(x_88); -lean::dec(x_19); -lean::inc(x_1); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_88); -lean::cnstr_set(x_90, 1, x_1); -x_91 = l_Lean_Elaborator_mkEqns___closed__1; -x_92 = l_Lean_Expr_mkCapp(x_91, x_90); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_147; obj* x_148; -x_147 = lean::box(0); -x_148 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_148, 0, x_147); -lean::cnstr_set(x_148, 1, x_89); -x_93 = x_148; -goto block_146; -} -else -{ -obj* x_149; obj* x_150; obj* x_151; -x_149 = lean::cnstr_get(x_8, 0); -lean::inc(x_149); -x_150 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___lambda__1), 2, 1); -lean::closure_set(x_150, 0, x_149); -x_151 = l_Lean_Elaborator_modifyCurrentScope(x_150, x_11, x_12, x_89); -if (lean::obj_tag(x_151) == 0) -{ -obj* x_152; obj* x_153; obj* x_154; -lean::dec(x_92); -lean::dec(x_10); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_152 = lean::cnstr_get(x_151, 0); -lean::inc(x_152); -if (lean::is_exclusive(x_151)) { - lean::cnstr_release(x_151, 0); - x_153 = x_151; -} else { - lean::dec_ref(x_151); - x_153 = lean::box(0); -} -if (lean::is_scalar(x_153)) { - x_154 = lean::alloc_cnstr(0, 1, 0); -} else { - x_154 = x_153; -} -lean::cnstr_set(x_154, 0, x_152); -return x_154; -} -else -{ -obj* x_155; -x_155 = lean::cnstr_get(x_151, 0); -lean::inc(x_155); -lean::dec(x_151); -x_93 = x_155; -goto block_146; -} -} -block_146: -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -x_94 = lean::cnstr_get(x_93, 1); -lean::inc(x_94); -lean::dec(x_93); -x_95 = lean::cnstr_get(x_2, 0); -lean::inc(x_95); -lean::dec(x_2); -x_96 = l_Lean_Elaborator_mangleIdent(x_95); -x_97 = l_Lean_Expander_getOptType___main(x_3); -x_98 = l_Lean_Elaborator_toPexpr___main(x_97, x_11, x_12, x_94); -if (lean::obj_tag(x_8) == 0) -{ -lean::inc(x_1); -x_99 = x_1; -goto block_142; -} -else -{ -obj* x_143; obj* x_144; obj* x_145; -x_143 = lean::cnstr_get(x_8, 0); -lean::inc(x_143); -lean::dec(x_8); -x_144 = lean::cnstr_get(x_143, 1); -lean::inc(x_144); -lean::dec(x_143); -x_145 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_144); -x_99 = x_145; -goto block_142; -} -block_142: -{ -if (lean::obj_tag(x_98) == 0) -{ -obj* x_100; obj* x_101; obj* x_102; -lean::dec(x_99); -lean::dec(x_96); -lean::dec(x_92); -lean::dec(x_10); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_100 = lean::cnstr_get(x_98, 0); -lean::inc(x_100); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - x_101 = x_98; -} else { - lean::dec_ref(x_98); - x_101 = lean::box(0); -} -if (lean::is_scalar(x_101)) { - x_102 = lean::alloc_cnstr(0, 1, 0); -} else { - x_102 = x_101; -} -lean::cnstr_set(x_102, 0, x_100); -return x_102; -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; uint8 x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_103 = lean::cnstr_get(x_98, 0); -lean::inc(x_103); -lean::dec(x_98); -x_104 = l_Lean_Elaborator_namesToPexpr(x_99); -x_105 = lean::cnstr_get(x_103, 0); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_103, 1); -lean::inc(x_106); -lean::dec(x_103); -x_107 = 0; -lean::inc(x_96); -x_108 = lean_expr_local(x_96, x_96, x_105, x_107); -lean::inc(x_1); -x_109 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_109, 0, x_108); -lean::cnstr_set(x_109, 1, x_1); -x_110 = l_Lean_Expr_mkCapp(x_91, x_109); -x_111 = l_Lean_Elaborator_simpleBindersToPexpr(x_4, x_11, x_12, x_106); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_112; obj* x_113; obj* x_114; -lean::dec(x_110); -lean::dec(x_104); -lean::dec(x_92); -lean::dec(x_10); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_112 = lean::cnstr_get(x_111, 0); -lean::inc(x_112); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - x_113 = x_111; -} else { - lean::dec_ref(x_111); - x_113 = lean::box(0); -} -if (lean::is_scalar(x_113)) { - x_114 = lean::alloc_cnstr(0, 1, 0); -} else { - x_114 = x_113; -} -lean::cnstr_set(x_114, 0, x_112); -return x_114; -} -else -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_115 = lean::cnstr_get(x_111, 0); -lean::inc(x_115); -lean::dec(x_111); -x_116 = lean::cnstr_get(x_115, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_115, 1); -lean::inc(x_117); -lean::dec(x_115); -lean::inc(x_6); -lean::inc(x_5); -x_118 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2(x_5, x_6, x_11, x_12, x_117); -if (lean::obj_tag(x_118) == 0) -{ -obj* x_119; obj* x_120; obj* x_121; -lean::dec(x_116); -lean::dec(x_110); -lean::dec(x_104); -lean::dec(x_92); -lean::dec(x_10); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_119 = lean::cnstr_get(x_118, 0); -lean::inc(x_119); -if (lean::is_exclusive(x_118)) { - lean::cnstr_release(x_118, 0); - x_120 = x_118; -} else { - lean::dec_ref(x_118); - x_120 = lean::box(0); -} -if (lean::is_scalar(x_120)) { - x_121 = lean::alloc_cnstr(0, 1, 0); -} else { - x_121 = x_120; -} -lean::cnstr_set(x_121, 0, x_119); -return x_121; -} -else -{ -obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_122 = lean::cnstr_get(x_118, 0); -lean::inc(x_122); -lean::dec(x_118); -x_123 = lean::cnstr_get(x_122, 0); -lean::inc(x_123); -x_124 = lean::cnstr_get(x_122, 1); -lean::inc(x_124); -lean::dec(x_122); -x_125 = l_Lean_Expr_mkCapp(x_91, x_123); -lean::inc(x_1); -x_126 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_126, 0, x_125); -lean::cnstr_set(x_126, 1, x_1); -x_127 = l_Lean_Expr_mkCapp(x_91, x_126); -x_128 = l_List_map___main___at_Lean_Elaborator_declaration_elaborate___spec__3(x_6); -x_129 = l_Lean_Expr_mkCapp(x_91, x_128); -lean::inc(x_1); -x_130 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_1); -x_131 = l_Lean_Expr_mkCapp(x_91, x_130); -x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_131); -lean::cnstr_set(x_132, 1, x_1); -x_133 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_133, 0, x_127); -lean::cnstr_set(x_133, 1, x_132); -x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_116); -lean::cnstr_set(x_134, 1, x_133); -x_135 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_135, 0, x_110); -lean::cnstr_set(x_135, 1, x_134); -x_136 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_136, 0, x_104); -lean::cnstr_set(x_136, 1, x_135); -x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_92); -lean::cnstr_set(x_137, 1, x_136); -x_138 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_138, 0, x_10); -lean::cnstr_set(x_138, 1, x_137); -x_139 = l_Lean_Expr_mkCapp(x_91, x_138); -x_140 = lean_expr_mk_mdata(x_7, x_139); -x_141 = l_Lean_Elaborator_oldElabCommand(x_5, x_140, x_11, x_12, x_124); -lean::dec(x_5); -return x_141; -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = l_Lean_Elaborator_inferModToPexpr(x_1); -return x_2; -} -} -obj* _init_l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("mk"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_declaration_elaborate___lambda__3(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) { -_start: -{ -obj* x_15; -if (lean::obj_tag(x_10) == 0) -{ -obj* x_107; obj* x_108; -x_107 = lean::box(0); -x_108 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_108, 0, x_107); -lean::cnstr_set(x_108, 1, x_14); -x_15 = x_108; -goto block_106; -} -else -{ -obj* x_109; obj* x_110; obj* x_111; -x_109 = lean::cnstr_get(x_10, 0); -lean::inc(x_109); -x_110 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___lambda__1), 2, 1); -lean::closure_set(x_110, 0, x_109); -x_111 = l_Lean_Elaborator_modifyCurrentScope(x_110, x_12, x_13, x_14); -if (lean::obj_tag(x_111) == 0) -{ -uint8 x_112; -lean::dec(x_11); -lean::dec(x_10); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_112 = !lean::is_exclusive(x_111); -if (x_112 == 0) -{ -return x_111; -} -else -{ -obj* x_113; obj* x_114; -x_113 = lean::cnstr_get(x_111, 0); -lean::inc(x_113); -lean::dec(x_111); -x_114 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_114, 0, x_113); -return x_114; -} -} -else -{ -obj* x_115; -x_115 = lean::cnstr_get(x_111, 0); -lean::inc(x_115); -lean::dec(x_111); -x_15 = x_115; -goto block_106; -} -} -block_106: -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -lean::dec(x_15); -x_17 = lean::cnstr_get(x_1, 0); -lean::inc(x_17); -lean::dec(x_1); -x_18 = l_Lean_Elaborator_mangleIdent(x_17); -x_19 = l_Lean_Elaborator_dummy; -x_20 = 0; -lean::inc(x_18); -x_21 = lean_expr_local(x_18, x_18, x_19, x_20); -x_22 = l_Lean_Expander_getOptType___main(x_2); -x_23 = l_Lean_Elaborator_toPexpr___main(x_22, x_12, x_13, x_16); -if (lean::obj_tag(x_10) == 0) -{ -lean::inc(x_7); -x_24 = x_7; -goto block_102; -} -else -{ -obj* x_103; obj* x_104; obj* x_105; -x_103 = lean::cnstr_get(x_10, 0); -lean::inc(x_103); -lean::dec(x_10); -x_104 = lean::cnstr_get(x_103, 1); -lean::inc(x_104); -lean::dec(x_103); -x_105 = l_List_map___main___at_Lean_Elaborator_elabDefLike___spec__2(x_104); -x_24 = x_105; -goto block_102; -} -block_102: -{ -if (lean::obj_tag(x_23) == 0) -{ -uint8 x_25; -lean::dec(x_24); -lean::dec(x_21); -lean::dec(x_11); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_25 = !lean::is_exclusive(x_23); -if (x_25 == 0) -{ -return x_23; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -lean::dec(x_23); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_28 = lean::cnstr_get(x_23, 0); -lean::inc(x_28); -lean::dec(x_23); -x_29 = l_Lean_Elaborator_namesToPexpr(x_24); -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_28, 1); -lean::inc(x_31); -lean::dec(x_28); -x_32 = l_Lean_Elaborator_simpleBindersToPexpr(x_3, x_12, x_13, x_31); -if (lean::obj_tag(x_32) == 0) -{ -uint8 x_33; -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_21); -lean::dec(x_11); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -x_33 = !lean::is_exclusive(x_32); -if (x_33 == 0) -{ -return x_32; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_32, 0); -lean::inc(x_36); -lean::dec(x_32); -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_36, 1); -lean::inc(x_38); -lean::dec(x_36); -if (lean::obj_tag(x_9) == 0) -{ -lean::inc(x_7); -x_39 = x_7; -goto block_99; -} -else -{ -obj* x_100; obj* x_101; -x_100 = lean::cnstr_get(x_9, 0); -lean::inc(x_100); -lean::dec(x_9); -x_101 = lean::cnstr_get(x_100, 1); -lean::inc(x_101); -lean::dec(x_100); -x_39 = x_101; -goto block_99; -} -block_99: -{ -obj* x_40; -x_40 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__4(x_39, x_12, x_13, x_38); -if (lean::obj_tag(x_40) == 0) -{ -uint8 x_41; -lean::dec(x_37); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_21); -lean::dec(x_11); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -x_41 = !lean::is_exclusive(x_40); -if (x_41 == 0) -{ -return x_40; -} -else -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_40, 0); -lean::inc(x_42); -lean::dec(x_40); -x_43 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_44 = lean::cnstr_get(x_40, 0); -lean::inc(x_44); -lean::dec(x_40); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_44, 1); -lean::inc(x_46); -lean::dec(x_44); -x_47 = l_Lean_Elaborator_mkEqns___closed__1; -x_48 = l_Lean_Expr_mkCapp(x_47, x_45); -lean::inc(x_4); -x_49 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__5(x_4, x_47, x_5, x_12, x_13, x_46); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_95; -x_95 = l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__2; -x_50 = x_95; -goto block_94; -} -else -{ -obj* x_96; obj* x_97; obj* x_98; -x_96 = lean::cnstr_get(x_6, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_96, 0); -lean::inc(x_97); -lean::dec(x_96); -x_98 = l_Lean_Elaborator_mangleIdent(x_97); -x_50 = x_98; -goto block_94; -} -block_94: -{ -obj* x_51; -lean::inc(x_50); -x_51 = lean_expr_local(x_50, x_50, x_19, x_20); -if (lean::obj_tag(x_6) == 0) -{ -if (lean::obj_tag(x_49) == 0) -{ -uint8 x_52; -lean::dec(x_51); -lean::dec(x_48); -lean::dec(x_37); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_21); -lean::dec(x_11); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_4); -x_52 = !lean::is_exclusive(x_49); -if (x_52 == 0) -{ -return x_49; -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_49, 0); -lean::inc(x_53); -lean::dec(x_49); -x_54 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -return x_54; -} -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_55 = lean::cnstr_get(x_49, 0); -lean::inc(x_55); -lean::dec(x_49); -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 1); -lean::inc(x_57); -lean::dec(x_55); -x_58 = l_Lean_Expr_mkCapp(x_47, x_56); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_7); -x_60 = l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__1; -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_59); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_51); -lean::cnstr_set(x_62, 1, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_30); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_48); -lean::cnstr_set(x_64, 1, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_37); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_21); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_29); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_11); -lean::cnstr_set(x_68, 1, x_67); -x_69 = l_Lean_Expr_mkCapp(x_47, x_68); -x_70 = lean_expr_mk_mdata(x_8, x_69); -x_71 = l_Lean_Elaborator_oldElabCommand(x_4, x_70, x_12, x_13, x_57); -lean::dec(x_4); -return x_71; -} -} -else -{ -if (lean::obj_tag(x_49) == 0) -{ -uint8 x_72; -lean::dec(x_51); -lean::dec(x_48); -lean::dec(x_37); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_21); -lean::dec(x_11); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_4); -x_72 = !lean::is_exclusive(x_49); -if (x_72 == 0) -{ -return x_49; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_49, 0); -lean::inc(x_73); -lean::dec(x_49); -x_74 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_74, 0, x_73); -return x_74; -} -} -else -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_75 = lean::cnstr_get(x_6, 0); -lean::inc(x_75); -lean::dec(x_6); -x_76 = lean::cnstr_get(x_49, 0); -lean::inc(x_76); -lean::dec(x_49); -x_77 = lean::cnstr_get(x_75, 1); -lean::inc(x_77); -lean::dec(x_75); -x_78 = l_Lean_Elaborator_inferModToPexpr(x_77); -lean::dec(x_77); -x_79 = lean::cnstr_get(x_76, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_76, 1); -lean::inc(x_80); -lean::dec(x_76); -x_81 = l_Lean_Expr_mkCapp(x_47, x_79); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_7); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_78); -lean::cnstr_set(x_83, 1, x_82); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_51); -lean::cnstr_set(x_84, 1, x_83); -x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_30); -lean::cnstr_set(x_85, 1, x_84); -x_86 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_86, 0, x_48); -lean::cnstr_set(x_86, 1, x_85); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_37); -lean::cnstr_set(x_87, 1, x_86); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_21); -lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_29); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_11); -lean::cnstr_set(x_90, 1, x_89); -x_91 = l_Lean_Expr_mkCapp(x_47, x_90); -x_92 = lean_expr_mk_mdata(x_8, x_91); -x_93 = l_Lean_Elaborator_oldElabCommand(x_4, x_92, x_12, x_13, x_80); -lean::dec(x_4); -return x_93; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Elaborator_declaration_elaborate___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::mk_string("def"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -} -obj* _init_l_Lean_Elaborator_declaration_elaborate___closed__2() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("."); -x_3 = lean::box(0); -x_4 = l_Lean_Name_toStringWithSep___main(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_Substring_ofString(x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_3); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* _init_l_Lean_Elaborator_declaration_elaborate___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("command"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("axiom"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -return x_7; -} -} -obj* _init_l_Lean_Elaborator_declaration_elaborate___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("command"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("inductives"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -return x_7; -} -} -obj* _init_l_Lean_Elaborator_declaration_elaborate___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("command"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("structure"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -return x_7; -} -} -obj* l_Lean_Elaborator_declaration_elaborate(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = l_Lean_Parser_command_declaration_HasView; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::inc(x_1); -x_13 = lean::apply_1(x_12, x_1); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -switch (lean::obj_tag(x_14)) { -case 0: -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_16); -x_17 = lean::cnstr_get(x_13, 0); -lean::inc(x_17); -lean::dec(x_13); -x_18 = lean::mk_nat_obj(1u); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___boxed), 7, 4); -lean::closure_set(x_19, 0, x_1); -lean::closure_set(x_19, 1, x_17); -lean::closure_set(x_19, 2, x_15); -lean::closure_set(x_19, 3, x_18); -x_20 = l_Lean_Elaborator_locally(x_19, x_2, x_3, x_4); -return x_20; -} -case 3: -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -lean::dec(x_16); -x_21 = lean::cnstr_get(x_13, 0); -lean::inc(x_21); -lean::dec(x_13); -x_22 = lean::mk_nat_obj(0u); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___boxed), 7, 4); -lean::closure_set(x_23, 0, x_1); -lean::closure_set(x_23, 1, x_21); -lean::closure_set(x_23, 2, x_15); -lean::closure_set(x_23, 3, x_22); -x_24 = l_Lean_Elaborator_locally(x_23, x_2, x_3, x_4); -return x_24; -} -case 4: -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; -lean::dec(x_16); -x_25 = lean::cnstr_get(x_13, 0); -lean::inc(x_25); -lean::dec(x_13); -x_26 = lean::mk_nat_obj(2u); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___boxed), 7, 4); -lean::closure_set(x_27, 0, x_1); -lean::closure_set(x_27, 1, x_25); -lean::closure_set(x_27, 2, x_15); -lean::closure_set(x_27, 3, x_26); -x_28 = l_Lean_Elaborator_locally(x_27, x_2, x_3, x_4); -return x_28; -} -default: -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -lean::dec(x_16); -x_29 = lean::cnstr_get(x_13, 0); -lean::inc(x_29); -lean::dec(x_13); -x_30 = lean::mk_nat_obj(6u); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___boxed), 7, 4); -lean::closure_set(x_31, 0, x_1); -lean::closure_set(x_31, 1, x_29); -lean::closure_set(x_31, 2, x_15); -lean::closure_set(x_31, 3, x_30); -x_32 = l_Lean_Elaborator_locally(x_31, x_2, x_3, x_4); -return x_32; -} -} -} -case 1: -{ -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; -x_33 = lean::cnstr_get(x_14, 0); -lean::inc(x_33); -lean::dec(x_14); -x_34 = lean::cnstr_get(x_13, 0); -lean::inc(x_34); -lean::dec(x_13); -x_35 = lean::box(0); -x_36 = lean::cnstr_get(x_33, 2); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_33, 1); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_36, 1); -lean::inc(x_39); -lean::dec(x_36); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set(x_41, 1, x_40); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_42 = lean::cnstr_get(x_33, 3); -lean::inc(x_42); -lean::dec(x_33); -x_43 = l_Lean_Elaborator_declaration_elaborate___closed__1; -x_44 = l_Lean_Elaborator_declaration_elaborate___closed__2; -x_45 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_35); -lean::cnstr_set(x_45, 2, x_44); -lean::cnstr_set(x_45, 3, x_41); -lean::cnstr_set(x_45, 4, x_42); -x_46 = lean::mk_nat_obj(4u); -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___boxed), 7, 4); -lean::closure_set(x_47, 0, x_1); -lean::closure_set(x_47, 1, x_34); -lean::closure_set(x_47, 2, x_45); -lean::closure_set(x_47, 3, x_46); -x_48 = l_Lean_Elaborator_locally(x_47, x_2, x_3, x_4); -return x_48; -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_49 = lean::cnstr_get(x_33, 3); -lean::inc(x_49); -lean::dec(x_33); -x_50 = lean::cnstr_get(x_37, 0); -lean::inc(x_50); -lean::dec(x_37); -x_51 = l_Lean_Elaborator_declaration_elaborate___closed__1; -x_52 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_35); -lean::cnstr_set(x_52, 2, x_50); -lean::cnstr_set(x_52, 3, x_41); -lean::cnstr_set(x_52, 4, x_49); -x_53 = lean::mk_nat_obj(4u); -x_54 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___boxed), 7, 4); -lean::closure_set(x_54, 0, x_1); -lean::closure_set(x_54, 1, x_34); -lean::closure_set(x_54, 2, x_52); -lean::closure_set(x_54, 3, x_53); -x_55 = l_Lean_Elaborator_locally(x_54, x_2, x_3, x_4); -return x_55; -} -} -case 2: -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_56 = lean::cnstr_get(x_14, 0); -lean::inc(x_56); -lean::dec(x_14); -x_57 = lean::cnstr_get(x_13, 0); -lean::inc(x_57); -lean::dec(x_13); -x_58 = lean::box(0); -x_59 = lean::cnstr_get(x_56, 1); -lean::inc(x_59); -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_59, 1); -lean::inc(x_61); -lean::dec(x_59); -x_62 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_62, 0, x_61); -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_60); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::cnstr_get(x_56, 2); -lean::inc(x_64); -lean::dec(x_56); -x_65 = l_Lean_Elaborator_declaration_elaborate___closed__1; -x_66 = l_Lean_Elaborator_declaration_elaborate___closed__2; -x_67 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_67, 0, x_65); -lean::cnstr_set(x_67, 1, x_58); -lean::cnstr_set(x_67, 2, x_66); -lean::cnstr_set(x_67, 3, x_63); -lean::cnstr_set(x_67, 4, x_64); -x_68 = lean::mk_nat_obj(3u); -x_69 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_elabDefLike___boxed), 7, 4); -lean::closure_set(x_69, 0, x_1); -lean::closure_set(x_69, 1, x_57); -lean::closure_set(x_69, 2, x_67); -lean::closure_set(x_69, 3, x_68); -x_70 = l_Lean_Elaborator_locally(x_69, x_2, x_3, x_4); -return x_70; -} -case 3: -{ -obj* x_71; obj* x_72; obj* x_73; -x_71 = lean::cnstr_get(x_14, 0); -lean::inc(x_71); -lean::dec(x_14); -x_72 = lean::cnstr_get(x_71, 2); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_72, 0); -lean::inc(x_73); -if (lean::obj_tag(x_73) == 0) -{ -obj* x_74; -lean::dec(x_73); -lean::dec(x_72); -lean::dec(x_71); -lean::dec(x_13); -x_74 = lean::box(0); -x_5 = x_74; -goto block_10; -} -else -{ -obj* x_75; -x_75 = lean::cnstr_get(x_73, 0); -lean::inc(x_75); -lean::dec(x_73); -if (lean::obj_tag(x_75) == 0) -{ -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_76 = lean::cnstr_get(x_71, 1); -lean::inc(x_76); -lean::dec(x_71); -x_77 = lean::cnstr_get(x_72, 1); -lean::inc(x_77); -lean::dec(x_72); -x_78 = lean::box(0); -x_79 = lean::cnstr_get(x_13, 0); -lean::inc(x_79); -lean::dec(x_13); -x_80 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_declModifiersToPexpr___boxed), 4, 1); -lean::closure_set(x_80, 0, x_79); -x_81 = l_Lean_Elaborator_declaration_elaborate___closed__3; -x_82 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_declaration_elaborate___lambda__1___boxed), 9, 5); -lean::closure_set(x_82, 0, x_76); -lean::closure_set(x_82, 1, x_77); -lean::closure_set(x_82, 2, x_78); -lean::closure_set(x_82, 3, x_81); -lean::closure_set(x_82, 4, x_1); -x_83 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Elaborator_declaration_elaborate___spec__1___rarg), 5, 2); -lean::closure_set(x_83, 0, x_80); -lean::closure_set(x_83, 1, x_82); -x_84 = l_Lean_Elaborator_locally(x_83, x_2, x_3, x_4); -return x_84; -} -else -{ -obj* x_85; -lean::dec(x_75); -lean::dec(x_72); -lean::dec(x_71); -lean::dec(x_13); -x_85 = lean::box(0); -x_5 = x_85; -goto block_10; -} -} -} -case 4: -{ -obj* x_86; obj* x_87; -x_86 = lean::cnstr_get(x_14, 0); -lean::inc(x_86); -lean::dec(x_14); -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_88; obj* x_89; -x_88 = lean::cnstr_get(x_86, 4); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -if (lean::obj_tag(x_89) == 0) -{ -obj* x_90; -lean::dec(x_89); -lean::dec(x_88); -lean::dec(x_86); -lean::dec(x_13); -x_90 = lean::box(0); -x_5 = x_90; -goto block_10; -} -else -{ -obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_91 = lean::cnstr_get(x_86, 2); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_86, 3); -lean::inc(x_92); -x_93 = lean::cnstr_get(x_86, 6); -lean::inc(x_93); -lean::dec(x_86); -x_94 = lean::cnstr_get(x_88, 1); -lean::inc(x_94); -lean::dec(x_88); -x_95 = lean::cnstr_get(x_89, 0); -lean::inc(x_95); -lean::dec(x_89); -x_96 = lean::box(0); -x_97 = lean::cnstr_get(x_13, 0); -lean::inc(x_97); -lean::dec(x_13); -lean::inc(x_97); -x_98 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_declModifiersToPexpr___boxed), 4, 1); -lean::closure_set(x_98, 0, x_97); -x_99 = l_Lean_Elaborator_declaration_elaborate___closed__4; -x_100 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_declaration_elaborate___lambda__2___boxed), 13, 9); -lean::closure_set(x_100, 0, x_96); -lean::closure_set(x_100, 1, x_92); -lean::closure_set(x_100, 2, x_94); -lean::closure_set(x_100, 3, x_95); -lean::closure_set(x_100, 4, x_1); -lean::closure_set(x_100, 5, x_93); -lean::closure_set(x_100, 6, x_99); -lean::closure_set(x_100, 7, x_91); -lean::closure_set(x_100, 8, x_97); -x_101 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Elaborator_declaration_elaborate___spec__1___rarg), 5, 2); -lean::closure_set(x_101, 0, x_98); -lean::closure_set(x_101, 1, x_100); -x_102 = l_Lean_Elaborator_locally(x_101, x_2, x_3, x_4); -return x_102; -} -} -else -{ -obj* x_103; -lean::dec(x_87); -lean::dec(x_86); -lean::dec(x_13); -x_103 = lean::box(0); -x_5 = x_103; -goto block_10; -} -} -default: -{ -obj* x_104; obj* x_105; -x_104 = lean::cnstr_get(x_14, 0); -lean::inc(x_104); -lean::dec(x_14); -x_105 = lean::cnstr_get(x_104, 0); -lean::inc(x_105); -if (lean::obj_tag(x_105) == 0) -{ -obj* x_106; obj* x_107; -lean::dec(x_105); -x_106 = lean::cnstr_get(x_104, 3); -lean::inc(x_106); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -if (lean::obj_tag(x_107) == 0) -{ -obj* x_108; -lean::dec(x_107); -lean::dec(x_106); -lean::dec(x_104); -lean::dec(x_13); -x_108 = lean::box(0); -x_5 = x_108; -goto block_10; -} -else -{ -obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; -x_109 = lean::cnstr_get(x_104, 1); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_104, 2); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_104, 4); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_104, 6); -lean::inc(x_112); -x_113 = lean::cnstr_get(x_104, 7); -lean::inc(x_113); -lean::dec(x_104); -x_114 = lean::cnstr_get(x_106, 1); -lean::inc(x_114); -lean::dec(x_106); -x_115 = lean::cnstr_get(x_107, 0); -lean::inc(x_115); -lean::dec(x_107); -x_116 = lean::box(0); -x_117 = lean::cnstr_get(x_13, 0); -lean::inc(x_117); -lean::dec(x_13); -x_118 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_declModifiersToPexpr___boxed), 4, 1); -lean::closure_set(x_118, 0, x_117); -x_119 = l_Lean_Elaborator_declaration_elaborate___closed__5; -x_120 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_declaration_elaborate___lambda__3___boxed), 14, 10); -lean::closure_set(x_120, 0, x_110); -lean::closure_set(x_120, 1, x_114); -lean::closure_set(x_120, 2, x_115); -lean::closure_set(x_120, 3, x_1); -lean::closure_set(x_120, 4, x_113); -lean::closure_set(x_120, 5, x_112); -lean::closure_set(x_120, 6, x_116); -lean::closure_set(x_120, 7, x_119); -lean::closure_set(x_120, 8, x_111); -lean::closure_set(x_120, 9, x_109); -x_121 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Elaborator_declaration_elaborate___spec__1___rarg), 5, 2); -lean::closure_set(x_121, 0, x_118); -lean::closure_set(x_121, 1, x_120); -x_122 = l_Lean_Elaborator_locally(x_121, x_2, x_3, x_4); -return x_122; -} -} -else -{ -obj* x_123; -lean::dec(x_105); -lean::dec(x_104); -lean::dec(x_13); -x_123 = lean::box(0); -x_5 = x_123; -goto block_10; -} -} -} -block_10: -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_5); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_1); -x_7 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___closed__1; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg___boxed), 5, 2); -lean::closure_set(x_8, 0, x_6); -lean::closure_set(x_8, 1, x_7); -x_9 = l_Lean_Elaborator_locally(x_8, x_2, x_3, x_4); -return x_9; -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__4(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__5___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__5(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_5); -lean::dec(x_4); -return x_7; -} -} -obj* l_Lean_Elaborator_declaration_elaborate___lambda__1___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Elaborator_declaration_elaborate___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -return x_10; -} -} -obj* l_Lean_Elaborator_declaration_elaborate___lambda__2___boxed(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) { -_start: -{ -obj* x_14; -x_14 = l_Lean_Elaborator_declaration_elaborate___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -lean::dec(x_12); -lean::dec(x_11); -lean::dec(x_3); -return x_14; -} -} -obj* l_Lean_Elaborator_declaration_elaborate___lambda__3___boxed(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) { -_start: -{ -obj* x_15; -x_15 = l_Lean_Elaborator_declaration_elaborate___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14); -lean::dec(x_13); -lean::dec(x_12); -lean::dec(x_2); -return x_15; -} -} -obj* l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___lambda__1(obj* x_1, uint8 x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_1); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_4, 4); -lean::cnstr_set_scalar(x_1, sizeof(void*)*2, x_2); -x_8 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -x_9 = l_Lean_Elaborator_OrderedRBMap_insert___rarg(x_8, x_7, x_3, x_1); -lean::cnstr_set(x_4, 4, x_9); -return x_4; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_4, 4); -x_11 = lean::cnstr_get(x_1, 0); -x_12 = lean::cnstr_get(x_1, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_1); -x_13 = lean::alloc_cnstr(0, 2, 1); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_2); -x_14 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -x_15 = l_Lean_Elaborator_OrderedRBMap_insert___rarg(x_14, x_10, x_3, x_13); -lean::cnstr_set(x_4, 4, x_15); -return x_4; -} -} -else -{ -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_31; -x_16 = lean::cnstr_get(x_4, 0); -x_17 = lean::cnstr_get(x_4, 1); -x_18 = lean::cnstr_get(x_4, 2); -x_19 = lean::cnstr_get(x_4, 3); -x_20 = lean::cnstr_get(x_4, 4); -x_21 = lean::cnstr_get(x_4, 5); -x_22 = lean::cnstr_get(x_4, 6); -x_23 = lean::cnstr_get(x_4, 7); -x_24 = lean::cnstr_get(x_4, 8); -lean::inc(x_24); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_4); -x_25 = lean::cnstr_get(x_1, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_1, 1); -lean::inc(x_26); -if (lean::is_exclusive(x_1)) { - lean::cnstr_release(x_1, 0); - lean::cnstr_release(x_1, 1); - x_27 = x_1; -} else { - lean::dec_ref(x_1); - x_27 = lean::box(0); -} -if (lean::is_scalar(x_27)) { - x_28 = lean::alloc_cnstr(0, 2, 1); -} else { - x_28 = x_27; -} -lean::cnstr_set(x_28, 0, x_25); -lean::cnstr_set(x_28, 1, x_26); -lean::cnstr_set_scalar(x_28, sizeof(void*)*2, x_2); -x_29 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -x_30 = l_Lean_Elaborator_OrderedRBMap_insert___rarg(x_29, x_20, x_3, x_28); -x_31 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_31, 0, x_16); -lean::cnstr_set(x_31, 1, x_17); -lean::cnstr_set(x_31, 2, x_18); -lean::cnstr_set(x_31, 3, x_19); -lean::cnstr_set(x_31, 4, x_30); -lean::cnstr_set(x_31, 5, x_21); -lean::cnstr_set(x_31, 6, x_22); -lean::cnstr_set(x_31, 7, x_23); -lean::cnstr_set(x_31, 8, x_24); -return x_31; -} -} -} -obj* l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_45; obj* x_46; obj* x_47; uint8 x_48; -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -if (lean::is_exclusive(x_1)) { - lean::cnstr_release(x_1, 0); - lean::cnstr_release(x_1, 1); - x_9 = x_1; -} else { - lean::dec_ref(x_1); - x_9 = lean::box(0); -} -x_45 = l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(x_7); -x_46 = lean::cnstr_get(x_45, 1); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_45, 0); -lean::inc(x_47); -lean::dec(x_45); -x_48 = !lean::is_exclusive(x_46); -if (x_48 == 0) -{ -obj* x_49; obj* x_50; obj* x_51; uint8 x_52; -x_49 = lean::cnstr_get(x_46, 0); -x_50 = lean::cnstr_get(x_46, 1); -x_51 = l_Lean_Expander_bindingAnnotationUpdate; -x_52 = l_Lean_Parser_Syntax_isOfKind___main(x_51, x_50); -lean::dec(x_50); -if (x_52 == 0) -{ -uint8 x_53; obj* x_54; -lean::dec(x_49); -lean::dec(x_47); -x_53 = 1; -x_54 = lean::box(x_53); -lean::cnstr_set(x_46, 1, x_4); -lean::cnstr_set(x_46, 0, x_54); -x_10 = x_46; -goto block_44; -} -else -{ -obj* x_55; -lean::free_heap_obj(x_46); -x_55 = l_Lean_Elaborator_currentScope(x_2, x_3, x_4); -if (lean::obj_tag(x_55) == 0) -{ -uint8 x_56; -lean::dec(x_49); -lean::dec(x_47); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -x_56 = !lean::is_exclusive(x_55); -if (x_56 == 0) -{ -return x_55; -} -else -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_55, 0); -lean::inc(x_57); -lean::dec(x_55); -x_58 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -return x_58; -} -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_59 = lean::cnstr_get(x_55, 0); -lean::inc(x_59); -lean::dec(x_55); -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_59, 1); -lean::inc(x_61); -lean::dec(x_59); -x_62 = l_Lean_Elaborator_mangleIdent(x_49); -x_63 = lean::cnstr_get(x_60, 4); -lean::inc(x_63); -lean::dec(x_60); -x_64 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_62); -x_65 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_64, x_63, x_62); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -lean::dec(x_47); -x_66 = lean::box(0); -x_67 = l_Lean_Name_toString___closed__1; -lean::inc(x_62); -x_68 = l_Lean_Name_toStringWithSep___main(x_67, x_62); -x_69 = l_Lean_Parser_Substring_ofString(x_68); -x_70 = lean::box(0); -x_71 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_71, 0, x_66); -lean::cnstr_set(x_71, 1, x_69); -lean::cnstr_set(x_71, 2, x_62); -lean::cnstr_set(x_71, 3, x_70); -lean::cnstr_set(x_71, 4, x_70); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -x_73 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_73, 0, x_72); -x_74 = l_String_splitAux___main___closed__1; -x_75 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_73, x_74, x_2, x_3, x_61); -lean::dec(x_61); -lean::dec(x_73); -if (lean::obj_tag(x_75) == 0) -{ -uint8 x_76; -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -x_76 = !lean::is_exclusive(x_75); -if (x_76 == 0) -{ -return x_75; -} -else -{ -obj* x_77; obj* x_78; -x_77 = lean::cnstr_get(x_75, 0); -lean::inc(x_77); -lean::dec(x_75); -x_78 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_78, 0, x_77); -return x_78; -} -} -else -{ -obj* x_79; uint8 x_80; -x_79 = lean::cnstr_get(x_75, 0); -lean::inc(x_79); -lean::dec(x_75); -x_80 = !lean::is_exclusive(x_79); -if (x_80 == 0) -{ -obj* x_81; uint8 x_82; obj* x_83; -x_81 = lean::cnstr_get(x_79, 0); -lean::dec(x_81); -x_82 = 0; -x_83 = lean::box(x_82); -lean::cnstr_set(x_79, 0, x_83); -x_10 = x_79; -goto block_44; -} -else -{ -obj* x_84; uint8 x_85; obj* x_86; obj* x_87; -x_84 = lean::cnstr_get(x_79, 1); -lean::inc(x_84); -lean::dec(x_79); -x_85 = 0; -x_86 = lean::box(x_85); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_84); -x_10 = x_87; -goto block_44; -} -} -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_88 = lean::cnstr_get(x_65, 0); -lean::inc(x_88); -lean::dec(x_65); -x_89 = lean::cnstr_get(x_88, 1); -lean::inc(x_89); -lean::dec(x_88); -x_90 = lean::alloc_closure(reinterpret_cast(l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___lambda__1___boxed), 4, 3); -lean::closure_set(x_90, 0, x_89); -lean::closure_set(x_90, 1, x_47); -lean::closure_set(x_90, 2, x_62); -x_91 = l_Lean_Elaborator_modifyCurrentScope(x_90, x_2, x_3, x_61); -if (lean::obj_tag(x_91) == 0) -{ -uint8 x_92; -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -x_92 = !lean::is_exclusive(x_91); -if (x_92 == 0) -{ -return x_91; -} -else -{ -obj* x_93; obj* x_94; -x_93 = lean::cnstr_get(x_91, 0); -lean::inc(x_93); -lean::dec(x_91); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; -} -} -else -{ -obj* x_95; uint8 x_96; -x_95 = lean::cnstr_get(x_91, 0); -lean::inc(x_95); -lean::dec(x_91); -x_96 = !lean::is_exclusive(x_95); -if (x_96 == 0) -{ -obj* x_97; uint8 x_98; obj* x_99; -x_97 = lean::cnstr_get(x_95, 0); -lean::dec(x_97); -x_98 = 0; -x_99 = lean::box(x_98); -lean::cnstr_set(x_95, 0, x_99); -x_10 = x_95; -goto block_44; -} -else -{ -obj* x_100; uint8 x_101; obj* x_102; obj* x_103; -x_100 = lean::cnstr_get(x_95, 1); -lean::inc(x_100); -lean::dec(x_95); -x_101 = 0; -x_102 = lean::box(x_101); -x_103 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_100); -x_10 = x_103; -goto block_44; -} -} -} -} -} -} -else -{ -obj* x_104; obj* x_105; obj* x_106; uint8 x_107; -x_104 = lean::cnstr_get(x_46, 0); -x_105 = lean::cnstr_get(x_46, 1); -lean::inc(x_105); -lean::inc(x_104); -lean::dec(x_46); -x_106 = l_Lean_Expander_bindingAnnotationUpdate; -x_107 = l_Lean_Parser_Syntax_isOfKind___main(x_106, x_105); -lean::dec(x_105); -if (x_107 == 0) -{ -uint8 x_108; obj* x_109; obj* x_110; -lean::dec(x_104); -lean::dec(x_47); -x_108 = 1; -x_109 = lean::box(x_108); -x_110 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_110, 0, x_109); -lean::cnstr_set(x_110, 1, x_4); -x_10 = x_110; -goto block_44; -} -else -{ -obj* x_111; -x_111 = l_Lean_Elaborator_currentScope(x_2, x_3, x_4); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_112; obj* x_113; obj* x_114; -lean::dec(x_104); -lean::dec(x_47); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -x_112 = lean::cnstr_get(x_111, 0); -lean::inc(x_112); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - x_113 = x_111; -} else { - lean::dec_ref(x_111); - x_113 = lean::box(0); -} -if (lean::is_scalar(x_113)) { - x_114 = lean::alloc_cnstr(0, 1, 0); -} else { - x_114 = x_113; -} -lean::cnstr_set(x_114, 0, x_112); -return x_114; -} -else -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_115 = lean::cnstr_get(x_111, 0); -lean::inc(x_115); -lean::dec(x_111); -x_116 = lean::cnstr_get(x_115, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_115, 1); -lean::inc(x_117); -lean::dec(x_115); -x_118 = l_Lean_Elaborator_mangleIdent(x_104); -x_119 = lean::cnstr_get(x_116, 4); -lean::inc(x_119); -lean::dec(x_116); -x_120 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_118); -x_121 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_120, x_119, x_118); -if (lean::obj_tag(x_121) == 0) -{ -obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; -lean::dec(x_47); -x_122 = lean::box(0); -x_123 = l_Lean_Name_toString___closed__1; -lean::inc(x_118); -x_124 = l_Lean_Name_toStringWithSep___main(x_123, x_118); -x_125 = l_Lean_Parser_Substring_ofString(x_124); -x_126 = lean::box(0); -x_127 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_127, 0, x_122); -lean::cnstr_set(x_127, 1, x_125); -lean::cnstr_set(x_127, 2, x_118); -lean::cnstr_set(x_127, 3, x_126); -lean::cnstr_set(x_127, 4, x_126); -x_128 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_128, 0, x_127); -x_129 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_129, 0, x_128); -x_130 = l_String_splitAux___main___closed__1; -x_131 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_129, x_130, x_2, x_3, x_117); -lean::dec(x_117); -lean::dec(x_129); -if (lean::obj_tag(x_131) == 0) -{ -obj* x_132; obj* x_133; obj* x_134; -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -x_132 = lean::cnstr_get(x_131, 0); -lean::inc(x_132); -if (lean::is_exclusive(x_131)) { - lean::cnstr_release(x_131, 0); - x_133 = x_131; -} else { - lean::dec_ref(x_131); - x_133 = lean::box(0); -} -if (lean::is_scalar(x_133)) { - x_134 = lean::alloc_cnstr(0, 1, 0); -} else { - x_134 = x_133; -} -lean::cnstr_set(x_134, 0, x_132); -return x_134; -} -else -{ -obj* x_135; obj* x_136; obj* x_137; uint8 x_138; obj* x_139; obj* x_140; -x_135 = lean::cnstr_get(x_131, 0); -lean::inc(x_135); -lean::dec(x_131); -x_136 = lean::cnstr_get(x_135, 1); -lean::inc(x_136); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - lean::cnstr_release(x_135, 1); - x_137 = x_135; -} else { - lean::dec_ref(x_135); - x_137 = lean::box(0); -} -x_138 = 0; -x_139 = lean::box(x_138); -if (lean::is_scalar(x_137)) { - x_140 = lean::alloc_cnstr(0, 2, 0); -} else { - x_140 = x_137; -} -lean::cnstr_set(x_140, 0, x_139); -lean::cnstr_set(x_140, 1, x_136); -x_10 = x_140; -goto block_44; -} -} -else -{ -obj* x_141; obj* x_142; obj* x_143; obj* x_144; -x_141 = lean::cnstr_get(x_121, 0); -lean::inc(x_141); -lean::dec(x_121); -x_142 = lean::cnstr_get(x_141, 1); -lean::inc(x_142); -lean::dec(x_141); -x_143 = lean::alloc_closure(reinterpret_cast(l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___lambda__1___boxed), 4, 3); -lean::closure_set(x_143, 0, x_142); -lean::closure_set(x_143, 1, x_47); -lean::closure_set(x_143, 2, x_118); -x_144 = l_Lean_Elaborator_modifyCurrentScope(x_143, x_2, x_3, x_117); -if (lean::obj_tag(x_144) == 0) -{ -obj* x_145; obj* x_146; obj* x_147; -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -x_145 = lean::cnstr_get(x_144, 0); -lean::inc(x_145); -if (lean::is_exclusive(x_144)) { - lean::cnstr_release(x_144, 0); - x_146 = x_144; -} else { - lean::dec_ref(x_144); - x_146 = lean::box(0); -} -if (lean::is_scalar(x_146)) { - x_147 = lean::alloc_cnstr(0, 1, 0); -} else { - x_147 = x_146; -} -lean::cnstr_set(x_147, 0, x_145); -return x_147; -} -else -{ -obj* x_148; obj* x_149; obj* x_150; uint8 x_151; obj* x_152; obj* x_153; -x_148 = lean::cnstr_get(x_144, 0); -lean::inc(x_148); -lean::dec(x_144); -x_149 = lean::cnstr_get(x_148, 1); -lean::inc(x_149); -if (lean::is_exclusive(x_148)) { - lean::cnstr_release(x_148, 0); - lean::cnstr_release(x_148, 1); - x_150 = x_148; -} else { - lean::dec_ref(x_148); - x_150 = lean::box(0); -} -x_151 = 0; -x_152 = lean::box(x_151); -if (lean::is_scalar(x_150)) { - x_153 = lean::alloc_cnstr(0, 2, 0); -} else { - x_153 = x_150; -} -lean::cnstr_set(x_153, 0, x_152); -lean::cnstr_set(x_153, 1, x_149); -x_10 = x_153; -goto block_44; -} -} -} -} -} -block_44: -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_10, 1); -lean::inc(x_12); -lean::dec(x_10); -x_13 = l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1(x_8, x_2, x_3, x_12); -if (lean::obj_tag(x_13) == 0) -{ -uint8 x_14; -lean::dec(x_11); -lean::dec(x_9); -lean::dec(x_7); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -return x_13; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -} -else -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_13); -if (x_17 == 0) -{ -obj* x_18; uint8 x_19; -x_18 = lean::cnstr_get(x_13, 0); -x_19 = lean::unbox(x_11); -lean::dec(x_11); -if (x_19 == 0) -{ -uint8 x_20; -lean::dec(x_9); -lean::dec(x_7); -x_20 = !lean::is_exclusive(x_18); -if (x_20 == 0) -{ -return x_13; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::cnstr_get(x_18, 0); -x_22 = lean::cnstr_get(x_18, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_18); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -lean::cnstr_set(x_13, 0, x_23); -return x_13; -} -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_18); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_18, 0); -if (lean::is_scalar(x_9)) { - x_26 = lean::alloc_cnstr(1, 2, 0); -} else { - x_26 = x_9; -} -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -lean::cnstr_set(x_18, 0, x_26); -return x_13; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_18, 0); -x_28 = lean::cnstr_get(x_18, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_18); -if (lean::is_scalar(x_9)) { - x_29 = lean::alloc_cnstr(1, 2, 0); -} else { - x_29 = x_9; -} -lean::cnstr_set(x_29, 0, x_7); -lean::cnstr_set(x_29, 1, x_27); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -lean::cnstr_set(x_13, 0, x_30); -return x_13; -} -} -} -else -{ -obj* x_31; uint8 x_32; -x_31 = lean::cnstr_get(x_13, 0); -lean::inc(x_31); -lean::dec(x_13); -x_32 = lean::unbox(x_11); -lean::dec(x_11); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -lean::dec(x_9); -lean::dec(x_7); -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -if (lean::is_exclusive(x_31)) { - lean::cnstr_release(x_31, 0); - lean::cnstr_release(x_31, 1); - x_35 = x_31; -} else { - lean::dec_ref(x_31); - x_35 = lean::box(0); -} -if (lean::is_scalar(x_35)) { - x_36 = lean::alloc_cnstr(0, 2, 0); -} else { - x_36 = x_35; -} -lean::cnstr_set(x_36, 0, x_33); -lean::cnstr_set(x_36, 1, x_34); -x_37 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_38 = lean::cnstr_get(x_31, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_31, 1); -lean::inc(x_39); -if (lean::is_exclusive(x_31)) { - lean::cnstr_release(x_31, 0); - lean::cnstr_release(x_31, 1); - x_40 = x_31; -} else { - lean::dec_ref(x_31); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_9)) { - x_41 = lean::alloc_cnstr(1, 2, 0); -} else { - x_41 = x_9; -} -lean::cnstr_set(x_41, 0, x_7); -lean::cnstr_set(x_41, 1, x_38); -if (lean::is_scalar(x_40)) { - x_42 = lean::alloc_cnstr(0, 2, 0); -} else { - x_42 = x_40; -} -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_39); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -} -} -} -} -} -obj* _init_l_Lean_Elaborator_variables_elaborate___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("variables.elaborate: unexpected input"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_variables_elaborate___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("command"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("variables"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -return x_7; -} -} -obj* l_Lean_Elaborator_variables_elaborate(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; -x_5 = l_Lean_Parser_command_variables_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -lean::inc(x_1); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_8); -lean::inc(x_1); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_1); -x_10 = l_Lean_Elaborator_variables_elaborate___closed__1; -x_11 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_9, x_10, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_9); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::dec(x_1); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_Lean_Elaborator_simpleBindersToPexpr(x_16, x_2, x_3, x_17); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_1); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_18, 0); -lean::inc(x_22); -lean::dec(x_18); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -lean::dec(x_22); -x_25 = l_Lean_Elaborator_variables_elaborate___closed__2; -x_26 = lean_expr_mk_mdata(x_25, x_23); -x_27 = l_Lean_Elaborator_oldElabCommand(x_1, x_26, x_2, x_3, x_24); -lean::dec(x_1); -return x_27; -} -} -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_8, 0); -lean::inc(x_28); -lean::dec(x_8); -x_29 = l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1(x_28, x_2, x_3, x_4); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -lean::dec(x_1); -x_30 = !lean::is_exclusive(x_29); -if (x_30 == 0) -{ -return x_29; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_33 = lean::cnstr_get(x_29, 0); -lean::inc(x_33); -lean::dec(x_29); -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_33, 1); -lean::inc(x_35); -lean::dec(x_33); -x_36 = l_Lean_Elaborator_simpleBindersToPexpr(x_34, x_2, x_3, x_35); -if (lean::obj_tag(x_36) == 0) -{ -uint8 x_37; -lean::dec(x_1); -x_37 = !lean::is_exclusive(x_36); -if (x_37 == 0) -{ -return x_36; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -lean::dec(x_36); -x_39 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_36, 0); -lean::inc(x_40); -lean::dec(x_36); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -lean::dec(x_40); -x_43 = l_Lean_Elaborator_variables_elaborate___closed__2; -x_44 = lean_expr_mk_mdata(x_43, x_41); -x_45 = l_Lean_Elaborator_oldElabCommand(x_1, x_44, x_2, x_3, x_42); -lean::dec(x_1); -return x_45; -} -} -} -} -} -obj* l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; obj* x_6; -x_5 = lean::unbox(x_2); -lean::dec(x_2); -x_6 = l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___lambda__1(x_1, x_5, x_3, x_4); -return x_6; -} -} -obj* l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mfilter___main___at_Lean_Elaborator_variables_elaborate___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_variables_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_variables_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_foldl___main___at_Lean_Elaborator_include_elaborate___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = l_Lean_Elaborator_mangleIdent(x_3); -x_6 = lean::box(0); -x_7 = l_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_1, x_5, x_6); -x_1 = x_7; -x_2 = x_4; -goto _start; -} -} -} -obj* l_Lean_Elaborator_include_elaborate___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_2, 5); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_List_foldl___main___at_Lean_Elaborator_include_elaborate___spec__1(x_4, x_5); -lean::cnstr_set(x_2, 5, x_6); -return x_2; -} -else -{ -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; -x_7 = lean::cnstr_get(x_2, 0); -x_8 = lean::cnstr_get(x_2, 1); -x_9 = lean::cnstr_get(x_2, 2); -x_10 = lean::cnstr_get(x_2, 3); -x_11 = lean::cnstr_get(x_2, 4); -x_12 = lean::cnstr_get(x_2, 5); -x_13 = lean::cnstr_get(x_2, 6); -x_14 = lean::cnstr_get(x_2, 7); -x_15 = lean::cnstr_get(x_2, 8); -lean::inc(x_15); -lean::inc(x_14); -lean::inc(x_13); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -lean::dec(x_2); -x_16 = lean::cnstr_get(x_1, 1); -lean::inc(x_16); -lean::dec(x_1); -x_17 = l_List_foldl___main___at_Lean_Elaborator_include_elaborate___spec__1(x_12, x_16); -x_18 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_8); -lean::cnstr_set(x_18, 2, x_9); -lean::cnstr_set(x_18, 3, x_10); -lean::cnstr_set(x_18, 4, x_11); -lean::cnstr_set(x_18, 5, x_17); -lean::cnstr_set(x_18, 6, x_13); -lean::cnstr_set(x_18, 7, x_14); -lean::cnstr_set(x_18, 8, x_15); -return x_18; -} -} -} -obj* l_Lean_Elaborator_include_elaborate(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_9; -x_5 = l_Lean_Parser_command_include_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_include_elaborate___lambda__1), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = l_Lean_Elaborator_modifyCurrentScope(x_8, x_2, x_3, x_4); -return x_9; -} -} -obj* l_Lean_Elaborator_include_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_include_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_Module_header_elaborate___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("not implemented: imports"); -return x_1; -} -} -obj* l_Lean_Elaborator_Module_header_elaborate(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; -x_5 = l_Lean_Parser_Module_header_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -lean::inc(x_1); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_7); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_1); -x_10 = l_Lean_Elaborator_Module_header_elaborate___closed__1; -x_11 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_9, x_10, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_9); -return x_11; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_8); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_8, 0); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_7, 1); -lean::inc(x_14); -lean::dec(x_7); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; -lean::free_heap_obj(x_8); -lean::dec(x_1); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_4); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; -lean::dec(x_14); -lean::cnstr_set(x_8, 0, x_1); -x_18 = l_Lean_Elaborator_Module_header_elaborate___closed__1; -x_19 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_8, x_18, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_8); -return x_19; -} -} -else -{ -obj* x_20; -lean::dec(x_8); -x_20 = lean::cnstr_get(x_7, 1); -lean::inc(x_20); -lean::dec(x_7); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_1); -x_21 = lean::box(0); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_4); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -return x_23; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; -lean::dec(x_20); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_1); -x_25 = l_Lean_Elaborator_Module_header_elaborate___closed__1; -x_26 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_24, x_25, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_24); -return x_26; -} -} -} -} -} -obj* l_Lean_Elaborator_Module_header_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_Module_header_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_precToNat___main(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::mk_nat_obj(0u); -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_4); -return x_5; -} -} -} -obj* l_Lean_Elaborator_precToNat(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Elaborator_precToNat___main(x_1); -return x_2; -} -} -obj* _init_l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("registerNotationTokens: unreachable"); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_3, 0, x_1); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_7 = l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1___closed__1; -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_2, 1); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::cnstr_get(x_5, 3); -lean::inc(x_10); -lean::dec(x_5); -x_11 = lean::cnstr_get(x_6, 0); -lean::inc(x_11); -lean::dec(x_6); -x_12 = !lean::is_exclusive(x_1); -if (x_12 == 0) -{ -obj* x_13; uint8 x_14; -x_13 = lean::cnstr_get(x_1, 0); -lean::dec(x_13); -x_14 = !lean::is_exclusive(x_8); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_8, 1); -x_16 = lean::cnstr_get(x_11, 1); -lean::inc(x_16); -lean::dec(x_11); -x_17 = l_String_trim(x_16); -lean::dec(x_16); -x_18 = l_Lean_Elaborator_precToNat___main(x_10); -x_19 = lean::box(0); -lean::inc(x_17); -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_18); -lean::cnstr_set(x_20, 2, x_19); -x_21 = lean::mk_nat_obj(0u); -x_22 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_17, x_20, x_15, x_21); -lean::dec(x_17); -lean::cnstr_set(x_8, 1, x_22); -x_2 = x_9; -goto _start; -} -else -{ -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; -x_24 = lean::cnstr_get(x_8, 0); -x_25 = lean::cnstr_get(x_8, 1); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_8); -x_26 = lean::cnstr_get(x_11, 1); -lean::inc(x_26); -lean::dec(x_11); -x_27 = l_String_trim(x_26); -lean::dec(x_26); -x_28 = l_Lean_Elaborator_precToNat___main(x_10); -x_29 = lean::box(0); -lean::inc(x_27); -x_30 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set(x_30, 1, x_28); -lean::cnstr_set(x_30, 2, x_29); -x_31 = lean::mk_nat_obj(0u); -x_32 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_27, x_30, x_25, x_31); -lean::dec(x_27); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_24); -lean::cnstr_set(x_33, 1, x_32); -lean::cnstr_set(x_1, 0, x_33); -x_2 = x_9; -goto _start; -} -} -else -{ -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_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_35 = lean::cnstr_get(x_1, 1); -x_36 = lean::cnstr_get(x_1, 2); -x_37 = lean::cnstr_get(x_1, 3); -x_38 = lean::cnstr_get(x_1, 4); -lean::inc(x_38); -lean::inc(x_37); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_1); -x_39 = lean::cnstr_get(x_8, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_8, 1); -lean::inc(x_40); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - x_41 = x_8; -} else { - lean::dec_ref(x_8); - x_41 = lean::box(0); -} -x_42 = lean::cnstr_get(x_11, 1); -lean::inc(x_42); -lean::dec(x_11); -x_43 = l_String_trim(x_42); -lean::dec(x_42); -x_44 = l_Lean_Elaborator_precToNat___main(x_10); -x_45 = lean::box(0); -lean::inc(x_43); -x_46 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_46, 0, x_43); -lean::cnstr_set(x_46, 1, x_44); -lean::cnstr_set(x_46, 2, x_45); -x_47 = lean::mk_nat_obj(0u); -x_48 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_43, x_46, x_40, x_47); -lean::dec(x_43); -if (lean::is_scalar(x_41)) { - x_49 = lean::alloc_cnstr(0, 2, 0); -} else { - x_49 = x_41; -} -lean::cnstr_set(x_49, 0, x_39); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_35); -lean::cnstr_set(x_50, 2, x_36); -lean::cnstr_set(x_50, 3, x_37); -lean::cnstr_set(x_50, 4, x_38); -x_1 = x_50; -x_2 = x_9; -goto _start; -} -} -} -} -} -obj* l_Lean_Elaborator_CommandParserConfig_registerNotationTokens(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1(x_2, x_3); -return x_4; -} -} -obj* l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1___rarg(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -} -} -obj* l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1___rarg___boxed), 1, 0); -return x_2; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("registerNotationParser: unreachable"); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderIdent_Parser), 5, 0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_3, 0, x_2); -return x_3; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_Parser), 5, 0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_3, 0, x_2); -return x_3; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::mk_nat_obj(0u); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_3, 0, x_2); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__5() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("registerNotationParser: unimplemented"); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Expander_expandBracketedBinder___main___closed__4; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_22; obj* x_23; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -if (lean::is_exclusive(x_1)) { - lean::cnstr_release(x_1, 0); - lean::cnstr_release(x_1, 1); - x_5 = x_1; -} else { - lean::dec_ref(x_1); - x_5 = lean::box(0); -} -x_22 = lean::cnstr_get(x_3, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -lean::dec(x_3); -x_24 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1; -x_6 = x_24; -goto block_21; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_44; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -lean::dec(x_25); -x_27 = l_String_trim(x_26); -lean::dec(x_26); -lean::inc(x_27); -x_28 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_28, 0, x_27); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_30, 0, x_27); -lean::closure_set(x_30, 1, x_29); -lean::closure_set(x_30, 2, x_28); -x_44 = lean::cnstr_get(x_3, 1); -lean::inc(x_44); -lean::dec(x_3); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; -x_45 = l_Lean_Expander_noExpansion___closed__1; -x_31 = x_45; -goto block_43; -} -else -{ -obj* x_46; -x_46 = lean::cnstr_get(x_44, 0); -lean::inc(x_46); -lean::dec(x_44); -switch (lean::obj_tag(x_46)) { -case 0: -{ -obj* x_47; -lean::dec(x_46); -x_47 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__2; -x_31 = x_47; -goto block_43; -} -case 1: -{ -obj* x_48; -lean::dec(x_46); -x_48 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__3; -x_31 = x_48; -goto block_43; -} -default: -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_46, 0); -lean::inc(x_49); -lean::dec(x_46); -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -lean::dec(x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; -x_51 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__4; -x_31 = x_51; -goto block_43; -} -else -{ -uint8 x_52; -x_52 = !lean::is_exclusive(x_50); -if (x_52 == 0) -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_50, 0); -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -lean::dec(x_53); -switch (lean::obj_tag(x_54)) { -case 0: -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -lean::dec(x_54); -x_56 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_57, 0, x_56); -lean::cnstr_set(x_50, 0, x_57); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_50); -x_31 = x_58; -goto block_43; -} -case 2: -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_59 = lean::cnstr_get(x_54, 0); -lean::inc(x_59); -lean::dec(x_54); -x_60 = lean::cnstr_get(x_59, 2); -lean::inc(x_60); -lean::dec(x_59); -x_61 = l_Lean_Elaborator_precToNat___main(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_62, 0, x_61); -lean::cnstr_set(x_50, 0, x_62); -x_63 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_63, 0, x_50); -x_31 = x_63; -goto block_43; -} -default: -{ -obj* x_64; -lean::dec(x_54); -lean::free_heap_obj(x_50); -x_64 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__5; -x_31 = x_64; -goto block_43; -} -} -} -else -{ -obj* x_65; obj* x_66; -x_65 = lean::cnstr_get(x_50, 0); -lean::inc(x_65); -lean::dec(x_50); -x_66 = lean::cnstr_get(x_65, 1); -lean::inc(x_66); -lean::dec(x_65); -switch (lean::obj_tag(x_66)) { -case 0: -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -lean::dec(x_66); -x_68 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_67); -x_69 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_69, 0, x_68); -x_70 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_70, 0, x_69); -x_71 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_71, 0, x_70); -x_31 = x_71; -goto block_43; -} -case 2: -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_72 = lean::cnstr_get(x_66, 0); -lean::inc(x_72); -lean::dec(x_66); -x_73 = lean::cnstr_get(x_72, 2); -lean::inc(x_73); -lean::dec(x_72); -x_74 = l_Lean_Elaborator_precToNat___main(x_73); -x_75 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_75, 0, x_74); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_76); -x_31 = x_77; -goto block_43; -} -default: -{ -obj* x_78; -lean::dec(x_66); -x_78 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__5; -x_31 = x_78; -goto block_43; -} -} -} -} -} -} -} -block_43: -{ -if (lean::obj_tag(x_31) == 0) -{ -uint8 x_32; -lean::dec(x_30); -x_32 = !lean::is_exclusive(x_31); -if (x_32 == 0) -{ -x_6 = x_31; -goto block_21; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_6 = x_34; -goto block_21; -} -} -else -{ -uint8 x_35; -x_35 = !lean::is_exclusive(x_31); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; obj* x_38; -x_36 = lean::cnstr_get(x_31, 0); -x_37 = l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1___rarg(x_36); -lean::dec(x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_30); -lean::cnstr_set(x_38, 1, x_37); -lean::cnstr_set(x_31, 0, x_38); -x_6 = x_31; -goto block_21; -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_39 = lean::cnstr_get(x_31, 0); -lean::inc(x_39); -lean::dec(x_31); -x_40 = l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1___rarg(x_39); -lean::dec(x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_30); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -x_6 = x_42; -goto block_21; -} -} -} -} -block_21: -{ -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -lean::dec(x_5); -lean::dec(x_4); -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -return x_6; -} -else -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -x_9 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; -} -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_6, 0); -lean::inc(x_10); -lean::dec(x_6); -x_11 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2(x_4); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::dec(x_10); -lean::dec(x_5); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_11); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_11, 0); -if (lean::is_scalar(x_5)) { - x_17 = lean::alloc_cnstr(1, 2, 0); -} else { - x_17 = x_5; -} -lean::cnstr_set(x_17, 0, x_10); -lean::cnstr_set(x_17, 1, x_16); -lean::cnstr_set(x_11, 0, x_17); -return x_11; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -if (lean::is_scalar(x_5)) { - x_19 = lean::alloc_cnstr(1, 2, 0); -} else { - x_19 = x_5; -} -lean::cnstr_set(x_19, 0, x_10); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -} -} -} -} -} -obj* l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__3(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_1, 1); -x_5 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__3(x_4); -lean::cnstr_set(x_1, 1, x_5); -return x_1; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -lean::inc(x_6); -lean::dec(x_1); -x_8 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__3(x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_6); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -} -} -obj* l_coe___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__4(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; -x_8 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -return x_8; -} -} -obj* l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::alloc_closure(reinterpret_cast(l_coe___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__4___boxed), 7, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = lean::alloc_closure(reinterpret_cast(l_coe___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__4___boxed), 7, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(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_11); -return x_12; -} -} -} -} -obj* _init_l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 0); -return x_1; -} -} -obj* l_Lean_Elaborator_CommandParserConfig_registerNotationParser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_2, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::inc(x_5); -x_6 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2(x_5); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -return x_6; -} -else -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -x_9 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; -} -} -else -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_10; -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_10 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1; -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_5); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_5, 0); -x_13 = lean::cnstr_get(x_5, 1); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -lean::free_heap_obj(x_5); -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_16 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1; -return x_16; -} -else -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_6); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_18 = lean::cnstr_get(x_6, 0); -x_19 = lean::cnstr_get(x_15, 0); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -x_21 = l_String_trim(x_20); -lean::dec(x_20); -x_22 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__3(x_18); -x_23 = l_List_join___main___rarg(x_22); -x_24 = lean::cnstr_get(x_2, 0); -lean::inc(x_24); -lean::dec(x_2); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_4, 0); -lean::inc(x_25); -lean::dec(x_4); -if (lean::obj_tag(x_25) == 0) -{ -uint8 x_26; -lean::free_heap_obj(x_5); -x_26 = !lean::is_exclusive(x_3); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_27 = lean::cnstr_get(x_3, 1); -x_28 = lean::box(0); -x_29 = lean_name_mk_string(x_28, x_21); -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_30, 0, x_1); -lean::closure_set(x_30, 1, x_23); -x_31 = l_Lean_Parser_TokenMap_insert___rarg(x_27, x_29, x_30); -lean::cnstr_set(x_3, 1, x_31); -lean::cnstr_set(x_6, 0, x_3); -return x_6; -} -else -{ -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; -x_32 = lean::cnstr_get(x_3, 0); -x_33 = lean::cnstr_get(x_3, 1); -x_34 = lean::cnstr_get(x_3, 2); -x_35 = lean::cnstr_get(x_3, 3); -x_36 = lean::cnstr_get(x_3, 4); -lean::inc(x_36); -lean::inc(x_35); -lean::inc(x_34); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_3); -x_37 = lean::box(0); -x_38 = lean_name_mk_string(x_37, x_21); -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_39, 0, x_1); -lean::closure_set(x_39, 1, x_23); -x_40 = l_Lean_Parser_TokenMap_insert___rarg(x_33, x_38, x_39); -x_41 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_41, 0, x_32); -lean::cnstr_set(x_41, 1, x_40); -lean::cnstr_set(x_41, 2, x_34); -lean::cnstr_set(x_41, 3, x_35); -lean::cnstr_set(x_41, 4, x_36); -lean::cnstr_set(x_6, 0, x_41); -return x_6; -} -} -else -{ -uint8 x_42; -lean::dec(x_25); -x_42 = !lean::is_exclusive(x_3); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_43 = lean::cnstr_get(x_3, 2); -x_44 = lean::box(0); -x_45 = lean_name_mk_string(x_44, x_21); -x_46 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_23); -x_47 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -lean::cnstr_set(x_5, 1, x_46); -lean::cnstr_set(x_5, 0, x_47); -x_48 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_48, 0, x_1); -lean::closure_set(x_48, 1, x_5); -x_49 = l_Lean_Parser_TokenMap_insert___rarg(x_43, x_45, x_48); -lean::cnstr_set(x_3, 2, x_49); -lean::cnstr_set(x_6, 0, x_3); -return x_6; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_50 = lean::cnstr_get(x_3, 0); -x_51 = lean::cnstr_get(x_3, 1); -x_52 = lean::cnstr_get(x_3, 2); -x_53 = lean::cnstr_get(x_3, 3); -x_54 = lean::cnstr_get(x_3, 4); -lean::inc(x_54); -lean::inc(x_53); -lean::inc(x_52); -lean::inc(x_51); -lean::inc(x_50); -lean::dec(x_3); -x_55 = lean::box(0); -x_56 = lean_name_mk_string(x_55, x_21); -x_57 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_23); -x_58 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -lean::cnstr_set(x_5, 1, x_57); -lean::cnstr_set(x_5, 0, x_58); -x_59 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_59, 0, x_1); -lean::closure_set(x_59, 1, x_5); -x_60 = l_Lean_Parser_TokenMap_insert___rarg(x_52, x_56, x_59); -x_61 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_61, 0, x_50); -lean::cnstr_set(x_61, 1, x_51); -lean::cnstr_set(x_61, 2, x_60); -lean::cnstr_set(x_61, 3, x_53); -lean::cnstr_set(x_61, 4, x_54); -lean::cnstr_set(x_6, 0, x_61); -return x_6; -} -} -} -else -{ -obj* x_62; -lean::dec(x_24); -x_62 = lean::cnstr_get(x_4, 0); -lean::inc(x_62); -lean::dec(x_4); -if (lean::obj_tag(x_62) == 0) -{ -uint8 x_63; -lean::free_heap_obj(x_5); -x_63 = !lean::is_exclusive(x_3); -if (x_63 == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_64 = lean::cnstr_get(x_3, 3); -x_65 = lean::box(0); -x_66 = lean_name_mk_string(x_65, x_21); -x_67 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_67, 0, x_1); -lean::closure_set(x_67, 1, x_23); -x_68 = l_Lean_Parser_TokenMap_insert___rarg(x_64, x_66, x_67); -lean::cnstr_set(x_3, 3, x_68); -lean::cnstr_set(x_6, 0, x_3); -return x_6; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_69 = lean::cnstr_get(x_3, 0); -x_70 = lean::cnstr_get(x_3, 1); -x_71 = lean::cnstr_get(x_3, 2); -x_72 = lean::cnstr_get(x_3, 3); -x_73 = lean::cnstr_get(x_3, 4); -lean::inc(x_73); -lean::inc(x_72); -lean::inc(x_71); -lean::inc(x_70); -lean::inc(x_69); -lean::dec(x_3); -x_74 = lean::box(0); -x_75 = lean_name_mk_string(x_74, x_21); -x_76 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_76, 0, x_1); -lean::closure_set(x_76, 1, x_23); -x_77 = l_Lean_Parser_TokenMap_insert___rarg(x_72, x_75, x_76); -x_78 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_78, 0, x_69); -lean::cnstr_set(x_78, 1, x_70); -lean::cnstr_set(x_78, 2, x_71); -lean::cnstr_set(x_78, 3, x_77); -lean::cnstr_set(x_78, 4, x_73); -lean::cnstr_set(x_6, 0, x_78); -return x_6; -} -} -else -{ -uint8 x_79; -lean::dec(x_62); -x_79 = !lean::is_exclusive(x_3); -if (x_79 == 0) -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_80 = lean::cnstr_get(x_3, 4); -x_81 = lean::box(0); -x_82 = lean_name_mk_string(x_81, x_21); -x_83 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_23); -x_84 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -lean::cnstr_set(x_5, 1, x_83); -lean::cnstr_set(x_5, 0, x_84); -x_85 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_85, 0, x_1); -lean::closure_set(x_85, 1, x_5); -x_86 = l_Lean_Parser_TokenMap_insert___rarg(x_80, x_82, x_85); -lean::cnstr_set(x_3, 4, x_86); -lean::cnstr_set(x_6, 0, x_3); -return x_6; -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_87 = lean::cnstr_get(x_3, 0); -x_88 = lean::cnstr_get(x_3, 1); -x_89 = lean::cnstr_get(x_3, 2); -x_90 = lean::cnstr_get(x_3, 3); -x_91 = lean::cnstr_get(x_3, 4); -lean::inc(x_91); -lean::inc(x_90); -lean::inc(x_89); -lean::inc(x_88); -lean::inc(x_87); -lean::dec(x_3); -x_92 = lean::box(0); -x_93 = lean_name_mk_string(x_92, x_21); -x_94 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_23); -x_95 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -lean::cnstr_set(x_5, 1, x_94); -lean::cnstr_set(x_5, 0, x_95); -x_96 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_96, 0, x_1); -lean::closure_set(x_96, 1, x_5); -x_97 = l_Lean_Parser_TokenMap_insert___rarg(x_91, x_93, x_96); -x_98 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_98, 0, x_87); -lean::cnstr_set(x_98, 1, x_88); -lean::cnstr_set(x_98, 2, x_89); -lean::cnstr_set(x_98, 3, x_90); -lean::cnstr_set(x_98, 4, x_97); -lean::cnstr_set(x_6, 0, x_98); -return x_6; -} -} -} -} -else -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; -x_99 = lean::cnstr_get(x_6, 0); -lean::inc(x_99); -lean::dec(x_6); -x_100 = lean::cnstr_get(x_15, 0); -lean::inc(x_100); -lean::dec(x_15); -x_101 = lean::cnstr_get(x_100, 1); -lean::inc(x_101); -lean::dec(x_100); -x_102 = l_String_trim(x_101); -lean::dec(x_101); -x_103 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__3(x_99); -x_104 = l_List_join___main___rarg(x_103); -x_105 = lean::cnstr_get(x_2, 0); -lean::inc(x_105); -lean::dec(x_2); -if (lean::obj_tag(x_105) == 0) -{ -obj* x_106; -x_106 = lean::cnstr_get(x_4, 0); -lean::inc(x_106); -lean::dec(x_4); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -lean::free_heap_obj(x_5); -x_107 = lean::cnstr_get(x_3, 0); -lean::inc(x_107); -x_108 = lean::cnstr_get(x_3, 1); -lean::inc(x_108); -x_109 = lean::cnstr_get(x_3, 2); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_3, 3); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_3, 4); -lean::inc(x_111); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - x_112 = x_3; -} else { - lean::dec_ref(x_3); - x_112 = lean::box(0); -} -x_113 = lean::box(0); -x_114 = lean_name_mk_string(x_113, x_102); -x_115 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_115, 0, x_1); -lean::closure_set(x_115, 1, x_104); -x_116 = l_Lean_Parser_TokenMap_insert___rarg(x_108, x_114, x_115); -if (lean::is_scalar(x_112)) { - x_117 = lean::alloc_cnstr(0, 5, 0); -} else { - x_117 = x_112; -} -lean::cnstr_set(x_117, 0, x_107); -lean::cnstr_set(x_117, 1, x_116); -lean::cnstr_set(x_117, 2, x_109); -lean::cnstr_set(x_117, 3, x_110); -lean::cnstr_set(x_117, 4, x_111); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -return x_118; -} -else -{ -obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; -lean::dec(x_106); -x_119 = lean::cnstr_get(x_3, 0); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_3, 1); -lean::inc(x_120); -x_121 = lean::cnstr_get(x_3, 2); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_3, 3); -lean::inc(x_122); -x_123 = lean::cnstr_get(x_3, 4); -lean::inc(x_123); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - x_124 = x_3; -} else { - lean::dec_ref(x_3); - x_124 = lean::box(0); -} -x_125 = lean::box(0); -x_126 = lean_name_mk_string(x_125, x_102); -x_127 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_104); -x_128 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -lean::cnstr_set(x_5, 1, x_127); -lean::cnstr_set(x_5, 0, x_128); -x_129 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_129, 0, x_1); -lean::closure_set(x_129, 1, x_5); -x_130 = l_Lean_Parser_TokenMap_insert___rarg(x_121, x_126, x_129); -if (lean::is_scalar(x_124)) { - x_131 = lean::alloc_cnstr(0, 5, 0); -} else { - x_131 = x_124; -} -lean::cnstr_set(x_131, 0, x_119); -lean::cnstr_set(x_131, 1, x_120); -lean::cnstr_set(x_131, 2, x_130); -lean::cnstr_set(x_131, 3, x_122); -lean::cnstr_set(x_131, 4, x_123); -x_132 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_132, 0, x_131); -return x_132; -} -} -else -{ -obj* x_133; -lean::dec(x_105); -x_133 = lean::cnstr_get(x_4, 0); -lean::inc(x_133); -lean::dec(x_4); -if (lean::obj_tag(x_133) == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; -lean::free_heap_obj(x_5); -x_134 = lean::cnstr_get(x_3, 0); -lean::inc(x_134); -x_135 = lean::cnstr_get(x_3, 1); -lean::inc(x_135); -x_136 = lean::cnstr_get(x_3, 2); -lean::inc(x_136); -x_137 = lean::cnstr_get(x_3, 3); -lean::inc(x_137); -x_138 = lean::cnstr_get(x_3, 4); -lean::inc(x_138); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - x_139 = x_3; -} else { - lean::dec_ref(x_3); - x_139 = lean::box(0); -} -x_140 = lean::box(0); -x_141 = lean_name_mk_string(x_140, x_102); -x_142 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_142, 0, x_1); -lean::closure_set(x_142, 1, x_104); -x_143 = l_Lean_Parser_TokenMap_insert___rarg(x_137, x_141, x_142); -if (lean::is_scalar(x_139)) { - x_144 = lean::alloc_cnstr(0, 5, 0); -} else { - x_144 = x_139; -} -lean::cnstr_set(x_144, 0, x_134); -lean::cnstr_set(x_144, 1, x_135); -lean::cnstr_set(x_144, 2, x_136); -lean::cnstr_set(x_144, 3, x_143); -lean::cnstr_set(x_144, 4, x_138); -x_145 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_145, 0, x_144); -return x_145; -} -else -{ -obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; -lean::dec(x_133); -x_146 = lean::cnstr_get(x_3, 0); -lean::inc(x_146); -x_147 = lean::cnstr_get(x_3, 1); -lean::inc(x_147); -x_148 = lean::cnstr_get(x_3, 2); -lean::inc(x_148); -x_149 = lean::cnstr_get(x_3, 3); -lean::inc(x_149); -x_150 = lean::cnstr_get(x_3, 4); -lean::inc(x_150); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - x_151 = x_3; -} else { - lean::dec_ref(x_3); - x_151 = lean::box(0); -} -x_152 = lean::box(0); -x_153 = lean_name_mk_string(x_152, x_102); -x_154 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_104); -x_155 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -lean::cnstr_set(x_5, 1, x_154); -lean::cnstr_set(x_5, 0, x_155); -x_156 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_156, 0, x_1); -lean::closure_set(x_156, 1, x_5); -x_157 = l_Lean_Parser_TokenMap_insert___rarg(x_150, x_153, x_156); -if (lean::is_scalar(x_151)) { - x_158 = lean::alloc_cnstr(0, 5, 0); -} else { - x_158 = x_151; -} -lean::cnstr_set(x_158, 0, x_146); -lean::cnstr_set(x_158, 1, x_147); -lean::cnstr_set(x_158, 2, x_148); -lean::cnstr_set(x_158, 3, x_149); -lean::cnstr_set(x_158, 4, x_157); -x_159 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_159, 0, x_158); -return x_159; -} -} -} -} -} -else -{ -obj* x_160; obj* x_161; obj* x_162; -x_160 = lean::cnstr_get(x_5, 0); -lean::inc(x_160); -lean::dec(x_5); -x_161 = lean::cnstr_get(x_160, 0); -lean::inc(x_161); -lean::dec(x_160); -x_162 = lean::cnstr_get(x_161, 1); -lean::inc(x_162); -lean::dec(x_161); -if (lean::obj_tag(x_162) == 0) -{ -obj* x_163; -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_163 = l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1; -return x_163; -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; -x_164 = lean::cnstr_get(x_6, 0); -lean::inc(x_164); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_165 = x_6; -} else { - lean::dec_ref(x_6); - x_165 = lean::box(0); -} -x_166 = lean::cnstr_get(x_162, 0); -lean::inc(x_166); -lean::dec(x_162); -x_167 = lean::cnstr_get(x_166, 1); -lean::inc(x_167); -lean::dec(x_166); -x_168 = l_String_trim(x_167); -lean::dec(x_167); -x_169 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__3(x_164); -x_170 = l_List_join___main___rarg(x_169); -x_171 = lean::cnstr_get(x_2, 0); -lean::inc(x_171); -lean::dec(x_2); -if (lean::obj_tag(x_171) == 0) -{ -obj* x_172; -x_172 = lean::cnstr_get(x_4, 0); -lean::inc(x_172); -lean::dec(x_4); -if (lean::obj_tag(x_172) == 0) -{ -obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; -x_173 = lean::cnstr_get(x_3, 0); -lean::inc(x_173); -x_174 = lean::cnstr_get(x_3, 1); -lean::inc(x_174); -x_175 = lean::cnstr_get(x_3, 2); -lean::inc(x_175); -x_176 = lean::cnstr_get(x_3, 3); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_3, 4); -lean::inc(x_177); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - x_178 = x_3; -} else { - lean::dec_ref(x_3); - x_178 = lean::box(0); -} -x_179 = lean::box(0); -x_180 = lean_name_mk_string(x_179, x_168); -x_181 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_181, 0, x_1); -lean::closure_set(x_181, 1, x_170); -x_182 = l_Lean_Parser_TokenMap_insert___rarg(x_174, x_180, x_181); -if (lean::is_scalar(x_178)) { - x_183 = lean::alloc_cnstr(0, 5, 0); -} else { - x_183 = x_178; -} -lean::cnstr_set(x_183, 0, x_173); -lean::cnstr_set(x_183, 1, x_182); -lean::cnstr_set(x_183, 2, x_175); -lean::cnstr_set(x_183, 3, x_176); -lean::cnstr_set(x_183, 4, x_177); -if (lean::is_scalar(x_165)) { - x_184 = lean::alloc_cnstr(1, 1, 0); -} else { - x_184 = x_165; -} -lean::cnstr_set(x_184, 0, x_183); -return x_184; -} -else -{ -obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; -lean::dec(x_172); -x_185 = lean::cnstr_get(x_3, 0); -lean::inc(x_185); -x_186 = lean::cnstr_get(x_3, 1); -lean::inc(x_186); -x_187 = lean::cnstr_get(x_3, 2); -lean::inc(x_187); -x_188 = lean::cnstr_get(x_3, 3); -lean::inc(x_188); -x_189 = lean::cnstr_get(x_3, 4); -lean::inc(x_189); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - x_190 = x_3; -} else { - lean::dec_ref(x_3); - x_190 = lean::box(0); -} -x_191 = lean::box(0); -x_192 = lean_name_mk_string(x_191, x_168); -x_193 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_170); -x_194 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -x_195 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_195, 0, x_194); -lean::cnstr_set(x_195, 1, x_193); -x_196 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_196, 0, x_1); -lean::closure_set(x_196, 1, x_195); -x_197 = l_Lean_Parser_TokenMap_insert___rarg(x_187, x_192, x_196); -if (lean::is_scalar(x_190)) { - x_198 = lean::alloc_cnstr(0, 5, 0); -} else { - x_198 = x_190; -} -lean::cnstr_set(x_198, 0, x_185); -lean::cnstr_set(x_198, 1, x_186); -lean::cnstr_set(x_198, 2, x_197); -lean::cnstr_set(x_198, 3, x_188); -lean::cnstr_set(x_198, 4, x_189); -if (lean::is_scalar(x_165)) { - x_199 = lean::alloc_cnstr(1, 1, 0); -} else { - x_199 = x_165; -} -lean::cnstr_set(x_199, 0, x_198); -return x_199; -} -} -else -{ -obj* x_200; -lean::dec(x_171); -x_200 = lean::cnstr_get(x_4, 0); -lean::inc(x_200); -lean::dec(x_4); -if (lean::obj_tag(x_200) == 0) -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; -x_201 = lean::cnstr_get(x_3, 0); -lean::inc(x_201); -x_202 = lean::cnstr_get(x_3, 1); -lean::inc(x_202); -x_203 = lean::cnstr_get(x_3, 2); -lean::inc(x_203); -x_204 = lean::cnstr_get(x_3, 3); -lean::inc(x_204); -x_205 = lean::cnstr_get(x_3, 4); -lean::inc(x_205); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - x_206 = x_3; -} else { - lean::dec_ref(x_3); - x_206 = lean::box(0); -} -x_207 = lean::box(0); -x_208 = lean_name_mk_string(x_207, x_168); -x_209 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_209, 0, x_1); -lean::closure_set(x_209, 1, x_170); -x_210 = l_Lean_Parser_TokenMap_insert___rarg(x_204, x_208, x_209); -if (lean::is_scalar(x_206)) { - x_211 = lean::alloc_cnstr(0, 5, 0); -} else { - x_211 = x_206; -} -lean::cnstr_set(x_211, 0, x_201); -lean::cnstr_set(x_211, 1, x_202); -lean::cnstr_set(x_211, 2, x_203); -lean::cnstr_set(x_211, 3, x_210); -lean::cnstr_set(x_211, 4, x_205); -if (lean::is_scalar(x_165)) { - x_212 = lean::alloc_cnstr(1, 1, 0); -} else { - x_212 = x_165; -} -lean::cnstr_set(x_212, 0, x_211); -return x_212; -} -else -{ -obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; -lean::dec(x_200); -x_213 = lean::cnstr_get(x_3, 0); -lean::inc(x_213); -x_214 = lean::cnstr_get(x_3, 1); -lean::inc(x_214); -x_215 = lean::cnstr_get(x_3, 2); -lean::inc(x_215); -x_216 = lean::cnstr_get(x_3, 3); -lean::inc(x_216); -x_217 = lean::cnstr_get(x_3, 4); -lean::inc(x_217); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - x_218 = x_3; -} else { - lean::dec_ref(x_3); - x_218 = lean::box(0); -} -x_219 = lean::box(0); -x_220 = lean_name_mk_string(x_219, x_168); -x_221 = l_List_map___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__5(x_170); -x_222 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1; -x_223 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_223, 0, x_222); -lean::cnstr_set(x_223, 1, x_221); -x_224 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_224, 0, x_1); -lean::closure_set(x_224, 1, x_223); -x_225 = l_Lean_Parser_TokenMap_insert___rarg(x_217, x_220, x_224); -if (lean::is_scalar(x_218)) { - x_226 = lean::alloc_cnstr(0, 5, 0); -} else { - x_226 = x_218; -} -lean::cnstr_set(x_226, 0, x_213); -lean::cnstr_set(x_226, 1, x_214); -lean::cnstr_set(x_226, 2, x_215); -lean::cnstr_set(x_226, 3, x_216); -lean::cnstr_set(x_226, 4, x_225); -if (lean::is_scalar(x_165)) { - x_227 = lean::alloc_cnstr(1, 1, 0); -} else { - x_227 = x_165; -} -lean::cnstr_set(x_227, 0, x_226); -return x_227; -} -} -} -} -} -} -} -} -obj* l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Option_toMonad___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__1___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_coe___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__4___boxed(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; -x_8 = l_coe___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_2); -return x_8; -} -} -obj* l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__1(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_6; obj* x_7; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_2, 1); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::cnstr_get(x_8, 2); -lean::inc(x_10); -x_11 = l_Lean_Elaborator_CommandParserConfig_registerNotationTokens(x_10, x_1); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = l_Lean_Parser_command_reserveNotation_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_8); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_16, x_12, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -lean::dec(x_9); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -return x_17; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -lean::dec(x_17); -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_21, 1); -lean::inc(x_23); -lean::dec(x_21); -x_1 = x_22; -x_2 = x_9; -x_5 = x_23; -goto _start; -} -} -else -{ -obj* x_25; -lean::dec(x_8); -x_25 = lean::cnstr_get(x_11, 0); -lean::inc(x_25); -lean::dec(x_11); -x_1 = x_25; -x_2 = x_9; -goto _start; -} -} -} -} -obj* l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__2(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_6; obj* x_7; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_2, 1); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_10, 2); -lean::inc(x_11); -x_12 = l_Lean_Elaborator_CommandParserConfig_registerNotationTokens(x_11, x_1); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_8); -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -lean::dec(x_12); -x_14 = l_Lean_Parser_command_notation_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_10); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_17, x_13, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_17); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_9); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_18, 0); -lean::inc(x_22); -lean::dec(x_18); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -lean::dec(x_22); -x_1 = x_23; -x_2 = x_9; -x_5 = x_24; -goto _start; -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_12, 0); -lean::inc(x_26); -lean::dec(x_12); -x_27 = lean::cnstr_get(x_8, 0); -lean::inc(x_27); -lean::dec(x_8); -lean::inc(x_10); -x_28 = l_Lean_Elaborator_CommandParserConfig_registerNotationParser(x_27, x_10, x_26); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -lean::dec(x_28); -x_30 = l_Lean_Parser_command_notation_HasView; -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_10); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_33, x_29, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -uint8 x_35; -lean::dec(x_9); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -return x_34; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -lean::dec(x_34); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_34, 0); -lean::inc(x_38); -lean::dec(x_34); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_38, 1); -lean::inc(x_40); -lean::dec(x_38); -x_1 = x_39; -x_2 = x_9; -x_5 = x_40; -goto _start; -} -} -else -{ -obj* x_42; -lean::dec(x_10); -x_42 = lean::cnstr_get(x_28, 0); -lean::inc(x_42); -lean::dec(x_28); -x_1 = x_42; -x_2 = x_9; -goto _start; -} -} -} -} -} -obj* l_Lean_Elaborator_updateParserConfig(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -lean::inc(x_3); -x_4 = l_Lean_Elaborator_currentScope(x_1, x_2, x_3); -if (lean::obj_tag(x_4) == 0) -{ -uint8 x_5; -lean::dec(x_3); -lean::dec(x_2); -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -return x_4; -} -else -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_4, 0); -lean::inc(x_6); -lean::dec(x_4); -x_7 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = lean::cnstr_get(x_2, 1); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -lean::dec(x_8); -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_3); -if (x_13 == 0) -{ -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; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 1); -x_16 = lean::cnstr_get(x_3, 0); -x_17 = lean::cnstr_get(x_3, 1); -x_18 = lean::cnstr_get(x_3, 2); -x_19 = lean::cnstr_get(x_3, 3); -x_20 = lean::cnstr_get(x_3, 4); -x_21 = lean::cnstr_get(x_3, 5); -x_22 = lean::cnstr_get(x_3, 7); -x_23 = lean::cnstr_get(x_3, 8); -x_24 = lean::cnstr_get(x_3, 9); -x_25 = lean::cnstr_get(x_3, 10); -x_26 = lean::cnstr_get(x_3, 6); -lean::dec(x_26); -lean::inc(x_16); -x_27 = l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__1(x_14, x_16, x_1, x_2, x_11); -if (lean::obj_tag(x_27) == 0) -{ -uint8 x_28; -lean::free_heap_obj(x_3); -lean::dec(x_25); -lean::dec(x_24); -lean::dec(x_23); -lean::dec(x_22); -lean::dec(x_21); -lean::dec(x_20); -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_17); -lean::dec(x_16); -lean::free_heap_obj(x_9); -lean::dec(x_15); -lean::dec(x_10); -lean::dec(x_2); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -return x_27; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_27, 0); -lean::inc(x_29); -lean::dec(x_27); -x_30 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -return x_30; -} -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_31 = lean::cnstr_get(x_27, 0); -lean::inc(x_31); -lean::dec(x_27); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_31, 1); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_10, 2); -lean::inc(x_34); -lean::dec(x_10); -lean::inc(x_17); -x_35 = l_List_append___rarg(x_17, x_34); -x_36 = l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__2(x_32, x_35, x_1, x_2, x_33); -lean::dec(x_2); -if (lean::obj_tag(x_36) == 0) -{ -uint8 x_37; -lean::free_heap_obj(x_3); -lean::dec(x_25); -lean::dec(x_24); -lean::dec(x_23); -lean::dec(x_22); -lean::dec(x_21); -lean::dec(x_20); -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_17); -lean::dec(x_16); -lean::free_heap_obj(x_9); -lean::dec(x_15); -x_37 = !lean::is_exclusive(x_36); -if (x_37 == 0) -{ -return x_36; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -lean::dec(x_36); -x_39 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -else -{ -uint8 x_40; -x_40 = !lean::is_exclusive(x_36); -if (x_40 == 0) -{ -obj* x_41; uint8 x_42; -x_41 = lean::cnstr_get(x_36, 0); -x_42 = !lean::is_exclusive(x_41); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; -x_43 = lean::cnstr_get(x_41, 0); -x_44 = lean::cnstr_get(x_41, 1); -lean::dec(x_44); -lean::cnstr_set(x_9, 0, x_43); -lean::cnstr_set(x_3, 6, x_9); -x_45 = lean::box(0); -lean::cnstr_set(x_41, 1, x_3); -lean::cnstr_set(x_41, 0, x_45); -return x_36; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; -x_46 = lean::cnstr_get(x_41, 0); -lean::inc(x_46); -lean::dec(x_41); -lean::cnstr_set(x_9, 0, x_46); -lean::cnstr_set(x_3, 6, x_9); -x_47 = lean::box(0); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_3); -lean::cnstr_set(x_36, 0, x_48); -return x_36; -} -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_49 = lean::cnstr_get(x_36, 0); -lean::inc(x_49); -lean::dec(x_36); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_51 = x_49; -} else { - lean::dec_ref(x_49); - x_51 = lean::box(0); -} -lean::cnstr_set(x_9, 0, x_50); -lean::cnstr_set(x_3, 6, x_9); -x_52 = lean::box(0); -if (lean::is_scalar(x_51)) { - x_53 = lean::alloc_cnstr(0, 2, 0); -} else { - x_53 = x_51; -} -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_3); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -return x_54; -} -} -} -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_55 = lean::cnstr_get(x_9, 0); -x_56 = lean::cnstr_get(x_9, 1); -x_57 = lean::cnstr_get(x_3, 0); -x_58 = lean::cnstr_get(x_3, 1); -x_59 = lean::cnstr_get(x_3, 2); -x_60 = lean::cnstr_get(x_3, 3); -x_61 = lean::cnstr_get(x_3, 4); -x_62 = lean::cnstr_get(x_3, 5); -x_63 = lean::cnstr_get(x_3, 7); -x_64 = lean::cnstr_get(x_3, 8); -x_65 = lean::cnstr_get(x_3, 9); -x_66 = lean::cnstr_get(x_3, 10); -lean::inc(x_66); -lean::inc(x_65); -lean::inc(x_64); -lean::inc(x_63); -lean::inc(x_62); -lean::inc(x_61); -lean::inc(x_60); -lean::inc(x_59); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_3); -lean::inc(x_57); -x_67 = l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__1(x_55, x_57, x_1, x_2, x_11); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; obj* x_70; -lean::dec(x_66); -lean::dec(x_65); -lean::dec(x_64); -lean::dec(x_63); -lean::dec(x_62); -lean::dec(x_61); -lean::dec(x_60); -lean::dec(x_59); -lean::dec(x_58); -lean::dec(x_57); -lean::free_heap_obj(x_9); -lean::dec(x_56); -lean::dec(x_10); -lean::dec(x_2); -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -if (lean::is_exclusive(x_67)) { - lean::cnstr_release(x_67, 0); - x_69 = x_67; -} else { - lean::dec_ref(x_67); - x_69 = lean::box(0); -} -if (lean::is_scalar(x_69)) { - x_70 = lean::alloc_cnstr(0, 1, 0); -} else { - x_70 = x_69; -} -lean::cnstr_set(x_70, 0, x_68); -return x_70; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_71 = lean::cnstr_get(x_67, 0); -lean::inc(x_71); -lean::dec(x_67); -x_72 = lean::cnstr_get(x_71, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_71, 1); -lean::inc(x_73); -lean::dec(x_71); -x_74 = lean::cnstr_get(x_10, 2); -lean::inc(x_74); -lean::dec(x_10); -lean::inc(x_58); -x_75 = l_List_append___rarg(x_58, x_74); -x_76 = l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__2(x_72, x_75, x_1, x_2, x_73); -lean::dec(x_2); -if (lean::obj_tag(x_76) == 0) -{ -obj* x_77; obj* x_78; obj* x_79; -lean::dec(x_66); -lean::dec(x_65); -lean::dec(x_64); -lean::dec(x_63); -lean::dec(x_62); -lean::dec(x_61); -lean::dec(x_60); -lean::dec(x_59); -lean::dec(x_58); -lean::dec(x_57); -lean::free_heap_obj(x_9); -lean::dec(x_56); -x_77 = lean::cnstr_get(x_76, 0); -lean::inc(x_77); -if (lean::is_exclusive(x_76)) { - lean::cnstr_release(x_76, 0); - x_78 = x_76; -} else { - lean::dec_ref(x_76); - x_78 = lean::box(0); -} -if (lean::is_scalar(x_78)) { - x_79 = lean::alloc_cnstr(0, 1, 0); -} else { - x_79 = x_78; -} -lean::cnstr_set(x_79, 0, x_77); -return x_79; -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; -x_80 = lean::cnstr_get(x_76, 0); -lean::inc(x_80); -if (lean::is_exclusive(x_76)) { - lean::cnstr_release(x_76, 0); - x_81 = x_76; -} else { - lean::dec_ref(x_76); - x_81 = lean::box(0); -} -x_82 = lean::cnstr_get(x_80, 0); -lean::inc(x_82); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - lean::cnstr_release(x_80, 1); - x_83 = x_80; -} else { - lean::dec_ref(x_80); - x_83 = lean::box(0); -} -lean::cnstr_set(x_9, 0, x_82); -x_84 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_84, 0, x_57); -lean::cnstr_set(x_84, 1, x_58); -lean::cnstr_set(x_84, 2, x_59); -lean::cnstr_set(x_84, 3, x_60); -lean::cnstr_set(x_84, 4, x_61); -lean::cnstr_set(x_84, 5, x_62); -lean::cnstr_set(x_84, 6, x_9); -lean::cnstr_set(x_84, 7, x_63); -lean::cnstr_set(x_84, 8, x_64); -lean::cnstr_set(x_84, 9, x_65); -lean::cnstr_set(x_84, 10, x_66); -x_85 = lean::box(0); -if (lean::is_scalar(x_83)) { - x_86 = lean::alloc_cnstr(0, 2, 0); -} else { - x_86 = x_83; -} -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_84); -if (lean::is_scalar(x_81)) { - x_87 = lean::alloc_cnstr(1, 1, 0); -} else { - x_87 = x_81; -} -lean::cnstr_set(x_87, 0, x_86); -return x_87; -} -} -} -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_88 = lean::cnstr_get(x_9, 0); -x_89 = lean::cnstr_get(x_9, 1); -lean::inc(x_89); -lean::inc(x_88); -lean::dec(x_9); -x_90 = lean::cnstr_get(x_3, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_3, 1); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_3, 2); -lean::inc(x_92); -x_93 = lean::cnstr_get(x_3, 3); -lean::inc(x_93); -x_94 = lean::cnstr_get(x_3, 4); -lean::inc(x_94); -x_95 = lean::cnstr_get(x_3, 5); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_3, 7); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_3, 8); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_3, 9); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_3, 10); -lean::inc(x_99); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - lean::cnstr_release(x_3, 3); - lean::cnstr_release(x_3, 4); - lean::cnstr_release(x_3, 5); - lean::cnstr_release(x_3, 6); - lean::cnstr_release(x_3, 7); - lean::cnstr_release(x_3, 8); - lean::cnstr_release(x_3, 9); - lean::cnstr_release(x_3, 10); - x_100 = x_3; -} else { - lean::dec_ref(x_3); - x_100 = lean::box(0); -} -lean::inc(x_90); -x_101 = l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__1(x_88, x_90, x_1, x_2, x_11); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; obj* x_103; obj* x_104; -lean::dec(x_100); -lean::dec(x_99); -lean::dec(x_98); -lean::dec(x_97); -lean::dec(x_96); -lean::dec(x_95); -lean::dec(x_94); -lean::dec(x_93); -lean::dec(x_92); -lean::dec(x_91); -lean::dec(x_90); -lean::dec(x_89); -lean::dec(x_10); -lean::dec(x_2); -x_102 = lean::cnstr_get(x_101, 0); -lean::inc(x_102); -if (lean::is_exclusive(x_101)) { - lean::cnstr_release(x_101, 0); - x_103 = x_101; -} else { - lean::dec_ref(x_101); - x_103 = lean::box(0); -} -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(0, 1, 0); -} else { - x_104 = x_103; -} -lean::cnstr_set(x_104, 0, x_102); -return x_104; -} -else -{ -obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -x_105 = lean::cnstr_get(x_101, 0); -lean::inc(x_105); -lean::dec(x_101); -x_106 = lean::cnstr_get(x_105, 0); -lean::inc(x_106); -x_107 = lean::cnstr_get(x_105, 1); -lean::inc(x_107); -lean::dec(x_105); -x_108 = lean::cnstr_get(x_10, 2); -lean::inc(x_108); -lean::dec(x_10); -lean::inc(x_91); -x_109 = l_List_append___rarg(x_91, x_108); -x_110 = l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__2(x_106, x_109, x_1, x_2, x_107); -lean::dec(x_2); -if (lean::obj_tag(x_110) == 0) -{ -obj* x_111; obj* x_112; obj* x_113; -lean::dec(x_100); -lean::dec(x_99); -lean::dec(x_98); -lean::dec(x_97); -lean::dec(x_96); -lean::dec(x_95); -lean::dec(x_94); -lean::dec(x_93); -lean::dec(x_92); -lean::dec(x_91); -lean::dec(x_90); -lean::dec(x_89); -x_111 = lean::cnstr_get(x_110, 0); -lean::inc(x_111); -if (lean::is_exclusive(x_110)) { - lean::cnstr_release(x_110, 0); - x_112 = x_110; -} else { - lean::dec_ref(x_110); - x_112 = lean::box(0); -} -if (lean::is_scalar(x_112)) { - x_113 = lean::alloc_cnstr(0, 1, 0); -} else { - x_113 = x_112; -} -lean::cnstr_set(x_113, 0, x_111); -return x_113; -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; -x_114 = lean::cnstr_get(x_110, 0); -lean::inc(x_114); -if (lean::is_exclusive(x_110)) { - lean::cnstr_release(x_110, 0); - x_115 = x_110; -} else { - lean::dec_ref(x_110); - x_115 = lean::box(0); -} -x_116 = lean::cnstr_get(x_114, 0); -lean::inc(x_116); -if (lean::is_exclusive(x_114)) { - lean::cnstr_release(x_114, 0); - lean::cnstr_release(x_114, 1); - x_117 = x_114; -} else { - lean::dec_ref(x_114); - x_117 = lean::box(0); -} -x_118 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_118, 0, x_116); -lean::cnstr_set(x_118, 1, x_89); -if (lean::is_scalar(x_100)) { - x_119 = lean::alloc_cnstr(0, 11, 0); -} else { - x_119 = x_100; -} -lean::cnstr_set(x_119, 0, x_90); -lean::cnstr_set(x_119, 1, x_91); -lean::cnstr_set(x_119, 2, x_92); -lean::cnstr_set(x_119, 3, x_93); -lean::cnstr_set(x_119, 4, x_94); -lean::cnstr_set(x_119, 5, x_95); -lean::cnstr_set(x_119, 6, x_118); -lean::cnstr_set(x_119, 7, x_96); -lean::cnstr_set(x_119, 8, x_97); -lean::cnstr_set(x_119, 9, x_98); -lean::cnstr_set(x_119, 10, x_99); -x_120 = lean::box(0); -if (lean::is_scalar(x_117)) { - x_121 = lean::alloc_cnstr(0, 2, 0); -} else { - x_121 = x_117; -} -lean::cnstr_set(x_121, 0, x_120); -lean::cnstr_set(x_121, 1, x_119); -if (lean::is_scalar(x_115)) { - x_122 = lean::alloc_cnstr(1, 1, 0); -} else { - x_122 = x_115; -} -lean::cnstr_set(x_122, 0, x_121); -return x_122; -} -} -} -} -} -} -obj* l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_mfoldl___main___at_Lean_Elaborator_updateParserConfig___spec__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Elaborator_updateParserConfig___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Elaborator_updateParserConfig(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Elaborator_postprocessNotationSpec___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string(":"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = l_Lean_Parser_maxPrec; -x_7 = l_Lean_Parser_number_View_ofNat(x_6); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -} -obj* l_Lean_Elaborator_postprocessNotationSpec(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -return x_1; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_5, 3); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; -x_8 = lean::cnstr_get(x_1, 1); -lean::dec(x_8); -x_9 = lean::cnstr_get(x_1, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_3); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_3, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_4); -if (x_12 == 0) -{ -obj* x_13; uint8 x_14; -x_13 = lean::cnstr_get(x_4, 0); -lean::dec(x_13); -x_14 = !lean::is_exclusive(x_5); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_5, 3); -lean::dec(x_15); -x_16 = l_Lean_Elaborator_postprocessNotationSpec___closed__1; -lean::cnstr_set(x_5, 3, x_16); -return x_1; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_5, 0); -x_18 = lean::cnstr_get(x_5, 1); -x_19 = lean::cnstr_get(x_5, 2); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_5); -x_20 = l_Lean_Elaborator_postprocessNotationSpec___closed__1; -x_21 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_21, 0, x_17); -lean::cnstr_set(x_21, 1, x_18); -lean::cnstr_set(x_21, 2, x_19); -lean::cnstr_set(x_21, 3, x_20); -lean::cnstr_set(x_4, 0, x_21); -return x_1; -} -} -else -{ -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_22 = lean::cnstr_get(x_4, 1); -lean::inc(x_22); -lean::dec(x_4); -x_23 = lean::cnstr_get(x_5, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_5, 1); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_5, 2); -lean::inc(x_25); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - lean::cnstr_release(x_5, 3); - x_26 = x_5; -} else { - lean::dec_ref(x_5); - x_26 = lean::box(0); -} -x_27 = l_Lean_Elaborator_postprocessNotationSpec___closed__1; -if (lean::is_scalar(x_26)) { - x_28 = lean::alloc_cnstr(0, 4, 0); -} else { - x_28 = x_26; -} -lean::cnstr_set(x_28, 0, x_23); -lean::cnstr_set(x_28, 1, x_24); -lean::cnstr_set(x_28, 2, x_25); -lean::cnstr_set(x_28, 3, x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_22); -lean::cnstr_set(x_3, 0, x_29); -return x_1; -} -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_30 = lean::cnstr_get(x_3, 1); -lean::inc(x_30); -lean::dec(x_3); -x_31 = lean::cnstr_get(x_4, 1); -lean::inc(x_31); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - x_32 = x_4; -} else { - lean::dec_ref(x_4); - x_32 = lean::box(0); -} -x_33 = lean::cnstr_get(x_5, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_5, 1); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_5, 2); -lean::inc(x_35); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - lean::cnstr_release(x_5, 3); - x_36 = x_5; -} else { - lean::dec_ref(x_5); - x_36 = lean::box(0); -} -x_37 = l_Lean_Elaborator_postprocessNotationSpec___closed__1; -if (lean::is_scalar(x_36)) { - x_38 = lean::alloc_cnstr(0, 4, 0); -} else { - x_38 = x_36; -} -lean::cnstr_set(x_38, 0, x_33); -lean::cnstr_set(x_38, 1, x_34); -lean::cnstr_set(x_38, 2, x_35); -lean::cnstr_set(x_38, 3, x_37); -if (lean::is_scalar(x_32)) { - x_39 = lean::alloc_cnstr(0, 2, 0); -} else { - x_39 = x_32; -} -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_31); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_30); -lean::cnstr_set(x_1, 1, x_40); -return x_1; -} -} -else -{ -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; -lean::dec(x_1); -x_41 = lean::cnstr_get(x_3, 1); -lean::inc(x_41); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_42 = x_3; -} else { - lean::dec_ref(x_3); - x_42 = lean::box(0); -} -x_43 = lean::cnstr_get(x_4, 1); -lean::inc(x_43); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - x_44 = x_4; -} else { - lean::dec_ref(x_4); - x_44 = lean::box(0); -} -x_45 = lean::cnstr_get(x_5, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_5, 1); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_5, 2); -lean::inc(x_47); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - lean::cnstr_release(x_5, 3); - x_48 = x_5; -} else { - lean::dec_ref(x_5); - x_48 = lean::box(0); -} -x_49 = l_Lean_Elaborator_postprocessNotationSpec___closed__1; -if (lean::is_scalar(x_48)) { - x_50 = lean::alloc_cnstr(0, 4, 0); -} else { - x_50 = x_48; -} -lean::cnstr_set(x_50, 0, x_45); -lean::cnstr_set(x_50, 1, x_46); -lean::cnstr_set(x_50, 2, x_47); -lean::cnstr_set(x_50, 3, x_49); -if (lean::is_scalar(x_44)) { - x_51 = lean::alloc_cnstr(0, 2, 0); -} else { - x_51 = x_44; -} -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_43); -if (lean::is_scalar(x_42)) { - x_52 = lean::alloc_cnstr(1, 2, 0); -} else { - x_52 = x_42; -} -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_41); -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_2); -lean::cnstr_set(x_53, 1, x_52); -return x_53; -} -} -else -{ -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_1; -} -} -} -else -{ -lean::dec(x_2); -return x_1; -} -} -} -obj* l_Lean_Elaborator_reserveNotation_elaborate(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_5 = l_Lean_Parser_command_reserveNotation_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_1); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; -x_9 = lean::cnstr_get(x_7, 2); -x_10 = l_Lean_Elaborator_postprocessNotationSpec(x_9); -lean::cnstr_set(x_7, 2, x_10); -x_11 = !lean::is_exclusive(x_4); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_4, 0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -lean::cnstr_set(x_4, 0, x_13); -x_14 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_4); -return x_14; -} -else -{ -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; -x_15 = lean::cnstr_get(x_4, 0); -x_16 = lean::cnstr_get(x_4, 1); -x_17 = lean::cnstr_get(x_4, 2); -x_18 = lean::cnstr_get(x_4, 3); -x_19 = lean::cnstr_get(x_4, 4); -x_20 = lean::cnstr_get(x_4, 5); -x_21 = lean::cnstr_get(x_4, 6); -x_22 = lean::cnstr_get(x_4, 7); -x_23 = lean::cnstr_get(x_4, 8); -x_24 = lean::cnstr_get(x_4, 9); -x_25 = lean::cnstr_get(x_4, 10); -lean::inc(x_25); -lean::inc(x_24); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_4); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_15); -x_27 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_16); -lean::cnstr_set(x_27, 2, x_17); -lean::cnstr_set(x_27, 3, x_18); -lean::cnstr_set(x_27, 4, x_19); -lean::cnstr_set(x_27, 5, x_20); -lean::cnstr_set(x_27, 6, x_21); -lean::cnstr_set(x_27, 7, x_22); -lean::cnstr_set(x_27, 8, x_23); -lean::cnstr_set(x_27, 9, x_24); -lean::cnstr_set(x_27, 10, x_25); -x_28 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_27); -return x_28; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_29 = lean::cnstr_get(x_7, 0); -x_30 = lean::cnstr_get(x_7, 1); -x_31 = lean::cnstr_get(x_7, 2); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_7); -x_32 = l_Lean_Elaborator_postprocessNotationSpec(x_31); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_29); -lean::cnstr_set(x_33, 1, x_30); -lean::cnstr_set(x_33, 2, x_32); -x_34 = lean::cnstr_get(x_4, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_4, 1); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_4, 2); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_4, 3); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_4, 4); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_4, 5); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_4, 6); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_4, 7); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_4, 8); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_4, 9); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_4, 10); -lean::inc(x_44); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - lean::cnstr_release(x_4, 2); - lean::cnstr_release(x_4, 3); - lean::cnstr_release(x_4, 4); - lean::cnstr_release(x_4, 5); - lean::cnstr_release(x_4, 6); - lean::cnstr_release(x_4, 7); - lean::cnstr_release(x_4, 8); - lean::cnstr_release(x_4, 9); - lean::cnstr_release(x_4, 10); - x_45 = x_4; -} else { - lean::dec_ref(x_4); - x_45 = lean::box(0); -} -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_33); -lean::cnstr_set(x_46, 1, x_34); -if (lean::is_scalar(x_45)) { - x_47 = lean::alloc_cnstr(0, 11, 0); -} else { - x_47 = x_45; -} -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_35); -lean::cnstr_set(x_47, 2, x_36); -lean::cnstr_set(x_47, 3, x_37); -lean::cnstr_set(x_47, 4, x_38); -lean::cnstr_set(x_47, 5, x_39); -lean::cnstr_set(x_47, 6, x_40); -lean::cnstr_set(x_47, 7, x_41); -lean::cnstr_set(x_47, 8, x_42); -lean::cnstr_set(x_47, 9, x_43); -lean::cnstr_set(x_47, 10, x_44); -x_48 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_47); -return x_48; -} -} -} -obj* l_Lean_Elaborator_reserveNotation_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_reserveNotation_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -uint8 l_Lean_Elaborator_matchPrecedence___main(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_3; -x_3 = 0; -return x_3; -} -else -{ -uint8 x_4; -lean::dec(x_2); -x_4 = 1; -return x_4; -} -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_5; -lean::dec(x_1); -x_5 = 0; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -lean::dec(x_2); -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -lean::dec(x_6); -x_9 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_8); -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -lean::dec(x_7); -x_11 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_10); -x_12 = lean::nat_dec_eq(x_9, x_11); -lean::dec(x_11); -lean::dec(x_9); -return x_12; -} -} -} -} -obj* l_Lean_Elaborator_matchPrecedence___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_Lean_Elaborator_matchPrecedence___main(x_1, x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_Lean_Elaborator_matchPrecedence(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = l_Lean_Elaborator_matchPrecedence___main(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_matchPrecedence___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_Lean_Elaborator_matchPrecedence(x_1, x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_matchSpec___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_18; obj* x_19; obj* x_20; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -if (lean::is_exclusive(x_1)) { - lean::cnstr_release(x_1, 0); - lean::cnstr_release(x_1, 1); - x_5 = x_1; -} else { - lean::dec_ref(x_1); - x_5 = lean::box(0); -} -x_18 = lean::cnstr_get(x_3, 0); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_3); -x_21 = lean::box(0); -x_6 = x_21; -goto block_17; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_37; -x_22 = lean::cnstr_get(x_3, 1); -lean::inc(x_22); -lean::dec(x_3); -x_23 = lean::cnstr_get(x_19, 3); -lean::inc(x_23); -lean::dec(x_19); -x_24 = lean::cnstr_get(x_20, 0); -lean::inc(x_24); -lean::dec(x_20); -x_25 = lean::cnstr_get(x_22, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_22, 1); -lean::inc(x_26); -if (lean::is_exclusive(x_22)) { - lean::cnstr_release(x_22, 0); - lean::cnstr_release(x_22, 1); - x_27 = x_22; -} else { - lean::dec_ref(x_22); - x_27 = lean::box(0); -} -x_37 = lean::cnstr_get(x_25, 1); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -lean::dec(x_27); -lean::dec(x_26); -lean::dec(x_25); -lean::dec(x_24); -lean::dec(x_23); -lean::dec(x_18); -x_38 = lean::box(0); -x_6 = x_38; -goto block_17; -} -else -{ -obj* x_39; uint8 x_40; -x_39 = lean::cnstr_get(x_25, 3); -lean::inc(x_39); -x_40 = !lean::is_exclusive(x_37); -if (x_40 == 0) -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; uint8 x_46; -x_41 = lean::cnstr_get(x_37, 0); -x_42 = lean::cnstr_get(x_24, 1); -lean::inc(x_42); -lean::dec(x_24); -x_43 = l_String_trim(x_42); -lean::dec(x_42); -x_44 = lean::cnstr_get(x_41, 1); -lean::inc(x_44); -lean::dec(x_41); -x_45 = l_String_trim(x_44); -lean::dec(x_44); -x_46 = lean::string_dec_eq(x_43, x_45); -lean::dec(x_45); -lean::dec(x_43); -if (x_46 == 0) -{ -obj* x_47; -lean::free_heap_obj(x_37); -lean::dec(x_39); -lean::dec(x_27); -lean::dec(x_26); -lean::dec(x_25); -lean::dec(x_23); -lean::dec(x_18); -x_47 = lean::box(0); -x_6 = x_47; -goto block_17; -} -else -{ -uint8 x_48; -x_48 = l_Lean_Elaborator_matchPrecedence___main(x_23, x_39); -if (x_48 == 0) -{ -obj* x_49; -lean::free_heap_obj(x_37); -lean::dec(x_27); -lean::dec(x_26); -lean::dec(x_25); -lean::dec(x_18); -x_49 = lean::box(0); -x_6 = x_49; -goto block_17; -} -else -{ -obj* x_50; -x_50 = lean::cnstr_get(x_18, 1); -lean::inc(x_50); -lean::dec(x_18); -if (lean::obj_tag(x_50) == 0) -{ -if (lean::obj_tag(x_26) == 0) -{ -lean::cnstr_set(x_37, 0, x_26); -x_28 = x_37; -goto block_36; -} -else -{ -obj* x_51; -lean::free_heap_obj(x_37); -lean::dec(x_26); -x_51 = lean::box(0); -x_28 = x_51; -goto block_36; -} -} -else -{ -obj* x_52; obj* x_53; -lean::free_heap_obj(x_37); -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_53 = x_50; -} else { - lean::dec_ref(x_50); - x_53 = lean::box(0); -} -switch (lean::obj_tag(x_52)) { -case 0: -{ -if (lean::obj_tag(x_26) == 0) -{ -obj* x_54; -lean::dec(x_53); -lean::dec(x_52); -x_54 = lean::box(0); -x_28 = x_54; -goto block_36; -} -else -{ -obj* x_55; -x_55 = lean::cnstr_get(x_26, 0); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_56 = lean::cnstr_get(x_52, 0); -lean::inc(x_56); -lean::dec(x_52); -x_57 = lean::cnstr_get(x_55, 0); -lean::inc(x_57); -lean::dec(x_55); -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -lean::dec(x_56); -x_59 = lean::cnstr_get(x_57, 1); -lean::inc(x_59); -lean::dec(x_57); -x_60 = l_Lean_Elaborator_matchPrecedence___main(x_58, x_59); -if (x_60 == 0) -{ -obj* x_61; -lean::dec(x_53); -lean::dec(x_26); -x_61 = lean::box(0); -x_28 = x_61; -goto block_36; -} -else -{ -obj* x_62; -if (lean::is_scalar(x_53)) { - x_62 = lean::alloc_cnstr(1, 1, 0); -} else { - x_62 = x_53; -} -lean::cnstr_set(x_62, 0, x_26); -x_28 = x_62; -goto block_36; -} -} -else -{ -obj* x_63; -lean::dec(x_55); -lean::dec(x_53); -lean::dec(x_52); -lean::dec(x_26); -x_63 = lean::box(0); -x_28 = x_63; -goto block_36; -} -} -} -case 1: -{ -if (lean::obj_tag(x_26) == 0) -{ -obj* x_64; -lean::dec(x_53); -lean::dec(x_52); -x_64 = lean::box(0); -x_28 = x_64; -goto block_36; -} -else -{ -obj* x_65; -x_65 = lean::cnstr_get(x_26, 0); -lean::inc(x_65); -switch (lean::obj_tag(x_65)) { -case 0: -{ -obj* x_66; -lean::dec(x_65); -lean::dec(x_53); -lean::dec(x_52); -lean::dec(x_26); -x_66 = lean::box(0); -x_28 = x_66; -goto block_36; -} -case 1: -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; uint8 x_71; -x_67 = lean::cnstr_get(x_52, 0); -lean::inc(x_67); -lean::dec(x_52); -x_68 = lean::cnstr_get(x_65, 0); -lean::inc(x_68); -lean::dec(x_65); -x_69 = lean::cnstr_get(x_67, 1); -lean::inc(x_69); -lean::dec(x_67); -x_70 = lean::cnstr_get(x_68, 1); -lean::inc(x_70); -lean::dec(x_68); -x_71 = l_Lean_Elaborator_matchPrecedence___main(x_69, x_70); -if (x_71 == 0) -{ -obj* x_72; -lean::dec(x_53); -lean::dec(x_26); -x_72 = lean::box(0); -x_28 = x_72; -goto block_36; -} -else -{ -obj* x_73; -if (lean::is_scalar(x_53)) { - x_73 = lean::alloc_cnstr(1, 1, 0); -} else { - x_73 = x_53; -} -lean::cnstr_set(x_73, 0, x_26); -x_28 = x_73; -goto block_36; -} -} -default: -{ -obj* x_74; -lean::dec(x_65); -lean::dec(x_53); -lean::dec(x_52); -lean::dec(x_26); -x_74 = lean::box(0); -x_28 = x_74; -goto block_36; -} -} -} -} -default: -{ -obj* x_75; obj* x_76; obj* x_77; -x_75 = lean::cnstr_get(x_52, 0); -lean::inc(x_75); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - x_76 = x_52; -} else { - lean::dec_ref(x_52); - x_76 = lean::box(0); -} -if (lean::obj_tag(x_26) == 0) -{ -obj* x_98; -lean::dec(x_76); -lean::dec(x_75); -lean::dec(x_53); -x_98 = lean::box(0); -x_28 = x_98; -goto block_36; -} -else -{ -uint8 x_99; -x_99 = !lean::is_exclusive(x_26); -if (x_99 == 0) -{ -obj* x_100; -x_100 = lean::cnstr_get(x_26, 0); -switch (lean::obj_tag(x_100)) { -case 0: -{ -obj* x_101; -lean::free_heap_obj(x_26); -lean::dec(x_100); -lean::dec(x_76); -lean::dec(x_75); -lean::dec(x_53); -x_101 = lean::box(0); -x_28 = x_101; -goto block_36; -} -case 1: -{ -obj* x_102; -lean::free_heap_obj(x_26); -lean::dec(x_100); -lean::dec(x_76); -lean::dec(x_75); -lean::dec(x_53); -x_102 = lean::box(0); -x_28 = x_102; -goto block_36; -} -default: -{ -obj* x_103; -x_103 = lean::cnstr_get(x_75, 1); -lean::inc(x_103); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; obj* x_105; -x_104 = lean::cnstr_get(x_100, 0); -lean::inc(x_104); -lean::dec(x_100); -x_105 = lean::cnstr_get(x_104, 1); -lean::inc(x_105); -lean::dec(x_104); -if (lean::obj_tag(x_105) == 0) -{ -obj* x_106; -lean::free_heap_obj(x_26); -x_106 = lean::box(0); -x_77 = x_106; -goto block_97; -} -else -{ -obj* x_107; obj* x_108; -x_107 = lean::cnstr_get(x_105, 0); -lean::inc(x_107); -x_108 = lean::cnstr_get(x_107, 1); -lean::inc(x_108); -lean::dec(x_107); -if (lean::obj_tag(x_108) == 0) -{ -lean::dec(x_108); -lean::cnstr_set(x_26, 0, x_105); -x_77 = x_26; -goto block_97; -} -else -{ -obj* x_109; -lean::dec(x_108); -lean::dec(x_105); -lean::free_heap_obj(x_26); -x_109 = lean::box(0); -x_77 = x_109; -goto block_97; -} -} -} -else -{ -obj* x_110; obj* x_111; -lean::free_heap_obj(x_26); -x_110 = lean::cnstr_get(x_103, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_110, 1); -lean::inc(x_111); -lean::dec(x_110); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_112; obj* x_113; -x_112 = lean::cnstr_get(x_100, 0); -lean::inc(x_112); -lean::dec(x_100); -x_113 = lean::cnstr_get(x_112, 1); -lean::inc(x_113); -lean::dec(x_112); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_114; -lean::dec(x_111); -lean::dec(x_103); -x_114 = lean::box(0); -x_77 = x_114; -goto block_97; -} -else -{ -uint8 x_115; -x_115 = !lean::is_exclusive(x_113); -if (x_115 == 0) -{ -obj* x_116; obj* x_117; -x_116 = lean::cnstr_get(x_113, 0); -x_117 = lean::cnstr_get(x_116, 1); -lean::inc(x_117); -lean::dec(x_116); -if (lean::obj_tag(x_117) == 0) -{ -obj* x_118; obj* x_119; obj* x_120; obj* x_121; uint8 x_122; -x_118 = lean::cnstr_get(x_111, 0); -lean::inc(x_118); -lean::dec(x_111); -x_119 = lean::cnstr_get(x_117, 0); -lean::inc(x_119); -lean::dec(x_117); -x_120 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_118); -x_121 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_119); -x_122 = lean::nat_dec_eq(x_120, x_121); -lean::dec(x_121); -lean::dec(x_120); -if (x_122 == 0) -{ -obj* x_123; -lean::free_heap_obj(x_113); -lean::dec(x_103); -x_123 = lean::box(0); -x_77 = x_123; -goto block_97; -} -else -{ -lean::cnstr_set(x_113, 0, x_103); -x_77 = x_113; -goto block_97; -} -} -else -{ -obj* x_124; -lean::dec(x_117); -lean::free_heap_obj(x_113); -lean::dec(x_111); -lean::dec(x_103); -x_124 = lean::box(0); -x_77 = x_124; -goto block_97; -} -} -else -{ -obj* x_125; obj* x_126; -x_125 = lean::cnstr_get(x_113, 0); -lean::inc(x_125); -lean::dec(x_113); -x_126 = lean::cnstr_get(x_125, 1); -lean::inc(x_126); -lean::dec(x_125); -if (lean::obj_tag(x_126) == 0) -{ -obj* x_127; obj* x_128; obj* x_129; obj* x_130; uint8 x_131; -x_127 = lean::cnstr_get(x_111, 0); -lean::inc(x_127); -lean::dec(x_111); -x_128 = lean::cnstr_get(x_126, 0); -lean::inc(x_128); -lean::dec(x_126); -x_129 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_127); -x_130 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_128); -x_131 = lean::nat_dec_eq(x_129, x_130); -lean::dec(x_130); -lean::dec(x_129); -if (x_131 == 0) -{ -obj* x_132; -lean::dec(x_103); -x_132 = lean::box(0); -x_77 = x_132; -goto block_97; -} -else -{ -obj* x_133; -x_133 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_133, 0, x_103); -x_77 = x_133; -goto block_97; -} -} -else -{ -obj* x_134; -lean::dec(x_126); -lean::dec(x_111); -lean::dec(x_103); -x_134 = lean::box(0); -x_77 = x_134; -goto block_97; -} -} -} -} -else -{ -obj* x_135; -lean::dec(x_111); -lean::dec(x_103); -lean::dec(x_100); -x_135 = lean::box(0); -x_77 = x_135; -goto block_97; -} -} -} -} -} -else -{ -obj* x_136; -x_136 = lean::cnstr_get(x_26, 0); -lean::inc(x_136); -lean::dec(x_26); -switch (lean::obj_tag(x_136)) { -case 0: -{ -obj* x_137; -lean::dec(x_136); -lean::dec(x_76); -lean::dec(x_75); -lean::dec(x_53); -x_137 = lean::box(0); -x_28 = x_137; -goto block_36; -} -case 1: -{ -obj* x_138; -lean::dec(x_136); -lean::dec(x_76); -lean::dec(x_75); -lean::dec(x_53); -x_138 = lean::box(0); -x_28 = x_138; -goto block_36; -} -default: -{ -obj* x_139; -x_139 = lean::cnstr_get(x_75, 1); -lean::inc(x_139); -if (lean::obj_tag(x_139) == 0) -{ -obj* x_140; obj* x_141; -x_140 = lean::cnstr_get(x_136, 0); -lean::inc(x_140); -lean::dec(x_136); -x_141 = lean::cnstr_get(x_140, 1); -lean::inc(x_141); -lean::dec(x_140); -if (lean::obj_tag(x_141) == 0) -{ -obj* x_142; -x_142 = lean::box(0); -x_77 = x_142; -goto block_97; -} -else -{ -obj* x_143; obj* x_144; -x_143 = lean::cnstr_get(x_141, 0); -lean::inc(x_143); -x_144 = lean::cnstr_get(x_143, 1); -lean::inc(x_144); -lean::dec(x_143); -if (lean::obj_tag(x_144) == 0) -{ -obj* x_145; -lean::dec(x_144); -x_145 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_145, 0, x_141); -x_77 = x_145; -goto block_97; -} -else -{ -obj* x_146; -lean::dec(x_144); -lean::dec(x_141); -x_146 = lean::box(0); -x_77 = x_146; -goto block_97; -} -} -} -else -{ -obj* x_147; obj* x_148; -x_147 = lean::cnstr_get(x_139, 0); -lean::inc(x_147); -x_148 = lean::cnstr_get(x_147, 1); -lean::inc(x_148); -lean::dec(x_147); -if (lean::obj_tag(x_148) == 0) -{ -obj* x_149; obj* x_150; -x_149 = lean::cnstr_get(x_136, 0); -lean::inc(x_149); -lean::dec(x_136); -x_150 = lean::cnstr_get(x_149, 1); -lean::inc(x_150); -lean::dec(x_149); -if (lean::obj_tag(x_150) == 0) -{ -obj* x_151; -lean::dec(x_148); -lean::dec(x_139); -x_151 = lean::box(0); -x_77 = x_151; -goto block_97; -} -else -{ -obj* x_152; obj* x_153; obj* x_154; -x_152 = lean::cnstr_get(x_150, 0); -lean::inc(x_152); -if (lean::is_exclusive(x_150)) { - lean::cnstr_release(x_150, 0); - x_153 = x_150; -} else { - lean::dec_ref(x_150); - x_153 = lean::box(0); -} -x_154 = lean::cnstr_get(x_152, 1); -lean::inc(x_154); -lean::dec(x_152); -if (lean::obj_tag(x_154) == 0) -{ -obj* x_155; obj* x_156; obj* x_157; obj* x_158; uint8 x_159; -x_155 = lean::cnstr_get(x_148, 0); -lean::inc(x_155); -lean::dec(x_148); -x_156 = lean::cnstr_get(x_154, 0); -lean::inc(x_156); -lean::dec(x_154); -x_157 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_155); -x_158 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_156); -x_159 = lean::nat_dec_eq(x_157, x_158); -lean::dec(x_158); -lean::dec(x_157); -if (x_159 == 0) -{ -obj* x_160; -lean::dec(x_153); -lean::dec(x_139); -x_160 = lean::box(0); -x_77 = x_160; -goto block_97; -} -else -{ -obj* x_161; -if (lean::is_scalar(x_153)) { - x_161 = lean::alloc_cnstr(1, 1, 0); -} else { - x_161 = x_153; -} -lean::cnstr_set(x_161, 0, x_139); -x_77 = x_161; -goto block_97; -} -} -else -{ -obj* x_162; -lean::dec(x_154); -lean::dec(x_153); -lean::dec(x_148); -lean::dec(x_139); -x_162 = lean::box(0); -x_77 = x_162; -goto block_97; -} -} -} -else -{ -obj* x_163; -lean::dec(x_148); -lean::dec(x_139); -lean::dec(x_136); -x_163 = lean::box(0); -x_77 = x_163; -goto block_97; -} -} -} -} -} -} -block_97: -{ -if (lean::obj_tag(x_77) == 0) -{ -obj* x_78; -lean::dec(x_76); -lean::dec(x_75); -lean::dec(x_53); -x_78 = lean::box(0); -x_28 = x_78; -goto block_36; -} -else -{ -uint8 x_79; -x_79 = !lean::is_exclusive(x_77); -if (x_79 == 0) -{ -uint8 x_80; -x_80 = !lean::is_exclusive(x_75); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; -x_81 = lean::cnstr_get(x_77, 0); -x_82 = lean::cnstr_get(x_75, 1); -lean::dec(x_82); -lean::cnstr_set(x_75, 1, x_81); -if (lean::is_scalar(x_76)) { - x_83 = lean::alloc_cnstr(2, 1, 0); -} else { - x_83 = x_76; -} -lean::cnstr_set(x_83, 0, x_75); -lean::cnstr_set(x_77, 0, x_83); -if (lean::is_scalar(x_53)) { - x_84 = lean::alloc_cnstr(1, 1, 0); -} else { - x_84 = x_53; -} -lean::cnstr_set(x_84, 0, x_77); -x_28 = x_84; -goto block_36; -} -else -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; -x_85 = lean::cnstr_get(x_77, 0); -x_86 = lean::cnstr_get(x_75, 0); -lean::inc(x_86); -lean::dec(x_75); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_85); -if (lean::is_scalar(x_76)) { - x_88 = lean::alloc_cnstr(2, 1, 0); -} else { - x_88 = x_76; -} -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_77, 0, x_88); -if (lean::is_scalar(x_53)) { - x_89 = lean::alloc_cnstr(1, 1, 0); -} else { - x_89 = x_53; -} -lean::cnstr_set(x_89, 0, x_77); -x_28 = x_89; -goto block_36; -} -} -else -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_90 = lean::cnstr_get(x_77, 0); -lean::inc(x_90); -lean::dec(x_77); -x_91 = lean::cnstr_get(x_75, 0); -lean::inc(x_91); -if (lean::is_exclusive(x_75)) { - lean::cnstr_release(x_75, 0); - lean::cnstr_release(x_75, 1); - x_92 = x_75; -} else { - lean::dec_ref(x_75); - x_92 = lean::box(0); -} -if (lean::is_scalar(x_92)) { - x_93 = lean::alloc_cnstr(0, 2, 0); -} else { - x_93 = x_92; -} -lean::cnstr_set(x_93, 0, x_91); -lean::cnstr_set(x_93, 1, x_90); -if (lean::is_scalar(x_76)) { - x_94 = lean::alloc_cnstr(2, 1, 0); -} else { - x_94 = x_76; -} -lean::cnstr_set(x_94, 0, x_93); -x_95 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -if (lean::is_scalar(x_53)) { - x_96 = lean::alloc_cnstr(1, 1, 0); -} else { - x_96 = x_53; -} -lean::cnstr_set(x_96, 0, x_95); -x_28 = x_96; -goto block_36; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; uint8 x_169; -x_164 = lean::cnstr_get(x_37, 0); -lean::inc(x_164); -lean::dec(x_37); -x_165 = lean::cnstr_get(x_24, 1); -lean::inc(x_165); -lean::dec(x_24); -x_166 = l_String_trim(x_165); -lean::dec(x_165); -x_167 = lean::cnstr_get(x_164, 1); -lean::inc(x_167); -lean::dec(x_164); -x_168 = l_String_trim(x_167); -lean::dec(x_167); -x_169 = lean::string_dec_eq(x_166, x_168); -lean::dec(x_168); -lean::dec(x_166); -if (x_169 == 0) -{ -obj* x_170; -lean::dec(x_39); -lean::dec(x_27); -lean::dec(x_26); -lean::dec(x_25); -lean::dec(x_23); -lean::dec(x_18); -x_170 = lean::box(0); -x_6 = x_170; -goto block_17; -} -else -{ -uint8 x_171; -x_171 = l_Lean_Elaborator_matchPrecedence___main(x_23, x_39); -if (x_171 == 0) -{ -obj* x_172; -lean::dec(x_27); -lean::dec(x_26); -lean::dec(x_25); -lean::dec(x_18); -x_172 = lean::box(0); -x_6 = x_172; -goto block_17; -} -else -{ -obj* x_173; -x_173 = lean::cnstr_get(x_18, 1); -lean::inc(x_173); -lean::dec(x_18); -if (lean::obj_tag(x_173) == 0) -{ -if (lean::obj_tag(x_26) == 0) -{ -obj* x_174; -x_174 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_174, 0, x_26); -x_28 = x_174; -goto block_36; -} -else -{ -obj* x_175; -lean::dec(x_26); -x_175 = lean::box(0); -x_28 = x_175; -goto block_36; -} -} -else -{ -obj* x_176; obj* x_177; -x_176 = lean::cnstr_get(x_173, 0); -lean::inc(x_176); -if (lean::is_exclusive(x_173)) { - lean::cnstr_release(x_173, 0); - x_177 = x_173; -} else { - lean::dec_ref(x_173); - x_177 = lean::box(0); -} -switch (lean::obj_tag(x_176)) { -case 0: -{ -if (lean::obj_tag(x_26) == 0) -{ -obj* x_178; -lean::dec(x_177); -lean::dec(x_176); -x_178 = lean::box(0); -x_28 = x_178; -goto block_36; -} -else -{ -obj* x_179; -x_179 = lean::cnstr_get(x_26, 0); -lean::inc(x_179); -if (lean::obj_tag(x_179) == 0) -{ -obj* x_180; obj* x_181; obj* x_182; obj* x_183; uint8 x_184; -x_180 = lean::cnstr_get(x_176, 0); -lean::inc(x_180); -lean::dec(x_176); -x_181 = lean::cnstr_get(x_179, 0); -lean::inc(x_181); -lean::dec(x_179); -x_182 = lean::cnstr_get(x_180, 1); -lean::inc(x_182); -lean::dec(x_180); -x_183 = lean::cnstr_get(x_181, 1); -lean::inc(x_183); -lean::dec(x_181); -x_184 = l_Lean_Elaborator_matchPrecedence___main(x_182, x_183); -if (x_184 == 0) -{ -obj* x_185; -lean::dec(x_177); -lean::dec(x_26); -x_185 = lean::box(0); -x_28 = x_185; -goto block_36; -} -else -{ -obj* x_186; -if (lean::is_scalar(x_177)) { - x_186 = lean::alloc_cnstr(1, 1, 0); -} else { - x_186 = x_177; -} -lean::cnstr_set(x_186, 0, x_26); -x_28 = x_186; -goto block_36; -} -} -else -{ -obj* x_187; -lean::dec(x_179); -lean::dec(x_177); -lean::dec(x_176); -lean::dec(x_26); -x_187 = lean::box(0); -x_28 = x_187; -goto block_36; -} -} -} -case 1: -{ -if (lean::obj_tag(x_26) == 0) -{ -obj* x_188; -lean::dec(x_177); -lean::dec(x_176); -x_188 = lean::box(0); -x_28 = x_188; -goto block_36; -} -else -{ -obj* x_189; -x_189 = lean::cnstr_get(x_26, 0); -lean::inc(x_189); -switch (lean::obj_tag(x_189)) { -case 0: -{ -obj* x_190; -lean::dec(x_189); -lean::dec(x_177); -lean::dec(x_176); -lean::dec(x_26); -x_190 = lean::box(0); -x_28 = x_190; -goto block_36; -} -case 1: -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; uint8 x_195; -x_191 = lean::cnstr_get(x_176, 0); -lean::inc(x_191); -lean::dec(x_176); -x_192 = lean::cnstr_get(x_189, 0); -lean::inc(x_192); -lean::dec(x_189); -x_193 = lean::cnstr_get(x_191, 1); -lean::inc(x_193); -lean::dec(x_191); -x_194 = lean::cnstr_get(x_192, 1); -lean::inc(x_194); -lean::dec(x_192); -x_195 = l_Lean_Elaborator_matchPrecedence___main(x_193, x_194); -if (x_195 == 0) -{ -obj* x_196; -lean::dec(x_177); -lean::dec(x_26); -x_196 = lean::box(0); -x_28 = x_196; -goto block_36; -} -else -{ -obj* x_197; -if (lean::is_scalar(x_177)) { - x_197 = lean::alloc_cnstr(1, 1, 0); -} else { - x_197 = x_177; -} -lean::cnstr_set(x_197, 0, x_26); -x_28 = x_197; -goto block_36; -} -} -default: -{ -obj* x_198; -lean::dec(x_189); -lean::dec(x_177); -lean::dec(x_176); -lean::dec(x_26); -x_198 = lean::box(0); -x_28 = x_198; -goto block_36; -} -} -} -} -default: -{ -obj* x_199; obj* x_200; obj* x_201; -x_199 = lean::cnstr_get(x_176, 0); -lean::inc(x_199); -if (lean::is_exclusive(x_176)) { - lean::cnstr_release(x_176, 0); - x_200 = x_176; -} else { - lean::dec_ref(x_176); - x_200 = lean::box(0); -} -if (lean::obj_tag(x_26) == 0) -{ -obj* x_212; -lean::dec(x_200); -lean::dec(x_199); -lean::dec(x_177); -x_212 = lean::box(0); -x_28 = x_212; -goto block_36; -} -else -{ -obj* x_213; obj* x_214; -x_213 = lean::cnstr_get(x_26, 0); -lean::inc(x_213); -if (lean::is_exclusive(x_26)) { - lean::cnstr_release(x_26, 0); - x_214 = x_26; -} else { - lean::dec_ref(x_26); - x_214 = lean::box(0); -} -switch (lean::obj_tag(x_213)) { -case 0: -{ -obj* x_215; -lean::dec(x_214); -lean::dec(x_213); -lean::dec(x_200); -lean::dec(x_199); -lean::dec(x_177); -x_215 = lean::box(0); -x_28 = x_215; -goto block_36; -} -case 1: -{ -obj* x_216; -lean::dec(x_214); -lean::dec(x_213); -lean::dec(x_200); -lean::dec(x_199); -lean::dec(x_177); -x_216 = lean::box(0); -x_28 = x_216; -goto block_36; -} -default: -{ -obj* x_217; -x_217 = lean::cnstr_get(x_199, 1); -lean::inc(x_217); -if (lean::obj_tag(x_217) == 0) -{ -obj* x_218; obj* x_219; -x_218 = lean::cnstr_get(x_213, 0); -lean::inc(x_218); -lean::dec(x_213); -x_219 = lean::cnstr_get(x_218, 1); -lean::inc(x_219); -lean::dec(x_218); -if (lean::obj_tag(x_219) == 0) -{ -obj* x_220; -lean::dec(x_214); -x_220 = lean::box(0); -x_201 = x_220; -goto block_211; -} -else -{ -obj* x_221; obj* x_222; -x_221 = lean::cnstr_get(x_219, 0); -lean::inc(x_221); -x_222 = lean::cnstr_get(x_221, 1); -lean::inc(x_222); -lean::dec(x_221); -if (lean::obj_tag(x_222) == 0) -{ -obj* x_223; -lean::dec(x_222); -if (lean::is_scalar(x_214)) { - x_223 = lean::alloc_cnstr(1, 1, 0); -} else { - x_223 = x_214; -} -lean::cnstr_set(x_223, 0, x_219); -x_201 = x_223; -goto block_211; -} -else -{ -obj* x_224; -lean::dec(x_222); -lean::dec(x_219); -lean::dec(x_214); -x_224 = lean::box(0); -x_201 = x_224; -goto block_211; -} -} -} -else -{ -obj* x_225; obj* x_226; -lean::dec(x_214); -x_225 = lean::cnstr_get(x_217, 0); -lean::inc(x_225); -x_226 = lean::cnstr_get(x_225, 1); -lean::inc(x_226); -lean::dec(x_225); -if (lean::obj_tag(x_226) == 0) -{ -obj* x_227; obj* x_228; -x_227 = lean::cnstr_get(x_213, 0); -lean::inc(x_227); -lean::dec(x_213); -x_228 = lean::cnstr_get(x_227, 1); -lean::inc(x_228); -lean::dec(x_227); -if (lean::obj_tag(x_228) == 0) -{ -obj* x_229; -lean::dec(x_226); -lean::dec(x_217); -x_229 = lean::box(0); -x_201 = x_229; -goto block_211; -} -else -{ -obj* x_230; obj* x_231; obj* x_232; -x_230 = lean::cnstr_get(x_228, 0); -lean::inc(x_230); -if (lean::is_exclusive(x_228)) { - lean::cnstr_release(x_228, 0); - x_231 = x_228; -} else { - lean::dec_ref(x_228); - x_231 = lean::box(0); -} -x_232 = lean::cnstr_get(x_230, 1); -lean::inc(x_232); -lean::dec(x_230); -if (lean::obj_tag(x_232) == 0) -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; uint8 x_237; -x_233 = lean::cnstr_get(x_226, 0); -lean::inc(x_233); -lean::dec(x_226); -x_234 = lean::cnstr_get(x_232, 0); -lean::inc(x_234); -lean::dec(x_232); -x_235 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_233); -x_236 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_234); -x_237 = lean::nat_dec_eq(x_235, x_236); -lean::dec(x_236); -lean::dec(x_235); -if (x_237 == 0) -{ -obj* x_238; -lean::dec(x_231); -lean::dec(x_217); -x_238 = lean::box(0); -x_201 = x_238; -goto block_211; -} -else -{ -obj* x_239; -if (lean::is_scalar(x_231)) { - x_239 = lean::alloc_cnstr(1, 1, 0); -} else { - x_239 = x_231; -} -lean::cnstr_set(x_239, 0, x_217); -x_201 = x_239; -goto block_211; -} -} -else -{ -obj* x_240; -lean::dec(x_232); -lean::dec(x_231); -lean::dec(x_226); -lean::dec(x_217); -x_240 = lean::box(0); -x_201 = x_240; -goto block_211; -} -} -} -else -{ -obj* x_241; -lean::dec(x_226); -lean::dec(x_217); -lean::dec(x_213); -x_241 = lean::box(0); -x_201 = x_241; -goto block_211; -} -} -} -} -} -block_211: -{ -if (lean::obj_tag(x_201) == 0) -{ -obj* x_202; -lean::dec(x_200); -lean::dec(x_199); -lean::dec(x_177); -x_202 = lean::box(0); -x_28 = x_202; -goto block_36; -} -else -{ -obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; -x_203 = lean::cnstr_get(x_201, 0); -lean::inc(x_203); -if (lean::is_exclusive(x_201)) { - lean::cnstr_release(x_201, 0); - x_204 = x_201; -} else { - lean::dec_ref(x_201); - x_204 = lean::box(0); -} -x_205 = lean::cnstr_get(x_199, 0); -lean::inc(x_205); -if (lean::is_exclusive(x_199)) { - lean::cnstr_release(x_199, 0); - lean::cnstr_release(x_199, 1); - x_206 = x_199; -} else { - lean::dec_ref(x_199); - x_206 = lean::box(0); -} -if (lean::is_scalar(x_206)) { - x_207 = lean::alloc_cnstr(0, 2, 0); -} else { - x_207 = x_206; -} -lean::cnstr_set(x_207, 0, x_205); -lean::cnstr_set(x_207, 1, x_203); -if (lean::is_scalar(x_200)) { - x_208 = lean::alloc_cnstr(2, 1, 0); -} else { - x_208 = x_200; -} -lean::cnstr_set(x_208, 0, x_207); -if (lean::is_scalar(x_204)) { - x_209 = lean::alloc_cnstr(1, 1, 0); -} else { - x_209 = x_204; -} -lean::cnstr_set(x_209, 0, x_208); -if (lean::is_scalar(x_177)) { - x_210 = lean::alloc_cnstr(1, 1, 0); -} else { - x_210 = x_177; -} -lean::cnstr_set(x_210, 0, x_209); -x_28 = x_210; -goto block_36; -} -} -} -} -} -} -} -} -} -block_36: -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; -lean::dec(x_27); -lean::dec(x_25); -x_29 = lean::box(0); -x_6 = x_29; -goto block_17; -} -else -{ -uint8 x_30; -x_30 = !lean::is_exclusive(x_28); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -if (lean::is_scalar(x_27)) { - x_32 = lean::alloc_cnstr(0, 2, 0); -} else { - x_32 = x_27; -} -lean::cnstr_set(x_32, 0, x_25); -lean::cnstr_set(x_32, 1, x_31); -lean::cnstr_set(x_28, 0, x_32); -x_6 = x_28; -goto block_17; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_28, 0); -lean::inc(x_33); -lean::dec(x_28); -if (lean::is_scalar(x_27)) { - x_34 = lean::alloc_cnstr(0, 2, 0); -} else { - x_34 = x_27; -} -lean::cnstr_set(x_34, 0, x_25); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -x_6 = x_35; -goto block_17; -} -} -} -} -block_17: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::dec(x_5); -lean::dec(x_4); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -x_9 = l_List_mmap___main___at_Lean_Elaborator_matchSpec___spec__1(x_4); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; -lean::dec(x_8); -lean::dec(x_5); -x_10 = lean::box(0); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_9, 0); -if (lean::is_scalar(x_5)) { - x_13 = lean::alloc_cnstr(1, 2, 0); -} else { - x_13 = x_5; -} -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -lean::cnstr_set(x_9, 0, x_13); -return x_9; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_9, 0); -lean::inc(x_14); -lean::dec(x_9); -if (lean::is_scalar(x_5)) { - x_15 = lean::alloc_cnstr(1, 2, 0); -} else { - x_15 = x_5; -} -lean::cnstr_set(x_15, 0, x_8); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -} -} -} -} -} -} -obj* l_Lean_Elaborator_matchSpec(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -if (lean::is_exclusive(x_1)) { - lean::cnstr_release(x_1, 0); - lean::cnstr_release(x_1, 1); - x_5 = x_1; -} else { - lean::dec_ref(x_1); - x_5 = lean::box(0); -} -if (lean::obj_tag(x_3) == 0) -{ -obj* x_19; -x_19 = lean::cnstr_get(x_2, 0); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::box(0); -x_6 = x_20; -goto block_18; -} -else -{ -obj* x_21; -lean::dec(x_19); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -x_21 = lean::box(0); -return x_21; -} -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_2, 0); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_23 = lean::box(0); -return x_23; -} -else -{ -obj* x_24; -lean::dec(x_22); -x_24 = lean::box(0); -x_6 = x_24; -goto block_18; -} -} -block_18: -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_6); -x_7 = lean::cnstr_get(x_2, 1); -lean::inc(x_7); -lean::dec(x_2); -x_8 = l_List_zip___rarg___closed__1; -x_9 = l_List_zipWith___main___rarg(x_8, x_4, x_7); -x_10 = l_List_mmap___main___at_Lean_Elaborator_matchSpec___spec__1(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -lean::dec(x_5); -lean::dec(x_3); -x_11 = lean::box(0); -return x_11; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_10, 0); -if (lean::is_scalar(x_5)) { - x_14 = lean::alloc_cnstr(0, 2, 0); -} else { - x_14 = x_5; -} -lean::cnstr_set(x_14, 0, x_3); -lean::cnstr_set(x_14, 1, x_13); -lean::cnstr_set(x_10, 0, x_14); -return x_10; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_10, 0); -lean::inc(x_15); -lean::dec(x_10); -if (lean::is_scalar(x_5)) { - x_16 = lean::alloc_cnstr(0, 2, 0); -} else { - x_16 = x_5; -} -lean::cnstr_set(x_16, 0, x_3); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -return x_17; -} -} -} -} -} -obj* l_List_filterMap___main___at_Lean_Elaborator_notation_elaborateAux___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = lean::cnstr_get(x_1, 2); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 2); -lean::inc(x_8); -lean::dec(x_5); -x_9 = l_Lean_Elaborator_matchSpec(x_7, x_8); -if (lean::obj_tag(x_9) == 0) -{ -lean::free_heap_obj(x_2); -x_2 = x_6; -goto _start; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -x_12 = l_List_filterMap___main___at_Lean_Elaborator_notation_elaborateAux___spec__1(x_1, x_6); -lean::cnstr_set(x_2, 1, x_12); -lean::cnstr_set(x_2, 0, x_11); -return x_2; -} -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -x_14 = lean::cnstr_get(x_2, 1); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_2); -x_15 = lean::cnstr_get(x_1, 2); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_13, 2); -lean::inc(x_16); -lean::dec(x_13); -x_17 = l_Lean_Elaborator_matchSpec(x_15, x_16); -if (lean::obj_tag(x_17) == 0) -{ -x_2 = x_14; -goto _start; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = l_List_filterMap___main___at_Lean_Elaborator_notation_elaborateAux___spec__1(x_1, x_14); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -} -} -} -} -obj* _init_l_Lean_Elaborator_notation_elaborateAux___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("invalid notation, matches multiple reserved notations"); -return x_1; -} -} -obj* l_Lean_Elaborator_notation_elaborateAux(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -lean::inc(x_1); -x_6 = l_List_filterMap___main___at_Lean_Elaborator_notation_elaborateAux___spec__1(x_1, x_5); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::cnstr_get(x_1, 2); -x_9 = l_Lean_Elaborator_postprocessNotationSpec(x_8); -lean::cnstr_set(x_1, 2, x_9); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_4); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -else -{ -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; -x_12 = lean::cnstr_get(x_1, 0); -x_13 = lean::cnstr_get(x_1, 1); -x_14 = lean::cnstr_get(x_1, 2); -x_15 = lean::cnstr_get(x_1, 3); -x_16 = lean::cnstr_get(x_1, 4); -lean::inc(x_16); -lean::inc(x_15); -lean::inc(x_14); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_1); -x_17 = l_Lean_Elaborator_postprocessNotationSpec(x_14); -x_18 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_18, 0, x_12); -lean::cnstr_set(x_18, 1, x_13); -lean::cnstr_set(x_18, 2, x_17); -lean::cnstr_set(x_18, 3, x_15); -lean::cnstr_set(x_18, 4, x_16); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_4); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_6, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; uint8 x_23; -x_22 = lean::cnstr_get(x_6, 0); -lean::inc(x_22); -lean::dec(x_6); -x_23 = !lean::is_exclusive(x_1); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_24 = lean::cnstr_get(x_1, 2); -lean::dec(x_24); -x_25 = l_Lean_Elaborator_postprocessNotationSpec(x_22); -lean::cnstr_set(x_1, 2, x_25); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_1); -lean::cnstr_set(x_26, 1, x_4); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_28 = lean::cnstr_get(x_1, 0); -x_29 = lean::cnstr_get(x_1, 1); -x_30 = lean::cnstr_get(x_1, 3); -x_31 = lean::cnstr_get(x_1, 4); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_1); -x_32 = l_Lean_Elaborator_postprocessNotationSpec(x_22); -x_33 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_33, 0, x_28); -lean::cnstr_set(x_33, 1, x_29); -lean::cnstr_set(x_33, 2, x_32); -lean::cnstr_set(x_33, 3, x_30); -lean::cnstr_set(x_33, 4, x_31); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_4); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -lean::dec(x_21); -lean::dec(x_6); -x_36 = l_Lean_Parser_command_notation_HasView; -x_37 = lean::cnstr_get(x_36, 1); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_1); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = l_Lean_Elaborator_notation_elaborateAux___closed__1; -x_41 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_39, x_40, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_39); -if (lean::obj_tag(x_41) == 0) -{ -uint8 x_42; -x_42 = !lean::is_exclusive(x_41); -if (x_42 == 0) -{ -return x_41; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_41, 0); -lean::inc(x_43); -lean::dec(x_41); -x_44 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -return x_44; -} -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_41); -if (x_45 == 0) -{ -obj* x_46; uint8 x_47; -x_46 = lean::cnstr_get(x_41, 0); -x_47 = !lean::is_exclusive(x_46); -if (x_47 == 0) -{ -obj* x_48; uint8 x_49; -x_48 = lean::cnstr_get(x_46, 0); -x_49 = !lean::is_exclusive(x_48); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; -x_50 = lean::cnstr_get(x_48, 2); -x_51 = l_Lean_Elaborator_postprocessNotationSpec(x_50); -lean::cnstr_set(x_48, 2, x_51); -return x_41; -} -else -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_52 = lean::cnstr_get(x_48, 0); -x_53 = lean::cnstr_get(x_48, 1); -x_54 = lean::cnstr_get(x_48, 2); -x_55 = lean::cnstr_get(x_48, 3); -x_56 = lean::cnstr_get(x_48, 4); -lean::inc(x_56); -lean::inc(x_55); -lean::inc(x_54); -lean::inc(x_53); -lean::inc(x_52); -lean::dec(x_48); -x_57 = l_Lean_Elaborator_postprocessNotationSpec(x_54); -x_58 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_58, 0, x_52); -lean::cnstr_set(x_58, 1, x_53); -lean::cnstr_set(x_58, 2, x_57); -lean::cnstr_set(x_58, 3, x_55); -lean::cnstr_set(x_58, 4, x_56); -lean::cnstr_set(x_46, 0, x_58); -return x_41; -} -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_59 = lean::cnstr_get(x_46, 0); -x_60 = lean::cnstr_get(x_46, 1); -lean::inc(x_60); -lean::inc(x_59); -lean::dec(x_46); -x_61 = lean::cnstr_get(x_59, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_59, 1); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_59, 2); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_59, 3); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_59, 4); -lean::inc(x_65); -if (lean::is_exclusive(x_59)) { - lean::cnstr_release(x_59, 0); - lean::cnstr_release(x_59, 1); - lean::cnstr_release(x_59, 2); - lean::cnstr_release(x_59, 3); - lean::cnstr_release(x_59, 4); - x_66 = x_59; -} else { - lean::dec_ref(x_59); - x_66 = lean::box(0); -} -x_67 = l_Lean_Elaborator_postprocessNotationSpec(x_63); -if (lean::is_scalar(x_66)) { - x_68 = lean::alloc_cnstr(0, 5, 0); -} else { - x_68 = x_66; -} -lean::cnstr_set(x_68, 0, x_61); -lean::cnstr_set(x_68, 1, x_62); -lean::cnstr_set(x_68, 2, x_67); -lean::cnstr_set(x_68, 3, x_64); -lean::cnstr_set(x_68, 4, x_65); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_60); -lean::cnstr_set(x_41, 0, x_69); -return x_41; -} -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_70 = lean::cnstr_get(x_41, 0); -lean::inc(x_70); -lean::dec(x_41); -x_71 = lean::cnstr_get(x_70, 0); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_70, 1); -lean::inc(x_72); -if (lean::is_exclusive(x_70)) { - lean::cnstr_release(x_70, 0); - lean::cnstr_release(x_70, 1); - x_73 = x_70; -} else { - lean::dec_ref(x_70); - x_73 = lean::box(0); -} -x_74 = lean::cnstr_get(x_71, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_71, 1); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_71, 2); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_71, 3); -lean::inc(x_77); -x_78 = lean::cnstr_get(x_71, 4); -lean::inc(x_78); -if (lean::is_exclusive(x_71)) { - lean::cnstr_release(x_71, 0); - lean::cnstr_release(x_71, 1); - lean::cnstr_release(x_71, 2); - lean::cnstr_release(x_71, 3); - lean::cnstr_release(x_71, 4); - x_79 = x_71; -} else { - lean::dec_ref(x_71); - x_79 = lean::box(0); -} -x_80 = l_Lean_Elaborator_postprocessNotationSpec(x_76); -if (lean::is_scalar(x_79)) { - x_81 = lean::alloc_cnstr(0, 5, 0); -} else { - x_81 = x_79; -} -lean::cnstr_set(x_81, 0, x_74); -lean::cnstr_set(x_81, 1, x_75); -lean::cnstr_set(x_81, 2, x_80); -lean::cnstr_set(x_81, 3, x_77); -lean::cnstr_set(x_81, 4, x_78); -if (lean::is_scalar(x_73)) { - x_82 = lean::alloc_cnstr(0, 2, 0); -} else { - x_82 = x_73; -} -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_72); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -return x_83; -} -} -} -} -} -} -obj* l_Lean_Elaborator_notation_elaborateAux___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_notation_elaborateAux(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_mkNotationKind___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("_notation"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_mkNotationKind___rarg(obj* x_1) { -_start: -{ -uint8 x_2; -x_2 = !lean::is_exclusive(x_1); -if (x_2 == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_3 = lean::cnstr_get(x_1, 2); -x_4 = lean::mk_nat_obj(1u); -x_5 = lean::nat_add(x_3, x_4); -lean::cnstr_set(x_1, 2, x_5); -x_6 = l_Lean_Elaborator_mkNotationKind___rarg___closed__1; -x_7 = lean_name_mk_numeral(x_6, x_3); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_10 = lean::cnstr_get(x_1, 0); -x_11 = lean::cnstr_get(x_1, 1); -x_12 = lean::cnstr_get(x_1, 2); -x_13 = lean::cnstr_get(x_1, 3); -x_14 = lean::cnstr_get(x_1, 4); -x_15 = lean::cnstr_get(x_1, 5); -x_16 = lean::cnstr_get(x_1, 6); -x_17 = lean::cnstr_get(x_1, 7); -x_18 = lean::cnstr_get(x_1, 8); -x_19 = lean::cnstr_get(x_1, 9); -x_20 = lean::cnstr_get(x_1, 10); -lean::inc(x_20); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::inc(x_15); -lean::inc(x_14); -lean::inc(x_13); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_1); -x_21 = lean::mk_nat_obj(1u); -x_22 = lean::nat_add(x_12, x_21); -x_23 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_23, 0, x_10); -lean::cnstr_set(x_23, 1, x_11); -lean::cnstr_set(x_23, 2, x_22); -lean::cnstr_set(x_23, 3, x_13); -lean::cnstr_set(x_23, 4, x_14); -lean::cnstr_set(x_23, 5, x_15); -lean::cnstr_set(x_23, 6, x_16); -lean::cnstr_set(x_23, 7, x_17); -lean::cnstr_set(x_23, 8, x_18); -lean::cnstr_set(x_23, 9, x_19); -lean::cnstr_set(x_23, 10, x_20); -x_24 = l_Lean_Elaborator_mkNotationKind___rarg___closed__1; -x_25 = lean_name_mk_numeral(x_24, x_12); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_23); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -} -} -obj* l_Lean_Elaborator_mkNotationKind(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_mkNotationKind___rarg), 1, 0); -return x_3; -} -} -obj* l_Lean_Elaborator_mkNotationKind___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Elaborator_mkNotationKind(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Elaborator_registerNotationMacro(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_mkNotationKind___rarg(x_4); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -lean::dec(x_1); -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint8 x_16; -x_12 = lean::cnstr_get(x_10, 0); -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_1); -lean::inc(x_14); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___boxed), 3, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = !lean::is_exclusive(x_13); -if (x_16 == 0) -{ -obj* x_17; uint8 x_18; -x_17 = lean::cnstr_get(x_13, 7); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 1); -x_20 = l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(x_19, x_12, x_15); -lean::cnstr_set(x_17, 1, x_20); -lean::cnstr_set(x_10, 0, x_14); -return x_5; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_17, 0); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_17); -x_23 = l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(x_22, x_12, x_15); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -lean::cnstr_set(x_13, 7, x_24); -lean::cnstr_set(x_10, 0, x_14); -return x_5; -} -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_25 = lean::cnstr_get(x_13, 7); -x_26 = lean::cnstr_get(x_13, 0); -x_27 = lean::cnstr_get(x_13, 1); -x_28 = lean::cnstr_get(x_13, 2); -x_29 = lean::cnstr_get(x_13, 3); -x_30 = lean::cnstr_get(x_13, 4); -x_31 = lean::cnstr_get(x_13, 5); -x_32 = lean::cnstr_get(x_13, 6); -x_33 = lean::cnstr_get(x_13, 8); -x_34 = lean::cnstr_get(x_13, 9); -x_35 = lean::cnstr_get(x_13, 10); -lean::inc(x_35); -lean::inc(x_34); -lean::inc(x_33); -lean::inc(x_25); -lean::inc(x_32); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::inc(x_28); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_13); -x_36 = lean::cnstr_get(x_25, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_25, 1); -lean::inc(x_37); -if (lean::is_exclusive(x_25)) { - lean::cnstr_release(x_25, 0); - lean::cnstr_release(x_25, 1); - x_38 = x_25; -} else { - lean::dec_ref(x_25); - x_38 = lean::box(0); -} -x_39 = l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(x_37, x_12, x_15); -if (lean::is_scalar(x_38)) { - x_40 = lean::alloc_cnstr(0, 2, 0); -} else { - x_40 = x_38; -} -lean::cnstr_set(x_40, 0, x_36); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_41, 0, x_26); -lean::cnstr_set(x_41, 1, x_27); -lean::cnstr_set(x_41, 2, x_28); -lean::cnstr_set(x_41, 3, x_29); -lean::cnstr_set(x_41, 4, x_30); -lean::cnstr_set(x_41, 5, x_31); -lean::cnstr_set(x_41, 6, x_32); -lean::cnstr_set(x_41, 7, x_40); -lean::cnstr_set(x_41, 8, x_33); -lean::cnstr_set(x_41, 9, x_34); -lean::cnstr_set(x_41, 10, x_35); -lean::cnstr_set(x_10, 1, x_41); -lean::cnstr_set(x_10, 0, x_14); -return x_5; -} -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_42 = lean::cnstr_get(x_10, 0); -x_43 = lean::cnstr_get(x_10, 1); -lean::inc(x_43); -lean::inc(x_42); -lean::dec(x_10); -lean::inc(x_42); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set(x_44, 1, x_1); -lean::inc(x_44); -x_45 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___boxed), 3, 1); -lean::closure_set(x_45, 0, x_44); -x_46 = lean::cnstr_get(x_43, 7); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_43, 1); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_43, 2); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_43, 3); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_43, 4); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_43, 5); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_43, 6); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_43, 8); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_43, 9); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_43, 10); -lean::inc(x_56); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - lean::cnstr_release(x_43, 1); - lean::cnstr_release(x_43, 2); - lean::cnstr_release(x_43, 3); - lean::cnstr_release(x_43, 4); - lean::cnstr_release(x_43, 5); - lean::cnstr_release(x_43, 6); - lean::cnstr_release(x_43, 7); - lean::cnstr_release(x_43, 8); - lean::cnstr_release(x_43, 9); - lean::cnstr_release(x_43, 10); - x_57 = x_43; -} else { - lean::dec_ref(x_43); - x_57 = lean::box(0); -} -x_58 = lean::cnstr_get(x_46, 0); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_46, 1); -lean::inc(x_59); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - x_60 = x_46; -} else { - lean::dec_ref(x_46); - x_60 = lean::box(0); -} -x_61 = l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(x_59, x_42, x_45); -if (lean::is_scalar(x_60)) { - x_62 = lean::alloc_cnstr(0, 2, 0); -} else { - x_62 = x_60; -} -lean::cnstr_set(x_62, 0, x_58); -lean::cnstr_set(x_62, 1, x_61); -if (lean::is_scalar(x_57)) { - x_63 = lean::alloc_cnstr(0, 11, 0); -} else { - x_63 = x_57; -} -lean::cnstr_set(x_63, 0, x_47); -lean::cnstr_set(x_63, 1, x_48); -lean::cnstr_set(x_63, 2, x_49); -lean::cnstr_set(x_63, 3, x_50); -lean::cnstr_set(x_63, 4, x_51); -lean::cnstr_set(x_63, 5, x_52); -lean::cnstr_set(x_63, 6, x_53); -lean::cnstr_set(x_63, 7, x_62); -lean::cnstr_set(x_63, 8, x_54); -lean::cnstr_set(x_63, 9, x_55); -lean::cnstr_set(x_63, 10, x_56); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_44); -lean::cnstr_set(x_64, 1, x_63); -lean::cnstr_set(x_5, 0, x_64); -return x_5; -} -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_65 = lean::cnstr_get(x_5, 0); -lean::inc(x_65); -lean::dec(x_5); -x_66 = lean::cnstr_get(x_65, 0); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_65, 1); -lean::inc(x_67); -if (lean::is_exclusive(x_65)) { - lean::cnstr_release(x_65, 0); - lean::cnstr_release(x_65, 1); - x_68 = x_65; -} else { - lean::dec_ref(x_65); - x_68 = lean::box(0); -} -lean::inc(x_66); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_66); -lean::cnstr_set(x_69, 1, x_1); -lean::inc(x_69); -x_70 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___boxed), 3, 1); -lean::closure_set(x_70, 0, x_69); -x_71 = lean::cnstr_get(x_67, 7); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_67, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_67, 1); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_67, 2); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_67, 3); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_67, 4); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_67, 5); -lean::inc(x_77); -x_78 = lean::cnstr_get(x_67, 6); -lean::inc(x_78); -x_79 = lean::cnstr_get(x_67, 8); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_67, 9); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_67, 10); -lean::inc(x_81); -if (lean::is_exclusive(x_67)) { - lean::cnstr_release(x_67, 0); - lean::cnstr_release(x_67, 1); - lean::cnstr_release(x_67, 2); - lean::cnstr_release(x_67, 3); - lean::cnstr_release(x_67, 4); - lean::cnstr_release(x_67, 5); - lean::cnstr_release(x_67, 6); - lean::cnstr_release(x_67, 7); - lean::cnstr_release(x_67, 8); - lean::cnstr_release(x_67, 9); - lean::cnstr_release(x_67, 10); - x_82 = x_67; -} else { - lean::dec_ref(x_67); - x_82 = lean::box(0); -} -x_83 = lean::cnstr_get(x_71, 0); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_71, 1); -lean::inc(x_84); -if (lean::is_exclusive(x_71)) { - lean::cnstr_release(x_71, 0); - lean::cnstr_release(x_71, 1); - x_85 = x_71; -} else { - lean::dec_ref(x_71); - x_85 = lean::box(0); -} -x_86 = l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(x_84, x_66, x_70); -if (lean::is_scalar(x_85)) { - x_87 = lean::alloc_cnstr(0, 2, 0); -} else { - x_87 = x_85; -} -lean::cnstr_set(x_87, 0, x_83); -lean::cnstr_set(x_87, 1, x_86); -if (lean::is_scalar(x_82)) { - x_88 = lean::alloc_cnstr(0, 11, 0); -} else { - x_88 = x_82; -} -lean::cnstr_set(x_88, 0, x_72); -lean::cnstr_set(x_88, 1, x_73); -lean::cnstr_set(x_88, 2, x_74); -lean::cnstr_set(x_88, 3, x_75); -lean::cnstr_set(x_88, 4, x_76); -lean::cnstr_set(x_88, 5, x_77); -lean::cnstr_set(x_88, 6, x_78); -lean::cnstr_set(x_88, 7, x_87); -lean::cnstr_set(x_88, 8, x_79); -lean::cnstr_set(x_88, 9, x_80); -lean::cnstr_set(x_88, 10, x_81); -if (lean::is_scalar(x_68)) { - x_89 = lean::alloc_cnstr(0, 2, 0); -} else { - x_89 = x_68; -} -lean::cnstr_set(x_89, 0, x_69); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_90, 0, x_89); -return x_90; -} -} -} -} -obj* l_Lean_Elaborator_registerNotationMacro___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_registerNotationMacro(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -uint8 l_List_foldr___main___at_Lean_Elaborator_notation_elaborate___spec__1(uint8 x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; uint8 x_5; obj* x_6; -x_3 = lean::cnstr_get(x_2, 0); -x_4 = lean::cnstr_get(x_2, 1); -x_5 = l_List_foldr___main___at_Lean_Elaborator_notation_elaborate___spec__1(x_1, x_4); -x_6 = lean::cnstr_get(x_3, 1); -if (lean::obj_tag(x_6) == 0) -{ -return x_5; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_6, 0); -switch (lean::obj_tag(x_7)) { -case 0: -{ -return x_5; -} -case 1: -{ -return x_5; -} -default: -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_7, 0); -x_9 = lean::cnstr_get(x_8, 1); -if (lean::obj_tag(x_9) == 0) -{ -return x_5; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_9, 0); -x_11 = lean::cnstr_get(x_10, 1); -if (lean::obj_tag(x_11) == 3) -{ -uint8 x_12; -x_12 = 1; -return x_12; -} -else -{ -return x_5; -} -} -} -} -} -} -} -} -obj* l_Lean_Elaborator_notation_elaborate___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 2); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_2, 2, x_5); -return x_2; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_6 = lean::cnstr_get(x_2, 0); -x_7 = lean::cnstr_get(x_2, 1); -x_8 = lean::cnstr_get(x_2, 2); -x_9 = lean::cnstr_get(x_2, 3); -x_10 = lean::cnstr_get(x_2, 4); -x_11 = lean::cnstr_get(x_2, 5); -x_12 = lean::cnstr_get(x_2, 6); -x_13 = lean::cnstr_get(x_2, 7); -x_14 = lean::cnstr_get(x_2, 8); -lean::inc(x_14); -lean::inc(x_13); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); -lean::dec(x_2); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_8); -x_16 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_7); -lean::cnstr_set(x_16, 2, x_15); -lean::cnstr_set(x_16, 3, x_9); -lean::cnstr_set(x_16, 4, x_10); -lean::cnstr_set(x_16, 5, x_11); -lean::cnstr_set(x_16, 6, x_12); -lean::cnstr_set(x_16, 7, x_13); -lean::cnstr_set(x_16, 8, x_14); -return x_16; -} -} -} -obj* _init_l_Lean_Elaborator_notation_elaborate___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_nat_obj(1u); -x_2 = lean::mk_nat_obj(0u); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_notation_elaborate___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("ignoring notation using 'fold' action"); -return x_1; -} -} -obj* l_Lean_Elaborator_notation_elaborate(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_9; uint8 x_10; uint8 x_11; -x_5 = l_Lean_Parser_command_notation_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 2); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = 0; -x_11 = l_List_foldr___main___at_Lean_Elaborator_notation_elaborate___spec__1(x_10, x_9); -lean::dec(x_9); -if (x_11 == 0) -{ -obj* x_12; -x_12 = l_Lean_Elaborator_notation_elaborateAux(x_7, x_2, x_3, x_4); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -lean::dec(x_3); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_12, 0); -lean::inc(x_16); -lean::dec(x_12); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_16, 1); -lean::inc(x_18); -lean::dec(x_16); -lean::inc(x_17); -x_19 = l_Lean_Elaborator_registerNotationMacro(x_17, x_2, x_3, x_18); -if (lean::obj_tag(x_19) == 0) -{ -uint8 x_20; -lean::dec(x_17); -lean::dec(x_3); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -return x_19; -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_19, 0); -lean::inc(x_21); -lean::dec(x_19); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_19, 0); -lean::inc(x_23); -lean::dec(x_19); -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -lean::dec(x_17); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; uint8 x_27; -x_25 = lean::cnstr_get(x_23, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -lean::dec(x_23); -x_27 = !lean::is_exclusive(x_25); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_25, 1); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_26); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_25, 1, x_29); -x_30 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_25); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_31 = lean::cnstr_get(x_25, 0); -x_32 = lean::cnstr_get(x_25, 1); -x_33 = lean::cnstr_get(x_25, 2); -x_34 = lean::cnstr_get(x_25, 3); -x_35 = lean::cnstr_get(x_25, 4); -x_36 = lean::cnstr_get(x_25, 5); -x_37 = lean::cnstr_get(x_25, 6); -x_38 = lean::cnstr_get(x_25, 7); -x_39 = lean::cnstr_get(x_25, 8); -x_40 = lean::cnstr_get(x_25, 9); -x_41 = lean::cnstr_get(x_25, 10); -lean::inc(x_41); -lean::inc(x_40); -lean::inc(x_39); -lean::inc(x_38); -lean::inc(x_37); -lean::inc(x_36); -lean::inc(x_35); -lean::inc(x_34); -lean::inc(x_33); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_25); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_26); -lean::cnstr_set(x_42, 1, x_32); -x_43 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_43, 0, x_31); -lean::cnstr_set(x_43, 1, x_42); -lean::cnstr_set(x_43, 2, x_33); -lean::cnstr_set(x_43, 3, x_34); -lean::cnstr_set(x_43, 4, x_35); -lean::cnstr_set(x_43, 5, x_36); -lean::cnstr_set(x_43, 6, x_37); -lean::cnstr_set(x_43, 7, x_38); -lean::cnstr_set(x_43, 8, x_39); -lean::cnstr_set(x_43, 9, x_40); -lean::cnstr_set(x_43, 10, x_41); -x_44 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_43); -return x_44; -} -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; -lean::dec(x_24); -x_45 = lean::cnstr_get(x_23, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_23, 1); -lean::inc(x_46); -lean::dec(x_23); -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_notation_elaborate___lambda__1), 2, 1); -lean::closure_set(x_47, 0, x_45); -x_48 = l_Lean_Elaborator_modifyCurrentScope(x_47, x_2, x_3, x_46); -if (lean::obj_tag(x_48) == 0) -{ -uint8 x_49; -lean::dec(x_3); -x_49 = !lean::is_exclusive(x_48); -if (x_49 == 0) -{ -return x_48; -} -else -{ -obj* x_50; obj* x_51; -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -lean::dec(x_48); -x_51 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_51, 0, x_50); -return x_51; -} -} -else -{ -obj* x_52; obj* x_53; obj* x_54; -x_52 = lean::cnstr_get(x_48, 0); -lean::inc(x_52); -lean::dec(x_48); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -x_54 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_53); -return x_54; -} -} -} -} -} -else -{ -obj* x_55; uint8 x_56; -lean::dec(x_7); -x_55 = lean::cnstr_get(x_3, 0); -lean::inc(x_55); -lean::dec(x_3); -x_56 = !lean::is_exclusive(x_4); -if (x_56 == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; uint8 x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_57 = lean::cnstr_get(x_4, 5); -x_58 = lean::cnstr_get(x_55, 0); -lean::inc(x_58); -lean::dec(x_55); -x_59 = lean::box(0); -x_60 = l_Lean_Elaborator_notation_elaborate___closed__1; -x_61 = 1; -x_62 = l_String_splitAux___main___closed__1; -x_63 = l_Lean_Elaborator_notation_elaborate___closed__2; -x_64 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_64, 0, x_58); -lean::cnstr_set(x_64, 1, x_60); -lean::cnstr_set(x_64, 2, x_59); -lean::cnstr_set(x_64, 3, x_62); -lean::cnstr_set(x_64, 4, x_63); -lean::cnstr_set_scalar(x_64, sizeof(void*)*5, x_61); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_57); -lean::cnstr_set(x_4, 5, x_65); -x_66 = lean::box(0); -x_67 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_4); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -return x_68; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; uint8 x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_69 = lean::cnstr_get(x_4, 0); -x_70 = lean::cnstr_get(x_4, 1); -x_71 = lean::cnstr_get(x_4, 2); -x_72 = lean::cnstr_get(x_4, 3); -x_73 = lean::cnstr_get(x_4, 4); -x_74 = lean::cnstr_get(x_4, 5); -x_75 = lean::cnstr_get(x_4, 6); -x_76 = lean::cnstr_get(x_4, 7); -x_77 = lean::cnstr_get(x_4, 8); -x_78 = lean::cnstr_get(x_4, 9); -x_79 = lean::cnstr_get(x_4, 10); -lean::inc(x_79); -lean::inc(x_78); -lean::inc(x_77); -lean::inc(x_76); -lean::inc(x_75); -lean::inc(x_74); -lean::inc(x_73); -lean::inc(x_72); -lean::inc(x_71); -lean::inc(x_70); -lean::inc(x_69); -lean::dec(x_4); -x_80 = lean::cnstr_get(x_55, 0); -lean::inc(x_80); -lean::dec(x_55); -x_81 = lean::box(0); -x_82 = l_Lean_Elaborator_notation_elaborate___closed__1; -x_83 = 1; -x_84 = l_String_splitAux___main___closed__1; -x_85 = l_Lean_Elaborator_notation_elaborate___closed__2; -x_86 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_86, 0, x_80); -lean::cnstr_set(x_86, 1, x_82); -lean::cnstr_set(x_86, 2, x_81); -lean::cnstr_set(x_86, 3, x_84); -lean::cnstr_set(x_86, 4, x_85); -lean::cnstr_set_scalar(x_86, sizeof(void*)*5, x_83); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_74); -x_88 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_88, 0, x_69); -lean::cnstr_set(x_88, 1, x_70); -lean::cnstr_set(x_88, 2, x_71); -lean::cnstr_set(x_88, 3, x_72); -lean::cnstr_set(x_88, 4, x_73); -lean::cnstr_set(x_88, 5, x_87); -lean::cnstr_set(x_88, 6, x_75); -lean::cnstr_set(x_88, 7, x_76); -lean::cnstr_set(x_88, 8, x_77); -lean::cnstr_set(x_88, 9, x_78); -lean::cnstr_set(x_88, 10, x_79); -x_89 = lean::box(0); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_88); -x_91 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_91, 0, x_90); -return x_91; -} -} -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_notation_elaborate___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; uint8 x_4; obj* x_5; -x_3 = lean::unbox(x_1); -lean::dec(x_1); -x_4 = l_List_foldr___main___at_Lean_Elaborator_notation_elaborate___spec__1(x_3, x_2); -lean::dec(x_2); -x_5 = lean::box(x_4); -return x_5; -} -} -obj* l_Lean_Elaborator_notation_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_notation_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_universe_elaborate___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_2, 3); -lean::inc(x_1); -x_5 = level_mk_param(x_1); -x_6 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -x_7 = l_Lean_Elaborator_OrderedRBMap_insert___rarg(x_6, x_4, x_1, x_5); -lean::cnstr_set(x_2, 3, x_7); -return x_2; -} -else -{ -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; -x_8 = lean::cnstr_get(x_2, 0); -x_9 = lean::cnstr_get(x_2, 1); -x_10 = lean::cnstr_get(x_2, 2); -x_11 = lean::cnstr_get(x_2, 3); -x_12 = lean::cnstr_get(x_2, 4); -x_13 = lean::cnstr_get(x_2, 5); -x_14 = lean::cnstr_get(x_2, 6); -x_15 = lean::cnstr_get(x_2, 7); -x_16 = lean::cnstr_get(x_2, 8); -lean::inc(x_16); -lean::inc(x_15); -lean::inc(x_14); -lean::inc(x_13); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_2); -lean::inc(x_1); -x_17 = level_mk_param(x_1); -x_18 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -x_19 = l_Lean_Elaborator_OrderedRBMap_insert___rarg(x_18, x_11, x_1, x_17); -x_20 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_20, 0, x_8); -lean::cnstr_set(x_20, 1, x_9); -lean::cnstr_set(x_20, 2, x_10); -lean::cnstr_set(x_20, 3, x_19); -lean::cnstr_set(x_20, 4, x_12); -lean::cnstr_set(x_20, 5, x_13); -lean::cnstr_set(x_20, 6, x_14); -lean::cnstr_set(x_20, 7, x_15); -lean::cnstr_set(x_20, 8, x_16); -return x_20; -} -} -} -obj* _init_l_Lean_Elaborator_universe_elaborate___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("a universe named '"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_universe_elaborate___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("' has already been declared in this Scope"); -return x_1; -} -} -obj* l_Lean_Elaborator_universe_elaborate(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_9; obj* x_10; -x_5 = l_Lean_Parser_command_universe_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -lean::inc(x_1); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Elaborator_mangleIdent(x_8); -x_10 = l_Lean_Elaborator_currentScope(x_2, x_3, x_4); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_9); -lean::dec(x_1); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -return x_10; -} -else -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -lean::dec(x_10); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_14, 1); -lean::inc(x_16); -lean::dec(x_14); -x_17 = lean::cnstr_get(x_15, 3); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_9); -x_19 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_18, x_17, x_9); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -lean::dec(x_1); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_universe_elaborate___lambda__1), 2, 1); -lean::closure_set(x_20, 0, x_9); -x_21 = l_Lean_Elaborator_modifyCurrentScope(x_20, x_2, x_3, x_16); -return x_21; -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_19); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_23 = lean::cnstr_get(x_19, 0); -lean::dec(x_23); -lean::cnstr_set(x_19, 0, x_1); -x_24 = l_Lean_Name_toString___closed__1; -x_25 = l_Lean_Name_toStringWithSep___main(x_24, x_9); -x_26 = l_Lean_Elaborator_universe_elaborate___closed__1; -x_27 = lean::string_append(x_26, x_25); -lean::dec(x_25); -x_28 = l_Lean_Elaborator_universe_elaborate___closed__2; -x_29 = lean::string_append(x_27, x_28); -x_30 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_19, x_29, x_2, x_3, x_16); -lean::dec(x_16); -lean::dec(x_19); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -lean::dec(x_19); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_1); -x_32 = l_Lean_Name_toString___closed__1; -x_33 = l_Lean_Name_toStringWithSep___main(x_32, x_9); -x_34 = l_Lean_Elaborator_universe_elaborate___closed__1; -x_35 = lean::string_append(x_34, x_33); -lean::dec(x_33); -x_36 = l_Lean_Elaborator_universe_elaborate___closed__2; -x_37 = lean::string_append(x_35, x_36); -x_38 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_31, x_37, x_2, x_3, x_16); -lean::dec(x_16); -lean::dec(x_31); -return x_38; -} -} -} -} -} -obj* l_Lean_Elaborator_universe_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_universe_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("unknown identifier '"); -return x_1; -} -} -obj* _init_l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("invalid 'attribute' command, identifier is ambiguous"); -return x_1; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 3); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_1); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_11 = lean::cnstr_get(x_1, 1); -x_12 = lean::cnstr_get(x_1, 0); -lean::dec(x_12); -lean::inc(x_8); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_8); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::cnstr_get(x_8, 2); -lean::inc(x_15); -lean::dec(x_8); -x_16 = l_Lean_Name_toString___closed__1; -x_17 = l_Lean_Name_toStringWithSep___main(x_16, x_15); -x_18 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__1; -x_19 = lean::string_append(x_18, x_17); -lean::dec(x_17); -x_20 = l_Char_HasRepr___closed__1; -x_21 = lean::string_append(x_19, x_20); -x_22 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_14, x_21, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_14); -if (lean::obj_tag(x_22) == 0) -{ -uint8 x_23; -lean::free_heap_obj(x_1); -lean::dec(x_11); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -return x_22; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_22, 0); -lean::inc(x_24); -lean::dec(x_22); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_26, 1); -lean::inc(x_28); -lean::dec(x_26); -x_29 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(x_11, x_2, x_3, x_28); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -lean::dec(x_27); -lean::free_heap_obj(x_1); -x_30 = !lean::is_exclusive(x_29); -if (x_30 == 0) -{ -return x_29; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -return x_32; -} -} -else -{ -uint8 x_33; -x_33 = !lean::is_exclusive(x_29); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::cnstr_get(x_29, 0); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; -x_36 = lean::cnstr_get(x_34, 0); -lean::cnstr_set(x_1, 1, x_36); -lean::cnstr_set(x_1, 0, x_27); -lean::cnstr_set(x_34, 0, x_1); -return x_29; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; -x_37 = lean::cnstr_get(x_34, 0); -x_38 = lean::cnstr_get(x_34, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_34); -lean::cnstr_set(x_1, 1, x_37); -lean::cnstr_set(x_1, 0, x_27); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_1); -lean::cnstr_set(x_39, 1, x_38); -lean::cnstr_set(x_29, 0, x_39); -return x_29; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_29, 0); -lean::inc(x_40); -lean::dec(x_29); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - x_43 = x_40; -} else { - lean::dec_ref(x_40); - x_43 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_41); -lean::cnstr_set(x_1, 0, x_27); -if (lean::is_scalar(x_43)) { - x_44 = lean::alloc_cnstr(0, 2, 0); -} else { - x_44 = x_43; -} -lean::cnstr_set(x_44, 0, x_1); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -} -} -else -{ -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; -x_46 = lean::cnstr_get(x_1, 1); -lean::inc(x_46); -lean::dec(x_1); -lean::inc(x_8); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_8); -x_48 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_48, 0, x_47); -x_49 = lean::cnstr_get(x_8, 2); -lean::inc(x_49); -lean::dec(x_8); -x_50 = l_Lean_Name_toString___closed__1; -x_51 = l_Lean_Name_toStringWithSep___main(x_50, x_49); -x_52 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__1; -x_53 = lean::string_append(x_52, x_51); -lean::dec(x_51); -x_54 = l_Char_HasRepr___closed__1; -x_55 = lean::string_append(x_53, x_54); -x_56 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_48, x_55, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_48); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_46); -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - x_58 = x_56; -} else { - lean::dec_ref(x_56); - x_58 = lean::box(0); -} -if (lean::is_scalar(x_58)) { - x_59 = lean::alloc_cnstr(0, 1, 0); -} else { - x_59 = x_58; -} -lean::cnstr_set(x_59, 0, x_57); -return x_59; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_60 = lean::cnstr_get(x_56, 0); -lean::inc(x_60); -lean::dec(x_56); -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_60, 1); -lean::inc(x_62); -lean::dec(x_60); -x_63 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(x_46, x_2, x_3, x_62); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; obj* x_65; obj* x_66; -lean::dec(x_61); -x_64 = lean::cnstr_get(x_63, 0); -lean::inc(x_64); -if (lean::is_exclusive(x_63)) { - lean::cnstr_release(x_63, 0); - x_65 = x_63; -} else { - lean::dec_ref(x_63); - x_65 = lean::box(0); -} -if (lean::is_scalar(x_65)) { - x_66 = lean::alloc_cnstr(0, 1, 0); -} else { - x_66 = x_65; -} -lean::cnstr_set(x_66, 0, x_64); -return x_66; -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_67 = lean::cnstr_get(x_63, 0); -lean::inc(x_67); -if (lean::is_exclusive(x_63)) { - lean::cnstr_release(x_63, 0); - x_68 = x_63; -} else { - lean::dec_ref(x_63); - x_68 = lean::box(0); -} -x_69 = lean::cnstr_get(x_67, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_67, 1); -lean::inc(x_70); -if (lean::is_exclusive(x_67)) { - lean::cnstr_release(x_67, 0); - lean::cnstr_release(x_67, 1); - x_71 = x_67; -} else { - lean::dec_ref(x_67); - x_71 = lean::box(0); -} -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_61); -lean::cnstr_set(x_72, 1, x_69); -if (lean::is_scalar(x_71)) { - x_73 = lean::alloc_cnstr(0, 2, 0); -} else { - x_73 = x_71; -} -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_70); -if (lean::is_scalar(x_68)) { - x_74 = lean::alloc_cnstr(1, 1, 0); -} else { - x_74 = x_68; -} -lean::cnstr_set(x_74, 0, x_73); -return x_74; -} -} -} -} -else -{ -obj* x_75; -x_75 = lean::cnstr_get(x_9, 1); -lean::inc(x_75); -if (lean::obj_tag(x_75) == 0) -{ -obj* x_76; uint8 x_77; -lean::dec(x_8); -x_76 = lean::cnstr_get(x_1, 1); -lean::inc(x_76); -lean::dec(x_1); -x_77 = !lean::is_exclusive(x_9); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_78 = lean::cnstr_get(x_9, 0); -x_79 = lean::cnstr_get(x_9, 1); -lean::dec(x_79); -x_80 = lean::box(0); -x_81 = lean_expr_mk_const(x_78, x_80); -x_82 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(x_76, x_2, x_3, x_4); -if (lean::obj_tag(x_82) == 0) -{ -uint8 x_83; -lean::dec(x_81); -lean::free_heap_obj(x_9); -x_83 = !lean::is_exclusive(x_82); -if (x_83 == 0) -{ -return x_82; -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_82, 0); -lean::inc(x_84); -lean::dec(x_82); -x_85 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -return x_85; -} -} -else -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_82); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_82, 0); -x_88 = !lean::is_exclusive(x_87); -if (x_88 == 0) -{ -obj* x_89; -x_89 = lean::cnstr_get(x_87, 0); -lean::cnstr_set(x_9, 1, x_89); -lean::cnstr_set(x_9, 0, x_81); -lean::cnstr_set(x_87, 0, x_9); -return x_82; -} -else -{ -obj* x_90; obj* x_91; obj* x_92; -x_90 = lean::cnstr_get(x_87, 0); -x_91 = lean::cnstr_get(x_87, 1); -lean::inc(x_91); -lean::inc(x_90); -lean::dec(x_87); -lean::cnstr_set(x_9, 1, x_90); -lean::cnstr_set(x_9, 0, x_81); -x_92 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_92, 0, x_9); -lean::cnstr_set(x_92, 1, x_91); -lean::cnstr_set(x_82, 0, x_92); -return x_82; -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_93 = lean::cnstr_get(x_82, 0); -lean::inc(x_93); -lean::dec(x_82); -x_94 = lean::cnstr_get(x_93, 0); -lean::inc(x_94); -x_95 = lean::cnstr_get(x_93, 1); -lean::inc(x_95); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - lean::cnstr_release(x_93, 1); - x_96 = x_93; -} else { - lean::dec_ref(x_93); - x_96 = lean::box(0); -} -lean::cnstr_set(x_9, 1, x_94); -lean::cnstr_set(x_9, 0, x_81); -if (lean::is_scalar(x_96)) { - x_97 = lean::alloc_cnstr(0, 2, 0); -} else { - x_97 = x_96; -} -lean::cnstr_set(x_97, 0, x_9); -lean::cnstr_set(x_97, 1, x_95); -x_98 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -return x_98; -} -} -} -else -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_99 = lean::cnstr_get(x_9, 0); -lean::inc(x_99); -lean::dec(x_9); -x_100 = lean::box(0); -x_101 = lean_expr_mk_const(x_99, x_100); -x_102 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(x_76, x_2, x_3, x_4); -if (lean::obj_tag(x_102) == 0) -{ -obj* x_103; obj* x_104; obj* x_105; -lean::dec(x_101); -x_103 = lean::cnstr_get(x_102, 0); -lean::inc(x_103); -if (lean::is_exclusive(x_102)) { - lean::cnstr_release(x_102, 0); - x_104 = x_102; -} else { - lean::dec_ref(x_102); - x_104 = lean::box(0); -} -if (lean::is_scalar(x_104)) { - x_105 = lean::alloc_cnstr(0, 1, 0); -} else { - x_105 = x_104; -} -lean::cnstr_set(x_105, 0, x_103); -return x_105; -} -else -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_106 = lean::cnstr_get(x_102, 0); -lean::inc(x_106); -if (lean::is_exclusive(x_102)) { - lean::cnstr_release(x_102, 0); - x_107 = x_102; -} else { - lean::dec_ref(x_102); - x_107 = lean::box(0); -} -x_108 = lean::cnstr_get(x_106, 0); -lean::inc(x_108); -x_109 = lean::cnstr_get(x_106, 1); -lean::inc(x_109); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - x_110 = x_106; -} else { - lean::dec_ref(x_106); - x_110 = lean::box(0); -} -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_101); -lean::cnstr_set(x_111, 1, x_108); -if (lean::is_scalar(x_110)) { - x_112 = lean::alloc_cnstr(0, 2, 0); -} else { - x_112 = x_110; -} -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_109); -if (lean::is_scalar(x_107)) { - x_113 = lean::alloc_cnstr(1, 1, 0); -} else { - x_113 = x_107; -} -lean::cnstr_set(x_113, 0, x_112); -return x_113; -} -} -} -else -{ -uint8 x_114; -lean::dec(x_9); -x_114 = !lean::is_exclusive(x_75); -if (x_114 == 0) -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_115 = lean::cnstr_get(x_75, 1); -lean::dec(x_115); -x_116 = lean::cnstr_get(x_75, 0); -lean::dec(x_116); -x_117 = lean::cnstr_get(x_1, 1); -lean::inc(x_117); -lean::dec(x_1); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_8); -x_119 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_119, 0, x_118); -x_120 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__2; -x_121 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_119, x_120, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_119); -if (lean::obj_tag(x_121) == 0) -{ -uint8 x_122; -lean::dec(x_117); -lean::free_heap_obj(x_75); -x_122 = !lean::is_exclusive(x_121); -if (x_122 == 0) -{ -return x_121; -} -else -{ -obj* x_123; obj* x_124; -x_123 = lean::cnstr_get(x_121, 0); -lean::inc(x_123); -lean::dec(x_121); -x_124 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_124, 0, x_123); -return x_124; -} -} -else -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; -x_125 = lean::cnstr_get(x_121, 0); -lean::inc(x_125); -lean::dec(x_121); -x_126 = lean::cnstr_get(x_125, 0); -lean::inc(x_126); -x_127 = lean::cnstr_get(x_125, 1); -lean::inc(x_127); -lean::dec(x_125); -x_128 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(x_117, x_2, x_3, x_127); -if (lean::obj_tag(x_128) == 0) -{ -uint8 x_129; -lean::dec(x_126); -lean::free_heap_obj(x_75); -x_129 = !lean::is_exclusive(x_128); -if (x_129 == 0) -{ -return x_128; -} -else -{ -obj* x_130; obj* x_131; -x_130 = lean::cnstr_get(x_128, 0); -lean::inc(x_130); -lean::dec(x_128); -x_131 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_131, 0, x_130); -return x_131; -} -} -else -{ -uint8 x_132; -x_132 = !lean::is_exclusive(x_128); -if (x_132 == 0) -{ -obj* x_133; uint8 x_134; -x_133 = lean::cnstr_get(x_128, 0); -x_134 = !lean::is_exclusive(x_133); -if (x_134 == 0) -{ -obj* x_135; -x_135 = lean::cnstr_get(x_133, 0); -lean::cnstr_set(x_75, 1, x_135); -lean::cnstr_set(x_75, 0, x_126); -lean::cnstr_set(x_133, 0, x_75); -return x_128; -} -else -{ -obj* x_136; obj* x_137; obj* x_138; -x_136 = lean::cnstr_get(x_133, 0); -x_137 = lean::cnstr_get(x_133, 1); -lean::inc(x_137); -lean::inc(x_136); -lean::dec(x_133); -lean::cnstr_set(x_75, 1, x_136); -lean::cnstr_set(x_75, 0, x_126); -x_138 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_138, 0, x_75); -lean::cnstr_set(x_138, 1, x_137); -lean::cnstr_set(x_128, 0, x_138); -return x_128; -} -} -else -{ -obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; -x_139 = lean::cnstr_get(x_128, 0); -lean::inc(x_139); -lean::dec(x_128); -x_140 = lean::cnstr_get(x_139, 0); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_139, 1); -lean::inc(x_141); -if (lean::is_exclusive(x_139)) { - lean::cnstr_release(x_139, 0); - lean::cnstr_release(x_139, 1); - x_142 = x_139; -} else { - lean::dec_ref(x_139); - x_142 = lean::box(0); -} -lean::cnstr_set(x_75, 1, x_140); -lean::cnstr_set(x_75, 0, x_126); -if (lean::is_scalar(x_142)) { - x_143 = lean::alloc_cnstr(0, 2, 0); -} else { - x_143 = x_142; -} -lean::cnstr_set(x_143, 0, x_75); -lean::cnstr_set(x_143, 1, x_141); -x_144 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_144, 0, x_143); -return x_144; -} -} -} -} -else -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; -lean::dec(x_75); -x_145 = lean::cnstr_get(x_1, 1); -lean::inc(x_145); -lean::dec(x_1); -x_146 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_146, 0, x_8); -x_147 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_147, 0, x_146); -x_148 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__2; -x_149 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_147, x_148, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_147); -if (lean::obj_tag(x_149) == 0) -{ -obj* x_150; obj* x_151; obj* x_152; -lean::dec(x_145); -x_150 = lean::cnstr_get(x_149, 0); -lean::inc(x_150); -if (lean::is_exclusive(x_149)) { - lean::cnstr_release(x_149, 0); - x_151 = x_149; -} else { - lean::dec_ref(x_149); - x_151 = lean::box(0); -} -if (lean::is_scalar(x_151)) { - x_152 = lean::alloc_cnstr(0, 1, 0); -} else { - x_152 = x_151; -} -lean::cnstr_set(x_152, 0, x_150); -return x_152; -} -else -{ -obj* x_153; obj* x_154; obj* x_155; obj* x_156; -x_153 = lean::cnstr_get(x_149, 0); -lean::inc(x_153); -lean::dec(x_149); -x_154 = lean::cnstr_get(x_153, 0); -lean::inc(x_154); -x_155 = lean::cnstr_get(x_153, 1); -lean::inc(x_155); -lean::dec(x_153); -x_156 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(x_145, x_2, x_3, x_155); -if (lean::obj_tag(x_156) == 0) -{ -obj* x_157; obj* x_158; obj* x_159; -lean::dec(x_154); -x_157 = lean::cnstr_get(x_156, 0); -lean::inc(x_157); -if (lean::is_exclusive(x_156)) { - lean::cnstr_release(x_156, 0); - x_158 = x_156; -} else { - lean::dec_ref(x_156); - x_158 = lean::box(0); -} -if (lean::is_scalar(x_158)) { - x_159 = lean::alloc_cnstr(0, 1, 0); -} else { - x_159 = x_158; -} -lean::cnstr_set(x_159, 0, x_157); -return x_159; -} -else -{ -obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; -x_160 = lean::cnstr_get(x_156, 0); -lean::inc(x_160); -if (lean::is_exclusive(x_156)) { - lean::cnstr_release(x_156, 0); - x_161 = x_156; -} else { - lean::dec_ref(x_156); - x_161 = lean::box(0); -} -x_162 = lean::cnstr_get(x_160, 0); -lean::inc(x_162); -x_163 = lean::cnstr_get(x_160, 1); -lean::inc(x_163); -if (lean::is_exclusive(x_160)) { - lean::cnstr_release(x_160, 0); - lean::cnstr_release(x_160, 1); - x_164 = x_160; -} else { - lean::dec_ref(x_160); - x_164 = lean::box(0); -} -x_165 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_165, 0, x_154); -lean::cnstr_set(x_165, 1, x_162); -if (lean::is_scalar(x_164)) { - x_166 = lean::alloc_cnstr(0, 2, 0); -} else { - x_166 = x_164; -} -lean::cnstr_set(x_166, 0, x_165); -lean::cnstr_set(x_166, 1, x_163); -if (lean::is_scalar(x_161)) { - x_167 = lean::alloc_cnstr(1, 1, 0); -} else { - x_167 = x_161; -} -lean::cnstr_set(x_167, 0, x_166); -return x_167; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Elaborator_attribute_elaborate___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("command"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("attribute"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -return x_7; -} -} -obj* _init_l_Lean_Elaborator_attribute_elaborate___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("local"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_attribute_elaborate(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_9; obj* x_10; uint8 x_11; -x_5 = l_Lean_Parser_command_attribute_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -lean::inc(x_1); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_7, 3); -lean::inc(x_9); -x_10 = l_Lean_Elaborator_attrsToPexpr(x_9, x_2, x_3, x_4); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_35; -x_35 = 0; -x_11 = x_35; -goto block_34; -} -else -{ -uint8 x_36; -lean::dec(x_8); -x_36 = 1; -x_11 = x_36; -goto block_34; -} -block_34: -{ -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_12; -lean::dec(x_7); -lean::dec(x_1); -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -return x_10; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_10, 0); -lean::inc(x_13); -lean::dec(x_10); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_10, 0); -lean::inc(x_15); -lean::dec(x_10); -x_16 = l_Lean_Elaborator_attribute_elaborate___closed__1; -x_17 = l_Lean_Elaborator_attribute_elaborate___closed__2; -x_18 = l_Lean_KVMap_setBool(x_16, x_17, x_11); -x_19 = lean::cnstr_get(x_15, 0); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_15, 1); -lean::inc(x_20); -lean::dec(x_15); -x_21 = lean::cnstr_get(x_7, 5); -lean::inc(x_21); -lean::dec(x_7); -x_22 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(x_21, x_2, x_3, x_20); -if (lean::obj_tag(x_22) == 0) -{ -uint8 x_23; -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_1); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -return x_22; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_22, 0); -lean::inc(x_24); -lean::dec(x_22); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_26, 1); -lean::inc(x_28); -lean::dec(x_26); -x_29 = l_Lean_Elaborator_mkEqns___closed__1; -x_30 = l_Lean_Expr_mkCapp(x_29, x_27); -x_31 = lean_expr_mk_app(x_19, x_30); -x_32 = lean_expr_mk_mdata(x_18, x_31); -x_33 = l_Lean_Elaborator_oldElabCommand(x_1, x_32, x_2, x_3, x_28); -lean::dec(x_1); -return x_33; -} -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_attribute_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_attribute_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_check_elaborate___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("command"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("#check"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -return x_7; -} -} -obj* l_Lean_Elaborator_check_elaborate(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_9; -x_5 = l_Lean_Parser_command_check_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -lean::inc(x_1); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Elaborator_toPexpr___main(x_8, x_2, x_3, x_4); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -lean::dec(x_1); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -return x_9; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -return x_12; -} -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -lean::dec(x_13); -x_16 = l_Lean_Elaborator_check_elaborate___closed__1; -x_17 = lean_expr_mk_mdata(x_16, x_14); -x_18 = l_Lean_Elaborator_oldElabCommand(x_1, x_17, x_2, x_3, x_15); -lean::dec(x_1); -return x_18; -} -} -} -obj* l_Lean_Elaborator_check_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_check_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_open_elaborate___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_2, 7); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_List_append___rarg(x_4, x_5); -lean::cnstr_set(x_2, 7, x_6); -return x_2; -} -else -{ -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; -x_7 = lean::cnstr_get(x_2, 0); -x_8 = lean::cnstr_get(x_2, 1); -x_9 = lean::cnstr_get(x_2, 2); -x_10 = lean::cnstr_get(x_2, 3); -x_11 = lean::cnstr_get(x_2, 4); -x_12 = lean::cnstr_get(x_2, 5); -x_13 = lean::cnstr_get(x_2, 6); -x_14 = lean::cnstr_get(x_2, 7); -x_15 = lean::cnstr_get(x_2, 8); -lean::inc(x_15); -lean::inc(x_14); -lean::inc(x_13); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -lean::dec(x_2); -x_16 = lean::cnstr_get(x_1, 1); -lean::inc(x_16); -lean::dec(x_1); -x_17 = l_List_append___rarg(x_14, x_16); -x_18 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_8); -lean::cnstr_set(x_18, 2, x_9); -lean::cnstr_set(x_18, 3, x_10); -lean::cnstr_set(x_18, 4, x_11); -lean::cnstr_set(x_18, 5, x_12); -lean::cnstr_set(x_18, 6, x_13); -lean::cnstr_set(x_18, 7, x_17); -lean::cnstr_set(x_18, 8, x_15); -return x_18; -} -} -} -obj* l_Lean_Elaborator_open_elaborate(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_9; -x_5 = l_Lean_Parser_command_open_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_open_elaborate___lambda__1), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = l_Lean_Elaborator_modifyCurrentScope(x_8, x_2, x_3, x_4); -return x_9; -} -} -obj* l_Lean_Elaborator_open_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_open_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Elaborator_export_elaborate___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_1); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_List_map___main___at_Lean_Elaborator_export_elaborate___spec__1(x_1, x_6); -lean::cnstr_set(x_2, 1, x_8); -lean::cnstr_set(x_2, 0, x_7); -return x_2; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_2, 0); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_2); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_List_map___main___at_Lean_Elaborator_export_elaborate___spec__1(x_1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -} -} -obj* l_Lean_Elaborator_export_elaborate(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; -x_5 = l_Lean_Parser_command_export_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_1); -x_8 = l_Lean_Elaborator_getNamespace(x_2, x_3, x_4); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -lean::dec(x_7); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -return x_8; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_8); -if (x_12 == 0) -{ -obj* x_13; uint8 x_14; -x_13 = lean::cnstr_get(x_8, 0); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -obj* x_15; uint8 x_16; -x_15 = lean::cnstr_get(x_13, 1); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = lean::cnstr_get(x_13, 0); -x_18 = lean::cnstr_get(x_15, 3); -x_19 = lean::cnstr_get(x_7, 1); -lean::inc(x_19); -lean::dec(x_7); -x_20 = l_List_map___main___at_Lean_Elaborator_export_elaborate___spec__1(x_17, x_19); -x_21 = l_List_append___rarg(x_18, x_20); -lean::cnstr_set(x_15, 3, x_21); -x_22 = lean::box(0); -lean::cnstr_set(x_13, 0, x_22); -return x_8; -} -else -{ -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_36; obj* x_37; obj* x_38; obj* x_39; -x_23 = lean::cnstr_get(x_13, 0); -x_24 = lean::cnstr_get(x_15, 0); -x_25 = lean::cnstr_get(x_15, 1); -x_26 = lean::cnstr_get(x_15, 2); -x_27 = lean::cnstr_get(x_15, 3); -x_28 = lean::cnstr_get(x_15, 4); -x_29 = lean::cnstr_get(x_15, 5); -x_30 = lean::cnstr_get(x_15, 6); -x_31 = lean::cnstr_get(x_15, 7); -x_32 = lean::cnstr_get(x_15, 8); -x_33 = lean::cnstr_get(x_15, 9); -x_34 = lean::cnstr_get(x_15, 10); -lean::inc(x_34); -lean::inc(x_33); -lean::inc(x_32); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::inc(x_28); -lean::inc(x_27); -lean::inc(x_26); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_15); -x_35 = lean::cnstr_get(x_7, 1); -lean::inc(x_35); -lean::dec(x_7); -x_36 = l_List_map___main___at_Lean_Elaborator_export_elaborate___spec__1(x_23, x_35); -x_37 = l_List_append___rarg(x_27, x_36); -x_38 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_38, 0, x_24); -lean::cnstr_set(x_38, 1, x_25); -lean::cnstr_set(x_38, 2, x_26); -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 4, x_28); -lean::cnstr_set(x_38, 5, x_29); -lean::cnstr_set(x_38, 6, x_30); -lean::cnstr_set(x_38, 7, x_31); -lean::cnstr_set(x_38, 8, x_32); -lean::cnstr_set(x_38, 9, x_33); -lean::cnstr_set(x_38, 10, x_34); -x_39 = lean::box(0); -lean::cnstr_set(x_13, 1, x_38); -lean::cnstr_set(x_13, 0, x_39); -return x_8; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_40 = lean::cnstr_get(x_13, 1); -x_41 = lean::cnstr_get(x_13, 0); -lean::inc(x_40); -lean::inc(x_41); -lean::dec(x_13); -x_42 = lean::cnstr_get(x_40, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_40, 1); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_40, 2); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_40, 3); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_40, 4); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_40, 5); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_40, 6); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_40, 7); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_40, 8); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_40, 9); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_40, 10); -lean::inc(x_52); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - lean::cnstr_release(x_40, 2); - lean::cnstr_release(x_40, 3); - lean::cnstr_release(x_40, 4); - lean::cnstr_release(x_40, 5); - lean::cnstr_release(x_40, 6); - lean::cnstr_release(x_40, 7); - lean::cnstr_release(x_40, 8); - lean::cnstr_release(x_40, 9); - lean::cnstr_release(x_40, 10); - x_53 = x_40; -} else { - lean::dec_ref(x_40); - x_53 = lean::box(0); -} -x_54 = lean::cnstr_get(x_7, 1); -lean::inc(x_54); -lean::dec(x_7); -x_55 = l_List_map___main___at_Lean_Elaborator_export_elaborate___spec__1(x_41, x_54); -x_56 = l_List_append___rarg(x_45, x_55); -if (lean::is_scalar(x_53)) { - x_57 = lean::alloc_cnstr(0, 11, 0); -} else { - x_57 = x_53; -} -lean::cnstr_set(x_57, 0, x_42); -lean::cnstr_set(x_57, 1, x_43); -lean::cnstr_set(x_57, 2, x_44); -lean::cnstr_set(x_57, 3, x_56); -lean::cnstr_set(x_57, 4, x_46); -lean::cnstr_set(x_57, 5, x_47); -lean::cnstr_set(x_57, 6, x_48); -lean::cnstr_set(x_57, 7, x_49); -lean::cnstr_set(x_57, 8, x_50); -lean::cnstr_set(x_57, 9, x_51); -lean::cnstr_set(x_57, 10, x_52); -x_58 = lean::box(0); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_57); -lean::cnstr_set(x_8, 0, x_59); -return x_8; -} -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_60 = lean::cnstr_get(x_8, 0); -lean::inc(x_60); -lean::dec(x_8); -x_61 = lean::cnstr_get(x_60, 1); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_60, 0); -lean::inc(x_62); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - lean::cnstr_release(x_60, 1); - x_63 = x_60; -} else { - lean::dec_ref(x_60); - x_63 = lean::box(0); -} -x_64 = lean::cnstr_get(x_61, 0); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_61, 1); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_61, 2); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_61, 3); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_61, 4); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_61, 5); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_61, 6); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_61, 7); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_61, 8); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_61, 9); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_61, 10); -lean::inc(x_74); -if (lean::is_exclusive(x_61)) { - lean::cnstr_release(x_61, 0); - lean::cnstr_release(x_61, 1); - lean::cnstr_release(x_61, 2); - lean::cnstr_release(x_61, 3); - lean::cnstr_release(x_61, 4); - lean::cnstr_release(x_61, 5); - lean::cnstr_release(x_61, 6); - lean::cnstr_release(x_61, 7); - lean::cnstr_release(x_61, 8); - lean::cnstr_release(x_61, 9); - lean::cnstr_release(x_61, 10); - x_75 = x_61; -} else { - lean::dec_ref(x_61); - x_75 = lean::box(0); -} -x_76 = lean::cnstr_get(x_7, 1); -lean::inc(x_76); -lean::dec(x_7); -x_77 = l_List_map___main___at_Lean_Elaborator_export_elaborate___spec__1(x_62, x_76); -x_78 = l_List_append___rarg(x_67, x_77); -if (lean::is_scalar(x_75)) { - x_79 = lean::alloc_cnstr(0, 11, 0); -} else { - x_79 = x_75; -} -lean::cnstr_set(x_79, 0, x_64); -lean::cnstr_set(x_79, 1, x_65); -lean::cnstr_set(x_79, 2, x_66); -lean::cnstr_set(x_79, 3, x_78); -lean::cnstr_set(x_79, 4, x_68); -lean::cnstr_set(x_79, 5, x_69); -lean::cnstr_set(x_79, 6, x_70); -lean::cnstr_set(x_79, 7, x_71); -lean::cnstr_set(x_79, 8, x_72); -lean::cnstr_set(x_79, 9, x_73); -lean::cnstr_set(x_79, 10, x_74); -x_80 = lean::box(0); -if (lean::is_scalar(x_63)) { - x_81 = lean::alloc_cnstr(0, 2, 0); -} else { - x_81 = x_63; -} -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_79); -x_82 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} -} -} -} -obj* l_Lean_Elaborator_export_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_export_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_initQuot_elaborate___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("command"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("initQuot"); -x_5 = lean_name_mk_string(x_1, x_4); -x_6 = lean::box(0); -x_7 = l_Lean_KVMap_setName(x_6, x_3, x_5); -x_8 = l_Lean_Elaborator_dummy; -x_9 = lean_expr_mk_mdata(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Elaborator_initQuot_elaborate(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Elaborator_initQuot_elaborate___closed__1; -x_6 = l_Lean_Elaborator_oldElabCommand(x_1, x_5, x_2, x_3, x_4); -return x_6; -} -} -obj* l_Lean_Elaborator_initQuot_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_initQuot_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Elaborator_setOption_elaborate___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; -x_4 = lean::cnstr_get(x_2, 8); -lean::dec(x_4); -lean::cnstr_set(x_2, 8, x_1); -return x_2; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = lean::cnstr_get(x_2, 2); -x_8 = lean::cnstr_get(x_2, 3); -x_9 = lean::cnstr_get(x_2, 4); -x_10 = lean::cnstr_get(x_2, 5); -x_11 = lean::cnstr_get(x_2, 6); -x_12 = lean::cnstr_get(x_2, 7); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -lean::dec(x_2); -x_13 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_13, 0, x_5); -lean::cnstr_set(x_13, 1, x_6); -lean::cnstr_set(x_13, 2, x_7); -lean::cnstr_set(x_13, 3, x_8); -lean::cnstr_set(x_13, 4, x_9); -lean::cnstr_set(x_13, 5, x_10); -lean::cnstr_set(x_13, 6, x_11); -lean::cnstr_set(x_13, 7, x_12); -lean::cnstr_set(x_13, 8, x_1); -return x_13; -} -} -} -obj* l_Lean_Elaborator_setOption_elaborate(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_9; obj* x_10; -x_5 = l_Lean_Parser_command_setOption_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 2); -lean::inc(x_9); -lean::dec(x_8); -x_10 = l_Lean_Elaborator_currentScope(x_2, x_3, x_4); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_9); -lean::dec(x_7); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -return x_10; -} -else -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -lean::dec(x_10); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::cnstr_get(x_7, 2); -lean::inc(x_15); -lean::dec(x_7); -switch (lean::obj_tag(x_15)) { -case 0: -{ -obj* x_16; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -lean::dec(x_15); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; uint8 x_20; obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_16); -x_17 = lean::cnstr_get(x_14, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_14, 1); -lean::inc(x_18); -lean::dec(x_14); -x_19 = lean::cnstr_get(x_17, 8); -lean::inc(x_19); -lean::dec(x_17); -x_20 = 1; -x_21 = l_Lean_KVMap_setBool(x_19, x_9, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_setOption_elaborate___lambda__1), 2, 1); -lean::closure_set(x_22, 0, x_21); -x_23 = l_Lean_Elaborator_modifyCurrentScope(x_22, x_2, x_3, x_18); -return x_23; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; uint8 x_27; obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_16); -x_24 = lean::cnstr_get(x_14, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_14, 1); -lean::inc(x_25); -lean::dec(x_14); -x_26 = lean::cnstr_get(x_24, 8); -lean::inc(x_26); -lean::dec(x_24); -x_27 = 0; -x_28 = l_Lean_KVMap_setBool(x_26, x_9, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_setOption_elaborate___lambda__1), 2, 1); -lean::closure_set(x_29, 0, x_28); -x_30 = l_Lean_Elaborator_modifyCurrentScope(x_29, x_2, x_3, x_25); -return x_30; -} -} -case 1: -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_14, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_14, 1); -lean::inc(x_32); -lean::dec(x_14); -x_33 = lean::cnstr_get(x_31, 8); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_15, 0); -lean::inc(x_34); -lean::dec(x_15); -x_35 = l_Lean_Parser_stringLit_View_value(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; -lean::dec(x_9); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_setOption_elaborate___lambda__1), 2, 1); -lean::closure_set(x_36, 0, x_33); -x_37 = l_Lean_Elaborator_modifyCurrentScope(x_36, x_2, x_3, x_32); -return x_37; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = lean::cnstr_get(x_35, 0); -lean::inc(x_38); -lean::dec(x_35); -x_39 = l_Lean_KVMap_setString(x_33, x_9, x_38); -x_40 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_setOption_elaborate___lambda__1), 2, 1); -lean::closure_set(x_40, 0, x_39); -x_41 = l_Lean_Elaborator_modifyCurrentScope(x_40, x_2, x_3, x_32); -return x_41; -} -} -default: -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_42 = lean::cnstr_get(x_14, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_14, 1); -lean::inc(x_43); -lean::dec(x_14); -x_44 = lean::cnstr_get(x_42, 8); -lean::inc(x_44); -lean::dec(x_42); -x_45 = lean::cnstr_get(x_15, 0); -lean::inc(x_45); -lean::dec(x_15); -x_46 = l_Lean_Parser_number_View_toNat___main(x_45); -x_47 = l_Lean_KVMap_setNat(x_44, x_9, x_46); -x_48 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_setOption_elaborate___lambda__1), 2, 1); -lean::closure_set(x_48, 0, x_47); -x_49 = l_Lean_Elaborator_modifyCurrentScope(x_48, x_2, x_3, x_43); -return x_49; -} -} -} -} -} -obj* l_Lean_Elaborator_setOption_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_setOption_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_mfor___main___at_Lean_Elaborator_noKind_elaborate___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::dec(x_1); -lean::inc(x_2); -lean::inc(x_3); -x_10 = lean::apply_3(x_2, x_8, x_3, x_4); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_9); -lean::dec(x_3); -lean::dec(x_2); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -return x_10; -} -else -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -lean::dec(x_10); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_1 = x_9; -x_4 = x_15; -goto _start; -} -} -} -} -obj* _init_l_Lean_Elaborator_noKind_elaborate___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("noKind.elaborate: unreachable"); -return x_1; -} -} -obj* l_Lean_Elaborator_noKind_elaborate(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -lean::inc(x_1); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_1); -x_7 = l_Lean_Elaborator_noKind_elaborate___closed__1; -x_8 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_6, x_7, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_6); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_1); -x_9 = lean::cnstr_get(x_5, 0); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_List_mfor___main___at_Lean_Elaborator_noKind_elaborate___spec__1(x_10, x_2, x_3, x_4); -return x_11; -} -} -} -obj* _init_l_Lean_Elaborator_end_elaborate___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("invalid 'end', there is no open Scope to end"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_end_elaborate___closed__2() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("."); -x_3 = lean::box(0); -x_4 = l_Lean_Name_toStringWithSep___main(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_Substring_ofString(x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_3); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = l_Lean_Elaborator_mangleIdent(x_7); -return x_8; -} -} -obj* _init_l_Lean_Elaborator_end_elaborate___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("invalid end of "); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_end_elaborate___closed__4() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(", expected Name '"); -return x_1; -} -} -obj* l_Lean_Elaborator_end_elaborate(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::cnstr_get(x_4, 4); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_1); -x_7 = l_Lean_Elaborator_end_elaborate___closed__1; -x_8 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_6, x_7, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_6); -return x_8; -} -else -{ -obj* x_9; -x_9 = lean::cnstr_get(x_5, 1); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_5); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_1); -x_11 = l_Lean_Elaborator_end_elaborate___closed__1; -x_12 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_10, x_11, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_13 = lean::cnstr_get(x_4, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_4, 1); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_4, 2); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_4, 3); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_4, 5); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_4, 6); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_4, 7); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_4, 8); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_4, 9); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_4, 10); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_5, 0); -lean::inc(x_23); -lean::dec(x_5); -x_24 = l_Lean_Parser_command_end_HasView; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -lean::inc(x_1); -x_26 = lean::apply_1(x_25, x_1); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_23, 1); -lean::inc(x_28); -x_29 = l_Lean_Elaborator_end_elaborate___closed__2; -x_30 = lean_name_dec_eq(x_29, x_28); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; uint8 x_43; -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_1); -x_32 = lean::cnstr_get(x_23, 0); -lean::inc(x_32); -lean::dec(x_23); -x_33 = l_Lean_Elaborator_end_elaborate___closed__3; -x_34 = lean::string_append(x_33, x_32); -lean::dec(x_32); -x_35 = l_Lean_Elaborator_end_elaborate___closed__4; -x_36 = lean::string_append(x_34, x_35); -x_37 = l_Lean_Name_toString___closed__1; -x_38 = l_Lean_Name_toStringWithSep___main(x_37, x_28); -x_39 = lean::string_append(x_36, x_38); -lean::dec(x_38); -x_40 = l_Char_HasRepr___closed__1; -x_41 = lean::string_append(x_39, x_40); -x_42 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_31, x_41, x_2, x_3, x_4); -lean::dec(x_31); -x_43 = !lean::is_exclusive(x_4); -if (x_43 == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_44 = lean::cnstr_get(x_4, 10); -lean::dec(x_44); -x_45 = lean::cnstr_get(x_4, 9); -lean::dec(x_45); -x_46 = lean::cnstr_get(x_4, 8); -lean::dec(x_46); -x_47 = lean::cnstr_get(x_4, 7); -lean::dec(x_47); -x_48 = lean::cnstr_get(x_4, 6); -lean::dec(x_48); -x_49 = lean::cnstr_get(x_4, 5); -lean::dec(x_49); -x_50 = lean::cnstr_get(x_4, 4); -lean::dec(x_50); -x_51 = lean::cnstr_get(x_4, 3); -lean::dec(x_51); -x_52 = lean::cnstr_get(x_4, 2); -lean::dec(x_52); -x_53 = lean::cnstr_get(x_4, 1); -lean::dec(x_53); -x_54 = lean::cnstr_get(x_4, 0); -lean::dec(x_54); -if (lean::obj_tag(x_42) == 0) -{ -uint8 x_55; -lean::free_heap_obj(x_4); -lean::dec(x_22); -lean::dec(x_21); -lean::dec(x_20); -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_9); -lean::dec(x_3); -x_55 = !lean::is_exclusive(x_42); -if (x_55 == 0) -{ -return x_42; -} -else -{ -obj* x_56; obj* x_57; -x_56 = lean::cnstr_get(x_42, 0); -lean::inc(x_56); -lean::dec(x_42); -x_57 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -return x_57; -} -} -else -{ -obj* x_58; -lean::dec(x_42); -lean::cnstr_set(x_4, 4, x_9); -x_58 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_4); -return x_58; -} -} -else -{ -lean::dec(x_4); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_59; obj* x_60; obj* x_61; -lean::dec(x_22); -lean::dec(x_21); -lean::dec(x_20); -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_9); -lean::dec(x_3); -x_59 = lean::cnstr_get(x_42, 0); -lean::inc(x_59); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - x_60 = x_42; -} else { - lean::dec_ref(x_42); - x_60 = lean::box(0); -} -if (lean::is_scalar(x_60)) { - x_61 = lean::alloc_cnstr(0, 1, 0); -} else { - x_61 = x_60; -} -lean::cnstr_set(x_61, 0, x_59); -return x_61; -} -else -{ -obj* x_62; obj* x_63; -lean::dec(x_42); -x_62 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_62, 0, x_13); -lean::cnstr_set(x_62, 1, x_14); -lean::cnstr_set(x_62, 2, x_15); -lean::cnstr_set(x_62, 3, x_16); -lean::cnstr_set(x_62, 4, x_9); -lean::cnstr_set(x_62, 5, x_17); -lean::cnstr_set(x_62, 6, x_18); -lean::cnstr_set(x_62, 7, x_19); -lean::cnstr_set(x_62, 8, x_20); -lean::cnstr_set(x_62, 9, x_21); -lean::cnstr_set(x_62, 10, x_22); -x_63 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_62); -return x_63; -} -} -} -else -{ -uint8 x_64; -lean::dec(x_28); -lean::dec(x_23); -lean::dec(x_1); -x_64 = !lean::is_exclusive(x_4); -if (x_64 == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_65 = lean::cnstr_get(x_4, 10); -lean::dec(x_65); -x_66 = lean::cnstr_get(x_4, 9); -lean::dec(x_66); -x_67 = lean::cnstr_get(x_4, 8); -lean::dec(x_67); -x_68 = lean::cnstr_get(x_4, 7); -lean::dec(x_68); -x_69 = lean::cnstr_get(x_4, 6); -lean::dec(x_69); -x_70 = lean::cnstr_get(x_4, 5); -lean::dec(x_70); -x_71 = lean::cnstr_get(x_4, 4); -lean::dec(x_71); -x_72 = lean::cnstr_get(x_4, 3); -lean::dec(x_72); -x_73 = lean::cnstr_get(x_4, 2); -lean::dec(x_73); -x_74 = lean::cnstr_get(x_4, 1); -lean::dec(x_74); -x_75 = lean::cnstr_get(x_4, 0); -lean::dec(x_75); -lean::cnstr_set(x_4, 4, x_9); -x_76 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_4); -return x_76; -} -else -{ -obj* x_77; obj* x_78; -lean::dec(x_4); -x_77 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_77, 0, x_13); -lean::cnstr_set(x_77, 1, x_14); -lean::cnstr_set(x_77, 2, x_15); -lean::cnstr_set(x_77, 3, x_16); -lean::cnstr_set(x_77, 4, x_9); -lean::cnstr_set(x_77, 5, x_17); -lean::cnstr_set(x_77, 6, x_18); -lean::cnstr_set(x_77, 7, x_19); -lean::cnstr_set(x_77, 8, x_20); -lean::cnstr_set(x_77, 9, x_21); -lean::cnstr_set(x_77, 10, x_22); -x_78 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_77); -return x_78; -} -} -} -else -{ -obj* x_79; uint8 x_80; -x_79 = lean::cnstr_get(x_23, 1); -lean::inc(x_79); -x_80 = !lean::is_exclusive(x_27); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; uint8 x_83; -x_81 = lean::cnstr_get(x_27, 0); -x_82 = l_Lean_Elaborator_mangleIdent(x_81); -x_83 = lean_name_dec_eq(x_82, x_79); -lean::dec(x_82); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; uint8 x_95; -lean::cnstr_set(x_27, 0, x_1); -x_84 = lean::cnstr_get(x_23, 0); -lean::inc(x_84); -lean::dec(x_23); -x_85 = l_Lean_Elaborator_end_elaborate___closed__3; -x_86 = lean::string_append(x_85, x_84); -lean::dec(x_84); -x_87 = l_Lean_Elaborator_end_elaborate___closed__4; -x_88 = lean::string_append(x_86, x_87); -x_89 = l_Lean_Name_toString___closed__1; -x_90 = l_Lean_Name_toStringWithSep___main(x_89, x_79); -x_91 = lean::string_append(x_88, x_90); -lean::dec(x_90); -x_92 = l_Char_HasRepr___closed__1; -x_93 = lean::string_append(x_91, x_92); -x_94 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_27, x_93, x_2, x_3, x_4); -lean::dec(x_27); -x_95 = !lean::is_exclusive(x_4); -if (x_95 == 0) -{ -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; -x_96 = lean::cnstr_get(x_4, 10); -lean::dec(x_96); -x_97 = lean::cnstr_get(x_4, 9); -lean::dec(x_97); -x_98 = lean::cnstr_get(x_4, 8); -lean::dec(x_98); -x_99 = lean::cnstr_get(x_4, 7); -lean::dec(x_99); -x_100 = lean::cnstr_get(x_4, 6); -lean::dec(x_100); -x_101 = lean::cnstr_get(x_4, 5); -lean::dec(x_101); -x_102 = lean::cnstr_get(x_4, 4); -lean::dec(x_102); -x_103 = lean::cnstr_get(x_4, 3); -lean::dec(x_103); -x_104 = lean::cnstr_get(x_4, 2); -lean::dec(x_104); -x_105 = lean::cnstr_get(x_4, 1); -lean::dec(x_105); -x_106 = lean::cnstr_get(x_4, 0); -lean::dec(x_106); -if (lean::obj_tag(x_94) == 0) -{ -uint8 x_107; -lean::free_heap_obj(x_4); -lean::dec(x_22); -lean::dec(x_21); -lean::dec(x_20); -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_9); -lean::dec(x_3); -x_107 = !lean::is_exclusive(x_94); -if (x_107 == 0) -{ -return x_94; -} -else -{ -obj* x_108; obj* x_109; -x_108 = lean::cnstr_get(x_94, 0); -lean::inc(x_108); -lean::dec(x_94); -x_109 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_109, 0, x_108); -return x_109; -} -} -else -{ -obj* x_110; -lean::dec(x_94); -lean::cnstr_set(x_4, 4, x_9); -x_110 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_4); -return x_110; -} -} -else -{ -lean::dec(x_4); -if (lean::obj_tag(x_94) == 0) -{ -obj* x_111; obj* x_112; obj* x_113; -lean::dec(x_22); -lean::dec(x_21); -lean::dec(x_20); -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_9); -lean::dec(x_3); -x_111 = lean::cnstr_get(x_94, 0); -lean::inc(x_111); -if (lean::is_exclusive(x_94)) { - lean::cnstr_release(x_94, 0); - x_112 = x_94; -} else { - lean::dec_ref(x_94); - x_112 = lean::box(0); -} -if (lean::is_scalar(x_112)) { - x_113 = lean::alloc_cnstr(0, 1, 0); -} else { - x_113 = x_112; -} -lean::cnstr_set(x_113, 0, x_111); -return x_113; -} -else -{ -obj* x_114; obj* x_115; -lean::dec(x_94); -x_114 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_114, 0, x_13); -lean::cnstr_set(x_114, 1, x_14); -lean::cnstr_set(x_114, 2, x_15); -lean::cnstr_set(x_114, 3, x_16); -lean::cnstr_set(x_114, 4, x_9); -lean::cnstr_set(x_114, 5, x_17); -lean::cnstr_set(x_114, 6, x_18); -lean::cnstr_set(x_114, 7, x_19); -lean::cnstr_set(x_114, 8, x_20); -lean::cnstr_set(x_114, 9, x_21); -lean::cnstr_set(x_114, 10, x_22); -x_115 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_114); -return x_115; -} -} -} -else -{ -uint8 x_116; -lean::free_heap_obj(x_27); -lean::dec(x_79); -lean::dec(x_23); -lean::dec(x_1); -x_116 = !lean::is_exclusive(x_4); -if (x_116 == 0) -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; -x_117 = lean::cnstr_get(x_4, 10); -lean::dec(x_117); -x_118 = lean::cnstr_get(x_4, 9); -lean::dec(x_118); -x_119 = lean::cnstr_get(x_4, 8); -lean::dec(x_119); -x_120 = lean::cnstr_get(x_4, 7); -lean::dec(x_120); -x_121 = lean::cnstr_get(x_4, 6); -lean::dec(x_121); -x_122 = lean::cnstr_get(x_4, 5); -lean::dec(x_122); -x_123 = lean::cnstr_get(x_4, 4); -lean::dec(x_123); -x_124 = lean::cnstr_get(x_4, 3); -lean::dec(x_124); -x_125 = lean::cnstr_get(x_4, 2); -lean::dec(x_125); -x_126 = lean::cnstr_get(x_4, 1); -lean::dec(x_126); -x_127 = lean::cnstr_get(x_4, 0); -lean::dec(x_127); -lean::cnstr_set(x_4, 4, x_9); -x_128 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_4); -return x_128; -} -else -{ -obj* x_129; obj* x_130; -lean::dec(x_4); -x_129 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_129, 0, x_13); -lean::cnstr_set(x_129, 1, x_14); -lean::cnstr_set(x_129, 2, x_15); -lean::cnstr_set(x_129, 3, x_16); -lean::cnstr_set(x_129, 4, x_9); -lean::cnstr_set(x_129, 5, x_17); -lean::cnstr_set(x_129, 6, x_18); -lean::cnstr_set(x_129, 7, x_19); -lean::cnstr_set(x_129, 8, x_20); -lean::cnstr_set(x_129, 9, x_21); -lean::cnstr_set(x_129, 10, x_22); -x_130 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_129); -return x_130; -} -} -} -else -{ -obj* x_131; obj* x_132; uint8 x_133; -x_131 = lean::cnstr_get(x_27, 0); -lean::inc(x_131); -lean::dec(x_27); -x_132 = l_Lean_Elaborator_mangleIdent(x_131); -x_133 = lean_name_dec_eq(x_132, x_79); -lean::dec(x_132); -if (x_133 == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; -x_134 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_134, 0, x_1); -x_135 = lean::cnstr_get(x_23, 0); -lean::inc(x_135); -lean::dec(x_23); -x_136 = l_Lean_Elaborator_end_elaborate___closed__3; -x_137 = lean::string_append(x_136, x_135); -lean::dec(x_135); -x_138 = l_Lean_Elaborator_end_elaborate___closed__4; -x_139 = lean::string_append(x_137, x_138); -x_140 = l_Lean_Name_toString___closed__1; -x_141 = l_Lean_Name_toStringWithSep___main(x_140, x_79); -x_142 = lean::string_append(x_139, x_141); -lean::dec(x_141); -x_143 = l_Char_HasRepr___closed__1; -x_144 = lean::string_append(x_142, x_143); -x_145 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_134, x_144, x_2, x_3, x_4); -lean::dec(x_134); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - lean::cnstr_release(x_4, 2); - lean::cnstr_release(x_4, 3); - lean::cnstr_release(x_4, 4); - lean::cnstr_release(x_4, 5); - lean::cnstr_release(x_4, 6); - lean::cnstr_release(x_4, 7); - lean::cnstr_release(x_4, 8); - lean::cnstr_release(x_4, 9); - lean::cnstr_release(x_4, 10); - x_146 = x_4; -} else { - lean::dec_ref(x_4); - x_146 = lean::box(0); -} -if (lean::obj_tag(x_145) == 0) -{ -obj* x_147; obj* x_148; obj* x_149; -lean::dec(x_146); -lean::dec(x_22); -lean::dec(x_21); -lean::dec(x_20); -lean::dec(x_19); -lean::dec(x_18); -lean::dec(x_17); -lean::dec(x_16); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_9); -lean::dec(x_3); -x_147 = lean::cnstr_get(x_145, 0); -lean::inc(x_147); -if (lean::is_exclusive(x_145)) { - lean::cnstr_release(x_145, 0); - x_148 = x_145; -} else { - lean::dec_ref(x_145); - x_148 = lean::box(0); -} -if (lean::is_scalar(x_148)) { - x_149 = lean::alloc_cnstr(0, 1, 0); -} else { - x_149 = x_148; -} -lean::cnstr_set(x_149, 0, x_147); -return x_149; -} -else -{ -obj* x_150; obj* x_151; -lean::dec(x_145); -if (lean::is_scalar(x_146)) { - x_150 = lean::alloc_cnstr(0, 11, 0); -} else { - x_150 = x_146; -} -lean::cnstr_set(x_150, 0, x_13); -lean::cnstr_set(x_150, 1, x_14); -lean::cnstr_set(x_150, 2, x_15); -lean::cnstr_set(x_150, 3, x_16); -lean::cnstr_set(x_150, 4, x_9); -lean::cnstr_set(x_150, 5, x_17); -lean::cnstr_set(x_150, 6, x_18); -lean::cnstr_set(x_150, 7, x_19); -lean::cnstr_set(x_150, 8, x_20); -lean::cnstr_set(x_150, 9, x_21); -lean::cnstr_set(x_150, 10, x_22); -x_151 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_150); -return x_151; -} -} -else -{ -obj* x_152; obj* x_153; obj* x_154; -lean::dec(x_79); -lean::dec(x_23); -lean::dec(x_1); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - lean::cnstr_release(x_4, 2); - lean::cnstr_release(x_4, 3); - lean::cnstr_release(x_4, 4); - lean::cnstr_release(x_4, 5); - lean::cnstr_release(x_4, 6); - lean::cnstr_release(x_4, 7); - lean::cnstr_release(x_4, 8); - lean::cnstr_release(x_4, 9); - lean::cnstr_release(x_4, 10); - x_152 = x_4; -} else { - lean::dec_ref(x_4); - x_152 = lean::box(0); -} -if (lean::is_scalar(x_152)) { - x_153 = lean::alloc_cnstr(0, 11, 0); -} else { - x_153 = x_152; -} -lean::cnstr_set(x_153, 0, x_13); -lean::cnstr_set(x_153, 1, x_14); -lean::cnstr_set(x_153, 2, x_15); -lean::cnstr_set(x_153, 3, x_16); -lean::cnstr_set(x_153, 4, x_9); -lean::cnstr_set(x_153, 5, x_17); -lean::cnstr_set(x_153, 6, x_18); -lean::cnstr_set(x_153, 7, x_19); -lean::cnstr_set(x_153, 8, x_20); -lean::cnstr_set(x_153, 9, x_21); -lean::cnstr_set(x_153, 10, x_22); -x_154 = l_Lean_Elaborator_updateParserConfig(x_2, x_3, x_153); -return x_154; -} -} -} -} -} -} -} -obj* l_Lean_Elaborator_end_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_end_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_section_elaborate___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("section"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_section_elaborate___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("."); -x_3 = lean::box(0); -x_4 = l_Lean_Name_toStringWithSep___main(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_Substring_ofString(x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_3); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -return x_7; -} -} -obj* l_Lean_Elaborator_section_elaborate(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_9; obj* x_10; -x_5 = l_Lean_Parser_command_section_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Elaborator_currentScope(x_2, x_3, x_4); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_126; -x_126 = l_Lean_Elaborator_section_elaborate___closed__2; -x_10 = x_126; -goto block_125; -} -else -{ -obj* x_127; -x_127 = lean::cnstr_get(x_8, 0); -lean::inc(x_127); -lean::dec(x_8); -x_10 = x_127; -goto block_125; -} -block_125: -{ -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_11; -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -return x_9; -} -else -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_9, 0); -lean::inc(x_12); -lean::dec(x_9); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -} -else -{ -uint8 x_14; -x_14 = !lean::is_exclusive(x_9); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; uint8 x_17; -x_15 = lean::cnstr_get(x_9, 0); -x_16 = l_Lean_Elaborator_mangleIdent(x_10); -x_17 = !lean::is_exclusive(x_15); -if (x_17 == 0) -{ -obj* x_18; uint8 x_19; -x_18 = lean::cnstr_get(x_15, 1); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; uint8 x_21; -x_20 = lean::cnstr_get(x_15, 0); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_18, 4); -x_23 = lean::cnstr_get(x_20, 1); -lean::dec(x_23); -x_24 = lean::cnstr_get(x_20, 0); -lean::dec(x_24); -x_25 = l_Lean_Elaborator_section_elaborate___closed__1; -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 0, x_25); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_20); -lean::cnstr_set(x_26, 1, x_22); -lean::cnstr_set(x_18, 4, x_26); -x_27 = lean::box(0); -lean::cnstr_set(x_15, 0, x_27); -return x_9; -} -else -{ -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; -x_28 = lean::cnstr_get(x_18, 4); -x_29 = lean::cnstr_get(x_20, 2); -x_30 = lean::cnstr_get(x_20, 3); -x_31 = lean::cnstr_get(x_20, 4); -x_32 = lean::cnstr_get(x_20, 5); -x_33 = lean::cnstr_get(x_20, 6); -x_34 = lean::cnstr_get(x_20, 7); -x_35 = lean::cnstr_get(x_20, 8); -lean::inc(x_35); -lean::inc(x_34); -lean::inc(x_33); -lean::inc(x_32); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_20); -x_36 = l_Lean_Elaborator_section_elaborate___closed__1; -x_37 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_16); -lean::cnstr_set(x_37, 2, x_29); -lean::cnstr_set(x_37, 3, x_30); -lean::cnstr_set(x_37, 4, x_31); -lean::cnstr_set(x_37, 5, x_32); -lean::cnstr_set(x_37, 6, x_33); -lean::cnstr_set(x_37, 7, x_34); -lean::cnstr_set(x_37, 8, x_35); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_28); -lean::cnstr_set(x_18, 4, x_38); -x_39 = lean::box(0); -lean::cnstr_set(x_15, 0, x_39); -return x_9; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_40 = lean::cnstr_get(x_15, 0); -x_41 = lean::cnstr_get(x_18, 0); -x_42 = lean::cnstr_get(x_18, 1); -x_43 = lean::cnstr_get(x_18, 2); -x_44 = lean::cnstr_get(x_18, 3); -x_45 = lean::cnstr_get(x_18, 4); -x_46 = lean::cnstr_get(x_18, 5); -x_47 = lean::cnstr_get(x_18, 6); -x_48 = lean::cnstr_get(x_18, 7); -x_49 = lean::cnstr_get(x_18, 8); -x_50 = lean::cnstr_get(x_18, 9); -x_51 = lean::cnstr_get(x_18, 10); -lean::inc(x_51); -lean::inc(x_50); -lean::inc(x_49); -lean::inc(x_48); -lean::inc(x_47); -lean::inc(x_46); -lean::inc(x_45); -lean::inc(x_44); -lean::inc(x_43); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_18); -x_52 = lean::cnstr_get(x_40, 2); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_40, 3); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_40, 4); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_40, 5); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_40, 6); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_40, 7); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_40, 8); -lean::inc(x_58); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - lean::cnstr_release(x_40, 2); - lean::cnstr_release(x_40, 3); - lean::cnstr_release(x_40, 4); - lean::cnstr_release(x_40, 5); - lean::cnstr_release(x_40, 6); - lean::cnstr_release(x_40, 7); - lean::cnstr_release(x_40, 8); - x_59 = x_40; -} else { - lean::dec_ref(x_40); - x_59 = lean::box(0); -} -x_60 = l_Lean_Elaborator_section_elaborate___closed__1; -if (lean::is_scalar(x_59)) { - x_61 = lean::alloc_cnstr(0, 9, 0); -} else { - x_61 = x_59; -} -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_16); -lean::cnstr_set(x_61, 2, x_52); -lean::cnstr_set(x_61, 3, x_53); -lean::cnstr_set(x_61, 4, x_54); -lean::cnstr_set(x_61, 5, x_55); -lean::cnstr_set(x_61, 6, x_56); -lean::cnstr_set(x_61, 7, x_57); -lean::cnstr_set(x_61, 8, x_58); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_45); -x_63 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_63, 0, x_41); -lean::cnstr_set(x_63, 1, x_42); -lean::cnstr_set(x_63, 2, x_43); -lean::cnstr_set(x_63, 3, x_44); -lean::cnstr_set(x_63, 4, x_62); -lean::cnstr_set(x_63, 5, x_46); -lean::cnstr_set(x_63, 6, x_47); -lean::cnstr_set(x_63, 7, x_48); -lean::cnstr_set(x_63, 8, x_49); -lean::cnstr_set(x_63, 9, x_50); -lean::cnstr_set(x_63, 10, x_51); -x_64 = lean::box(0); -lean::cnstr_set(x_15, 1, x_63); -lean::cnstr_set(x_15, 0, x_64); -return x_9; -} -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_65 = lean::cnstr_get(x_15, 1); -x_66 = lean::cnstr_get(x_15, 0); -lean::inc(x_65); -lean::inc(x_66); -lean::dec(x_15); -x_67 = lean::cnstr_get(x_65, 0); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_65, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_65, 2); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_65, 3); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_65, 4); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_65, 5); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_65, 6); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_65, 7); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_65, 8); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_65, 9); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_65, 10); -lean::inc(x_77); -if (lean::is_exclusive(x_65)) { - lean::cnstr_release(x_65, 0); - lean::cnstr_release(x_65, 1); - lean::cnstr_release(x_65, 2); - lean::cnstr_release(x_65, 3); - lean::cnstr_release(x_65, 4); - lean::cnstr_release(x_65, 5); - lean::cnstr_release(x_65, 6); - lean::cnstr_release(x_65, 7); - lean::cnstr_release(x_65, 8); - lean::cnstr_release(x_65, 9); - lean::cnstr_release(x_65, 10); - x_78 = x_65; -} else { - lean::dec_ref(x_65); - x_78 = lean::box(0); -} -x_79 = lean::cnstr_get(x_66, 2); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_66, 3); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_66, 4); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_66, 5); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_66, 6); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_66, 7); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_66, 8); -lean::inc(x_85); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - lean::cnstr_release(x_66, 2); - lean::cnstr_release(x_66, 3); - lean::cnstr_release(x_66, 4); - lean::cnstr_release(x_66, 5); - lean::cnstr_release(x_66, 6); - lean::cnstr_release(x_66, 7); - lean::cnstr_release(x_66, 8); - x_86 = x_66; -} else { - lean::dec_ref(x_66); - x_86 = lean::box(0); -} -x_87 = l_Lean_Elaborator_section_elaborate___closed__1; -if (lean::is_scalar(x_86)) { - x_88 = lean::alloc_cnstr(0, 9, 0); -} else { - x_88 = x_86; -} -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_16); -lean::cnstr_set(x_88, 2, x_79); -lean::cnstr_set(x_88, 3, x_80); -lean::cnstr_set(x_88, 4, x_81); -lean::cnstr_set(x_88, 5, x_82); -lean::cnstr_set(x_88, 6, x_83); -lean::cnstr_set(x_88, 7, x_84); -lean::cnstr_set(x_88, 8, x_85); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_71); -if (lean::is_scalar(x_78)) { - x_90 = lean::alloc_cnstr(0, 11, 0); -} else { - x_90 = x_78; -} -lean::cnstr_set(x_90, 0, x_67); -lean::cnstr_set(x_90, 1, x_68); -lean::cnstr_set(x_90, 2, x_69); -lean::cnstr_set(x_90, 3, x_70); -lean::cnstr_set(x_90, 4, x_89); -lean::cnstr_set(x_90, 5, x_72); -lean::cnstr_set(x_90, 6, x_73); -lean::cnstr_set(x_90, 7, x_74); -lean::cnstr_set(x_90, 8, x_75); -lean::cnstr_set(x_90, 9, x_76); -lean::cnstr_set(x_90, 10, x_77); -x_91 = lean::box(0); -x_92 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_90); -lean::cnstr_set(x_9, 0, x_92); -return x_9; -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_93 = lean::cnstr_get(x_9, 0); -lean::inc(x_93); -lean::dec(x_9); -x_94 = l_Lean_Elaborator_mangleIdent(x_10); -x_95 = lean::cnstr_get(x_93, 1); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_93, 0); -lean::inc(x_96); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - lean::cnstr_release(x_93, 1); - x_97 = x_93; -} else { - lean::dec_ref(x_93); - x_97 = lean::box(0); -} -x_98 = lean::cnstr_get(x_95, 0); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_95, 1); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_95, 2); -lean::inc(x_100); -x_101 = lean::cnstr_get(x_95, 3); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_95, 4); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_95, 5); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_95, 6); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_95, 7); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_95, 8); -lean::inc(x_106); -x_107 = lean::cnstr_get(x_95, 9); -lean::inc(x_107); -x_108 = lean::cnstr_get(x_95, 10); -lean::inc(x_108); -if (lean::is_exclusive(x_95)) { - lean::cnstr_release(x_95, 0); - lean::cnstr_release(x_95, 1); - lean::cnstr_release(x_95, 2); - lean::cnstr_release(x_95, 3); - lean::cnstr_release(x_95, 4); - lean::cnstr_release(x_95, 5); - lean::cnstr_release(x_95, 6); - lean::cnstr_release(x_95, 7); - lean::cnstr_release(x_95, 8); - lean::cnstr_release(x_95, 9); - lean::cnstr_release(x_95, 10); - x_109 = x_95; -} else { - lean::dec_ref(x_95); - x_109 = lean::box(0); -} -x_110 = lean::cnstr_get(x_96, 2); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_96, 3); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_96, 4); -lean::inc(x_112); -x_113 = lean::cnstr_get(x_96, 5); -lean::inc(x_113); -x_114 = lean::cnstr_get(x_96, 6); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_96, 7); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_96, 8); -lean::inc(x_116); -if (lean::is_exclusive(x_96)) { - lean::cnstr_release(x_96, 0); - lean::cnstr_release(x_96, 1); - lean::cnstr_release(x_96, 2); - lean::cnstr_release(x_96, 3); - lean::cnstr_release(x_96, 4); - lean::cnstr_release(x_96, 5); - lean::cnstr_release(x_96, 6); - lean::cnstr_release(x_96, 7); - lean::cnstr_release(x_96, 8); - x_117 = x_96; -} else { - lean::dec_ref(x_96); - x_117 = lean::box(0); -} -x_118 = l_Lean_Elaborator_section_elaborate___closed__1; -if (lean::is_scalar(x_117)) { - x_119 = lean::alloc_cnstr(0, 9, 0); -} else { - x_119 = x_117; -} -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_119, 1, x_94); -lean::cnstr_set(x_119, 2, x_110); -lean::cnstr_set(x_119, 3, x_111); -lean::cnstr_set(x_119, 4, x_112); -lean::cnstr_set(x_119, 5, x_113); -lean::cnstr_set(x_119, 6, x_114); -lean::cnstr_set(x_119, 7, x_115); -lean::cnstr_set(x_119, 8, x_116); -x_120 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_120, 0, x_119); -lean::cnstr_set(x_120, 1, x_102); -if (lean::is_scalar(x_109)) { - x_121 = lean::alloc_cnstr(0, 11, 0); -} else { - x_121 = x_109; -} -lean::cnstr_set(x_121, 0, x_98); -lean::cnstr_set(x_121, 1, x_99); -lean::cnstr_set(x_121, 2, x_100); -lean::cnstr_set(x_121, 3, x_101); -lean::cnstr_set(x_121, 4, x_120); -lean::cnstr_set(x_121, 5, x_103); -lean::cnstr_set(x_121, 6, x_104); -lean::cnstr_set(x_121, 7, x_105); -lean::cnstr_set(x_121, 8, x_106); -lean::cnstr_set(x_121, 9, x_107); -lean::cnstr_set(x_121, 10, x_108); -x_122 = lean::box(0); -if (lean::is_scalar(x_97)) { - x_123 = lean::alloc_cnstr(0, 2, 0); -} else { - x_123 = x_97; -} -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_121); -x_124 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_124, 0, x_123); -return x_124; -} -} -} -} -} -obj* l_Lean_Elaborator_section_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_section_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_namespace_elaborate___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("namespace"); -return x_1; -} -} -obj* l_Lean_Elaborator_namespace_elaborate(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_9; obj* x_10; -x_5 = l_Lean_Parser_command_namespace_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Elaborator_mangleIdent(x_8); -x_10 = l_Lean_Elaborator_currentScope(x_2, x_3, x_4); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_9); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -return x_10; -} -else -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -lean::dec(x_10); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_14, 1); -lean::inc(x_16); -lean::dec(x_14); -x_17 = l_Lean_Elaborator_getNamespace(x_2, x_3, x_16); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -lean::dec(x_15); -lean::dec(x_9); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -return x_17; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_17); -if (x_21 == 0) -{ -obj* x_22; uint8 x_23; -x_22 = lean::cnstr_get(x_17, 0); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_15); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; uint8 x_33; -x_25 = lean::cnstr_get(x_22, 0); -x_26 = lean::cnstr_get(x_22, 1); -x_27 = lean::cnstr_get(x_15, 6); -x_28 = lean::cnstr_get(x_15, 1); -lean::dec(x_28); -x_29 = lean::cnstr_get(x_15, 0); -lean::dec(x_29); -lean::inc(x_9); -x_30 = l_Lean_Name_append___main(x_25, x_9); -lean::dec(x_25); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_27); -x_32 = l_Lean_Elaborator_namespace_elaborate___closed__1; -lean::cnstr_set(x_15, 6, x_31); -lean::cnstr_set(x_15, 1, x_9); -lean::cnstr_set(x_15, 0, x_32); -x_33 = !lean::is_exclusive(x_26); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; -x_34 = lean::cnstr_get(x_26, 4); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_15); -lean::cnstr_set(x_35, 1, x_34); -lean::cnstr_set(x_26, 4, x_35); -x_36 = lean::box(0); -lean::cnstr_set(x_22, 0, x_36); -return x_17; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_37 = lean::cnstr_get(x_26, 0); -x_38 = lean::cnstr_get(x_26, 1); -x_39 = lean::cnstr_get(x_26, 2); -x_40 = lean::cnstr_get(x_26, 3); -x_41 = lean::cnstr_get(x_26, 4); -x_42 = lean::cnstr_get(x_26, 5); -x_43 = lean::cnstr_get(x_26, 6); -x_44 = lean::cnstr_get(x_26, 7); -x_45 = lean::cnstr_get(x_26, 8); -x_46 = lean::cnstr_get(x_26, 9); -x_47 = lean::cnstr_get(x_26, 10); -lean::inc(x_47); -lean::inc(x_46); -lean::inc(x_45); -lean::inc(x_44); -lean::inc(x_43); -lean::inc(x_42); -lean::inc(x_41); -lean::inc(x_40); -lean::inc(x_39); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_26); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_15); -lean::cnstr_set(x_48, 1, x_41); -x_49 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_49, 0, x_37); -lean::cnstr_set(x_49, 1, x_38); -lean::cnstr_set(x_49, 2, x_39); -lean::cnstr_set(x_49, 3, x_40); -lean::cnstr_set(x_49, 4, x_48); -lean::cnstr_set(x_49, 5, x_42); -lean::cnstr_set(x_49, 6, x_43); -lean::cnstr_set(x_49, 7, x_44); -lean::cnstr_set(x_49, 8, x_45); -lean::cnstr_set(x_49, 9, x_46); -lean::cnstr_set(x_49, 10, x_47); -x_50 = lean::box(0); -lean::cnstr_set(x_22, 1, x_49); -lean::cnstr_set(x_22, 0, x_50); -return x_17; -} -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_51 = lean::cnstr_get(x_22, 0); -x_52 = lean::cnstr_get(x_22, 1); -x_53 = lean::cnstr_get(x_15, 2); -x_54 = lean::cnstr_get(x_15, 3); -x_55 = lean::cnstr_get(x_15, 4); -x_56 = lean::cnstr_get(x_15, 5); -x_57 = lean::cnstr_get(x_15, 6); -x_58 = lean::cnstr_get(x_15, 7); -x_59 = lean::cnstr_get(x_15, 8); -lean::inc(x_59); -lean::inc(x_58); -lean::inc(x_57); -lean::inc(x_56); -lean::inc(x_55); -lean::inc(x_54); -lean::inc(x_53); -lean::dec(x_15); -lean::inc(x_9); -x_60 = l_Lean_Name_append___main(x_51, x_9); -lean::dec(x_51); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_57); -x_62 = l_Lean_Elaborator_namespace_elaborate___closed__1; -x_63 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_9); -lean::cnstr_set(x_63, 2, x_53); -lean::cnstr_set(x_63, 3, x_54); -lean::cnstr_set(x_63, 4, x_55); -lean::cnstr_set(x_63, 5, x_56); -lean::cnstr_set(x_63, 6, x_61); -lean::cnstr_set(x_63, 7, x_58); -lean::cnstr_set(x_63, 8, x_59); -x_64 = lean::cnstr_get(x_52, 0); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_52, 1); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_52, 2); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_52, 3); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_52, 4); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_52, 5); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_52, 6); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_52, 7); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_52, 8); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_52, 9); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_52, 10); -lean::inc(x_74); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - lean::cnstr_release(x_52, 1); - lean::cnstr_release(x_52, 2); - lean::cnstr_release(x_52, 3); - lean::cnstr_release(x_52, 4); - lean::cnstr_release(x_52, 5); - lean::cnstr_release(x_52, 6); - lean::cnstr_release(x_52, 7); - lean::cnstr_release(x_52, 8); - lean::cnstr_release(x_52, 9); - lean::cnstr_release(x_52, 10); - x_75 = x_52; -} else { - lean::dec_ref(x_52); - x_75 = lean::box(0); -} -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_63); -lean::cnstr_set(x_76, 1, x_68); -if (lean::is_scalar(x_75)) { - x_77 = lean::alloc_cnstr(0, 11, 0); -} else { - x_77 = x_75; -} -lean::cnstr_set(x_77, 0, x_64); -lean::cnstr_set(x_77, 1, x_65); -lean::cnstr_set(x_77, 2, x_66); -lean::cnstr_set(x_77, 3, x_67); -lean::cnstr_set(x_77, 4, x_76); -lean::cnstr_set(x_77, 5, x_69); -lean::cnstr_set(x_77, 6, x_70); -lean::cnstr_set(x_77, 7, x_71); -lean::cnstr_set(x_77, 8, x_72); -lean::cnstr_set(x_77, 9, x_73); -lean::cnstr_set(x_77, 10, x_74); -x_78 = lean::box(0); -lean::cnstr_set(x_22, 1, x_77); -lean::cnstr_set(x_22, 0, x_78); -return x_17; -} -} -else -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_79 = lean::cnstr_get(x_22, 0); -x_80 = lean::cnstr_get(x_22, 1); -lean::inc(x_80); -lean::inc(x_79); -lean::dec(x_22); -x_81 = lean::cnstr_get(x_15, 2); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_15, 3); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_15, 4); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_15, 5); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_15, 6); -lean::inc(x_85); -x_86 = lean::cnstr_get(x_15, 7); -lean::inc(x_86); -x_87 = lean::cnstr_get(x_15, 8); -lean::inc(x_87); -if (lean::is_exclusive(x_15)) { - lean::cnstr_release(x_15, 0); - lean::cnstr_release(x_15, 1); - lean::cnstr_release(x_15, 2); - lean::cnstr_release(x_15, 3); - lean::cnstr_release(x_15, 4); - lean::cnstr_release(x_15, 5); - lean::cnstr_release(x_15, 6); - lean::cnstr_release(x_15, 7); - lean::cnstr_release(x_15, 8); - x_88 = x_15; -} else { - lean::dec_ref(x_15); - x_88 = lean::box(0); -} -lean::inc(x_9); -x_89 = l_Lean_Name_append___main(x_79, x_9); -lean::dec(x_79); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_85); -x_91 = l_Lean_Elaborator_namespace_elaborate___closed__1; -if (lean::is_scalar(x_88)) { - x_92 = lean::alloc_cnstr(0, 9, 0); -} else { - x_92 = x_88; -} -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_9); -lean::cnstr_set(x_92, 2, x_81); -lean::cnstr_set(x_92, 3, x_82); -lean::cnstr_set(x_92, 4, x_83); -lean::cnstr_set(x_92, 5, x_84); -lean::cnstr_set(x_92, 6, x_90); -lean::cnstr_set(x_92, 7, x_86); -lean::cnstr_set(x_92, 8, x_87); -x_93 = lean::cnstr_get(x_80, 0); -lean::inc(x_93); -x_94 = lean::cnstr_get(x_80, 1); -lean::inc(x_94); -x_95 = lean::cnstr_get(x_80, 2); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_80, 3); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_80, 4); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_80, 5); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_80, 6); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_80, 7); -lean::inc(x_100); -x_101 = lean::cnstr_get(x_80, 8); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_80, 9); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_80, 10); -lean::inc(x_103); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - lean::cnstr_release(x_80, 1); - lean::cnstr_release(x_80, 2); - lean::cnstr_release(x_80, 3); - lean::cnstr_release(x_80, 4); - lean::cnstr_release(x_80, 5); - lean::cnstr_release(x_80, 6); - lean::cnstr_release(x_80, 7); - lean::cnstr_release(x_80, 8); - lean::cnstr_release(x_80, 9); - lean::cnstr_release(x_80, 10); - x_104 = x_80; -} else { - lean::dec_ref(x_80); - x_104 = lean::box(0); -} -x_105 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_105, 0, x_92); -lean::cnstr_set(x_105, 1, x_97); -if (lean::is_scalar(x_104)) { - x_106 = lean::alloc_cnstr(0, 11, 0); -} else { - x_106 = x_104; -} -lean::cnstr_set(x_106, 0, x_93); -lean::cnstr_set(x_106, 1, x_94); -lean::cnstr_set(x_106, 2, x_95); -lean::cnstr_set(x_106, 3, x_96); -lean::cnstr_set(x_106, 4, x_105); -lean::cnstr_set(x_106, 5, x_98); -lean::cnstr_set(x_106, 6, x_99); -lean::cnstr_set(x_106, 7, x_100); -lean::cnstr_set(x_106, 8, x_101); -lean::cnstr_set(x_106, 9, x_102); -lean::cnstr_set(x_106, 10, x_103); -x_107 = lean::box(0); -x_108 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_108, 0, x_107); -lean::cnstr_set(x_108, 1, x_106); -lean::cnstr_set(x_17, 0, x_108); -return x_17; -} -} -else -{ -obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_109 = lean::cnstr_get(x_17, 0); -lean::inc(x_109); -lean::dec(x_17); -x_110 = lean::cnstr_get(x_109, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_109, 1); -lean::inc(x_111); -if (lean::is_exclusive(x_109)) { - lean::cnstr_release(x_109, 0); - lean::cnstr_release(x_109, 1); - x_112 = x_109; -} else { - lean::dec_ref(x_109); - x_112 = lean::box(0); -} -x_113 = lean::cnstr_get(x_15, 2); -lean::inc(x_113); -x_114 = lean::cnstr_get(x_15, 3); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_15, 4); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_15, 5); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_15, 6); -lean::inc(x_117); -x_118 = lean::cnstr_get(x_15, 7); -lean::inc(x_118); -x_119 = lean::cnstr_get(x_15, 8); -lean::inc(x_119); -if (lean::is_exclusive(x_15)) { - lean::cnstr_release(x_15, 0); - lean::cnstr_release(x_15, 1); - lean::cnstr_release(x_15, 2); - lean::cnstr_release(x_15, 3); - lean::cnstr_release(x_15, 4); - lean::cnstr_release(x_15, 5); - lean::cnstr_release(x_15, 6); - lean::cnstr_release(x_15, 7); - lean::cnstr_release(x_15, 8); - x_120 = x_15; -} else { - lean::dec_ref(x_15); - x_120 = lean::box(0); -} -lean::inc(x_9); -x_121 = l_Lean_Name_append___main(x_110, x_9); -lean::dec(x_110); -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_121); -lean::cnstr_set(x_122, 1, x_117); -x_123 = l_Lean_Elaborator_namespace_elaborate___closed__1; -if (lean::is_scalar(x_120)) { - x_124 = lean::alloc_cnstr(0, 9, 0); -} else { - x_124 = x_120; -} -lean::cnstr_set(x_124, 0, x_123); -lean::cnstr_set(x_124, 1, x_9); -lean::cnstr_set(x_124, 2, x_113); -lean::cnstr_set(x_124, 3, x_114); -lean::cnstr_set(x_124, 4, x_115); -lean::cnstr_set(x_124, 5, x_116); -lean::cnstr_set(x_124, 6, x_122); -lean::cnstr_set(x_124, 7, x_118); -lean::cnstr_set(x_124, 8, x_119); -x_125 = lean::cnstr_get(x_111, 0); -lean::inc(x_125); -x_126 = lean::cnstr_get(x_111, 1); -lean::inc(x_126); -x_127 = lean::cnstr_get(x_111, 2); -lean::inc(x_127); -x_128 = lean::cnstr_get(x_111, 3); -lean::inc(x_128); -x_129 = lean::cnstr_get(x_111, 4); -lean::inc(x_129); -x_130 = lean::cnstr_get(x_111, 5); -lean::inc(x_130); -x_131 = lean::cnstr_get(x_111, 6); -lean::inc(x_131); -x_132 = lean::cnstr_get(x_111, 7); -lean::inc(x_132); -x_133 = lean::cnstr_get(x_111, 8); -lean::inc(x_133); -x_134 = lean::cnstr_get(x_111, 9); -lean::inc(x_134); -x_135 = lean::cnstr_get(x_111, 10); -lean::inc(x_135); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - lean::cnstr_release(x_111, 2); - lean::cnstr_release(x_111, 3); - lean::cnstr_release(x_111, 4); - lean::cnstr_release(x_111, 5); - lean::cnstr_release(x_111, 6); - lean::cnstr_release(x_111, 7); - lean::cnstr_release(x_111, 8); - lean::cnstr_release(x_111, 9); - lean::cnstr_release(x_111, 10); - x_136 = x_111; -} else { - lean::dec_ref(x_111); - x_136 = lean::box(0); -} -x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_124); -lean::cnstr_set(x_137, 1, x_129); -if (lean::is_scalar(x_136)) { - x_138 = lean::alloc_cnstr(0, 11, 0); -} else { - x_138 = x_136; -} -lean::cnstr_set(x_138, 0, x_125); -lean::cnstr_set(x_138, 1, x_126); -lean::cnstr_set(x_138, 2, x_127); -lean::cnstr_set(x_138, 3, x_128); -lean::cnstr_set(x_138, 4, x_137); -lean::cnstr_set(x_138, 5, x_130); -lean::cnstr_set(x_138, 6, x_131); -lean::cnstr_set(x_138, 7, x_132); -lean::cnstr_set(x_138, 8, x_133); -lean::cnstr_set(x_138, 9, x_134); -lean::cnstr_set(x_138, 10, x_135); -x_139 = lean::box(0); -if (lean::is_scalar(x_112)) { - x_140 = lean::alloc_cnstr(0, 2, 0); -} else { - x_140 = x_112; -} -lean::cnstr_set(x_140, 0, x_139); -lean::cnstr_set(x_140, 1, x_138); -x_141 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_141, 0, x_140); -return x_141; -} -} -} -} -} -obj* l_Lean_Elaborator_namespace_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_namespace_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_eoi_elaborate___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("invalid end of input, expected 'end'"); -return x_1; -} -} -obj* l_Lean_Elaborator_eoi_elaborate(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; uint8 x_9; -x_5 = lean::cnstr_get(x_4, 4); -lean::inc(x_5); -x_6 = lean::mk_nat_obj(0u); -x_7 = l_List_lengthAux___main___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_dec_lt(x_8, x_7); -lean::dec(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_1); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_4); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_1); -x_14 = l_Lean_Elaborator_eoi_elaborate___closed__1; -x_15 = l_Lean_Expander_error___at_Lean_Elaborator_currentScope___spec__1___rarg(x_13, x_14, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_13); -return x_15; -} -} -} -obj* l_Lean_Elaborator_eoi_elaborate___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_eoi_elaborate(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; -x_4 = 0; -x_5 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 3, x_1); -lean::cnstr_set_scalar(x_5, sizeof(void*)*4, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_6 == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -x_10 = lean::cnstr_get(x_1, 2); -x_11 = lean::cnstr_get(x_1, 3); -x_12 = l_Lean_Name_quickLt(x_2, x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = l_Lean_Name_quickLt(x_9, x_2); -if (x_13 == 0) -{ -lean::dec(x_10); -lean::dec(x_9); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -obj* x_14; -x_14 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_11, x_2, x_3); -lean::cnstr_set(x_1, 3, x_14); -return x_1; -} -} -else -{ -obj* x_15; -x_15 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_8, x_2, x_3); -lean::cnstr_set(x_1, 0, x_15); -return x_1; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = lean::cnstr_get(x_1, 1); -x_18 = lean::cnstr_get(x_1, 2); -x_19 = lean::cnstr_get(x_1, 3); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_1); -x_20 = l_Lean_Name_quickLt(x_2, x_17); -if (x_20 == 0) -{ -uint8 x_21; -x_21 = l_Lean_Name_quickLt(x_17, x_2); -if (x_21 == 0) -{ -obj* x_22; -lean::dec(x_18); -lean::dec(x_17); -x_22 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_22, 0, x_16); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_3); -lean::cnstr_set(x_22, 3, x_19); -lean::cnstr_set_scalar(x_22, sizeof(void*)*4, x_6); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_19, x_2, x_3); -x_24 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_24, 0, x_16); -lean::cnstr_set(x_24, 1, x_17); -lean::cnstr_set(x_24, 2, x_18); -lean::cnstr_set(x_24, 3, x_23); -lean::cnstr_set_scalar(x_24, sizeof(void*)*4, x_6); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_16, x_2, x_3); -x_26 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_18); -lean::cnstr_set(x_26, 3, x_19); -lean::cnstr_set_scalar(x_26, sizeof(void*)*4, x_6); -return x_26; -} -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_28 = lean::cnstr_get(x_1, 0); -x_29 = lean::cnstr_get(x_1, 1); -x_30 = lean::cnstr_get(x_1, 2); -x_31 = lean::cnstr_get(x_1, 3); -x_32 = l_Lean_Name_quickLt(x_2, x_29); -if (x_32 == 0) -{ -uint8 x_33; -x_33 = l_Lean_Name_quickLt(x_29, x_2); -if (x_33 == 0) -{ -lean::dec(x_30); -lean::dec(x_29); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -uint8 x_34; -x_34 = l_RBNode_isRed___main___rarg(x_31); -if (x_34 == 0) -{ -obj* x_35; -x_35 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_31, x_2, x_3); -lean::cnstr_set(x_1, 3, x_35); -return x_1; -} -else -{ -obj* x_36; -x_36 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_31, x_2, x_3); -if (lean::obj_tag(x_36) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_28); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = lean::cnstr_get(x_36, 3); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; uint8 x_43; -x_40 = lean::cnstr_get(x_36, 3); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_36, 0); -lean::dec(x_41); -x_42 = 0; -lean::cnstr_set(x_36, 0, x_38); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_42); -x_43 = 1; -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_43); -return x_1; -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; uint8 x_48; -x_44 = lean::cnstr_get(x_36, 1); -x_45 = lean::cnstr_get(x_36, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_36); -x_46 = 0; -x_47 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_47, 0, x_38); -lean::cnstr_set(x_47, 1, x_44); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_38); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_46); -x_48 = 1; -lean::cnstr_set(x_1, 3, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_48); -return x_1; -} -} -else -{ -uint8 x_49; -x_49 = lean::cnstr_get_scalar(x_38, sizeof(void*)*4); -if (x_49 == 0) -{ -uint8 x_50; -x_50 = !lean::is_exclusive(x_36); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; uint8 x_55; -x_51 = lean::cnstr_get(x_36, 1); -x_52 = lean::cnstr_get(x_36, 2); -x_53 = lean::cnstr_get(x_36, 3); -lean::dec(x_53); -x_54 = lean::cnstr_get(x_36, 0); -lean::dec(x_54); -x_55 = !lean::is_exclusive(x_38); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_56 = lean::cnstr_get(x_38, 0); -x_57 = lean::cnstr_get(x_38, 1); -x_58 = lean::cnstr_get(x_38, 2); -x_59 = lean::cnstr_get(x_38, 3); -x_60 = 1; -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 2, x_30); -lean::cnstr_set(x_38, 1, x_29); -lean::cnstr_set(x_38, 0, x_28); -lean::cnstr_set_scalar(x_38, sizeof(void*)*4, x_60); -lean::cnstr_set(x_36, 3, x_59); -lean::cnstr_set(x_36, 2, x_58); -lean::cnstr_set(x_36, 1, x_57); -lean::cnstr_set(x_36, 0, x_56); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_60); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_38); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; obj* x_66; -x_61 = lean::cnstr_get(x_38, 0); -x_62 = lean::cnstr_get(x_38, 1); -x_63 = lean::cnstr_get(x_38, 2); -x_64 = lean::cnstr_get(x_38, 3); -lean::inc(x_64); -lean::inc(x_63); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_38); -x_65 = 1; -x_66 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_66, 0, x_28); -lean::cnstr_set(x_66, 1, x_29); -lean::cnstr_set(x_66, 2, x_30); -lean::cnstr_set(x_66, 3, x_37); -lean::cnstr_set_scalar(x_66, sizeof(void*)*4, x_65); -lean::cnstr_set(x_36, 3, x_64); -lean::cnstr_set(x_36, 2, x_63); -lean::cnstr_set(x_36, 1, x_62); -lean::cnstr_set(x_36, 0, x_61); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_65); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_66); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; -x_67 = lean::cnstr_get(x_36, 1); -x_68 = lean::cnstr_get(x_36, 2); -lean::inc(x_68); -lean::inc(x_67); -lean::dec(x_36); -x_69 = lean::cnstr_get(x_38, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_38, 1); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_38, 2); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_38, 3); -lean::inc(x_72); -if (lean::is_exclusive(x_38)) { - lean::cnstr_release(x_38, 0); - lean::cnstr_release(x_38, 1); - lean::cnstr_release(x_38, 2); - lean::cnstr_release(x_38, 3); - x_73 = x_38; -} else { - lean::dec_ref(x_38); - x_73 = lean::box(0); -} -x_74 = 1; -if (lean::is_scalar(x_73)) { - x_75 = lean::alloc_cnstr(1, 4, 1); -} else { - x_75 = x_73; -} -lean::cnstr_set(x_75, 0, x_28); -lean::cnstr_set(x_75, 1, x_29); -lean::cnstr_set(x_75, 2, x_30); -lean::cnstr_set(x_75, 3, x_37); -lean::cnstr_set_scalar(x_75, sizeof(void*)*4, x_74); -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_69); -lean::cnstr_set(x_76, 1, x_70); -lean::cnstr_set(x_76, 2, x_71); -lean::cnstr_set(x_76, 3, x_72); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_74); -lean::cnstr_set(x_1, 3, x_76); -lean::cnstr_set(x_1, 2, x_68); -lean::cnstr_set(x_1, 1, x_67); -lean::cnstr_set(x_1, 0, x_75); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -uint8 x_77; -x_77 = !lean::is_exclusive(x_36); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; uint8 x_80; -x_78 = lean::cnstr_get(x_36, 3); -lean::dec(x_78); -x_79 = lean::cnstr_get(x_36, 0); -lean::dec(x_79); -x_80 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_80); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_81; obj* x_82; uint8 x_83; obj* x_84; -x_81 = lean::cnstr_get(x_36, 1); -x_82 = lean::cnstr_get(x_36, 2); -lean::inc(x_82); -lean::inc(x_81); -lean::dec(x_36); -x_83 = 0; -x_84 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_84, 0, x_37); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_82); -lean::cnstr_set(x_84, 3, x_38); -lean::cnstr_set_scalar(x_84, sizeof(void*)*4, x_83); -lean::cnstr_set(x_1, 3, x_84); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -} -} -else -{ -uint8 x_85; -x_85 = lean::cnstr_get_scalar(x_37, sizeof(void*)*4); -if (x_85 == 0) -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_36); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_36, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_37); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint8 x_93; -x_89 = lean::cnstr_get(x_37, 0); -x_90 = lean::cnstr_get(x_37, 1); -x_91 = lean::cnstr_get(x_37, 2); -x_92 = lean::cnstr_get(x_37, 3); -x_93 = 1; -lean::cnstr_set(x_37, 3, x_89); -lean::cnstr_set(x_37, 2, x_30); -lean::cnstr_set(x_37, 1, x_29); -lean::cnstr_set(x_37, 0, x_28); -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_93); -lean::cnstr_set(x_36, 0, x_92); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_91); -lean::cnstr_set(x_1, 1, x_90); -lean::cnstr_set(x_1, 0, x_37); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; uint8 x_98; obj* x_99; -x_94 = lean::cnstr_get(x_37, 0); -x_95 = lean::cnstr_get(x_37, 1); -x_96 = lean::cnstr_get(x_37, 2); -x_97 = lean::cnstr_get(x_37, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_37); -x_98 = 1; -x_99 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_29); -lean::cnstr_set(x_99, 2, x_30); -lean::cnstr_set(x_99, 3, x_94); -lean::cnstr_set_scalar(x_99, sizeof(void*)*4, x_98); -lean::cnstr_set(x_36, 0, x_97); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_98); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_96); -lean::cnstr_set(x_1, 1, x_95); -lean::cnstr_set(x_1, 0, x_99); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; obj* x_110; -x_100 = lean::cnstr_get(x_36, 1); -x_101 = lean::cnstr_get(x_36, 2); -x_102 = lean::cnstr_get(x_36, 3); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_36); -x_103 = lean::cnstr_get(x_37, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_37, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_37, 2); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_37, 3); -lean::inc(x_106); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_107 = x_37; -} else { - lean::dec_ref(x_37); - x_107 = lean::box(0); -} -x_108 = 1; -if (lean::is_scalar(x_107)) { - x_109 = lean::alloc_cnstr(1, 4, 1); -} else { - x_109 = x_107; -} -lean::cnstr_set(x_109, 0, x_28); -lean::cnstr_set(x_109, 1, x_29); -lean::cnstr_set(x_109, 2, x_30); -lean::cnstr_set(x_109, 3, x_103); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -x_110 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_110, 0, x_106); -lean::cnstr_set(x_110, 1, x_100); -lean::cnstr_set(x_110, 2, x_101); -lean::cnstr_set(x_110, 3, x_102); -lean::cnstr_set_scalar(x_110, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_110); -lean::cnstr_set(x_1, 2, x_105); -lean::cnstr_set(x_1, 1, x_104); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_111; -x_111 = lean::cnstr_get(x_36, 3); -lean::inc(x_111); -if (lean::obj_tag(x_111) == 0) -{ -uint8 x_112; -x_112 = !lean::is_exclusive(x_36); -if (x_112 == 0) -{ -obj* x_113; obj* x_114; uint8 x_115; -x_113 = lean::cnstr_get(x_36, 3); -lean::dec(x_113); -x_114 = lean::cnstr_get(x_36, 0); -lean::dec(x_114); -x_115 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_115); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; -x_116 = lean::cnstr_get(x_36, 1); -x_117 = lean::cnstr_get(x_36, 2); -lean::inc(x_117); -lean::inc(x_116); -lean::dec(x_36); -x_118 = 0; -x_119 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_119, 0, x_37); -lean::cnstr_set(x_119, 1, x_116); -lean::cnstr_set(x_119, 2, x_117); -lean::cnstr_set(x_119, 3, x_111); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -uint8 x_120; -x_120 = lean::cnstr_get_scalar(x_111, sizeof(void*)*4); -if (x_120 == 0) -{ -uint8 x_121; -lean::free_heap_obj(x_1); -x_121 = !lean::is_exclusive(x_36); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; uint8 x_124; -x_122 = lean::cnstr_get(x_36, 3); -lean::dec(x_122); -x_123 = lean::cnstr_get(x_36, 0); -lean::dec(x_123); -x_124 = !lean::is_exclusive(x_111); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; uint8 x_129; -x_125 = lean::cnstr_get(x_111, 0); -x_126 = lean::cnstr_get(x_111, 1); -x_127 = lean::cnstr_get(x_111, 2); -x_128 = lean::cnstr_get(x_111, 3); -lean::inc(x_37); -lean::cnstr_set(x_111, 3, x_37); -lean::cnstr_set(x_111, 2, x_30); -lean::cnstr_set(x_111, 1, x_29); -lean::cnstr_set(x_111, 0, x_28); -x_129 = !lean::is_exclusive(x_37); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_130 = lean::cnstr_get(x_37, 3); -lean::dec(x_130); -x_131 = lean::cnstr_get(x_37, 2); -lean::dec(x_131); -x_132 = lean::cnstr_get(x_37, 1); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_37, 0); -lean::dec(x_133); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -lean::cnstr_set(x_37, 3, x_128); -lean::cnstr_set(x_37, 2, x_127); -lean::cnstr_set(x_37, 1, x_126); -lean::cnstr_set(x_37, 0, x_125); -lean::cnstr_set(x_36, 3, x_37); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -else -{ -obj* x_134; -lean::dec(x_37); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -x_134 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_134, 0, x_125); -lean::cnstr_set(x_134, 1, x_126); -lean::cnstr_set(x_134, 2, x_127); -lean::cnstr_set(x_134, 3, x_128); -lean::cnstr_set_scalar(x_134, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_134); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_135 = lean::cnstr_get(x_111, 0); -x_136 = lean::cnstr_get(x_111, 1); -x_137 = lean::cnstr_get(x_111, 2); -x_138 = lean::cnstr_get(x_111, 3); -lean::inc(x_138); -lean::inc(x_137); -lean::inc(x_136); -lean::inc(x_135); -lean::dec(x_111); -lean::inc(x_37); -x_139 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_139, 0, x_28); -lean::cnstr_set(x_139, 1, x_29); -lean::cnstr_set(x_139, 2, x_30); -lean::cnstr_set(x_139, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_140 = x_37; -} else { - lean::dec_ref(x_37); - x_140 = lean::box(0); -} -lean::cnstr_set_scalar(x_139, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(1, 4, 1); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_135); -lean::cnstr_set(x_141, 1, x_136); -lean::cnstr_set(x_141, 2, x_137); -lean::cnstr_set(x_141, 3, x_138); -lean::cnstr_set_scalar(x_141, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_141); -lean::cnstr_set(x_36, 0, x_139); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_142 = lean::cnstr_get(x_36, 1); -x_143 = lean::cnstr_get(x_36, 2); -lean::inc(x_143); -lean::inc(x_142); -lean::dec(x_36); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_111, 1); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_111, 2); -lean::inc(x_146); -x_147 = lean::cnstr_get(x_111, 3); -lean::inc(x_147); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - lean::cnstr_release(x_111, 2); - lean::cnstr_release(x_111, 3); - x_148 = x_111; -} else { - lean::dec_ref(x_111); - x_148 = lean::box(0); -} -lean::inc(x_37); -if (lean::is_scalar(x_148)) { - x_149 = lean::alloc_cnstr(1, 4, 1); -} else { - x_149 = x_148; -} -lean::cnstr_set(x_149, 0, x_28); -lean::cnstr_set(x_149, 1, x_29); -lean::cnstr_set(x_149, 2, x_30); -lean::cnstr_set(x_149, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_150 = x_37; -} else { - lean::dec_ref(x_37); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_144); -lean::cnstr_set(x_151, 1, x_145); -lean::cnstr_set(x_151, 2, x_146); -lean::cnstr_set(x_151, 3, x_147); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_85); -x_152 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_152, 0, x_149); -lean::cnstr_set(x_152, 1, x_142); -lean::cnstr_set(x_152, 2, x_143); -lean::cnstr_set(x_152, 3, x_151); -lean::cnstr_set_scalar(x_152, sizeof(void*)*4, x_120); -return x_152; -} -} -else -{ -uint8 x_153; -x_153 = !lean::is_exclusive(x_36); -if (x_153 == 0) -{ -obj* x_154; obj* x_155; uint8 x_156; -x_154 = lean::cnstr_get(x_36, 3); -lean::dec(x_154); -x_155 = lean::cnstr_get(x_36, 0); -lean::dec(x_155); -x_156 = !lean::is_exclusive(x_37); -if (x_156 == 0) -{ -uint8 x_157; -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_120); -x_157 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_157); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -else -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; uint8 x_163; -x_158 = lean::cnstr_get(x_37, 0); -x_159 = lean::cnstr_get(x_37, 1); -x_160 = lean::cnstr_get(x_37, 2); -x_161 = lean::cnstr_get(x_37, 3); -lean::inc(x_161); -lean::inc(x_160); -lean::inc(x_159); -lean::inc(x_158); -lean::dec(x_37); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_158); -lean::cnstr_set(x_162, 1, x_159); -lean::cnstr_set(x_162, 2, x_160); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_120); -x_163 = 0; -lean::cnstr_set(x_36, 0, x_162); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_163); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; uint8 x_172; obj* x_173; -x_164 = lean::cnstr_get(x_36, 1); -x_165 = lean::cnstr_get(x_36, 2); -lean::inc(x_165); -lean::inc(x_164); -lean::dec(x_36); -x_166 = lean::cnstr_get(x_37, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_37, 1); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_37, 2); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_37, 3); -lean::inc(x_169); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_170 = x_37; -} else { - lean::dec_ref(x_37); - x_170 = lean::box(0); -} -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(1, 4, 1); -} else { - x_171 = x_170; -} -lean::cnstr_set(x_171, 0, x_166); -lean::cnstr_set(x_171, 1, x_167); -lean::cnstr_set(x_171, 2, x_168); -lean::cnstr_set(x_171, 3, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*4, x_120); -x_172 = 0; -x_173 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_173, 0, x_171); -lean::cnstr_set(x_173, 1, x_164); -lean::cnstr_set(x_173, 2, x_165); -lean::cnstr_set(x_173, 3, x_111); -lean::cnstr_set_scalar(x_173, sizeof(void*)*4, x_172); -lean::cnstr_set(x_1, 3, x_173); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_174; -x_174 = l_RBNode_isRed___main___rarg(x_28); -if (x_174 == 0) -{ -obj* x_175; -x_175 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_28, x_2, x_3); -lean::cnstr_set(x_1, 0, x_175); -return x_1; -} -else -{ -obj* x_176; -x_176 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_28, x_2, x_3); -if (lean::obj_tag(x_176) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_31); -lean::dec(x_30); -lean::dec(x_29); -return x_176; -} -else -{ -obj* x_177; -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -if (lean::obj_tag(x_177) == 0) -{ -obj* x_178; -x_178 = lean::cnstr_get(x_176, 3); -lean::inc(x_178); -if (lean::obj_tag(x_178) == 0) -{ -uint8 x_179; -x_179 = !lean::is_exclusive(x_176); -if (x_179 == 0) -{ -obj* x_180; obj* x_181; uint8 x_182; uint8 x_183; -x_180 = lean::cnstr_get(x_176, 3); -lean::dec(x_180); -x_181 = lean::cnstr_get(x_176, 0); -lean::dec(x_181); -x_182 = 0; -lean::cnstr_set(x_176, 0, x_178); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_182); -x_183 = 1; -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_183); -return x_1; -} -else -{ -obj* x_184; obj* x_185; uint8 x_186; obj* x_187; uint8 x_188; -x_184 = lean::cnstr_get(x_176, 1); -x_185 = lean::cnstr_get(x_176, 2); -lean::inc(x_185); -lean::inc(x_184); -lean::dec(x_176); -x_186 = 0; -x_187 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_187, 0, x_178); -lean::cnstr_set(x_187, 1, x_184); -lean::cnstr_set(x_187, 2, x_185); -lean::cnstr_set(x_187, 3, x_178); -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_186); -x_188 = 1; -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_188); -return x_1; -} -} -else -{ -uint8 x_189; -x_189 = lean::cnstr_get_scalar(x_178, sizeof(void*)*4); -if (x_189 == 0) -{ -uint8 x_190; -x_190 = !lean::is_exclusive(x_176); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; uint8 x_195; -x_191 = lean::cnstr_get(x_176, 1); -x_192 = lean::cnstr_get(x_176, 2); -x_193 = lean::cnstr_get(x_176, 3); -lean::dec(x_193); -x_194 = lean::cnstr_get(x_176, 0); -lean::dec(x_194); -x_195 = !lean::is_exclusive(x_178); -if (x_195 == 0) -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; uint8 x_200; -x_196 = lean::cnstr_get(x_178, 0); -x_197 = lean::cnstr_get(x_178, 1); -x_198 = lean::cnstr_get(x_178, 2); -x_199 = lean::cnstr_get(x_178, 3); -x_200 = 1; -lean::cnstr_set(x_178, 3, x_196); -lean::cnstr_set(x_178, 2, x_192); -lean::cnstr_set(x_178, 1, x_191); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set_scalar(x_178, sizeof(void*)*4, x_200); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_199); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_200); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_198); -lean::cnstr_set(x_1, 1, x_197); -lean::cnstr_set(x_1, 0, x_178); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; obj* x_206; -x_201 = lean::cnstr_get(x_178, 0); -x_202 = lean::cnstr_get(x_178, 1); -x_203 = lean::cnstr_get(x_178, 2); -x_204 = lean::cnstr_get(x_178, 3); -lean::inc(x_204); -lean::inc(x_203); -lean::inc(x_202); -lean::inc(x_201); -lean::dec(x_178); -x_205 = 1; -x_206 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_206, 0, x_177); -lean::cnstr_set(x_206, 1, x_191); -lean::cnstr_set(x_206, 2, x_192); -lean::cnstr_set(x_206, 3, x_201); -lean::cnstr_set_scalar(x_206, sizeof(void*)*4, x_205); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_204); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_205); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_203); -lean::cnstr_set(x_1, 1, x_202); -lean::cnstr_set(x_1, 0, x_206); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; -x_207 = lean::cnstr_get(x_176, 1); -x_208 = lean::cnstr_get(x_176, 2); -lean::inc(x_208); -lean::inc(x_207); -lean::dec(x_176); -x_209 = lean::cnstr_get(x_178, 0); -lean::inc(x_209); -x_210 = lean::cnstr_get(x_178, 1); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_178, 2); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_178, 3); -lean::inc(x_212); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - lean::cnstr_release(x_178, 2); - lean::cnstr_release(x_178, 3); - x_213 = x_178; -} else { - lean::dec_ref(x_178); - x_213 = lean::box(0); -} -x_214 = 1; -if (lean::is_scalar(x_213)) { - x_215 = lean::alloc_cnstr(1, 4, 1); -} else { - x_215 = x_213; -} -lean::cnstr_set(x_215, 0, x_177); -lean::cnstr_set(x_215, 1, x_207); -lean::cnstr_set(x_215, 2, x_208); -lean::cnstr_set(x_215, 3, x_209); -lean::cnstr_set_scalar(x_215, sizeof(void*)*4, x_214); -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_212); -lean::cnstr_set(x_216, 1, x_29); -lean::cnstr_set(x_216, 2, x_30); -lean::cnstr_set(x_216, 3, x_31); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_214); -lean::cnstr_set(x_1, 3, x_216); -lean::cnstr_set(x_1, 2, x_211); -lean::cnstr_set(x_1, 1, x_210); -lean::cnstr_set(x_1, 0, x_215); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -uint8 x_217; -x_217 = !lean::is_exclusive(x_176); -if (x_217 == 0) -{ -obj* x_218; obj* x_219; uint8 x_220; -x_218 = lean::cnstr_get(x_176, 3); -lean::dec(x_218); -x_219 = lean::cnstr_get(x_176, 0); -lean::dec(x_219); -x_220 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_220); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_221; obj* x_222; uint8 x_223; obj* x_224; -x_221 = lean::cnstr_get(x_176, 1); -x_222 = lean::cnstr_get(x_176, 2); -lean::inc(x_222); -lean::inc(x_221); -lean::dec(x_176); -x_223 = 0; -x_224 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_224, 0, x_177); -lean::cnstr_set(x_224, 1, x_221); -lean::cnstr_set(x_224, 2, x_222); -lean::cnstr_set(x_224, 3, x_178); -lean::cnstr_set_scalar(x_224, sizeof(void*)*4, x_223); -lean::cnstr_set(x_1, 0, x_224); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -} -} -else -{ -uint8 x_225; -x_225 = lean::cnstr_get_scalar(x_177, sizeof(void*)*4); -if (x_225 == 0) -{ -uint8 x_226; -x_226 = !lean::is_exclusive(x_176); -if (x_226 == 0) -{ -obj* x_227; obj* x_228; obj* x_229; obj* x_230; uint8 x_231; -x_227 = lean::cnstr_get(x_176, 1); -x_228 = lean::cnstr_get(x_176, 2); -x_229 = lean::cnstr_get(x_176, 3); -x_230 = lean::cnstr_get(x_176, 0); -lean::dec(x_230); -x_231 = !lean::is_exclusive(x_177); -if (x_231 == 0) -{ -uint8 x_232; -x_232 = 1; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_232); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_232); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_177); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; uint8 x_237; obj* x_238; -x_233 = lean::cnstr_get(x_177, 0); -x_234 = lean::cnstr_get(x_177, 1); -x_235 = lean::cnstr_get(x_177, 2); -x_236 = lean::cnstr_get(x_177, 3); -lean::inc(x_236); -lean::inc(x_235); -lean::inc(x_234); -lean::inc(x_233); -lean::dec(x_177); -x_237 = 1; -x_238 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_238, 0, x_233); -lean::cnstr_set(x_238, 1, x_234); -lean::cnstr_set(x_238, 2, x_235); -lean::cnstr_set(x_238, 3, x_236); -lean::cnstr_set_scalar(x_238, sizeof(void*)*4, x_237); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_237); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_238); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; obj* x_249; -x_239 = lean::cnstr_get(x_176, 1); -x_240 = lean::cnstr_get(x_176, 2); -x_241 = lean::cnstr_get(x_176, 3); -lean::inc(x_241); -lean::inc(x_240); -lean::inc(x_239); -lean::dec(x_176); -x_242 = lean::cnstr_get(x_177, 0); -lean::inc(x_242); -x_243 = lean::cnstr_get(x_177, 1); -lean::inc(x_243); -x_244 = lean::cnstr_get(x_177, 2); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_177, 3); -lean::inc(x_245); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_246 = x_177; -} else { - lean::dec_ref(x_177); - x_246 = lean::box(0); -} -x_247 = 1; -if (lean::is_scalar(x_246)) { - x_248 = lean::alloc_cnstr(1, 4, 1); -} else { - x_248 = x_246; -} -lean::cnstr_set(x_248, 0, x_242); -lean::cnstr_set(x_248, 1, x_243); -lean::cnstr_set(x_248, 2, x_244); -lean::cnstr_set(x_248, 3, x_245); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -x_249 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_249, 0, x_241); -lean::cnstr_set(x_249, 1, x_29); -lean::cnstr_set(x_249, 2, x_30); -lean::cnstr_set(x_249, 3, x_31); -lean::cnstr_set_scalar(x_249, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_249); -lean::cnstr_set(x_1, 2, x_240); -lean::cnstr_set(x_1, 1, x_239); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_250; -x_250 = lean::cnstr_get(x_176, 3); -lean::inc(x_250); -if (lean::obj_tag(x_250) == 0) -{ -uint8 x_251; -x_251 = !lean::is_exclusive(x_176); -if (x_251 == 0) -{ -obj* x_252; obj* x_253; uint8 x_254; -x_252 = lean::cnstr_get(x_176, 3); -lean::dec(x_252); -x_253 = lean::cnstr_get(x_176, 0); -lean::dec(x_253); -x_254 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_254); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_255; obj* x_256; uint8 x_257; obj* x_258; -x_255 = lean::cnstr_get(x_176, 1); -x_256 = lean::cnstr_get(x_176, 2); -lean::inc(x_256); -lean::inc(x_255); -lean::dec(x_176); -x_257 = 0; -x_258 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_258, 0, x_177); -lean::cnstr_set(x_258, 1, x_255); -lean::cnstr_set(x_258, 2, x_256); -lean::cnstr_set(x_258, 3, x_250); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -uint8 x_259; -x_259 = lean::cnstr_get_scalar(x_250, sizeof(void*)*4); -if (x_259 == 0) -{ -uint8 x_260; -lean::free_heap_obj(x_1); -x_260 = !lean::is_exclusive(x_176); -if (x_260 == 0) -{ -obj* x_261; obj* x_262; obj* x_263; obj* x_264; uint8 x_265; -x_261 = lean::cnstr_get(x_176, 1); -x_262 = lean::cnstr_get(x_176, 2); -x_263 = lean::cnstr_get(x_176, 3); -lean::dec(x_263); -x_264 = lean::cnstr_get(x_176, 0); -lean::dec(x_264); -x_265 = !lean::is_exclusive(x_250); -if (x_265 == 0) -{ -obj* x_266; obj* x_267; obj* x_268; obj* x_269; uint8 x_270; -x_266 = lean::cnstr_get(x_250, 0); -x_267 = lean::cnstr_get(x_250, 1); -x_268 = lean::cnstr_get(x_250, 2); -x_269 = lean::cnstr_get(x_250, 3); -lean::inc(x_177); -lean::cnstr_set(x_250, 3, x_266); -lean::cnstr_set(x_250, 2, x_262); -lean::cnstr_set(x_250, 1, x_261); -lean::cnstr_set(x_250, 0, x_177); -x_270 = !lean::is_exclusive(x_177); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; -x_271 = lean::cnstr_get(x_177, 3); -lean::dec(x_271); -x_272 = lean::cnstr_get(x_177, 2); -lean::dec(x_272); -x_273 = lean::cnstr_get(x_177, 1); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_177, 0); -lean::dec(x_274); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -lean::cnstr_set(x_177, 3, x_31); -lean::cnstr_set(x_177, 2, x_30); -lean::cnstr_set(x_177, 1, x_29); -lean::cnstr_set(x_177, 0, x_269); -lean::cnstr_set(x_176, 3, x_177); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -else -{ -obj* x_275; -lean::dec(x_177); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -x_275 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_275, 0, x_269); -lean::cnstr_set(x_275, 1, x_29); -lean::cnstr_set(x_275, 2, x_30); -lean::cnstr_set(x_275, 3, x_31); -lean::cnstr_set_scalar(x_275, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_275); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -x_276 = lean::cnstr_get(x_250, 0); -x_277 = lean::cnstr_get(x_250, 1); -x_278 = lean::cnstr_get(x_250, 2); -x_279 = lean::cnstr_get(x_250, 3); -lean::inc(x_279); -lean::inc(x_278); -lean::inc(x_277); -lean::inc(x_276); -lean::dec(x_250); -lean::inc(x_177); -x_280 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_280, 0, x_177); -lean::cnstr_set(x_280, 1, x_261); -lean::cnstr_set(x_280, 2, x_262); -lean::cnstr_set(x_280, 3, x_276); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_281 = x_177; -} else { - lean::dec_ref(x_177); - x_281 = lean::box(0); -} -lean::cnstr_set_scalar(x_280, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_281)) { - x_282 = lean::alloc_cnstr(1, 4, 1); -} else { - x_282 = x_281; -} -lean::cnstr_set(x_282, 0, x_279); -lean::cnstr_set(x_282, 1, x_29); -lean::cnstr_set(x_282, 2, x_30); -lean::cnstr_set(x_282, 3, x_31); -lean::cnstr_set_scalar(x_282, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_282); -lean::cnstr_set(x_176, 2, x_278); -lean::cnstr_set(x_176, 1, x_277); -lean::cnstr_set(x_176, 0, x_280); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_283 = lean::cnstr_get(x_176, 1); -x_284 = lean::cnstr_get(x_176, 2); -lean::inc(x_284); -lean::inc(x_283); -lean::dec(x_176); -x_285 = lean::cnstr_get(x_250, 0); -lean::inc(x_285); -x_286 = lean::cnstr_get(x_250, 1); -lean::inc(x_286); -x_287 = lean::cnstr_get(x_250, 2); -lean::inc(x_287); -x_288 = lean::cnstr_get(x_250, 3); -lean::inc(x_288); -if (lean::is_exclusive(x_250)) { - lean::cnstr_release(x_250, 0); - lean::cnstr_release(x_250, 1); - lean::cnstr_release(x_250, 2); - lean::cnstr_release(x_250, 3); - x_289 = x_250; -} else { - lean::dec_ref(x_250); - x_289 = lean::box(0); -} -lean::inc(x_177); -if (lean::is_scalar(x_289)) { - x_290 = lean::alloc_cnstr(1, 4, 1); -} else { - x_290 = x_289; -} -lean::cnstr_set(x_290, 0, x_177); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_285); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_291 = x_177; -} else { - lean::dec_ref(x_177); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_288); -lean::cnstr_set(x_292, 1, x_29); -lean::cnstr_set(x_292, 2, x_30); -lean::cnstr_set(x_292, 3, x_31); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_225); -x_293 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_293, 0, x_290); -lean::cnstr_set(x_293, 1, x_286); -lean::cnstr_set(x_293, 2, x_287); -lean::cnstr_set(x_293, 3, x_292); -lean::cnstr_set_scalar(x_293, sizeof(void*)*4, x_259); -return x_293; -} -} -else -{ -uint8 x_294; -x_294 = !lean::is_exclusive(x_176); -if (x_294 == 0) -{ -obj* x_295; obj* x_296; uint8 x_297; -x_295 = lean::cnstr_get(x_176, 3); -lean::dec(x_295); -x_296 = lean::cnstr_get(x_176, 0); -lean::dec(x_296); -x_297 = !lean::is_exclusive(x_177); -if (x_297 == 0) -{ -uint8 x_298; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_259); -x_298 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_298); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -else -{ -obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; uint8 x_304; -x_299 = lean::cnstr_get(x_177, 0); -x_300 = lean::cnstr_get(x_177, 1); -x_301 = lean::cnstr_get(x_177, 2); -x_302 = lean::cnstr_get(x_177, 3); -lean::inc(x_302); -lean::inc(x_301); -lean::inc(x_300); -lean::inc(x_299); -lean::dec(x_177); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_299); -lean::cnstr_set(x_303, 1, x_300); -lean::cnstr_set(x_303, 2, x_301); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_259); -x_304 = 0; -lean::cnstr_set(x_176, 0, x_303); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_304); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -else -{ -obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; uint8 x_313; obj* x_314; -x_305 = lean::cnstr_get(x_176, 1); -x_306 = lean::cnstr_get(x_176, 2); -lean::inc(x_306); -lean::inc(x_305); -lean::dec(x_176); -x_307 = lean::cnstr_get(x_177, 0); -lean::inc(x_307); -x_308 = lean::cnstr_get(x_177, 1); -lean::inc(x_308); -x_309 = lean::cnstr_get(x_177, 2); -lean::inc(x_309); -x_310 = lean::cnstr_get(x_177, 3); -lean::inc(x_310); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_311 = x_177; -} else { - lean::dec_ref(x_177); - x_311 = lean::box(0); -} -if (lean::is_scalar(x_311)) { - x_312 = lean::alloc_cnstr(1, 4, 1); -} else { - x_312 = x_311; -} -lean::cnstr_set(x_312, 0, x_307); -lean::cnstr_set(x_312, 1, x_308); -lean::cnstr_set(x_312, 2, x_309); -lean::cnstr_set(x_312, 3, x_310); -lean::cnstr_set_scalar(x_312, sizeof(void*)*4, x_259); -x_313 = 0; -x_314 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_314, 0, x_312); -lean::cnstr_set(x_314, 1, x_305); -lean::cnstr_set(x_314, 2, x_306); -lean::cnstr_set(x_314, 3, x_250); -lean::cnstr_set_scalar(x_314, sizeof(void*)*4, x_313); -lean::cnstr_set(x_1, 0, x_314); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; uint8 x_319; -x_315 = lean::cnstr_get(x_1, 0); -x_316 = lean::cnstr_get(x_1, 1); -x_317 = lean::cnstr_get(x_1, 2); -x_318 = lean::cnstr_get(x_1, 3); -lean::inc(x_318); -lean::inc(x_317); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_1); -x_319 = l_Lean_Name_quickLt(x_2, x_316); -if (x_319 == 0) -{ -uint8 x_320; -x_320 = l_Lean_Name_quickLt(x_316, x_2); -if (x_320 == 0) -{ -obj* x_321; -lean::dec(x_317); -lean::dec(x_316); -x_321 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_321, 0, x_315); -lean::cnstr_set(x_321, 1, x_2); -lean::cnstr_set(x_321, 2, x_3); -lean::cnstr_set(x_321, 3, x_318); -lean::cnstr_set_scalar(x_321, sizeof(void*)*4, x_6); -return x_321; -} -else -{ -uint8 x_322; -x_322 = l_RBNode_isRed___main___rarg(x_318); -if (x_322 == 0) -{ -obj* x_323; obj* x_324; -x_323 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_318, x_2, x_3); -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_315); -lean::cnstr_set(x_324, 1, x_316); -lean::cnstr_set(x_324, 2, x_317); -lean::cnstr_set(x_324, 3, x_323); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_6); -return x_324; -} -else -{ -obj* x_325; -x_325 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_318, x_2, x_3); -if (lean::obj_tag(x_325) == 0) -{ -lean::dec(x_317); -lean::dec(x_316); -lean::dec(x_315); -return x_325; -} -else -{ -obj* x_326; -x_326 = lean::cnstr_get(x_325, 0); -lean::inc(x_326); -if (lean::obj_tag(x_326) == 0) -{ -obj* x_327; -x_327 = lean::cnstr_get(x_325, 3); -lean::inc(x_327); -if (lean::obj_tag(x_327) == 0) -{ -obj* x_328; obj* x_329; obj* x_330; uint8 x_331; obj* x_332; uint8 x_333; obj* x_334; -x_328 = lean::cnstr_get(x_325, 1); -lean::inc(x_328); -x_329 = lean::cnstr_get(x_325, 2); -lean::inc(x_329); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_330 = x_325; -} else { - lean::dec_ref(x_325); - x_330 = lean::box(0); -} -x_331 = 0; -if (lean::is_scalar(x_330)) { - x_332 = lean::alloc_cnstr(1, 4, 1); -} else { - x_332 = x_330; -} -lean::cnstr_set(x_332, 0, x_327); -lean::cnstr_set(x_332, 1, x_328); -lean::cnstr_set(x_332, 2, x_329); -lean::cnstr_set(x_332, 3, x_327); -lean::cnstr_set_scalar(x_332, sizeof(void*)*4, x_331); -x_333 = 1; -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_315); -lean::cnstr_set(x_334, 1, x_316); -lean::cnstr_set(x_334, 2, x_317); -lean::cnstr_set(x_334, 3, x_332); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_333); -return x_334; -} -else -{ -uint8 x_335; -x_335 = lean::cnstr_get_scalar(x_327, sizeof(void*)*4); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; obj* x_346; obj* x_347; -x_336 = lean::cnstr_get(x_325, 1); -lean::inc(x_336); -x_337 = lean::cnstr_get(x_325, 2); -lean::inc(x_337); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_338 = x_325; -} else { - lean::dec_ref(x_325); - x_338 = lean::box(0); -} -x_339 = lean::cnstr_get(x_327, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get(x_327, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_327, 2); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_327, 3); -lean::inc(x_342); -if (lean::is_exclusive(x_327)) { - lean::cnstr_release(x_327, 0); - lean::cnstr_release(x_327, 1); - lean::cnstr_release(x_327, 2); - lean::cnstr_release(x_327, 3); - x_343 = x_327; -} else { - lean::dec_ref(x_327); - x_343 = lean::box(0); -} -x_344 = 1; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_315); -lean::cnstr_set(x_345, 1, x_316); -lean::cnstr_set(x_345, 2, x_317); -lean::cnstr_set(x_345, 3, x_326); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -if (lean::is_scalar(x_338)) { - x_346 = lean::alloc_cnstr(1, 4, 1); -} else { - x_346 = x_338; -} -lean::cnstr_set(x_346, 0, x_339); -lean::cnstr_set(x_346, 1, x_340); -lean::cnstr_set(x_346, 2, x_341); -lean::cnstr_set(x_346, 3, x_342); -lean::cnstr_set_scalar(x_346, sizeof(void*)*4, x_344); -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_345); -lean::cnstr_set(x_347, 1, x_336); -lean::cnstr_set(x_347, 2, x_337); -lean::cnstr_set(x_347, 3, x_346); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_335); -return x_347; -} -else -{ -obj* x_348; obj* x_349; obj* x_350; uint8 x_351; obj* x_352; obj* x_353; -x_348 = lean::cnstr_get(x_325, 1); -lean::inc(x_348); -x_349 = lean::cnstr_get(x_325, 2); -lean::inc(x_349); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_350 = x_325; -} else { - lean::dec_ref(x_325); - x_350 = lean::box(0); -} -x_351 = 0; -if (lean::is_scalar(x_350)) { - x_352 = lean::alloc_cnstr(1, 4, 1); -} else { - x_352 = x_350; -} -lean::cnstr_set(x_352, 0, x_326); -lean::cnstr_set(x_352, 1, x_348); -lean::cnstr_set(x_352, 2, x_349); -lean::cnstr_set(x_352, 3, x_327); -lean::cnstr_set_scalar(x_352, sizeof(void*)*4, x_351); -x_353 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_353, 0, x_315); -lean::cnstr_set(x_353, 1, x_316); -lean::cnstr_set(x_353, 2, x_317); -lean::cnstr_set(x_353, 3, x_352); -lean::cnstr_set_scalar(x_353, sizeof(void*)*4, x_335); -return x_353; -} -} -} -else -{ -uint8 x_354; -x_354 = lean::cnstr_get_scalar(x_326, sizeof(void*)*4); -if (x_354 == 0) -{ -obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; obj* x_367; -x_355 = lean::cnstr_get(x_325, 1); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_325, 2); -lean::inc(x_356); -x_357 = lean::cnstr_get(x_325, 3); -lean::inc(x_357); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_358 = x_325; -} else { - lean::dec_ref(x_325); - x_358 = lean::box(0); -} -x_359 = lean::cnstr_get(x_326, 0); -lean::inc(x_359); -x_360 = lean::cnstr_get(x_326, 1); -lean::inc(x_360); -x_361 = lean::cnstr_get(x_326, 2); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_326, 3); -lean::inc(x_362); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_363 = x_326; -} else { - lean::dec_ref(x_326); - x_363 = lean::box(0); -} -x_364 = 1; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_315); -lean::cnstr_set(x_365, 1, x_316); -lean::cnstr_set(x_365, 2, x_317); -lean::cnstr_set(x_365, 3, x_359); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -if (lean::is_scalar(x_358)) { - x_366 = lean::alloc_cnstr(1, 4, 1); -} else { - x_366 = x_358; -} -lean::cnstr_set(x_366, 0, x_362); -lean::cnstr_set(x_366, 1, x_355); -lean::cnstr_set(x_366, 2, x_356); -lean::cnstr_set(x_366, 3, x_357); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_364); -x_367 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_360); -lean::cnstr_set(x_367, 2, x_361); -lean::cnstr_set(x_367, 3, x_366); -lean::cnstr_set_scalar(x_367, sizeof(void*)*4, x_354); -return x_367; -} -else -{ -obj* x_368; -x_368 = lean::cnstr_get(x_325, 3); -lean::inc(x_368); -if (lean::obj_tag(x_368) == 0) -{ -obj* x_369; obj* x_370; obj* x_371; uint8 x_372; obj* x_373; obj* x_374; -x_369 = lean::cnstr_get(x_325, 1); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_325, 2); -lean::inc(x_370); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_371 = x_325; -} else { - lean::dec_ref(x_325); - x_371 = lean::box(0); -} -x_372 = 0; -if (lean::is_scalar(x_371)) { - x_373 = lean::alloc_cnstr(1, 4, 1); -} else { - x_373 = x_371; -} -lean::cnstr_set(x_373, 0, x_326); -lean::cnstr_set(x_373, 1, x_369); -lean::cnstr_set(x_373, 2, x_370); -lean::cnstr_set(x_373, 3, x_368); -lean::cnstr_set_scalar(x_373, sizeof(void*)*4, x_372); -x_374 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_374, 0, x_315); -lean::cnstr_set(x_374, 1, x_316); -lean::cnstr_set(x_374, 2, x_317); -lean::cnstr_set(x_374, 3, x_373); -lean::cnstr_set_scalar(x_374, sizeof(void*)*4, x_354); -return x_374; -} -else -{ -uint8 x_375; -x_375 = lean::cnstr_get_scalar(x_368, sizeof(void*)*4); -if (x_375 == 0) -{ -obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; -x_376 = lean::cnstr_get(x_325, 1); -lean::inc(x_376); -x_377 = lean::cnstr_get(x_325, 2); -lean::inc(x_377); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_378 = x_325; -} else { - lean::dec_ref(x_325); - x_378 = lean::box(0); -} -x_379 = lean::cnstr_get(x_368, 0); -lean::inc(x_379); -x_380 = lean::cnstr_get(x_368, 1); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_368, 2); -lean::inc(x_381); -x_382 = lean::cnstr_get(x_368, 3); -lean::inc(x_382); -if (lean::is_exclusive(x_368)) { - lean::cnstr_release(x_368, 0); - lean::cnstr_release(x_368, 1); - lean::cnstr_release(x_368, 2); - lean::cnstr_release(x_368, 3); - x_383 = x_368; -} else { - lean::dec_ref(x_368); - x_383 = lean::box(0); -} -lean::inc(x_326); -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(1, 4, 1); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_315); -lean::cnstr_set(x_384, 1, x_316); -lean::cnstr_set(x_384, 2, x_317); -lean::cnstr_set(x_384, 3, x_326); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_385 = x_326; -} else { - lean::dec_ref(x_326); - x_385 = lean::box(0); -} -lean::cnstr_set_scalar(x_384, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_385)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_385; -} -lean::cnstr_set(x_386, 0, x_379); -lean::cnstr_set(x_386, 1, x_380); -lean::cnstr_set(x_386, 2, x_381); -lean::cnstr_set(x_386, 3, x_382); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_378)) { - x_387 = lean::alloc_cnstr(1, 4, 1); -} else { - x_387 = x_378; -} -lean::cnstr_set(x_387, 0, x_384); -lean::cnstr_set(x_387, 1, x_376); -lean::cnstr_set(x_387, 2, x_377); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_375); -return x_387; -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; uint8 x_397; obj* x_398; obj* x_399; -x_388 = lean::cnstr_get(x_325, 1); -lean::inc(x_388); -x_389 = lean::cnstr_get(x_325, 2); -lean::inc(x_389); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_390 = x_325; -} else { - lean::dec_ref(x_325); - x_390 = lean::box(0); -} -x_391 = lean::cnstr_get(x_326, 0); -lean::inc(x_391); -x_392 = lean::cnstr_get(x_326, 1); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_326, 2); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_326, 3); -lean::inc(x_394); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_395 = x_326; -} else { - lean::dec_ref(x_326); - x_395 = lean::box(0); -} -if (lean::is_scalar(x_395)) { - x_396 = lean::alloc_cnstr(1, 4, 1); -} else { - x_396 = x_395; -} -lean::cnstr_set(x_396, 0, x_391); -lean::cnstr_set(x_396, 1, x_392); -lean::cnstr_set(x_396, 2, x_393); -lean::cnstr_set(x_396, 3, x_394); -lean::cnstr_set_scalar(x_396, sizeof(void*)*4, x_375); -x_397 = 0; -if (lean::is_scalar(x_390)) { - x_398 = lean::alloc_cnstr(1, 4, 1); -} else { - x_398 = x_390; -} -lean::cnstr_set(x_398, 0, x_396); -lean::cnstr_set(x_398, 1, x_388); -lean::cnstr_set(x_398, 2, x_389); -lean::cnstr_set(x_398, 3, x_368); -lean::cnstr_set_scalar(x_398, sizeof(void*)*4, x_397); -x_399 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_399, 0, x_315); -lean::cnstr_set(x_399, 1, x_316); -lean::cnstr_set(x_399, 2, x_317); -lean::cnstr_set(x_399, 3, x_398); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_375); -return x_399; -} -} -} -} -} -} -} -} -else -{ -uint8 x_400; -x_400 = l_RBNode_isRed___main___rarg(x_315); -if (x_400 == 0) -{ -obj* x_401; obj* x_402; -x_401 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_315, x_2, x_3); -x_402 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_402, 0, x_401); -lean::cnstr_set(x_402, 1, x_316); -lean::cnstr_set(x_402, 2, x_317); -lean::cnstr_set(x_402, 3, x_318); -lean::cnstr_set_scalar(x_402, sizeof(void*)*4, x_6); -return x_402; -} -else -{ -obj* x_403; -x_403 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_315, x_2, x_3); -if (lean::obj_tag(x_403) == 0) -{ -lean::dec(x_318); -lean::dec(x_317); -lean::dec(x_316); -return x_403; -} -else -{ -obj* x_404; -x_404 = lean::cnstr_get(x_403, 0); -lean::inc(x_404); -if (lean::obj_tag(x_404) == 0) -{ -obj* x_405; -x_405 = lean::cnstr_get(x_403, 3); -lean::inc(x_405); -if (lean::obj_tag(x_405) == 0) -{ -obj* x_406; obj* x_407; obj* x_408; uint8 x_409; obj* x_410; uint8 x_411; obj* x_412; -x_406 = lean::cnstr_get(x_403, 1); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_403, 2); -lean::inc(x_407); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_408 = x_403; -} else { - lean::dec_ref(x_403); - x_408 = lean::box(0); -} -x_409 = 0; -if (lean::is_scalar(x_408)) { - x_410 = lean::alloc_cnstr(1, 4, 1); -} else { - x_410 = x_408; -} -lean::cnstr_set(x_410, 0, x_405); -lean::cnstr_set(x_410, 1, x_406); -lean::cnstr_set(x_410, 2, x_407); -lean::cnstr_set(x_410, 3, x_405); -lean::cnstr_set_scalar(x_410, sizeof(void*)*4, x_409); -x_411 = 1; -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_410); -lean::cnstr_set(x_412, 1, x_316); -lean::cnstr_set(x_412, 2, x_317); -lean::cnstr_set(x_412, 3, x_318); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_411); -return x_412; -} -else -{ -uint8 x_413; -x_413 = lean::cnstr_get_scalar(x_405, sizeof(void*)*4); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; obj* x_424; obj* x_425; -x_414 = lean::cnstr_get(x_403, 1); -lean::inc(x_414); -x_415 = lean::cnstr_get(x_403, 2); -lean::inc(x_415); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_416 = x_403; -} else { - lean::dec_ref(x_403); - x_416 = lean::box(0); -} -x_417 = lean::cnstr_get(x_405, 0); -lean::inc(x_417); -x_418 = lean::cnstr_get(x_405, 1); -lean::inc(x_418); -x_419 = lean::cnstr_get(x_405, 2); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_405, 3); -lean::inc(x_420); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - lean::cnstr_release(x_405, 2); - lean::cnstr_release(x_405, 3); - x_421 = x_405; -} else { - lean::dec_ref(x_405); - x_421 = lean::box(0); -} -x_422 = 1; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_404); -lean::cnstr_set(x_423, 1, x_414); -lean::cnstr_set(x_423, 2, x_415); -lean::cnstr_set(x_423, 3, x_417); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -if (lean::is_scalar(x_416)) { - x_424 = lean::alloc_cnstr(1, 4, 1); -} else { - x_424 = x_416; -} -lean::cnstr_set(x_424, 0, x_420); -lean::cnstr_set(x_424, 1, x_316); -lean::cnstr_set(x_424, 2, x_317); -lean::cnstr_set(x_424, 3, x_318); -lean::cnstr_set_scalar(x_424, sizeof(void*)*4, x_422); -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_418); -lean::cnstr_set(x_425, 2, x_419); -lean::cnstr_set(x_425, 3, x_424); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_413); -return x_425; -} -else -{ -obj* x_426; obj* x_427; obj* x_428; uint8 x_429; obj* x_430; obj* x_431; -x_426 = lean::cnstr_get(x_403, 1); -lean::inc(x_426); -x_427 = lean::cnstr_get(x_403, 2); -lean::inc(x_427); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_428 = x_403; -} else { - lean::dec_ref(x_403); - x_428 = lean::box(0); -} -x_429 = 0; -if (lean::is_scalar(x_428)) { - x_430 = lean::alloc_cnstr(1, 4, 1); -} else { - x_430 = x_428; -} -lean::cnstr_set(x_430, 0, x_404); -lean::cnstr_set(x_430, 1, x_426); -lean::cnstr_set(x_430, 2, x_427); -lean::cnstr_set(x_430, 3, x_405); -lean::cnstr_set_scalar(x_430, sizeof(void*)*4, x_429); -x_431 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_431, 0, x_430); -lean::cnstr_set(x_431, 1, x_316); -lean::cnstr_set(x_431, 2, x_317); -lean::cnstr_set(x_431, 3, x_318); -lean::cnstr_set_scalar(x_431, sizeof(void*)*4, x_413); -return x_431; -} -} -} -else -{ -uint8 x_432; -x_432 = lean::cnstr_get_scalar(x_404, sizeof(void*)*4); -if (x_432 == 0) -{ -obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; obj* x_445; -x_433 = lean::cnstr_get(x_403, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_403, 2); -lean::inc(x_434); -x_435 = lean::cnstr_get(x_403, 3); -lean::inc(x_435); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_436 = x_403; -} else { - lean::dec_ref(x_403); - x_436 = lean::box(0); -} -x_437 = lean::cnstr_get(x_404, 0); -lean::inc(x_437); -x_438 = lean::cnstr_get(x_404, 1); -lean::inc(x_438); -x_439 = lean::cnstr_get(x_404, 2); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_404, 3); -lean::inc(x_440); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_441 = x_404; -} else { - lean::dec_ref(x_404); - x_441 = lean::box(0); -} -x_442 = 1; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_437); -lean::cnstr_set(x_443, 1, x_438); -lean::cnstr_set(x_443, 2, x_439); -lean::cnstr_set(x_443, 3, x_440); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -if (lean::is_scalar(x_436)) { - x_444 = lean::alloc_cnstr(1, 4, 1); -} else { - x_444 = x_436; -} -lean::cnstr_set(x_444, 0, x_435); -lean::cnstr_set(x_444, 1, x_316); -lean::cnstr_set(x_444, 2, x_317); -lean::cnstr_set(x_444, 3, x_318); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_442); -x_445 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_445, 0, x_443); -lean::cnstr_set(x_445, 1, x_433); -lean::cnstr_set(x_445, 2, x_434); -lean::cnstr_set(x_445, 3, x_444); -lean::cnstr_set_scalar(x_445, sizeof(void*)*4, x_432); -return x_445; -} -else -{ -obj* x_446; -x_446 = lean::cnstr_get(x_403, 3); -lean::inc(x_446); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; uint8 x_450; obj* x_451; obj* x_452; -x_447 = lean::cnstr_get(x_403, 1); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_403, 2); -lean::inc(x_448); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_449 = x_403; -} else { - lean::dec_ref(x_403); - x_449 = lean::box(0); -} -x_450 = 0; -if (lean::is_scalar(x_449)) { - x_451 = lean::alloc_cnstr(1, 4, 1); -} else { - x_451 = x_449; -} -lean::cnstr_set(x_451, 0, x_404); -lean::cnstr_set(x_451, 1, x_447); -lean::cnstr_set(x_451, 2, x_448); -lean::cnstr_set(x_451, 3, x_446); -lean::cnstr_set_scalar(x_451, sizeof(void*)*4, x_450); -x_452 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_452, 0, x_451); -lean::cnstr_set(x_452, 1, x_316); -lean::cnstr_set(x_452, 2, x_317); -lean::cnstr_set(x_452, 3, x_318); -lean::cnstr_set_scalar(x_452, sizeof(void*)*4, x_432); -return x_452; -} -else -{ -uint8 x_453; -x_453 = lean::cnstr_get_scalar(x_446, sizeof(void*)*4); -if (x_453 == 0) -{ -obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; obj* x_465; -x_454 = lean::cnstr_get(x_403, 1); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_403, 2); -lean::inc(x_455); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_456 = x_403; -} else { - lean::dec_ref(x_403); - x_456 = lean::box(0); -} -x_457 = lean::cnstr_get(x_446, 0); -lean::inc(x_457); -x_458 = lean::cnstr_get(x_446, 1); -lean::inc(x_458); -x_459 = lean::cnstr_get(x_446, 2); -lean::inc(x_459); -x_460 = lean::cnstr_get(x_446, 3); -lean::inc(x_460); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - lean::cnstr_release(x_446, 1); - lean::cnstr_release(x_446, 2); - lean::cnstr_release(x_446, 3); - x_461 = x_446; -} else { - lean::dec_ref(x_446); - x_461 = lean::box(0); -} -lean::inc(x_404); -if (lean::is_scalar(x_461)) { - x_462 = lean::alloc_cnstr(1, 4, 1); -} else { - x_462 = x_461; -} -lean::cnstr_set(x_462, 0, x_404); -lean::cnstr_set(x_462, 1, x_454); -lean::cnstr_set(x_462, 2, x_455); -lean::cnstr_set(x_462, 3, x_457); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_463 = x_404; -} else { - lean::dec_ref(x_404); - x_463 = lean::box(0); -} -lean::cnstr_set_scalar(x_462, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_463)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_463; -} -lean::cnstr_set(x_464, 0, x_460); -lean::cnstr_set(x_464, 1, x_316); -lean::cnstr_set(x_464, 2, x_317); -lean::cnstr_set(x_464, 3, x_318); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_456)) { - x_465 = lean::alloc_cnstr(1, 4, 1); -} else { - x_465 = x_456; -} -lean::cnstr_set(x_465, 0, x_462); -lean::cnstr_set(x_465, 1, x_458); -lean::cnstr_set(x_465, 2, x_459); -lean::cnstr_set(x_465, 3, x_464); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_453); -return x_465; -} -else -{ -obj* x_466; obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; uint8 x_475; obj* x_476; obj* x_477; -x_466 = lean::cnstr_get(x_403, 1); -lean::inc(x_466); -x_467 = lean::cnstr_get(x_403, 2); -lean::inc(x_467); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_468 = x_403; -} else { - lean::dec_ref(x_403); - x_468 = lean::box(0); -} -x_469 = lean::cnstr_get(x_404, 0); -lean::inc(x_469); -x_470 = lean::cnstr_get(x_404, 1); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_404, 2); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_404, 3); -lean::inc(x_472); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_473 = x_404; -} else { - lean::dec_ref(x_404); - x_473 = lean::box(0); -} -if (lean::is_scalar(x_473)) { - x_474 = lean::alloc_cnstr(1, 4, 1); -} else { - x_474 = x_473; -} -lean::cnstr_set(x_474, 0, x_469); -lean::cnstr_set(x_474, 1, x_470); -lean::cnstr_set(x_474, 2, x_471); -lean::cnstr_set(x_474, 3, x_472); -lean::cnstr_set_scalar(x_474, sizeof(void*)*4, x_453); -x_475 = 0; -if (lean::is_scalar(x_468)) { - x_476 = lean::alloc_cnstr(1, 4, 1); -} else { - x_476 = x_468; -} -lean::cnstr_set(x_476, 0, x_474); -lean::cnstr_set(x_476, 1, x_466); -lean::cnstr_set(x_476, 2, x_467); -lean::cnstr_set(x_476, 3, x_446); -lean::cnstr_set_scalar(x_476, sizeof(void*)*4, x_475); -x_477 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_477, 0, x_476); -lean::cnstr_set(x_477, 1, x_316); -lean::cnstr_set(x_477, 2, x_317); -lean::cnstr_set(x_477, 3, x_318); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_453); -return x_477; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_insert___at_Lean_Elaborator_elaborators___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_RBNode_isRed___main___rarg(x_1); -if (x_4 == 0) -{ -obj* x_5; -x_5 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_1, x_2, x_3); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = l_RBNode_ins___main___at_Lean_Elaborator_elaborators___spec__2(x_1, x_2, x_3); -x_7 = l_RBNode_setBlack___main___rarg(x_6); -return x_7; -} -} -} -obj* l_List_foldl___main___at_Lean_Elaborator_elaborators___spec__3(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_3, 1); -lean::inc(x_6); -lean::dec(x_3); -x_7 = l_RBNode_insert___at_Lean_Elaborator_elaborators___spec__1(x_1, x_5, x_6); -x_1 = x_7; -x_2 = x_4; -goto _start; -} -} -} -obj* _init_l_Lean_Elaborator_elaborators() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_1 = l_Lean_Parser_Module_header; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_Module_header_elaborate___boxed), 4, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -x_4 = l_Lean_Parser_command_notation; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_notation_elaborate___boxed), 4, 0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_command_reserveNotation; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_reserveNotation_elaborate___boxed), 4, 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_command_universe; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_universe_elaborate___boxed), 4, 0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_noKind; -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_noKind_elaborate), 4, 0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = l_Lean_Parser_command_end; -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_end_elaborate___boxed), 4, 0); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_command_section; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_section_elaborate___boxed), 4, 0); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_command_namespace; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_namespace_elaborate___boxed), 4, 0); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_command_variables; -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_variables_elaborate___boxed), 4, 0); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_command_include; -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_include_elaborate___boxed), 4, 0); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_command_declaration; -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_declaration_elaborate), 4, 0); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_32); -x_34 = l_Lean_Parser_command_attribute; -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_attribute_elaborate___boxed), 4, 0); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Parser_command_open; -x_38 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_open_elaborate___boxed), 4, 0); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_38); -x_40 = l_Lean_Parser_command_export; -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_export_elaborate___boxed), 4, 0); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_command_check; -x_44 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_check_elaborate___boxed), 4, 0); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_command_initQuot; -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_initQuot_elaborate___boxed), 4, 0); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_Lean_Parser_command_setOption; -x_50 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_setOption_elaborate___boxed), 4, 0); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_Lean_Parser_Module_eoi; -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_eoi_elaborate___boxed), 4, 0); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::box(0); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_54); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_51); -lean::cnstr_set(x_57, 1, x_56); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_48); -lean::cnstr_set(x_58, 1, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_45); -lean::cnstr_set(x_59, 1, x_58); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_42); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_39); -lean::cnstr_set(x_61, 1, x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_36); -lean::cnstr_set(x_62, 1, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_33); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_30); -lean::cnstr_set(x_64, 1, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_27); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_24); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_21); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_18); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_15); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_12); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_9); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_6); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_3); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::box(0); -x_75 = l_List_foldl___main___at_Lean_Elaborator_elaborators___spec__3(x_74, x_73); -return x_75; -} -} -uint8 l_List_decidableMem___main___at_Lean_Elaborator_isOpenNamespace___main___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_3; -x_3 = 0; -return x_3; -} -else -{ -obj* x_4; obj* x_5; uint8 x_6; -x_4 = lean::cnstr_get(x_2, 0); -x_5 = lean::cnstr_get(x_2, 1); -x_6 = lean_name_dec_eq(x_1, x_4); -if (x_6 == 0) -{ -uint8 x_7; -x_7 = l_List_decidableMem___main___at_Lean_Elaborator_isOpenNamespace___main___spec__1(x_1, x_5); -if (x_7 == 0) -{ -uint8 x_8; -x_8 = 0; -return x_8; -} -else -{ -uint8 x_9; -x_9 = 1; -return x_9; -} -} -else -{ -uint8 x_10; -x_10 = 1; -return x_10; -} -} -} -} -uint8 l_List_foldr___main___at_Lean_Elaborator_isOpenNamespace___main___spec__2(obj* x_1, uint8 x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -return x_2; -} -else -{ -obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; uint8 x_9; -x_4 = lean::cnstr_get(x_3, 0); -x_5 = lean::cnstr_get(x_3, 1); -x_6 = l_List_foldr___main___at_Lean_Elaborator_isOpenNamespace___main___spec__2(x_1, x_2, x_5); -x_7 = lean::cnstr_get(x_4, 0); -x_8 = lean::cnstr_get(x_7, 2); -x_9 = lean_name_dec_eq(x_8, x_1); -if (x_9 == 0) -{ -return x_6; -} -else -{ -uint8 x_10; -x_10 = 1; -return x_10; -} -} -} -} -uint8 l_Lean_Elaborator_isOpenNamespace___main(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; -x_3 = lean::box(0); -x_4 = lean_name_dec_eq(x_2, x_3); -if (x_4 == 0) -{ -obj* x_5; uint8 x_6; -x_5 = lean::cnstr_get(x_1, 6); -x_6 = l_List_decidableMem___main___at_Lean_Elaborator_isOpenNamespace___main___spec__1(x_2, x_5); -if (x_6 == 0) -{ -obj* x_7; uint8 x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_1, 7); -x_8 = 0; -x_9 = l_List_foldr___main___at_Lean_Elaborator_isOpenNamespace___main___spec__2(x_2, x_8, x_7); -if (x_9 == 0) -{ -uint8 x_10; -x_10 = 0; -return x_10; -} -else -{ -uint8 x_11; -x_11 = 1; -return x_11; -} -} -else -{ -uint8 x_12; -x_12 = 1; -return x_12; -} -} -else -{ -uint8 x_13; -x_13 = 1; -return x_13; -} -} -} -obj* l_List_decidableMem___main___at_Lean_Elaborator_isOpenNamespace___main___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_List_decidableMem___main___at_Lean_Elaborator_isOpenNamespace___main___spec__1(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_isOpenNamespace___main___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; uint8 x_5; obj* x_6; -x_4 = lean::unbox(x_2); -lean::dec(x_2); -x_5 = l_List_foldr___main___at_Lean_Elaborator_isOpenNamespace___main___spec__2(x_1, x_4, x_3); -lean::dec(x_3); -lean::dec(x_1); -x_6 = lean::box(x_5); -return x_6; -} -} -obj* l_Lean_Elaborator_isOpenNamespace___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_Lean_Elaborator_isOpenNamespace___main(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_Lean_Elaborator_isOpenNamespace(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = l_Lean_Elaborator_isOpenNamespace___main(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_isOpenNamespace___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_Lean_Elaborator_isOpenNamespace(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_List_foldr___main___at_Lean_Elaborator_matchOpenSpec___spec__1(obj* x_1, uint8 x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -return x_2; -} -else -{ -obj* x_4; obj* x_5; uint8 x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_3, 0); -x_5 = lean::cnstr_get(x_3, 1); -x_6 = l_List_foldr___main___at_Lean_Elaborator_matchOpenSpec___spec__1(x_1, x_2, x_5); -x_7 = lean::cnstr_get(x_4, 2); -x_8 = lean_name_dec_eq(x_1, x_7); -if (x_8 == 0) -{ -return x_6; -} -else -{ -uint8 x_9; -x_9 = 1; -return x_9; -} -} -} -} -obj* l_Lean_Elaborator_matchOpenSpec(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::cnstr_get(x_2, 2); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 2); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Name_append___main(x_5, x_1); -lean::dec(x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_3); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_9 = lean::cnstr_get(x_3, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_10, 2); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean_name_dec_eq(x_1, x_11); -lean::dec(x_11); -if (x_12 == 0) -{ -obj* x_13; uint8 x_14; uint8 x_15; -x_13 = lean::cnstr_get(x_9, 2); -lean::inc(x_13); -lean::dec(x_9); -x_14 = 0; -x_15 = l_List_foldr___main___at_Lean_Elaborator_matchOpenSpec___spec__1(x_1, x_14, x_13); -lean::dec(x_13); -if (x_15 == 0) -{ -obj* x_16; -lean::free_heap_obj(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_16 = lean::box(0); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_2, 0); -lean::inc(x_17); -lean::dec(x_2); -x_18 = lean::cnstr_get(x_17, 2); -lean::inc(x_18); -lean::dec(x_17); -x_19 = l_Lean_Name_append___main(x_18, x_1); -lean::dec(x_18); -lean::cnstr_set(x_3, 0, x_19); -return x_3; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; -lean::dec(x_9); -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 2); -lean::inc(x_21); -lean::dec(x_20); -x_22 = l_Lean_Name_append___main(x_21, x_1); -lean::dec(x_21); -lean::cnstr_set(x_3, 0, x_22); -return x_3; -} -} -else -{ -obj* x_23; obj* x_24; obj* x_25; uint8 x_26; -x_23 = lean::cnstr_get(x_3, 0); -lean::inc(x_23); -lean::dec(x_3); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_24, 2); -lean::inc(x_25); -lean::dec(x_24); -x_26 = lean_name_dec_eq(x_1, x_25); -lean::dec(x_25); -if (x_26 == 0) -{ -obj* x_27; uint8 x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_23, 2); -lean::inc(x_27); -lean::dec(x_23); -x_28 = 0; -x_29 = l_List_foldr___main___at_Lean_Elaborator_matchOpenSpec___spec__1(x_1, x_28, x_27); -lean::dec(x_27); -if (x_29 == 0) -{ -obj* x_30; -lean::dec(x_2); -lean::dec(x_1); -x_30 = lean::box(0); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_2, 0); -lean::inc(x_31); -lean::dec(x_2); -x_32 = lean::cnstr_get(x_31, 2); -lean::inc(x_32); -lean::dec(x_31); -x_33 = l_Lean_Name_append___main(x_32, x_1); -lean::dec(x_32); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -lean::dec(x_23); -x_35 = lean::cnstr_get(x_2, 0); -lean::inc(x_35); -lean::dec(x_2); -x_36 = lean::cnstr_get(x_35, 2); -lean::inc(x_36); -lean::dec(x_35); -x_37 = l_Lean_Name_append___main(x_36, x_1); -lean::dec(x_36); -x_38 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -return x_38; -} -} -} -} -} -obj* l_List_foldr___main___at_Lean_Elaborator_matchOpenSpec___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; uint8 x_5; obj* x_6; -x_4 = lean::unbox(x_2); -lean::dec(x_2); -x_5 = l_List_foldr___main___at_Lean_Elaborator_matchOpenSpec___spec__1(x_1, x_4, x_3); -lean::dec(x_3); -lean::dec(x_1); -x_6 = lean::box(x_5); -return x_6; -} -} -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; -lean::dec(x_1); -x_5 = l_List_reverse___rarg(x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; uint8 x_11; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -x_9 = lean::cnstr_get(x_2, 8); -lean::inc(x_1); -x_10 = l_Lean_Name_append___main(x_7, x_1); -x_11 = l_Lean_Environment_contains(x_9, x_10); -lean::dec(x_10); -if (x_11 == 0) -{ -lean::free_heap_obj(x_3); -lean::dec(x_7); -x_3 = x_8; -goto _start; -} -else -{ -lean::cnstr_set(x_3, 1, x_4); -{ -obj* _tmp_2 = x_8; -obj* _tmp_3 = x_3; -x_3 = _tmp_2; -x_4 = _tmp_3; -} -goto _start; -} -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; -x_14 = lean::cnstr_get(x_3, 0); -x_15 = lean::cnstr_get(x_3, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_3); -x_16 = lean::cnstr_get(x_2, 8); -lean::inc(x_1); -x_17 = l_Lean_Name_append___main(x_14, x_1); -x_18 = l_Lean_Environment_contains(x_16, x_17); -lean::dec(x_17); -if (x_18 == 0) -{ -lean::dec(x_14); -x_3 = x_15; -goto _start; -} -else -{ -obj* x_20; -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_14); -lean::cnstr_set(x_20, 1, x_4); -x_3 = x_15; -x_4 = x_20; -goto _start; -} -} -} -} -} -obj* l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__2(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_1); -x_7 = l_Lean_Elaborator_matchOpenSpec(x_1, x_5); -if (lean::obj_tag(x_7) == 0) -{ -lean::free_heap_obj(x_2); -x_2 = x_6; -goto _start; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -lean::dec(x_7); -x_10 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__2(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -} -else -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -lean::inc(x_1); -x_13 = l_Lean_Elaborator_matchOpenSpec(x_1, x_11); -if (lean::obj_tag(x_13) == 0) -{ -x_2 = x_12; -goto _start; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__2(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -} -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_4; -x_4 = l_List_reverse___rarg(x_3); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_2); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::cnstr_get(x_2, 0); -x_7 = lean::cnstr_get(x_2, 1); -x_8 = l_Lean_Environment_contains(x_1, x_6); -if (x_8 == 0) -{ -lean::free_heap_obj(x_2); -lean::dec(x_6); -x_2 = x_7; -goto _start; -} -else -{ -lean::cnstr_set(x_2, 1, x_3); -{ -obj* _tmp_1 = x_7; -obj* _tmp_2 = x_2; -x_2 = _tmp_1; -x_3 = _tmp_2; -} -goto _start; -} -} -else -{ -obj* x_11; obj* x_12; uint8 x_13; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Environment_contains(x_1, x_11); -if (x_13 == 0) -{ -lean::dec(x_11); -x_2 = x_12; -goto _start; -} -else -{ -obj* x_15; -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_11); -lean::cnstr_set(x_15, 1, x_3); -x_2 = x_12; -x_3 = x_15; -goto _start; -} -} -} -} -} -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__4(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_4; -x_4 = l_List_reverse___rarg(x_3); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_2); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; uint8 x_9; -x_6 = lean::cnstr_get(x_2, 0); -x_7 = lean::cnstr_get(x_2, 1); -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -x_9 = l_Lean_Elaborator_isOpenNamespace___main(x_1, x_8); -lean::dec(x_8); -if (x_9 == 0) -{ -lean::free_heap_obj(x_2); -lean::dec(x_6); -x_2 = x_7; -goto _start; -} -else -{ -lean::cnstr_set(x_2, 1, x_3); -{ -obj* _tmp_1 = x_7; -obj* _tmp_2 = x_2; -x_2 = _tmp_1; -x_3 = _tmp_2; -} -goto _start; -} -} -else -{ -obj* x_12; obj* x_13; obj* x_14; uint8 x_15; -x_12 = lean::cnstr_get(x_2, 0); -x_13 = lean::cnstr_get(x_2, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_2); -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -x_15 = l_Lean_Elaborator_isOpenNamespace___main(x_1, x_14); -lean::dec(x_14); -if (x_15 == 0) -{ -lean::dec(x_12); -x_2 = x_13; -goto _start; -} -else -{ -obj* x_17; -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_12); -lean::cnstr_set(x_17, 1, x_3); -x_2 = x_13; -x_3 = x_17; -goto _start; -} -} -} -} -} -obj* l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__5(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -lean::dec(x_5); -lean::inc(x_1); -x_8 = l_Lean_Elaborator_matchOpenSpec(x_1, x_7); -if (lean::obj_tag(x_8) == 0) -{ -lean::free_heap_obj(x_2); -x_2 = x_6; -goto _start; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -x_11 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__5(x_1, x_6); -lean::cnstr_set(x_2, 1, x_11); -lean::cnstr_set(x_2, 0, x_10); -return x_2; -} -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_2, 0); -x_13 = lean::cnstr_get(x_2, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_2); -x_14 = lean::cnstr_get(x_12, 1); -lean::inc(x_14); -lean::dec(x_12); -lean::inc(x_1); -x_15 = l_Lean_Elaborator_matchOpenSpec(x_1, x_14); -if (lean::obj_tag(x_15) == 0) -{ -x_2 = x_13; -goto _start; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__5(x_1, x_13); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -} -} -} -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__6(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_4; -x_4 = l_List_reverse___rarg(x_3); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_2); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::cnstr_get(x_2, 0); -x_7 = lean::cnstr_get(x_2, 1); -x_8 = l_Lean_Environment_contains(x_1, x_6); -if (x_8 == 0) -{ -lean::free_heap_obj(x_2); -lean::dec(x_6); -x_2 = x_7; -goto _start; -} -else -{ -lean::cnstr_set(x_2, 1, x_3); -{ -obj* _tmp_1 = x_7; -obj* _tmp_2 = x_2; -x_2 = _tmp_1; -x_3 = _tmp_2; -} -goto _start; -} -} -else -{ -obj* x_11; obj* x_12; uint8 x_13; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Environment_contains(x_1, x_11); -if (x_13 == 0) -{ -lean::dec(x_11); -x_2 = x_12; -goto _start; -} -else -{ -obj* x_15; -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_11); -lean::cnstr_set(x_15, 1, x_3); -x_2 = x_12; -x_3 = x_15; -goto _start; -} -} -} -} -} -obj* _init_l_Lean_Elaborator_resolveContext___main___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("_root_"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Elaborator_resolveContext___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -lean::inc(x_4); -x_5 = l_Lean_Elaborator_currentScope(x_2, x_3, x_4); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -lean::dec(x_4); -lean::dec(x_1); -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_10, 0); -x_13 = lean::cnstr_get(x_10, 1); -x_14 = lean::cnstr_get(x_12, 4); -lean::inc(x_14); -x_15 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_1); -x_16 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_15, x_14, x_1); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_12, 6); -lean::inc(x_17); -x_18 = lean::box(0); -lean::inc(x_1); -x_19 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__1(x_1, x_4, x_17, x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_20 = l_Lean_Elaborator_resolveContext___main___closed__1; -x_21 = lean::box(0); -lean::inc(x_1); -x_22 = l_Lean_Name_replacePrefix___main(x_1, x_20, x_21); -x_23 = lean::cnstr_get(x_4, 8); -lean::inc(x_23); -x_24 = l_Lean_Environment_contains(x_23, x_22); -x_25 = lean::cnstr_get(x_12, 7); -lean::inc(x_25); -lean::inc(x_1); -x_26 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__2(x_1, x_25); -x_27 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__3(x_23, x_26, x_18); -x_28 = lean::cnstr_get(x_4, 3); -lean::inc(x_28); -lean::dec(x_4); -x_29 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__4(x_12, x_28, x_18); -lean::dec(x_12); -x_30 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__5(x_1, x_29); -x_31 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__6(x_23, x_30, x_18); -lean::dec(x_23); -if (x_24 == 0) -{ -obj* x_32; obj* x_33; -lean::dec(x_22); -x_32 = l_List_append___rarg(x_19, x_27); -x_33 = l_List_append___rarg(x_32, x_31); -lean::cnstr_set(x_10, 0, x_33); -return x_5; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_22); -lean::cnstr_set(x_34, 1, x_19); -x_35 = l_List_append___rarg(x_34, x_27); -x_36 = l_List_append___rarg(x_35, x_31); -lean::cnstr_set(x_10, 0, x_36); -return x_5; -} -} -else -{ -uint8 x_37; -lean::dec(x_12); -lean::dec(x_4); -x_37 = !lean::is_exclusive(x_19); -if (x_37 == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_19, 0); -x_39 = lean::cnstr_get(x_19, 1); -lean::dec(x_39); -x_40 = l_Lean_Name_append___main(x_38, x_1); -lean::dec(x_38); -lean::cnstr_set(x_19, 1, x_18); -lean::cnstr_set(x_19, 0, x_40); -lean::cnstr_set(x_10, 0, x_19); -return x_5; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; -x_41 = lean::cnstr_get(x_19, 0); -lean::inc(x_41); -lean::dec(x_19); -x_42 = l_Lean_Name_append___main(x_41, x_1); -lean::dec(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_18); -lean::cnstr_set(x_10, 0, x_43); -return x_5; -} -} -} -else -{ -obj* x_44; uint8 x_45; -lean::free_heap_obj(x_10); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_1); -x_44 = lean::cnstr_get(x_16, 0); -lean::inc(x_44); -lean::dec(x_16); -x_45 = !lean::is_exclusive(x_44); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_46 = lean::cnstr_get(x_44, 1); -x_47 = lean::cnstr_get(x_44, 0); -lean::dec(x_47); -x_48 = lean::cnstr_get(x_46, 0); -lean::inc(x_48); -lean::dec(x_46); -x_49 = lean::box(0); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_48); -lean::cnstr_set(x_50, 1, x_49); -lean::cnstr_set(x_44, 1, x_13); -lean::cnstr_set(x_44, 0, x_50); -lean::cnstr_set(x_5, 0, x_44); -return x_5; -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_51 = lean::cnstr_get(x_44, 1); -lean::inc(x_51); -lean::dec(x_44); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -lean::dec(x_51); -x_53 = lean::box(0); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_13); -lean::cnstr_set(x_5, 0, x_55); -return x_5; -} -} -} -else -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_56 = lean::cnstr_get(x_10, 0); -x_57 = lean::cnstr_get(x_10, 1); -lean::inc(x_57); -lean::inc(x_56); -lean::dec(x_10); -x_58 = lean::cnstr_get(x_56, 4); -lean::inc(x_58); -x_59 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_1); -x_60 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_59, x_58, x_1); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; -x_61 = lean::cnstr_get(x_56, 6); -lean::inc(x_61); -x_62 = lean::box(0); -lean::inc(x_1); -x_63 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__1(x_1, x_4, x_61, x_62); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; uint8 x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_64 = l_Lean_Elaborator_resolveContext___main___closed__1; -x_65 = lean::box(0); -lean::inc(x_1); -x_66 = l_Lean_Name_replacePrefix___main(x_1, x_64, x_65); -x_67 = lean::cnstr_get(x_4, 8); -lean::inc(x_67); -x_68 = l_Lean_Environment_contains(x_67, x_66); -x_69 = lean::cnstr_get(x_56, 7); -lean::inc(x_69); -lean::inc(x_1); -x_70 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__2(x_1, x_69); -x_71 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__3(x_67, x_70, x_62); -x_72 = lean::cnstr_get(x_4, 3); -lean::inc(x_72); -lean::dec(x_4); -x_73 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__4(x_56, x_72, x_62); -lean::dec(x_56); -x_74 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__5(x_1, x_73); -x_75 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__6(x_67, x_74, x_62); -lean::dec(x_67); -if (x_68 == 0) -{ -obj* x_76; obj* x_77; obj* x_78; -lean::dec(x_66); -x_76 = l_List_append___rarg(x_63, x_71); -x_77 = l_List_append___rarg(x_76, x_75); -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_57); -lean::cnstr_set(x_5, 0, x_78); -return x_5; -} -else -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_66); -lean::cnstr_set(x_79, 1, x_63); -x_80 = l_List_append___rarg(x_79, x_71); -x_81 = l_List_append___rarg(x_80, x_75); -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_57); -lean::cnstr_set(x_5, 0, x_82); -return x_5; -} -} -else -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; -lean::dec(x_56); -lean::dec(x_4); -x_83 = lean::cnstr_get(x_63, 0); -lean::inc(x_83); -if (lean::is_exclusive(x_63)) { - lean::cnstr_release(x_63, 0); - lean::cnstr_release(x_63, 1); - x_84 = x_63; -} else { - lean::dec_ref(x_63); - x_84 = lean::box(0); -} -x_85 = l_Lean_Name_append___main(x_83, x_1); -lean::dec(x_83); -if (lean::is_scalar(x_84)) { - x_86 = lean::alloc_cnstr(1, 2, 0); -} else { - x_86 = x_84; -} -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_62); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_57); -lean::cnstr_set(x_5, 0, x_87); -return x_5; -} -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -lean::dec(x_56); -lean::dec(x_4); -lean::dec(x_1); -x_88 = lean::cnstr_get(x_60, 0); -lean::inc(x_88); -lean::dec(x_60); -x_89 = lean::cnstr_get(x_88, 1); -lean::inc(x_89); -if (lean::is_exclusive(x_88)) { - lean::cnstr_release(x_88, 0); - lean::cnstr_release(x_88, 1); - x_90 = x_88; -} else { - lean::dec_ref(x_88); - x_90 = lean::box(0); -} -x_91 = lean::cnstr_get(x_89, 0); -lean::inc(x_91); -lean::dec(x_89); -x_92 = lean::box(0); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_91); -lean::cnstr_set(x_93, 1, x_92); -if (lean::is_scalar(x_90)) { - x_94 = lean::alloc_cnstr(0, 2, 0); -} else { - x_94 = x_90; -} -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_57); -lean::cnstr_set(x_5, 0, x_94); -return x_5; -} -} -} -else -{ -obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_95 = lean::cnstr_get(x_5, 0); -lean::inc(x_95); -lean::dec(x_5); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -if (lean::is_exclusive(x_95)) { - lean::cnstr_release(x_95, 0); - lean::cnstr_release(x_95, 1); - x_98 = x_95; -} else { - lean::dec_ref(x_95); - x_98 = lean::box(0); -} -x_99 = lean::cnstr_get(x_96, 4); -lean::inc(x_99); -x_100 = l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__1; -lean::inc(x_1); -x_101 = l_Lean_Elaborator_OrderedRBMap_find___rarg(x_100, x_99, x_1); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; obj* x_103; obj* x_104; -x_102 = lean::cnstr_get(x_96, 6); -lean::inc(x_102); -x_103 = lean::box(0); -lean::inc(x_1); -x_104 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__1(x_1, x_4, x_102, x_103); -if (lean::obj_tag(x_104) == 0) -{ -obj* x_105; obj* x_106; obj* x_107; obj* x_108; uint8 x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; -x_105 = l_Lean_Elaborator_resolveContext___main___closed__1; -x_106 = lean::box(0); -lean::inc(x_1); -x_107 = l_Lean_Name_replacePrefix___main(x_1, x_105, x_106); -x_108 = lean::cnstr_get(x_4, 8); -lean::inc(x_108); -x_109 = l_Lean_Environment_contains(x_108, x_107); -x_110 = lean::cnstr_get(x_96, 7); -lean::inc(x_110); -lean::inc(x_1); -x_111 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__2(x_1, x_110); -x_112 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__3(x_108, x_111, x_103); -x_113 = lean::cnstr_get(x_4, 3); -lean::inc(x_113); -lean::dec(x_4); -x_114 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__4(x_96, x_113, x_103); -lean::dec(x_96); -x_115 = l_List_filterMap___main___at_Lean_Elaborator_resolveContext___main___spec__5(x_1, x_114); -x_116 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__6(x_108, x_115, x_103); -lean::dec(x_108); -if (x_109 == 0) -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; -lean::dec(x_107); -x_117 = l_List_append___rarg(x_104, x_112); -x_118 = l_List_append___rarg(x_117, x_116); -if (lean::is_scalar(x_98)) { - x_119 = lean::alloc_cnstr(0, 2, 0); -} else { - x_119 = x_98; -} -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_119, 1, x_97); -x_120 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_120, 0, x_119); -return x_120; -} -else -{ -obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; -x_121 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_121, 0, x_107); -lean::cnstr_set(x_121, 1, x_104); -x_122 = l_List_append___rarg(x_121, x_112); -x_123 = l_List_append___rarg(x_122, x_116); -if (lean::is_scalar(x_98)) { - x_124 = lean::alloc_cnstr(0, 2, 0); -} else { - x_124 = x_98; -} -lean::cnstr_set(x_124, 0, x_123); -lean::cnstr_set(x_124, 1, x_97); -x_125 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_125, 0, x_124); -return x_125; -} -} -else -{ -obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; -lean::dec(x_96); -lean::dec(x_4); -x_126 = lean::cnstr_get(x_104, 0); -lean::inc(x_126); -if (lean::is_exclusive(x_104)) { - lean::cnstr_release(x_104, 0); - lean::cnstr_release(x_104, 1); - x_127 = x_104; -} else { - lean::dec_ref(x_104); - x_127 = lean::box(0); -} -x_128 = l_Lean_Name_append___main(x_126, x_1); -lean::dec(x_126); -if (lean::is_scalar(x_127)) { - x_129 = lean::alloc_cnstr(1, 2, 0); -} else { - x_129 = x_127; -} -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_103); -if (lean::is_scalar(x_98)) { - x_130 = lean::alloc_cnstr(0, 2, 0); -} else { - x_130 = x_98; -} -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_97); -x_131 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_131, 0, x_130); -return x_131; -} -} -else -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; -lean::dec(x_98); -lean::dec(x_96); -lean::dec(x_4); -lean::dec(x_1); -x_132 = lean::cnstr_get(x_101, 0); -lean::inc(x_132); -lean::dec(x_101); -x_133 = lean::cnstr_get(x_132, 1); -lean::inc(x_133); -if (lean::is_exclusive(x_132)) { - lean::cnstr_release(x_132, 0); - lean::cnstr_release(x_132, 1); - x_134 = x_132; -} else { - lean::dec_ref(x_132); - x_134 = lean::box(0); -} -x_135 = lean::cnstr_get(x_133, 0); -lean::inc(x_135); -lean::dec(x_133); -x_136 = lean::box(0); -x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_135); -lean::cnstr_set(x_137, 1, x_136); -if (lean::is_scalar(x_134)) { - x_138 = lean::alloc_cnstr(0, 2, 0); -} else { - x_138 = x_134; -} -lean::cnstr_set(x_138, 0, x_137); -lean::cnstr_set(x_138, 1, x_97); -x_139 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_139, 0, x_138); -return x_139; -} -} -} -} -} -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__3(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__4(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__6___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_List_filterAux___main___at_Lean_Elaborator_resolveContext___main___spec__6(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Elaborator_resolveContext___main___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_resolveContext___main(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_resolveContext(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_resolveContext___main(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l_Lean_Elaborator_resolveContext___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_resolveContext(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = l_Lean_Elaborator_preresolve___main(x_9, x_2, x_3, x_4); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::free_heap_obj(x_1); -lean::dec(x_10); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1(x_10, x_2, x_3, x_17); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_16); -lean::free_heap_obj(x_1); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_23, 0); -lean::cnstr_set(x_1, 1, x_25); -lean::cnstr_set(x_1, 0, x_16); -lean::cnstr_set(x_23, 0, x_1); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_23, 0); -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_23); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_16); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_1); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_18, 0, x_28); -return x_18; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_18, 0); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - lean::cnstr_release(x_29, 1); - x_32 = x_29; -} else { - lean::dec_ref(x_29); - x_32 = lean::box(0); -} -lean::cnstr_set(x_1, 1, x_30); -lean::cnstr_set(x_1, 0, x_16); -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_1); -x_37 = l_Lean_Elaborator_preresolve___main(x_35, x_2, x_3, x_4); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_36); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - x_39 = x_37; -} else { - lean::dec_ref(x_37); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(0, 1, 0); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_38); -return x_40; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1(x_36, x_2, x_3, x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_42); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_46 = x_44; -} else { - lean::dec_ref(x_44); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(0, 1, 0); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_49 = x_44; -} else { - lean::dec_ref(x_44); - x_49 = lean::box(0); -} -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_52 = x_48; -} else { - lean::dec_ref(x_48); - x_52 = lean::box(0); -} -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_42); -lean::cnstr_set(x_53, 1, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -if (lean::is_scalar(x_49)) { - x_55 = lean::alloc_cnstr(1, 1, 0); -} else { - x_55 = x_49; -} -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -} -} -} -} -obj* l_Lean_Elaborator_preresolve___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_5; obj* x_6; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -case 1: -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_9 = l_Lean_Elaborator_mangleIdent(x_8); -x_10 = l_Lean_Elaborator_resolveContext___main(x_9, x_2, x_3, x_4); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::free_heap_obj(x_1); -lean::dec(x_8); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -return x_10; -} -else -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -lean::dec(x_10); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -} -else -{ -uint8 x_14; -x_14 = !lean::is_exclusive(x_10); -if (x_14 == 0) -{ -obj* x_15; uint8 x_16; -x_15 = lean::cnstr_get(x_10, 0); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_8); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_15, 0); -x_19 = lean::cnstr_get(x_8, 3); -x_20 = l_List_append___rarg(x_18, x_19); -lean::cnstr_set(x_8, 3, x_20); -lean::cnstr_set(x_15, 0, x_1); -return x_10; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_21 = lean::cnstr_get(x_15, 0); -x_22 = lean::cnstr_get(x_8, 0); -x_23 = lean::cnstr_get(x_8, 1); -x_24 = lean::cnstr_get(x_8, 2); -x_25 = lean::cnstr_get(x_8, 3); -x_26 = lean::cnstr_get(x_8, 4); -lean::inc(x_26); -lean::inc(x_25); -lean::inc(x_24); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_8); -x_27 = l_List_append___rarg(x_21, x_25); -x_28 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_28, 0, x_22); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_24); -lean::cnstr_set(x_28, 3, x_27); -lean::cnstr_set(x_28, 4, x_26); -lean::cnstr_set(x_1, 0, x_28); -lean::cnstr_set(x_15, 0, x_1); -return x_10; -} -} -else -{ -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; -x_29 = lean::cnstr_get(x_15, 0); -x_30 = lean::cnstr_get(x_15, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_15); -x_31 = lean::cnstr_get(x_8, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_8, 1); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_8, 2); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_8, 3); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_8, 4); -lean::inc(x_35); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - lean::cnstr_release(x_8, 3); - lean::cnstr_release(x_8, 4); - x_36 = x_8; -} else { - lean::dec_ref(x_8); - x_36 = lean::box(0); -} -x_37 = l_List_append___rarg(x_29, x_34); -if (lean::is_scalar(x_36)) { - x_38 = lean::alloc_cnstr(0, 5, 0); -} else { - x_38 = x_36; -} -lean::cnstr_set(x_38, 0, x_31); -lean::cnstr_set(x_38, 1, x_32); -lean::cnstr_set(x_38, 2, x_33); -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 4, x_35); -lean::cnstr_set(x_1, 0, x_38); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_1); -lean::cnstr_set(x_39, 1, x_30); -lean::cnstr_set(x_10, 0, x_39); -return x_10; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_40 = lean::cnstr_get(x_10, 0); -lean::inc(x_40); -lean::dec(x_10); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - x_43 = x_40; -} else { - lean::dec_ref(x_40); - x_43 = lean::box(0); -} -x_44 = lean::cnstr_get(x_8, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_8, 1); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_8, 2); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_8, 3); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_8, 4); -lean::inc(x_48); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - lean::cnstr_release(x_8, 3); - lean::cnstr_release(x_8, 4); - x_49 = x_8; -} else { - lean::dec_ref(x_8); - x_49 = lean::box(0); -} -x_50 = l_List_append___rarg(x_41, x_47); -if (lean::is_scalar(x_49)) { - x_51 = lean::alloc_cnstr(0, 5, 0); -} else { - x_51 = x_49; -} -lean::cnstr_set(x_51, 0, x_44); -lean::cnstr_set(x_51, 1, x_45); -lean::cnstr_set(x_51, 2, x_46); -lean::cnstr_set(x_51, 3, x_50); -lean::cnstr_set(x_51, 4, x_48); -lean::cnstr_set(x_1, 0, x_51); -if (lean::is_scalar(x_43)) { - x_52 = lean::alloc_cnstr(0, 2, 0); -} else { - x_52 = x_43; -} -lean::cnstr_set(x_52, 0, x_1); -lean::cnstr_set(x_52, 1, x_42); -x_53 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -return x_53; -} -} -} -else -{ -obj* x_54; obj* x_55; obj* x_56; -x_54 = lean::cnstr_get(x_1, 0); -lean::inc(x_54); -lean::dec(x_1); -lean::inc(x_54); -x_55 = l_Lean_Elaborator_mangleIdent(x_54); -x_56 = l_Lean_Elaborator_resolveContext___main(x_55, x_2, x_3, x_4); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_54); -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - x_58 = x_56; -} else { - lean::dec_ref(x_56); - x_58 = lean::box(0); -} -if (lean::is_scalar(x_58)) { - x_59 = lean::alloc_cnstr(0, 1, 0); -} else { - x_59 = x_58; -} -lean::cnstr_set(x_59, 0, x_57); -return x_59; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_60 = lean::cnstr_get(x_56, 0); -lean::inc(x_60); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - x_61 = x_56; -} else { - lean::dec_ref(x_56); - x_61 = lean::box(0); -} -x_62 = lean::cnstr_get(x_60, 0); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_60, 1); -lean::inc(x_63); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - lean::cnstr_release(x_60, 1); - x_64 = x_60; -} else { - lean::dec_ref(x_60); - x_64 = lean::box(0); -} -x_65 = lean::cnstr_get(x_54, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_54, 1); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_54, 2); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_54, 3); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_54, 4); -lean::inc(x_69); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - lean::cnstr_release(x_54, 1); - lean::cnstr_release(x_54, 2); - lean::cnstr_release(x_54, 3); - lean::cnstr_release(x_54, 4); - x_70 = x_54; -} else { - lean::dec_ref(x_54); - x_70 = lean::box(0); -} -x_71 = l_List_append___rarg(x_62, x_68); -if (lean::is_scalar(x_70)) { - x_72 = lean::alloc_cnstr(0, 5, 0); -} else { - x_72 = x_70; -} -lean::cnstr_set(x_72, 0, x_65); -lean::cnstr_set(x_72, 1, x_66); -lean::cnstr_set(x_72, 2, x_67); -lean::cnstr_set(x_72, 3, x_71); -lean::cnstr_set(x_72, 4, x_69); -x_73 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_73, 0, x_72); -if (lean::is_scalar(x_64)) { - x_74 = lean::alloc_cnstr(0, 2, 0); -} else { - x_74 = x_64; -} -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_63); -if (lean::is_scalar(x_61)) { - x_75 = lean::alloc_cnstr(1, 1, 0); -} else { - x_75 = x_61; -} -lean::cnstr_set(x_75, 0, x_74); -return x_75; -} -} -} -case 2: -{ -uint8 x_76; -x_76 = !lean::is_exclusive(x_1); -if (x_76 == 0) -{ -obj* x_77; uint8 x_78; -x_77 = lean::cnstr_get(x_1, 0); -x_78 = !lean::is_exclusive(x_77); -if (x_78 == 0) -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_79 = lean::cnstr_get(x_77, 0); -x_80 = lean::cnstr_get(x_77, 1); -x_81 = lean::cnstr_get(x_77, 2); -x_82 = l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1(x_80, x_2, x_3, x_4); -if (lean::obj_tag(x_82) == 0) -{ -uint8 x_83; -lean::free_heap_obj(x_77); -lean::dec(x_81); -lean::dec(x_79); -lean::free_heap_obj(x_1); -x_83 = !lean::is_exclusive(x_82); -if (x_83 == 0) -{ -return x_82; -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_82, 0); -lean::inc(x_84); -lean::dec(x_82); -x_85 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -return x_85; -} -} -else -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_82); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_82, 0); -x_88 = !lean::is_exclusive(x_87); -if (x_88 == 0) -{ -obj* x_89; -x_89 = lean::cnstr_get(x_87, 0); -lean::cnstr_set(x_77, 1, x_89); -lean::cnstr_set(x_87, 0, x_1); -return x_82; -} -else -{ -obj* x_90; obj* x_91; obj* x_92; -x_90 = lean::cnstr_get(x_87, 0); -x_91 = lean::cnstr_get(x_87, 1); -lean::inc(x_91); -lean::inc(x_90); -lean::dec(x_87); -lean::cnstr_set(x_77, 1, x_90); -x_92 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_92, 0, x_1); -lean::cnstr_set(x_92, 1, x_91); -lean::cnstr_set(x_82, 0, x_92); -return x_82; -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_93 = lean::cnstr_get(x_82, 0); -lean::inc(x_93); -lean::dec(x_82); -x_94 = lean::cnstr_get(x_93, 0); -lean::inc(x_94); -x_95 = lean::cnstr_get(x_93, 1); -lean::inc(x_95); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - lean::cnstr_release(x_93, 1); - x_96 = x_93; -} else { - lean::dec_ref(x_93); - x_96 = lean::box(0); -} -lean::cnstr_set(x_77, 1, x_94); -if (lean::is_scalar(x_96)) { - x_97 = lean::alloc_cnstr(0, 2, 0); -} else { - x_97 = x_96; -} -lean::cnstr_set(x_97, 0, x_1); -lean::cnstr_set(x_97, 1, x_95); -x_98 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -return x_98; -} -} -} -else -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_99 = lean::cnstr_get(x_77, 0); -x_100 = lean::cnstr_get(x_77, 1); -x_101 = lean::cnstr_get(x_77, 2); -lean::inc(x_101); -lean::inc(x_100); -lean::inc(x_99); -lean::dec(x_77); -x_102 = l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1(x_100, x_2, x_3, x_4); -if (lean::obj_tag(x_102) == 0) -{ -obj* x_103; obj* x_104; obj* x_105; -lean::dec(x_101); -lean::dec(x_99); -lean::free_heap_obj(x_1); -x_103 = lean::cnstr_get(x_102, 0); -lean::inc(x_103); -if (lean::is_exclusive(x_102)) { - lean::cnstr_release(x_102, 0); - x_104 = x_102; -} else { - lean::dec_ref(x_102); - x_104 = lean::box(0); -} -if (lean::is_scalar(x_104)) { - x_105 = lean::alloc_cnstr(0, 1, 0); -} else { - x_105 = x_104; -} -lean::cnstr_set(x_105, 0, x_103); -return x_105; -} -else -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_106 = lean::cnstr_get(x_102, 0); -lean::inc(x_106); -if (lean::is_exclusive(x_102)) { - lean::cnstr_release(x_102, 0); - x_107 = x_102; -} else { - lean::dec_ref(x_102); - x_107 = lean::box(0); -} -x_108 = lean::cnstr_get(x_106, 0); -lean::inc(x_108); -x_109 = lean::cnstr_get(x_106, 1); -lean::inc(x_109); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - x_110 = x_106; -} else { - lean::dec_ref(x_106); - x_110 = lean::box(0); -} -x_111 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_111, 0, x_99); -lean::cnstr_set(x_111, 1, x_108); -lean::cnstr_set(x_111, 2, x_101); -lean::cnstr_set(x_1, 0, x_111); -if (lean::is_scalar(x_110)) { - x_112 = lean::alloc_cnstr(0, 2, 0); -} else { - x_112 = x_110; -} -lean::cnstr_set(x_112, 0, x_1); -lean::cnstr_set(x_112, 1, x_109); -if (lean::is_scalar(x_107)) { - x_113 = lean::alloc_cnstr(1, 1, 0); -} else { - x_113 = x_107; -} -lean::cnstr_set(x_113, 0, x_112); -return x_113; -} -} -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_114 = lean::cnstr_get(x_1, 0); -lean::inc(x_114); -lean::dec(x_1); -x_115 = lean::cnstr_get(x_114, 0); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_114, 1); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_114, 2); -lean::inc(x_117); -if (lean::is_exclusive(x_114)) { - lean::cnstr_release(x_114, 0); - lean::cnstr_release(x_114, 1); - lean::cnstr_release(x_114, 2); - x_118 = x_114; -} else { - lean::dec_ref(x_114); - x_118 = lean::box(0); -} -x_119 = l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1(x_116, x_2, x_3, x_4); -if (lean::obj_tag(x_119) == 0) -{ -obj* x_120; obj* x_121; obj* x_122; -lean::dec(x_118); -lean::dec(x_117); -lean::dec(x_115); -x_120 = lean::cnstr_get(x_119, 0); -lean::inc(x_120); -if (lean::is_exclusive(x_119)) { - lean::cnstr_release(x_119, 0); - x_121 = x_119; -} else { - lean::dec_ref(x_119); - x_121 = lean::box(0); -} -if (lean::is_scalar(x_121)) { - x_122 = lean::alloc_cnstr(0, 1, 0); -} else { - x_122 = x_121; -} -lean::cnstr_set(x_122, 0, x_120); -return x_122; -} -else -{ -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; -x_123 = lean::cnstr_get(x_119, 0); -lean::inc(x_123); -if (lean::is_exclusive(x_119)) { - lean::cnstr_release(x_119, 0); - x_124 = x_119; -} else { - lean::dec_ref(x_119); - x_124 = lean::box(0); -} -x_125 = lean::cnstr_get(x_123, 0); -lean::inc(x_125); -x_126 = lean::cnstr_get(x_123, 1); -lean::inc(x_126); -if (lean::is_exclusive(x_123)) { - lean::cnstr_release(x_123, 0); - lean::cnstr_release(x_123, 1); - x_127 = x_123; -} else { - lean::dec_ref(x_123); - x_127 = lean::box(0); -} -if (lean::is_scalar(x_118)) { - x_128 = lean::alloc_cnstr(0, 3, 0); -} else { - x_128 = x_118; -} -lean::cnstr_set(x_128, 0, x_115); -lean::cnstr_set(x_128, 1, x_125); -lean::cnstr_set(x_128, 2, x_117); -x_129 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_129, 0, x_128); -if (lean::is_scalar(x_127)) { - x_130 = lean::alloc_cnstr(0, 2, 0); -} else { - x_130 = x_127; -} -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_126); -if (lean::is_scalar(x_124)) { - x_131 = lean::alloc_cnstr(1, 1, 0); -} else { - x_131 = x_124; -} -lean::cnstr_set(x_131, 0, x_130); -return x_131; -} -} -} -default: -{ -obj* x_132; obj* x_133; -x_132 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_132, 0, x_1); -lean::cnstr_set(x_132, 1, x_4); -x_133 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_133, 0, x_132); -return x_133; -} -} -} -} -obj* l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mmap___main___at_Lean_Elaborator_preresolve___main___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_preresolve___main___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_preresolve___main(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Elaborator_preresolve(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_preresolve___main(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l_Lean_Elaborator_preresolve___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_preresolve(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Elaborator_mkState___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("MODULE"); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_mkState___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("MODULE"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Elaborator_mkState___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Name_quickLt___boxed), 2, 0); -x_2 = l_Lean_Elaborator_OrderedRBMap_empty___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Elaborator_mkState___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint32 x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("_ngen"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("fixme"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = 0; -x_7 = lean::alloc_cnstr(0, 1, 4); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set_scalar(x_7, sizeof(void*)*1, x_6); -return x_7; -} -} -obj* l_Lean_Elaborator_mkState(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -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; -x_4 = lean::box(0); -x_5 = lean::box(0); -x_6 = l_Lean_Elaborator_mkState___closed__1; -x_7 = l_Lean_Elaborator_mkState___closed__2; -x_8 = l_Lean_Elaborator_mkState___closed__3; -x_9 = lean::alloc_cnstr(0, 9, 0); -lean::cnstr_set(x_9, 0, x_6); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_4); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -lean::cnstr_set(x_9, 5, x_5); -lean::cnstr_set(x_9, 6, x_4); -lean::cnstr_set(x_9, 7, x_4); -lean::cnstr_set(x_9, 8, x_3); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_4); -x_11 = lean::cnstr_get(x_1, 0); -x_12 = lean::cnstr_get(x_1, 1); -x_13 = l_Lean_Expander_builtinTransformers; -lean::inc(x_11); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::mk_nat_obj(0u); -x_16 = l_Lean_MessageLog_empty; -x_17 = l_Lean_Elaborator_mkState___closed__4; -lean::inc(x_12); -x_18 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_4); -lean::cnstr_set(x_18, 2, x_15); -lean::cnstr_set(x_18, 3, x_4); -lean::cnstr_set(x_18, 4, x_10); -lean::cnstr_set(x_18, 5, x_16); -lean::cnstr_set(x_18, 6, x_12); -lean::cnstr_set(x_18, 7, x_14); -lean::cnstr_set(x_18, 8, x_2); -lean::cnstr_set(x_18, 9, x_17); -lean::cnstr_set(x_18, 10, x_15); -return x_18; -} -} -obj* l_Lean_Elaborator_mkState___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Elaborator_mkState(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__1___rarg(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; -x_5 = lean::cnstr_get(x_3, 0); -x_6 = lean::cnstr_get(x_5, 0); -x_7 = lean::cnstr_get(x_5, 2); -x_8 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::mk_nat_obj(0u); -x_10 = l_Lean_FileMap_toPosition(x_7, x_9); -x_11 = 2; -x_12 = l_String_splitAux___main___closed__1; -lean::inc(x_6); -x_13 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_8); -lean::cnstr_set(x_13, 3, x_12); -lean::cnstr_set(x_13, 4, x_2); -lean::cnstr_set_scalar(x_13, sizeof(void*)*5, x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_1, 0); -x_16 = l_Lean_Parser_Syntax_getPos(x_15); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; uint8 x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = lean::mk_nat_obj(0u); -x_18 = l_Lean_FileMap_toPosition(x_7, x_17); -x_19 = 2; -x_20 = l_String_splitAux___main___closed__1; -lean::inc(x_6); -x_21 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_21, 0, x_6); -lean::cnstr_set(x_21, 1, x_18); -lean::cnstr_set(x_21, 2, x_8); -lean::cnstr_set(x_21, 3, x_20); -lean::cnstr_set(x_21, 4, x_2); -lean::cnstr_set_scalar(x_21, sizeof(void*)*5, x_19); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -else -{ -obj* x_23; obj* x_24; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_16, 0); -lean::inc(x_23); -lean::dec(x_16); -x_24 = l_Lean_FileMap_toPosition(x_7, x_23); -x_25 = 2; -x_26 = l_String_splitAux___main___closed__1; -lean::inc(x_6); -x_27 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_24); -lean::cnstr_set(x_27, 2, x_8); -lean::cnstr_set(x_27, 3, x_26); -lean::cnstr_set(x_27, 4, x_2); -lean::cnstr_set_scalar(x_27, sizeof(void*)*5, x_25); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -return x_28; -} -} -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg(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; -x_6 = lean::cnstr_get(x_4, 0); -x_7 = lean::cnstr_get(x_6, 0); -x_8 = lean::cnstr_get(x_6, 2); -x_9 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::mk_nat_obj(0u); -x_11 = l_Lean_FileMap_toPosition(x_8, x_10); -x_12 = 2; -x_13 = l_String_splitAux___main___closed__1; -lean::inc(x_7); -x_14 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_11); -lean::cnstr_set(x_14, 2, x_9); -lean::cnstr_set(x_14, 3, x_13); -lean::cnstr_set(x_14, 4, x_2); -lean::cnstr_set_scalar(x_14, sizeof(void*)*5, x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = l_Lean_Parser_Syntax_getPos(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; uint8 x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::mk_nat_obj(0u); -x_19 = l_Lean_FileMap_toPosition(x_8, x_18); -x_20 = 2; -x_21 = l_String_splitAux___main___closed__1; -lean::inc(x_7); -x_22 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_22, 0, x_7); -lean::cnstr_set(x_22, 1, x_19); -lean::cnstr_set(x_22, 2, x_9); -lean::cnstr_set(x_22, 3, x_21); -lean::cnstr_set(x_22, 4, x_2); -lean::cnstr_set_scalar(x_22, sizeof(void*)*5, x_20); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -return x_23; -} -else -{ -obj* x_24; obj* x_25; uint8 x_26; obj* x_27; obj* x_28; obj* x_29; -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -lean::dec(x_17); -x_25 = l_Lean_FileMap_toPosition(x_8, x_24); -x_26 = 2; -x_27 = l_String_splitAux___main___closed__1; -lean::inc(x_7); -x_28 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_28, 0, x_7); -lean::cnstr_set(x_28, 1, x_25); -lean::cnstr_set(x_28, 2, x_9); -lean::cnstr_set(x_28, 3, x_27); -lean::cnstr_set(x_28, 4, x_2); -lean::cnstr_set_scalar(x_28, sizeof(void*)*5, x_26); -x_29 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -return x_29; -} -} -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Elaborator_processCommand___spec__3(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* _init_l_Lean_Elaborator_processCommand___lambda__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("not a command: "); -return x_1; -} -} -obj* _init_l_Lean_Elaborator_processCommand___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("unknown command: "); -return x_1; -} -} -obj* l_Lean_Elaborator_processCommand___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -lean::inc(x_2); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -lean::inc(x_2); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_2); -x_7 = l_Lean_Parser_Syntax_format___main(x_2); -x_8 = l_Lean_Options_empty; -x_9 = l_Lean_Format_pretty(x_7, x_8); -x_10 = l_Lean_Elaborator_processCommand___lambda__1___closed__1; -x_11 = lean::string_append(x_10, x_9); -lean::dec(x_9); -x_12 = l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg(x_6, x_11, x_1, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -lean::dec(x_6); -return x_12; -} -else -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_5); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::cnstr_get(x_5, 0); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = l_Lean_Elaborator_elaborators; -x_17 = l_RBNode_find___main___at_Lean_Elaborator_processCommand___spec__3(x_16, x_15); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -lean::cnstr_set(x_5, 0, x_2); -x_18 = l_Lean_Name_toString___closed__1; -x_19 = l_Lean_Name_toStringWithSep___main(x_18, x_15); -x_20 = l_Lean_Elaborator_processCommand___lambda__1___closed__2; -x_21 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_22 = l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg(x_5, x_21, x_1, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -lean::dec(x_5); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -lean::dec(x_15); -lean::free_heap_obj(x_5); -x_23 = lean::cnstr_get(x_17, 0); -lean::inc(x_23); -lean::dec(x_17); -x_24 = l_Lean_Elaborator_preresolve___main(x_2, x_1, x_3, x_4); -if (lean::obj_tag(x_24) == 0) -{ -uint8 x_25; -lean::dec(x_23); -lean::dec(x_3); -lean::dec(x_1); -x_25 = !lean::is_exclusive(x_24); -if (x_25 == 0) -{ -return x_24; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -lean::dec(x_24); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::cnstr_get(x_24, 0); -lean::inc(x_28); -lean::dec(x_24); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_28, 1); -lean::inc(x_30); -lean::dec(x_28); -x_31 = lean::apply_4(x_23, x_29, x_1, x_3, x_30); -return x_31; -} -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_32 = lean::cnstr_get(x_5, 0); -lean::inc(x_32); -lean::dec(x_5); -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -lean::dec(x_32); -x_34 = l_Lean_Elaborator_elaborators; -x_35 = l_RBNode_find___main___at_Lean_Elaborator_processCommand___spec__3(x_34, x_33); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_2); -x_37 = l_Lean_Name_toString___closed__1; -x_38 = l_Lean_Name_toStringWithSep___main(x_37, x_33); -x_39 = l_Lean_Elaborator_processCommand___lambda__1___closed__2; -x_40 = lean::string_append(x_39, x_38); -lean::dec(x_38); -x_41 = l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg(x_36, x_40, x_1, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -lean::dec(x_36); -return x_41; -} -else -{ -obj* x_42; obj* x_43; -lean::dec(x_33); -x_42 = lean::cnstr_get(x_35, 0); -lean::inc(x_42); -lean::dec(x_35); -x_43 = l_Lean_Elaborator_preresolve___main(x_2, x_1, x_3, x_4); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_42); -lean::dec(x_3); -lean::dec(x_1); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - x_45 = x_43; -} else { - lean::dec_ref(x_43); - x_45 = lean::box(0); -} -if (lean::is_scalar(x_45)) { - x_46 = lean::alloc_cnstr(0, 1, 0); -} else { - x_46 = x_45; -} -lean::cnstr_set(x_46, 0, x_44); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -lean::dec(x_47); -x_50 = lean::apply_4(x_42, x_48, x_1, x_3, x_49); -return x_50; -} -} -} -} -} -} -obj* _init_l_Lean_Elaborator_processCommand___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Elaborator_processCommand___lambda__1), 4, 0); -return x_1; -} -} -obj* l_Lean_Elaborator_processCommand(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -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; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = lean::cnstr_get(x_2, 2); -x_8 = lean::cnstr_get(x_2, 3); -x_9 = lean::cnstr_get(x_2, 4); -x_10 = lean::cnstr_get(x_2, 6); -x_11 = lean::cnstr_get(x_2, 7); -x_12 = lean::cnstr_get(x_2, 8); -x_13 = lean::cnstr_get(x_2, 9); -x_14 = lean::cnstr_get(x_2, 10); -x_15 = lean::cnstr_get(x_2, 5); -lean::dec(x_15); -x_16 = l_Lean_MessageLog_empty; -lean::inc(x_14); -lean::inc(x_13); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -lean::cnstr_set(x_2, 5, x_16); -x_17 = l_Lean_Elaborator_processCommand___closed__1; -x_18 = lean::fixpoint3(x_17, x_3, x_1, x_2); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_16); -x_21 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_21, 0, x_5); -lean::cnstr_set(x_21, 1, x_6); -lean::cnstr_set(x_21, 2, x_7); -lean::cnstr_set(x_21, 3, x_8); -lean::cnstr_set(x_21, 4, x_9); -lean::cnstr_set(x_21, 5, x_20); -lean::cnstr_set(x_21, 6, x_10); -lean::cnstr_set(x_21, 7, x_11); -lean::cnstr_set(x_21, 8, x_12); -lean::cnstr_set(x_21, 9, x_13); -lean::cnstr_set(x_21, 10, x_14); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_12); -lean::dec(x_11); -lean::dec(x_10); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -x_22 = lean::cnstr_get(x_18, 0); -lean::inc(x_22); -lean::dec(x_18); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_24 = lean::cnstr_get(x_2, 0); -x_25 = lean::cnstr_get(x_2, 1); -x_26 = lean::cnstr_get(x_2, 2); -x_27 = lean::cnstr_get(x_2, 3); -x_28 = lean::cnstr_get(x_2, 4); -x_29 = lean::cnstr_get(x_2, 6); -x_30 = lean::cnstr_get(x_2, 7); -x_31 = lean::cnstr_get(x_2, 8); -x_32 = lean::cnstr_get(x_2, 9); -x_33 = lean::cnstr_get(x_2, 10); -lean::inc(x_33); -lean::inc(x_32); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::inc(x_28); -lean::inc(x_27); -lean::inc(x_26); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_2); -x_34 = l_Lean_MessageLog_empty; -lean::inc(x_33); -lean::inc(x_32); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::inc(x_28); -lean::inc(x_27); -lean::inc(x_26); -lean::inc(x_25); -lean::inc(x_24); -x_35 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_35, 0, x_24); -lean::cnstr_set(x_35, 1, x_25); -lean::cnstr_set(x_35, 2, x_26); -lean::cnstr_set(x_35, 3, x_27); -lean::cnstr_set(x_35, 4, x_28); -lean::cnstr_set(x_35, 5, x_34); -lean::cnstr_set(x_35, 6, x_29); -lean::cnstr_set(x_35, 7, x_30); -lean::cnstr_set(x_35, 8, x_31); -lean::cnstr_set(x_35, 9, x_32); -lean::cnstr_set(x_35, 10, x_33); -x_36 = l_Lean_Elaborator_processCommand___closed__1; -x_37 = lean::fixpoint3(x_36, x_3, x_1, x_35); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -lean::dec(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_34); -x_40 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_40, 0, x_24); -lean::cnstr_set(x_40, 1, x_25); -lean::cnstr_set(x_40, 2, x_26); -lean::cnstr_set(x_40, 3, x_27); -lean::cnstr_set(x_40, 4, x_28); -lean::cnstr_set(x_40, 5, x_39); -lean::cnstr_set(x_40, 6, x_29); -lean::cnstr_set(x_40, 7, x_30); -lean::cnstr_set(x_40, 8, x_31); -lean::cnstr_set(x_40, 9, x_32); -lean::cnstr_set(x_40, 10, x_33); -return x_40; -} -else -{ -obj* x_41; obj* x_42; -lean::dec(x_33); -lean::dec(x_32); -lean::dec(x_31); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_28); -lean::dec(x_27); -lean::dec(x_26); -lean::dec(x_25); -lean::dec(x_24); -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -lean::dec(x_41); -return x_42; -} -} -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__1___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Expander_error___at_Lean_Elaborator_processCommand___spec__2___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l_RBNode_find___main___at_Lean_Elaborator_processCommand___spec__3___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Elaborator_processCommand___spec__3(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* initialize_init_lean_parser_module(obj*); -obj* initialize_init_lean_expander(obj*); -obj* initialize_init_lean_expr(obj*); -obj* initialize_init_lean_options(obj*); -obj* initialize_init_lean_environment(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_elaborator(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_module(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_expander(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_expr(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_options(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_environment(w); -if (io_result_is_error(w)) return w; -l_Lean_Elaborator_ElaboratorM_Monad = _init_l_Lean_Elaborator_ElaboratorM_Monad(); -lean::mark_persistent(l_Lean_Elaborator_ElaboratorM_Monad); -l_Lean_Elaborator_ElaboratorM_Lean_Parser_MonadRec = _init_l_Lean_Elaborator_ElaboratorM_Lean_Parser_MonadRec(); -lean::mark_persistent(l_Lean_Elaborator_ElaboratorM_Lean_Parser_MonadRec); -l_Lean_Elaborator_ElaboratorM_MonadReader = _init_l_Lean_Elaborator_ElaboratorM_MonadReader(); -lean::mark_persistent(l_Lean_Elaborator_ElaboratorM_MonadReader); -l_Lean_Elaborator_ElaboratorM_MonadState = _init_l_Lean_Elaborator_ElaboratorM_MonadState(); -lean::mark_persistent(l_Lean_Elaborator_ElaboratorM_MonadState); -l_Lean_Elaborator_ElaboratorM_MonadExcept = _init_l_Lean_Elaborator_ElaboratorM_MonadExcept(); -lean::mark_persistent(l_Lean_Elaborator_ElaboratorM_MonadExcept); -l_Lean_Elaborator_elaboratorInh___closed__1 = _init_l_Lean_Elaborator_elaboratorInh___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_elaboratorInh___closed__1); -l_Lean_Elaborator_currentScope___closed__1 = _init_l_Lean_Elaborator_currentScope___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_currentScope___closed__1); -l_Lean_Elaborator_modifyCurrentScope___closed__1 = _init_l_Lean_Elaborator_modifyCurrentScope___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_modifyCurrentScope___closed__1); -l_Lean_Elaborator_levelGetAppArgs___main___closed__1 = _init_l_Lean_Elaborator_levelGetAppArgs___main___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_levelGetAppArgs___main___closed__1); -l_Lean_Elaborator_toLevel___main___closed__1 = _init_l_Lean_Elaborator_toLevel___main___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_toLevel___main___closed__1); -l_Lean_Elaborator_toLevel___main___closed__2 = _init_l_Lean_Elaborator_toLevel___main___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_toLevel___main___closed__2); -l_Lean_Elaborator_toLevel___main___closed__3 = _init_l_Lean_Elaborator_toLevel___main___closed__3(); -lean::mark_persistent(l_Lean_Elaborator_toLevel___main___closed__3); -l_Lean_Elaborator_toLevel___main___closed__4 = _init_l_Lean_Elaborator_toLevel___main___closed__4(); -lean::mark_persistent(l_Lean_Elaborator_toLevel___main___closed__4); -l_Lean_Elaborator_Expr_mkAnnotation___closed__1 = _init_l_Lean_Elaborator_Expr_mkAnnotation___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_Expr_mkAnnotation___closed__1); -l_Lean_Elaborator_dummy = _init_l_Lean_Elaborator_dummy(); -lean::mark_persistent(l_Lean_Elaborator_dummy); -l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1 = _init_l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1(); -lean::mark_persistent(l_List_map___main___at_Lean_Elaborator_mkEqns___spec__1___closed__1); -l_Lean_Elaborator_mkEqns___closed__1 = _init_l_Lean_Elaborator_mkEqns___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_mkEqns___closed__1); -l_Lean_Elaborator_mkEqns___closed__2 = _init_l_Lean_Elaborator_mkEqns___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_mkEqns___closed__2); -l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1 = _init_l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__3___closed__1); -l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1 = _init_l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__1); -l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2 = _init_l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_toPexpr___main___spec__6___closed__2); -l_Lean_Elaborator_toPexpr___main___closed__1 = _init_l_Lean_Elaborator_toPexpr___main___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__1); -l_Lean_Elaborator_toPexpr___main___closed__2 = _init_l_Lean_Elaborator_toPexpr___main___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__2); -l_Lean_Elaborator_toPexpr___main___closed__3 = _init_l_Lean_Elaborator_toPexpr___main___closed__3(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__3); -l_Lean_Elaborator_toPexpr___main___closed__4 = _init_l_Lean_Elaborator_toPexpr___main___closed__4(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__4); -l_Lean_Elaborator_toPexpr___main___closed__5 = _init_l_Lean_Elaborator_toPexpr___main___closed__5(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__5); -l_Lean_Elaborator_toPexpr___main___closed__6 = _init_l_Lean_Elaborator_toPexpr___main___closed__6(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__6); -l_Lean_Elaborator_toPexpr___main___closed__7 = _init_l_Lean_Elaborator_toPexpr___main___closed__7(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__7); -l_Lean_Elaborator_toPexpr___main___closed__8 = _init_l_Lean_Elaborator_toPexpr___main___closed__8(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__8); -l_Lean_Elaborator_toPexpr___main___closed__9 = _init_l_Lean_Elaborator_toPexpr___main___closed__9(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__9); -l_Lean_Elaborator_toPexpr___main___closed__10 = _init_l_Lean_Elaborator_toPexpr___main___closed__10(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__10); -l_Lean_Elaborator_toPexpr___main___closed__11 = _init_l_Lean_Elaborator_toPexpr___main___closed__11(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__11); -l_Lean_Elaborator_toPexpr___main___closed__12 = _init_l_Lean_Elaborator_toPexpr___main___closed__12(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__12); -l_Lean_Elaborator_toPexpr___main___closed__13 = _init_l_Lean_Elaborator_toPexpr___main___closed__13(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__13); -l_Lean_Elaborator_toPexpr___main___closed__14 = _init_l_Lean_Elaborator_toPexpr___main___closed__14(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__14); -l_Lean_Elaborator_toPexpr___main___closed__15 = _init_l_Lean_Elaborator_toPexpr___main___closed__15(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__15); -l_Lean_Elaborator_toPexpr___main___closed__16 = _init_l_Lean_Elaborator_toPexpr___main___closed__16(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__16); -l_Lean_Elaborator_toPexpr___main___closed__17 = _init_l_Lean_Elaborator_toPexpr___main___closed__17(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__17); -l_Lean_Elaborator_toPexpr___main___closed__18 = _init_l_Lean_Elaborator_toPexpr___main___closed__18(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__18); -l_Lean_Elaborator_toPexpr___main___closed__19 = _init_l_Lean_Elaborator_toPexpr___main___closed__19(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__19); -l_Lean_Elaborator_toPexpr___main___closed__20 = _init_l_Lean_Elaborator_toPexpr___main___closed__20(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__20); -l_Lean_Elaborator_toPexpr___main___closed__21 = _init_l_Lean_Elaborator_toPexpr___main___closed__21(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__21); -l_Lean_Elaborator_toPexpr___main___closed__22 = _init_l_Lean_Elaborator_toPexpr___main___closed__22(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__22); -l_Lean_Elaborator_toPexpr___main___closed__23 = _init_l_Lean_Elaborator_toPexpr___main___closed__23(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__23); -l_Lean_Elaborator_toPexpr___main___closed__24 = _init_l_Lean_Elaborator_toPexpr___main___closed__24(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__24); -l_Lean_Elaborator_toPexpr___main___closed__25 = _init_l_Lean_Elaborator_toPexpr___main___closed__25(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__25); -l_Lean_Elaborator_toPexpr___main___closed__26 = _init_l_Lean_Elaborator_toPexpr___main___closed__26(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__26); -l_Lean_Elaborator_toPexpr___main___closed__27 = _init_l_Lean_Elaborator_toPexpr___main___closed__27(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__27); -l_Lean_Elaborator_toPexpr___main___closed__28 = _init_l_Lean_Elaborator_toPexpr___main___closed__28(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__28); -l_Lean_Elaborator_toPexpr___main___closed__29 = _init_l_Lean_Elaborator_toPexpr___main___closed__29(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__29); -l_Lean_Elaborator_toPexpr___main___closed__30 = _init_l_Lean_Elaborator_toPexpr___main___closed__30(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__30); -l_Lean_Elaborator_toPexpr___main___closed__31 = _init_l_Lean_Elaborator_toPexpr___main___closed__31(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__31); -l_Lean_Elaborator_toPexpr___main___closed__32 = _init_l_Lean_Elaborator_toPexpr___main___closed__32(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__32); -l_Lean_Elaborator_toPexpr___main___closed__33 = _init_l_Lean_Elaborator_toPexpr___main___closed__33(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__33); -l_Lean_Elaborator_toPexpr___main___closed__34 = _init_l_Lean_Elaborator_toPexpr___main___closed__34(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__34); -l_Lean_Elaborator_toPexpr___main___closed__35 = _init_l_Lean_Elaborator_toPexpr___main___closed__35(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__35); -l_Lean_Elaborator_toPexpr___main___closed__36 = _init_l_Lean_Elaborator_toPexpr___main___closed__36(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__36); -l_Lean_Elaborator_toPexpr___main___closed__37 = _init_l_Lean_Elaborator_toPexpr___main___closed__37(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__37); -l_Lean_Elaborator_toPexpr___main___closed__38 = _init_l_Lean_Elaborator_toPexpr___main___closed__38(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__38); -l_Lean_Elaborator_toPexpr___main___closed__39 = _init_l_Lean_Elaborator_toPexpr___main___closed__39(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__39); -l_Lean_Elaborator_toPexpr___main___closed__40 = _init_l_Lean_Elaborator_toPexpr___main___closed__40(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__40); -l_Lean_Elaborator_toPexpr___main___closed__41 = _init_l_Lean_Elaborator_toPexpr___main___closed__41(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__41); -l_Lean_Elaborator_toPexpr___main___closed__42 = _init_l_Lean_Elaborator_toPexpr___main___closed__42(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__42); -l_Lean_Elaborator_toPexpr___main___closed__43 = _init_l_Lean_Elaborator_toPexpr___main___closed__43(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__43); -l_Lean_Elaborator_toPexpr___main___closed__44 = _init_l_Lean_Elaborator_toPexpr___main___closed__44(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__44); -l_Lean_Elaborator_toPexpr___main___closed__45 = _init_l_Lean_Elaborator_toPexpr___main___closed__45(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__45); -l_Lean_Elaborator_toPexpr___main___closed__46 = _init_l_Lean_Elaborator_toPexpr___main___closed__46(); -lean::mark_persistent(l_Lean_Elaborator_toPexpr___main___closed__46); -l_Lean_Elaborator_declModifiersToPexpr___closed__1 = _init_l_Lean_Elaborator_declModifiersToPexpr___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_declModifiersToPexpr___closed__1); -l_Lean_Elaborator_declModifiersToPexpr___closed__2 = _init_l_Lean_Elaborator_declModifiersToPexpr___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_declModifiersToPexpr___closed__2); -l_Lean_Elaborator_declModifiersToPexpr___closed__3 = _init_l_Lean_Elaborator_declModifiersToPexpr___closed__3(); -lean::mark_persistent(l_Lean_Elaborator_declModifiersToPexpr___closed__3); -l_Lean_Elaborator_declModifiersToPexpr___closed__4 = _init_l_Lean_Elaborator_declModifiersToPexpr___closed__4(); -lean::mark_persistent(l_Lean_Elaborator_declModifiersToPexpr___closed__4); -l_Lean_Elaborator_declModifiersToPexpr___closed__5 = _init_l_Lean_Elaborator_declModifiersToPexpr___closed__5(); -lean::mark_persistent(l_Lean_Elaborator_declModifiersToPexpr___closed__5); -l_Lean_Elaborator_declModifiersToPexpr___closed__6 = _init_l_Lean_Elaborator_declModifiersToPexpr___closed__6(); -lean::mark_persistent(l_Lean_Elaborator_declModifiersToPexpr___closed__6); -l_Lean_Elaborator_declModifiersToPexpr___closed__7 = _init_l_Lean_Elaborator_declModifiersToPexpr___closed__7(); -lean::mark_persistent(l_Lean_Elaborator_declModifiersToPexpr___closed__7); -l_Lean_Elaborator_elabDefLike___closed__1 = _init_l_Lean_Elaborator_elabDefLike___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_elabDefLike___closed__1); -l_Lean_Elaborator_elabDefLike___closed__2 = _init_l_Lean_Elaborator_elabDefLike___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_elabDefLike___closed__2); -l_Lean_Elaborator_inferModToPexpr___closed__1 = _init_l_Lean_Elaborator_inferModToPexpr___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_inferModToPexpr___closed__1); -l_Lean_Elaborator_inferModToPexpr___closed__2 = _init_l_Lean_Elaborator_inferModToPexpr___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_inferModToPexpr___closed__2); -l_Lean_Elaborator_inferModToPexpr___closed__3 = _init_l_Lean_Elaborator_inferModToPexpr___closed__3(); -lean::mark_persistent(l_Lean_Elaborator_inferModToPexpr___closed__3); -l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___closed__1 = _init_l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___closed__1(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_declaration_elaborate___spec__2___closed__1); -l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__1 = _init_l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__1); -l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__2 = _init_l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_declaration_elaborate___lambda__3___closed__2); -l_Lean_Elaborator_declaration_elaborate___closed__1 = _init_l_Lean_Elaborator_declaration_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_declaration_elaborate___closed__1); -l_Lean_Elaborator_declaration_elaborate___closed__2 = _init_l_Lean_Elaborator_declaration_elaborate___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_declaration_elaborate___closed__2); -l_Lean_Elaborator_declaration_elaborate___closed__3 = _init_l_Lean_Elaborator_declaration_elaborate___closed__3(); -lean::mark_persistent(l_Lean_Elaborator_declaration_elaborate___closed__3); -l_Lean_Elaborator_declaration_elaborate___closed__4 = _init_l_Lean_Elaborator_declaration_elaborate___closed__4(); -lean::mark_persistent(l_Lean_Elaborator_declaration_elaborate___closed__4); -l_Lean_Elaborator_declaration_elaborate___closed__5 = _init_l_Lean_Elaborator_declaration_elaborate___closed__5(); -lean::mark_persistent(l_Lean_Elaborator_declaration_elaborate___closed__5); -l_Lean_Elaborator_variables_elaborate___closed__1 = _init_l_Lean_Elaborator_variables_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_variables_elaborate___closed__1); -l_Lean_Elaborator_variables_elaborate___closed__2 = _init_l_Lean_Elaborator_variables_elaborate___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_variables_elaborate___closed__2); -l_Lean_Elaborator_Module_header_elaborate___closed__1 = _init_l_Lean_Elaborator_Module_header_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_Module_header_elaborate___closed__1); -l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1___closed__1 = _init_l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1___closed__1(); -lean::mark_persistent(l_List_mfoldl___main___at_Lean_Elaborator_CommandParserConfig_registerNotationTokens___spec__1___closed__1); -l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1 = _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__1); -l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__2 = _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__2(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__2); -l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__3 = _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__3(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__3); -l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__4 = _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__4(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__4); -l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__5 = _init_l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__5(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_CommandParserConfig_registerNotationParser___spec__2___closed__5); -l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1 = _init_l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_CommandParserConfig_registerNotationParser___closed__1); -l_Lean_Elaborator_postprocessNotationSpec___closed__1 = _init_l_Lean_Elaborator_postprocessNotationSpec___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_postprocessNotationSpec___closed__1); -l_Lean_Elaborator_notation_elaborateAux___closed__1 = _init_l_Lean_Elaborator_notation_elaborateAux___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_notation_elaborateAux___closed__1); -l_Lean_Elaborator_mkNotationKind___rarg___closed__1 = _init_l_Lean_Elaborator_mkNotationKind___rarg___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_mkNotationKind___rarg___closed__1); -l_Lean_Elaborator_notation_elaborate___closed__1 = _init_l_Lean_Elaborator_notation_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_notation_elaborate___closed__1); -l_Lean_Elaborator_notation_elaborate___closed__2 = _init_l_Lean_Elaborator_notation_elaborate___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_notation_elaborate___closed__2); -l_Lean_Elaborator_universe_elaborate___closed__1 = _init_l_Lean_Elaborator_universe_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_universe_elaborate___closed__1); -l_Lean_Elaborator_universe_elaborate___closed__2 = _init_l_Lean_Elaborator_universe_elaborate___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_universe_elaborate___closed__2); -l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__1 = _init_l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__1(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__1); -l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__2 = _init_l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__2(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Elaborator_attribute_elaborate___spec__1___closed__2); -l_Lean_Elaborator_attribute_elaborate___closed__1 = _init_l_Lean_Elaborator_attribute_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_attribute_elaborate___closed__1); -l_Lean_Elaborator_attribute_elaborate___closed__2 = _init_l_Lean_Elaborator_attribute_elaborate___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_attribute_elaborate___closed__2); -l_Lean_Elaborator_check_elaborate___closed__1 = _init_l_Lean_Elaborator_check_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_check_elaborate___closed__1); -l_Lean_Elaborator_initQuot_elaborate___closed__1 = _init_l_Lean_Elaborator_initQuot_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_initQuot_elaborate___closed__1); -l_Lean_Elaborator_noKind_elaborate___closed__1 = _init_l_Lean_Elaborator_noKind_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_noKind_elaborate___closed__1); -l_Lean_Elaborator_end_elaborate___closed__1 = _init_l_Lean_Elaborator_end_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_end_elaborate___closed__1); -l_Lean_Elaborator_end_elaborate___closed__2 = _init_l_Lean_Elaborator_end_elaborate___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_end_elaborate___closed__2); -l_Lean_Elaborator_end_elaborate___closed__3 = _init_l_Lean_Elaborator_end_elaborate___closed__3(); -lean::mark_persistent(l_Lean_Elaborator_end_elaborate___closed__3); -l_Lean_Elaborator_end_elaborate___closed__4 = _init_l_Lean_Elaborator_end_elaborate___closed__4(); -lean::mark_persistent(l_Lean_Elaborator_end_elaborate___closed__4); -l_Lean_Elaborator_section_elaborate___closed__1 = _init_l_Lean_Elaborator_section_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_section_elaborate___closed__1); -l_Lean_Elaborator_section_elaborate___closed__2 = _init_l_Lean_Elaborator_section_elaborate___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_section_elaborate___closed__2); -l_Lean_Elaborator_namespace_elaborate___closed__1 = _init_l_Lean_Elaborator_namespace_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_namespace_elaborate___closed__1); -l_Lean_Elaborator_eoi_elaborate___closed__1 = _init_l_Lean_Elaborator_eoi_elaborate___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_eoi_elaborate___closed__1); -l_Lean_Elaborator_elaborators = _init_l_Lean_Elaborator_elaborators(); -lean::mark_persistent(l_Lean_Elaborator_elaborators); -l_Lean_Elaborator_resolveContext___main___closed__1 = _init_l_Lean_Elaborator_resolveContext___main___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_resolveContext___main___closed__1); -l_Lean_Elaborator_mkState___closed__1 = _init_l_Lean_Elaborator_mkState___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_mkState___closed__1); -l_Lean_Elaborator_mkState___closed__2 = _init_l_Lean_Elaborator_mkState___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_mkState___closed__2); -l_Lean_Elaborator_mkState___closed__3 = _init_l_Lean_Elaborator_mkState___closed__3(); -lean::mark_persistent(l_Lean_Elaborator_mkState___closed__3); -l_Lean_Elaborator_mkState___closed__4 = _init_l_Lean_Elaborator_mkState___closed__4(); -lean::mark_persistent(l_Lean_Elaborator_mkState___closed__4); -l_Lean_Elaborator_processCommand___lambda__1___closed__1 = _init_l_Lean_Elaborator_processCommand___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_processCommand___lambda__1___closed__1); -l_Lean_Elaborator_processCommand___lambda__1___closed__2 = _init_l_Lean_Elaborator_processCommand___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Elaborator_processCommand___lambda__1___closed__2); -l_Lean_Elaborator_processCommand___closed__1 = _init_l_Lean_Elaborator_processCommand___closed__1(); -lean::mark_persistent(l_Lean_Elaborator_processCommand___closed__1); -return w; -} diff --git a/src/stage0/init/lean/expander.cpp b/src/stage0/init/lean/expander.cpp deleted file mode 100644 index 34a20c6c43..0000000000 --- a/src/stage0/init/lean/expander.cpp +++ /dev/null @@ -1,26573 +0,0 @@ -// Lean compiler output -// Module: init.lean.expander -// Imports: init.lean.parser.module init.lean.expr -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -obj* l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_mixfix_transform___closed__5; -obj* l_RBNode_setBlack___main___rarg(obj*); -extern obj* l_Lean_Parser_Term_arrow; -obj* l_Lean_Expander_getOptType___main(obj*); -obj* l_Lean_Expander_sorry_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_ExpanderState_new; -obj* l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1(obj*); -obj* l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Expander_sorry_transform(obj*, obj*); -obj* l_Lean_Expander_getOptType___main___closed__1; -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_flipScopes___main(obj*, obj*); -obj* l_Lean_Expander_mixfixToNotationSpec___closed__5; -obj* l_Lean_Expander_coeBinderBracketedBinder___closed__1; -obj* l_Lean_Expander_expandBracketedBinder___main(obj*, obj*); -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(obj*, obj*); -extern obj* l_Lean_Parser_Term_hole_HasView; -obj* l_Lean_Expander_depArrow_transform(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__1(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_binderDefault_HasView; -obj* l_Lean_Expander_assume_transform___closed__1; -obj* l_Lean_Expander_lambda_transform___boxed(obj*, obj*); -extern obj* l_Lean_Parser_command_reserveMixfix; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4(uint8, obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__6(obj*, obj*); -obj* l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1; -obj* l_Lean_Expander_mkSimpleBinder(obj*, uint8, obj*); -obj* l_Lean_Expander_mixfix_transform___closed__6; -obj* l_Lean_Expander_expandBracketedBinder___main___closed__5; -obj* l_Lean_Expander_binderIdentToIdent___boxed(obj*); -extern obj* l_Lean_Parser_Term_let; -obj* l_Lean_Expander_transformerConfigCoeFrontendConfig(obj*); -obj* l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__5(obj*, obj*); -obj* l_Lean_Expander_mixfixToNotationSpec___closed__7; -extern obj* l_Lean_Parser_Term_assume_HasView; -obj* l_Lean_Expander_assume_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_variables_transform___boxed(obj*, obj*); -extern obj* l_Lean_Parser_command_mixfix; -obj* l_Lean_Expander_paren_transform(obj*, obj*); -obj* l_Lean_Expander_mkNotationTransformer___lambda__1(obj*, obj*); -extern obj* l_Lean_Parser_command_reserveMixfix_HasView; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17(uint8, obj*, obj*); -obj* l_Lean_Expander_let_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_mixfixToNotationSpec___closed__1; -obj* l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(obj*); -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView; -obj* l_Lean_Expander_coeBinderBracketedBinder(obj*); -obj* l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(obj*, obj*); -obj* l_Lean_Expander_error___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_mixfixToNotationSpec___boxed(obj*, obj*, obj*); -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__2(obj*); -obj* l_Lean_Expander_bracketedBinders_transform___boxed(obj*, obj*); -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__14(obj*, obj*); -extern obj* l_Lean_Parser_command_variables; -obj* l_Lean_Expander_arrow_transform(obj*, obj*); -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_transformerConfigCoeFrontendConfig___boxed(obj*); -obj* l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1(obj*); -obj* l_Lean_Name_toStringWithSep___main(obj*, obj*); -extern obj* l_Lean_Parser_TermParserM_Alternative; -obj* l_Lean_Expander_mkSimpleBinder___closed__2; -obj* l_Lean_Expander_if_transform___boxed(obj*, obj*); -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5___boxed(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_expander_2__expandCore___main(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_expandBracketedBinder___main___closed__2; -obj* l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___boxed(obj*, obj*); -obj* l_Lean_Expander_depArrow_transform___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_expander_2__expandCore___main___closed__1; -obj* l_Lean_Expander_mkSimpleBinder___closed__5; -obj* l_Lean_Expander_Level_leading_transform(obj*, obj*); -obj* l_Lean_Expander_lambda_transform___lambda__1(obj*, obj*); -obj* l_Lean_Expander_TransformM_Monad; -obj* l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1(obj*, obj*); -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_Term_bracketedBinders; -obj* l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___boxed(obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__2(uint8, obj*, obj*); -obj* l___private_init_lean_expander_1__popStxArg(obj*, obj*); -obj* l_Lean_Expander_variable_transform___closed__1; -obj* l_ExceptT_MonadExcept___rarg(obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(uint8, obj*, obj*); -extern obj* l_Lean_Parser_command_mixfix_HasView; -obj* l_Lean_Expander_axiom_transform___closed__1; -obj* l_Lean_Expander_expandBracketedBinder___main___closed__3; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4___boxed(obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_reserveNotation_HasView; -extern obj* l_Id_Monad; -obj* l_Lean_Expander_coeSimpleBinderBinders(obj*); -extern obj* l_Lean_Parser_command_axiom_HasView; -obj* l_Lean_Expander_paren_transform___closed__1; -obj* l_Lean_Expander_TransformM_MonadReader; -extern obj* l_Lean_Parser_command_declaration_HasView; -extern obj* l_Lean_Parser_command_variables_HasView; -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -obj* l_Lean_Expander_mixfixToNotationSpec___closed__6; -obj* l_coe___at_Lean_Expander_depArrow_transform___spec__1(obj*); -obj* l_ReaderT_read___rarg(obj*, obj*); -obj* l___private_init_lean_expander_2__expandCore(obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__3___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Expander_pi_transform___boxed(obj*, obj*); -obj* l_List_foldr1Opt___main___at_Lean_Expander_paren_transform___spec__2(obj*); -extern obj* l_Lean_Parser_Term_depArrow; -extern obj* l_Lean_Parser_command_introRule_HasView; -extern obj* l_Lean_Parser_command_universes_HasView; -obj* l_Lean_Expander_coeBracketedBinderMixedBinder(obj*); -obj* l___private_init_lean_expander_1__popStxArg___boxed(obj*, obj*); -obj* l_Lean_Parser_tryView___at_Lean_Expander_mkNotationTransformer___spec__6___boxed(obj*, obj*); -extern obj* l_Lean_Parser_command_variable_HasView; -obj* l_Lean_Expander_reserveMixfix_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_coeNameIdent(obj*); -obj* l_List_map___main___at_Lean_Expander_coeMixedBindersBindersExt___spec__2(obj*); -obj* l_ReaderT_Monad___rarg(obj*); -obj* l_Lean_Expander_error___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_coeIdentsBindersExt___rarg(obj*, obj*); -obj* l_Lean_Expander_expandBinders___boxed(obj*, obj*, obj*, obj*); -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -obj* l_List_join___main___rarg(obj*); -obj* l_Lean_Expander_mkNotationTransformer___boxed(obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(obj*); -obj* l_Lean_Expander_binderIdentToIdent___main___closed__1; -extern obj* l_Lean_Parser_command_axiom; -obj* l_Lean_Expander_mkScope(obj*, obj*); -obj* l_Lean_Expander_Level_leading_transform___boxed(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__10(obj*, obj*); -obj* l_Lean_Expander_coeMixedBindersBindersExt(obj*); -extern obj* l_Lean_Parser_Term_if; -obj* l_Lean_Expander_lambda_transform___closed__1; -obj* l_Lean_Expander_assume_transform(obj*, obj*); -obj* l_Lean_Expander_reserveMixfix_transform___closed__1; -extern obj* l_Lean_Parser_command_universes; -obj* l_Lean_Expander_error(obj*, obj*); -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l_Lean_Expander_getOptType___boxed(obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__7(obj*, obj*); -obj* l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1___boxed(obj*, obj*); -obj* l_Lean_Expander_universes_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_let_transform(obj*, obj*); -obj* l_Lean_Expander_expandBinders(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(obj*); -obj* l_Lean_Expander_variable_transform(obj*, obj*); -obj* l_Lean_Expander_mixfix_transform___closed__1; -obj* l_Lean_Expander_bindingAnnotationUpdate_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_introRule_transform(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18(uint8, obj*, obj*); -extern obj* l_Lean_Parser_Term_depArrow_HasView; -obj* l_Lean_Expander_declaration_transform(obj*, obj*); -obj* l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(obj*, obj*, obj*); -obj* l_Lean_Expander_Subtype_transform(obj*, obj*); -obj* l_Lean_Parser_Syntax_getPos(obj*); -obj* l_Lean_Expander_builtinTransformers; -obj* l_coe___at_Lean_Expander_coeIdentsBindersExt___spec__1(obj*); -obj* l_Lean_Expander_mixfixToNotationSpec___closed__2; -obj* l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3___closed__1; -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___boxed(obj*); -extern obj* l_Lean_Parser_noKind; -extern obj* l_Lean_Parser_Term_lambda_HasView; -obj* l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__4; -obj* l_List_foldl___main___at_Lean_Expander_builtinTransformers___spec__3(obj*, obj*); -extern obj* l_Lean_Parser_Term_paren; -obj* l_List_map___main___at_Lean_Expander_coeIdentsBindersExt___spec__2(obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_mkNotationTransformer___lambda__1___boxed(obj*, obj*); -obj* l_Lean_Expander_Subtype_transform___closed__1; -extern "C" obj* lean_name_mk_string(obj*, obj*); -extern obj* l_Lean_Parser_Term_binderIdent_HasView; -obj* l_Lean_Expander_mkNotationTransformer(obj*, obj*, obj*); -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_arrow_transform___boxed(obj*, obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Expander_mkSimpleBinder___closed__1; -obj* l_Lean_Expander_pi_transform(obj*, obj*); -extern obj* l_Lean_Parser_Term_sorry; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__8(obj*, obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Expander_coeIdentBinderId(obj*); -obj* l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3(obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_Subtype; -obj* l_Lean_Expander_binderIdentToIdent___main___boxed(obj*); -uint8 l_RBNode_isRed___main___rarg(obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__3(uint8, obj*, obj*); -obj* l_Lean_Expander_declaration_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_declaration_transform___closed__3; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Expander_mkSimpleBinder___closed__6; -obj* l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__5(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_expandBracketedBinder___boxed(obj*, obj*); -obj* l_Lean_Expander_error___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_identUnivs; -obj* l_List_lookup___main___at_Lean_Expander_mkNotationTransformer___spec__7___boxed(obj*, obj*); -obj* l_Lean_Expander_ExpanderConfig_HasLift___boxed(obj*); -extern obj* l_Lean_Parser_Term_Subtype_HasView; -obj* l_Lean_Expander_ExpanderConfig_HasLift(obj*); -obj* l_Lean_Expander_globId(obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17___boxed(obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_variable; -obj* l_Lean_Expander_expandBracketedBinder___main___closed__4; -obj* l_Lean_Expander_if_transform___closed__2; -obj* l_Lean_Expander_expandBracketedBinder___main___closed__1; -extern obj* l_Lean_Parser_Level_leading; -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_notation_HasView; -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_axiom_transform(obj*, obj*); -extern obj* l_Lean_Parser_Term_app_HasView; -obj* l_Lean_Expander_mixfix_transform___closed__3; -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_expander_1__popStxArg___closed__1; -extern obj* l_Lean_Parser_Term_assume; -obj* l_Lean_Expander_coeIdentIdentUnivs(obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20___boxed(obj*, obj*, obj*); -obj* l_Lean_Expander_noExpansion___boxed(obj*); -obj* l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_mkScope___boxed(obj*, obj*); -obj* l_coe___at_Lean_Expander_coeMixedBindersBindersExt___spec__1___rarg(obj*, obj*); -obj* l_Lean_Expander_paren_transform___closed__2; -obj* l_Lean_Expander_binderIdentToIdent(obj*); -obj* l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__3(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_mkSimpleBinder___boxed(obj*, obj*, obj*); -obj* l_Lean_Expander_if_transform___closed__1; -obj* l_String_trim(obj*); -obj* l_Lean_Expander_arrow_transform___closed__1; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__13(obj*, obj*); -obj* l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(obj*, obj*, obj*); -obj* l_Lean_Expander_bindingAnnotationUpdate; -obj* l_Lean_Expander_lambda_transform(obj*, obj*); -obj* l_Lean_Expander_coeBindersExtBinders(obj*); -obj* l_Lean_Expander_universes_transform(obj*, obj*); -obj* l_Lean_Expander_getOptType___main___boxed(obj*); -extern obj* l_Lean_Parser_command_declaration; -obj* l_Lean_Expander_coeBinderBracketedBinder___closed__2; -obj* l_Lean_Expander_getOptType(obj*); -extern obj* l_Lean_Parser_TermParserM_Monad; -uint8 l_Lean_Name_quickLt(obj*, obj*); -obj* l_ReaderT_MonadExcept___rarg(obj*); -obj* l_Lean_Expander_sorry_transform___closed__1; -obj* l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_bracketedBinders_HasView; -extern obj* l_Lean_Parser_command_universe_HasView; -obj* l_Lean_Expander_if_transform___closed__3; -obj* l_Lean_Expander_reserveMixfix_transform(obj*, obj*); -obj* l_coe___at_Lean_Expander_coeMixedBindersBindersExt___spec__1(obj*); -obj* l_List_map___main___at_Lean_Expander_coeMixedBindersBindersExt___spec__2___rarg(obj*, obj*); -extern obj* l_Lean_Parser_Term_anonymousConstructor_HasView; -obj* l_Lean_Expander_TransformM_MonadExcept; -obj* l_Lean_Expander_let_transform___closed__1; -obj* l_Lean_Expander_mkSimpleBinder___closed__3; -obj* l_Lean_Expander_introRule_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_declaration_transform___closed__2; -obj* l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1(obj*); -obj* l_Lean_Parser_number_View_ofNat(obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__1(uint8, obj*, obj*); -obj* l_Lean_Expander_depArrow_transform___closed__1; -obj* l_Lean_Expander_expandBracketedBinder___main___boxed(obj*, obj*); -extern obj* l_Lean_Parser_Level_leading_HasView; -obj* l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1; -obj* l_Lean_Expander_pi_transform___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Expander_Subtype_transform___boxed(obj*, obj*); -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3___boxed(obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__11(obj*, obj*); -obj* l_List_map___main___at___private_init_lean_expander_2__expandCore___main___spec__4(obj*, obj*); -obj* l_Lean_Expander_declaration_transform___closed__1; -extern obj* l_Lean_Parser_Term_arrow_HasView; -obj* l_Lean_Expander_mkSimpleBinder___closed__7; -obj* l_ExceptT_Monad___rarg(obj*); -obj* l_Lean_Expander_variables_transform(obj*, obj*); -obj* l_List_lookup___main___at_Lean_Expander_mkNotationTransformer___spec__7(obj*, obj*); -extern obj* l_Lean_Parser_Term_paren_HasView; -extern obj* l_Lean_Parser_Term_lambda; -obj* l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Expander_mixfix_transform___closed__2; -extern obj* l_Lean_Name_toString___closed__1; -obj* l_Lean_Expander_bindingAnnotationUpdate_Parser_Lean_Parser_HasView; -obj* l_Lean_Expander_paren_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_expandBracketedBinder___main___closed__6; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__15(obj*, obj*); -obj* l_Lean_Expander_variable_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_axiom_transform___boxed(obj*, obj*); -obj* l_Lean_Expander_coeMixedBindersBindersExt___rarg(obj*, obj*); -obj* l_Lean_Expander_mixfix_transform(obj*, obj*); -extern obj* l_Lean_Parser_Term_pi; -obj* l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1(obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_expander_2__expandCore___main___spec__2___boxed(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_universes_transform___spec__1___closed__1; -obj* l_coe___at_Lean_Expander_coeIdentsBindersExt___spec__1___rarg(obj*, obj*); -obj* l_Lean_FileMap_toPosition(obj*, obj*); -obj* l_Lean_Expander_error___boxed(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(obj*); -obj* l_List_map___main___at_Lean_Expander_coeIdentsBindersExt___spec__2___rarg(obj*, obj*); -obj* l_Lean_Expander_mixfixToNotationSpec___closed__4; -obj* l_List_map___main___at_Lean_Expander_universes_transform___spec__1(obj*); -obj* l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView_x27; -extern obj* l_Lean_Parser_TermParserM_MonadExcept; -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Expander_bindingAnnotationUpdate_Parser___closed__1; -obj* l_Lean_Parser_tryView___at_Lean_Expander_mkNotationTransformer___spec__6(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__9(obj*, obj*); -extern obj* l_Lean_Parser_Term_match_HasView; -obj* l_RBNode_find___main___at___private_init_lean_expander_2__expandCore___main___spec__2(obj*, obj*); -obj* l_Lean_Expander_mixfixToNotationSpec(obj*, obj*, obj*); -obj* l_Lean_Parser_Substring_ofString(obj*); -obj* l_Lean_Expander_mkSimpleBinder___closed__4; -obj* l_Lean_Expander_noExpansion___closed__1; -obj* l_Lean_Expander_binderIdentToIdent___main(obj*); -extern obj* l_Lean_Parser_identUnivs_HasView; -obj* l_Lean_Expander_coeIdentsBindersExt(obj*); -extern obj* l_Lean_Parser_Term_if_HasView; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19___boxed(obj*, obj*, obj*); -obj* l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3(obj*, obj*); -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Expander_mixfix_transform___boxed(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__12(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18___boxed(obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_NotationSpec_precedence_HasView; -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19(uint8, obj*, obj*); -obj* l_Lean_Expander_coeBinderBracketedBinder___boxed(obj*); -extern obj* l_Lean_Parser_Term_binders_HasView; -extern obj* l_Lean_Parser_Term_let_HasView; -obj* l_Lean_Expander_mixfixToNotationSpec___closed__3; -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__2___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_introRule; -extern obj* l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -extern obj* l_Lean_Parser_Term_pi_HasView; -obj* l_Lean_Expander_expandBracketedBinder(obj*, obj*); -obj* l_Lean_Expander_noExpansion(obj*); -obj* l_Lean_Expander_bracketedBinders_transform(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__16(obj*, obj*); -obj* l_List_map___main___at_Lean_Expander_paren_transform___spec__1(obj*); -obj* l_Lean_Expander_expand(obj*, obj*); -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Expander_if_transform(obj*, obj*); -obj* l_coe___at_Lean_Expander_mkNotationTransformer___spec__2(obj*); -obj* l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__2; -obj* l_Lean_Expander_mixfix_transform___closed__4; -obj* l_Lean_Expander_transformerConfigCoeFrontendConfig(obj* x_1) { -_start: -{ -lean::inc(x_1); -return x_1; -} -} -obj* l_Lean_Expander_transformerConfigCoeFrontendConfig___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_transformerConfigCoeFrontendConfig(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Expander_TransformM_Monad() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Id_Monad; -x_2 = l_ExceptT_Monad___rarg(x_1); -x_3 = l_ReaderT_Monad___rarg(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_TransformM_MonadReader() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Id_Monad; -x_2 = l_ExceptT_Monad___rarg(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_read___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_TransformM_MonadExcept() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Id_Monad; -x_2 = l_ExceptT_MonadExcept___rarg(x_1); -x_3 = l_ReaderT_MonadExcept___rarg(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_noExpansion___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Expander_noExpansion(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_noExpansion___closed__1; -return x_2; -} -} -obj* l_Lean_Expander_noExpansion___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_noExpansion(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Expander_error___rarg___lambda__1(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_10; -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::apply_1(x_2, x_5); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_7, 2); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::box(0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_11; obj* x_12; uint8 x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::mk_nat_obj(0u); -x_12 = l_Lean_FileMap_toPosition(x_9, x_11); -lean::dec(x_9); -x_13 = 2; -x_14 = l_String_splitAux___main___closed__1; -x_15 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_15, 0, x_8); -lean::cnstr_set(x_15, 1, x_12); -lean::cnstr_set(x_15, 2, x_10); -lean::cnstr_set(x_15, 3, x_14); -lean::cnstr_set(x_15, 4, x_4); -lean::cnstr_set_scalar(x_15, sizeof(void*)*5, x_13); -x_16 = lean::apply_2(x_6, lean::box(0), x_15); -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_3, 0); -x_18 = l_Lean_Parser_Syntax_getPos(x_17); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; uint8 x_21; obj* x_22; obj* x_23; obj* x_24; -x_19 = lean::mk_nat_obj(0u); -x_20 = l_Lean_FileMap_toPosition(x_9, x_19); -lean::dec(x_9); -x_21 = 2; -x_22 = l_String_splitAux___main___closed__1; -x_23 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_23, 0, x_8); -lean::cnstr_set(x_23, 1, x_20); -lean::cnstr_set(x_23, 2, x_10); -lean::cnstr_set(x_23, 3, x_22); -lean::cnstr_set(x_23, 4, x_4); -lean::cnstr_set_scalar(x_23, sizeof(void*)*5, x_21); -x_24 = lean::apply_2(x_6, lean::box(0), x_23); -return x_24; -} -else -{ -obj* x_25; obj* x_26; uint8 x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_18, 0); -lean::inc(x_25); -lean::dec(x_18); -x_26 = l_Lean_FileMap_toPosition(x_9, x_25); -lean::dec(x_9); -x_27 = 2; -x_28 = l_String_splitAux___main___closed__1; -x_29 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_29, 0, x_8); -lean::cnstr_set(x_29, 1, x_26); -lean::cnstr_set(x_29, 2, x_10); -lean::cnstr_set(x_29, 3, x_28); -lean::cnstr_set(x_29, 4, x_4); -lean::cnstr_set_scalar(x_29, sizeof(void*)*5, x_27); -x_30 = lean::apply_2(x_6, lean::box(0), x_29); -return x_30; -} -} -} -} -obj* l_Lean_Expander_error___rarg(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_10; -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_9, 0, x_4); -lean::closure_set(x_9, 1, x_3); -lean::closure_set(x_9, 2, x_6); -lean::closure_set(x_9, 3, x_7); -x_10 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_2, x_9); -return x_10; -} -} -obj* l_Lean_Expander_error(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___rarg), 7, 0); -return x_3; -} -} -obj* l_Lean_Expander_error___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Expander_error___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Expander_error___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_error(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Expander_coeNameIdent(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_2 = lean::box(0); -x_3 = l_Lean_Name_toString___closed__1; -lean::inc(x_1); -x_4 = l_Lean_Name_toStringWithSep___main(x_3, x_1); -x_5 = l_Lean_Parser_Substring_ofString(x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_2); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_1); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -return x_7; -} -} -obj* l_Lean_Expander_globId(obj* x_1) { -_start: -{ -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_2 = l_Lean_Parser_identUnivs_HasView; -x_3 = lean::cnstr_get(x_2, 1); -lean::inc(x_3); -x_4 = lean::box(0); -x_5 = l_Lean_Name_toString___closed__1; -lean::inc(x_1); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_1); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -lean::inc(x_1); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_1); -lean::cnstr_set(x_10, 3, x_9); -lean::cnstr_set(x_10, 4, x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_4); -x_12 = lean::apply_1(x_3, x_11); -return x_12; -} -} -obj* l_Lean_Expander_coeIdentIdentUnivs(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = lean::box(0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Expander_coeIdentBinderId(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_coe___at_Lean_Expander_coeIdentsBindersExt___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::apply_1(x_1, x_2); -return x_3; -} -} -obj* l_coe___at_Lean_Expander_coeIdentsBindersExt___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_coe___at_Lean_Expander_coeIdentsBindersExt___spec__1___rarg), 2, 0); -return x_2; -} -} -obj* l_List_map___main___at_Lean_Expander_coeIdentsBindersExt___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_1); -x_7 = lean::apply_1(x_1, x_5); -x_8 = l_List_map___main___at_Lean_Expander_coeIdentsBindersExt___spec__2___rarg(x_1, x_6); -lean::cnstr_set(x_2, 1, x_8); -lean::cnstr_set(x_2, 0, x_7); -return x_2; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_2, 0); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_2); -lean::inc(x_1); -x_11 = lean::apply_1(x_1, x_9); -x_12 = l_List_map___main___at_Lean_Expander_coeIdentsBindersExt___spec__2___rarg(x_1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_coeIdentsBindersExt___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Expander_coeIdentsBindersExt___spec__2___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Expander_coeIdentsBindersExt___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_List_map___main___at_Lean_Expander_coeIdentsBindersExt___spec__2___rarg(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -} -obj* l_Lean_Expander_coeIdentsBindersExt(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_coeIdentsBindersExt___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Expander_coeBracketedBinderMixedBinder(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_coe___at_Lean_Expander_coeMixedBindersBindersExt___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::apply_1(x_1, x_2); -return x_3; -} -} -obj* l_coe___at_Lean_Expander_coeMixedBindersBindersExt___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_coe___at_Lean_Expander_coeMixedBindersBindersExt___spec__1___rarg), 2, 0); -return x_2; -} -} -obj* l_List_map___main___at_Lean_Expander_coeMixedBindersBindersExt___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_1); -x_7 = lean::apply_1(x_1, x_5); -x_8 = l_List_map___main___at_Lean_Expander_coeMixedBindersBindersExt___spec__2___rarg(x_1, x_6); -lean::cnstr_set(x_2, 1, x_8); -lean::cnstr_set(x_2, 0, x_7); -return x_2; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_2, 0); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_2); -lean::inc(x_1); -x_11 = lean::apply_1(x_1, x_9); -x_12 = l_List_map___main___at_Lean_Expander_coeMixedBindersBindersExt___spec__2___rarg(x_1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_coeMixedBindersBindersExt___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Expander_coeMixedBindersBindersExt___spec__2___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Expander_coeMixedBindersBindersExt___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::box(0); -x_4 = l_List_map___main___at_Lean_Expander_coeMixedBindersBindersExt___spec__2___rarg(x_1, x_2); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_3); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Expander_coeMixedBindersBindersExt(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_coeMixedBindersBindersExt___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Expander_coeBindersExtBinders(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Expander_coeSimpleBinderBinders(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Expander_coeBinderBracketedBinder___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("("); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_coeBinderBracketedBinder___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string(")"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* l_Lean_Expander_coeBinderBracketedBinder(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -x_5 = l_Lean_Expander_coeBinderBracketedBinder___closed__1; -x_6 = l_Lean_Expander_coeBinderBracketedBinder___closed__2; -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_4); -lean::cnstr_set(x_7, 2, x_6); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -} -obj* l_Lean_Expander_coeBinderBracketedBinder___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_coeBinderBracketedBinder(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_4, 0); -x_6 = lean::cnstr_get(x_4, 2); -x_7 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; obj* x_11; obj* x_12; obj* x_13; -x_8 = lean::mk_nat_obj(0u); -x_9 = l_Lean_FileMap_toPosition(x_6, x_8); -x_10 = 2; -x_11 = l_String_splitAux___main___closed__1; -lean::inc(x_5); -x_12 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_9); -lean::cnstr_set(x_12, 2, x_7); -lean::cnstr_set(x_12, 3, x_11); -lean::cnstr_set(x_12, 4, x_2); -lean::cnstr_set_scalar(x_12, sizeof(void*)*5, x_10); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_1, 0); -x_15 = l_Lean_Parser_Syntax_getPos(x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; uint8 x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::mk_nat_obj(0u); -x_17 = l_Lean_FileMap_toPosition(x_6, x_16); -x_18 = 2; -x_19 = l_String_splitAux___main___closed__1; -lean::inc(x_5); -x_20 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_20, 0, x_5); -lean::cnstr_set(x_20, 1, x_17); -lean::cnstr_set(x_20, 2, x_7); -lean::cnstr_set(x_20, 3, x_19); -lean::cnstr_set(x_20, 4, x_2); -lean::cnstr_set_scalar(x_20, sizeof(void*)*5, x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; uint8 x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_15, 0); -lean::inc(x_22); -lean::dec(x_15); -x_23 = l_Lean_FileMap_toPosition(x_6, x_22); -x_24 = 2; -x_25 = l_String_splitAux___main___closed__1; -lean::inc(x_5); -x_26 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_26, 0, x_5); -lean::cnstr_set(x_26, 1, x_23); -lean::cnstr_set(x_26, 2, x_7); -lean::cnstr_set(x_26, 3, x_25); -lean::cnstr_set(x_26, 4, x_2); -lean::cnstr_set_scalar(x_26, sizeof(void*)*5, x_24); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -} -} -} -obj* l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -obj* _init_l___private_init_lean_expander_1__popStxArg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("mkNotationTransformer: unreachable"); -return x_1; -} -} -obj* l___private_init_lean_expander_1__popStxArg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_7 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_5, x_6, x_1, x_2); -lean::dec(x_1); -lean::dec(x_5); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_1, 1); -lean::dec(x_9); -x_10 = lean::cnstr_get(x_3, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_3, 1); -lean::inc(x_11); -lean::dec(x_3); -lean::cnstr_set(x_1, 1, x_11); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_1); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_14 = lean::cnstr_get(x_1, 0); -x_15 = lean::cnstr_get(x_1, 2); -x_16 = lean::cnstr_get(x_1, 3); -lean::inc(x_16); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_1); -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_3, 1); -lean::inc(x_18); -lean::dec(x_3); -x_19 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_19, 0, x_14); -lean::cnstr_set(x_19, 1, x_18); -lean::cnstr_set(x_19, 2, x_15); -lean::cnstr_set(x_19, 3, x_16); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -} -} -obj* l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -return x_5; -} -} -obj* l___private_init_lean_expander_1__popStxArg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l___private_init_lean_expander_1__popStxArg(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_3, 0); -x_5 = lean::cnstr_get(x_3, 2); -x_6 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; obj* x_10; obj* x_11; obj* x_12; -x_7 = lean::mk_nat_obj(0u); -x_8 = l_Lean_FileMap_toPosition(x_5, x_7); -x_9 = 2; -x_10 = l_String_splitAux___main___closed__1; -lean::inc(x_4); -x_11 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_8); -lean::cnstr_set(x_11, 2, x_6); -lean::cnstr_set(x_11, 3, x_10); -lean::cnstr_set(x_11, 4, x_2); -lean::cnstr_set_scalar(x_11, sizeof(void*)*5, x_9); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_1, 0); -x_14 = l_Lean_Parser_Syntax_getPos(x_13); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; uint8 x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = lean::mk_nat_obj(0u); -x_16 = l_Lean_FileMap_toPosition(x_5, x_15); -x_17 = 2; -x_18 = l_String_splitAux___main___closed__1; -lean::inc(x_4); -x_19 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_19, 0, x_4); -lean::cnstr_set(x_19, 1, x_16); -lean::cnstr_set(x_19, 2, x_6); -lean::cnstr_set(x_19, 3, x_18); -lean::cnstr_set(x_19, 4, x_2); -lean::cnstr_set_scalar(x_19, sizeof(void*)*5, x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; uint8 x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_14, 0); -lean::inc(x_21); -lean::dec(x_14); -x_22 = l_Lean_FileMap_toPosition(x_5, x_21); -x_23 = 2; -x_24 = l_String_splitAux___main___closed__1; -lean::inc(x_4); -x_25 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_22); -lean::cnstr_set(x_25, 2, x_6); -lean::cnstr_set(x_25, 3, x_24); -lean::cnstr_set(x_25, 4, x_2); -lean::cnstr_set_scalar(x_25, sizeof(void*)*5, x_23); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -} -} -} -obj* l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_coe___at_Lean_Expander_mkNotationTransformer___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_4); -x_7 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_10, 0, x_8); -x_11 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(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_11); -return x_12; -} -} -} -} -obj* _init_l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("mkNotationTransformer: unimplemented"); -return x_1; -} -} -obj* _init_l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("λ"); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -x_4 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -obj* _init_l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string(","); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_1); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -lean::inc(x_1); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_1); -x_15 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_16 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_15, x_3, x_4); -lean::dec(x_3); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_8); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_8, 1); -lean::inc(x_21); -lean::dec(x_8); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -lean::dec(x_14); -lean::free_heap_obj(x_2); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_2 = x_12; -x_3 = x_22; -goto _start; -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_21); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_21, 0); -switch (lean::obj_tag(x_25)) { -case 0: -{ -obj* x_26; obj* x_27; -lean::dec(x_25); -lean::dec(x_14); -x_26 = lean::cnstr_get(x_20, 1); -lean::inc(x_26); -lean::dec(x_20); -x_27 = l___private_init_lean_expander_1__popStxArg(x_26, x_4); -if (lean::obj_tag(x_27) == 0) -{ -uint8 x_28; -lean::free_heap_obj(x_21); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -return x_27; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_27, 0); -lean::inc(x_29); -lean::dec(x_27); -x_30 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -return x_30; -} -} -else -{ -obj* x_31; obj* x_32; obj* x_33; uint8 x_34; -x_31 = lean::cnstr_get(x_27, 0); -lean::inc(x_31); -lean::dec(x_27); -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = !lean::is_exclusive(x_32); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_35 = lean::cnstr_get(x_32, 3); -lean::dec(x_35); -x_36 = l_Lean_Parser_Term_binderIdent_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_33); -x_39 = lean::box(0); -lean::cnstr_set(x_2, 1, x_39); -lean::cnstr_set(x_2, 0, x_38); -x_40 = lean::box(0); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_2); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_21, 0, x_42); -lean::cnstr_set(x_32, 3, x_21); -x_2 = x_12; -x_3 = x_32; -goto _start; -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_44 = lean::cnstr_get(x_32, 0); -x_45 = lean::cnstr_get(x_32, 1); -x_46 = lean::cnstr_get(x_32, 2); -lean::inc(x_46); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_32); -x_47 = l_Lean_Parser_Term_binderIdent_HasView; -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::apply_1(x_48, x_33); -x_50 = lean::box(0); -lean::cnstr_set(x_2, 1, x_50); -lean::cnstr_set(x_2, 0, x_49); -x_51 = lean::box(0); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_2); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_21, 0, x_53); -x_54 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_54, 0, x_44); -lean::cnstr_set(x_54, 1, x_45); -lean::cnstr_set(x_54, 2, x_46); -lean::cnstr_set(x_54, 3, x_21); -x_2 = x_12; -x_3 = x_54; -goto _start; -} -} -} -case 1: -{ -obj* x_56; obj* x_57; -lean::dec(x_25); -lean::dec(x_14); -lean::free_heap_obj(x_2); -x_56 = lean::cnstr_get(x_20, 1); -lean::inc(x_56); -lean::dec(x_20); -x_57 = l___private_init_lean_expander_1__popStxArg(x_56, x_4); -if (lean::obj_tag(x_57) == 0) -{ -uint8 x_58; -lean::free_heap_obj(x_21); -lean::dec(x_12); -lean::dec(x_1); -x_58 = !lean::is_exclusive(x_57); -if (x_58 == 0) -{ -return x_57; -} -else -{ -obj* x_59; obj* x_60; -x_59 = lean::cnstr_get(x_57, 0); -lean::inc(x_59); -lean::dec(x_57); -x_60 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -return x_60; -} -} -else -{ -obj* x_61; obj* x_62; obj* x_63; uint8 x_64; -x_61 = lean::cnstr_get(x_57, 0); -lean::inc(x_61); -lean::dec(x_57); -x_62 = lean::cnstr_get(x_61, 1); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_61, 0); -lean::inc(x_63); -lean::dec(x_61); -x_64 = !lean::is_exclusive(x_62); -if (x_64 == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_65 = lean::cnstr_get(x_62, 3); -lean::dec(x_65); -x_66 = l_Lean_Parser_Term_binders_HasView; -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -x_68 = lean::apply_1(x_67, x_63); -lean::cnstr_set(x_21, 0, x_68); -lean::cnstr_set(x_62, 3, x_21); -x_2 = x_12; -x_3 = x_62; -goto _start; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_70 = lean::cnstr_get(x_62, 0); -x_71 = lean::cnstr_get(x_62, 1); -x_72 = lean::cnstr_get(x_62, 2); -lean::inc(x_72); -lean::inc(x_71); -lean::inc(x_70); -lean::dec(x_62); -x_73 = l_Lean_Parser_Term_binders_HasView; -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::apply_1(x_74, x_63); -lean::cnstr_set(x_21, 0, x_75); -x_76 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_76, 0, x_70); -lean::cnstr_set(x_76, 1, x_71); -lean::cnstr_set(x_76, 2, x_72); -lean::cnstr_set(x_76, 3, x_21); -x_2 = x_12; -x_3 = x_76; -goto _start; -} -} -} -default: -{ -obj* x_78; obj* x_79; -lean::free_heap_obj(x_21); -x_78 = lean::cnstr_get(x_25, 0); -lean::inc(x_78); -lean::dec(x_25); -x_79 = lean::cnstr_get(x_78, 1); -lean::inc(x_79); -if (lean::obj_tag(x_79) == 0) -{ -obj* x_80; obj* x_81; obj* x_82; -lean::dec(x_14); -x_80 = lean::cnstr_get(x_20, 1); -lean::inc(x_80); -lean::dec(x_20); -x_81 = lean::cnstr_get(x_78, 0); -lean::inc(x_81); -lean::dec(x_78); -x_82 = l___private_init_lean_expander_1__popStxArg(x_80, x_4); -if (lean::obj_tag(x_82) == 0) -{ -uint8 x_83; -lean::dec(x_81); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_83 = !lean::is_exclusive(x_82); -if (x_83 == 0) -{ -return x_82; -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_82, 0); -lean::inc(x_84); -lean::dec(x_82); -x_85 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -return x_85; -} -} -else -{ -obj* x_86; uint8 x_87; -x_86 = lean::cnstr_get(x_82, 0); -lean::inc(x_86); -lean::dec(x_82); -x_87 = !lean::is_exclusive(x_86); -if (x_87 == 0) -{ -obj* x_88; uint8 x_89; -x_88 = lean::cnstr_get(x_86, 1); -x_89 = !lean::is_exclusive(x_88); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_86, 0); -x_91 = lean::cnstr_get(x_88, 2); -lean::cnstr_set(x_86, 1, x_90); -lean::cnstr_set(x_86, 0, x_81); -lean::cnstr_set(x_2, 1, x_91); -lean::cnstr_set(x_2, 0, x_86); -lean::cnstr_set(x_88, 2, x_2); -x_2 = x_12; -x_3 = x_88; -goto _start; -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_93 = lean::cnstr_get(x_86, 0); -x_94 = lean::cnstr_get(x_88, 0); -x_95 = lean::cnstr_get(x_88, 1); -x_96 = lean::cnstr_get(x_88, 2); -x_97 = lean::cnstr_get(x_88, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_88); -lean::cnstr_set(x_86, 1, x_93); -lean::cnstr_set(x_86, 0, x_81); -lean::cnstr_set(x_2, 1, x_96); -lean::cnstr_set(x_2, 0, x_86); -x_98 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_98, 0, x_94); -lean::cnstr_set(x_98, 1, x_95); -lean::cnstr_set(x_98, 2, x_2); -lean::cnstr_set(x_98, 3, x_97); -x_2 = x_12; -x_3 = x_98; -goto _start; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_100 = lean::cnstr_get(x_86, 1); -x_101 = lean::cnstr_get(x_86, 0); -lean::inc(x_100); -lean::inc(x_101); -lean::dec(x_86); -x_102 = lean::cnstr_get(x_100, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_100, 1); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_100, 2); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_100, 3); -lean::inc(x_105); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - lean::cnstr_release(x_100, 1); - lean::cnstr_release(x_100, 2); - lean::cnstr_release(x_100, 3); - x_106 = x_100; -} else { - lean::dec_ref(x_100); - x_106 = lean::box(0); -} -x_107 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_107, 0, x_81); -lean::cnstr_set(x_107, 1, x_101); -lean::cnstr_set(x_2, 1, x_104); -lean::cnstr_set(x_2, 0, x_107); -if (lean::is_scalar(x_106)) { - x_108 = lean::alloc_cnstr(0, 4, 0); -} else { - x_108 = x_106; -} -lean::cnstr_set(x_108, 0, x_102); -lean::cnstr_set(x_108, 1, x_103); -lean::cnstr_set(x_108, 2, x_2); -lean::cnstr_set(x_108, 3, x_105); -x_2 = x_12; -x_3 = x_108; -goto _start; -} -} -} -else -{ -obj* x_110; obj* x_111; -x_110 = lean::cnstr_get(x_79, 0); -lean::inc(x_110); -lean::dec(x_79); -x_111 = lean::cnstr_get(x_110, 1); -lean::inc(x_111); -lean::dec(x_110); -switch (lean::obj_tag(x_111)) { -case 0: -{ -obj* x_112; obj* x_113; obj* x_114; -lean::dec(x_111); -lean::dec(x_14); -x_112 = lean::cnstr_get(x_20, 1); -lean::inc(x_112); -lean::dec(x_20); -x_113 = lean::cnstr_get(x_78, 0); -lean::inc(x_113); -lean::dec(x_78); -x_114 = l___private_init_lean_expander_1__popStxArg(x_112, x_4); -if (lean::obj_tag(x_114) == 0) -{ -uint8 x_115; -lean::dec(x_113); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_115 = !lean::is_exclusive(x_114); -if (x_115 == 0) -{ -return x_114; -} -else -{ -obj* x_116; obj* x_117; -x_116 = lean::cnstr_get(x_114, 0); -lean::inc(x_116); -lean::dec(x_114); -x_117 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_117, 0, x_116); -return x_117; -} -} -else -{ -obj* x_118; uint8 x_119; -x_118 = lean::cnstr_get(x_114, 0); -lean::inc(x_118); -lean::dec(x_114); -x_119 = !lean::is_exclusive(x_118); -if (x_119 == 0) -{ -obj* x_120; uint8 x_121; -x_120 = lean::cnstr_get(x_118, 1); -x_121 = !lean::is_exclusive(x_120); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; -x_122 = lean::cnstr_get(x_118, 0); -x_123 = lean::cnstr_get(x_120, 2); -lean::cnstr_set(x_118, 1, x_122); -lean::cnstr_set(x_118, 0, x_113); -lean::cnstr_set(x_2, 1, x_123); -lean::cnstr_set(x_2, 0, x_118); -lean::cnstr_set(x_120, 2, x_2); -x_2 = x_12; -x_3 = x_120; -goto _start; -} -else -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -x_125 = lean::cnstr_get(x_118, 0); -x_126 = lean::cnstr_get(x_120, 0); -x_127 = lean::cnstr_get(x_120, 1); -x_128 = lean::cnstr_get(x_120, 2); -x_129 = lean::cnstr_get(x_120, 3); -lean::inc(x_129); -lean::inc(x_128); -lean::inc(x_127); -lean::inc(x_126); -lean::dec(x_120); -lean::cnstr_set(x_118, 1, x_125); -lean::cnstr_set(x_118, 0, x_113); -lean::cnstr_set(x_2, 1, x_128); -lean::cnstr_set(x_2, 0, x_118); -x_130 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_130, 0, x_126); -lean::cnstr_set(x_130, 1, x_127); -lean::cnstr_set(x_130, 2, x_2); -lean::cnstr_set(x_130, 3, x_129); -x_2 = x_12; -x_3 = x_130; -goto _start; -} -} -else -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; -x_132 = lean::cnstr_get(x_118, 1); -x_133 = lean::cnstr_get(x_118, 0); -lean::inc(x_132); -lean::inc(x_133); -lean::dec(x_118); -x_134 = lean::cnstr_get(x_132, 0); -lean::inc(x_134); -x_135 = lean::cnstr_get(x_132, 1); -lean::inc(x_135); -x_136 = lean::cnstr_get(x_132, 2); -lean::inc(x_136); -x_137 = lean::cnstr_get(x_132, 3); -lean::inc(x_137); -if (lean::is_exclusive(x_132)) { - lean::cnstr_release(x_132, 0); - lean::cnstr_release(x_132, 1); - lean::cnstr_release(x_132, 2); - lean::cnstr_release(x_132, 3); - x_138 = x_132; -} else { - lean::dec_ref(x_132); - x_138 = lean::box(0); -} -x_139 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_139, 0, x_113); -lean::cnstr_set(x_139, 1, x_133); -lean::cnstr_set(x_2, 1, x_136); -lean::cnstr_set(x_2, 0, x_139); -if (lean::is_scalar(x_138)) { - x_140 = lean::alloc_cnstr(0, 4, 0); -} else { - x_140 = x_138; -} -lean::cnstr_set(x_140, 0, x_134); -lean::cnstr_set(x_140, 1, x_135); -lean::cnstr_set(x_140, 2, x_2); -lean::cnstr_set(x_140, 3, x_137); -x_2 = x_12; -x_3 = x_140; -goto _start; -} -} -} -case 2: -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; -x_142 = lean::cnstr_get(x_20, 1); -lean::inc(x_142); -lean::dec(x_20); -x_143 = lean::cnstr_get(x_78, 0); -lean::inc(x_143); -lean::dec(x_78); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -lean::dec(x_111); -x_145 = l___private_init_lean_expander_1__popStxArg(x_142, x_4); -if (lean::obj_tag(x_145) == 0) -{ -uint8 x_146; -lean::dec(x_144); -lean::dec(x_143); -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_146 = !lean::is_exclusive(x_145); -if (x_146 == 0) -{ -return x_145; -} -else -{ -obj* x_147; obj* x_148; -x_147 = lean::cnstr_get(x_145, 0); -lean::inc(x_147); -lean::dec(x_145); -x_148 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_148, 0, x_147); -return x_148; -} -} -else -{ -obj* x_149; obj* x_150; obj* x_151; -x_149 = lean::cnstr_get(x_145, 0); -lean::inc(x_149); -lean::dec(x_145); -x_150 = lean::cnstr_get(x_149, 1); -lean::inc(x_150); -x_151 = lean::cnstr_get(x_150, 3); -lean::inc(x_151); -if (lean::obj_tag(x_151) == 0) -{ -obj* x_152; -lean::dec(x_149); -lean::dec(x_144); -lean::dec(x_143); -lean::free_heap_obj(x_2); -x_152 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_15, x_150, x_4); -lean::dec(x_150); -lean::dec(x_14); -if (lean::obj_tag(x_152) == 0) -{ -uint8 x_153; -lean::dec(x_12); -lean::dec(x_1); -x_153 = !lean::is_exclusive(x_152); -if (x_153 == 0) -{ -return x_152; -} -else -{ -obj* x_154; obj* x_155; -x_154 = lean::cnstr_get(x_152, 0); -lean::inc(x_154); -lean::dec(x_152); -x_155 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_155, 0, x_154); -return x_155; -} -} -else -{ -obj* x_156; obj* x_157; -x_156 = lean::cnstr_get(x_152, 0); -lean::inc(x_156); -lean::dec(x_152); -x_157 = lean::cnstr_get(x_156, 1); -lean::inc(x_157); -lean::dec(x_156); -x_2 = x_12; -x_3 = x_157; -goto _start; -} -} -else -{ -uint8 x_159; -lean::dec(x_14); -x_159 = !lean::is_exclusive(x_149); -if (x_159 == 0) -{ -obj* x_160; obj* x_161; uint8 x_162; -x_160 = lean::cnstr_get(x_149, 0); -x_161 = lean::cnstr_get(x_149, 1); -lean::dec(x_161); -x_162 = !lean::is_exclusive(x_150); -if (x_162 == 0) -{ -obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; -x_163 = lean::cnstr_get(x_150, 2); -x_164 = lean::cnstr_get(x_150, 3); -lean::dec(x_164); -x_165 = lean::cnstr_get(x_151, 0); -lean::inc(x_165); -x_166 = l_Lean_Parser_Term_lambda_HasView; -x_167 = lean::cnstr_get(x_166, 1); -lean::inc(x_167); -x_168 = lean::box(0); -x_169 = lean::cnstr_get(x_144, 3); -lean::inc(x_169); -x_170 = lean::box(0); -lean::cnstr_set(x_2, 1, x_170); -lean::cnstr_set(x_2, 0, x_169); -x_171 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_172 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_172, 0, x_171); -lean::cnstr_set(x_172, 1, x_168); -x_173 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_173, 0, x_172); -x_174 = lean::cnstr_get(x_144, 5); -lean::inc(x_174); -lean::dec(x_144); -x_175 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_176 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_177 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_177, 0, x_175); -lean::cnstr_set(x_177, 1, x_173); -lean::cnstr_set(x_177, 2, x_176); -lean::cnstr_set(x_177, 3, x_174); -lean::inc(x_167); -x_178 = lean::apply_1(x_167, x_177); -x_179 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_179, 0, x_175); -lean::cnstr_set(x_179, 1, x_165); -lean::cnstr_set(x_179, 2, x_176); -lean::cnstr_set(x_179, 3, x_160); -x_180 = lean::apply_1(x_167, x_179); -x_181 = l_Lean_Parser_Term_app_HasView; -x_182 = lean::cnstr_get(x_181, 1); -lean::inc(x_182); -x_183 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_183, 0, x_178); -lean::cnstr_set(x_183, 1, x_180); -x_184 = lean::apply_1(x_182, x_183); -lean::cnstr_set(x_149, 1, x_184); -lean::cnstr_set(x_149, 0, x_143); -x_185 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_185, 0, x_149); -lean::cnstr_set(x_185, 1, x_163); -lean::cnstr_set(x_150, 2, x_185); -x_2 = x_12; -x_3 = x_150; -goto _start; -} -else -{ -obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; -x_187 = lean::cnstr_get(x_150, 0); -x_188 = lean::cnstr_get(x_150, 1); -x_189 = lean::cnstr_get(x_150, 2); -lean::inc(x_189); -lean::inc(x_188); -lean::inc(x_187); -lean::dec(x_150); -x_190 = lean::cnstr_get(x_151, 0); -lean::inc(x_190); -x_191 = l_Lean_Parser_Term_lambda_HasView; -x_192 = lean::cnstr_get(x_191, 1); -lean::inc(x_192); -x_193 = lean::box(0); -x_194 = lean::cnstr_get(x_144, 3); -lean::inc(x_194); -x_195 = lean::box(0); -lean::cnstr_set(x_2, 1, x_195); -lean::cnstr_set(x_2, 0, x_194); -x_196 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_197 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_197, 0, x_196); -lean::cnstr_set(x_197, 1, x_193); -x_198 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_198, 0, x_197); -x_199 = lean::cnstr_get(x_144, 5); -lean::inc(x_199); -lean::dec(x_144); -x_200 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_201 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_202 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_202, 0, x_200); -lean::cnstr_set(x_202, 1, x_198); -lean::cnstr_set(x_202, 2, x_201); -lean::cnstr_set(x_202, 3, x_199); -lean::inc(x_192); -x_203 = lean::apply_1(x_192, x_202); -x_204 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_204, 0, x_200); -lean::cnstr_set(x_204, 1, x_190); -lean::cnstr_set(x_204, 2, x_201); -lean::cnstr_set(x_204, 3, x_160); -x_205 = lean::apply_1(x_192, x_204); -x_206 = l_Lean_Parser_Term_app_HasView; -x_207 = lean::cnstr_get(x_206, 1); -lean::inc(x_207); -x_208 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_208, 0, x_203); -lean::cnstr_set(x_208, 1, x_205); -x_209 = lean::apply_1(x_207, x_208); -lean::cnstr_set(x_149, 1, x_209); -lean::cnstr_set(x_149, 0, x_143); -x_210 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_210, 0, x_149); -lean::cnstr_set(x_210, 1, x_189); -x_211 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_211, 0, x_187); -lean::cnstr_set(x_211, 1, x_188); -lean::cnstr_set(x_211, 2, x_210); -lean::cnstr_set(x_211, 3, x_151); -x_2 = x_12; -x_3 = x_211; -goto _start; -} -} -else -{ -obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; -x_213 = lean::cnstr_get(x_149, 0); -lean::inc(x_213); -lean::dec(x_149); -x_214 = lean::cnstr_get(x_150, 0); -lean::inc(x_214); -x_215 = lean::cnstr_get(x_150, 1); -lean::inc(x_215); -x_216 = lean::cnstr_get(x_150, 2); -lean::inc(x_216); -if (lean::is_exclusive(x_150)) { - lean::cnstr_release(x_150, 0); - lean::cnstr_release(x_150, 1); - lean::cnstr_release(x_150, 2); - lean::cnstr_release(x_150, 3); - x_217 = x_150; -} else { - lean::dec_ref(x_150); - x_217 = lean::box(0); -} -x_218 = lean::cnstr_get(x_151, 0); -lean::inc(x_218); -x_219 = l_Lean_Parser_Term_lambda_HasView; -x_220 = lean::cnstr_get(x_219, 1); -lean::inc(x_220); -x_221 = lean::box(0); -x_222 = lean::cnstr_get(x_144, 3); -lean::inc(x_222); -x_223 = lean::box(0); -lean::cnstr_set(x_2, 1, x_223); -lean::cnstr_set(x_2, 0, x_222); -x_224 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_225 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_225, 0, x_224); -lean::cnstr_set(x_225, 1, x_221); -x_226 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_226, 0, x_225); -x_227 = lean::cnstr_get(x_144, 5); -lean::inc(x_227); -lean::dec(x_144); -x_228 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_229 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_230 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_230, 0, x_228); -lean::cnstr_set(x_230, 1, x_226); -lean::cnstr_set(x_230, 2, x_229); -lean::cnstr_set(x_230, 3, x_227); -lean::inc(x_220); -x_231 = lean::apply_1(x_220, x_230); -x_232 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_232, 0, x_228); -lean::cnstr_set(x_232, 1, x_218); -lean::cnstr_set(x_232, 2, x_229); -lean::cnstr_set(x_232, 3, x_213); -x_233 = lean::apply_1(x_220, x_232); -x_234 = l_Lean_Parser_Term_app_HasView; -x_235 = lean::cnstr_get(x_234, 1); -lean::inc(x_235); -x_236 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_236, 0, x_231); -lean::cnstr_set(x_236, 1, x_233); -x_237 = lean::apply_1(x_235, x_236); -x_238 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_238, 0, x_143); -lean::cnstr_set(x_238, 1, x_237); -x_239 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_239, 0, x_238); -lean::cnstr_set(x_239, 1, x_216); -if (lean::is_scalar(x_217)) { - x_240 = lean::alloc_cnstr(0, 4, 0); -} else { - x_240 = x_217; -} -lean::cnstr_set(x_240, 0, x_214); -lean::cnstr_set(x_240, 1, x_215); -lean::cnstr_set(x_240, 2, x_239); -lean::cnstr_set(x_240, 3, x_151); -x_2 = x_12; -x_3 = x_240; -goto _start; -} -} -} -} -default: -{ -obj* x_242; obj* x_243; obj* x_244; -lean::dec(x_111); -lean::dec(x_78); -lean::free_heap_obj(x_2); -x_242 = lean::cnstr_get(x_20, 1); -lean::inc(x_242); -lean::dec(x_20); -x_243 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_244 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_243, x_242, x_4); -lean::dec(x_242); -lean::dec(x_14); -if (lean::obj_tag(x_244) == 0) -{ -uint8 x_245; -lean::dec(x_12); -lean::dec(x_1); -x_245 = !lean::is_exclusive(x_244); -if (x_245 == 0) -{ -return x_244; -} -else -{ -obj* x_246; obj* x_247; -x_246 = lean::cnstr_get(x_244, 0); -lean::inc(x_246); -lean::dec(x_244); -x_247 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_247, 0, x_246); -return x_247; -} -} -else -{ -obj* x_248; obj* x_249; -x_248 = lean::cnstr_get(x_244, 0); -lean::inc(x_248); -lean::dec(x_244); -x_249 = lean::cnstr_get(x_248, 1); -lean::inc(x_249); -lean::dec(x_248); -x_2 = x_12; -x_3 = x_249; -goto _start; -} -} -} -} -} -} -} -else -{ -obj* x_251; -x_251 = lean::cnstr_get(x_21, 0); -lean::inc(x_251); -lean::dec(x_21); -switch (lean::obj_tag(x_251)) { -case 0: -{ -obj* x_252; obj* x_253; -lean::dec(x_251); -lean::dec(x_14); -x_252 = lean::cnstr_get(x_20, 1); -lean::inc(x_252); -lean::dec(x_20); -x_253 = l___private_init_lean_expander_1__popStxArg(x_252, x_4); -if (lean::obj_tag(x_253) == 0) -{ -obj* x_254; obj* x_255; obj* x_256; -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_254 = lean::cnstr_get(x_253, 0); -lean::inc(x_254); -if (lean::is_exclusive(x_253)) { - lean::cnstr_release(x_253, 0); - x_255 = x_253; -} else { - lean::dec_ref(x_253); - x_255 = lean::box(0); -} -if (lean::is_scalar(x_255)) { - x_256 = lean::alloc_cnstr(0, 1, 0); -} else { - x_256 = x_255; -} -lean::cnstr_set(x_256, 0, x_254); -return x_256; -} -else -{ -obj* x_257; obj* x_258; obj* x_259; obj* x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_264; obj* x_265; obj* x_266; obj* x_267; obj* x_268; obj* x_269; obj* x_270; obj* x_271; obj* x_272; -x_257 = lean::cnstr_get(x_253, 0); -lean::inc(x_257); -lean::dec(x_253); -x_258 = lean::cnstr_get(x_257, 1); -lean::inc(x_258); -x_259 = lean::cnstr_get(x_257, 0); -lean::inc(x_259); -lean::dec(x_257); -x_260 = lean::cnstr_get(x_258, 0); -lean::inc(x_260); -x_261 = lean::cnstr_get(x_258, 1); -lean::inc(x_261); -x_262 = lean::cnstr_get(x_258, 2); -lean::inc(x_262); -if (lean::is_exclusive(x_258)) { - lean::cnstr_release(x_258, 0); - lean::cnstr_release(x_258, 1); - lean::cnstr_release(x_258, 2); - lean::cnstr_release(x_258, 3); - x_263 = x_258; -} else { - lean::dec_ref(x_258); - x_263 = lean::box(0); -} -x_264 = l_Lean_Parser_Term_binderIdent_HasView; -x_265 = lean::cnstr_get(x_264, 0); -lean::inc(x_265); -x_266 = lean::apply_1(x_265, x_259); -x_267 = lean::box(0); -lean::cnstr_set(x_2, 1, x_267); -lean::cnstr_set(x_2, 0, x_266); -x_268 = lean::box(0); -x_269 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_269, 0, x_2); -lean::cnstr_set(x_269, 1, x_268); -x_270 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_270, 0, x_269); -x_271 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_271, 0, x_270); -if (lean::is_scalar(x_263)) { - x_272 = lean::alloc_cnstr(0, 4, 0); -} else { - x_272 = x_263; -} -lean::cnstr_set(x_272, 0, x_260); -lean::cnstr_set(x_272, 1, x_261); -lean::cnstr_set(x_272, 2, x_262); -lean::cnstr_set(x_272, 3, x_271); -x_2 = x_12; -x_3 = x_272; -goto _start; -} -} -case 1: -{ -obj* x_274; obj* x_275; -lean::dec(x_251); -lean::dec(x_14); -lean::free_heap_obj(x_2); -x_274 = lean::cnstr_get(x_20, 1); -lean::inc(x_274); -lean::dec(x_20); -x_275 = l___private_init_lean_expander_1__popStxArg(x_274, x_4); -if (lean::obj_tag(x_275) == 0) -{ -obj* x_276; obj* x_277; obj* x_278; -lean::dec(x_12); -lean::dec(x_1); -x_276 = lean::cnstr_get(x_275, 0); -lean::inc(x_276); -if (lean::is_exclusive(x_275)) { - lean::cnstr_release(x_275, 0); - x_277 = x_275; -} else { - lean::dec_ref(x_275); - x_277 = lean::box(0); -} -if (lean::is_scalar(x_277)) { - x_278 = lean::alloc_cnstr(0, 1, 0); -} else { - x_278 = x_277; -} -lean::cnstr_set(x_278, 0, x_276); -return x_278; -} -else -{ -obj* x_279; obj* x_280; obj* x_281; obj* x_282; obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; -x_279 = lean::cnstr_get(x_275, 0); -lean::inc(x_279); -lean::dec(x_275); -x_280 = lean::cnstr_get(x_279, 1); -lean::inc(x_280); -x_281 = lean::cnstr_get(x_279, 0); -lean::inc(x_281); -lean::dec(x_279); -x_282 = lean::cnstr_get(x_280, 0); -lean::inc(x_282); -x_283 = lean::cnstr_get(x_280, 1); -lean::inc(x_283); -x_284 = lean::cnstr_get(x_280, 2); -lean::inc(x_284); -if (lean::is_exclusive(x_280)) { - lean::cnstr_release(x_280, 0); - lean::cnstr_release(x_280, 1); - lean::cnstr_release(x_280, 2); - lean::cnstr_release(x_280, 3); - x_285 = x_280; -} else { - lean::dec_ref(x_280); - x_285 = lean::box(0); -} -x_286 = l_Lean_Parser_Term_binders_HasView; -x_287 = lean::cnstr_get(x_286, 0); -lean::inc(x_287); -x_288 = lean::apply_1(x_287, x_281); -x_289 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_289, 0, x_288); -if (lean::is_scalar(x_285)) { - x_290 = lean::alloc_cnstr(0, 4, 0); -} else { - x_290 = x_285; -} -lean::cnstr_set(x_290, 0, x_282); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_289); -x_2 = x_12; -x_3 = x_290; -goto _start; -} -} -default: -{ -obj* x_292; obj* x_293; -x_292 = lean::cnstr_get(x_251, 0); -lean::inc(x_292); -lean::dec(x_251); -x_293 = lean::cnstr_get(x_292, 1); -lean::inc(x_293); -if (lean::obj_tag(x_293) == 0) -{ -obj* x_294; obj* x_295; obj* x_296; -lean::dec(x_14); -x_294 = lean::cnstr_get(x_20, 1); -lean::inc(x_294); -lean::dec(x_20); -x_295 = lean::cnstr_get(x_292, 0); -lean::inc(x_295); -lean::dec(x_292); -x_296 = l___private_init_lean_expander_1__popStxArg(x_294, x_4); -if (lean::obj_tag(x_296) == 0) -{ -obj* x_297; obj* x_298; obj* x_299; -lean::dec(x_295); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_297 = lean::cnstr_get(x_296, 0); -lean::inc(x_297); -if (lean::is_exclusive(x_296)) { - lean::cnstr_release(x_296, 0); - x_298 = x_296; -} else { - lean::dec_ref(x_296); - x_298 = lean::box(0); -} -if (lean::is_scalar(x_298)) { - x_299 = lean::alloc_cnstr(0, 1, 0); -} else { - x_299 = x_298; -} -lean::cnstr_set(x_299, 0, x_297); -return x_299; -} -else -{ -obj* x_300; obj* x_301; obj* x_302; obj* x_303; obj* x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; -x_300 = lean::cnstr_get(x_296, 0); -lean::inc(x_300); -lean::dec(x_296); -x_301 = lean::cnstr_get(x_300, 1); -lean::inc(x_301); -x_302 = lean::cnstr_get(x_300, 0); -lean::inc(x_302); -if (lean::is_exclusive(x_300)) { - lean::cnstr_release(x_300, 0); - lean::cnstr_release(x_300, 1); - x_303 = x_300; -} else { - lean::dec_ref(x_300); - x_303 = lean::box(0); -} -x_304 = lean::cnstr_get(x_301, 0); -lean::inc(x_304); -x_305 = lean::cnstr_get(x_301, 1); -lean::inc(x_305); -x_306 = lean::cnstr_get(x_301, 2); -lean::inc(x_306); -x_307 = lean::cnstr_get(x_301, 3); -lean::inc(x_307); -if (lean::is_exclusive(x_301)) { - lean::cnstr_release(x_301, 0); - lean::cnstr_release(x_301, 1); - lean::cnstr_release(x_301, 2); - lean::cnstr_release(x_301, 3); - x_308 = x_301; -} else { - lean::dec_ref(x_301); - x_308 = lean::box(0); -} -if (lean::is_scalar(x_303)) { - x_309 = lean::alloc_cnstr(0, 2, 0); -} else { - x_309 = x_303; -} -lean::cnstr_set(x_309, 0, x_295); -lean::cnstr_set(x_309, 1, x_302); -lean::cnstr_set(x_2, 1, x_306); -lean::cnstr_set(x_2, 0, x_309); -if (lean::is_scalar(x_308)) { - x_310 = lean::alloc_cnstr(0, 4, 0); -} else { - x_310 = x_308; -} -lean::cnstr_set(x_310, 0, x_304); -lean::cnstr_set(x_310, 1, x_305); -lean::cnstr_set(x_310, 2, x_2); -lean::cnstr_set(x_310, 3, x_307); -x_2 = x_12; -x_3 = x_310; -goto _start; -} -} -else -{ -obj* x_312; obj* x_313; -x_312 = lean::cnstr_get(x_293, 0); -lean::inc(x_312); -lean::dec(x_293); -x_313 = lean::cnstr_get(x_312, 1); -lean::inc(x_313); -lean::dec(x_312); -switch (lean::obj_tag(x_313)) { -case 0: -{ -obj* x_314; obj* x_315; obj* x_316; -lean::dec(x_313); -lean::dec(x_14); -x_314 = lean::cnstr_get(x_20, 1); -lean::inc(x_314); -lean::dec(x_20); -x_315 = lean::cnstr_get(x_292, 0); -lean::inc(x_315); -lean::dec(x_292); -x_316 = l___private_init_lean_expander_1__popStxArg(x_314, x_4); -if (lean::obj_tag(x_316) == 0) -{ -obj* x_317; obj* x_318; obj* x_319; -lean::dec(x_315); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_317 = lean::cnstr_get(x_316, 0); -lean::inc(x_317); -if (lean::is_exclusive(x_316)) { - lean::cnstr_release(x_316, 0); - x_318 = x_316; -} else { - lean::dec_ref(x_316); - x_318 = lean::box(0); -} -if (lean::is_scalar(x_318)) { - x_319 = lean::alloc_cnstr(0, 1, 0); -} else { - x_319 = x_318; -} -lean::cnstr_set(x_319, 0, x_317); -return x_319; -} -else -{ -obj* x_320; obj* x_321; obj* x_322; obj* x_323; obj* x_324; obj* x_325; obj* x_326; obj* x_327; obj* x_328; obj* x_329; obj* x_330; -x_320 = lean::cnstr_get(x_316, 0); -lean::inc(x_320); -lean::dec(x_316); -x_321 = lean::cnstr_get(x_320, 1); -lean::inc(x_321); -x_322 = lean::cnstr_get(x_320, 0); -lean::inc(x_322); -if (lean::is_exclusive(x_320)) { - lean::cnstr_release(x_320, 0); - lean::cnstr_release(x_320, 1); - x_323 = x_320; -} else { - lean::dec_ref(x_320); - x_323 = lean::box(0); -} -x_324 = lean::cnstr_get(x_321, 0); -lean::inc(x_324); -x_325 = lean::cnstr_get(x_321, 1); -lean::inc(x_325); -x_326 = lean::cnstr_get(x_321, 2); -lean::inc(x_326); -x_327 = lean::cnstr_get(x_321, 3); -lean::inc(x_327); -if (lean::is_exclusive(x_321)) { - lean::cnstr_release(x_321, 0); - lean::cnstr_release(x_321, 1); - lean::cnstr_release(x_321, 2); - lean::cnstr_release(x_321, 3); - x_328 = x_321; -} else { - lean::dec_ref(x_321); - x_328 = lean::box(0); -} -if (lean::is_scalar(x_323)) { - x_329 = lean::alloc_cnstr(0, 2, 0); -} else { - x_329 = x_323; -} -lean::cnstr_set(x_329, 0, x_315); -lean::cnstr_set(x_329, 1, x_322); -lean::cnstr_set(x_2, 1, x_326); -lean::cnstr_set(x_2, 0, x_329); -if (lean::is_scalar(x_328)) { - x_330 = lean::alloc_cnstr(0, 4, 0); -} else { - x_330 = x_328; -} -lean::cnstr_set(x_330, 0, x_324); -lean::cnstr_set(x_330, 1, x_325); -lean::cnstr_set(x_330, 2, x_2); -lean::cnstr_set(x_330, 3, x_327); -x_2 = x_12; -x_3 = x_330; -goto _start; -} -} -case 2: -{ -obj* x_332; obj* x_333; obj* x_334; obj* x_335; -x_332 = lean::cnstr_get(x_20, 1); -lean::inc(x_332); -lean::dec(x_20); -x_333 = lean::cnstr_get(x_292, 0); -lean::inc(x_333); -lean::dec(x_292); -x_334 = lean::cnstr_get(x_313, 0); -lean::inc(x_334); -lean::dec(x_313); -x_335 = l___private_init_lean_expander_1__popStxArg(x_332, x_4); -if (lean::obj_tag(x_335) == 0) -{ -obj* x_336; obj* x_337; obj* x_338; -lean::dec(x_334); -lean::dec(x_333); -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_336 = lean::cnstr_get(x_335, 0); -lean::inc(x_336); -if (lean::is_exclusive(x_335)) { - lean::cnstr_release(x_335, 0); - x_337 = x_335; -} else { - lean::dec_ref(x_335); - x_337 = lean::box(0); -} -if (lean::is_scalar(x_337)) { - x_338 = lean::alloc_cnstr(0, 1, 0); -} else { - x_338 = x_337; -} -lean::cnstr_set(x_338, 0, x_336); -return x_338; -} -else -{ -obj* x_339; obj* x_340; obj* x_341; -x_339 = lean::cnstr_get(x_335, 0); -lean::inc(x_339); -lean::dec(x_335); -x_340 = lean::cnstr_get(x_339, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_340, 3); -lean::inc(x_341); -if (lean::obj_tag(x_341) == 0) -{ -obj* x_342; -lean::dec(x_339); -lean::dec(x_334); -lean::dec(x_333); -lean::free_heap_obj(x_2); -x_342 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_15, x_340, x_4); -lean::dec(x_340); -lean::dec(x_14); -if (lean::obj_tag(x_342) == 0) -{ -obj* x_343; obj* x_344; obj* x_345; -lean::dec(x_12); -lean::dec(x_1); -x_343 = lean::cnstr_get(x_342, 0); -lean::inc(x_343); -if (lean::is_exclusive(x_342)) { - lean::cnstr_release(x_342, 0); - x_344 = x_342; -} else { - lean::dec_ref(x_342); - x_344 = lean::box(0); -} -if (lean::is_scalar(x_344)) { - x_345 = lean::alloc_cnstr(0, 1, 0); -} else { - x_345 = x_344; -} -lean::cnstr_set(x_345, 0, x_343); -return x_345; -} -else -{ -obj* x_346; obj* x_347; -x_346 = lean::cnstr_get(x_342, 0); -lean::inc(x_346); -lean::dec(x_342); -x_347 = lean::cnstr_get(x_346, 1); -lean::inc(x_347); -lean::dec(x_346); -x_2 = x_12; -x_3 = x_347; -goto _start; -} -} -else -{ -obj* x_349; obj* x_350; obj* x_351; obj* x_352; obj* x_353; obj* x_354; obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; obj* x_364; obj* x_365; obj* x_366; obj* x_367; obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_372; obj* x_373; obj* x_374; obj* x_375; obj* x_376; obj* x_377; -lean::dec(x_14); -x_349 = lean::cnstr_get(x_339, 0); -lean::inc(x_349); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - x_350 = x_339; -} else { - lean::dec_ref(x_339); - x_350 = lean::box(0); -} -x_351 = lean::cnstr_get(x_340, 0); -lean::inc(x_351); -x_352 = lean::cnstr_get(x_340, 1); -lean::inc(x_352); -x_353 = lean::cnstr_get(x_340, 2); -lean::inc(x_353); -if (lean::is_exclusive(x_340)) { - lean::cnstr_release(x_340, 0); - lean::cnstr_release(x_340, 1); - lean::cnstr_release(x_340, 2); - lean::cnstr_release(x_340, 3); - x_354 = x_340; -} else { - lean::dec_ref(x_340); - x_354 = lean::box(0); -} -x_355 = lean::cnstr_get(x_341, 0); -lean::inc(x_355); -x_356 = l_Lean_Parser_Term_lambda_HasView; -x_357 = lean::cnstr_get(x_356, 1); -lean::inc(x_357); -x_358 = lean::box(0); -x_359 = lean::cnstr_get(x_334, 3); -lean::inc(x_359); -x_360 = lean::box(0); -lean::cnstr_set(x_2, 1, x_360); -lean::cnstr_set(x_2, 0, x_359); -x_361 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_362 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_362, 0, x_361); -lean::cnstr_set(x_362, 1, x_358); -x_363 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_363, 0, x_362); -x_364 = lean::cnstr_get(x_334, 5); -lean::inc(x_364); -lean::dec(x_334); -x_365 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_366 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_367 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_363); -lean::cnstr_set(x_367, 2, x_366); -lean::cnstr_set(x_367, 3, x_364); -lean::inc(x_357); -x_368 = lean::apply_1(x_357, x_367); -x_369 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_369, 0, x_365); -lean::cnstr_set(x_369, 1, x_355); -lean::cnstr_set(x_369, 2, x_366); -lean::cnstr_set(x_369, 3, x_349); -x_370 = lean::apply_1(x_357, x_369); -x_371 = l_Lean_Parser_Term_app_HasView; -x_372 = lean::cnstr_get(x_371, 1); -lean::inc(x_372); -x_373 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_373, 0, x_368); -lean::cnstr_set(x_373, 1, x_370); -x_374 = lean::apply_1(x_372, x_373); -if (lean::is_scalar(x_350)) { - x_375 = lean::alloc_cnstr(0, 2, 0); -} else { - x_375 = x_350; -} -lean::cnstr_set(x_375, 0, x_333); -lean::cnstr_set(x_375, 1, x_374); -x_376 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_376, 0, x_375); -lean::cnstr_set(x_376, 1, x_353); -if (lean::is_scalar(x_354)) { - x_377 = lean::alloc_cnstr(0, 4, 0); -} else { - x_377 = x_354; -} -lean::cnstr_set(x_377, 0, x_351); -lean::cnstr_set(x_377, 1, x_352); -lean::cnstr_set(x_377, 2, x_376); -lean::cnstr_set(x_377, 3, x_341); -x_2 = x_12; -x_3 = x_377; -goto _start; -} -} -} -default: -{ -obj* x_379; obj* x_380; obj* x_381; -lean::dec(x_313); -lean::dec(x_292); -lean::free_heap_obj(x_2); -x_379 = lean::cnstr_get(x_20, 1); -lean::inc(x_379); -lean::dec(x_20); -x_380 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_381 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_380, x_379, x_4); -lean::dec(x_379); -lean::dec(x_14); -if (lean::obj_tag(x_381) == 0) -{ -obj* x_382; obj* x_383; obj* x_384; -lean::dec(x_12); -lean::dec(x_1); -x_382 = lean::cnstr_get(x_381, 0); -lean::inc(x_382); -if (lean::is_exclusive(x_381)) { - lean::cnstr_release(x_381, 0); - x_383 = x_381; -} else { - lean::dec_ref(x_381); - x_383 = lean::box(0); -} -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(0, 1, 0); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_382); -return x_384; -} -else -{ -obj* x_385; obj* x_386; -x_385 = lean::cnstr_get(x_381, 0); -lean::inc(x_385); -lean::dec(x_381); -x_386 = lean::cnstr_get(x_385, 1); -lean::inc(x_386); -lean::dec(x_385); -x_2 = x_12; -x_3 = x_386; -goto _start; -} -} -} -} -} -} -} -} -} -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; -x_388 = lean::cnstr_get(x_2, 1); -lean::inc(x_388); -lean::dec(x_2); -lean::inc(x_1); -x_389 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_389, 0, x_1); -x_390 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_391 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_389, x_390, x_3, x_4); -lean::dec(x_3); -if (lean::obj_tag(x_391) == 0) -{ -obj* x_392; obj* x_393; obj* x_394; -lean::dec(x_389); -lean::dec(x_388); -lean::dec(x_8); -lean::dec(x_1); -x_392 = lean::cnstr_get(x_391, 0); -lean::inc(x_392); -if (lean::is_exclusive(x_391)) { - lean::cnstr_release(x_391, 0); - x_393 = x_391; -} else { - lean::dec_ref(x_391); - x_393 = lean::box(0); -} -if (lean::is_scalar(x_393)) { - x_394 = lean::alloc_cnstr(0, 1, 0); -} else { - x_394 = x_393; -} -lean::cnstr_set(x_394, 0, x_392); -return x_394; -} -else -{ -obj* x_395; obj* x_396; -x_395 = lean::cnstr_get(x_391, 0); -lean::inc(x_395); -lean::dec(x_391); -x_396 = lean::cnstr_get(x_8, 1); -lean::inc(x_396); -lean::dec(x_8); -if (lean::obj_tag(x_396) == 0) -{ -obj* x_397; -lean::dec(x_389); -x_397 = lean::cnstr_get(x_395, 1); -lean::inc(x_397); -lean::dec(x_395); -x_2 = x_388; -x_3 = x_397; -goto _start; -} -else -{ -obj* x_399; obj* x_400; -x_399 = lean::cnstr_get(x_396, 0); -lean::inc(x_399); -if (lean::is_exclusive(x_396)) { - lean::cnstr_release(x_396, 0); - x_400 = x_396; -} else { - lean::dec_ref(x_396); - x_400 = lean::box(0); -} -switch (lean::obj_tag(x_399)) { -case 0: -{ -obj* x_401; obj* x_402; -lean::dec(x_399); -lean::dec(x_389); -x_401 = lean::cnstr_get(x_395, 1); -lean::inc(x_401); -lean::dec(x_395); -x_402 = l___private_init_lean_expander_1__popStxArg(x_401, x_4); -if (lean::obj_tag(x_402) == 0) -{ -obj* x_403; obj* x_404; obj* x_405; -lean::dec(x_400); -lean::dec(x_388); -lean::dec(x_1); -x_403 = lean::cnstr_get(x_402, 0); -lean::inc(x_403); -if (lean::is_exclusive(x_402)) { - lean::cnstr_release(x_402, 0); - x_404 = x_402; -} else { - lean::dec_ref(x_402); - x_404 = lean::box(0); -} -if (lean::is_scalar(x_404)) { - x_405 = lean::alloc_cnstr(0, 1, 0); -} else { - x_405 = x_404; -} -lean::cnstr_set(x_405, 0, x_403); -return x_405; -} -else -{ -obj* x_406; obj* x_407; obj* x_408; obj* x_409; obj* x_410; obj* x_411; obj* x_412; obj* x_413; obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; obj* x_422; -x_406 = lean::cnstr_get(x_402, 0); -lean::inc(x_406); -lean::dec(x_402); -x_407 = lean::cnstr_get(x_406, 1); -lean::inc(x_407); -x_408 = lean::cnstr_get(x_406, 0); -lean::inc(x_408); -lean::dec(x_406); -x_409 = lean::cnstr_get(x_407, 0); -lean::inc(x_409); -x_410 = lean::cnstr_get(x_407, 1); -lean::inc(x_410); -x_411 = lean::cnstr_get(x_407, 2); -lean::inc(x_411); -if (lean::is_exclusive(x_407)) { - lean::cnstr_release(x_407, 0); - lean::cnstr_release(x_407, 1); - lean::cnstr_release(x_407, 2); - lean::cnstr_release(x_407, 3); - x_412 = x_407; -} else { - lean::dec_ref(x_407); - x_412 = lean::box(0); -} -x_413 = l_Lean_Parser_Term_binderIdent_HasView; -x_414 = lean::cnstr_get(x_413, 0); -lean::inc(x_414); -x_415 = lean::apply_1(x_414, x_408); -x_416 = lean::box(0); -x_417 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_417, 0, x_415); -lean::cnstr_set(x_417, 1, x_416); -x_418 = lean::box(0); -x_419 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_419, 0, x_417); -lean::cnstr_set(x_419, 1, x_418); -x_420 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_420, 0, x_419); -if (lean::is_scalar(x_400)) { - x_421 = lean::alloc_cnstr(1, 1, 0); -} else { - x_421 = x_400; -} -lean::cnstr_set(x_421, 0, x_420); -if (lean::is_scalar(x_412)) { - x_422 = lean::alloc_cnstr(0, 4, 0); -} else { - x_422 = x_412; -} -lean::cnstr_set(x_422, 0, x_409); -lean::cnstr_set(x_422, 1, x_410); -lean::cnstr_set(x_422, 2, x_411); -lean::cnstr_set(x_422, 3, x_421); -x_2 = x_388; -x_3 = x_422; -goto _start; -} -} -case 1: -{ -obj* x_424; obj* x_425; -lean::dec(x_399); -lean::dec(x_389); -x_424 = lean::cnstr_get(x_395, 1); -lean::inc(x_424); -lean::dec(x_395); -x_425 = l___private_init_lean_expander_1__popStxArg(x_424, x_4); -if (lean::obj_tag(x_425) == 0) -{ -obj* x_426; obj* x_427; obj* x_428; -lean::dec(x_400); -lean::dec(x_388); -lean::dec(x_1); -x_426 = lean::cnstr_get(x_425, 0); -lean::inc(x_426); -if (lean::is_exclusive(x_425)) { - lean::cnstr_release(x_425, 0); - x_427 = x_425; -} else { - lean::dec_ref(x_425); - x_427 = lean::box(0); -} -if (lean::is_scalar(x_427)) { - x_428 = lean::alloc_cnstr(0, 1, 0); -} else { - x_428 = x_427; -} -lean::cnstr_set(x_428, 0, x_426); -return x_428; -} -else -{ -obj* x_429; obj* x_430; obj* x_431; obj* x_432; obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; -x_429 = lean::cnstr_get(x_425, 0); -lean::inc(x_429); -lean::dec(x_425); -x_430 = lean::cnstr_get(x_429, 1); -lean::inc(x_430); -x_431 = lean::cnstr_get(x_429, 0); -lean::inc(x_431); -lean::dec(x_429); -x_432 = lean::cnstr_get(x_430, 0); -lean::inc(x_432); -x_433 = lean::cnstr_get(x_430, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_430, 2); -lean::inc(x_434); -if (lean::is_exclusive(x_430)) { - lean::cnstr_release(x_430, 0); - lean::cnstr_release(x_430, 1); - lean::cnstr_release(x_430, 2); - lean::cnstr_release(x_430, 3); - x_435 = x_430; -} else { - lean::dec_ref(x_430); - x_435 = lean::box(0); -} -x_436 = l_Lean_Parser_Term_binders_HasView; -x_437 = lean::cnstr_get(x_436, 0); -lean::inc(x_437); -x_438 = lean::apply_1(x_437, x_431); -if (lean::is_scalar(x_400)) { - x_439 = lean::alloc_cnstr(1, 1, 0); -} else { - x_439 = x_400; -} -lean::cnstr_set(x_439, 0, x_438); -if (lean::is_scalar(x_435)) { - x_440 = lean::alloc_cnstr(0, 4, 0); -} else { - x_440 = x_435; -} -lean::cnstr_set(x_440, 0, x_432); -lean::cnstr_set(x_440, 1, x_433); -lean::cnstr_set(x_440, 2, x_434); -lean::cnstr_set(x_440, 3, x_439); -x_2 = x_388; -x_3 = x_440; -goto _start; -} -} -default: -{ -obj* x_442; obj* x_443; -lean::dec(x_400); -x_442 = lean::cnstr_get(x_399, 0); -lean::inc(x_442); -lean::dec(x_399); -x_443 = lean::cnstr_get(x_442, 1); -lean::inc(x_443); -if (lean::obj_tag(x_443) == 0) -{ -obj* x_444; obj* x_445; obj* x_446; -lean::dec(x_389); -x_444 = lean::cnstr_get(x_395, 1); -lean::inc(x_444); -lean::dec(x_395); -x_445 = lean::cnstr_get(x_442, 0); -lean::inc(x_445); -lean::dec(x_442); -x_446 = l___private_init_lean_expander_1__popStxArg(x_444, x_4); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; -lean::dec(x_445); -lean::dec(x_388); -lean::dec(x_1); -x_447 = lean::cnstr_get(x_446, 0); -lean::inc(x_447); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - x_448 = x_446; -} else { - lean::dec_ref(x_446); - x_448 = lean::box(0); -} -if (lean::is_scalar(x_448)) { - x_449 = lean::alloc_cnstr(0, 1, 0); -} else { - x_449 = x_448; -} -lean::cnstr_set(x_449, 0, x_447); -return x_449; -} -else -{ -obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; -x_450 = lean::cnstr_get(x_446, 0); -lean::inc(x_450); -lean::dec(x_446); -x_451 = lean::cnstr_get(x_450, 1); -lean::inc(x_451); -x_452 = lean::cnstr_get(x_450, 0); -lean::inc(x_452); -if (lean::is_exclusive(x_450)) { - lean::cnstr_release(x_450, 0); - lean::cnstr_release(x_450, 1); - x_453 = x_450; -} else { - lean::dec_ref(x_450); - x_453 = lean::box(0); -} -x_454 = lean::cnstr_get(x_451, 0); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_451, 1); -lean::inc(x_455); -x_456 = lean::cnstr_get(x_451, 2); -lean::inc(x_456); -x_457 = lean::cnstr_get(x_451, 3); -lean::inc(x_457); -if (lean::is_exclusive(x_451)) { - lean::cnstr_release(x_451, 0); - lean::cnstr_release(x_451, 1); - lean::cnstr_release(x_451, 2); - lean::cnstr_release(x_451, 3); - x_458 = x_451; -} else { - lean::dec_ref(x_451); - x_458 = lean::box(0); -} -if (lean::is_scalar(x_453)) { - x_459 = lean::alloc_cnstr(0, 2, 0); -} else { - x_459 = x_453; -} -lean::cnstr_set(x_459, 0, x_445); -lean::cnstr_set(x_459, 1, x_452); -x_460 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_460, 0, x_459); -lean::cnstr_set(x_460, 1, x_456); -if (lean::is_scalar(x_458)) { - x_461 = lean::alloc_cnstr(0, 4, 0); -} else { - x_461 = x_458; -} -lean::cnstr_set(x_461, 0, x_454); -lean::cnstr_set(x_461, 1, x_455); -lean::cnstr_set(x_461, 2, x_460); -lean::cnstr_set(x_461, 3, x_457); -x_2 = x_388; -x_3 = x_461; -goto _start; -} -} -else -{ -obj* x_463; obj* x_464; -x_463 = lean::cnstr_get(x_443, 0); -lean::inc(x_463); -lean::dec(x_443); -x_464 = lean::cnstr_get(x_463, 1); -lean::inc(x_464); -lean::dec(x_463); -switch (lean::obj_tag(x_464)) { -case 0: -{ -obj* x_465; obj* x_466; obj* x_467; -lean::dec(x_464); -lean::dec(x_389); -x_465 = lean::cnstr_get(x_395, 1); -lean::inc(x_465); -lean::dec(x_395); -x_466 = lean::cnstr_get(x_442, 0); -lean::inc(x_466); -lean::dec(x_442); -x_467 = l___private_init_lean_expander_1__popStxArg(x_465, x_4); -if (lean::obj_tag(x_467) == 0) -{ -obj* x_468; obj* x_469; obj* x_470; -lean::dec(x_466); -lean::dec(x_388); -lean::dec(x_1); -x_468 = lean::cnstr_get(x_467, 0); -lean::inc(x_468); -if (lean::is_exclusive(x_467)) { - lean::cnstr_release(x_467, 0); - x_469 = x_467; -} else { - lean::dec_ref(x_467); - x_469 = lean::box(0); -} -if (lean::is_scalar(x_469)) { - x_470 = lean::alloc_cnstr(0, 1, 0); -} else { - x_470 = x_469; -} -lean::cnstr_set(x_470, 0, x_468); -return x_470; -} -else -{ -obj* x_471; obj* x_472; obj* x_473; obj* x_474; obj* x_475; obj* x_476; obj* x_477; obj* x_478; obj* x_479; obj* x_480; obj* x_481; obj* x_482; -x_471 = lean::cnstr_get(x_467, 0); -lean::inc(x_471); -lean::dec(x_467); -x_472 = lean::cnstr_get(x_471, 1); -lean::inc(x_472); -x_473 = lean::cnstr_get(x_471, 0); -lean::inc(x_473); -if (lean::is_exclusive(x_471)) { - lean::cnstr_release(x_471, 0); - lean::cnstr_release(x_471, 1); - x_474 = x_471; -} else { - lean::dec_ref(x_471); - x_474 = lean::box(0); -} -x_475 = lean::cnstr_get(x_472, 0); -lean::inc(x_475); -x_476 = lean::cnstr_get(x_472, 1); -lean::inc(x_476); -x_477 = lean::cnstr_get(x_472, 2); -lean::inc(x_477); -x_478 = lean::cnstr_get(x_472, 3); -lean::inc(x_478); -if (lean::is_exclusive(x_472)) { - lean::cnstr_release(x_472, 0); - lean::cnstr_release(x_472, 1); - lean::cnstr_release(x_472, 2); - lean::cnstr_release(x_472, 3); - x_479 = x_472; -} else { - lean::dec_ref(x_472); - x_479 = lean::box(0); -} -if (lean::is_scalar(x_474)) { - x_480 = lean::alloc_cnstr(0, 2, 0); -} else { - x_480 = x_474; -} -lean::cnstr_set(x_480, 0, x_466); -lean::cnstr_set(x_480, 1, x_473); -x_481 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_481, 0, x_480); -lean::cnstr_set(x_481, 1, x_477); -if (lean::is_scalar(x_479)) { - x_482 = lean::alloc_cnstr(0, 4, 0); -} else { - x_482 = x_479; -} -lean::cnstr_set(x_482, 0, x_475); -lean::cnstr_set(x_482, 1, x_476); -lean::cnstr_set(x_482, 2, x_481); -lean::cnstr_set(x_482, 3, x_478); -x_2 = x_388; -x_3 = x_482; -goto _start; -} -} -case 2: -{ -obj* x_484; obj* x_485; obj* x_486; obj* x_487; -x_484 = lean::cnstr_get(x_395, 1); -lean::inc(x_484); -lean::dec(x_395); -x_485 = lean::cnstr_get(x_442, 0); -lean::inc(x_485); -lean::dec(x_442); -x_486 = lean::cnstr_get(x_464, 0); -lean::inc(x_486); -lean::dec(x_464); -x_487 = l___private_init_lean_expander_1__popStxArg(x_484, x_4); -if (lean::obj_tag(x_487) == 0) -{ -obj* x_488; obj* x_489; obj* x_490; -lean::dec(x_486); -lean::dec(x_485); -lean::dec(x_389); -lean::dec(x_388); -lean::dec(x_1); -x_488 = lean::cnstr_get(x_487, 0); -lean::inc(x_488); -if (lean::is_exclusive(x_487)) { - lean::cnstr_release(x_487, 0); - x_489 = x_487; -} else { - lean::dec_ref(x_487); - x_489 = lean::box(0); -} -if (lean::is_scalar(x_489)) { - x_490 = lean::alloc_cnstr(0, 1, 0); -} else { - x_490 = x_489; -} -lean::cnstr_set(x_490, 0, x_488); -return x_490; -} -else -{ -obj* x_491; obj* x_492; obj* x_493; -x_491 = lean::cnstr_get(x_487, 0); -lean::inc(x_491); -lean::dec(x_487); -x_492 = lean::cnstr_get(x_491, 1); -lean::inc(x_492); -x_493 = lean::cnstr_get(x_492, 3); -lean::inc(x_493); -if (lean::obj_tag(x_493) == 0) -{ -obj* x_494; -lean::dec(x_491); -lean::dec(x_486); -lean::dec(x_485); -x_494 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_389, x_390, x_492, x_4); -lean::dec(x_492); -lean::dec(x_389); -if (lean::obj_tag(x_494) == 0) -{ -obj* x_495; obj* x_496; obj* x_497; -lean::dec(x_388); -lean::dec(x_1); -x_495 = lean::cnstr_get(x_494, 0); -lean::inc(x_495); -if (lean::is_exclusive(x_494)) { - lean::cnstr_release(x_494, 0); - x_496 = x_494; -} else { - lean::dec_ref(x_494); - x_496 = lean::box(0); -} -if (lean::is_scalar(x_496)) { - x_497 = lean::alloc_cnstr(0, 1, 0); -} else { - x_497 = x_496; -} -lean::cnstr_set(x_497, 0, x_495); -return x_497; -} -else -{ -obj* x_498; obj* x_499; -x_498 = lean::cnstr_get(x_494, 0); -lean::inc(x_498); -lean::dec(x_494); -x_499 = lean::cnstr_get(x_498, 1); -lean::inc(x_499); -lean::dec(x_498); -x_2 = x_388; -x_3 = x_499; -goto _start; -} -} -else -{ -obj* x_501; obj* x_502; obj* x_503; obj* x_504; obj* x_505; obj* x_506; obj* x_507; obj* x_508; obj* x_509; obj* x_510; obj* x_511; obj* x_512; obj* x_513; obj* x_514; obj* x_515; obj* x_516; obj* x_517; obj* x_518; obj* x_519; obj* x_520; obj* x_521; obj* x_522; obj* x_523; obj* x_524; obj* x_525; obj* x_526; obj* x_527; obj* x_528; obj* x_529; obj* x_530; -lean::dec(x_389); -x_501 = lean::cnstr_get(x_491, 0); -lean::inc(x_501); -if (lean::is_exclusive(x_491)) { - lean::cnstr_release(x_491, 0); - lean::cnstr_release(x_491, 1); - x_502 = x_491; -} else { - lean::dec_ref(x_491); - x_502 = lean::box(0); -} -x_503 = lean::cnstr_get(x_492, 0); -lean::inc(x_503); -x_504 = lean::cnstr_get(x_492, 1); -lean::inc(x_504); -x_505 = lean::cnstr_get(x_492, 2); -lean::inc(x_505); -if (lean::is_exclusive(x_492)) { - lean::cnstr_release(x_492, 0); - lean::cnstr_release(x_492, 1); - lean::cnstr_release(x_492, 2); - lean::cnstr_release(x_492, 3); - x_506 = x_492; -} else { - lean::dec_ref(x_492); - x_506 = lean::box(0); -} -x_507 = lean::cnstr_get(x_493, 0); -lean::inc(x_507); -x_508 = l_Lean_Parser_Term_lambda_HasView; -x_509 = lean::cnstr_get(x_508, 1); -lean::inc(x_509); -x_510 = lean::box(0); -x_511 = lean::cnstr_get(x_486, 3); -lean::inc(x_511); -x_512 = lean::box(0); -x_513 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_513, 0, x_511); -lean::cnstr_set(x_513, 1, x_512); -x_514 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_513); -x_515 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_515, 0, x_514); -lean::cnstr_set(x_515, 1, x_510); -x_516 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_516, 0, x_515); -x_517 = lean::cnstr_get(x_486, 5); -lean::inc(x_517); -lean::dec(x_486); -x_518 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_519 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_520 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_520, 0, x_518); -lean::cnstr_set(x_520, 1, x_516); -lean::cnstr_set(x_520, 2, x_519); -lean::cnstr_set(x_520, 3, x_517); -lean::inc(x_509); -x_521 = lean::apply_1(x_509, x_520); -x_522 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_522, 0, x_518); -lean::cnstr_set(x_522, 1, x_507); -lean::cnstr_set(x_522, 2, x_519); -lean::cnstr_set(x_522, 3, x_501); -x_523 = lean::apply_1(x_509, x_522); -x_524 = l_Lean_Parser_Term_app_HasView; -x_525 = lean::cnstr_get(x_524, 1); -lean::inc(x_525); -x_526 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_526, 0, x_521); -lean::cnstr_set(x_526, 1, x_523); -x_527 = lean::apply_1(x_525, x_526); -if (lean::is_scalar(x_502)) { - x_528 = lean::alloc_cnstr(0, 2, 0); -} else { - x_528 = x_502; -} -lean::cnstr_set(x_528, 0, x_485); -lean::cnstr_set(x_528, 1, x_527); -x_529 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_529, 0, x_528); -lean::cnstr_set(x_529, 1, x_505); -if (lean::is_scalar(x_506)) { - x_530 = lean::alloc_cnstr(0, 4, 0); -} else { - x_530 = x_506; -} -lean::cnstr_set(x_530, 0, x_503); -lean::cnstr_set(x_530, 1, x_504); -lean::cnstr_set(x_530, 2, x_529); -lean::cnstr_set(x_530, 3, x_493); -x_2 = x_388; -x_3 = x_530; -goto _start; -} -} -} -default: -{ -obj* x_532; obj* x_533; obj* x_534; -lean::dec(x_464); -lean::dec(x_442); -x_532 = lean::cnstr_get(x_395, 1); -lean::inc(x_532); -lean::dec(x_395); -x_533 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_534 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_389, x_533, x_532, x_4); -lean::dec(x_532); -lean::dec(x_389); -if (lean::obj_tag(x_534) == 0) -{ -obj* x_535; obj* x_536; obj* x_537; -lean::dec(x_388); -lean::dec(x_1); -x_535 = lean::cnstr_get(x_534, 0); -lean::inc(x_535); -if (lean::is_exclusive(x_534)) { - lean::cnstr_release(x_534, 0); - x_536 = x_534; -} else { - lean::dec_ref(x_534); - x_536 = lean::box(0); -} -if (lean::is_scalar(x_536)) { - x_537 = lean::alloc_cnstr(0, 1, 0); -} else { - x_537 = x_536; -} -lean::cnstr_set(x_537, 0, x_535); -return x_537; -} -else -{ -obj* x_538; obj* x_539; -x_538 = lean::cnstr_get(x_534, 0); -lean::inc(x_538); -lean::dec(x_534); -x_539 = lean::cnstr_get(x_538, 1); -lean::inc(x_539); -lean::dec(x_538); -x_2 = x_388; -x_3 = x_539; -goto _start; -} -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_541; -lean::dec(x_10); -x_541 = !lean::is_exclusive(x_2); -if (x_541 == 0) -{ -obj* x_542; obj* x_543; obj* x_544; -x_542 = lean::cnstr_get(x_2, 1); -x_543 = lean::cnstr_get(x_2, 0); -lean::dec(x_543); -x_544 = l___private_init_lean_expander_1__popStxArg(x_3, x_4); -if (lean::obj_tag(x_544) == 0) -{ -uint8 x_545; -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_8); -lean::dec(x_1); -x_545 = !lean::is_exclusive(x_544); -if (x_545 == 0) -{ -return x_544; -} -else -{ -obj* x_546; obj* x_547; -x_546 = lean::cnstr_get(x_544, 0); -lean::inc(x_546); -lean::dec(x_544); -x_547 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_547, 0, x_546); -return x_547; -} -} -else -{ -obj* x_548; obj* x_549; -x_548 = lean::cnstr_get(x_544, 0); -lean::inc(x_548); -lean::dec(x_544); -x_549 = lean::cnstr_get(x_8, 1); -lean::inc(x_549); -lean::dec(x_8); -if (lean::obj_tag(x_549) == 0) -{ -obj* x_550; -lean::free_heap_obj(x_2); -x_550 = lean::cnstr_get(x_548, 1); -lean::inc(x_550); -lean::dec(x_548); -x_2 = x_542; -x_3 = x_550; -goto _start; -} -else -{ -uint8 x_552; -x_552 = !lean::is_exclusive(x_549); -if (x_552 == 0) -{ -obj* x_553; -x_553 = lean::cnstr_get(x_549, 0); -switch (lean::obj_tag(x_553)) { -case 0: -{ -obj* x_554; obj* x_555; -lean::dec(x_553); -x_554 = lean::cnstr_get(x_548, 1); -lean::inc(x_554); -lean::dec(x_548); -x_555 = l___private_init_lean_expander_1__popStxArg(x_554, x_4); -if (lean::obj_tag(x_555) == 0) -{ -uint8 x_556; -lean::free_heap_obj(x_549); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_556 = !lean::is_exclusive(x_555); -if (x_556 == 0) -{ -return x_555; -} -else -{ -obj* x_557; obj* x_558; -x_557 = lean::cnstr_get(x_555, 0); -lean::inc(x_557); -lean::dec(x_555); -x_558 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_558, 0, x_557); -return x_558; -} -} -else -{ -obj* x_559; obj* x_560; obj* x_561; uint8 x_562; -x_559 = lean::cnstr_get(x_555, 0); -lean::inc(x_559); -lean::dec(x_555); -x_560 = lean::cnstr_get(x_559, 1); -lean::inc(x_560); -x_561 = lean::cnstr_get(x_559, 0); -lean::inc(x_561); -lean::dec(x_559); -x_562 = !lean::is_exclusive(x_560); -if (x_562 == 0) -{ -obj* x_563; obj* x_564; obj* x_565; obj* x_566; obj* x_567; obj* x_568; obj* x_569; obj* x_570; -x_563 = lean::cnstr_get(x_560, 3); -lean::dec(x_563); -x_564 = l_Lean_Parser_Term_binderIdent_HasView; -x_565 = lean::cnstr_get(x_564, 0); -lean::inc(x_565); -x_566 = lean::apply_1(x_565, x_561); -x_567 = lean::box(0); -lean::cnstr_set(x_2, 1, x_567); -lean::cnstr_set(x_2, 0, x_566); -x_568 = lean::box(0); -x_569 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_569, 0, x_2); -lean::cnstr_set(x_569, 1, x_568); -x_570 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_570, 0, x_569); -lean::cnstr_set(x_549, 0, x_570); -lean::cnstr_set(x_560, 3, x_549); -x_2 = x_542; -x_3 = x_560; -goto _start; -} -else -{ -obj* x_572; obj* x_573; obj* x_574; obj* x_575; obj* x_576; obj* x_577; obj* x_578; obj* x_579; obj* x_580; obj* x_581; obj* x_582; -x_572 = lean::cnstr_get(x_560, 0); -x_573 = lean::cnstr_get(x_560, 1); -x_574 = lean::cnstr_get(x_560, 2); -lean::inc(x_574); -lean::inc(x_573); -lean::inc(x_572); -lean::dec(x_560); -x_575 = l_Lean_Parser_Term_binderIdent_HasView; -x_576 = lean::cnstr_get(x_575, 0); -lean::inc(x_576); -x_577 = lean::apply_1(x_576, x_561); -x_578 = lean::box(0); -lean::cnstr_set(x_2, 1, x_578); -lean::cnstr_set(x_2, 0, x_577); -x_579 = lean::box(0); -x_580 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_580, 0, x_2); -lean::cnstr_set(x_580, 1, x_579); -x_581 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_581, 0, x_580); -lean::cnstr_set(x_549, 0, x_581); -x_582 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_582, 0, x_572); -lean::cnstr_set(x_582, 1, x_573); -lean::cnstr_set(x_582, 2, x_574); -lean::cnstr_set(x_582, 3, x_549); -x_2 = x_542; -x_3 = x_582; -goto _start; -} -} -} -case 1: -{ -obj* x_584; obj* x_585; -lean::dec(x_553); -lean::free_heap_obj(x_2); -x_584 = lean::cnstr_get(x_548, 1); -lean::inc(x_584); -lean::dec(x_548); -x_585 = l___private_init_lean_expander_1__popStxArg(x_584, x_4); -if (lean::obj_tag(x_585) == 0) -{ -uint8 x_586; -lean::free_heap_obj(x_549); -lean::dec(x_542); -lean::dec(x_1); -x_586 = !lean::is_exclusive(x_585); -if (x_586 == 0) -{ -return x_585; -} -else -{ -obj* x_587; obj* x_588; -x_587 = lean::cnstr_get(x_585, 0); -lean::inc(x_587); -lean::dec(x_585); -x_588 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_588, 0, x_587); -return x_588; -} -} -else -{ -obj* x_589; obj* x_590; obj* x_591; uint8 x_592; -x_589 = lean::cnstr_get(x_585, 0); -lean::inc(x_589); -lean::dec(x_585); -x_590 = lean::cnstr_get(x_589, 1); -lean::inc(x_590); -x_591 = lean::cnstr_get(x_589, 0); -lean::inc(x_591); -lean::dec(x_589); -x_592 = !lean::is_exclusive(x_590); -if (x_592 == 0) -{ -obj* x_593; obj* x_594; obj* x_595; obj* x_596; -x_593 = lean::cnstr_get(x_590, 3); -lean::dec(x_593); -x_594 = l_Lean_Parser_Term_binders_HasView; -x_595 = lean::cnstr_get(x_594, 0); -lean::inc(x_595); -x_596 = lean::apply_1(x_595, x_591); -lean::cnstr_set(x_549, 0, x_596); -lean::cnstr_set(x_590, 3, x_549); -x_2 = x_542; -x_3 = x_590; -goto _start; -} -else -{ -obj* x_598; obj* x_599; obj* x_600; obj* x_601; obj* x_602; obj* x_603; obj* x_604; -x_598 = lean::cnstr_get(x_590, 0); -x_599 = lean::cnstr_get(x_590, 1); -x_600 = lean::cnstr_get(x_590, 2); -lean::inc(x_600); -lean::inc(x_599); -lean::inc(x_598); -lean::dec(x_590); -x_601 = l_Lean_Parser_Term_binders_HasView; -x_602 = lean::cnstr_get(x_601, 0); -lean::inc(x_602); -x_603 = lean::apply_1(x_602, x_591); -lean::cnstr_set(x_549, 0, x_603); -x_604 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_604, 0, x_598); -lean::cnstr_set(x_604, 1, x_599); -lean::cnstr_set(x_604, 2, x_600); -lean::cnstr_set(x_604, 3, x_549); -x_2 = x_542; -x_3 = x_604; -goto _start; -} -} -} -default: -{ -obj* x_606; obj* x_607; -lean::free_heap_obj(x_549); -x_606 = lean::cnstr_get(x_553, 0); -lean::inc(x_606); -lean::dec(x_553); -x_607 = lean::cnstr_get(x_606, 1); -lean::inc(x_607); -if (lean::obj_tag(x_607) == 0) -{ -obj* x_608; obj* x_609; obj* x_610; -x_608 = lean::cnstr_get(x_548, 1); -lean::inc(x_608); -lean::dec(x_548); -x_609 = lean::cnstr_get(x_606, 0); -lean::inc(x_609); -lean::dec(x_606); -x_610 = l___private_init_lean_expander_1__popStxArg(x_608, x_4); -if (lean::obj_tag(x_610) == 0) -{ -uint8 x_611; -lean::dec(x_609); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_611 = !lean::is_exclusive(x_610); -if (x_611 == 0) -{ -return x_610; -} -else -{ -obj* x_612; obj* x_613; -x_612 = lean::cnstr_get(x_610, 0); -lean::inc(x_612); -lean::dec(x_610); -x_613 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_613, 0, x_612); -return x_613; -} -} -else -{ -obj* x_614; uint8 x_615; -x_614 = lean::cnstr_get(x_610, 0); -lean::inc(x_614); -lean::dec(x_610); -x_615 = !lean::is_exclusive(x_614); -if (x_615 == 0) -{ -obj* x_616; uint8 x_617; -x_616 = lean::cnstr_get(x_614, 1); -x_617 = !lean::is_exclusive(x_616); -if (x_617 == 0) -{ -obj* x_618; obj* x_619; -x_618 = lean::cnstr_get(x_614, 0); -x_619 = lean::cnstr_get(x_616, 2); -lean::cnstr_set(x_614, 1, x_618); -lean::cnstr_set(x_614, 0, x_609); -lean::cnstr_set(x_2, 1, x_619); -lean::cnstr_set(x_2, 0, x_614); -lean::cnstr_set(x_616, 2, x_2); -x_2 = x_542; -x_3 = x_616; -goto _start; -} -else -{ -obj* x_621; obj* x_622; obj* x_623; obj* x_624; obj* x_625; obj* x_626; -x_621 = lean::cnstr_get(x_614, 0); -x_622 = lean::cnstr_get(x_616, 0); -x_623 = lean::cnstr_get(x_616, 1); -x_624 = lean::cnstr_get(x_616, 2); -x_625 = lean::cnstr_get(x_616, 3); -lean::inc(x_625); -lean::inc(x_624); -lean::inc(x_623); -lean::inc(x_622); -lean::dec(x_616); -lean::cnstr_set(x_614, 1, x_621); -lean::cnstr_set(x_614, 0, x_609); -lean::cnstr_set(x_2, 1, x_624); -lean::cnstr_set(x_2, 0, x_614); -x_626 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_626, 0, x_622); -lean::cnstr_set(x_626, 1, x_623); -lean::cnstr_set(x_626, 2, x_2); -lean::cnstr_set(x_626, 3, x_625); -x_2 = x_542; -x_3 = x_626; -goto _start; -} -} -else -{ -obj* x_628; obj* x_629; obj* x_630; obj* x_631; obj* x_632; obj* x_633; obj* x_634; obj* x_635; obj* x_636; -x_628 = lean::cnstr_get(x_614, 1); -x_629 = lean::cnstr_get(x_614, 0); -lean::inc(x_628); -lean::inc(x_629); -lean::dec(x_614); -x_630 = lean::cnstr_get(x_628, 0); -lean::inc(x_630); -x_631 = lean::cnstr_get(x_628, 1); -lean::inc(x_631); -x_632 = lean::cnstr_get(x_628, 2); -lean::inc(x_632); -x_633 = lean::cnstr_get(x_628, 3); -lean::inc(x_633); -if (lean::is_exclusive(x_628)) { - lean::cnstr_release(x_628, 0); - lean::cnstr_release(x_628, 1); - lean::cnstr_release(x_628, 2); - lean::cnstr_release(x_628, 3); - x_634 = x_628; -} else { - lean::dec_ref(x_628); - x_634 = lean::box(0); -} -x_635 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_635, 0, x_609); -lean::cnstr_set(x_635, 1, x_629); -lean::cnstr_set(x_2, 1, x_632); -lean::cnstr_set(x_2, 0, x_635); -if (lean::is_scalar(x_634)) { - x_636 = lean::alloc_cnstr(0, 4, 0); -} else { - x_636 = x_634; -} -lean::cnstr_set(x_636, 0, x_630); -lean::cnstr_set(x_636, 1, x_631); -lean::cnstr_set(x_636, 2, x_2); -lean::cnstr_set(x_636, 3, x_633); -x_2 = x_542; -x_3 = x_636; -goto _start; -} -} -} -else -{ -uint8 x_638; -x_638 = !lean::is_exclusive(x_607); -if (x_638 == 0) -{ -obj* x_639; obj* x_640; -x_639 = lean::cnstr_get(x_607, 0); -x_640 = lean::cnstr_get(x_639, 1); -lean::inc(x_640); -lean::dec(x_639); -switch (lean::obj_tag(x_640)) { -case 0: -{ -obj* x_641; obj* x_642; obj* x_643; -lean::dec(x_640); -lean::free_heap_obj(x_607); -x_641 = lean::cnstr_get(x_548, 1); -lean::inc(x_641); -lean::dec(x_548); -x_642 = lean::cnstr_get(x_606, 0); -lean::inc(x_642); -lean::dec(x_606); -x_643 = l___private_init_lean_expander_1__popStxArg(x_641, x_4); -if (lean::obj_tag(x_643) == 0) -{ -uint8 x_644; -lean::dec(x_642); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_644 = !lean::is_exclusive(x_643); -if (x_644 == 0) -{ -return x_643; -} -else -{ -obj* x_645; obj* x_646; -x_645 = lean::cnstr_get(x_643, 0); -lean::inc(x_645); -lean::dec(x_643); -x_646 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_646, 0, x_645); -return x_646; -} -} -else -{ -obj* x_647; uint8 x_648; -x_647 = lean::cnstr_get(x_643, 0); -lean::inc(x_647); -lean::dec(x_643); -x_648 = !lean::is_exclusive(x_647); -if (x_648 == 0) -{ -obj* x_649; uint8 x_650; -x_649 = lean::cnstr_get(x_647, 1); -x_650 = !lean::is_exclusive(x_649); -if (x_650 == 0) -{ -obj* x_651; obj* x_652; -x_651 = lean::cnstr_get(x_647, 0); -x_652 = lean::cnstr_get(x_649, 2); -lean::cnstr_set(x_647, 1, x_651); -lean::cnstr_set(x_647, 0, x_642); -lean::cnstr_set(x_2, 1, x_652); -lean::cnstr_set(x_2, 0, x_647); -lean::cnstr_set(x_649, 2, x_2); -x_2 = x_542; -x_3 = x_649; -goto _start; -} -else -{ -obj* x_654; obj* x_655; obj* x_656; obj* x_657; obj* x_658; obj* x_659; -x_654 = lean::cnstr_get(x_647, 0); -x_655 = lean::cnstr_get(x_649, 0); -x_656 = lean::cnstr_get(x_649, 1); -x_657 = lean::cnstr_get(x_649, 2); -x_658 = lean::cnstr_get(x_649, 3); -lean::inc(x_658); -lean::inc(x_657); -lean::inc(x_656); -lean::inc(x_655); -lean::dec(x_649); -lean::cnstr_set(x_647, 1, x_654); -lean::cnstr_set(x_647, 0, x_642); -lean::cnstr_set(x_2, 1, x_657); -lean::cnstr_set(x_2, 0, x_647); -x_659 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_659, 0, x_655); -lean::cnstr_set(x_659, 1, x_656); -lean::cnstr_set(x_659, 2, x_2); -lean::cnstr_set(x_659, 3, x_658); -x_2 = x_542; -x_3 = x_659; -goto _start; -} -} -else -{ -obj* x_661; obj* x_662; obj* x_663; obj* x_664; obj* x_665; obj* x_666; obj* x_667; obj* x_668; obj* x_669; -x_661 = lean::cnstr_get(x_647, 1); -x_662 = lean::cnstr_get(x_647, 0); -lean::inc(x_661); -lean::inc(x_662); -lean::dec(x_647); -x_663 = lean::cnstr_get(x_661, 0); -lean::inc(x_663); -x_664 = lean::cnstr_get(x_661, 1); -lean::inc(x_664); -x_665 = lean::cnstr_get(x_661, 2); -lean::inc(x_665); -x_666 = lean::cnstr_get(x_661, 3); -lean::inc(x_666); -if (lean::is_exclusive(x_661)) { - lean::cnstr_release(x_661, 0); - lean::cnstr_release(x_661, 1); - lean::cnstr_release(x_661, 2); - lean::cnstr_release(x_661, 3); - x_667 = x_661; -} else { - lean::dec_ref(x_661); - x_667 = lean::box(0); -} -x_668 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_668, 0, x_642); -lean::cnstr_set(x_668, 1, x_662); -lean::cnstr_set(x_2, 1, x_665); -lean::cnstr_set(x_2, 0, x_668); -if (lean::is_scalar(x_667)) { - x_669 = lean::alloc_cnstr(0, 4, 0); -} else { - x_669 = x_667; -} -lean::cnstr_set(x_669, 0, x_663); -lean::cnstr_set(x_669, 1, x_664); -lean::cnstr_set(x_669, 2, x_2); -lean::cnstr_set(x_669, 3, x_666); -x_2 = x_542; -x_3 = x_669; -goto _start; -} -} -} -case 2: -{ -obj* x_671; obj* x_672; obj* x_673; obj* x_674; -x_671 = lean::cnstr_get(x_548, 1); -lean::inc(x_671); -lean::dec(x_548); -x_672 = lean::cnstr_get(x_606, 0); -lean::inc(x_672); -lean::dec(x_606); -x_673 = lean::cnstr_get(x_640, 0); -lean::inc(x_673); -lean::dec(x_640); -x_674 = l___private_init_lean_expander_1__popStxArg(x_671, x_4); -if (lean::obj_tag(x_674) == 0) -{ -uint8 x_675; -lean::dec(x_673); -lean::dec(x_672); -lean::free_heap_obj(x_607); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_675 = !lean::is_exclusive(x_674); -if (x_675 == 0) -{ -return x_674; -} -else -{ -obj* x_676; obj* x_677; -x_676 = lean::cnstr_get(x_674, 0); -lean::inc(x_676); -lean::dec(x_674); -x_677 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_677, 0, x_676); -return x_677; -} -} -else -{ -obj* x_678; obj* x_679; obj* x_680; -x_678 = lean::cnstr_get(x_674, 0); -lean::inc(x_678); -lean::dec(x_674); -x_679 = lean::cnstr_get(x_678, 1); -lean::inc(x_679); -x_680 = lean::cnstr_get(x_679, 3); -lean::inc(x_680); -if (lean::obj_tag(x_680) == 0) -{ -obj* x_681; obj* x_682; -lean::dec(x_678); -lean::dec(x_673); -lean::dec(x_672); -lean::free_heap_obj(x_2); -lean::inc(x_1); -lean::cnstr_set(x_607, 0, x_1); -x_681 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_682 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_607, x_681, x_679, x_4); -lean::dec(x_679); -lean::dec(x_607); -if (lean::obj_tag(x_682) == 0) -{ -uint8 x_683; -lean::dec(x_542); -lean::dec(x_1); -x_683 = !lean::is_exclusive(x_682); -if (x_683 == 0) -{ -return x_682; -} -else -{ -obj* x_684; obj* x_685; -x_684 = lean::cnstr_get(x_682, 0); -lean::inc(x_684); -lean::dec(x_682); -x_685 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_685, 0, x_684); -return x_685; -} -} -else -{ -obj* x_686; obj* x_687; -x_686 = lean::cnstr_get(x_682, 0); -lean::inc(x_686); -lean::dec(x_682); -x_687 = lean::cnstr_get(x_686, 1); -lean::inc(x_687); -lean::dec(x_686); -x_2 = x_542; -x_3 = x_687; -goto _start; -} -} -else -{ -uint8 x_689; -lean::free_heap_obj(x_607); -x_689 = !lean::is_exclusive(x_678); -if (x_689 == 0) -{ -obj* x_690; obj* x_691; uint8 x_692; -x_690 = lean::cnstr_get(x_678, 0); -x_691 = lean::cnstr_get(x_678, 1); -lean::dec(x_691); -x_692 = !lean::is_exclusive(x_679); -if (x_692 == 0) -{ -obj* x_693; obj* x_694; obj* x_695; obj* x_696; obj* x_697; obj* x_698; obj* x_699; obj* x_700; obj* x_701; obj* x_702; obj* x_703; obj* x_704; obj* x_705; obj* x_706; obj* x_707; obj* x_708; obj* x_709; obj* x_710; obj* x_711; obj* x_712; obj* x_713; obj* x_714; obj* x_715; -x_693 = lean::cnstr_get(x_679, 2); -x_694 = lean::cnstr_get(x_679, 3); -lean::dec(x_694); -x_695 = lean::cnstr_get(x_680, 0); -lean::inc(x_695); -x_696 = l_Lean_Parser_Term_lambda_HasView; -x_697 = lean::cnstr_get(x_696, 1); -lean::inc(x_697); -x_698 = lean::box(0); -x_699 = lean::cnstr_get(x_673, 3); -lean::inc(x_699); -x_700 = lean::box(0); -lean::cnstr_set(x_2, 1, x_700); -lean::cnstr_set(x_2, 0, x_699); -x_701 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_702 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_702, 0, x_701); -lean::cnstr_set(x_702, 1, x_698); -x_703 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_703, 0, x_702); -x_704 = lean::cnstr_get(x_673, 5); -lean::inc(x_704); -lean::dec(x_673); -x_705 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_706 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_707 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_707, 0, x_705); -lean::cnstr_set(x_707, 1, x_703); -lean::cnstr_set(x_707, 2, x_706); -lean::cnstr_set(x_707, 3, x_704); -lean::inc(x_697); -x_708 = lean::apply_1(x_697, x_707); -x_709 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_709, 0, x_705); -lean::cnstr_set(x_709, 1, x_695); -lean::cnstr_set(x_709, 2, x_706); -lean::cnstr_set(x_709, 3, x_690); -x_710 = lean::apply_1(x_697, x_709); -x_711 = l_Lean_Parser_Term_app_HasView; -x_712 = lean::cnstr_get(x_711, 1); -lean::inc(x_712); -x_713 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_713, 0, x_708); -lean::cnstr_set(x_713, 1, x_710); -x_714 = lean::apply_1(x_712, x_713); -lean::cnstr_set(x_678, 1, x_714); -lean::cnstr_set(x_678, 0, x_672); -x_715 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_715, 0, x_678); -lean::cnstr_set(x_715, 1, x_693); -lean::cnstr_set(x_679, 2, x_715); -x_2 = x_542; -x_3 = x_679; -goto _start; -} -else -{ -obj* x_717; obj* x_718; obj* x_719; obj* x_720; obj* x_721; obj* x_722; obj* x_723; obj* x_724; obj* x_725; obj* x_726; obj* x_727; obj* x_728; obj* x_729; obj* x_730; obj* x_731; obj* x_732; obj* x_733; obj* x_734; obj* x_735; obj* x_736; obj* x_737; obj* x_738; obj* x_739; obj* x_740; obj* x_741; -x_717 = lean::cnstr_get(x_679, 0); -x_718 = lean::cnstr_get(x_679, 1); -x_719 = lean::cnstr_get(x_679, 2); -lean::inc(x_719); -lean::inc(x_718); -lean::inc(x_717); -lean::dec(x_679); -x_720 = lean::cnstr_get(x_680, 0); -lean::inc(x_720); -x_721 = l_Lean_Parser_Term_lambda_HasView; -x_722 = lean::cnstr_get(x_721, 1); -lean::inc(x_722); -x_723 = lean::box(0); -x_724 = lean::cnstr_get(x_673, 3); -lean::inc(x_724); -x_725 = lean::box(0); -lean::cnstr_set(x_2, 1, x_725); -lean::cnstr_set(x_2, 0, x_724); -x_726 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_727 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_727, 0, x_726); -lean::cnstr_set(x_727, 1, x_723); -x_728 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_728, 0, x_727); -x_729 = lean::cnstr_get(x_673, 5); -lean::inc(x_729); -lean::dec(x_673); -x_730 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_731 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_732 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_732, 0, x_730); -lean::cnstr_set(x_732, 1, x_728); -lean::cnstr_set(x_732, 2, x_731); -lean::cnstr_set(x_732, 3, x_729); -lean::inc(x_722); -x_733 = lean::apply_1(x_722, x_732); -x_734 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_734, 0, x_730); -lean::cnstr_set(x_734, 1, x_720); -lean::cnstr_set(x_734, 2, x_731); -lean::cnstr_set(x_734, 3, x_690); -x_735 = lean::apply_1(x_722, x_734); -x_736 = l_Lean_Parser_Term_app_HasView; -x_737 = lean::cnstr_get(x_736, 1); -lean::inc(x_737); -x_738 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_738, 0, x_733); -lean::cnstr_set(x_738, 1, x_735); -x_739 = lean::apply_1(x_737, x_738); -lean::cnstr_set(x_678, 1, x_739); -lean::cnstr_set(x_678, 0, x_672); -x_740 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_740, 0, x_678); -lean::cnstr_set(x_740, 1, x_719); -x_741 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_741, 0, x_717); -lean::cnstr_set(x_741, 1, x_718); -lean::cnstr_set(x_741, 2, x_740); -lean::cnstr_set(x_741, 3, x_680); -x_2 = x_542; -x_3 = x_741; -goto _start; -} -} -else -{ -obj* x_743; obj* x_744; obj* x_745; obj* x_746; obj* x_747; obj* x_748; obj* x_749; obj* x_750; obj* x_751; obj* x_752; obj* x_753; obj* x_754; obj* x_755; obj* x_756; obj* x_757; obj* x_758; obj* x_759; obj* x_760; obj* x_761; obj* x_762; obj* x_763; obj* x_764; obj* x_765; obj* x_766; obj* x_767; obj* x_768; obj* x_769; obj* x_770; -x_743 = lean::cnstr_get(x_678, 0); -lean::inc(x_743); -lean::dec(x_678); -x_744 = lean::cnstr_get(x_679, 0); -lean::inc(x_744); -x_745 = lean::cnstr_get(x_679, 1); -lean::inc(x_745); -x_746 = lean::cnstr_get(x_679, 2); -lean::inc(x_746); -if (lean::is_exclusive(x_679)) { - lean::cnstr_release(x_679, 0); - lean::cnstr_release(x_679, 1); - lean::cnstr_release(x_679, 2); - lean::cnstr_release(x_679, 3); - x_747 = x_679; -} else { - lean::dec_ref(x_679); - x_747 = lean::box(0); -} -x_748 = lean::cnstr_get(x_680, 0); -lean::inc(x_748); -x_749 = l_Lean_Parser_Term_lambda_HasView; -x_750 = lean::cnstr_get(x_749, 1); -lean::inc(x_750); -x_751 = lean::box(0); -x_752 = lean::cnstr_get(x_673, 3); -lean::inc(x_752); -x_753 = lean::box(0); -lean::cnstr_set(x_2, 1, x_753); -lean::cnstr_set(x_2, 0, x_752); -x_754 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_755 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_755, 0, x_754); -lean::cnstr_set(x_755, 1, x_751); -x_756 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_756, 0, x_755); -x_757 = lean::cnstr_get(x_673, 5); -lean::inc(x_757); -lean::dec(x_673); -x_758 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_759 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_760 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_760, 0, x_758); -lean::cnstr_set(x_760, 1, x_756); -lean::cnstr_set(x_760, 2, x_759); -lean::cnstr_set(x_760, 3, x_757); -lean::inc(x_750); -x_761 = lean::apply_1(x_750, x_760); -x_762 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_762, 0, x_758); -lean::cnstr_set(x_762, 1, x_748); -lean::cnstr_set(x_762, 2, x_759); -lean::cnstr_set(x_762, 3, x_743); -x_763 = lean::apply_1(x_750, x_762); -x_764 = l_Lean_Parser_Term_app_HasView; -x_765 = lean::cnstr_get(x_764, 1); -lean::inc(x_765); -x_766 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_766, 0, x_761); -lean::cnstr_set(x_766, 1, x_763); -x_767 = lean::apply_1(x_765, x_766); -x_768 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_768, 0, x_672); -lean::cnstr_set(x_768, 1, x_767); -x_769 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_769, 0, x_768); -lean::cnstr_set(x_769, 1, x_746); -if (lean::is_scalar(x_747)) { - x_770 = lean::alloc_cnstr(0, 4, 0); -} else { - x_770 = x_747; -} -lean::cnstr_set(x_770, 0, x_744); -lean::cnstr_set(x_770, 1, x_745); -lean::cnstr_set(x_770, 2, x_769); -lean::cnstr_set(x_770, 3, x_680); -x_2 = x_542; -x_3 = x_770; -goto _start; -} -} -} -} -default: -{ -obj* x_772; obj* x_773; obj* x_774; -lean::dec(x_640); -lean::dec(x_606); -lean::free_heap_obj(x_2); -x_772 = lean::cnstr_get(x_548, 1); -lean::inc(x_772); -lean::dec(x_548); -lean::inc(x_1); -lean::cnstr_set(x_607, 0, x_1); -x_773 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_774 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_607, x_773, x_772, x_4); -lean::dec(x_772); -lean::dec(x_607); -if (lean::obj_tag(x_774) == 0) -{ -uint8 x_775; -lean::dec(x_542); -lean::dec(x_1); -x_775 = !lean::is_exclusive(x_774); -if (x_775 == 0) -{ -return x_774; -} -else -{ -obj* x_776; obj* x_777; -x_776 = lean::cnstr_get(x_774, 0); -lean::inc(x_776); -lean::dec(x_774); -x_777 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_777, 0, x_776); -return x_777; -} -} -else -{ -obj* x_778; obj* x_779; -x_778 = lean::cnstr_get(x_774, 0); -lean::inc(x_778); -lean::dec(x_774); -x_779 = lean::cnstr_get(x_778, 1); -lean::inc(x_779); -lean::dec(x_778); -x_2 = x_542; -x_3 = x_779; -goto _start; -} -} -} -} -else -{ -obj* x_781; obj* x_782; -x_781 = lean::cnstr_get(x_607, 0); -lean::inc(x_781); -lean::dec(x_607); -x_782 = lean::cnstr_get(x_781, 1); -lean::inc(x_782); -lean::dec(x_781); -switch (lean::obj_tag(x_782)) { -case 0: -{ -obj* x_783; obj* x_784; obj* x_785; -lean::dec(x_782); -x_783 = lean::cnstr_get(x_548, 1); -lean::inc(x_783); -lean::dec(x_548); -x_784 = lean::cnstr_get(x_606, 0); -lean::inc(x_784); -lean::dec(x_606); -x_785 = l___private_init_lean_expander_1__popStxArg(x_783, x_4); -if (lean::obj_tag(x_785) == 0) -{ -obj* x_786; obj* x_787; obj* x_788; -lean::dec(x_784); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_786 = lean::cnstr_get(x_785, 0); -lean::inc(x_786); -if (lean::is_exclusive(x_785)) { - lean::cnstr_release(x_785, 0); - x_787 = x_785; -} else { - lean::dec_ref(x_785); - x_787 = lean::box(0); -} -if (lean::is_scalar(x_787)) { - x_788 = lean::alloc_cnstr(0, 1, 0); -} else { - x_788 = x_787; -} -lean::cnstr_set(x_788, 0, x_786); -return x_788; -} -else -{ -obj* x_789; obj* x_790; obj* x_791; obj* x_792; obj* x_793; obj* x_794; obj* x_795; obj* x_796; obj* x_797; obj* x_798; obj* x_799; -x_789 = lean::cnstr_get(x_785, 0); -lean::inc(x_789); -lean::dec(x_785); -x_790 = lean::cnstr_get(x_789, 1); -lean::inc(x_790); -x_791 = lean::cnstr_get(x_789, 0); -lean::inc(x_791); -if (lean::is_exclusive(x_789)) { - lean::cnstr_release(x_789, 0); - lean::cnstr_release(x_789, 1); - x_792 = x_789; -} else { - lean::dec_ref(x_789); - x_792 = lean::box(0); -} -x_793 = lean::cnstr_get(x_790, 0); -lean::inc(x_793); -x_794 = lean::cnstr_get(x_790, 1); -lean::inc(x_794); -x_795 = lean::cnstr_get(x_790, 2); -lean::inc(x_795); -x_796 = lean::cnstr_get(x_790, 3); -lean::inc(x_796); -if (lean::is_exclusive(x_790)) { - lean::cnstr_release(x_790, 0); - lean::cnstr_release(x_790, 1); - lean::cnstr_release(x_790, 2); - lean::cnstr_release(x_790, 3); - x_797 = x_790; -} else { - lean::dec_ref(x_790); - x_797 = lean::box(0); -} -if (lean::is_scalar(x_792)) { - x_798 = lean::alloc_cnstr(0, 2, 0); -} else { - x_798 = x_792; -} -lean::cnstr_set(x_798, 0, x_784); -lean::cnstr_set(x_798, 1, x_791); -lean::cnstr_set(x_2, 1, x_795); -lean::cnstr_set(x_2, 0, x_798); -if (lean::is_scalar(x_797)) { - x_799 = lean::alloc_cnstr(0, 4, 0); -} else { - x_799 = x_797; -} -lean::cnstr_set(x_799, 0, x_793); -lean::cnstr_set(x_799, 1, x_794); -lean::cnstr_set(x_799, 2, x_2); -lean::cnstr_set(x_799, 3, x_796); -x_2 = x_542; -x_3 = x_799; -goto _start; -} -} -case 2: -{ -obj* x_801; obj* x_802; obj* x_803; obj* x_804; -x_801 = lean::cnstr_get(x_548, 1); -lean::inc(x_801); -lean::dec(x_548); -x_802 = lean::cnstr_get(x_606, 0); -lean::inc(x_802); -lean::dec(x_606); -x_803 = lean::cnstr_get(x_782, 0); -lean::inc(x_803); -lean::dec(x_782); -x_804 = l___private_init_lean_expander_1__popStxArg(x_801, x_4); -if (lean::obj_tag(x_804) == 0) -{ -obj* x_805; obj* x_806; obj* x_807; -lean::dec(x_803); -lean::dec(x_802); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_805 = lean::cnstr_get(x_804, 0); -lean::inc(x_805); -if (lean::is_exclusive(x_804)) { - lean::cnstr_release(x_804, 0); - x_806 = x_804; -} else { - lean::dec_ref(x_804); - x_806 = lean::box(0); -} -if (lean::is_scalar(x_806)) { - x_807 = lean::alloc_cnstr(0, 1, 0); -} else { - x_807 = x_806; -} -lean::cnstr_set(x_807, 0, x_805); -return x_807; -} -else -{ -obj* x_808; obj* x_809; obj* x_810; -x_808 = lean::cnstr_get(x_804, 0); -lean::inc(x_808); -lean::dec(x_804); -x_809 = lean::cnstr_get(x_808, 1); -lean::inc(x_809); -x_810 = lean::cnstr_get(x_809, 3); -lean::inc(x_810); -if (lean::obj_tag(x_810) == 0) -{ -obj* x_811; obj* x_812; obj* x_813; -lean::dec(x_808); -lean::dec(x_803); -lean::dec(x_802); -lean::free_heap_obj(x_2); -lean::inc(x_1); -x_811 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_811, 0, x_1); -x_812 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_813 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_811, x_812, x_809, x_4); -lean::dec(x_809); -lean::dec(x_811); -if (lean::obj_tag(x_813) == 0) -{ -obj* x_814; obj* x_815; obj* x_816; -lean::dec(x_542); -lean::dec(x_1); -x_814 = lean::cnstr_get(x_813, 0); -lean::inc(x_814); -if (lean::is_exclusive(x_813)) { - lean::cnstr_release(x_813, 0); - x_815 = x_813; -} else { - lean::dec_ref(x_813); - x_815 = lean::box(0); -} -if (lean::is_scalar(x_815)) { - x_816 = lean::alloc_cnstr(0, 1, 0); -} else { - x_816 = x_815; -} -lean::cnstr_set(x_816, 0, x_814); -return x_816; -} -else -{ -obj* x_817; obj* x_818; -x_817 = lean::cnstr_get(x_813, 0); -lean::inc(x_817); -lean::dec(x_813); -x_818 = lean::cnstr_get(x_817, 1); -lean::inc(x_818); -lean::dec(x_817); -x_2 = x_542; -x_3 = x_818; -goto _start; -} -} -else -{ -obj* x_820; obj* x_821; obj* x_822; obj* x_823; obj* x_824; obj* x_825; obj* x_826; obj* x_827; obj* x_828; obj* x_829; obj* x_830; obj* x_831; obj* x_832; obj* x_833; obj* x_834; obj* x_835; obj* x_836; obj* x_837; obj* x_838; obj* x_839; obj* x_840; obj* x_841; obj* x_842; obj* x_843; obj* x_844; obj* x_845; obj* x_846; obj* x_847; obj* x_848; -x_820 = lean::cnstr_get(x_808, 0); -lean::inc(x_820); -if (lean::is_exclusive(x_808)) { - lean::cnstr_release(x_808, 0); - lean::cnstr_release(x_808, 1); - x_821 = x_808; -} else { - lean::dec_ref(x_808); - x_821 = lean::box(0); -} -x_822 = lean::cnstr_get(x_809, 0); -lean::inc(x_822); -x_823 = lean::cnstr_get(x_809, 1); -lean::inc(x_823); -x_824 = lean::cnstr_get(x_809, 2); -lean::inc(x_824); -if (lean::is_exclusive(x_809)) { - lean::cnstr_release(x_809, 0); - lean::cnstr_release(x_809, 1); - lean::cnstr_release(x_809, 2); - lean::cnstr_release(x_809, 3); - x_825 = x_809; -} else { - lean::dec_ref(x_809); - x_825 = lean::box(0); -} -x_826 = lean::cnstr_get(x_810, 0); -lean::inc(x_826); -x_827 = l_Lean_Parser_Term_lambda_HasView; -x_828 = lean::cnstr_get(x_827, 1); -lean::inc(x_828); -x_829 = lean::box(0); -x_830 = lean::cnstr_get(x_803, 3); -lean::inc(x_830); -x_831 = lean::box(0); -lean::cnstr_set(x_2, 1, x_831); -lean::cnstr_set(x_2, 0, x_830); -x_832 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_833 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_833, 0, x_832); -lean::cnstr_set(x_833, 1, x_829); -x_834 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_834, 0, x_833); -x_835 = lean::cnstr_get(x_803, 5); -lean::inc(x_835); -lean::dec(x_803); -x_836 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_837 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_838 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_838, 0, x_836); -lean::cnstr_set(x_838, 1, x_834); -lean::cnstr_set(x_838, 2, x_837); -lean::cnstr_set(x_838, 3, x_835); -lean::inc(x_828); -x_839 = lean::apply_1(x_828, x_838); -x_840 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_840, 0, x_836); -lean::cnstr_set(x_840, 1, x_826); -lean::cnstr_set(x_840, 2, x_837); -lean::cnstr_set(x_840, 3, x_820); -x_841 = lean::apply_1(x_828, x_840); -x_842 = l_Lean_Parser_Term_app_HasView; -x_843 = lean::cnstr_get(x_842, 1); -lean::inc(x_843); -x_844 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_844, 0, x_839); -lean::cnstr_set(x_844, 1, x_841); -x_845 = lean::apply_1(x_843, x_844); -if (lean::is_scalar(x_821)) { - x_846 = lean::alloc_cnstr(0, 2, 0); -} else { - x_846 = x_821; -} -lean::cnstr_set(x_846, 0, x_802); -lean::cnstr_set(x_846, 1, x_845); -x_847 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_847, 0, x_846); -lean::cnstr_set(x_847, 1, x_824); -if (lean::is_scalar(x_825)) { - x_848 = lean::alloc_cnstr(0, 4, 0); -} else { - x_848 = x_825; -} -lean::cnstr_set(x_848, 0, x_822); -lean::cnstr_set(x_848, 1, x_823); -lean::cnstr_set(x_848, 2, x_847); -lean::cnstr_set(x_848, 3, x_810); -x_2 = x_542; -x_3 = x_848; -goto _start; -} -} -} -default: -{ -obj* x_850; obj* x_851; obj* x_852; obj* x_853; -lean::dec(x_782); -lean::dec(x_606); -lean::free_heap_obj(x_2); -x_850 = lean::cnstr_get(x_548, 1); -lean::inc(x_850); -lean::dec(x_548); -lean::inc(x_1); -x_851 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_851, 0, x_1); -x_852 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_853 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_851, x_852, x_850, x_4); -lean::dec(x_850); -lean::dec(x_851); -if (lean::obj_tag(x_853) == 0) -{ -obj* x_854; obj* x_855; obj* x_856; -lean::dec(x_542); -lean::dec(x_1); -x_854 = lean::cnstr_get(x_853, 0); -lean::inc(x_854); -if (lean::is_exclusive(x_853)) { - lean::cnstr_release(x_853, 0); - x_855 = x_853; -} else { - lean::dec_ref(x_853); - x_855 = lean::box(0); -} -if (lean::is_scalar(x_855)) { - x_856 = lean::alloc_cnstr(0, 1, 0); -} else { - x_856 = x_855; -} -lean::cnstr_set(x_856, 0, x_854); -return x_856; -} -else -{ -obj* x_857; obj* x_858; -x_857 = lean::cnstr_get(x_853, 0); -lean::inc(x_857); -lean::dec(x_853); -x_858 = lean::cnstr_get(x_857, 1); -lean::inc(x_858); -lean::dec(x_857); -x_2 = x_542; -x_3 = x_858; -goto _start; -} -} -} -} -} -} -} -} -else -{ -obj* x_860; -x_860 = lean::cnstr_get(x_549, 0); -lean::inc(x_860); -lean::dec(x_549); -switch (lean::obj_tag(x_860)) { -case 0: -{ -obj* x_861; obj* x_862; -lean::dec(x_860); -x_861 = lean::cnstr_get(x_548, 1); -lean::inc(x_861); -lean::dec(x_548); -x_862 = l___private_init_lean_expander_1__popStxArg(x_861, x_4); -if (lean::obj_tag(x_862) == 0) -{ -obj* x_863; obj* x_864; obj* x_865; -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_863 = lean::cnstr_get(x_862, 0); -lean::inc(x_863); -if (lean::is_exclusive(x_862)) { - lean::cnstr_release(x_862, 0); - x_864 = x_862; -} else { - lean::dec_ref(x_862); - x_864 = lean::box(0); -} -if (lean::is_scalar(x_864)) { - x_865 = lean::alloc_cnstr(0, 1, 0); -} else { - x_865 = x_864; -} -lean::cnstr_set(x_865, 0, x_863); -return x_865; -} -else -{ -obj* x_866; obj* x_867; obj* x_868; obj* x_869; obj* x_870; obj* x_871; obj* x_872; obj* x_873; obj* x_874; obj* x_875; obj* x_876; obj* x_877; obj* x_878; obj* x_879; obj* x_880; obj* x_881; -x_866 = lean::cnstr_get(x_862, 0); -lean::inc(x_866); -lean::dec(x_862); -x_867 = lean::cnstr_get(x_866, 1); -lean::inc(x_867); -x_868 = lean::cnstr_get(x_866, 0); -lean::inc(x_868); -lean::dec(x_866); -x_869 = lean::cnstr_get(x_867, 0); -lean::inc(x_869); -x_870 = lean::cnstr_get(x_867, 1); -lean::inc(x_870); -x_871 = lean::cnstr_get(x_867, 2); -lean::inc(x_871); -if (lean::is_exclusive(x_867)) { - lean::cnstr_release(x_867, 0); - lean::cnstr_release(x_867, 1); - lean::cnstr_release(x_867, 2); - lean::cnstr_release(x_867, 3); - x_872 = x_867; -} else { - lean::dec_ref(x_867); - x_872 = lean::box(0); -} -x_873 = l_Lean_Parser_Term_binderIdent_HasView; -x_874 = lean::cnstr_get(x_873, 0); -lean::inc(x_874); -x_875 = lean::apply_1(x_874, x_868); -x_876 = lean::box(0); -lean::cnstr_set(x_2, 1, x_876); -lean::cnstr_set(x_2, 0, x_875); -x_877 = lean::box(0); -x_878 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_878, 0, x_2); -lean::cnstr_set(x_878, 1, x_877); -x_879 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_879, 0, x_878); -x_880 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_880, 0, x_879); -if (lean::is_scalar(x_872)) { - x_881 = lean::alloc_cnstr(0, 4, 0); -} else { - x_881 = x_872; -} -lean::cnstr_set(x_881, 0, x_869); -lean::cnstr_set(x_881, 1, x_870); -lean::cnstr_set(x_881, 2, x_871); -lean::cnstr_set(x_881, 3, x_880); -x_2 = x_542; -x_3 = x_881; -goto _start; -} -} -case 1: -{ -obj* x_883; obj* x_884; -lean::dec(x_860); -lean::free_heap_obj(x_2); -x_883 = lean::cnstr_get(x_548, 1); -lean::inc(x_883); -lean::dec(x_548); -x_884 = l___private_init_lean_expander_1__popStxArg(x_883, x_4); -if (lean::obj_tag(x_884) == 0) -{ -obj* x_885; obj* x_886; obj* x_887; -lean::dec(x_542); -lean::dec(x_1); -x_885 = lean::cnstr_get(x_884, 0); -lean::inc(x_885); -if (lean::is_exclusive(x_884)) { - lean::cnstr_release(x_884, 0); - x_886 = x_884; -} else { - lean::dec_ref(x_884); - x_886 = lean::box(0); -} -if (lean::is_scalar(x_886)) { - x_887 = lean::alloc_cnstr(0, 1, 0); -} else { - x_887 = x_886; -} -lean::cnstr_set(x_887, 0, x_885); -return x_887; -} -else -{ -obj* x_888; obj* x_889; obj* x_890; obj* x_891; obj* x_892; obj* x_893; obj* x_894; obj* x_895; obj* x_896; obj* x_897; obj* x_898; obj* x_899; -x_888 = lean::cnstr_get(x_884, 0); -lean::inc(x_888); -lean::dec(x_884); -x_889 = lean::cnstr_get(x_888, 1); -lean::inc(x_889); -x_890 = lean::cnstr_get(x_888, 0); -lean::inc(x_890); -lean::dec(x_888); -x_891 = lean::cnstr_get(x_889, 0); -lean::inc(x_891); -x_892 = lean::cnstr_get(x_889, 1); -lean::inc(x_892); -x_893 = lean::cnstr_get(x_889, 2); -lean::inc(x_893); -if (lean::is_exclusive(x_889)) { - lean::cnstr_release(x_889, 0); - lean::cnstr_release(x_889, 1); - lean::cnstr_release(x_889, 2); - lean::cnstr_release(x_889, 3); - x_894 = x_889; -} else { - lean::dec_ref(x_889); - x_894 = lean::box(0); -} -x_895 = l_Lean_Parser_Term_binders_HasView; -x_896 = lean::cnstr_get(x_895, 0); -lean::inc(x_896); -x_897 = lean::apply_1(x_896, x_890); -x_898 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_898, 0, x_897); -if (lean::is_scalar(x_894)) { - x_899 = lean::alloc_cnstr(0, 4, 0); -} else { - x_899 = x_894; -} -lean::cnstr_set(x_899, 0, x_891); -lean::cnstr_set(x_899, 1, x_892); -lean::cnstr_set(x_899, 2, x_893); -lean::cnstr_set(x_899, 3, x_898); -x_2 = x_542; -x_3 = x_899; -goto _start; -} -} -default: -{ -obj* x_901; obj* x_902; -x_901 = lean::cnstr_get(x_860, 0); -lean::inc(x_901); -lean::dec(x_860); -x_902 = lean::cnstr_get(x_901, 1); -lean::inc(x_902); -if (lean::obj_tag(x_902) == 0) -{ -obj* x_903; obj* x_904; obj* x_905; -x_903 = lean::cnstr_get(x_548, 1); -lean::inc(x_903); -lean::dec(x_548); -x_904 = lean::cnstr_get(x_901, 0); -lean::inc(x_904); -lean::dec(x_901); -x_905 = l___private_init_lean_expander_1__popStxArg(x_903, x_4); -if (lean::obj_tag(x_905) == 0) -{ -obj* x_906; obj* x_907; obj* x_908; -lean::dec(x_904); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_906 = lean::cnstr_get(x_905, 0); -lean::inc(x_906); -if (lean::is_exclusive(x_905)) { - lean::cnstr_release(x_905, 0); - x_907 = x_905; -} else { - lean::dec_ref(x_905); - x_907 = lean::box(0); -} -if (lean::is_scalar(x_907)) { - x_908 = lean::alloc_cnstr(0, 1, 0); -} else { - x_908 = x_907; -} -lean::cnstr_set(x_908, 0, x_906); -return x_908; -} -else -{ -obj* x_909; obj* x_910; obj* x_911; obj* x_912; obj* x_913; obj* x_914; obj* x_915; obj* x_916; obj* x_917; obj* x_918; obj* x_919; -x_909 = lean::cnstr_get(x_905, 0); -lean::inc(x_909); -lean::dec(x_905); -x_910 = lean::cnstr_get(x_909, 1); -lean::inc(x_910); -x_911 = lean::cnstr_get(x_909, 0); -lean::inc(x_911); -if (lean::is_exclusive(x_909)) { - lean::cnstr_release(x_909, 0); - lean::cnstr_release(x_909, 1); - x_912 = x_909; -} else { - lean::dec_ref(x_909); - x_912 = lean::box(0); -} -x_913 = lean::cnstr_get(x_910, 0); -lean::inc(x_913); -x_914 = lean::cnstr_get(x_910, 1); -lean::inc(x_914); -x_915 = lean::cnstr_get(x_910, 2); -lean::inc(x_915); -x_916 = lean::cnstr_get(x_910, 3); -lean::inc(x_916); -if (lean::is_exclusive(x_910)) { - lean::cnstr_release(x_910, 0); - lean::cnstr_release(x_910, 1); - lean::cnstr_release(x_910, 2); - lean::cnstr_release(x_910, 3); - x_917 = x_910; -} else { - lean::dec_ref(x_910); - x_917 = lean::box(0); -} -if (lean::is_scalar(x_912)) { - x_918 = lean::alloc_cnstr(0, 2, 0); -} else { - x_918 = x_912; -} -lean::cnstr_set(x_918, 0, x_904); -lean::cnstr_set(x_918, 1, x_911); -lean::cnstr_set(x_2, 1, x_915); -lean::cnstr_set(x_2, 0, x_918); -if (lean::is_scalar(x_917)) { - x_919 = lean::alloc_cnstr(0, 4, 0); -} else { - x_919 = x_917; -} -lean::cnstr_set(x_919, 0, x_913); -lean::cnstr_set(x_919, 1, x_914); -lean::cnstr_set(x_919, 2, x_2); -lean::cnstr_set(x_919, 3, x_916); -x_2 = x_542; -x_3 = x_919; -goto _start; -} -} -else -{ -obj* x_921; obj* x_922; obj* x_923; -x_921 = lean::cnstr_get(x_902, 0); -lean::inc(x_921); -if (lean::is_exclusive(x_902)) { - lean::cnstr_release(x_902, 0); - x_922 = x_902; -} else { - lean::dec_ref(x_902); - x_922 = lean::box(0); -} -x_923 = lean::cnstr_get(x_921, 1); -lean::inc(x_923); -lean::dec(x_921); -switch (lean::obj_tag(x_923)) { -case 0: -{ -obj* x_924; obj* x_925; obj* x_926; -lean::dec(x_923); -lean::dec(x_922); -x_924 = lean::cnstr_get(x_548, 1); -lean::inc(x_924); -lean::dec(x_548); -x_925 = lean::cnstr_get(x_901, 0); -lean::inc(x_925); -lean::dec(x_901); -x_926 = l___private_init_lean_expander_1__popStxArg(x_924, x_4); -if (lean::obj_tag(x_926) == 0) -{ -obj* x_927; obj* x_928; obj* x_929; -lean::dec(x_925); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_927 = lean::cnstr_get(x_926, 0); -lean::inc(x_927); -if (lean::is_exclusive(x_926)) { - lean::cnstr_release(x_926, 0); - x_928 = x_926; -} else { - lean::dec_ref(x_926); - x_928 = lean::box(0); -} -if (lean::is_scalar(x_928)) { - x_929 = lean::alloc_cnstr(0, 1, 0); -} else { - x_929 = x_928; -} -lean::cnstr_set(x_929, 0, x_927); -return x_929; -} -else -{ -obj* x_930; obj* x_931; obj* x_932; obj* x_933; obj* x_934; obj* x_935; obj* x_936; obj* x_937; obj* x_938; obj* x_939; obj* x_940; -x_930 = lean::cnstr_get(x_926, 0); -lean::inc(x_930); -lean::dec(x_926); -x_931 = lean::cnstr_get(x_930, 1); -lean::inc(x_931); -x_932 = lean::cnstr_get(x_930, 0); -lean::inc(x_932); -if (lean::is_exclusive(x_930)) { - lean::cnstr_release(x_930, 0); - lean::cnstr_release(x_930, 1); - x_933 = x_930; -} else { - lean::dec_ref(x_930); - x_933 = lean::box(0); -} -x_934 = lean::cnstr_get(x_931, 0); -lean::inc(x_934); -x_935 = lean::cnstr_get(x_931, 1); -lean::inc(x_935); -x_936 = lean::cnstr_get(x_931, 2); -lean::inc(x_936); -x_937 = lean::cnstr_get(x_931, 3); -lean::inc(x_937); -if (lean::is_exclusive(x_931)) { - lean::cnstr_release(x_931, 0); - lean::cnstr_release(x_931, 1); - lean::cnstr_release(x_931, 2); - lean::cnstr_release(x_931, 3); - x_938 = x_931; -} else { - lean::dec_ref(x_931); - x_938 = lean::box(0); -} -if (lean::is_scalar(x_933)) { - x_939 = lean::alloc_cnstr(0, 2, 0); -} else { - x_939 = x_933; -} -lean::cnstr_set(x_939, 0, x_925); -lean::cnstr_set(x_939, 1, x_932); -lean::cnstr_set(x_2, 1, x_936); -lean::cnstr_set(x_2, 0, x_939); -if (lean::is_scalar(x_938)) { - x_940 = lean::alloc_cnstr(0, 4, 0); -} else { - x_940 = x_938; -} -lean::cnstr_set(x_940, 0, x_934); -lean::cnstr_set(x_940, 1, x_935); -lean::cnstr_set(x_940, 2, x_2); -lean::cnstr_set(x_940, 3, x_937); -x_2 = x_542; -x_3 = x_940; -goto _start; -} -} -case 2: -{ -obj* x_942; obj* x_943; obj* x_944; obj* x_945; -x_942 = lean::cnstr_get(x_548, 1); -lean::inc(x_942); -lean::dec(x_548); -x_943 = lean::cnstr_get(x_901, 0); -lean::inc(x_943); -lean::dec(x_901); -x_944 = lean::cnstr_get(x_923, 0); -lean::inc(x_944); -lean::dec(x_923); -x_945 = l___private_init_lean_expander_1__popStxArg(x_942, x_4); -if (lean::obj_tag(x_945) == 0) -{ -obj* x_946; obj* x_947; obj* x_948; -lean::dec(x_944); -lean::dec(x_943); -lean::dec(x_922); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_946 = lean::cnstr_get(x_945, 0); -lean::inc(x_946); -if (lean::is_exclusive(x_945)) { - lean::cnstr_release(x_945, 0); - x_947 = x_945; -} else { - lean::dec_ref(x_945); - x_947 = lean::box(0); -} -if (lean::is_scalar(x_947)) { - x_948 = lean::alloc_cnstr(0, 1, 0); -} else { - x_948 = x_947; -} -lean::cnstr_set(x_948, 0, x_946); -return x_948; -} -else -{ -obj* x_949; obj* x_950; obj* x_951; -x_949 = lean::cnstr_get(x_945, 0); -lean::inc(x_949); -lean::dec(x_945); -x_950 = lean::cnstr_get(x_949, 1); -lean::inc(x_950); -x_951 = lean::cnstr_get(x_950, 3); -lean::inc(x_951); -if (lean::obj_tag(x_951) == 0) -{ -obj* x_952; obj* x_953; obj* x_954; -lean::dec(x_949); -lean::dec(x_944); -lean::dec(x_943); -lean::free_heap_obj(x_2); -lean::inc(x_1); -if (lean::is_scalar(x_922)) { - x_952 = lean::alloc_cnstr(1, 1, 0); -} else { - x_952 = x_922; -} -lean::cnstr_set(x_952, 0, x_1); -x_953 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_954 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_952, x_953, x_950, x_4); -lean::dec(x_950); -lean::dec(x_952); -if (lean::obj_tag(x_954) == 0) -{ -obj* x_955; obj* x_956; obj* x_957; -lean::dec(x_542); -lean::dec(x_1); -x_955 = lean::cnstr_get(x_954, 0); -lean::inc(x_955); -if (lean::is_exclusive(x_954)) { - lean::cnstr_release(x_954, 0); - x_956 = x_954; -} else { - lean::dec_ref(x_954); - x_956 = lean::box(0); -} -if (lean::is_scalar(x_956)) { - x_957 = lean::alloc_cnstr(0, 1, 0); -} else { - x_957 = x_956; -} -lean::cnstr_set(x_957, 0, x_955); -return x_957; -} -else -{ -obj* x_958; obj* x_959; -x_958 = lean::cnstr_get(x_954, 0); -lean::inc(x_958); -lean::dec(x_954); -x_959 = lean::cnstr_get(x_958, 1); -lean::inc(x_959); -lean::dec(x_958); -x_2 = x_542; -x_3 = x_959; -goto _start; -} -} -else -{ -obj* x_961; obj* x_962; obj* x_963; obj* x_964; obj* x_965; obj* x_966; obj* x_967; obj* x_968; obj* x_969; obj* x_970; obj* x_971; obj* x_972; obj* x_973; obj* x_974; obj* x_975; obj* x_976; obj* x_977; obj* x_978; obj* x_979; obj* x_980; obj* x_981; obj* x_982; obj* x_983; obj* x_984; obj* x_985; obj* x_986; obj* x_987; obj* x_988; obj* x_989; -lean::dec(x_922); -x_961 = lean::cnstr_get(x_949, 0); -lean::inc(x_961); -if (lean::is_exclusive(x_949)) { - lean::cnstr_release(x_949, 0); - lean::cnstr_release(x_949, 1); - x_962 = x_949; -} else { - lean::dec_ref(x_949); - x_962 = lean::box(0); -} -x_963 = lean::cnstr_get(x_950, 0); -lean::inc(x_963); -x_964 = lean::cnstr_get(x_950, 1); -lean::inc(x_964); -x_965 = lean::cnstr_get(x_950, 2); -lean::inc(x_965); -if (lean::is_exclusive(x_950)) { - lean::cnstr_release(x_950, 0); - lean::cnstr_release(x_950, 1); - lean::cnstr_release(x_950, 2); - lean::cnstr_release(x_950, 3); - x_966 = x_950; -} else { - lean::dec_ref(x_950); - x_966 = lean::box(0); -} -x_967 = lean::cnstr_get(x_951, 0); -lean::inc(x_967); -x_968 = l_Lean_Parser_Term_lambda_HasView; -x_969 = lean::cnstr_get(x_968, 1); -lean::inc(x_969); -x_970 = lean::box(0); -x_971 = lean::cnstr_get(x_944, 3); -lean::inc(x_971); -x_972 = lean::box(0); -lean::cnstr_set(x_2, 1, x_972); -lean::cnstr_set(x_2, 0, x_971); -x_973 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_974 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_974, 0, x_973); -lean::cnstr_set(x_974, 1, x_970); -x_975 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_975, 0, x_974); -x_976 = lean::cnstr_get(x_944, 5); -lean::inc(x_976); -lean::dec(x_944); -x_977 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_978 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_979 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_979, 0, x_977); -lean::cnstr_set(x_979, 1, x_975); -lean::cnstr_set(x_979, 2, x_978); -lean::cnstr_set(x_979, 3, x_976); -lean::inc(x_969); -x_980 = lean::apply_1(x_969, x_979); -x_981 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_981, 0, x_977); -lean::cnstr_set(x_981, 1, x_967); -lean::cnstr_set(x_981, 2, x_978); -lean::cnstr_set(x_981, 3, x_961); -x_982 = lean::apply_1(x_969, x_981); -x_983 = l_Lean_Parser_Term_app_HasView; -x_984 = lean::cnstr_get(x_983, 1); -lean::inc(x_984); -x_985 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_985, 0, x_980); -lean::cnstr_set(x_985, 1, x_982); -x_986 = lean::apply_1(x_984, x_985); -if (lean::is_scalar(x_962)) { - x_987 = lean::alloc_cnstr(0, 2, 0); -} else { - x_987 = x_962; -} -lean::cnstr_set(x_987, 0, x_943); -lean::cnstr_set(x_987, 1, x_986); -x_988 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_988, 0, x_987); -lean::cnstr_set(x_988, 1, x_965); -if (lean::is_scalar(x_966)) { - x_989 = lean::alloc_cnstr(0, 4, 0); -} else { - x_989 = x_966; -} -lean::cnstr_set(x_989, 0, x_963); -lean::cnstr_set(x_989, 1, x_964); -lean::cnstr_set(x_989, 2, x_988); -lean::cnstr_set(x_989, 3, x_951); -x_2 = x_542; -x_3 = x_989; -goto _start; -} -} -} -default: -{ -obj* x_991; obj* x_992; obj* x_993; obj* x_994; -lean::dec(x_923); -lean::dec(x_901); -lean::free_heap_obj(x_2); -x_991 = lean::cnstr_get(x_548, 1); -lean::inc(x_991); -lean::dec(x_548); -lean::inc(x_1); -if (lean::is_scalar(x_922)) { - x_992 = lean::alloc_cnstr(1, 1, 0); -} else { - x_992 = x_922; -} -lean::cnstr_set(x_992, 0, x_1); -x_993 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_994 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_992, x_993, x_991, x_4); -lean::dec(x_991); -lean::dec(x_992); -if (lean::obj_tag(x_994) == 0) -{ -obj* x_995; obj* x_996; obj* x_997; -lean::dec(x_542); -lean::dec(x_1); -x_995 = lean::cnstr_get(x_994, 0); -lean::inc(x_995); -if (lean::is_exclusive(x_994)) { - lean::cnstr_release(x_994, 0); - x_996 = x_994; -} else { - lean::dec_ref(x_994); - x_996 = lean::box(0); -} -if (lean::is_scalar(x_996)) { - x_997 = lean::alloc_cnstr(0, 1, 0); -} else { - x_997 = x_996; -} -lean::cnstr_set(x_997, 0, x_995); -return x_997; -} -else -{ -obj* x_998; obj* x_999; -x_998 = lean::cnstr_get(x_994, 0); -lean::inc(x_998); -lean::dec(x_994); -x_999 = lean::cnstr_get(x_998, 1); -lean::inc(x_999); -lean::dec(x_998); -x_2 = x_542; -x_3 = x_999; -goto _start; -} -} -} -} -} -} -} -} -} -} -else -{ -obj* x_1001; obj* x_1002; -x_1001 = lean::cnstr_get(x_2, 1); -lean::inc(x_1001); -lean::dec(x_2); -x_1002 = l___private_init_lean_expander_1__popStxArg(x_3, x_4); -if (lean::obj_tag(x_1002) == 0) -{ -obj* x_1003; obj* x_1004; obj* x_1005; -lean::dec(x_1001); -lean::dec(x_8); -lean::dec(x_1); -x_1003 = lean::cnstr_get(x_1002, 0); -lean::inc(x_1003); -if (lean::is_exclusive(x_1002)) { - lean::cnstr_release(x_1002, 0); - x_1004 = x_1002; -} else { - lean::dec_ref(x_1002); - x_1004 = lean::box(0); -} -if (lean::is_scalar(x_1004)) { - x_1005 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1005 = x_1004; -} -lean::cnstr_set(x_1005, 0, x_1003); -return x_1005; -} -else -{ -obj* x_1006; obj* x_1007; -x_1006 = lean::cnstr_get(x_1002, 0); -lean::inc(x_1006); -lean::dec(x_1002); -x_1007 = lean::cnstr_get(x_8, 1); -lean::inc(x_1007); -lean::dec(x_8); -if (lean::obj_tag(x_1007) == 0) -{ -obj* x_1008; -x_1008 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1008); -lean::dec(x_1006); -x_2 = x_1001; -x_3 = x_1008; -goto _start; -} -else -{ -obj* x_1010; obj* x_1011; -x_1010 = lean::cnstr_get(x_1007, 0); -lean::inc(x_1010); -if (lean::is_exclusive(x_1007)) { - lean::cnstr_release(x_1007, 0); - x_1011 = x_1007; -} else { - lean::dec_ref(x_1007); - x_1011 = lean::box(0); -} -switch (lean::obj_tag(x_1010)) { -case 0: -{ -obj* x_1012; obj* x_1013; -lean::dec(x_1010); -x_1012 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1012); -lean::dec(x_1006); -x_1013 = l___private_init_lean_expander_1__popStxArg(x_1012, x_4); -if (lean::obj_tag(x_1013) == 0) -{ -obj* x_1014; obj* x_1015; obj* x_1016; -lean::dec(x_1011); -lean::dec(x_1001); -lean::dec(x_1); -x_1014 = lean::cnstr_get(x_1013, 0); -lean::inc(x_1014); -if (lean::is_exclusive(x_1013)) { - lean::cnstr_release(x_1013, 0); - x_1015 = x_1013; -} else { - lean::dec_ref(x_1013); - x_1015 = lean::box(0); -} -if (lean::is_scalar(x_1015)) { - x_1016 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1016 = x_1015; -} -lean::cnstr_set(x_1016, 0, x_1014); -return x_1016; -} -else -{ -obj* x_1017; obj* x_1018; obj* x_1019; obj* x_1020; obj* x_1021; obj* x_1022; obj* x_1023; obj* x_1024; obj* x_1025; obj* x_1026; obj* x_1027; obj* x_1028; obj* x_1029; obj* x_1030; obj* x_1031; obj* x_1032; obj* x_1033; -x_1017 = lean::cnstr_get(x_1013, 0); -lean::inc(x_1017); -lean::dec(x_1013); -x_1018 = lean::cnstr_get(x_1017, 1); -lean::inc(x_1018); -x_1019 = lean::cnstr_get(x_1017, 0); -lean::inc(x_1019); -lean::dec(x_1017); -x_1020 = lean::cnstr_get(x_1018, 0); -lean::inc(x_1020); -x_1021 = lean::cnstr_get(x_1018, 1); -lean::inc(x_1021); -x_1022 = lean::cnstr_get(x_1018, 2); -lean::inc(x_1022); -if (lean::is_exclusive(x_1018)) { - lean::cnstr_release(x_1018, 0); - lean::cnstr_release(x_1018, 1); - lean::cnstr_release(x_1018, 2); - lean::cnstr_release(x_1018, 3); - x_1023 = x_1018; -} else { - lean::dec_ref(x_1018); - x_1023 = lean::box(0); -} -x_1024 = l_Lean_Parser_Term_binderIdent_HasView; -x_1025 = lean::cnstr_get(x_1024, 0); -lean::inc(x_1025); -x_1026 = lean::apply_1(x_1025, x_1019); -x_1027 = lean::box(0); -x_1028 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1028, 0, x_1026); -lean::cnstr_set(x_1028, 1, x_1027); -x_1029 = lean::box(0); -x_1030 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1030, 0, x_1028); -lean::cnstr_set(x_1030, 1, x_1029); -x_1031 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1031, 0, x_1030); -if (lean::is_scalar(x_1011)) { - x_1032 = lean::alloc_cnstr(1, 1, 0); -} else { - x_1032 = x_1011; -} -lean::cnstr_set(x_1032, 0, x_1031); -if (lean::is_scalar(x_1023)) { - x_1033 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1033 = x_1023; -} -lean::cnstr_set(x_1033, 0, x_1020); -lean::cnstr_set(x_1033, 1, x_1021); -lean::cnstr_set(x_1033, 2, x_1022); -lean::cnstr_set(x_1033, 3, x_1032); -x_2 = x_1001; -x_3 = x_1033; -goto _start; -} -} -case 1: -{ -obj* x_1035; obj* x_1036; -lean::dec(x_1010); -x_1035 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1035); -lean::dec(x_1006); -x_1036 = l___private_init_lean_expander_1__popStxArg(x_1035, x_4); -if (lean::obj_tag(x_1036) == 0) -{ -obj* x_1037; obj* x_1038; obj* x_1039; -lean::dec(x_1011); -lean::dec(x_1001); -lean::dec(x_1); -x_1037 = lean::cnstr_get(x_1036, 0); -lean::inc(x_1037); -if (lean::is_exclusive(x_1036)) { - lean::cnstr_release(x_1036, 0); - x_1038 = x_1036; -} else { - lean::dec_ref(x_1036); - x_1038 = lean::box(0); -} -if (lean::is_scalar(x_1038)) { - x_1039 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1039 = x_1038; -} -lean::cnstr_set(x_1039, 0, x_1037); -return x_1039; -} -else -{ -obj* x_1040; obj* x_1041; obj* x_1042; obj* x_1043; obj* x_1044; obj* x_1045; obj* x_1046; obj* x_1047; obj* x_1048; obj* x_1049; obj* x_1050; obj* x_1051; -x_1040 = lean::cnstr_get(x_1036, 0); -lean::inc(x_1040); -lean::dec(x_1036); -x_1041 = lean::cnstr_get(x_1040, 1); -lean::inc(x_1041); -x_1042 = lean::cnstr_get(x_1040, 0); -lean::inc(x_1042); -lean::dec(x_1040); -x_1043 = lean::cnstr_get(x_1041, 0); -lean::inc(x_1043); -x_1044 = lean::cnstr_get(x_1041, 1); -lean::inc(x_1044); -x_1045 = lean::cnstr_get(x_1041, 2); -lean::inc(x_1045); -if (lean::is_exclusive(x_1041)) { - lean::cnstr_release(x_1041, 0); - lean::cnstr_release(x_1041, 1); - lean::cnstr_release(x_1041, 2); - lean::cnstr_release(x_1041, 3); - x_1046 = x_1041; -} else { - lean::dec_ref(x_1041); - x_1046 = lean::box(0); -} -x_1047 = l_Lean_Parser_Term_binders_HasView; -x_1048 = lean::cnstr_get(x_1047, 0); -lean::inc(x_1048); -x_1049 = lean::apply_1(x_1048, x_1042); -if (lean::is_scalar(x_1011)) { - x_1050 = lean::alloc_cnstr(1, 1, 0); -} else { - x_1050 = x_1011; -} -lean::cnstr_set(x_1050, 0, x_1049); -if (lean::is_scalar(x_1046)) { - x_1051 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1051 = x_1046; -} -lean::cnstr_set(x_1051, 0, x_1043); -lean::cnstr_set(x_1051, 1, x_1044); -lean::cnstr_set(x_1051, 2, x_1045); -lean::cnstr_set(x_1051, 3, x_1050); -x_2 = x_1001; -x_3 = x_1051; -goto _start; -} -} -default: -{ -obj* x_1053; obj* x_1054; -lean::dec(x_1011); -x_1053 = lean::cnstr_get(x_1010, 0); -lean::inc(x_1053); -lean::dec(x_1010); -x_1054 = lean::cnstr_get(x_1053, 1); -lean::inc(x_1054); -if (lean::obj_tag(x_1054) == 0) -{ -obj* x_1055; obj* x_1056; obj* x_1057; -x_1055 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1055); -lean::dec(x_1006); -x_1056 = lean::cnstr_get(x_1053, 0); -lean::inc(x_1056); -lean::dec(x_1053); -x_1057 = l___private_init_lean_expander_1__popStxArg(x_1055, x_4); -if (lean::obj_tag(x_1057) == 0) -{ -obj* x_1058; obj* x_1059; obj* x_1060; -lean::dec(x_1056); -lean::dec(x_1001); -lean::dec(x_1); -x_1058 = lean::cnstr_get(x_1057, 0); -lean::inc(x_1058); -if (lean::is_exclusive(x_1057)) { - lean::cnstr_release(x_1057, 0); - x_1059 = x_1057; -} else { - lean::dec_ref(x_1057); - x_1059 = lean::box(0); -} -if (lean::is_scalar(x_1059)) { - x_1060 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1060 = x_1059; -} -lean::cnstr_set(x_1060, 0, x_1058); -return x_1060; -} -else -{ -obj* x_1061; obj* x_1062; obj* x_1063; obj* x_1064; obj* x_1065; obj* x_1066; obj* x_1067; obj* x_1068; obj* x_1069; obj* x_1070; obj* x_1071; obj* x_1072; -x_1061 = lean::cnstr_get(x_1057, 0); -lean::inc(x_1061); -lean::dec(x_1057); -x_1062 = lean::cnstr_get(x_1061, 1); -lean::inc(x_1062); -x_1063 = lean::cnstr_get(x_1061, 0); -lean::inc(x_1063); -if (lean::is_exclusive(x_1061)) { - lean::cnstr_release(x_1061, 0); - lean::cnstr_release(x_1061, 1); - x_1064 = x_1061; -} else { - lean::dec_ref(x_1061); - x_1064 = lean::box(0); -} -x_1065 = lean::cnstr_get(x_1062, 0); -lean::inc(x_1065); -x_1066 = lean::cnstr_get(x_1062, 1); -lean::inc(x_1066); -x_1067 = lean::cnstr_get(x_1062, 2); -lean::inc(x_1067); -x_1068 = lean::cnstr_get(x_1062, 3); -lean::inc(x_1068); -if (lean::is_exclusive(x_1062)) { - lean::cnstr_release(x_1062, 0); - lean::cnstr_release(x_1062, 1); - lean::cnstr_release(x_1062, 2); - lean::cnstr_release(x_1062, 3); - x_1069 = x_1062; -} else { - lean::dec_ref(x_1062); - x_1069 = lean::box(0); -} -if (lean::is_scalar(x_1064)) { - x_1070 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1070 = x_1064; -} -lean::cnstr_set(x_1070, 0, x_1056); -lean::cnstr_set(x_1070, 1, x_1063); -x_1071 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1071, 0, x_1070); -lean::cnstr_set(x_1071, 1, x_1067); -if (lean::is_scalar(x_1069)) { - x_1072 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1072 = x_1069; -} -lean::cnstr_set(x_1072, 0, x_1065); -lean::cnstr_set(x_1072, 1, x_1066); -lean::cnstr_set(x_1072, 2, x_1071); -lean::cnstr_set(x_1072, 3, x_1068); -x_2 = x_1001; -x_3 = x_1072; -goto _start; -} -} -else -{ -obj* x_1074; obj* x_1075; obj* x_1076; -x_1074 = lean::cnstr_get(x_1054, 0); -lean::inc(x_1074); -if (lean::is_exclusive(x_1054)) { - lean::cnstr_release(x_1054, 0); - x_1075 = x_1054; -} else { - lean::dec_ref(x_1054); - x_1075 = lean::box(0); -} -x_1076 = lean::cnstr_get(x_1074, 1); -lean::inc(x_1076); -lean::dec(x_1074); -switch (lean::obj_tag(x_1076)) { -case 0: -{ -obj* x_1077; obj* x_1078; obj* x_1079; -lean::dec(x_1076); -lean::dec(x_1075); -x_1077 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1077); -lean::dec(x_1006); -x_1078 = lean::cnstr_get(x_1053, 0); -lean::inc(x_1078); -lean::dec(x_1053); -x_1079 = l___private_init_lean_expander_1__popStxArg(x_1077, x_4); -if (lean::obj_tag(x_1079) == 0) -{ -obj* x_1080; obj* x_1081; obj* x_1082; -lean::dec(x_1078); -lean::dec(x_1001); -lean::dec(x_1); -x_1080 = lean::cnstr_get(x_1079, 0); -lean::inc(x_1080); -if (lean::is_exclusive(x_1079)) { - lean::cnstr_release(x_1079, 0); - x_1081 = x_1079; -} else { - lean::dec_ref(x_1079); - x_1081 = lean::box(0); -} -if (lean::is_scalar(x_1081)) { - x_1082 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1082 = x_1081; -} -lean::cnstr_set(x_1082, 0, x_1080); -return x_1082; -} -else -{ -obj* x_1083; obj* x_1084; obj* x_1085; obj* x_1086; obj* x_1087; obj* x_1088; obj* x_1089; obj* x_1090; obj* x_1091; obj* x_1092; obj* x_1093; obj* x_1094; -x_1083 = lean::cnstr_get(x_1079, 0); -lean::inc(x_1083); -lean::dec(x_1079); -x_1084 = lean::cnstr_get(x_1083, 1); -lean::inc(x_1084); -x_1085 = lean::cnstr_get(x_1083, 0); -lean::inc(x_1085); -if (lean::is_exclusive(x_1083)) { - lean::cnstr_release(x_1083, 0); - lean::cnstr_release(x_1083, 1); - x_1086 = x_1083; -} else { - lean::dec_ref(x_1083); - x_1086 = lean::box(0); -} -x_1087 = lean::cnstr_get(x_1084, 0); -lean::inc(x_1087); -x_1088 = lean::cnstr_get(x_1084, 1); -lean::inc(x_1088); -x_1089 = lean::cnstr_get(x_1084, 2); -lean::inc(x_1089); -x_1090 = lean::cnstr_get(x_1084, 3); -lean::inc(x_1090); -if (lean::is_exclusive(x_1084)) { - lean::cnstr_release(x_1084, 0); - lean::cnstr_release(x_1084, 1); - lean::cnstr_release(x_1084, 2); - lean::cnstr_release(x_1084, 3); - x_1091 = x_1084; -} else { - lean::dec_ref(x_1084); - x_1091 = lean::box(0); -} -if (lean::is_scalar(x_1086)) { - x_1092 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1092 = x_1086; -} -lean::cnstr_set(x_1092, 0, x_1078); -lean::cnstr_set(x_1092, 1, x_1085); -x_1093 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1093, 0, x_1092); -lean::cnstr_set(x_1093, 1, x_1089); -if (lean::is_scalar(x_1091)) { - x_1094 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1094 = x_1091; -} -lean::cnstr_set(x_1094, 0, x_1087); -lean::cnstr_set(x_1094, 1, x_1088); -lean::cnstr_set(x_1094, 2, x_1093); -lean::cnstr_set(x_1094, 3, x_1090); -x_2 = x_1001; -x_3 = x_1094; -goto _start; -} -} -case 2: -{ -obj* x_1096; obj* x_1097; obj* x_1098; obj* x_1099; -x_1096 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1096); -lean::dec(x_1006); -x_1097 = lean::cnstr_get(x_1053, 0); -lean::inc(x_1097); -lean::dec(x_1053); -x_1098 = lean::cnstr_get(x_1076, 0); -lean::inc(x_1098); -lean::dec(x_1076); -x_1099 = l___private_init_lean_expander_1__popStxArg(x_1096, x_4); -if (lean::obj_tag(x_1099) == 0) -{ -obj* x_1100; obj* x_1101; obj* x_1102; -lean::dec(x_1098); -lean::dec(x_1097); -lean::dec(x_1075); -lean::dec(x_1001); -lean::dec(x_1); -x_1100 = lean::cnstr_get(x_1099, 0); -lean::inc(x_1100); -if (lean::is_exclusive(x_1099)) { - lean::cnstr_release(x_1099, 0); - x_1101 = x_1099; -} else { - lean::dec_ref(x_1099); - x_1101 = lean::box(0); -} -if (lean::is_scalar(x_1101)) { - x_1102 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1102 = x_1101; -} -lean::cnstr_set(x_1102, 0, x_1100); -return x_1102; -} -else -{ -obj* x_1103; obj* x_1104; obj* x_1105; -x_1103 = lean::cnstr_get(x_1099, 0); -lean::inc(x_1103); -lean::dec(x_1099); -x_1104 = lean::cnstr_get(x_1103, 1); -lean::inc(x_1104); -x_1105 = lean::cnstr_get(x_1104, 3); -lean::inc(x_1105); -if (lean::obj_tag(x_1105) == 0) -{ -obj* x_1106; obj* x_1107; obj* x_1108; -lean::dec(x_1103); -lean::dec(x_1098); -lean::dec(x_1097); -lean::inc(x_1); -if (lean::is_scalar(x_1075)) { - x_1106 = lean::alloc_cnstr(1, 1, 0); -} else { - x_1106 = x_1075; -} -lean::cnstr_set(x_1106, 0, x_1); -x_1107 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_1108 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_1106, x_1107, x_1104, x_4); -lean::dec(x_1104); -lean::dec(x_1106); -if (lean::obj_tag(x_1108) == 0) -{ -obj* x_1109; obj* x_1110; obj* x_1111; -lean::dec(x_1001); -lean::dec(x_1); -x_1109 = lean::cnstr_get(x_1108, 0); -lean::inc(x_1109); -if (lean::is_exclusive(x_1108)) { - lean::cnstr_release(x_1108, 0); - x_1110 = x_1108; -} else { - lean::dec_ref(x_1108); - x_1110 = lean::box(0); -} -if (lean::is_scalar(x_1110)) { - x_1111 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1111 = x_1110; -} -lean::cnstr_set(x_1111, 0, x_1109); -return x_1111; -} -else -{ -obj* x_1112; obj* x_1113; -x_1112 = lean::cnstr_get(x_1108, 0); -lean::inc(x_1112); -lean::dec(x_1108); -x_1113 = lean::cnstr_get(x_1112, 1); -lean::inc(x_1113); -lean::dec(x_1112); -x_2 = x_1001; -x_3 = x_1113; -goto _start; -} -} -else -{ -obj* x_1115; obj* x_1116; obj* x_1117; obj* x_1118; obj* x_1119; obj* x_1120; obj* x_1121; obj* x_1122; obj* x_1123; obj* x_1124; obj* x_1125; obj* x_1126; obj* x_1127; obj* x_1128; obj* x_1129; obj* x_1130; obj* x_1131; obj* x_1132; obj* x_1133; obj* x_1134; obj* x_1135; obj* x_1136; obj* x_1137; obj* x_1138; obj* x_1139; obj* x_1140; obj* x_1141; obj* x_1142; obj* x_1143; obj* x_1144; -lean::dec(x_1075); -x_1115 = lean::cnstr_get(x_1103, 0); -lean::inc(x_1115); -if (lean::is_exclusive(x_1103)) { - lean::cnstr_release(x_1103, 0); - lean::cnstr_release(x_1103, 1); - x_1116 = x_1103; -} else { - lean::dec_ref(x_1103); - x_1116 = lean::box(0); -} -x_1117 = lean::cnstr_get(x_1104, 0); -lean::inc(x_1117); -x_1118 = lean::cnstr_get(x_1104, 1); -lean::inc(x_1118); -x_1119 = lean::cnstr_get(x_1104, 2); -lean::inc(x_1119); -if (lean::is_exclusive(x_1104)) { - lean::cnstr_release(x_1104, 0); - lean::cnstr_release(x_1104, 1); - lean::cnstr_release(x_1104, 2); - lean::cnstr_release(x_1104, 3); - x_1120 = x_1104; -} else { - lean::dec_ref(x_1104); - x_1120 = lean::box(0); -} -x_1121 = lean::cnstr_get(x_1105, 0); -lean::inc(x_1121); -x_1122 = l_Lean_Parser_Term_lambda_HasView; -x_1123 = lean::cnstr_get(x_1122, 1); -lean::inc(x_1123); -x_1124 = lean::box(0); -x_1125 = lean::cnstr_get(x_1098, 3); -lean::inc(x_1125); -x_1126 = lean::box(0); -x_1127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1127, 0, x_1125); -lean::cnstr_set(x_1127, 1, x_1126); -x_1128 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_1127); -x_1129 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1129, 0, x_1128); -lean::cnstr_set(x_1129, 1, x_1124); -x_1130 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1130, 0, x_1129); -x_1131 = lean::cnstr_get(x_1098, 5); -lean::inc(x_1131); -lean::dec(x_1098); -x_1132 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_1133 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_1134 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_1134, 0, x_1132); -lean::cnstr_set(x_1134, 1, x_1130); -lean::cnstr_set(x_1134, 2, x_1133); -lean::cnstr_set(x_1134, 3, x_1131); -lean::inc(x_1123); -x_1135 = lean::apply_1(x_1123, x_1134); -x_1136 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_1136, 0, x_1132); -lean::cnstr_set(x_1136, 1, x_1121); -lean::cnstr_set(x_1136, 2, x_1133); -lean::cnstr_set(x_1136, 3, x_1115); -x_1137 = lean::apply_1(x_1123, x_1136); -x_1138 = l_Lean_Parser_Term_app_HasView; -x_1139 = lean::cnstr_get(x_1138, 1); -lean::inc(x_1139); -x_1140 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1140, 0, x_1135); -lean::cnstr_set(x_1140, 1, x_1137); -x_1141 = lean::apply_1(x_1139, x_1140); -if (lean::is_scalar(x_1116)) { - x_1142 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1142 = x_1116; -} -lean::cnstr_set(x_1142, 0, x_1097); -lean::cnstr_set(x_1142, 1, x_1141); -x_1143 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1143, 0, x_1142); -lean::cnstr_set(x_1143, 1, x_1119); -if (lean::is_scalar(x_1120)) { - x_1144 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1144 = x_1120; -} -lean::cnstr_set(x_1144, 0, x_1117); -lean::cnstr_set(x_1144, 1, x_1118); -lean::cnstr_set(x_1144, 2, x_1143); -lean::cnstr_set(x_1144, 3, x_1105); -x_2 = x_1001; -x_3 = x_1144; -goto _start; -} -} -} -default: -{ -obj* x_1146; obj* x_1147; obj* x_1148; obj* x_1149; -lean::dec(x_1076); -lean::dec(x_1053); -x_1146 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1146); -lean::dec(x_1006); -lean::inc(x_1); -if (lean::is_scalar(x_1075)) { - x_1147 = lean::alloc_cnstr(1, 1, 0); -} else { - x_1147 = x_1075; -} -lean::cnstr_set(x_1147, 0, x_1); -x_1148 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_1149 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_1147, x_1148, x_1146, x_4); -lean::dec(x_1146); -lean::dec(x_1147); -if (lean::obj_tag(x_1149) == 0) -{ -obj* x_1150; obj* x_1151; obj* x_1152; -lean::dec(x_1001); -lean::dec(x_1); -x_1150 = lean::cnstr_get(x_1149, 0); -lean::inc(x_1150); -if (lean::is_exclusive(x_1149)) { - lean::cnstr_release(x_1149, 0); - x_1151 = x_1149; -} else { - lean::dec_ref(x_1149); - x_1151 = lean::box(0); -} -if (lean::is_scalar(x_1151)) { - x_1152 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1152 = x_1151; -} -lean::cnstr_set(x_1152, 0, x_1150); -return x_1152; -} -else -{ -obj* x_1153; obj* x_1154; -x_1153 = lean::cnstr_get(x_1149, 0); -lean::inc(x_1153); -lean::dec(x_1149); -x_1154 = lean::cnstr_get(x_1153, 1); -lean::inc(x_1154); -lean::dec(x_1153); -x_2 = x_1001; -x_3 = x_1154; -goto _start; -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; uint8 x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_5); -x_7 = !lean::is_exclusive(x_4); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_4, 0); -x_9 = lean::cnstr_get(x_8, 2); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_4, 0, x_9); -lean::cnstr_set(x_1, 1, x_6); -return x_1; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_4, 0); -x_11 = lean::cnstr_get(x_4, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_4); -x_12 = lean::cnstr_get(x_10, 2); -lean::inc(x_12); -lean::dec(x_10); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -lean::cnstr_set(x_1, 1, x_6); -lean::cnstr_set(x_1, 0, x_13); -return x_1; -} -} -else -{ -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; -x_14 = lean::cnstr_get(x_1, 0); -x_15 = lean::cnstr_get(x_1, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_1); -x_16 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_15); -x_17 = lean::cnstr_get(x_14, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_14, 1); -lean::inc(x_18); -if (lean::is_exclusive(x_14)) { - lean::cnstr_release(x_14, 0); - lean::cnstr_release(x_14, 1); - x_19 = x_14; -} else { - lean::dec_ref(x_14); - x_19 = lean::box(0); -} -x_20 = lean::cnstr_get(x_17, 2); -lean::inc(x_20); -lean::dec(x_17); -if (lean::is_scalar(x_19)) { - x_21 = lean::alloc_cnstr(0, 2, 0); -} else { - x_21 = x_19; -} -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_18); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_16); -return x_22; -} -} -} -} -obj* l_Lean_Parser_tryView___at_Lean_Expander_mkNotationTransformer___spec__6(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = l_Lean_Parser_Syntax_isOfKind___main(x_1, x_2); -if (x_3 == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = l_Lean_Parser_identUnivs_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_2); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -} -obj* l_List_lookup___main___at_Lean_Expander_mkNotationTransformer___spec__7(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -x_5 = lean::cnstr_get(x_2, 1); -x_6 = lean::cnstr_get(x_4, 0); -x_7 = lean::cnstr_get(x_4, 1); -x_8 = lean_name_dec_eq(x_1, x_6); -if (x_8 == 0) -{ -x_2 = x_5; -goto _start; -} -else -{ -obj* x_10; -lean::inc(x_7); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_7); -return x_10; -} -} -} -} -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_1); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_2); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_2, 1); -x_13 = lean::cnstr_get(x_2, 0); -lean::dec(x_13); -lean::inc(x_1); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_1); -x_15 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_16 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_15, x_3, x_4); -lean::dec(x_3); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_8); -lean::dec(x_1); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -return x_16; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_8, 1); -lean::inc(x_21); -lean::dec(x_8); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -lean::dec(x_14); -lean::free_heap_obj(x_2); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_2 = x_12; -x_3 = x_22; -goto _start; -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_21); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_21, 0); -switch (lean::obj_tag(x_25)) { -case 0: -{ -obj* x_26; obj* x_27; -lean::dec(x_25); -lean::dec(x_14); -x_26 = lean::cnstr_get(x_20, 1); -lean::inc(x_26); -lean::dec(x_20); -x_27 = l___private_init_lean_expander_1__popStxArg(x_26, x_4); -if (lean::obj_tag(x_27) == 0) -{ -uint8 x_28; -lean::free_heap_obj(x_21); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -return x_27; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_27, 0); -lean::inc(x_29); -lean::dec(x_27); -x_30 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -return x_30; -} -} -else -{ -obj* x_31; obj* x_32; obj* x_33; uint8 x_34; -x_31 = lean::cnstr_get(x_27, 0); -lean::inc(x_31); -lean::dec(x_27); -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = !lean::is_exclusive(x_32); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_35 = lean::cnstr_get(x_32, 3); -lean::dec(x_35); -x_36 = l_Lean_Parser_Term_binderIdent_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_33); -x_39 = lean::box(0); -lean::cnstr_set(x_2, 1, x_39); -lean::cnstr_set(x_2, 0, x_38); -x_40 = lean::box(0); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_2); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_21, 0, x_42); -lean::cnstr_set(x_32, 3, x_21); -x_2 = x_12; -x_3 = x_32; -goto _start; -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_44 = lean::cnstr_get(x_32, 0); -x_45 = lean::cnstr_get(x_32, 1); -x_46 = lean::cnstr_get(x_32, 2); -lean::inc(x_46); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_32); -x_47 = l_Lean_Parser_Term_binderIdent_HasView; -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::apply_1(x_48, x_33); -x_50 = lean::box(0); -lean::cnstr_set(x_2, 1, x_50); -lean::cnstr_set(x_2, 0, x_49); -x_51 = lean::box(0); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_2); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_21, 0, x_53); -x_54 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_54, 0, x_44); -lean::cnstr_set(x_54, 1, x_45); -lean::cnstr_set(x_54, 2, x_46); -lean::cnstr_set(x_54, 3, x_21); -x_2 = x_12; -x_3 = x_54; -goto _start; -} -} -} -case 1: -{ -obj* x_56; obj* x_57; -lean::dec(x_25); -lean::dec(x_14); -lean::free_heap_obj(x_2); -x_56 = lean::cnstr_get(x_20, 1); -lean::inc(x_56); -lean::dec(x_20); -x_57 = l___private_init_lean_expander_1__popStxArg(x_56, x_4); -if (lean::obj_tag(x_57) == 0) -{ -uint8 x_58; -lean::free_heap_obj(x_21); -lean::dec(x_12); -lean::dec(x_1); -x_58 = !lean::is_exclusive(x_57); -if (x_58 == 0) -{ -return x_57; -} -else -{ -obj* x_59; obj* x_60; -x_59 = lean::cnstr_get(x_57, 0); -lean::inc(x_59); -lean::dec(x_57); -x_60 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -return x_60; -} -} -else -{ -obj* x_61; obj* x_62; obj* x_63; uint8 x_64; -x_61 = lean::cnstr_get(x_57, 0); -lean::inc(x_61); -lean::dec(x_57); -x_62 = lean::cnstr_get(x_61, 1); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_61, 0); -lean::inc(x_63); -lean::dec(x_61); -x_64 = !lean::is_exclusive(x_62); -if (x_64 == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_65 = lean::cnstr_get(x_62, 3); -lean::dec(x_65); -x_66 = l_Lean_Parser_Term_binders_HasView; -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -x_68 = lean::apply_1(x_67, x_63); -lean::cnstr_set(x_21, 0, x_68); -lean::cnstr_set(x_62, 3, x_21); -x_2 = x_12; -x_3 = x_62; -goto _start; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_70 = lean::cnstr_get(x_62, 0); -x_71 = lean::cnstr_get(x_62, 1); -x_72 = lean::cnstr_get(x_62, 2); -lean::inc(x_72); -lean::inc(x_71); -lean::inc(x_70); -lean::dec(x_62); -x_73 = l_Lean_Parser_Term_binders_HasView; -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::apply_1(x_74, x_63); -lean::cnstr_set(x_21, 0, x_75); -x_76 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_76, 0, x_70); -lean::cnstr_set(x_76, 1, x_71); -lean::cnstr_set(x_76, 2, x_72); -lean::cnstr_set(x_76, 3, x_21); -x_2 = x_12; -x_3 = x_76; -goto _start; -} -} -} -default: -{ -obj* x_78; obj* x_79; -lean::free_heap_obj(x_21); -x_78 = lean::cnstr_get(x_25, 0); -lean::inc(x_78); -lean::dec(x_25); -x_79 = lean::cnstr_get(x_78, 1); -lean::inc(x_79); -if (lean::obj_tag(x_79) == 0) -{ -obj* x_80; obj* x_81; obj* x_82; -lean::dec(x_14); -x_80 = lean::cnstr_get(x_20, 1); -lean::inc(x_80); -lean::dec(x_20); -x_81 = lean::cnstr_get(x_78, 0); -lean::inc(x_81); -lean::dec(x_78); -x_82 = l___private_init_lean_expander_1__popStxArg(x_80, x_4); -if (lean::obj_tag(x_82) == 0) -{ -uint8 x_83; -lean::dec(x_81); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_83 = !lean::is_exclusive(x_82); -if (x_83 == 0) -{ -return x_82; -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_82, 0); -lean::inc(x_84); -lean::dec(x_82); -x_85 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -return x_85; -} -} -else -{ -obj* x_86; uint8 x_87; -x_86 = lean::cnstr_get(x_82, 0); -lean::inc(x_86); -lean::dec(x_82); -x_87 = !lean::is_exclusive(x_86); -if (x_87 == 0) -{ -obj* x_88; uint8 x_89; -x_88 = lean::cnstr_get(x_86, 1); -x_89 = !lean::is_exclusive(x_88); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_86, 0); -x_91 = lean::cnstr_get(x_88, 2); -lean::cnstr_set(x_86, 1, x_90); -lean::cnstr_set(x_86, 0, x_81); -lean::cnstr_set(x_2, 1, x_91); -lean::cnstr_set(x_2, 0, x_86); -lean::cnstr_set(x_88, 2, x_2); -x_2 = x_12; -x_3 = x_88; -goto _start; -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_93 = lean::cnstr_get(x_86, 0); -x_94 = lean::cnstr_get(x_88, 0); -x_95 = lean::cnstr_get(x_88, 1); -x_96 = lean::cnstr_get(x_88, 2); -x_97 = lean::cnstr_get(x_88, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_88); -lean::cnstr_set(x_86, 1, x_93); -lean::cnstr_set(x_86, 0, x_81); -lean::cnstr_set(x_2, 1, x_96); -lean::cnstr_set(x_2, 0, x_86); -x_98 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_98, 0, x_94); -lean::cnstr_set(x_98, 1, x_95); -lean::cnstr_set(x_98, 2, x_2); -lean::cnstr_set(x_98, 3, x_97); -x_2 = x_12; -x_3 = x_98; -goto _start; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_100 = lean::cnstr_get(x_86, 1); -x_101 = lean::cnstr_get(x_86, 0); -lean::inc(x_100); -lean::inc(x_101); -lean::dec(x_86); -x_102 = lean::cnstr_get(x_100, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_100, 1); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_100, 2); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_100, 3); -lean::inc(x_105); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - lean::cnstr_release(x_100, 1); - lean::cnstr_release(x_100, 2); - lean::cnstr_release(x_100, 3); - x_106 = x_100; -} else { - lean::dec_ref(x_100); - x_106 = lean::box(0); -} -x_107 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_107, 0, x_81); -lean::cnstr_set(x_107, 1, x_101); -lean::cnstr_set(x_2, 1, x_104); -lean::cnstr_set(x_2, 0, x_107); -if (lean::is_scalar(x_106)) { - x_108 = lean::alloc_cnstr(0, 4, 0); -} else { - x_108 = x_106; -} -lean::cnstr_set(x_108, 0, x_102); -lean::cnstr_set(x_108, 1, x_103); -lean::cnstr_set(x_108, 2, x_2); -lean::cnstr_set(x_108, 3, x_105); -x_2 = x_12; -x_3 = x_108; -goto _start; -} -} -} -else -{ -obj* x_110; obj* x_111; -x_110 = lean::cnstr_get(x_79, 0); -lean::inc(x_110); -lean::dec(x_79); -x_111 = lean::cnstr_get(x_110, 1); -lean::inc(x_111); -lean::dec(x_110); -switch (lean::obj_tag(x_111)) { -case 0: -{ -obj* x_112; obj* x_113; obj* x_114; -lean::dec(x_111); -lean::dec(x_14); -x_112 = lean::cnstr_get(x_20, 1); -lean::inc(x_112); -lean::dec(x_20); -x_113 = lean::cnstr_get(x_78, 0); -lean::inc(x_113); -lean::dec(x_78); -x_114 = l___private_init_lean_expander_1__popStxArg(x_112, x_4); -if (lean::obj_tag(x_114) == 0) -{ -uint8 x_115; -lean::dec(x_113); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_115 = !lean::is_exclusive(x_114); -if (x_115 == 0) -{ -return x_114; -} -else -{ -obj* x_116; obj* x_117; -x_116 = lean::cnstr_get(x_114, 0); -lean::inc(x_116); -lean::dec(x_114); -x_117 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_117, 0, x_116); -return x_117; -} -} -else -{ -obj* x_118; uint8 x_119; -x_118 = lean::cnstr_get(x_114, 0); -lean::inc(x_118); -lean::dec(x_114); -x_119 = !lean::is_exclusive(x_118); -if (x_119 == 0) -{ -obj* x_120; uint8 x_121; -x_120 = lean::cnstr_get(x_118, 1); -x_121 = !lean::is_exclusive(x_120); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; -x_122 = lean::cnstr_get(x_118, 0); -x_123 = lean::cnstr_get(x_120, 2); -lean::cnstr_set(x_118, 1, x_122); -lean::cnstr_set(x_118, 0, x_113); -lean::cnstr_set(x_2, 1, x_123); -lean::cnstr_set(x_2, 0, x_118); -lean::cnstr_set(x_120, 2, x_2); -x_2 = x_12; -x_3 = x_120; -goto _start; -} -else -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -x_125 = lean::cnstr_get(x_118, 0); -x_126 = lean::cnstr_get(x_120, 0); -x_127 = lean::cnstr_get(x_120, 1); -x_128 = lean::cnstr_get(x_120, 2); -x_129 = lean::cnstr_get(x_120, 3); -lean::inc(x_129); -lean::inc(x_128); -lean::inc(x_127); -lean::inc(x_126); -lean::dec(x_120); -lean::cnstr_set(x_118, 1, x_125); -lean::cnstr_set(x_118, 0, x_113); -lean::cnstr_set(x_2, 1, x_128); -lean::cnstr_set(x_2, 0, x_118); -x_130 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_130, 0, x_126); -lean::cnstr_set(x_130, 1, x_127); -lean::cnstr_set(x_130, 2, x_2); -lean::cnstr_set(x_130, 3, x_129); -x_2 = x_12; -x_3 = x_130; -goto _start; -} -} -else -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; -x_132 = lean::cnstr_get(x_118, 1); -x_133 = lean::cnstr_get(x_118, 0); -lean::inc(x_132); -lean::inc(x_133); -lean::dec(x_118); -x_134 = lean::cnstr_get(x_132, 0); -lean::inc(x_134); -x_135 = lean::cnstr_get(x_132, 1); -lean::inc(x_135); -x_136 = lean::cnstr_get(x_132, 2); -lean::inc(x_136); -x_137 = lean::cnstr_get(x_132, 3); -lean::inc(x_137); -if (lean::is_exclusive(x_132)) { - lean::cnstr_release(x_132, 0); - lean::cnstr_release(x_132, 1); - lean::cnstr_release(x_132, 2); - lean::cnstr_release(x_132, 3); - x_138 = x_132; -} else { - lean::dec_ref(x_132); - x_138 = lean::box(0); -} -x_139 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_139, 0, x_113); -lean::cnstr_set(x_139, 1, x_133); -lean::cnstr_set(x_2, 1, x_136); -lean::cnstr_set(x_2, 0, x_139); -if (lean::is_scalar(x_138)) { - x_140 = lean::alloc_cnstr(0, 4, 0); -} else { - x_140 = x_138; -} -lean::cnstr_set(x_140, 0, x_134); -lean::cnstr_set(x_140, 1, x_135); -lean::cnstr_set(x_140, 2, x_2); -lean::cnstr_set(x_140, 3, x_137); -x_2 = x_12; -x_3 = x_140; -goto _start; -} -} -} -case 2: -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; -x_142 = lean::cnstr_get(x_20, 1); -lean::inc(x_142); -lean::dec(x_20); -x_143 = lean::cnstr_get(x_78, 0); -lean::inc(x_143); -lean::dec(x_78); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -lean::dec(x_111); -x_145 = l___private_init_lean_expander_1__popStxArg(x_142, x_4); -if (lean::obj_tag(x_145) == 0) -{ -uint8 x_146; -lean::dec(x_144); -lean::dec(x_143); -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_146 = !lean::is_exclusive(x_145); -if (x_146 == 0) -{ -return x_145; -} -else -{ -obj* x_147; obj* x_148; -x_147 = lean::cnstr_get(x_145, 0); -lean::inc(x_147); -lean::dec(x_145); -x_148 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_148, 0, x_147); -return x_148; -} -} -else -{ -obj* x_149; obj* x_150; obj* x_151; -x_149 = lean::cnstr_get(x_145, 0); -lean::inc(x_149); -lean::dec(x_145); -x_150 = lean::cnstr_get(x_149, 1); -lean::inc(x_150); -x_151 = lean::cnstr_get(x_150, 3); -lean::inc(x_151); -if (lean::obj_tag(x_151) == 0) -{ -obj* x_152; -lean::dec(x_149); -lean::dec(x_144); -lean::dec(x_143); -lean::free_heap_obj(x_2); -x_152 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_15, x_150, x_4); -lean::dec(x_150); -lean::dec(x_14); -if (lean::obj_tag(x_152) == 0) -{ -uint8 x_153; -lean::dec(x_12); -lean::dec(x_1); -x_153 = !lean::is_exclusive(x_152); -if (x_153 == 0) -{ -return x_152; -} -else -{ -obj* x_154; obj* x_155; -x_154 = lean::cnstr_get(x_152, 0); -lean::inc(x_154); -lean::dec(x_152); -x_155 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_155, 0, x_154); -return x_155; -} -} -else -{ -obj* x_156; obj* x_157; -x_156 = lean::cnstr_get(x_152, 0); -lean::inc(x_156); -lean::dec(x_152); -x_157 = lean::cnstr_get(x_156, 1); -lean::inc(x_157); -lean::dec(x_156); -x_2 = x_12; -x_3 = x_157; -goto _start; -} -} -else -{ -uint8 x_159; -lean::dec(x_14); -x_159 = !lean::is_exclusive(x_149); -if (x_159 == 0) -{ -obj* x_160; obj* x_161; uint8 x_162; -x_160 = lean::cnstr_get(x_149, 0); -x_161 = lean::cnstr_get(x_149, 1); -lean::dec(x_161); -x_162 = !lean::is_exclusive(x_150); -if (x_162 == 0) -{ -obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; -x_163 = lean::cnstr_get(x_150, 2); -x_164 = lean::cnstr_get(x_150, 3); -lean::dec(x_164); -x_165 = lean::cnstr_get(x_151, 0); -lean::inc(x_165); -x_166 = l_Lean_Parser_Term_lambda_HasView; -x_167 = lean::cnstr_get(x_166, 1); -lean::inc(x_167); -x_168 = lean::box(0); -x_169 = lean::cnstr_get(x_144, 3); -lean::inc(x_169); -x_170 = lean::box(0); -lean::cnstr_set(x_2, 1, x_170); -lean::cnstr_set(x_2, 0, x_169); -x_171 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_172 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_172, 0, x_171); -lean::cnstr_set(x_172, 1, x_168); -x_173 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_173, 0, x_172); -x_174 = lean::cnstr_get(x_144, 5); -lean::inc(x_174); -lean::dec(x_144); -x_175 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_176 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_177 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_177, 0, x_175); -lean::cnstr_set(x_177, 1, x_173); -lean::cnstr_set(x_177, 2, x_176); -lean::cnstr_set(x_177, 3, x_174); -lean::inc(x_167); -x_178 = lean::apply_1(x_167, x_177); -x_179 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_179, 0, x_175); -lean::cnstr_set(x_179, 1, x_165); -lean::cnstr_set(x_179, 2, x_176); -lean::cnstr_set(x_179, 3, x_160); -x_180 = lean::apply_1(x_167, x_179); -x_181 = l_Lean_Parser_Term_app_HasView; -x_182 = lean::cnstr_get(x_181, 1); -lean::inc(x_182); -x_183 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_183, 0, x_178); -lean::cnstr_set(x_183, 1, x_180); -x_184 = lean::apply_1(x_182, x_183); -lean::cnstr_set(x_149, 1, x_184); -lean::cnstr_set(x_149, 0, x_143); -x_185 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_185, 0, x_149); -lean::cnstr_set(x_185, 1, x_163); -lean::cnstr_set(x_150, 2, x_185); -x_2 = x_12; -x_3 = x_150; -goto _start; -} -else -{ -obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; -x_187 = lean::cnstr_get(x_150, 0); -x_188 = lean::cnstr_get(x_150, 1); -x_189 = lean::cnstr_get(x_150, 2); -lean::inc(x_189); -lean::inc(x_188); -lean::inc(x_187); -lean::dec(x_150); -x_190 = lean::cnstr_get(x_151, 0); -lean::inc(x_190); -x_191 = l_Lean_Parser_Term_lambda_HasView; -x_192 = lean::cnstr_get(x_191, 1); -lean::inc(x_192); -x_193 = lean::box(0); -x_194 = lean::cnstr_get(x_144, 3); -lean::inc(x_194); -x_195 = lean::box(0); -lean::cnstr_set(x_2, 1, x_195); -lean::cnstr_set(x_2, 0, x_194); -x_196 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_197 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_197, 0, x_196); -lean::cnstr_set(x_197, 1, x_193); -x_198 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_198, 0, x_197); -x_199 = lean::cnstr_get(x_144, 5); -lean::inc(x_199); -lean::dec(x_144); -x_200 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_201 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_202 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_202, 0, x_200); -lean::cnstr_set(x_202, 1, x_198); -lean::cnstr_set(x_202, 2, x_201); -lean::cnstr_set(x_202, 3, x_199); -lean::inc(x_192); -x_203 = lean::apply_1(x_192, x_202); -x_204 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_204, 0, x_200); -lean::cnstr_set(x_204, 1, x_190); -lean::cnstr_set(x_204, 2, x_201); -lean::cnstr_set(x_204, 3, x_160); -x_205 = lean::apply_1(x_192, x_204); -x_206 = l_Lean_Parser_Term_app_HasView; -x_207 = lean::cnstr_get(x_206, 1); -lean::inc(x_207); -x_208 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_208, 0, x_203); -lean::cnstr_set(x_208, 1, x_205); -x_209 = lean::apply_1(x_207, x_208); -lean::cnstr_set(x_149, 1, x_209); -lean::cnstr_set(x_149, 0, x_143); -x_210 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_210, 0, x_149); -lean::cnstr_set(x_210, 1, x_189); -x_211 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_211, 0, x_187); -lean::cnstr_set(x_211, 1, x_188); -lean::cnstr_set(x_211, 2, x_210); -lean::cnstr_set(x_211, 3, x_151); -x_2 = x_12; -x_3 = x_211; -goto _start; -} -} -else -{ -obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; -x_213 = lean::cnstr_get(x_149, 0); -lean::inc(x_213); -lean::dec(x_149); -x_214 = lean::cnstr_get(x_150, 0); -lean::inc(x_214); -x_215 = lean::cnstr_get(x_150, 1); -lean::inc(x_215); -x_216 = lean::cnstr_get(x_150, 2); -lean::inc(x_216); -if (lean::is_exclusive(x_150)) { - lean::cnstr_release(x_150, 0); - lean::cnstr_release(x_150, 1); - lean::cnstr_release(x_150, 2); - lean::cnstr_release(x_150, 3); - x_217 = x_150; -} else { - lean::dec_ref(x_150); - x_217 = lean::box(0); -} -x_218 = lean::cnstr_get(x_151, 0); -lean::inc(x_218); -x_219 = l_Lean_Parser_Term_lambda_HasView; -x_220 = lean::cnstr_get(x_219, 1); -lean::inc(x_220); -x_221 = lean::box(0); -x_222 = lean::cnstr_get(x_144, 3); -lean::inc(x_222); -x_223 = lean::box(0); -lean::cnstr_set(x_2, 1, x_223); -lean::cnstr_set(x_2, 0, x_222); -x_224 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_225 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_225, 0, x_224); -lean::cnstr_set(x_225, 1, x_221); -x_226 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_226, 0, x_225); -x_227 = lean::cnstr_get(x_144, 5); -lean::inc(x_227); -lean::dec(x_144); -x_228 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_229 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_230 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_230, 0, x_228); -lean::cnstr_set(x_230, 1, x_226); -lean::cnstr_set(x_230, 2, x_229); -lean::cnstr_set(x_230, 3, x_227); -lean::inc(x_220); -x_231 = lean::apply_1(x_220, x_230); -x_232 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_232, 0, x_228); -lean::cnstr_set(x_232, 1, x_218); -lean::cnstr_set(x_232, 2, x_229); -lean::cnstr_set(x_232, 3, x_213); -x_233 = lean::apply_1(x_220, x_232); -x_234 = l_Lean_Parser_Term_app_HasView; -x_235 = lean::cnstr_get(x_234, 1); -lean::inc(x_235); -x_236 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_236, 0, x_231); -lean::cnstr_set(x_236, 1, x_233); -x_237 = lean::apply_1(x_235, x_236); -x_238 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_238, 0, x_143); -lean::cnstr_set(x_238, 1, x_237); -x_239 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_239, 0, x_238); -lean::cnstr_set(x_239, 1, x_216); -if (lean::is_scalar(x_217)) { - x_240 = lean::alloc_cnstr(0, 4, 0); -} else { - x_240 = x_217; -} -lean::cnstr_set(x_240, 0, x_214); -lean::cnstr_set(x_240, 1, x_215); -lean::cnstr_set(x_240, 2, x_239); -lean::cnstr_set(x_240, 3, x_151); -x_2 = x_12; -x_3 = x_240; -goto _start; -} -} -} -} -default: -{ -obj* x_242; obj* x_243; obj* x_244; -lean::dec(x_111); -lean::dec(x_78); -lean::free_heap_obj(x_2); -x_242 = lean::cnstr_get(x_20, 1); -lean::inc(x_242); -lean::dec(x_20); -x_243 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_244 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_243, x_242, x_4); -lean::dec(x_242); -lean::dec(x_14); -if (lean::obj_tag(x_244) == 0) -{ -uint8 x_245; -lean::dec(x_12); -lean::dec(x_1); -x_245 = !lean::is_exclusive(x_244); -if (x_245 == 0) -{ -return x_244; -} -else -{ -obj* x_246; obj* x_247; -x_246 = lean::cnstr_get(x_244, 0); -lean::inc(x_246); -lean::dec(x_244); -x_247 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_247, 0, x_246); -return x_247; -} -} -else -{ -obj* x_248; obj* x_249; -x_248 = lean::cnstr_get(x_244, 0); -lean::inc(x_248); -lean::dec(x_244); -x_249 = lean::cnstr_get(x_248, 1); -lean::inc(x_249); -lean::dec(x_248); -x_2 = x_12; -x_3 = x_249; -goto _start; -} -} -} -} -} -} -} -else -{ -obj* x_251; -x_251 = lean::cnstr_get(x_21, 0); -lean::inc(x_251); -lean::dec(x_21); -switch (lean::obj_tag(x_251)) { -case 0: -{ -obj* x_252; obj* x_253; -lean::dec(x_251); -lean::dec(x_14); -x_252 = lean::cnstr_get(x_20, 1); -lean::inc(x_252); -lean::dec(x_20); -x_253 = l___private_init_lean_expander_1__popStxArg(x_252, x_4); -if (lean::obj_tag(x_253) == 0) -{ -obj* x_254; obj* x_255; obj* x_256; -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_254 = lean::cnstr_get(x_253, 0); -lean::inc(x_254); -if (lean::is_exclusive(x_253)) { - lean::cnstr_release(x_253, 0); - x_255 = x_253; -} else { - lean::dec_ref(x_253); - x_255 = lean::box(0); -} -if (lean::is_scalar(x_255)) { - x_256 = lean::alloc_cnstr(0, 1, 0); -} else { - x_256 = x_255; -} -lean::cnstr_set(x_256, 0, x_254); -return x_256; -} -else -{ -obj* x_257; obj* x_258; obj* x_259; obj* x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_264; obj* x_265; obj* x_266; obj* x_267; obj* x_268; obj* x_269; obj* x_270; obj* x_271; obj* x_272; -x_257 = lean::cnstr_get(x_253, 0); -lean::inc(x_257); -lean::dec(x_253); -x_258 = lean::cnstr_get(x_257, 1); -lean::inc(x_258); -x_259 = lean::cnstr_get(x_257, 0); -lean::inc(x_259); -lean::dec(x_257); -x_260 = lean::cnstr_get(x_258, 0); -lean::inc(x_260); -x_261 = lean::cnstr_get(x_258, 1); -lean::inc(x_261); -x_262 = lean::cnstr_get(x_258, 2); -lean::inc(x_262); -if (lean::is_exclusive(x_258)) { - lean::cnstr_release(x_258, 0); - lean::cnstr_release(x_258, 1); - lean::cnstr_release(x_258, 2); - lean::cnstr_release(x_258, 3); - x_263 = x_258; -} else { - lean::dec_ref(x_258); - x_263 = lean::box(0); -} -x_264 = l_Lean_Parser_Term_binderIdent_HasView; -x_265 = lean::cnstr_get(x_264, 0); -lean::inc(x_265); -x_266 = lean::apply_1(x_265, x_259); -x_267 = lean::box(0); -lean::cnstr_set(x_2, 1, x_267); -lean::cnstr_set(x_2, 0, x_266); -x_268 = lean::box(0); -x_269 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_269, 0, x_2); -lean::cnstr_set(x_269, 1, x_268); -x_270 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_270, 0, x_269); -x_271 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_271, 0, x_270); -if (lean::is_scalar(x_263)) { - x_272 = lean::alloc_cnstr(0, 4, 0); -} else { - x_272 = x_263; -} -lean::cnstr_set(x_272, 0, x_260); -lean::cnstr_set(x_272, 1, x_261); -lean::cnstr_set(x_272, 2, x_262); -lean::cnstr_set(x_272, 3, x_271); -x_2 = x_12; -x_3 = x_272; -goto _start; -} -} -case 1: -{ -obj* x_274; obj* x_275; -lean::dec(x_251); -lean::dec(x_14); -lean::free_heap_obj(x_2); -x_274 = lean::cnstr_get(x_20, 1); -lean::inc(x_274); -lean::dec(x_20); -x_275 = l___private_init_lean_expander_1__popStxArg(x_274, x_4); -if (lean::obj_tag(x_275) == 0) -{ -obj* x_276; obj* x_277; obj* x_278; -lean::dec(x_12); -lean::dec(x_1); -x_276 = lean::cnstr_get(x_275, 0); -lean::inc(x_276); -if (lean::is_exclusive(x_275)) { - lean::cnstr_release(x_275, 0); - x_277 = x_275; -} else { - lean::dec_ref(x_275); - x_277 = lean::box(0); -} -if (lean::is_scalar(x_277)) { - x_278 = lean::alloc_cnstr(0, 1, 0); -} else { - x_278 = x_277; -} -lean::cnstr_set(x_278, 0, x_276); -return x_278; -} -else -{ -obj* x_279; obj* x_280; obj* x_281; obj* x_282; obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; -x_279 = lean::cnstr_get(x_275, 0); -lean::inc(x_279); -lean::dec(x_275); -x_280 = lean::cnstr_get(x_279, 1); -lean::inc(x_280); -x_281 = lean::cnstr_get(x_279, 0); -lean::inc(x_281); -lean::dec(x_279); -x_282 = lean::cnstr_get(x_280, 0); -lean::inc(x_282); -x_283 = lean::cnstr_get(x_280, 1); -lean::inc(x_283); -x_284 = lean::cnstr_get(x_280, 2); -lean::inc(x_284); -if (lean::is_exclusive(x_280)) { - lean::cnstr_release(x_280, 0); - lean::cnstr_release(x_280, 1); - lean::cnstr_release(x_280, 2); - lean::cnstr_release(x_280, 3); - x_285 = x_280; -} else { - lean::dec_ref(x_280); - x_285 = lean::box(0); -} -x_286 = l_Lean_Parser_Term_binders_HasView; -x_287 = lean::cnstr_get(x_286, 0); -lean::inc(x_287); -x_288 = lean::apply_1(x_287, x_281); -x_289 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_289, 0, x_288); -if (lean::is_scalar(x_285)) { - x_290 = lean::alloc_cnstr(0, 4, 0); -} else { - x_290 = x_285; -} -lean::cnstr_set(x_290, 0, x_282); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_289); -x_2 = x_12; -x_3 = x_290; -goto _start; -} -} -default: -{ -obj* x_292; obj* x_293; -x_292 = lean::cnstr_get(x_251, 0); -lean::inc(x_292); -lean::dec(x_251); -x_293 = lean::cnstr_get(x_292, 1); -lean::inc(x_293); -if (lean::obj_tag(x_293) == 0) -{ -obj* x_294; obj* x_295; obj* x_296; -lean::dec(x_14); -x_294 = lean::cnstr_get(x_20, 1); -lean::inc(x_294); -lean::dec(x_20); -x_295 = lean::cnstr_get(x_292, 0); -lean::inc(x_295); -lean::dec(x_292); -x_296 = l___private_init_lean_expander_1__popStxArg(x_294, x_4); -if (lean::obj_tag(x_296) == 0) -{ -obj* x_297; obj* x_298; obj* x_299; -lean::dec(x_295); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_297 = lean::cnstr_get(x_296, 0); -lean::inc(x_297); -if (lean::is_exclusive(x_296)) { - lean::cnstr_release(x_296, 0); - x_298 = x_296; -} else { - lean::dec_ref(x_296); - x_298 = lean::box(0); -} -if (lean::is_scalar(x_298)) { - x_299 = lean::alloc_cnstr(0, 1, 0); -} else { - x_299 = x_298; -} -lean::cnstr_set(x_299, 0, x_297); -return x_299; -} -else -{ -obj* x_300; obj* x_301; obj* x_302; obj* x_303; obj* x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; -x_300 = lean::cnstr_get(x_296, 0); -lean::inc(x_300); -lean::dec(x_296); -x_301 = lean::cnstr_get(x_300, 1); -lean::inc(x_301); -x_302 = lean::cnstr_get(x_300, 0); -lean::inc(x_302); -if (lean::is_exclusive(x_300)) { - lean::cnstr_release(x_300, 0); - lean::cnstr_release(x_300, 1); - x_303 = x_300; -} else { - lean::dec_ref(x_300); - x_303 = lean::box(0); -} -x_304 = lean::cnstr_get(x_301, 0); -lean::inc(x_304); -x_305 = lean::cnstr_get(x_301, 1); -lean::inc(x_305); -x_306 = lean::cnstr_get(x_301, 2); -lean::inc(x_306); -x_307 = lean::cnstr_get(x_301, 3); -lean::inc(x_307); -if (lean::is_exclusive(x_301)) { - lean::cnstr_release(x_301, 0); - lean::cnstr_release(x_301, 1); - lean::cnstr_release(x_301, 2); - lean::cnstr_release(x_301, 3); - x_308 = x_301; -} else { - lean::dec_ref(x_301); - x_308 = lean::box(0); -} -if (lean::is_scalar(x_303)) { - x_309 = lean::alloc_cnstr(0, 2, 0); -} else { - x_309 = x_303; -} -lean::cnstr_set(x_309, 0, x_295); -lean::cnstr_set(x_309, 1, x_302); -lean::cnstr_set(x_2, 1, x_306); -lean::cnstr_set(x_2, 0, x_309); -if (lean::is_scalar(x_308)) { - x_310 = lean::alloc_cnstr(0, 4, 0); -} else { - x_310 = x_308; -} -lean::cnstr_set(x_310, 0, x_304); -lean::cnstr_set(x_310, 1, x_305); -lean::cnstr_set(x_310, 2, x_2); -lean::cnstr_set(x_310, 3, x_307); -x_2 = x_12; -x_3 = x_310; -goto _start; -} -} -else -{ -obj* x_312; obj* x_313; -x_312 = lean::cnstr_get(x_293, 0); -lean::inc(x_312); -lean::dec(x_293); -x_313 = lean::cnstr_get(x_312, 1); -lean::inc(x_313); -lean::dec(x_312); -switch (lean::obj_tag(x_313)) { -case 0: -{ -obj* x_314; obj* x_315; obj* x_316; -lean::dec(x_313); -lean::dec(x_14); -x_314 = lean::cnstr_get(x_20, 1); -lean::inc(x_314); -lean::dec(x_20); -x_315 = lean::cnstr_get(x_292, 0); -lean::inc(x_315); -lean::dec(x_292); -x_316 = l___private_init_lean_expander_1__popStxArg(x_314, x_4); -if (lean::obj_tag(x_316) == 0) -{ -obj* x_317; obj* x_318; obj* x_319; -lean::dec(x_315); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_317 = lean::cnstr_get(x_316, 0); -lean::inc(x_317); -if (lean::is_exclusive(x_316)) { - lean::cnstr_release(x_316, 0); - x_318 = x_316; -} else { - lean::dec_ref(x_316); - x_318 = lean::box(0); -} -if (lean::is_scalar(x_318)) { - x_319 = lean::alloc_cnstr(0, 1, 0); -} else { - x_319 = x_318; -} -lean::cnstr_set(x_319, 0, x_317); -return x_319; -} -else -{ -obj* x_320; obj* x_321; obj* x_322; obj* x_323; obj* x_324; obj* x_325; obj* x_326; obj* x_327; obj* x_328; obj* x_329; obj* x_330; -x_320 = lean::cnstr_get(x_316, 0); -lean::inc(x_320); -lean::dec(x_316); -x_321 = lean::cnstr_get(x_320, 1); -lean::inc(x_321); -x_322 = lean::cnstr_get(x_320, 0); -lean::inc(x_322); -if (lean::is_exclusive(x_320)) { - lean::cnstr_release(x_320, 0); - lean::cnstr_release(x_320, 1); - x_323 = x_320; -} else { - lean::dec_ref(x_320); - x_323 = lean::box(0); -} -x_324 = lean::cnstr_get(x_321, 0); -lean::inc(x_324); -x_325 = lean::cnstr_get(x_321, 1); -lean::inc(x_325); -x_326 = lean::cnstr_get(x_321, 2); -lean::inc(x_326); -x_327 = lean::cnstr_get(x_321, 3); -lean::inc(x_327); -if (lean::is_exclusive(x_321)) { - lean::cnstr_release(x_321, 0); - lean::cnstr_release(x_321, 1); - lean::cnstr_release(x_321, 2); - lean::cnstr_release(x_321, 3); - x_328 = x_321; -} else { - lean::dec_ref(x_321); - x_328 = lean::box(0); -} -if (lean::is_scalar(x_323)) { - x_329 = lean::alloc_cnstr(0, 2, 0); -} else { - x_329 = x_323; -} -lean::cnstr_set(x_329, 0, x_315); -lean::cnstr_set(x_329, 1, x_322); -lean::cnstr_set(x_2, 1, x_326); -lean::cnstr_set(x_2, 0, x_329); -if (lean::is_scalar(x_328)) { - x_330 = lean::alloc_cnstr(0, 4, 0); -} else { - x_330 = x_328; -} -lean::cnstr_set(x_330, 0, x_324); -lean::cnstr_set(x_330, 1, x_325); -lean::cnstr_set(x_330, 2, x_2); -lean::cnstr_set(x_330, 3, x_327); -x_2 = x_12; -x_3 = x_330; -goto _start; -} -} -case 2: -{ -obj* x_332; obj* x_333; obj* x_334; obj* x_335; -x_332 = lean::cnstr_get(x_20, 1); -lean::inc(x_332); -lean::dec(x_20); -x_333 = lean::cnstr_get(x_292, 0); -lean::inc(x_333); -lean::dec(x_292); -x_334 = lean::cnstr_get(x_313, 0); -lean::inc(x_334); -lean::dec(x_313); -x_335 = l___private_init_lean_expander_1__popStxArg(x_332, x_4); -if (lean::obj_tag(x_335) == 0) -{ -obj* x_336; obj* x_337; obj* x_338; -lean::dec(x_334); -lean::dec(x_333); -lean::dec(x_14); -lean::free_heap_obj(x_2); -lean::dec(x_12); -lean::dec(x_1); -x_336 = lean::cnstr_get(x_335, 0); -lean::inc(x_336); -if (lean::is_exclusive(x_335)) { - lean::cnstr_release(x_335, 0); - x_337 = x_335; -} else { - lean::dec_ref(x_335); - x_337 = lean::box(0); -} -if (lean::is_scalar(x_337)) { - x_338 = lean::alloc_cnstr(0, 1, 0); -} else { - x_338 = x_337; -} -lean::cnstr_set(x_338, 0, x_336); -return x_338; -} -else -{ -obj* x_339; obj* x_340; obj* x_341; -x_339 = lean::cnstr_get(x_335, 0); -lean::inc(x_339); -lean::dec(x_335); -x_340 = lean::cnstr_get(x_339, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_340, 3); -lean::inc(x_341); -if (lean::obj_tag(x_341) == 0) -{ -obj* x_342; -lean::dec(x_339); -lean::dec(x_334); -lean::dec(x_333); -lean::free_heap_obj(x_2); -x_342 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_15, x_340, x_4); -lean::dec(x_340); -lean::dec(x_14); -if (lean::obj_tag(x_342) == 0) -{ -obj* x_343; obj* x_344; obj* x_345; -lean::dec(x_12); -lean::dec(x_1); -x_343 = lean::cnstr_get(x_342, 0); -lean::inc(x_343); -if (lean::is_exclusive(x_342)) { - lean::cnstr_release(x_342, 0); - x_344 = x_342; -} else { - lean::dec_ref(x_342); - x_344 = lean::box(0); -} -if (lean::is_scalar(x_344)) { - x_345 = lean::alloc_cnstr(0, 1, 0); -} else { - x_345 = x_344; -} -lean::cnstr_set(x_345, 0, x_343); -return x_345; -} -else -{ -obj* x_346; obj* x_347; -x_346 = lean::cnstr_get(x_342, 0); -lean::inc(x_346); -lean::dec(x_342); -x_347 = lean::cnstr_get(x_346, 1); -lean::inc(x_347); -lean::dec(x_346); -x_2 = x_12; -x_3 = x_347; -goto _start; -} -} -else -{ -obj* x_349; obj* x_350; obj* x_351; obj* x_352; obj* x_353; obj* x_354; obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; obj* x_364; obj* x_365; obj* x_366; obj* x_367; obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_372; obj* x_373; obj* x_374; obj* x_375; obj* x_376; obj* x_377; -lean::dec(x_14); -x_349 = lean::cnstr_get(x_339, 0); -lean::inc(x_349); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - x_350 = x_339; -} else { - lean::dec_ref(x_339); - x_350 = lean::box(0); -} -x_351 = lean::cnstr_get(x_340, 0); -lean::inc(x_351); -x_352 = lean::cnstr_get(x_340, 1); -lean::inc(x_352); -x_353 = lean::cnstr_get(x_340, 2); -lean::inc(x_353); -if (lean::is_exclusive(x_340)) { - lean::cnstr_release(x_340, 0); - lean::cnstr_release(x_340, 1); - lean::cnstr_release(x_340, 2); - lean::cnstr_release(x_340, 3); - x_354 = x_340; -} else { - lean::dec_ref(x_340); - x_354 = lean::box(0); -} -x_355 = lean::cnstr_get(x_341, 0); -lean::inc(x_355); -x_356 = l_Lean_Parser_Term_lambda_HasView; -x_357 = lean::cnstr_get(x_356, 1); -lean::inc(x_357); -x_358 = lean::box(0); -x_359 = lean::cnstr_get(x_334, 3); -lean::inc(x_359); -x_360 = lean::box(0); -lean::cnstr_set(x_2, 1, x_360); -lean::cnstr_set(x_2, 0, x_359); -x_361 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_362 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_362, 0, x_361); -lean::cnstr_set(x_362, 1, x_358); -x_363 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_363, 0, x_362); -x_364 = lean::cnstr_get(x_334, 5); -lean::inc(x_364); -lean::dec(x_334); -x_365 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_366 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_367 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_363); -lean::cnstr_set(x_367, 2, x_366); -lean::cnstr_set(x_367, 3, x_364); -lean::inc(x_357); -x_368 = lean::apply_1(x_357, x_367); -x_369 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_369, 0, x_365); -lean::cnstr_set(x_369, 1, x_355); -lean::cnstr_set(x_369, 2, x_366); -lean::cnstr_set(x_369, 3, x_349); -x_370 = lean::apply_1(x_357, x_369); -x_371 = l_Lean_Parser_Term_app_HasView; -x_372 = lean::cnstr_get(x_371, 1); -lean::inc(x_372); -x_373 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_373, 0, x_368); -lean::cnstr_set(x_373, 1, x_370); -x_374 = lean::apply_1(x_372, x_373); -if (lean::is_scalar(x_350)) { - x_375 = lean::alloc_cnstr(0, 2, 0); -} else { - x_375 = x_350; -} -lean::cnstr_set(x_375, 0, x_333); -lean::cnstr_set(x_375, 1, x_374); -x_376 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_376, 0, x_375); -lean::cnstr_set(x_376, 1, x_353); -if (lean::is_scalar(x_354)) { - x_377 = lean::alloc_cnstr(0, 4, 0); -} else { - x_377 = x_354; -} -lean::cnstr_set(x_377, 0, x_351); -lean::cnstr_set(x_377, 1, x_352); -lean::cnstr_set(x_377, 2, x_376); -lean::cnstr_set(x_377, 3, x_341); -x_2 = x_12; -x_3 = x_377; -goto _start; -} -} -} -default: -{ -obj* x_379; obj* x_380; obj* x_381; -lean::dec(x_313); -lean::dec(x_292); -lean::free_heap_obj(x_2); -x_379 = lean::cnstr_get(x_20, 1); -lean::inc(x_379); -lean::dec(x_20); -x_380 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_381 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_14, x_380, x_379, x_4); -lean::dec(x_379); -lean::dec(x_14); -if (lean::obj_tag(x_381) == 0) -{ -obj* x_382; obj* x_383; obj* x_384; -lean::dec(x_12); -lean::dec(x_1); -x_382 = lean::cnstr_get(x_381, 0); -lean::inc(x_382); -if (lean::is_exclusive(x_381)) { - lean::cnstr_release(x_381, 0); - x_383 = x_381; -} else { - lean::dec_ref(x_381); - x_383 = lean::box(0); -} -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(0, 1, 0); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_382); -return x_384; -} -else -{ -obj* x_385; obj* x_386; -x_385 = lean::cnstr_get(x_381, 0); -lean::inc(x_385); -lean::dec(x_381); -x_386 = lean::cnstr_get(x_385, 1); -lean::inc(x_386); -lean::dec(x_385); -x_2 = x_12; -x_3 = x_386; -goto _start; -} -} -} -} -} -} -} -} -} -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; -x_388 = lean::cnstr_get(x_2, 1); -lean::inc(x_388); -lean::dec(x_2); -lean::inc(x_1); -x_389 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_389, 0, x_1); -x_390 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_391 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_389, x_390, x_3, x_4); -lean::dec(x_3); -if (lean::obj_tag(x_391) == 0) -{ -obj* x_392; obj* x_393; obj* x_394; -lean::dec(x_389); -lean::dec(x_388); -lean::dec(x_8); -lean::dec(x_1); -x_392 = lean::cnstr_get(x_391, 0); -lean::inc(x_392); -if (lean::is_exclusive(x_391)) { - lean::cnstr_release(x_391, 0); - x_393 = x_391; -} else { - lean::dec_ref(x_391); - x_393 = lean::box(0); -} -if (lean::is_scalar(x_393)) { - x_394 = lean::alloc_cnstr(0, 1, 0); -} else { - x_394 = x_393; -} -lean::cnstr_set(x_394, 0, x_392); -return x_394; -} -else -{ -obj* x_395; obj* x_396; -x_395 = lean::cnstr_get(x_391, 0); -lean::inc(x_395); -lean::dec(x_391); -x_396 = lean::cnstr_get(x_8, 1); -lean::inc(x_396); -lean::dec(x_8); -if (lean::obj_tag(x_396) == 0) -{ -obj* x_397; -lean::dec(x_389); -x_397 = lean::cnstr_get(x_395, 1); -lean::inc(x_397); -lean::dec(x_395); -x_2 = x_388; -x_3 = x_397; -goto _start; -} -else -{ -obj* x_399; obj* x_400; -x_399 = lean::cnstr_get(x_396, 0); -lean::inc(x_399); -if (lean::is_exclusive(x_396)) { - lean::cnstr_release(x_396, 0); - x_400 = x_396; -} else { - lean::dec_ref(x_396); - x_400 = lean::box(0); -} -switch (lean::obj_tag(x_399)) { -case 0: -{ -obj* x_401; obj* x_402; -lean::dec(x_399); -lean::dec(x_389); -x_401 = lean::cnstr_get(x_395, 1); -lean::inc(x_401); -lean::dec(x_395); -x_402 = l___private_init_lean_expander_1__popStxArg(x_401, x_4); -if (lean::obj_tag(x_402) == 0) -{ -obj* x_403; obj* x_404; obj* x_405; -lean::dec(x_400); -lean::dec(x_388); -lean::dec(x_1); -x_403 = lean::cnstr_get(x_402, 0); -lean::inc(x_403); -if (lean::is_exclusive(x_402)) { - lean::cnstr_release(x_402, 0); - x_404 = x_402; -} else { - lean::dec_ref(x_402); - x_404 = lean::box(0); -} -if (lean::is_scalar(x_404)) { - x_405 = lean::alloc_cnstr(0, 1, 0); -} else { - x_405 = x_404; -} -lean::cnstr_set(x_405, 0, x_403); -return x_405; -} -else -{ -obj* x_406; obj* x_407; obj* x_408; obj* x_409; obj* x_410; obj* x_411; obj* x_412; obj* x_413; obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; obj* x_422; -x_406 = lean::cnstr_get(x_402, 0); -lean::inc(x_406); -lean::dec(x_402); -x_407 = lean::cnstr_get(x_406, 1); -lean::inc(x_407); -x_408 = lean::cnstr_get(x_406, 0); -lean::inc(x_408); -lean::dec(x_406); -x_409 = lean::cnstr_get(x_407, 0); -lean::inc(x_409); -x_410 = lean::cnstr_get(x_407, 1); -lean::inc(x_410); -x_411 = lean::cnstr_get(x_407, 2); -lean::inc(x_411); -if (lean::is_exclusive(x_407)) { - lean::cnstr_release(x_407, 0); - lean::cnstr_release(x_407, 1); - lean::cnstr_release(x_407, 2); - lean::cnstr_release(x_407, 3); - x_412 = x_407; -} else { - lean::dec_ref(x_407); - x_412 = lean::box(0); -} -x_413 = l_Lean_Parser_Term_binderIdent_HasView; -x_414 = lean::cnstr_get(x_413, 0); -lean::inc(x_414); -x_415 = lean::apply_1(x_414, x_408); -x_416 = lean::box(0); -x_417 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_417, 0, x_415); -lean::cnstr_set(x_417, 1, x_416); -x_418 = lean::box(0); -x_419 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_419, 0, x_417); -lean::cnstr_set(x_419, 1, x_418); -x_420 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_420, 0, x_419); -if (lean::is_scalar(x_400)) { - x_421 = lean::alloc_cnstr(1, 1, 0); -} else { - x_421 = x_400; -} -lean::cnstr_set(x_421, 0, x_420); -if (lean::is_scalar(x_412)) { - x_422 = lean::alloc_cnstr(0, 4, 0); -} else { - x_422 = x_412; -} -lean::cnstr_set(x_422, 0, x_409); -lean::cnstr_set(x_422, 1, x_410); -lean::cnstr_set(x_422, 2, x_411); -lean::cnstr_set(x_422, 3, x_421); -x_2 = x_388; -x_3 = x_422; -goto _start; -} -} -case 1: -{ -obj* x_424; obj* x_425; -lean::dec(x_399); -lean::dec(x_389); -x_424 = lean::cnstr_get(x_395, 1); -lean::inc(x_424); -lean::dec(x_395); -x_425 = l___private_init_lean_expander_1__popStxArg(x_424, x_4); -if (lean::obj_tag(x_425) == 0) -{ -obj* x_426; obj* x_427; obj* x_428; -lean::dec(x_400); -lean::dec(x_388); -lean::dec(x_1); -x_426 = lean::cnstr_get(x_425, 0); -lean::inc(x_426); -if (lean::is_exclusive(x_425)) { - lean::cnstr_release(x_425, 0); - x_427 = x_425; -} else { - lean::dec_ref(x_425); - x_427 = lean::box(0); -} -if (lean::is_scalar(x_427)) { - x_428 = lean::alloc_cnstr(0, 1, 0); -} else { - x_428 = x_427; -} -lean::cnstr_set(x_428, 0, x_426); -return x_428; -} -else -{ -obj* x_429; obj* x_430; obj* x_431; obj* x_432; obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; -x_429 = lean::cnstr_get(x_425, 0); -lean::inc(x_429); -lean::dec(x_425); -x_430 = lean::cnstr_get(x_429, 1); -lean::inc(x_430); -x_431 = lean::cnstr_get(x_429, 0); -lean::inc(x_431); -lean::dec(x_429); -x_432 = lean::cnstr_get(x_430, 0); -lean::inc(x_432); -x_433 = lean::cnstr_get(x_430, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_430, 2); -lean::inc(x_434); -if (lean::is_exclusive(x_430)) { - lean::cnstr_release(x_430, 0); - lean::cnstr_release(x_430, 1); - lean::cnstr_release(x_430, 2); - lean::cnstr_release(x_430, 3); - x_435 = x_430; -} else { - lean::dec_ref(x_430); - x_435 = lean::box(0); -} -x_436 = l_Lean_Parser_Term_binders_HasView; -x_437 = lean::cnstr_get(x_436, 0); -lean::inc(x_437); -x_438 = lean::apply_1(x_437, x_431); -if (lean::is_scalar(x_400)) { - x_439 = lean::alloc_cnstr(1, 1, 0); -} else { - x_439 = x_400; -} -lean::cnstr_set(x_439, 0, x_438); -if (lean::is_scalar(x_435)) { - x_440 = lean::alloc_cnstr(0, 4, 0); -} else { - x_440 = x_435; -} -lean::cnstr_set(x_440, 0, x_432); -lean::cnstr_set(x_440, 1, x_433); -lean::cnstr_set(x_440, 2, x_434); -lean::cnstr_set(x_440, 3, x_439); -x_2 = x_388; -x_3 = x_440; -goto _start; -} -} -default: -{ -obj* x_442; obj* x_443; -lean::dec(x_400); -x_442 = lean::cnstr_get(x_399, 0); -lean::inc(x_442); -lean::dec(x_399); -x_443 = lean::cnstr_get(x_442, 1); -lean::inc(x_443); -if (lean::obj_tag(x_443) == 0) -{ -obj* x_444; obj* x_445; obj* x_446; -lean::dec(x_389); -x_444 = lean::cnstr_get(x_395, 1); -lean::inc(x_444); -lean::dec(x_395); -x_445 = lean::cnstr_get(x_442, 0); -lean::inc(x_445); -lean::dec(x_442); -x_446 = l___private_init_lean_expander_1__popStxArg(x_444, x_4); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; -lean::dec(x_445); -lean::dec(x_388); -lean::dec(x_1); -x_447 = lean::cnstr_get(x_446, 0); -lean::inc(x_447); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - x_448 = x_446; -} else { - lean::dec_ref(x_446); - x_448 = lean::box(0); -} -if (lean::is_scalar(x_448)) { - x_449 = lean::alloc_cnstr(0, 1, 0); -} else { - x_449 = x_448; -} -lean::cnstr_set(x_449, 0, x_447); -return x_449; -} -else -{ -obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; -x_450 = lean::cnstr_get(x_446, 0); -lean::inc(x_450); -lean::dec(x_446); -x_451 = lean::cnstr_get(x_450, 1); -lean::inc(x_451); -x_452 = lean::cnstr_get(x_450, 0); -lean::inc(x_452); -if (lean::is_exclusive(x_450)) { - lean::cnstr_release(x_450, 0); - lean::cnstr_release(x_450, 1); - x_453 = x_450; -} else { - lean::dec_ref(x_450); - x_453 = lean::box(0); -} -x_454 = lean::cnstr_get(x_451, 0); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_451, 1); -lean::inc(x_455); -x_456 = lean::cnstr_get(x_451, 2); -lean::inc(x_456); -x_457 = lean::cnstr_get(x_451, 3); -lean::inc(x_457); -if (lean::is_exclusive(x_451)) { - lean::cnstr_release(x_451, 0); - lean::cnstr_release(x_451, 1); - lean::cnstr_release(x_451, 2); - lean::cnstr_release(x_451, 3); - x_458 = x_451; -} else { - lean::dec_ref(x_451); - x_458 = lean::box(0); -} -if (lean::is_scalar(x_453)) { - x_459 = lean::alloc_cnstr(0, 2, 0); -} else { - x_459 = x_453; -} -lean::cnstr_set(x_459, 0, x_445); -lean::cnstr_set(x_459, 1, x_452); -x_460 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_460, 0, x_459); -lean::cnstr_set(x_460, 1, x_456); -if (lean::is_scalar(x_458)) { - x_461 = lean::alloc_cnstr(0, 4, 0); -} else { - x_461 = x_458; -} -lean::cnstr_set(x_461, 0, x_454); -lean::cnstr_set(x_461, 1, x_455); -lean::cnstr_set(x_461, 2, x_460); -lean::cnstr_set(x_461, 3, x_457); -x_2 = x_388; -x_3 = x_461; -goto _start; -} -} -else -{ -obj* x_463; obj* x_464; -x_463 = lean::cnstr_get(x_443, 0); -lean::inc(x_463); -lean::dec(x_443); -x_464 = lean::cnstr_get(x_463, 1); -lean::inc(x_464); -lean::dec(x_463); -switch (lean::obj_tag(x_464)) { -case 0: -{ -obj* x_465; obj* x_466; obj* x_467; -lean::dec(x_464); -lean::dec(x_389); -x_465 = lean::cnstr_get(x_395, 1); -lean::inc(x_465); -lean::dec(x_395); -x_466 = lean::cnstr_get(x_442, 0); -lean::inc(x_466); -lean::dec(x_442); -x_467 = l___private_init_lean_expander_1__popStxArg(x_465, x_4); -if (lean::obj_tag(x_467) == 0) -{ -obj* x_468; obj* x_469; obj* x_470; -lean::dec(x_466); -lean::dec(x_388); -lean::dec(x_1); -x_468 = lean::cnstr_get(x_467, 0); -lean::inc(x_468); -if (lean::is_exclusive(x_467)) { - lean::cnstr_release(x_467, 0); - x_469 = x_467; -} else { - lean::dec_ref(x_467); - x_469 = lean::box(0); -} -if (lean::is_scalar(x_469)) { - x_470 = lean::alloc_cnstr(0, 1, 0); -} else { - x_470 = x_469; -} -lean::cnstr_set(x_470, 0, x_468); -return x_470; -} -else -{ -obj* x_471; obj* x_472; obj* x_473; obj* x_474; obj* x_475; obj* x_476; obj* x_477; obj* x_478; obj* x_479; obj* x_480; obj* x_481; obj* x_482; -x_471 = lean::cnstr_get(x_467, 0); -lean::inc(x_471); -lean::dec(x_467); -x_472 = lean::cnstr_get(x_471, 1); -lean::inc(x_472); -x_473 = lean::cnstr_get(x_471, 0); -lean::inc(x_473); -if (lean::is_exclusive(x_471)) { - lean::cnstr_release(x_471, 0); - lean::cnstr_release(x_471, 1); - x_474 = x_471; -} else { - lean::dec_ref(x_471); - x_474 = lean::box(0); -} -x_475 = lean::cnstr_get(x_472, 0); -lean::inc(x_475); -x_476 = lean::cnstr_get(x_472, 1); -lean::inc(x_476); -x_477 = lean::cnstr_get(x_472, 2); -lean::inc(x_477); -x_478 = lean::cnstr_get(x_472, 3); -lean::inc(x_478); -if (lean::is_exclusive(x_472)) { - lean::cnstr_release(x_472, 0); - lean::cnstr_release(x_472, 1); - lean::cnstr_release(x_472, 2); - lean::cnstr_release(x_472, 3); - x_479 = x_472; -} else { - lean::dec_ref(x_472); - x_479 = lean::box(0); -} -if (lean::is_scalar(x_474)) { - x_480 = lean::alloc_cnstr(0, 2, 0); -} else { - x_480 = x_474; -} -lean::cnstr_set(x_480, 0, x_466); -lean::cnstr_set(x_480, 1, x_473); -x_481 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_481, 0, x_480); -lean::cnstr_set(x_481, 1, x_477); -if (lean::is_scalar(x_479)) { - x_482 = lean::alloc_cnstr(0, 4, 0); -} else { - x_482 = x_479; -} -lean::cnstr_set(x_482, 0, x_475); -lean::cnstr_set(x_482, 1, x_476); -lean::cnstr_set(x_482, 2, x_481); -lean::cnstr_set(x_482, 3, x_478); -x_2 = x_388; -x_3 = x_482; -goto _start; -} -} -case 2: -{ -obj* x_484; obj* x_485; obj* x_486; obj* x_487; -x_484 = lean::cnstr_get(x_395, 1); -lean::inc(x_484); -lean::dec(x_395); -x_485 = lean::cnstr_get(x_442, 0); -lean::inc(x_485); -lean::dec(x_442); -x_486 = lean::cnstr_get(x_464, 0); -lean::inc(x_486); -lean::dec(x_464); -x_487 = l___private_init_lean_expander_1__popStxArg(x_484, x_4); -if (lean::obj_tag(x_487) == 0) -{ -obj* x_488; obj* x_489; obj* x_490; -lean::dec(x_486); -lean::dec(x_485); -lean::dec(x_389); -lean::dec(x_388); -lean::dec(x_1); -x_488 = lean::cnstr_get(x_487, 0); -lean::inc(x_488); -if (lean::is_exclusive(x_487)) { - lean::cnstr_release(x_487, 0); - x_489 = x_487; -} else { - lean::dec_ref(x_487); - x_489 = lean::box(0); -} -if (lean::is_scalar(x_489)) { - x_490 = lean::alloc_cnstr(0, 1, 0); -} else { - x_490 = x_489; -} -lean::cnstr_set(x_490, 0, x_488); -return x_490; -} -else -{ -obj* x_491; obj* x_492; obj* x_493; -x_491 = lean::cnstr_get(x_487, 0); -lean::inc(x_491); -lean::dec(x_487); -x_492 = lean::cnstr_get(x_491, 1); -lean::inc(x_492); -x_493 = lean::cnstr_get(x_492, 3); -lean::inc(x_493); -if (lean::obj_tag(x_493) == 0) -{ -obj* x_494; -lean::dec(x_491); -lean::dec(x_486); -lean::dec(x_485); -x_494 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_389, x_390, x_492, x_4); -lean::dec(x_492); -lean::dec(x_389); -if (lean::obj_tag(x_494) == 0) -{ -obj* x_495; obj* x_496; obj* x_497; -lean::dec(x_388); -lean::dec(x_1); -x_495 = lean::cnstr_get(x_494, 0); -lean::inc(x_495); -if (lean::is_exclusive(x_494)) { - lean::cnstr_release(x_494, 0); - x_496 = x_494; -} else { - lean::dec_ref(x_494); - x_496 = lean::box(0); -} -if (lean::is_scalar(x_496)) { - x_497 = lean::alloc_cnstr(0, 1, 0); -} else { - x_497 = x_496; -} -lean::cnstr_set(x_497, 0, x_495); -return x_497; -} -else -{ -obj* x_498; obj* x_499; -x_498 = lean::cnstr_get(x_494, 0); -lean::inc(x_498); -lean::dec(x_494); -x_499 = lean::cnstr_get(x_498, 1); -lean::inc(x_499); -lean::dec(x_498); -x_2 = x_388; -x_3 = x_499; -goto _start; -} -} -else -{ -obj* x_501; obj* x_502; obj* x_503; obj* x_504; obj* x_505; obj* x_506; obj* x_507; obj* x_508; obj* x_509; obj* x_510; obj* x_511; obj* x_512; obj* x_513; obj* x_514; obj* x_515; obj* x_516; obj* x_517; obj* x_518; obj* x_519; obj* x_520; obj* x_521; obj* x_522; obj* x_523; obj* x_524; obj* x_525; obj* x_526; obj* x_527; obj* x_528; obj* x_529; obj* x_530; -lean::dec(x_389); -x_501 = lean::cnstr_get(x_491, 0); -lean::inc(x_501); -if (lean::is_exclusive(x_491)) { - lean::cnstr_release(x_491, 0); - lean::cnstr_release(x_491, 1); - x_502 = x_491; -} else { - lean::dec_ref(x_491); - x_502 = lean::box(0); -} -x_503 = lean::cnstr_get(x_492, 0); -lean::inc(x_503); -x_504 = lean::cnstr_get(x_492, 1); -lean::inc(x_504); -x_505 = lean::cnstr_get(x_492, 2); -lean::inc(x_505); -if (lean::is_exclusive(x_492)) { - lean::cnstr_release(x_492, 0); - lean::cnstr_release(x_492, 1); - lean::cnstr_release(x_492, 2); - lean::cnstr_release(x_492, 3); - x_506 = x_492; -} else { - lean::dec_ref(x_492); - x_506 = lean::box(0); -} -x_507 = lean::cnstr_get(x_493, 0); -lean::inc(x_507); -x_508 = l_Lean_Parser_Term_lambda_HasView; -x_509 = lean::cnstr_get(x_508, 1); -lean::inc(x_509); -x_510 = lean::box(0); -x_511 = lean::cnstr_get(x_486, 3); -lean::inc(x_511); -x_512 = lean::box(0); -x_513 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_513, 0, x_511); -lean::cnstr_set(x_513, 1, x_512); -x_514 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_513); -x_515 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_515, 0, x_514); -lean::cnstr_set(x_515, 1, x_510); -x_516 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_516, 0, x_515); -x_517 = lean::cnstr_get(x_486, 5); -lean::inc(x_517); -lean::dec(x_486); -x_518 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_519 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_520 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_520, 0, x_518); -lean::cnstr_set(x_520, 1, x_516); -lean::cnstr_set(x_520, 2, x_519); -lean::cnstr_set(x_520, 3, x_517); -lean::inc(x_509); -x_521 = lean::apply_1(x_509, x_520); -x_522 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_522, 0, x_518); -lean::cnstr_set(x_522, 1, x_507); -lean::cnstr_set(x_522, 2, x_519); -lean::cnstr_set(x_522, 3, x_501); -x_523 = lean::apply_1(x_509, x_522); -x_524 = l_Lean_Parser_Term_app_HasView; -x_525 = lean::cnstr_get(x_524, 1); -lean::inc(x_525); -x_526 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_526, 0, x_521); -lean::cnstr_set(x_526, 1, x_523); -x_527 = lean::apply_1(x_525, x_526); -if (lean::is_scalar(x_502)) { - x_528 = lean::alloc_cnstr(0, 2, 0); -} else { - x_528 = x_502; -} -lean::cnstr_set(x_528, 0, x_485); -lean::cnstr_set(x_528, 1, x_527); -x_529 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_529, 0, x_528); -lean::cnstr_set(x_529, 1, x_505); -if (lean::is_scalar(x_506)) { - x_530 = lean::alloc_cnstr(0, 4, 0); -} else { - x_530 = x_506; -} -lean::cnstr_set(x_530, 0, x_503); -lean::cnstr_set(x_530, 1, x_504); -lean::cnstr_set(x_530, 2, x_529); -lean::cnstr_set(x_530, 3, x_493); -x_2 = x_388; -x_3 = x_530; -goto _start; -} -} -} -default: -{ -obj* x_532; obj* x_533; obj* x_534; -lean::dec(x_464); -lean::dec(x_442); -x_532 = lean::cnstr_get(x_395, 1); -lean::inc(x_532); -lean::dec(x_395); -x_533 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_534 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_389, x_533, x_532, x_4); -lean::dec(x_532); -lean::dec(x_389); -if (lean::obj_tag(x_534) == 0) -{ -obj* x_535; obj* x_536; obj* x_537; -lean::dec(x_388); -lean::dec(x_1); -x_535 = lean::cnstr_get(x_534, 0); -lean::inc(x_535); -if (lean::is_exclusive(x_534)) { - lean::cnstr_release(x_534, 0); - x_536 = x_534; -} else { - lean::dec_ref(x_534); - x_536 = lean::box(0); -} -if (lean::is_scalar(x_536)) { - x_537 = lean::alloc_cnstr(0, 1, 0); -} else { - x_537 = x_536; -} -lean::cnstr_set(x_537, 0, x_535); -return x_537; -} -else -{ -obj* x_538; obj* x_539; -x_538 = lean::cnstr_get(x_534, 0); -lean::inc(x_538); -lean::dec(x_534); -x_539 = lean::cnstr_get(x_538, 1); -lean::inc(x_539); -lean::dec(x_538); -x_2 = x_388; -x_3 = x_539; -goto _start; -} -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_541; -lean::dec(x_10); -x_541 = !lean::is_exclusive(x_2); -if (x_541 == 0) -{ -obj* x_542; obj* x_543; obj* x_544; -x_542 = lean::cnstr_get(x_2, 1); -x_543 = lean::cnstr_get(x_2, 0); -lean::dec(x_543); -x_544 = l___private_init_lean_expander_1__popStxArg(x_3, x_4); -if (lean::obj_tag(x_544) == 0) -{ -uint8 x_545; -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_8); -lean::dec(x_1); -x_545 = !lean::is_exclusive(x_544); -if (x_545 == 0) -{ -return x_544; -} -else -{ -obj* x_546; obj* x_547; -x_546 = lean::cnstr_get(x_544, 0); -lean::inc(x_546); -lean::dec(x_544); -x_547 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_547, 0, x_546); -return x_547; -} -} -else -{ -obj* x_548; obj* x_549; -x_548 = lean::cnstr_get(x_544, 0); -lean::inc(x_548); -lean::dec(x_544); -x_549 = lean::cnstr_get(x_8, 1); -lean::inc(x_549); -lean::dec(x_8); -if (lean::obj_tag(x_549) == 0) -{ -obj* x_550; -lean::free_heap_obj(x_2); -x_550 = lean::cnstr_get(x_548, 1); -lean::inc(x_550); -lean::dec(x_548); -x_2 = x_542; -x_3 = x_550; -goto _start; -} -else -{ -uint8 x_552; -x_552 = !lean::is_exclusive(x_549); -if (x_552 == 0) -{ -obj* x_553; -x_553 = lean::cnstr_get(x_549, 0); -switch (lean::obj_tag(x_553)) { -case 0: -{ -obj* x_554; obj* x_555; -lean::dec(x_553); -x_554 = lean::cnstr_get(x_548, 1); -lean::inc(x_554); -lean::dec(x_548); -x_555 = l___private_init_lean_expander_1__popStxArg(x_554, x_4); -if (lean::obj_tag(x_555) == 0) -{ -uint8 x_556; -lean::free_heap_obj(x_549); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_556 = !lean::is_exclusive(x_555); -if (x_556 == 0) -{ -return x_555; -} -else -{ -obj* x_557; obj* x_558; -x_557 = lean::cnstr_get(x_555, 0); -lean::inc(x_557); -lean::dec(x_555); -x_558 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_558, 0, x_557); -return x_558; -} -} -else -{ -obj* x_559; obj* x_560; obj* x_561; uint8 x_562; -x_559 = lean::cnstr_get(x_555, 0); -lean::inc(x_559); -lean::dec(x_555); -x_560 = lean::cnstr_get(x_559, 1); -lean::inc(x_560); -x_561 = lean::cnstr_get(x_559, 0); -lean::inc(x_561); -lean::dec(x_559); -x_562 = !lean::is_exclusive(x_560); -if (x_562 == 0) -{ -obj* x_563; obj* x_564; obj* x_565; obj* x_566; obj* x_567; obj* x_568; obj* x_569; obj* x_570; -x_563 = lean::cnstr_get(x_560, 3); -lean::dec(x_563); -x_564 = l_Lean_Parser_Term_binderIdent_HasView; -x_565 = lean::cnstr_get(x_564, 0); -lean::inc(x_565); -x_566 = lean::apply_1(x_565, x_561); -x_567 = lean::box(0); -lean::cnstr_set(x_2, 1, x_567); -lean::cnstr_set(x_2, 0, x_566); -x_568 = lean::box(0); -x_569 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_569, 0, x_2); -lean::cnstr_set(x_569, 1, x_568); -x_570 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_570, 0, x_569); -lean::cnstr_set(x_549, 0, x_570); -lean::cnstr_set(x_560, 3, x_549); -x_2 = x_542; -x_3 = x_560; -goto _start; -} -else -{ -obj* x_572; obj* x_573; obj* x_574; obj* x_575; obj* x_576; obj* x_577; obj* x_578; obj* x_579; obj* x_580; obj* x_581; obj* x_582; -x_572 = lean::cnstr_get(x_560, 0); -x_573 = lean::cnstr_get(x_560, 1); -x_574 = lean::cnstr_get(x_560, 2); -lean::inc(x_574); -lean::inc(x_573); -lean::inc(x_572); -lean::dec(x_560); -x_575 = l_Lean_Parser_Term_binderIdent_HasView; -x_576 = lean::cnstr_get(x_575, 0); -lean::inc(x_576); -x_577 = lean::apply_1(x_576, x_561); -x_578 = lean::box(0); -lean::cnstr_set(x_2, 1, x_578); -lean::cnstr_set(x_2, 0, x_577); -x_579 = lean::box(0); -x_580 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_580, 0, x_2); -lean::cnstr_set(x_580, 1, x_579); -x_581 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_581, 0, x_580); -lean::cnstr_set(x_549, 0, x_581); -x_582 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_582, 0, x_572); -lean::cnstr_set(x_582, 1, x_573); -lean::cnstr_set(x_582, 2, x_574); -lean::cnstr_set(x_582, 3, x_549); -x_2 = x_542; -x_3 = x_582; -goto _start; -} -} -} -case 1: -{ -obj* x_584; obj* x_585; -lean::dec(x_553); -lean::free_heap_obj(x_2); -x_584 = lean::cnstr_get(x_548, 1); -lean::inc(x_584); -lean::dec(x_548); -x_585 = l___private_init_lean_expander_1__popStxArg(x_584, x_4); -if (lean::obj_tag(x_585) == 0) -{ -uint8 x_586; -lean::free_heap_obj(x_549); -lean::dec(x_542); -lean::dec(x_1); -x_586 = !lean::is_exclusive(x_585); -if (x_586 == 0) -{ -return x_585; -} -else -{ -obj* x_587; obj* x_588; -x_587 = lean::cnstr_get(x_585, 0); -lean::inc(x_587); -lean::dec(x_585); -x_588 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_588, 0, x_587); -return x_588; -} -} -else -{ -obj* x_589; obj* x_590; obj* x_591; uint8 x_592; -x_589 = lean::cnstr_get(x_585, 0); -lean::inc(x_589); -lean::dec(x_585); -x_590 = lean::cnstr_get(x_589, 1); -lean::inc(x_590); -x_591 = lean::cnstr_get(x_589, 0); -lean::inc(x_591); -lean::dec(x_589); -x_592 = !lean::is_exclusive(x_590); -if (x_592 == 0) -{ -obj* x_593; obj* x_594; obj* x_595; obj* x_596; -x_593 = lean::cnstr_get(x_590, 3); -lean::dec(x_593); -x_594 = l_Lean_Parser_Term_binders_HasView; -x_595 = lean::cnstr_get(x_594, 0); -lean::inc(x_595); -x_596 = lean::apply_1(x_595, x_591); -lean::cnstr_set(x_549, 0, x_596); -lean::cnstr_set(x_590, 3, x_549); -x_2 = x_542; -x_3 = x_590; -goto _start; -} -else -{ -obj* x_598; obj* x_599; obj* x_600; obj* x_601; obj* x_602; obj* x_603; obj* x_604; -x_598 = lean::cnstr_get(x_590, 0); -x_599 = lean::cnstr_get(x_590, 1); -x_600 = lean::cnstr_get(x_590, 2); -lean::inc(x_600); -lean::inc(x_599); -lean::inc(x_598); -lean::dec(x_590); -x_601 = l_Lean_Parser_Term_binders_HasView; -x_602 = lean::cnstr_get(x_601, 0); -lean::inc(x_602); -x_603 = lean::apply_1(x_602, x_591); -lean::cnstr_set(x_549, 0, x_603); -x_604 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_604, 0, x_598); -lean::cnstr_set(x_604, 1, x_599); -lean::cnstr_set(x_604, 2, x_600); -lean::cnstr_set(x_604, 3, x_549); -x_2 = x_542; -x_3 = x_604; -goto _start; -} -} -} -default: -{ -obj* x_606; obj* x_607; -lean::free_heap_obj(x_549); -x_606 = lean::cnstr_get(x_553, 0); -lean::inc(x_606); -lean::dec(x_553); -x_607 = lean::cnstr_get(x_606, 1); -lean::inc(x_607); -if (lean::obj_tag(x_607) == 0) -{ -obj* x_608; obj* x_609; obj* x_610; -x_608 = lean::cnstr_get(x_548, 1); -lean::inc(x_608); -lean::dec(x_548); -x_609 = lean::cnstr_get(x_606, 0); -lean::inc(x_609); -lean::dec(x_606); -x_610 = l___private_init_lean_expander_1__popStxArg(x_608, x_4); -if (lean::obj_tag(x_610) == 0) -{ -uint8 x_611; -lean::dec(x_609); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_611 = !lean::is_exclusive(x_610); -if (x_611 == 0) -{ -return x_610; -} -else -{ -obj* x_612; obj* x_613; -x_612 = lean::cnstr_get(x_610, 0); -lean::inc(x_612); -lean::dec(x_610); -x_613 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_613, 0, x_612); -return x_613; -} -} -else -{ -obj* x_614; uint8 x_615; -x_614 = lean::cnstr_get(x_610, 0); -lean::inc(x_614); -lean::dec(x_610); -x_615 = !lean::is_exclusive(x_614); -if (x_615 == 0) -{ -obj* x_616; uint8 x_617; -x_616 = lean::cnstr_get(x_614, 1); -x_617 = !lean::is_exclusive(x_616); -if (x_617 == 0) -{ -obj* x_618; obj* x_619; -x_618 = lean::cnstr_get(x_614, 0); -x_619 = lean::cnstr_get(x_616, 2); -lean::cnstr_set(x_614, 1, x_618); -lean::cnstr_set(x_614, 0, x_609); -lean::cnstr_set(x_2, 1, x_619); -lean::cnstr_set(x_2, 0, x_614); -lean::cnstr_set(x_616, 2, x_2); -x_2 = x_542; -x_3 = x_616; -goto _start; -} -else -{ -obj* x_621; obj* x_622; obj* x_623; obj* x_624; obj* x_625; obj* x_626; -x_621 = lean::cnstr_get(x_614, 0); -x_622 = lean::cnstr_get(x_616, 0); -x_623 = lean::cnstr_get(x_616, 1); -x_624 = lean::cnstr_get(x_616, 2); -x_625 = lean::cnstr_get(x_616, 3); -lean::inc(x_625); -lean::inc(x_624); -lean::inc(x_623); -lean::inc(x_622); -lean::dec(x_616); -lean::cnstr_set(x_614, 1, x_621); -lean::cnstr_set(x_614, 0, x_609); -lean::cnstr_set(x_2, 1, x_624); -lean::cnstr_set(x_2, 0, x_614); -x_626 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_626, 0, x_622); -lean::cnstr_set(x_626, 1, x_623); -lean::cnstr_set(x_626, 2, x_2); -lean::cnstr_set(x_626, 3, x_625); -x_2 = x_542; -x_3 = x_626; -goto _start; -} -} -else -{ -obj* x_628; obj* x_629; obj* x_630; obj* x_631; obj* x_632; obj* x_633; obj* x_634; obj* x_635; obj* x_636; -x_628 = lean::cnstr_get(x_614, 1); -x_629 = lean::cnstr_get(x_614, 0); -lean::inc(x_628); -lean::inc(x_629); -lean::dec(x_614); -x_630 = lean::cnstr_get(x_628, 0); -lean::inc(x_630); -x_631 = lean::cnstr_get(x_628, 1); -lean::inc(x_631); -x_632 = lean::cnstr_get(x_628, 2); -lean::inc(x_632); -x_633 = lean::cnstr_get(x_628, 3); -lean::inc(x_633); -if (lean::is_exclusive(x_628)) { - lean::cnstr_release(x_628, 0); - lean::cnstr_release(x_628, 1); - lean::cnstr_release(x_628, 2); - lean::cnstr_release(x_628, 3); - x_634 = x_628; -} else { - lean::dec_ref(x_628); - x_634 = lean::box(0); -} -x_635 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_635, 0, x_609); -lean::cnstr_set(x_635, 1, x_629); -lean::cnstr_set(x_2, 1, x_632); -lean::cnstr_set(x_2, 0, x_635); -if (lean::is_scalar(x_634)) { - x_636 = lean::alloc_cnstr(0, 4, 0); -} else { - x_636 = x_634; -} -lean::cnstr_set(x_636, 0, x_630); -lean::cnstr_set(x_636, 1, x_631); -lean::cnstr_set(x_636, 2, x_2); -lean::cnstr_set(x_636, 3, x_633); -x_2 = x_542; -x_3 = x_636; -goto _start; -} -} -} -else -{ -uint8 x_638; -x_638 = !lean::is_exclusive(x_607); -if (x_638 == 0) -{ -obj* x_639; obj* x_640; -x_639 = lean::cnstr_get(x_607, 0); -x_640 = lean::cnstr_get(x_639, 1); -lean::inc(x_640); -lean::dec(x_639); -switch (lean::obj_tag(x_640)) { -case 0: -{ -obj* x_641; obj* x_642; obj* x_643; -lean::dec(x_640); -lean::free_heap_obj(x_607); -x_641 = lean::cnstr_get(x_548, 1); -lean::inc(x_641); -lean::dec(x_548); -x_642 = lean::cnstr_get(x_606, 0); -lean::inc(x_642); -lean::dec(x_606); -x_643 = l___private_init_lean_expander_1__popStxArg(x_641, x_4); -if (lean::obj_tag(x_643) == 0) -{ -uint8 x_644; -lean::dec(x_642); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_644 = !lean::is_exclusive(x_643); -if (x_644 == 0) -{ -return x_643; -} -else -{ -obj* x_645; obj* x_646; -x_645 = lean::cnstr_get(x_643, 0); -lean::inc(x_645); -lean::dec(x_643); -x_646 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_646, 0, x_645); -return x_646; -} -} -else -{ -obj* x_647; uint8 x_648; -x_647 = lean::cnstr_get(x_643, 0); -lean::inc(x_647); -lean::dec(x_643); -x_648 = !lean::is_exclusive(x_647); -if (x_648 == 0) -{ -obj* x_649; uint8 x_650; -x_649 = lean::cnstr_get(x_647, 1); -x_650 = !lean::is_exclusive(x_649); -if (x_650 == 0) -{ -obj* x_651; obj* x_652; -x_651 = lean::cnstr_get(x_647, 0); -x_652 = lean::cnstr_get(x_649, 2); -lean::cnstr_set(x_647, 1, x_651); -lean::cnstr_set(x_647, 0, x_642); -lean::cnstr_set(x_2, 1, x_652); -lean::cnstr_set(x_2, 0, x_647); -lean::cnstr_set(x_649, 2, x_2); -x_2 = x_542; -x_3 = x_649; -goto _start; -} -else -{ -obj* x_654; obj* x_655; obj* x_656; obj* x_657; obj* x_658; obj* x_659; -x_654 = lean::cnstr_get(x_647, 0); -x_655 = lean::cnstr_get(x_649, 0); -x_656 = lean::cnstr_get(x_649, 1); -x_657 = lean::cnstr_get(x_649, 2); -x_658 = lean::cnstr_get(x_649, 3); -lean::inc(x_658); -lean::inc(x_657); -lean::inc(x_656); -lean::inc(x_655); -lean::dec(x_649); -lean::cnstr_set(x_647, 1, x_654); -lean::cnstr_set(x_647, 0, x_642); -lean::cnstr_set(x_2, 1, x_657); -lean::cnstr_set(x_2, 0, x_647); -x_659 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_659, 0, x_655); -lean::cnstr_set(x_659, 1, x_656); -lean::cnstr_set(x_659, 2, x_2); -lean::cnstr_set(x_659, 3, x_658); -x_2 = x_542; -x_3 = x_659; -goto _start; -} -} -else -{ -obj* x_661; obj* x_662; obj* x_663; obj* x_664; obj* x_665; obj* x_666; obj* x_667; obj* x_668; obj* x_669; -x_661 = lean::cnstr_get(x_647, 1); -x_662 = lean::cnstr_get(x_647, 0); -lean::inc(x_661); -lean::inc(x_662); -lean::dec(x_647); -x_663 = lean::cnstr_get(x_661, 0); -lean::inc(x_663); -x_664 = lean::cnstr_get(x_661, 1); -lean::inc(x_664); -x_665 = lean::cnstr_get(x_661, 2); -lean::inc(x_665); -x_666 = lean::cnstr_get(x_661, 3); -lean::inc(x_666); -if (lean::is_exclusive(x_661)) { - lean::cnstr_release(x_661, 0); - lean::cnstr_release(x_661, 1); - lean::cnstr_release(x_661, 2); - lean::cnstr_release(x_661, 3); - x_667 = x_661; -} else { - lean::dec_ref(x_661); - x_667 = lean::box(0); -} -x_668 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_668, 0, x_642); -lean::cnstr_set(x_668, 1, x_662); -lean::cnstr_set(x_2, 1, x_665); -lean::cnstr_set(x_2, 0, x_668); -if (lean::is_scalar(x_667)) { - x_669 = lean::alloc_cnstr(0, 4, 0); -} else { - x_669 = x_667; -} -lean::cnstr_set(x_669, 0, x_663); -lean::cnstr_set(x_669, 1, x_664); -lean::cnstr_set(x_669, 2, x_2); -lean::cnstr_set(x_669, 3, x_666); -x_2 = x_542; -x_3 = x_669; -goto _start; -} -} -} -case 2: -{ -obj* x_671; obj* x_672; obj* x_673; obj* x_674; -x_671 = lean::cnstr_get(x_548, 1); -lean::inc(x_671); -lean::dec(x_548); -x_672 = lean::cnstr_get(x_606, 0); -lean::inc(x_672); -lean::dec(x_606); -x_673 = lean::cnstr_get(x_640, 0); -lean::inc(x_673); -lean::dec(x_640); -x_674 = l___private_init_lean_expander_1__popStxArg(x_671, x_4); -if (lean::obj_tag(x_674) == 0) -{ -uint8 x_675; -lean::dec(x_673); -lean::dec(x_672); -lean::free_heap_obj(x_607); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_675 = !lean::is_exclusive(x_674); -if (x_675 == 0) -{ -return x_674; -} -else -{ -obj* x_676; obj* x_677; -x_676 = lean::cnstr_get(x_674, 0); -lean::inc(x_676); -lean::dec(x_674); -x_677 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_677, 0, x_676); -return x_677; -} -} -else -{ -obj* x_678; obj* x_679; obj* x_680; -x_678 = lean::cnstr_get(x_674, 0); -lean::inc(x_678); -lean::dec(x_674); -x_679 = lean::cnstr_get(x_678, 1); -lean::inc(x_679); -x_680 = lean::cnstr_get(x_679, 3); -lean::inc(x_680); -if (lean::obj_tag(x_680) == 0) -{ -obj* x_681; obj* x_682; -lean::dec(x_678); -lean::dec(x_673); -lean::dec(x_672); -lean::free_heap_obj(x_2); -lean::inc(x_1); -lean::cnstr_set(x_607, 0, x_1); -x_681 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_682 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_607, x_681, x_679, x_4); -lean::dec(x_679); -lean::dec(x_607); -if (lean::obj_tag(x_682) == 0) -{ -uint8 x_683; -lean::dec(x_542); -lean::dec(x_1); -x_683 = !lean::is_exclusive(x_682); -if (x_683 == 0) -{ -return x_682; -} -else -{ -obj* x_684; obj* x_685; -x_684 = lean::cnstr_get(x_682, 0); -lean::inc(x_684); -lean::dec(x_682); -x_685 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_685, 0, x_684); -return x_685; -} -} -else -{ -obj* x_686; obj* x_687; -x_686 = lean::cnstr_get(x_682, 0); -lean::inc(x_686); -lean::dec(x_682); -x_687 = lean::cnstr_get(x_686, 1); -lean::inc(x_687); -lean::dec(x_686); -x_2 = x_542; -x_3 = x_687; -goto _start; -} -} -else -{ -uint8 x_689; -lean::free_heap_obj(x_607); -x_689 = !lean::is_exclusive(x_678); -if (x_689 == 0) -{ -obj* x_690; obj* x_691; uint8 x_692; -x_690 = lean::cnstr_get(x_678, 0); -x_691 = lean::cnstr_get(x_678, 1); -lean::dec(x_691); -x_692 = !lean::is_exclusive(x_679); -if (x_692 == 0) -{ -obj* x_693; obj* x_694; obj* x_695; obj* x_696; obj* x_697; obj* x_698; obj* x_699; obj* x_700; obj* x_701; obj* x_702; obj* x_703; obj* x_704; obj* x_705; obj* x_706; obj* x_707; obj* x_708; obj* x_709; obj* x_710; obj* x_711; obj* x_712; obj* x_713; obj* x_714; obj* x_715; -x_693 = lean::cnstr_get(x_679, 2); -x_694 = lean::cnstr_get(x_679, 3); -lean::dec(x_694); -x_695 = lean::cnstr_get(x_680, 0); -lean::inc(x_695); -x_696 = l_Lean_Parser_Term_lambda_HasView; -x_697 = lean::cnstr_get(x_696, 1); -lean::inc(x_697); -x_698 = lean::box(0); -x_699 = lean::cnstr_get(x_673, 3); -lean::inc(x_699); -x_700 = lean::box(0); -lean::cnstr_set(x_2, 1, x_700); -lean::cnstr_set(x_2, 0, x_699); -x_701 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_702 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_702, 0, x_701); -lean::cnstr_set(x_702, 1, x_698); -x_703 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_703, 0, x_702); -x_704 = lean::cnstr_get(x_673, 5); -lean::inc(x_704); -lean::dec(x_673); -x_705 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_706 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_707 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_707, 0, x_705); -lean::cnstr_set(x_707, 1, x_703); -lean::cnstr_set(x_707, 2, x_706); -lean::cnstr_set(x_707, 3, x_704); -lean::inc(x_697); -x_708 = lean::apply_1(x_697, x_707); -x_709 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_709, 0, x_705); -lean::cnstr_set(x_709, 1, x_695); -lean::cnstr_set(x_709, 2, x_706); -lean::cnstr_set(x_709, 3, x_690); -x_710 = lean::apply_1(x_697, x_709); -x_711 = l_Lean_Parser_Term_app_HasView; -x_712 = lean::cnstr_get(x_711, 1); -lean::inc(x_712); -x_713 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_713, 0, x_708); -lean::cnstr_set(x_713, 1, x_710); -x_714 = lean::apply_1(x_712, x_713); -lean::cnstr_set(x_678, 1, x_714); -lean::cnstr_set(x_678, 0, x_672); -x_715 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_715, 0, x_678); -lean::cnstr_set(x_715, 1, x_693); -lean::cnstr_set(x_679, 2, x_715); -x_2 = x_542; -x_3 = x_679; -goto _start; -} -else -{ -obj* x_717; obj* x_718; obj* x_719; obj* x_720; obj* x_721; obj* x_722; obj* x_723; obj* x_724; obj* x_725; obj* x_726; obj* x_727; obj* x_728; obj* x_729; obj* x_730; obj* x_731; obj* x_732; obj* x_733; obj* x_734; obj* x_735; obj* x_736; obj* x_737; obj* x_738; obj* x_739; obj* x_740; obj* x_741; -x_717 = lean::cnstr_get(x_679, 0); -x_718 = lean::cnstr_get(x_679, 1); -x_719 = lean::cnstr_get(x_679, 2); -lean::inc(x_719); -lean::inc(x_718); -lean::inc(x_717); -lean::dec(x_679); -x_720 = lean::cnstr_get(x_680, 0); -lean::inc(x_720); -x_721 = l_Lean_Parser_Term_lambda_HasView; -x_722 = lean::cnstr_get(x_721, 1); -lean::inc(x_722); -x_723 = lean::box(0); -x_724 = lean::cnstr_get(x_673, 3); -lean::inc(x_724); -x_725 = lean::box(0); -lean::cnstr_set(x_2, 1, x_725); -lean::cnstr_set(x_2, 0, x_724); -x_726 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_727 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_727, 0, x_726); -lean::cnstr_set(x_727, 1, x_723); -x_728 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_728, 0, x_727); -x_729 = lean::cnstr_get(x_673, 5); -lean::inc(x_729); -lean::dec(x_673); -x_730 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_731 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_732 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_732, 0, x_730); -lean::cnstr_set(x_732, 1, x_728); -lean::cnstr_set(x_732, 2, x_731); -lean::cnstr_set(x_732, 3, x_729); -lean::inc(x_722); -x_733 = lean::apply_1(x_722, x_732); -x_734 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_734, 0, x_730); -lean::cnstr_set(x_734, 1, x_720); -lean::cnstr_set(x_734, 2, x_731); -lean::cnstr_set(x_734, 3, x_690); -x_735 = lean::apply_1(x_722, x_734); -x_736 = l_Lean_Parser_Term_app_HasView; -x_737 = lean::cnstr_get(x_736, 1); -lean::inc(x_737); -x_738 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_738, 0, x_733); -lean::cnstr_set(x_738, 1, x_735); -x_739 = lean::apply_1(x_737, x_738); -lean::cnstr_set(x_678, 1, x_739); -lean::cnstr_set(x_678, 0, x_672); -x_740 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_740, 0, x_678); -lean::cnstr_set(x_740, 1, x_719); -x_741 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_741, 0, x_717); -lean::cnstr_set(x_741, 1, x_718); -lean::cnstr_set(x_741, 2, x_740); -lean::cnstr_set(x_741, 3, x_680); -x_2 = x_542; -x_3 = x_741; -goto _start; -} -} -else -{ -obj* x_743; obj* x_744; obj* x_745; obj* x_746; obj* x_747; obj* x_748; obj* x_749; obj* x_750; obj* x_751; obj* x_752; obj* x_753; obj* x_754; obj* x_755; obj* x_756; obj* x_757; obj* x_758; obj* x_759; obj* x_760; obj* x_761; obj* x_762; obj* x_763; obj* x_764; obj* x_765; obj* x_766; obj* x_767; obj* x_768; obj* x_769; obj* x_770; -x_743 = lean::cnstr_get(x_678, 0); -lean::inc(x_743); -lean::dec(x_678); -x_744 = lean::cnstr_get(x_679, 0); -lean::inc(x_744); -x_745 = lean::cnstr_get(x_679, 1); -lean::inc(x_745); -x_746 = lean::cnstr_get(x_679, 2); -lean::inc(x_746); -if (lean::is_exclusive(x_679)) { - lean::cnstr_release(x_679, 0); - lean::cnstr_release(x_679, 1); - lean::cnstr_release(x_679, 2); - lean::cnstr_release(x_679, 3); - x_747 = x_679; -} else { - lean::dec_ref(x_679); - x_747 = lean::box(0); -} -x_748 = lean::cnstr_get(x_680, 0); -lean::inc(x_748); -x_749 = l_Lean_Parser_Term_lambda_HasView; -x_750 = lean::cnstr_get(x_749, 1); -lean::inc(x_750); -x_751 = lean::box(0); -x_752 = lean::cnstr_get(x_673, 3); -lean::inc(x_752); -x_753 = lean::box(0); -lean::cnstr_set(x_2, 1, x_753); -lean::cnstr_set(x_2, 0, x_752); -x_754 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_755 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_755, 0, x_754); -lean::cnstr_set(x_755, 1, x_751); -x_756 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_756, 0, x_755); -x_757 = lean::cnstr_get(x_673, 5); -lean::inc(x_757); -lean::dec(x_673); -x_758 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_759 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_760 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_760, 0, x_758); -lean::cnstr_set(x_760, 1, x_756); -lean::cnstr_set(x_760, 2, x_759); -lean::cnstr_set(x_760, 3, x_757); -lean::inc(x_750); -x_761 = lean::apply_1(x_750, x_760); -x_762 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_762, 0, x_758); -lean::cnstr_set(x_762, 1, x_748); -lean::cnstr_set(x_762, 2, x_759); -lean::cnstr_set(x_762, 3, x_743); -x_763 = lean::apply_1(x_750, x_762); -x_764 = l_Lean_Parser_Term_app_HasView; -x_765 = lean::cnstr_get(x_764, 1); -lean::inc(x_765); -x_766 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_766, 0, x_761); -lean::cnstr_set(x_766, 1, x_763); -x_767 = lean::apply_1(x_765, x_766); -x_768 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_768, 0, x_672); -lean::cnstr_set(x_768, 1, x_767); -x_769 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_769, 0, x_768); -lean::cnstr_set(x_769, 1, x_746); -if (lean::is_scalar(x_747)) { - x_770 = lean::alloc_cnstr(0, 4, 0); -} else { - x_770 = x_747; -} -lean::cnstr_set(x_770, 0, x_744); -lean::cnstr_set(x_770, 1, x_745); -lean::cnstr_set(x_770, 2, x_769); -lean::cnstr_set(x_770, 3, x_680); -x_2 = x_542; -x_3 = x_770; -goto _start; -} -} -} -} -default: -{ -obj* x_772; obj* x_773; obj* x_774; -lean::dec(x_640); -lean::dec(x_606); -lean::free_heap_obj(x_2); -x_772 = lean::cnstr_get(x_548, 1); -lean::inc(x_772); -lean::dec(x_548); -lean::inc(x_1); -lean::cnstr_set(x_607, 0, x_1); -x_773 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_774 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_607, x_773, x_772, x_4); -lean::dec(x_772); -lean::dec(x_607); -if (lean::obj_tag(x_774) == 0) -{ -uint8 x_775; -lean::dec(x_542); -lean::dec(x_1); -x_775 = !lean::is_exclusive(x_774); -if (x_775 == 0) -{ -return x_774; -} -else -{ -obj* x_776; obj* x_777; -x_776 = lean::cnstr_get(x_774, 0); -lean::inc(x_776); -lean::dec(x_774); -x_777 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_777, 0, x_776); -return x_777; -} -} -else -{ -obj* x_778; obj* x_779; -x_778 = lean::cnstr_get(x_774, 0); -lean::inc(x_778); -lean::dec(x_774); -x_779 = lean::cnstr_get(x_778, 1); -lean::inc(x_779); -lean::dec(x_778); -x_2 = x_542; -x_3 = x_779; -goto _start; -} -} -} -} -else -{ -obj* x_781; obj* x_782; -x_781 = lean::cnstr_get(x_607, 0); -lean::inc(x_781); -lean::dec(x_607); -x_782 = lean::cnstr_get(x_781, 1); -lean::inc(x_782); -lean::dec(x_781); -switch (lean::obj_tag(x_782)) { -case 0: -{ -obj* x_783; obj* x_784; obj* x_785; -lean::dec(x_782); -x_783 = lean::cnstr_get(x_548, 1); -lean::inc(x_783); -lean::dec(x_548); -x_784 = lean::cnstr_get(x_606, 0); -lean::inc(x_784); -lean::dec(x_606); -x_785 = l___private_init_lean_expander_1__popStxArg(x_783, x_4); -if (lean::obj_tag(x_785) == 0) -{ -obj* x_786; obj* x_787; obj* x_788; -lean::dec(x_784); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_786 = lean::cnstr_get(x_785, 0); -lean::inc(x_786); -if (lean::is_exclusive(x_785)) { - lean::cnstr_release(x_785, 0); - x_787 = x_785; -} else { - lean::dec_ref(x_785); - x_787 = lean::box(0); -} -if (lean::is_scalar(x_787)) { - x_788 = lean::alloc_cnstr(0, 1, 0); -} else { - x_788 = x_787; -} -lean::cnstr_set(x_788, 0, x_786); -return x_788; -} -else -{ -obj* x_789; obj* x_790; obj* x_791; obj* x_792; obj* x_793; obj* x_794; obj* x_795; obj* x_796; obj* x_797; obj* x_798; obj* x_799; -x_789 = lean::cnstr_get(x_785, 0); -lean::inc(x_789); -lean::dec(x_785); -x_790 = lean::cnstr_get(x_789, 1); -lean::inc(x_790); -x_791 = lean::cnstr_get(x_789, 0); -lean::inc(x_791); -if (lean::is_exclusive(x_789)) { - lean::cnstr_release(x_789, 0); - lean::cnstr_release(x_789, 1); - x_792 = x_789; -} else { - lean::dec_ref(x_789); - x_792 = lean::box(0); -} -x_793 = lean::cnstr_get(x_790, 0); -lean::inc(x_793); -x_794 = lean::cnstr_get(x_790, 1); -lean::inc(x_794); -x_795 = lean::cnstr_get(x_790, 2); -lean::inc(x_795); -x_796 = lean::cnstr_get(x_790, 3); -lean::inc(x_796); -if (lean::is_exclusive(x_790)) { - lean::cnstr_release(x_790, 0); - lean::cnstr_release(x_790, 1); - lean::cnstr_release(x_790, 2); - lean::cnstr_release(x_790, 3); - x_797 = x_790; -} else { - lean::dec_ref(x_790); - x_797 = lean::box(0); -} -if (lean::is_scalar(x_792)) { - x_798 = lean::alloc_cnstr(0, 2, 0); -} else { - x_798 = x_792; -} -lean::cnstr_set(x_798, 0, x_784); -lean::cnstr_set(x_798, 1, x_791); -lean::cnstr_set(x_2, 1, x_795); -lean::cnstr_set(x_2, 0, x_798); -if (lean::is_scalar(x_797)) { - x_799 = lean::alloc_cnstr(0, 4, 0); -} else { - x_799 = x_797; -} -lean::cnstr_set(x_799, 0, x_793); -lean::cnstr_set(x_799, 1, x_794); -lean::cnstr_set(x_799, 2, x_2); -lean::cnstr_set(x_799, 3, x_796); -x_2 = x_542; -x_3 = x_799; -goto _start; -} -} -case 2: -{ -obj* x_801; obj* x_802; obj* x_803; obj* x_804; -x_801 = lean::cnstr_get(x_548, 1); -lean::inc(x_801); -lean::dec(x_548); -x_802 = lean::cnstr_get(x_606, 0); -lean::inc(x_802); -lean::dec(x_606); -x_803 = lean::cnstr_get(x_782, 0); -lean::inc(x_803); -lean::dec(x_782); -x_804 = l___private_init_lean_expander_1__popStxArg(x_801, x_4); -if (lean::obj_tag(x_804) == 0) -{ -obj* x_805; obj* x_806; obj* x_807; -lean::dec(x_803); -lean::dec(x_802); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_805 = lean::cnstr_get(x_804, 0); -lean::inc(x_805); -if (lean::is_exclusive(x_804)) { - lean::cnstr_release(x_804, 0); - x_806 = x_804; -} else { - lean::dec_ref(x_804); - x_806 = lean::box(0); -} -if (lean::is_scalar(x_806)) { - x_807 = lean::alloc_cnstr(0, 1, 0); -} else { - x_807 = x_806; -} -lean::cnstr_set(x_807, 0, x_805); -return x_807; -} -else -{ -obj* x_808; obj* x_809; obj* x_810; -x_808 = lean::cnstr_get(x_804, 0); -lean::inc(x_808); -lean::dec(x_804); -x_809 = lean::cnstr_get(x_808, 1); -lean::inc(x_809); -x_810 = lean::cnstr_get(x_809, 3); -lean::inc(x_810); -if (lean::obj_tag(x_810) == 0) -{ -obj* x_811; obj* x_812; obj* x_813; -lean::dec(x_808); -lean::dec(x_803); -lean::dec(x_802); -lean::free_heap_obj(x_2); -lean::inc(x_1); -x_811 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_811, 0, x_1); -x_812 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_813 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_811, x_812, x_809, x_4); -lean::dec(x_809); -lean::dec(x_811); -if (lean::obj_tag(x_813) == 0) -{ -obj* x_814; obj* x_815; obj* x_816; -lean::dec(x_542); -lean::dec(x_1); -x_814 = lean::cnstr_get(x_813, 0); -lean::inc(x_814); -if (lean::is_exclusive(x_813)) { - lean::cnstr_release(x_813, 0); - x_815 = x_813; -} else { - lean::dec_ref(x_813); - x_815 = lean::box(0); -} -if (lean::is_scalar(x_815)) { - x_816 = lean::alloc_cnstr(0, 1, 0); -} else { - x_816 = x_815; -} -lean::cnstr_set(x_816, 0, x_814); -return x_816; -} -else -{ -obj* x_817; obj* x_818; -x_817 = lean::cnstr_get(x_813, 0); -lean::inc(x_817); -lean::dec(x_813); -x_818 = lean::cnstr_get(x_817, 1); -lean::inc(x_818); -lean::dec(x_817); -x_2 = x_542; -x_3 = x_818; -goto _start; -} -} -else -{ -obj* x_820; obj* x_821; obj* x_822; obj* x_823; obj* x_824; obj* x_825; obj* x_826; obj* x_827; obj* x_828; obj* x_829; obj* x_830; obj* x_831; obj* x_832; obj* x_833; obj* x_834; obj* x_835; obj* x_836; obj* x_837; obj* x_838; obj* x_839; obj* x_840; obj* x_841; obj* x_842; obj* x_843; obj* x_844; obj* x_845; obj* x_846; obj* x_847; obj* x_848; -x_820 = lean::cnstr_get(x_808, 0); -lean::inc(x_820); -if (lean::is_exclusive(x_808)) { - lean::cnstr_release(x_808, 0); - lean::cnstr_release(x_808, 1); - x_821 = x_808; -} else { - lean::dec_ref(x_808); - x_821 = lean::box(0); -} -x_822 = lean::cnstr_get(x_809, 0); -lean::inc(x_822); -x_823 = lean::cnstr_get(x_809, 1); -lean::inc(x_823); -x_824 = lean::cnstr_get(x_809, 2); -lean::inc(x_824); -if (lean::is_exclusive(x_809)) { - lean::cnstr_release(x_809, 0); - lean::cnstr_release(x_809, 1); - lean::cnstr_release(x_809, 2); - lean::cnstr_release(x_809, 3); - x_825 = x_809; -} else { - lean::dec_ref(x_809); - x_825 = lean::box(0); -} -x_826 = lean::cnstr_get(x_810, 0); -lean::inc(x_826); -x_827 = l_Lean_Parser_Term_lambda_HasView; -x_828 = lean::cnstr_get(x_827, 1); -lean::inc(x_828); -x_829 = lean::box(0); -x_830 = lean::cnstr_get(x_803, 3); -lean::inc(x_830); -x_831 = lean::box(0); -lean::cnstr_set(x_2, 1, x_831); -lean::cnstr_set(x_2, 0, x_830); -x_832 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_833 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_833, 0, x_832); -lean::cnstr_set(x_833, 1, x_829); -x_834 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_834, 0, x_833); -x_835 = lean::cnstr_get(x_803, 5); -lean::inc(x_835); -lean::dec(x_803); -x_836 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_837 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_838 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_838, 0, x_836); -lean::cnstr_set(x_838, 1, x_834); -lean::cnstr_set(x_838, 2, x_837); -lean::cnstr_set(x_838, 3, x_835); -lean::inc(x_828); -x_839 = lean::apply_1(x_828, x_838); -x_840 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_840, 0, x_836); -lean::cnstr_set(x_840, 1, x_826); -lean::cnstr_set(x_840, 2, x_837); -lean::cnstr_set(x_840, 3, x_820); -x_841 = lean::apply_1(x_828, x_840); -x_842 = l_Lean_Parser_Term_app_HasView; -x_843 = lean::cnstr_get(x_842, 1); -lean::inc(x_843); -x_844 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_844, 0, x_839); -lean::cnstr_set(x_844, 1, x_841); -x_845 = lean::apply_1(x_843, x_844); -if (lean::is_scalar(x_821)) { - x_846 = lean::alloc_cnstr(0, 2, 0); -} else { - x_846 = x_821; -} -lean::cnstr_set(x_846, 0, x_802); -lean::cnstr_set(x_846, 1, x_845); -x_847 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_847, 0, x_846); -lean::cnstr_set(x_847, 1, x_824); -if (lean::is_scalar(x_825)) { - x_848 = lean::alloc_cnstr(0, 4, 0); -} else { - x_848 = x_825; -} -lean::cnstr_set(x_848, 0, x_822); -lean::cnstr_set(x_848, 1, x_823); -lean::cnstr_set(x_848, 2, x_847); -lean::cnstr_set(x_848, 3, x_810); -x_2 = x_542; -x_3 = x_848; -goto _start; -} -} -} -default: -{ -obj* x_850; obj* x_851; obj* x_852; obj* x_853; -lean::dec(x_782); -lean::dec(x_606); -lean::free_heap_obj(x_2); -x_850 = lean::cnstr_get(x_548, 1); -lean::inc(x_850); -lean::dec(x_548); -lean::inc(x_1); -x_851 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_851, 0, x_1); -x_852 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_853 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_851, x_852, x_850, x_4); -lean::dec(x_850); -lean::dec(x_851); -if (lean::obj_tag(x_853) == 0) -{ -obj* x_854; obj* x_855; obj* x_856; -lean::dec(x_542); -lean::dec(x_1); -x_854 = lean::cnstr_get(x_853, 0); -lean::inc(x_854); -if (lean::is_exclusive(x_853)) { - lean::cnstr_release(x_853, 0); - x_855 = x_853; -} else { - lean::dec_ref(x_853); - x_855 = lean::box(0); -} -if (lean::is_scalar(x_855)) { - x_856 = lean::alloc_cnstr(0, 1, 0); -} else { - x_856 = x_855; -} -lean::cnstr_set(x_856, 0, x_854); -return x_856; -} -else -{ -obj* x_857; obj* x_858; -x_857 = lean::cnstr_get(x_853, 0); -lean::inc(x_857); -lean::dec(x_853); -x_858 = lean::cnstr_get(x_857, 1); -lean::inc(x_858); -lean::dec(x_857); -x_2 = x_542; -x_3 = x_858; -goto _start; -} -} -} -} -} -} -} -} -else -{ -obj* x_860; -x_860 = lean::cnstr_get(x_549, 0); -lean::inc(x_860); -lean::dec(x_549); -switch (lean::obj_tag(x_860)) { -case 0: -{ -obj* x_861; obj* x_862; -lean::dec(x_860); -x_861 = lean::cnstr_get(x_548, 1); -lean::inc(x_861); -lean::dec(x_548); -x_862 = l___private_init_lean_expander_1__popStxArg(x_861, x_4); -if (lean::obj_tag(x_862) == 0) -{ -obj* x_863; obj* x_864; obj* x_865; -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_863 = lean::cnstr_get(x_862, 0); -lean::inc(x_863); -if (lean::is_exclusive(x_862)) { - lean::cnstr_release(x_862, 0); - x_864 = x_862; -} else { - lean::dec_ref(x_862); - x_864 = lean::box(0); -} -if (lean::is_scalar(x_864)) { - x_865 = lean::alloc_cnstr(0, 1, 0); -} else { - x_865 = x_864; -} -lean::cnstr_set(x_865, 0, x_863); -return x_865; -} -else -{ -obj* x_866; obj* x_867; obj* x_868; obj* x_869; obj* x_870; obj* x_871; obj* x_872; obj* x_873; obj* x_874; obj* x_875; obj* x_876; obj* x_877; obj* x_878; obj* x_879; obj* x_880; obj* x_881; -x_866 = lean::cnstr_get(x_862, 0); -lean::inc(x_866); -lean::dec(x_862); -x_867 = lean::cnstr_get(x_866, 1); -lean::inc(x_867); -x_868 = lean::cnstr_get(x_866, 0); -lean::inc(x_868); -lean::dec(x_866); -x_869 = lean::cnstr_get(x_867, 0); -lean::inc(x_869); -x_870 = lean::cnstr_get(x_867, 1); -lean::inc(x_870); -x_871 = lean::cnstr_get(x_867, 2); -lean::inc(x_871); -if (lean::is_exclusive(x_867)) { - lean::cnstr_release(x_867, 0); - lean::cnstr_release(x_867, 1); - lean::cnstr_release(x_867, 2); - lean::cnstr_release(x_867, 3); - x_872 = x_867; -} else { - lean::dec_ref(x_867); - x_872 = lean::box(0); -} -x_873 = l_Lean_Parser_Term_binderIdent_HasView; -x_874 = lean::cnstr_get(x_873, 0); -lean::inc(x_874); -x_875 = lean::apply_1(x_874, x_868); -x_876 = lean::box(0); -lean::cnstr_set(x_2, 1, x_876); -lean::cnstr_set(x_2, 0, x_875); -x_877 = lean::box(0); -x_878 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_878, 0, x_2); -lean::cnstr_set(x_878, 1, x_877); -x_879 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_879, 0, x_878); -x_880 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_880, 0, x_879); -if (lean::is_scalar(x_872)) { - x_881 = lean::alloc_cnstr(0, 4, 0); -} else { - x_881 = x_872; -} -lean::cnstr_set(x_881, 0, x_869); -lean::cnstr_set(x_881, 1, x_870); -lean::cnstr_set(x_881, 2, x_871); -lean::cnstr_set(x_881, 3, x_880); -x_2 = x_542; -x_3 = x_881; -goto _start; -} -} -case 1: -{ -obj* x_883; obj* x_884; -lean::dec(x_860); -lean::free_heap_obj(x_2); -x_883 = lean::cnstr_get(x_548, 1); -lean::inc(x_883); -lean::dec(x_548); -x_884 = l___private_init_lean_expander_1__popStxArg(x_883, x_4); -if (lean::obj_tag(x_884) == 0) -{ -obj* x_885; obj* x_886; obj* x_887; -lean::dec(x_542); -lean::dec(x_1); -x_885 = lean::cnstr_get(x_884, 0); -lean::inc(x_885); -if (lean::is_exclusive(x_884)) { - lean::cnstr_release(x_884, 0); - x_886 = x_884; -} else { - lean::dec_ref(x_884); - x_886 = lean::box(0); -} -if (lean::is_scalar(x_886)) { - x_887 = lean::alloc_cnstr(0, 1, 0); -} else { - x_887 = x_886; -} -lean::cnstr_set(x_887, 0, x_885); -return x_887; -} -else -{ -obj* x_888; obj* x_889; obj* x_890; obj* x_891; obj* x_892; obj* x_893; obj* x_894; obj* x_895; obj* x_896; obj* x_897; obj* x_898; obj* x_899; -x_888 = lean::cnstr_get(x_884, 0); -lean::inc(x_888); -lean::dec(x_884); -x_889 = lean::cnstr_get(x_888, 1); -lean::inc(x_889); -x_890 = lean::cnstr_get(x_888, 0); -lean::inc(x_890); -lean::dec(x_888); -x_891 = lean::cnstr_get(x_889, 0); -lean::inc(x_891); -x_892 = lean::cnstr_get(x_889, 1); -lean::inc(x_892); -x_893 = lean::cnstr_get(x_889, 2); -lean::inc(x_893); -if (lean::is_exclusive(x_889)) { - lean::cnstr_release(x_889, 0); - lean::cnstr_release(x_889, 1); - lean::cnstr_release(x_889, 2); - lean::cnstr_release(x_889, 3); - x_894 = x_889; -} else { - lean::dec_ref(x_889); - x_894 = lean::box(0); -} -x_895 = l_Lean_Parser_Term_binders_HasView; -x_896 = lean::cnstr_get(x_895, 0); -lean::inc(x_896); -x_897 = lean::apply_1(x_896, x_890); -x_898 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_898, 0, x_897); -if (lean::is_scalar(x_894)) { - x_899 = lean::alloc_cnstr(0, 4, 0); -} else { - x_899 = x_894; -} -lean::cnstr_set(x_899, 0, x_891); -lean::cnstr_set(x_899, 1, x_892); -lean::cnstr_set(x_899, 2, x_893); -lean::cnstr_set(x_899, 3, x_898); -x_2 = x_542; -x_3 = x_899; -goto _start; -} -} -default: -{ -obj* x_901; obj* x_902; -x_901 = lean::cnstr_get(x_860, 0); -lean::inc(x_901); -lean::dec(x_860); -x_902 = lean::cnstr_get(x_901, 1); -lean::inc(x_902); -if (lean::obj_tag(x_902) == 0) -{ -obj* x_903; obj* x_904; obj* x_905; -x_903 = lean::cnstr_get(x_548, 1); -lean::inc(x_903); -lean::dec(x_548); -x_904 = lean::cnstr_get(x_901, 0); -lean::inc(x_904); -lean::dec(x_901); -x_905 = l___private_init_lean_expander_1__popStxArg(x_903, x_4); -if (lean::obj_tag(x_905) == 0) -{ -obj* x_906; obj* x_907; obj* x_908; -lean::dec(x_904); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_906 = lean::cnstr_get(x_905, 0); -lean::inc(x_906); -if (lean::is_exclusive(x_905)) { - lean::cnstr_release(x_905, 0); - x_907 = x_905; -} else { - lean::dec_ref(x_905); - x_907 = lean::box(0); -} -if (lean::is_scalar(x_907)) { - x_908 = lean::alloc_cnstr(0, 1, 0); -} else { - x_908 = x_907; -} -lean::cnstr_set(x_908, 0, x_906); -return x_908; -} -else -{ -obj* x_909; obj* x_910; obj* x_911; obj* x_912; obj* x_913; obj* x_914; obj* x_915; obj* x_916; obj* x_917; obj* x_918; obj* x_919; -x_909 = lean::cnstr_get(x_905, 0); -lean::inc(x_909); -lean::dec(x_905); -x_910 = lean::cnstr_get(x_909, 1); -lean::inc(x_910); -x_911 = lean::cnstr_get(x_909, 0); -lean::inc(x_911); -if (lean::is_exclusive(x_909)) { - lean::cnstr_release(x_909, 0); - lean::cnstr_release(x_909, 1); - x_912 = x_909; -} else { - lean::dec_ref(x_909); - x_912 = lean::box(0); -} -x_913 = lean::cnstr_get(x_910, 0); -lean::inc(x_913); -x_914 = lean::cnstr_get(x_910, 1); -lean::inc(x_914); -x_915 = lean::cnstr_get(x_910, 2); -lean::inc(x_915); -x_916 = lean::cnstr_get(x_910, 3); -lean::inc(x_916); -if (lean::is_exclusive(x_910)) { - lean::cnstr_release(x_910, 0); - lean::cnstr_release(x_910, 1); - lean::cnstr_release(x_910, 2); - lean::cnstr_release(x_910, 3); - x_917 = x_910; -} else { - lean::dec_ref(x_910); - x_917 = lean::box(0); -} -if (lean::is_scalar(x_912)) { - x_918 = lean::alloc_cnstr(0, 2, 0); -} else { - x_918 = x_912; -} -lean::cnstr_set(x_918, 0, x_904); -lean::cnstr_set(x_918, 1, x_911); -lean::cnstr_set(x_2, 1, x_915); -lean::cnstr_set(x_2, 0, x_918); -if (lean::is_scalar(x_917)) { - x_919 = lean::alloc_cnstr(0, 4, 0); -} else { - x_919 = x_917; -} -lean::cnstr_set(x_919, 0, x_913); -lean::cnstr_set(x_919, 1, x_914); -lean::cnstr_set(x_919, 2, x_2); -lean::cnstr_set(x_919, 3, x_916); -x_2 = x_542; -x_3 = x_919; -goto _start; -} -} -else -{ -obj* x_921; obj* x_922; obj* x_923; -x_921 = lean::cnstr_get(x_902, 0); -lean::inc(x_921); -if (lean::is_exclusive(x_902)) { - lean::cnstr_release(x_902, 0); - x_922 = x_902; -} else { - lean::dec_ref(x_902); - x_922 = lean::box(0); -} -x_923 = lean::cnstr_get(x_921, 1); -lean::inc(x_923); -lean::dec(x_921); -switch (lean::obj_tag(x_923)) { -case 0: -{ -obj* x_924; obj* x_925; obj* x_926; -lean::dec(x_923); -lean::dec(x_922); -x_924 = lean::cnstr_get(x_548, 1); -lean::inc(x_924); -lean::dec(x_548); -x_925 = lean::cnstr_get(x_901, 0); -lean::inc(x_925); -lean::dec(x_901); -x_926 = l___private_init_lean_expander_1__popStxArg(x_924, x_4); -if (lean::obj_tag(x_926) == 0) -{ -obj* x_927; obj* x_928; obj* x_929; -lean::dec(x_925); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_927 = lean::cnstr_get(x_926, 0); -lean::inc(x_927); -if (lean::is_exclusive(x_926)) { - lean::cnstr_release(x_926, 0); - x_928 = x_926; -} else { - lean::dec_ref(x_926); - x_928 = lean::box(0); -} -if (lean::is_scalar(x_928)) { - x_929 = lean::alloc_cnstr(0, 1, 0); -} else { - x_929 = x_928; -} -lean::cnstr_set(x_929, 0, x_927); -return x_929; -} -else -{ -obj* x_930; obj* x_931; obj* x_932; obj* x_933; obj* x_934; obj* x_935; obj* x_936; obj* x_937; obj* x_938; obj* x_939; obj* x_940; -x_930 = lean::cnstr_get(x_926, 0); -lean::inc(x_930); -lean::dec(x_926); -x_931 = lean::cnstr_get(x_930, 1); -lean::inc(x_931); -x_932 = lean::cnstr_get(x_930, 0); -lean::inc(x_932); -if (lean::is_exclusive(x_930)) { - lean::cnstr_release(x_930, 0); - lean::cnstr_release(x_930, 1); - x_933 = x_930; -} else { - lean::dec_ref(x_930); - x_933 = lean::box(0); -} -x_934 = lean::cnstr_get(x_931, 0); -lean::inc(x_934); -x_935 = lean::cnstr_get(x_931, 1); -lean::inc(x_935); -x_936 = lean::cnstr_get(x_931, 2); -lean::inc(x_936); -x_937 = lean::cnstr_get(x_931, 3); -lean::inc(x_937); -if (lean::is_exclusive(x_931)) { - lean::cnstr_release(x_931, 0); - lean::cnstr_release(x_931, 1); - lean::cnstr_release(x_931, 2); - lean::cnstr_release(x_931, 3); - x_938 = x_931; -} else { - lean::dec_ref(x_931); - x_938 = lean::box(0); -} -if (lean::is_scalar(x_933)) { - x_939 = lean::alloc_cnstr(0, 2, 0); -} else { - x_939 = x_933; -} -lean::cnstr_set(x_939, 0, x_925); -lean::cnstr_set(x_939, 1, x_932); -lean::cnstr_set(x_2, 1, x_936); -lean::cnstr_set(x_2, 0, x_939); -if (lean::is_scalar(x_938)) { - x_940 = lean::alloc_cnstr(0, 4, 0); -} else { - x_940 = x_938; -} -lean::cnstr_set(x_940, 0, x_934); -lean::cnstr_set(x_940, 1, x_935); -lean::cnstr_set(x_940, 2, x_2); -lean::cnstr_set(x_940, 3, x_937); -x_2 = x_542; -x_3 = x_940; -goto _start; -} -} -case 2: -{ -obj* x_942; obj* x_943; obj* x_944; obj* x_945; -x_942 = lean::cnstr_get(x_548, 1); -lean::inc(x_942); -lean::dec(x_548); -x_943 = lean::cnstr_get(x_901, 0); -lean::inc(x_943); -lean::dec(x_901); -x_944 = lean::cnstr_get(x_923, 0); -lean::inc(x_944); -lean::dec(x_923); -x_945 = l___private_init_lean_expander_1__popStxArg(x_942, x_4); -if (lean::obj_tag(x_945) == 0) -{ -obj* x_946; obj* x_947; obj* x_948; -lean::dec(x_944); -lean::dec(x_943); -lean::dec(x_922); -lean::free_heap_obj(x_2); -lean::dec(x_542); -lean::dec(x_1); -x_946 = lean::cnstr_get(x_945, 0); -lean::inc(x_946); -if (lean::is_exclusive(x_945)) { - lean::cnstr_release(x_945, 0); - x_947 = x_945; -} else { - lean::dec_ref(x_945); - x_947 = lean::box(0); -} -if (lean::is_scalar(x_947)) { - x_948 = lean::alloc_cnstr(0, 1, 0); -} else { - x_948 = x_947; -} -lean::cnstr_set(x_948, 0, x_946); -return x_948; -} -else -{ -obj* x_949; obj* x_950; obj* x_951; -x_949 = lean::cnstr_get(x_945, 0); -lean::inc(x_949); -lean::dec(x_945); -x_950 = lean::cnstr_get(x_949, 1); -lean::inc(x_950); -x_951 = lean::cnstr_get(x_950, 3); -lean::inc(x_951); -if (lean::obj_tag(x_951) == 0) -{ -obj* x_952; obj* x_953; obj* x_954; -lean::dec(x_949); -lean::dec(x_944); -lean::dec(x_943); -lean::free_heap_obj(x_2); -lean::inc(x_1); -if (lean::is_scalar(x_922)) { - x_952 = lean::alloc_cnstr(1, 1, 0); -} else { - x_952 = x_922; -} -lean::cnstr_set(x_952, 0, x_1); -x_953 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_954 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_952, x_953, x_950, x_4); -lean::dec(x_950); -lean::dec(x_952); -if (lean::obj_tag(x_954) == 0) -{ -obj* x_955; obj* x_956; obj* x_957; -lean::dec(x_542); -lean::dec(x_1); -x_955 = lean::cnstr_get(x_954, 0); -lean::inc(x_955); -if (lean::is_exclusive(x_954)) { - lean::cnstr_release(x_954, 0); - x_956 = x_954; -} else { - lean::dec_ref(x_954); - x_956 = lean::box(0); -} -if (lean::is_scalar(x_956)) { - x_957 = lean::alloc_cnstr(0, 1, 0); -} else { - x_957 = x_956; -} -lean::cnstr_set(x_957, 0, x_955); -return x_957; -} -else -{ -obj* x_958; obj* x_959; -x_958 = lean::cnstr_get(x_954, 0); -lean::inc(x_958); -lean::dec(x_954); -x_959 = lean::cnstr_get(x_958, 1); -lean::inc(x_959); -lean::dec(x_958); -x_2 = x_542; -x_3 = x_959; -goto _start; -} -} -else -{ -obj* x_961; obj* x_962; obj* x_963; obj* x_964; obj* x_965; obj* x_966; obj* x_967; obj* x_968; obj* x_969; obj* x_970; obj* x_971; obj* x_972; obj* x_973; obj* x_974; obj* x_975; obj* x_976; obj* x_977; obj* x_978; obj* x_979; obj* x_980; obj* x_981; obj* x_982; obj* x_983; obj* x_984; obj* x_985; obj* x_986; obj* x_987; obj* x_988; obj* x_989; -lean::dec(x_922); -x_961 = lean::cnstr_get(x_949, 0); -lean::inc(x_961); -if (lean::is_exclusive(x_949)) { - lean::cnstr_release(x_949, 0); - lean::cnstr_release(x_949, 1); - x_962 = x_949; -} else { - lean::dec_ref(x_949); - x_962 = lean::box(0); -} -x_963 = lean::cnstr_get(x_950, 0); -lean::inc(x_963); -x_964 = lean::cnstr_get(x_950, 1); -lean::inc(x_964); -x_965 = lean::cnstr_get(x_950, 2); -lean::inc(x_965); -if (lean::is_exclusive(x_950)) { - lean::cnstr_release(x_950, 0); - lean::cnstr_release(x_950, 1); - lean::cnstr_release(x_950, 2); - lean::cnstr_release(x_950, 3); - x_966 = x_950; -} else { - lean::dec_ref(x_950); - x_966 = lean::box(0); -} -x_967 = lean::cnstr_get(x_951, 0); -lean::inc(x_967); -x_968 = l_Lean_Parser_Term_lambda_HasView; -x_969 = lean::cnstr_get(x_968, 1); -lean::inc(x_969); -x_970 = lean::box(0); -x_971 = lean::cnstr_get(x_944, 3); -lean::inc(x_971); -x_972 = lean::box(0); -lean::cnstr_set(x_2, 1, x_972); -lean::cnstr_set(x_2, 0, x_971); -x_973 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_2); -x_974 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_974, 0, x_973); -lean::cnstr_set(x_974, 1, x_970); -x_975 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_975, 0, x_974); -x_976 = lean::cnstr_get(x_944, 5); -lean::inc(x_976); -lean::dec(x_944); -x_977 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_978 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_979 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_979, 0, x_977); -lean::cnstr_set(x_979, 1, x_975); -lean::cnstr_set(x_979, 2, x_978); -lean::cnstr_set(x_979, 3, x_976); -lean::inc(x_969); -x_980 = lean::apply_1(x_969, x_979); -x_981 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_981, 0, x_977); -lean::cnstr_set(x_981, 1, x_967); -lean::cnstr_set(x_981, 2, x_978); -lean::cnstr_set(x_981, 3, x_961); -x_982 = lean::apply_1(x_969, x_981); -x_983 = l_Lean_Parser_Term_app_HasView; -x_984 = lean::cnstr_get(x_983, 1); -lean::inc(x_984); -x_985 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_985, 0, x_980); -lean::cnstr_set(x_985, 1, x_982); -x_986 = lean::apply_1(x_984, x_985); -if (lean::is_scalar(x_962)) { - x_987 = lean::alloc_cnstr(0, 2, 0); -} else { - x_987 = x_962; -} -lean::cnstr_set(x_987, 0, x_943); -lean::cnstr_set(x_987, 1, x_986); -x_988 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_988, 0, x_987); -lean::cnstr_set(x_988, 1, x_965); -if (lean::is_scalar(x_966)) { - x_989 = lean::alloc_cnstr(0, 4, 0); -} else { - x_989 = x_966; -} -lean::cnstr_set(x_989, 0, x_963); -lean::cnstr_set(x_989, 1, x_964); -lean::cnstr_set(x_989, 2, x_988); -lean::cnstr_set(x_989, 3, x_951); -x_2 = x_542; -x_3 = x_989; -goto _start; -} -} -} -default: -{ -obj* x_991; obj* x_992; obj* x_993; obj* x_994; -lean::dec(x_923); -lean::dec(x_901); -lean::free_heap_obj(x_2); -x_991 = lean::cnstr_get(x_548, 1); -lean::inc(x_991); -lean::dec(x_548); -lean::inc(x_1); -if (lean::is_scalar(x_922)) { - x_992 = lean::alloc_cnstr(1, 1, 0); -} else { - x_992 = x_922; -} -lean::cnstr_set(x_992, 0, x_1); -x_993 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_994 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_992, x_993, x_991, x_4); -lean::dec(x_991); -lean::dec(x_992); -if (lean::obj_tag(x_994) == 0) -{ -obj* x_995; obj* x_996; obj* x_997; -lean::dec(x_542); -lean::dec(x_1); -x_995 = lean::cnstr_get(x_994, 0); -lean::inc(x_995); -if (lean::is_exclusive(x_994)) { - lean::cnstr_release(x_994, 0); - x_996 = x_994; -} else { - lean::dec_ref(x_994); - x_996 = lean::box(0); -} -if (lean::is_scalar(x_996)) { - x_997 = lean::alloc_cnstr(0, 1, 0); -} else { - x_997 = x_996; -} -lean::cnstr_set(x_997, 0, x_995); -return x_997; -} -else -{ -obj* x_998; obj* x_999; -x_998 = lean::cnstr_get(x_994, 0); -lean::inc(x_998); -lean::dec(x_994); -x_999 = lean::cnstr_get(x_998, 1); -lean::inc(x_999); -lean::dec(x_998); -x_2 = x_542; -x_3 = x_999; -goto _start; -} -} -} -} -} -} -} -} -} -} -else -{ -obj* x_1001; obj* x_1002; -x_1001 = lean::cnstr_get(x_2, 1); -lean::inc(x_1001); -lean::dec(x_2); -x_1002 = l___private_init_lean_expander_1__popStxArg(x_3, x_4); -if (lean::obj_tag(x_1002) == 0) -{ -obj* x_1003; obj* x_1004; obj* x_1005; -lean::dec(x_1001); -lean::dec(x_8); -lean::dec(x_1); -x_1003 = lean::cnstr_get(x_1002, 0); -lean::inc(x_1003); -if (lean::is_exclusive(x_1002)) { - lean::cnstr_release(x_1002, 0); - x_1004 = x_1002; -} else { - lean::dec_ref(x_1002); - x_1004 = lean::box(0); -} -if (lean::is_scalar(x_1004)) { - x_1005 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1005 = x_1004; -} -lean::cnstr_set(x_1005, 0, x_1003); -return x_1005; -} -else -{ -obj* x_1006; obj* x_1007; -x_1006 = lean::cnstr_get(x_1002, 0); -lean::inc(x_1006); -lean::dec(x_1002); -x_1007 = lean::cnstr_get(x_8, 1); -lean::inc(x_1007); -lean::dec(x_8); -if (lean::obj_tag(x_1007) == 0) -{ -obj* x_1008; -x_1008 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1008); -lean::dec(x_1006); -x_2 = x_1001; -x_3 = x_1008; -goto _start; -} -else -{ -obj* x_1010; obj* x_1011; -x_1010 = lean::cnstr_get(x_1007, 0); -lean::inc(x_1010); -if (lean::is_exclusive(x_1007)) { - lean::cnstr_release(x_1007, 0); - x_1011 = x_1007; -} else { - lean::dec_ref(x_1007); - x_1011 = lean::box(0); -} -switch (lean::obj_tag(x_1010)) { -case 0: -{ -obj* x_1012; obj* x_1013; -lean::dec(x_1010); -x_1012 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1012); -lean::dec(x_1006); -x_1013 = l___private_init_lean_expander_1__popStxArg(x_1012, x_4); -if (lean::obj_tag(x_1013) == 0) -{ -obj* x_1014; obj* x_1015; obj* x_1016; -lean::dec(x_1011); -lean::dec(x_1001); -lean::dec(x_1); -x_1014 = lean::cnstr_get(x_1013, 0); -lean::inc(x_1014); -if (lean::is_exclusive(x_1013)) { - lean::cnstr_release(x_1013, 0); - x_1015 = x_1013; -} else { - lean::dec_ref(x_1013); - x_1015 = lean::box(0); -} -if (lean::is_scalar(x_1015)) { - x_1016 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1016 = x_1015; -} -lean::cnstr_set(x_1016, 0, x_1014); -return x_1016; -} -else -{ -obj* x_1017; obj* x_1018; obj* x_1019; obj* x_1020; obj* x_1021; obj* x_1022; obj* x_1023; obj* x_1024; obj* x_1025; obj* x_1026; obj* x_1027; obj* x_1028; obj* x_1029; obj* x_1030; obj* x_1031; obj* x_1032; obj* x_1033; -x_1017 = lean::cnstr_get(x_1013, 0); -lean::inc(x_1017); -lean::dec(x_1013); -x_1018 = lean::cnstr_get(x_1017, 1); -lean::inc(x_1018); -x_1019 = lean::cnstr_get(x_1017, 0); -lean::inc(x_1019); -lean::dec(x_1017); -x_1020 = lean::cnstr_get(x_1018, 0); -lean::inc(x_1020); -x_1021 = lean::cnstr_get(x_1018, 1); -lean::inc(x_1021); -x_1022 = lean::cnstr_get(x_1018, 2); -lean::inc(x_1022); -if (lean::is_exclusive(x_1018)) { - lean::cnstr_release(x_1018, 0); - lean::cnstr_release(x_1018, 1); - lean::cnstr_release(x_1018, 2); - lean::cnstr_release(x_1018, 3); - x_1023 = x_1018; -} else { - lean::dec_ref(x_1018); - x_1023 = lean::box(0); -} -x_1024 = l_Lean_Parser_Term_binderIdent_HasView; -x_1025 = lean::cnstr_get(x_1024, 0); -lean::inc(x_1025); -x_1026 = lean::apply_1(x_1025, x_1019); -x_1027 = lean::box(0); -x_1028 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1028, 0, x_1026); -lean::cnstr_set(x_1028, 1, x_1027); -x_1029 = lean::box(0); -x_1030 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1030, 0, x_1028); -lean::cnstr_set(x_1030, 1, x_1029); -x_1031 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1031, 0, x_1030); -if (lean::is_scalar(x_1011)) { - x_1032 = lean::alloc_cnstr(1, 1, 0); -} else { - x_1032 = x_1011; -} -lean::cnstr_set(x_1032, 0, x_1031); -if (lean::is_scalar(x_1023)) { - x_1033 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1033 = x_1023; -} -lean::cnstr_set(x_1033, 0, x_1020); -lean::cnstr_set(x_1033, 1, x_1021); -lean::cnstr_set(x_1033, 2, x_1022); -lean::cnstr_set(x_1033, 3, x_1032); -x_2 = x_1001; -x_3 = x_1033; -goto _start; -} -} -case 1: -{ -obj* x_1035; obj* x_1036; -lean::dec(x_1010); -x_1035 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1035); -lean::dec(x_1006); -x_1036 = l___private_init_lean_expander_1__popStxArg(x_1035, x_4); -if (lean::obj_tag(x_1036) == 0) -{ -obj* x_1037; obj* x_1038; obj* x_1039; -lean::dec(x_1011); -lean::dec(x_1001); -lean::dec(x_1); -x_1037 = lean::cnstr_get(x_1036, 0); -lean::inc(x_1037); -if (lean::is_exclusive(x_1036)) { - lean::cnstr_release(x_1036, 0); - x_1038 = x_1036; -} else { - lean::dec_ref(x_1036); - x_1038 = lean::box(0); -} -if (lean::is_scalar(x_1038)) { - x_1039 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1039 = x_1038; -} -lean::cnstr_set(x_1039, 0, x_1037); -return x_1039; -} -else -{ -obj* x_1040; obj* x_1041; obj* x_1042; obj* x_1043; obj* x_1044; obj* x_1045; obj* x_1046; obj* x_1047; obj* x_1048; obj* x_1049; obj* x_1050; obj* x_1051; -x_1040 = lean::cnstr_get(x_1036, 0); -lean::inc(x_1040); -lean::dec(x_1036); -x_1041 = lean::cnstr_get(x_1040, 1); -lean::inc(x_1041); -x_1042 = lean::cnstr_get(x_1040, 0); -lean::inc(x_1042); -lean::dec(x_1040); -x_1043 = lean::cnstr_get(x_1041, 0); -lean::inc(x_1043); -x_1044 = lean::cnstr_get(x_1041, 1); -lean::inc(x_1044); -x_1045 = lean::cnstr_get(x_1041, 2); -lean::inc(x_1045); -if (lean::is_exclusive(x_1041)) { - lean::cnstr_release(x_1041, 0); - lean::cnstr_release(x_1041, 1); - lean::cnstr_release(x_1041, 2); - lean::cnstr_release(x_1041, 3); - x_1046 = x_1041; -} else { - lean::dec_ref(x_1041); - x_1046 = lean::box(0); -} -x_1047 = l_Lean_Parser_Term_binders_HasView; -x_1048 = lean::cnstr_get(x_1047, 0); -lean::inc(x_1048); -x_1049 = lean::apply_1(x_1048, x_1042); -if (lean::is_scalar(x_1011)) { - x_1050 = lean::alloc_cnstr(1, 1, 0); -} else { - x_1050 = x_1011; -} -lean::cnstr_set(x_1050, 0, x_1049); -if (lean::is_scalar(x_1046)) { - x_1051 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1051 = x_1046; -} -lean::cnstr_set(x_1051, 0, x_1043); -lean::cnstr_set(x_1051, 1, x_1044); -lean::cnstr_set(x_1051, 2, x_1045); -lean::cnstr_set(x_1051, 3, x_1050); -x_2 = x_1001; -x_3 = x_1051; -goto _start; -} -} -default: -{ -obj* x_1053; obj* x_1054; -lean::dec(x_1011); -x_1053 = lean::cnstr_get(x_1010, 0); -lean::inc(x_1053); -lean::dec(x_1010); -x_1054 = lean::cnstr_get(x_1053, 1); -lean::inc(x_1054); -if (lean::obj_tag(x_1054) == 0) -{ -obj* x_1055; obj* x_1056; obj* x_1057; -x_1055 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1055); -lean::dec(x_1006); -x_1056 = lean::cnstr_get(x_1053, 0); -lean::inc(x_1056); -lean::dec(x_1053); -x_1057 = l___private_init_lean_expander_1__popStxArg(x_1055, x_4); -if (lean::obj_tag(x_1057) == 0) -{ -obj* x_1058; obj* x_1059; obj* x_1060; -lean::dec(x_1056); -lean::dec(x_1001); -lean::dec(x_1); -x_1058 = lean::cnstr_get(x_1057, 0); -lean::inc(x_1058); -if (lean::is_exclusive(x_1057)) { - lean::cnstr_release(x_1057, 0); - x_1059 = x_1057; -} else { - lean::dec_ref(x_1057); - x_1059 = lean::box(0); -} -if (lean::is_scalar(x_1059)) { - x_1060 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1060 = x_1059; -} -lean::cnstr_set(x_1060, 0, x_1058); -return x_1060; -} -else -{ -obj* x_1061; obj* x_1062; obj* x_1063; obj* x_1064; obj* x_1065; obj* x_1066; obj* x_1067; obj* x_1068; obj* x_1069; obj* x_1070; obj* x_1071; obj* x_1072; -x_1061 = lean::cnstr_get(x_1057, 0); -lean::inc(x_1061); -lean::dec(x_1057); -x_1062 = lean::cnstr_get(x_1061, 1); -lean::inc(x_1062); -x_1063 = lean::cnstr_get(x_1061, 0); -lean::inc(x_1063); -if (lean::is_exclusive(x_1061)) { - lean::cnstr_release(x_1061, 0); - lean::cnstr_release(x_1061, 1); - x_1064 = x_1061; -} else { - lean::dec_ref(x_1061); - x_1064 = lean::box(0); -} -x_1065 = lean::cnstr_get(x_1062, 0); -lean::inc(x_1065); -x_1066 = lean::cnstr_get(x_1062, 1); -lean::inc(x_1066); -x_1067 = lean::cnstr_get(x_1062, 2); -lean::inc(x_1067); -x_1068 = lean::cnstr_get(x_1062, 3); -lean::inc(x_1068); -if (lean::is_exclusive(x_1062)) { - lean::cnstr_release(x_1062, 0); - lean::cnstr_release(x_1062, 1); - lean::cnstr_release(x_1062, 2); - lean::cnstr_release(x_1062, 3); - x_1069 = x_1062; -} else { - lean::dec_ref(x_1062); - x_1069 = lean::box(0); -} -if (lean::is_scalar(x_1064)) { - x_1070 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1070 = x_1064; -} -lean::cnstr_set(x_1070, 0, x_1056); -lean::cnstr_set(x_1070, 1, x_1063); -x_1071 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1071, 0, x_1070); -lean::cnstr_set(x_1071, 1, x_1067); -if (lean::is_scalar(x_1069)) { - x_1072 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1072 = x_1069; -} -lean::cnstr_set(x_1072, 0, x_1065); -lean::cnstr_set(x_1072, 1, x_1066); -lean::cnstr_set(x_1072, 2, x_1071); -lean::cnstr_set(x_1072, 3, x_1068); -x_2 = x_1001; -x_3 = x_1072; -goto _start; -} -} -else -{ -obj* x_1074; obj* x_1075; obj* x_1076; -x_1074 = lean::cnstr_get(x_1054, 0); -lean::inc(x_1074); -if (lean::is_exclusive(x_1054)) { - lean::cnstr_release(x_1054, 0); - x_1075 = x_1054; -} else { - lean::dec_ref(x_1054); - x_1075 = lean::box(0); -} -x_1076 = lean::cnstr_get(x_1074, 1); -lean::inc(x_1076); -lean::dec(x_1074); -switch (lean::obj_tag(x_1076)) { -case 0: -{ -obj* x_1077; obj* x_1078; obj* x_1079; -lean::dec(x_1076); -lean::dec(x_1075); -x_1077 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1077); -lean::dec(x_1006); -x_1078 = lean::cnstr_get(x_1053, 0); -lean::inc(x_1078); -lean::dec(x_1053); -x_1079 = l___private_init_lean_expander_1__popStxArg(x_1077, x_4); -if (lean::obj_tag(x_1079) == 0) -{ -obj* x_1080; obj* x_1081; obj* x_1082; -lean::dec(x_1078); -lean::dec(x_1001); -lean::dec(x_1); -x_1080 = lean::cnstr_get(x_1079, 0); -lean::inc(x_1080); -if (lean::is_exclusive(x_1079)) { - lean::cnstr_release(x_1079, 0); - x_1081 = x_1079; -} else { - lean::dec_ref(x_1079); - x_1081 = lean::box(0); -} -if (lean::is_scalar(x_1081)) { - x_1082 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1082 = x_1081; -} -lean::cnstr_set(x_1082, 0, x_1080); -return x_1082; -} -else -{ -obj* x_1083; obj* x_1084; obj* x_1085; obj* x_1086; obj* x_1087; obj* x_1088; obj* x_1089; obj* x_1090; obj* x_1091; obj* x_1092; obj* x_1093; obj* x_1094; -x_1083 = lean::cnstr_get(x_1079, 0); -lean::inc(x_1083); -lean::dec(x_1079); -x_1084 = lean::cnstr_get(x_1083, 1); -lean::inc(x_1084); -x_1085 = lean::cnstr_get(x_1083, 0); -lean::inc(x_1085); -if (lean::is_exclusive(x_1083)) { - lean::cnstr_release(x_1083, 0); - lean::cnstr_release(x_1083, 1); - x_1086 = x_1083; -} else { - lean::dec_ref(x_1083); - x_1086 = lean::box(0); -} -x_1087 = lean::cnstr_get(x_1084, 0); -lean::inc(x_1087); -x_1088 = lean::cnstr_get(x_1084, 1); -lean::inc(x_1088); -x_1089 = lean::cnstr_get(x_1084, 2); -lean::inc(x_1089); -x_1090 = lean::cnstr_get(x_1084, 3); -lean::inc(x_1090); -if (lean::is_exclusive(x_1084)) { - lean::cnstr_release(x_1084, 0); - lean::cnstr_release(x_1084, 1); - lean::cnstr_release(x_1084, 2); - lean::cnstr_release(x_1084, 3); - x_1091 = x_1084; -} else { - lean::dec_ref(x_1084); - x_1091 = lean::box(0); -} -if (lean::is_scalar(x_1086)) { - x_1092 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1092 = x_1086; -} -lean::cnstr_set(x_1092, 0, x_1078); -lean::cnstr_set(x_1092, 1, x_1085); -x_1093 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1093, 0, x_1092); -lean::cnstr_set(x_1093, 1, x_1089); -if (lean::is_scalar(x_1091)) { - x_1094 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1094 = x_1091; -} -lean::cnstr_set(x_1094, 0, x_1087); -lean::cnstr_set(x_1094, 1, x_1088); -lean::cnstr_set(x_1094, 2, x_1093); -lean::cnstr_set(x_1094, 3, x_1090); -x_2 = x_1001; -x_3 = x_1094; -goto _start; -} -} -case 2: -{ -obj* x_1096; obj* x_1097; obj* x_1098; obj* x_1099; -x_1096 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1096); -lean::dec(x_1006); -x_1097 = lean::cnstr_get(x_1053, 0); -lean::inc(x_1097); -lean::dec(x_1053); -x_1098 = lean::cnstr_get(x_1076, 0); -lean::inc(x_1098); -lean::dec(x_1076); -x_1099 = l___private_init_lean_expander_1__popStxArg(x_1096, x_4); -if (lean::obj_tag(x_1099) == 0) -{ -obj* x_1100; obj* x_1101; obj* x_1102; -lean::dec(x_1098); -lean::dec(x_1097); -lean::dec(x_1075); -lean::dec(x_1001); -lean::dec(x_1); -x_1100 = lean::cnstr_get(x_1099, 0); -lean::inc(x_1100); -if (lean::is_exclusive(x_1099)) { - lean::cnstr_release(x_1099, 0); - x_1101 = x_1099; -} else { - lean::dec_ref(x_1099); - x_1101 = lean::box(0); -} -if (lean::is_scalar(x_1101)) { - x_1102 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1102 = x_1101; -} -lean::cnstr_set(x_1102, 0, x_1100); -return x_1102; -} -else -{ -obj* x_1103; obj* x_1104; obj* x_1105; -x_1103 = lean::cnstr_get(x_1099, 0); -lean::inc(x_1103); -lean::dec(x_1099); -x_1104 = lean::cnstr_get(x_1103, 1); -lean::inc(x_1104); -x_1105 = lean::cnstr_get(x_1104, 3); -lean::inc(x_1105); -if (lean::obj_tag(x_1105) == 0) -{ -obj* x_1106; obj* x_1107; obj* x_1108; -lean::dec(x_1103); -lean::dec(x_1098); -lean::dec(x_1097); -lean::inc(x_1); -if (lean::is_scalar(x_1075)) { - x_1106 = lean::alloc_cnstr(1, 1, 0); -} else { - x_1106 = x_1075; -} -lean::cnstr_set(x_1106, 0, x_1); -x_1107 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_1108 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_1106, x_1107, x_1104, x_4); -lean::dec(x_1104); -lean::dec(x_1106); -if (lean::obj_tag(x_1108) == 0) -{ -obj* x_1109; obj* x_1110; obj* x_1111; -lean::dec(x_1001); -lean::dec(x_1); -x_1109 = lean::cnstr_get(x_1108, 0); -lean::inc(x_1109); -if (lean::is_exclusive(x_1108)) { - lean::cnstr_release(x_1108, 0); - x_1110 = x_1108; -} else { - lean::dec_ref(x_1108); - x_1110 = lean::box(0); -} -if (lean::is_scalar(x_1110)) { - x_1111 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1111 = x_1110; -} -lean::cnstr_set(x_1111, 0, x_1109); -return x_1111; -} -else -{ -obj* x_1112; obj* x_1113; -x_1112 = lean::cnstr_get(x_1108, 0); -lean::inc(x_1112); -lean::dec(x_1108); -x_1113 = lean::cnstr_get(x_1112, 1); -lean::inc(x_1113); -lean::dec(x_1112); -x_2 = x_1001; -x_3 = x_1113; -goto _start; -} -} -else -{ -obj* x_1115; obj* x_1116; obj* x_1117; obj* x_1118; obj* x_1119; obj* x_1120; obj* x_1121; obj* x_1122; obj* x_1123; obj* x_1124; obj* x_1125; obj* x_1126; obj* x_1127; obj* x_1128; obj* x_1129; obj* x_1130; obj* x_1131; obj* x_1132; obj* x_1133; obj* x_1134; obj* x_1135; obj* x_1136; obj* x_1137; obj* x_1138; obj* x_1139; obj* x_1140; obj* x_1141; obj* x_1142; obj* x_1143; obj* x_1144; -lean::dec(x_1075); -x_1115 = lean::cnstr_get(x_1103, 0); -lean::inc(x_1115); -if (lean::is_exclusive(x_1103)) { - lean::cnstr_release(x_1103, 0); - lean::cnstr_release(x_1103, 1); - x_1116 = x_1103; -} else { - lean::dec_ref(x_1103); - x_1116 = lean::box(0); -} -x_1117 = lean::cnstr_get(x_1104, 0); -lean::inc(x_1117); -x_1118 = lean::cnstr_get(x_1104, 1); -lean::inc(x_1118); -x_1119 = lean::cnstr_get(x_1104, 2); -lean::inc(x_1119); -if (lean::is_exclusive(x_1104)) { - lean::cnstr_release(x_1104, 0); - lean::cnstr_release(x_1104, 1); - lean::cnstr_release(x_1104, 2); - lean::cnstr_release(x_1104, 3); - x_1120 = x_1104; -} else { - lean::dec_ref(x_1104); - x_1120 = lean::box(0); -} -x_1121 = lean::cnstr_get(x_1105, 0); -lean::inc(x_1121); -x_1122 = l_Lean_Parser_Term_lambda_HasView; -x_1123 = lean::cnstr_get(x_1122, 1); -lean::inc(x_1123); -x_1124 = lean::box(0); -x_1125 = lean::cnstr_get(x_1098, 3); -lean::inc(x_1125); -x_1126 = lean::box(0); -x_1127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1127, 0, x_1125); -lean::cnstr_set(x_1127, 1, x_1126); -x_1128 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__3(x_1127); -x_1129 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1129, 0, x_1128); -lean::cnstr_set(x_1129, 1, x_1124); -x_1130 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_1130, 0, x_1129); -x_1131 = lean::cnstr_get(x_1098, 5); -lean::inc(x_1131); -lean::dec(x_1098); -x_1132 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_1133 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_1134 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_1134, 0, x_1132); -lean::cnstr_set(x_1134, 1, x_1130); -lean::cnstr_set(x_1134, 2, x_1133); -lean::cnstr_set(x_1134, 3, x_1131); -lean::inc(x_1123); -x_1135 = lean::apply_1(x_1123, x_1134); -x_1136 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_1136, 0, x_1132); -lean::cnstr_set(x_1136, 1, x_1121); -lean::cnstr_set(x_1136, 2, x_1133); -lean::cnstr_set(x_1136, 3, x_1115); -x_1137 = lean::apply_1(x_1123, x_1136); -x_1138 = l_Lean_Parser_Term_app_HasView; -x_1139 = lean::cnstr_get(x_1138, 1); -lean::inc(x_1139); -x_1140 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1140, 0, x_1135); -lean::cnstr_set(x_1140, 1, x_1137); -x_1141 = lean::apply_1(x_1139, x_1140); -if (lean::is_scalar(x_1116)) { - x_1142 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1142 = x_1116; -} -lean::cnstr_set(x_1142, 0, x_1097); -lean::cnstr_set(x_1142, 1, x_1141); -x_1143 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_1143, 0, x_1142); -lean::cnstr_set(x_1143, 1, x_1119); -if (lean::is_scalar(x_1120)) { - x_1144 = lean::alloc_cnstr(0, 4, 0); -} else { - x_1144 = x_1120; -} -lean::cnstr_set(x_1144, 0, x_1117); -lean::cnstr_set(x_1144, 1, x_1118); -lean::cnstr_set(x_1144, 2, x_1143); -lean::cnstr_set(x_1144, 3, x_1105); -x_2 = x_1001; -x_3 = x_1144; -goto _start; -} -} -} -default: -{ -obj* x_1146; obj* x_1147; obj* x_1148; obj* x_1149; -lean::dec(x_1076); -lean::dec(x_1053); -x_1146 = lean::cnstr_get(x_1006, 1); -lean::inc(x_1146); -lean::dec(x_1006); -lean::inc(x_1); -if (lean::is_scalar(x_1075)) { - x_1147 = lean::alloc_cnstr(1, 1, 0); -} else { - x_1147 = x_1075; -} -lean::cnstr_set(x_1147, 0, x_1); -x_1148 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1; -x_1149 = l_Lean_Expander_error___at___private_init_lean_expander_1__popStxArg___spec__1___rarg(x_1147, x_1148, x_1146, x_4); -lean::dec(x_1146); -lean::dec(x_1147); -if (lean::obj_tag(x_1149) == 0) -{ -obj* x_1150; obj* x_1151; obj* x_1152; -lean::dec(x_1001); -lean::dec(x_1); -x_1150 = lean::cnstr_get(x_1149, 0); -lean::inc(x_1150); -if (lean::is_exclusive(x_1149)) { - lean::cnstr_release(x_1149, 0); - x_1151 = x_1149; -} else { - lean::dec_ref(x_1149); - x_1151 = lean::box(0); -} -if (lean::is_scalar(x_1151)) { - x_1152 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1152 = x_1151; -} -lean::cnstr_set(x_1152, 0, x_1150); -return x_1152; -} -else -{ -obj* x_1153; obj* x_1154; -x_1153 = lean::cnstr_get(x_1149, 0); -lean::inc(x_1153); -lean::dec(x_1149); -x_1154 = lean::cnstr_get(x_1153, 1); -lean::inc(x_1154); -lean::dec(x_1153); -x_2 = x_1001; -x_3 = x_1154; -goto _start; -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_Lean_Expander_mkNotationTransformer___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_Lean_Parser_identUnivs; -x_4 = l_Lean_Parser_tryView___at_Lean_Expander_mkNotationTransformer___spec__6(x_3, x_2); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; -x_5 = lean::box(0); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_4, 0); -lean::inc(x_6); -lean::dec(x_4); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -x_9 = lean::cnstr_get(x_8, 2); -lean::inc(x_9); -lean::dec(x_8); -x_10 = l_List_lookup___main___at_Lean_Expander_mkNotationTransformer___spec__7(x_9, x_1); -lean::dec(x_9); -return x_10; -} -else -{ -obj* x_11; -lean::dec(x_7); -lean::dec(x_6); -x_11 = lean::box(0); -return x_11; -} -} -} -} -obj* l_Lean_Expander_mkNotationTransformer(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -lean::inc(x_2); -x_4 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_1); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_2); -x_6 = l___private_init_lean_expander_1__popStxArg___closed__1; -x_7 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_5, x_6, x_3); -lean::dec(x_5); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_4); -if (x_8 == 0) -{ -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_9 = lean::cnstr_get(x_4, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::box(0); -x_12 = lean::box(0); -lean::inc(x_2); -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_2); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_11); -lean::cnstr_set(x_13, 3, x_12); -x_14 = lean::cnstr_get(x_1, 1); -lean::inc(x_14); -lean::dec(x_1); -x_15 = lean::cnstr_get(x_14, 2); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4(x_2, x_17, x_13, x_3); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_14); -lean::free_heap_obj(x_4); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -x_25 = lean::cnstr_get(x_24, 2); -lean::inc(x_25); -lean::dec(x_24); -x_26 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_27, 0, x_26); -x_28 = lean::cnstr_get(x_14, 4); -lean::inc(x_28); -lean::dec(x_14); -x_29 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_27, x_28); -lean::cnstr_set(x_4, 0, x_29); -lean::cnstr_set(x_18, 0, x_4); -return x_18; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_30 = lean::cnstr_get(x_18, 0); -lean::inc(x_30); -lean::dec(x_18); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -x_32 = lean::cnstr_get(x_31, 2); -lean::inc(x_32); -lean::dec(x_31); -x_33 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_34, 0, x_33); -x_35 = lean::cnstr_get(x_14, 4); -lean::inc(x_35); -lean::dec(x_14); -x_36 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_34, x_35); -lean::cnstr_set(x_4, 0, x_36); -x_37 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_37, 0, x_4); -return x_37; -} -} -} -else -{ -uint8 x_38; -lean::free_heap_obj(x_4); -x_38 = !lean::is_exclusive(x_16); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_16, 0); -x_40 = l___private_init_lean_expander_1__popStxArg(x_13, x_3); -if (lean::obj_tag(x_40) == 0) -{ -uint8 x_41; -lean::free_heap_obj(x_16); -lean::dec(x_39); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_2); -x_41 = !lean::is_exclusive(x_40); -if (x_41 == 0) -{ -return x_40; -} -else -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_40, 0); -lean::inc(x_42); -lean::dec(x_40); -x_43 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -else -{ -obj* x_44; uint8 x_45; -x_44 = lean::cnstr_get(x_40, 0); -lean::inc(x_44); -lean::dec(x_40); -x_45 = !lean::is_exclusive(x_44); -if (x_45 == 0) -{ -obj* x_46; uint8 x_47; -x_46 = lean::cnstr_get(x_44, 1); -x_47 = !lean::is_exclusive(x_46); -if (x_47 == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_48 = lean::cnstr_get(x_44, 0); -x_49 = lean::cnstr_get(x_46, 2); -lean::cnstr_set(x_44, 1, x_48); -lean::cnstr_set(x_44, 0, x_39); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_44); -lean::cnstr_set(x_50, 1, x_49); -lean::cnstr_set(x_46, 2, x_50); -x_51 = lean::cnstr_get(x_15, 1); -lean::inc(x_51); -lean::dec(x_15); -x_52 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8(x_2, x_51, x_46, x_3); -if (lean::obj_tag(x_52) == 0) -{ -uint8 x_53; -lean::free_heap_obj(x_16); -lean::dec(x_14); -x_53 = !lean::is_exclusive(x_52); -if (x_53 == 0) -{ -return x_52; -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_52, 0); -lean::inc(x_54); -lean::dec(x_52); -x_55 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -else -{ -uint8 x_56; -x_56 = !lean::is_exclusive(x_52); -if (x_56 == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_57 = lean::cnstr_get(x_52, 0); -x_58 = lean::cnstr_get(x_57, 1); -lean::inc(x_58); -lean::dec(x_57); -x_59 = lean::cnstr_get(x_58, 2); -lean::inc(x_59); -lean::dec(x_58); -x_60 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_59); -x_61 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_61, 0, x_60); -x_62 = lean::cnstr_get(x_14, 4); -lean::inc(x_62); -lean::dec(x_14); -x_63 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_61, x_62); -lean::cnstr_set(x_16, 0, x_63); -lean::cnstr_set(x_52, 0, x_16); -return x_52; -} -else -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_64 = lean::cnstr_get(x_52, 0); -lean::inc(x_64); -lean::dec(x_52); -x_65 = lean::cnstr_get(x_64, 1); -lean::inc(x_65); -lean::dec(x_64); -x_66 = lean::cnstr_get(x_65, 2); -lean::inc(x_66); -lean::dec(x_65); -x_67 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_66); -x_68 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_68, 0, x_67); -x_69 = lean::cnstr_get(x_14, 4); -lean::inc(x_69); -lean::dec(x_14); -x_70 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_68, x_69); -lean::cnstr_set(x_16, 0, x_70); -x_71 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_71, 0, x_16); -return x_71; -} -} -} -else -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_72 = lean::cnstr_get(x_44, 0); -x_73 = lean::cnstr_get(x_46, 0); -x_74 = lean::cnstr_get(x_46, 1); -x_75 = lean::cnstr_get(x_46, 2); -x_76 = lean::cnstr_get(x_46, 3); -lean::inc(x_76); -lean::inc(x_75); -lean::inc(x_74); -lean::inc(x_73); -lean::dec(x_46); -lean::cnstr_set(x_44, 1, x_72); -lean::cnstr_set(x_44, 0, x_39); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_44); -lean::cnstr_set(x_77, 1, x_75); -x_78 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_78, 0, x_73); -lean::cnstr_set(x_78, 1, x_74); -lean::cnstr_set(x_78, 2, x_77); -lean::cnstr_set(x_78, 3, x_76); -x_79 = lean::cnstr_get(x_15, 1); -lean::inc(x_79); -lean::dec(x_15); -x_80 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8(x_2, x_79, x_78, x_3); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; obj* x_82; obj* x_83; -lean::free_heap_obj(x_16); -lean::dec(x_14); -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - x_82 = x_80; -} else { - lean::dec_ref(x_80); - x_82 = lean::box(0); -} -if (lean::is_scalar(x_82)) { - x_83 = lean::alloc_cnstr(0, 1, 0); -} else { - x_83 = x_82; -} -lean::cnstr_set(x_83, 0, x_81); -return x_83; -} -else -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_84 = lean::cnstr_get(x_80, 0); -lean::inc(x_84); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - x_85 = x_80; -} else { - lean::dec_ref(x_80); - x_85 = lean::box(0); -} -x_86 = lean::cnstr_get(x_84, 1); -lean::inc(x_86); -lean::dec(x_84); -x_87 = lean::cnstr_get(x_86, 2); -lean::inc(x_87); -lean::dec(x_86); -x_88 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_87); -x_89 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_89, 0, x_88); -x_90 = lean::cnstr_get(x_14, 4); -lean::inc(x_90); -lean::dec(x_14); -x_91 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_89, x_90); -lean::cnstr_set(x_16, 0, x_91); -if (lean::is_scalar(x_85)) { - x_92 = lean::alloc_cnstr(1, 1, 0); -} else { - x_92 = x_85; -} -lean::cnstr_set(x_92, 0, x_16); -return x_92; -} -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_93 = lean::cnstr_get(x_44, 1); -x_94 = lean::cnstr_get(x_44, 0); -lean::inc(x_93); -lean::inc(x_94); -lean::dec(x_44); -x_95 = lean::cnstr_get(x_93, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_93, 1); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_93, 2); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_93, 3); -lean::inc(x_98); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - lean::cnstr_release(x_93, 1); - lean::cnstr_release(x_93, 2); - lean::cnstr_release(x_93, 3); - x_99 = x_93; -} else { - lean::dec_ref(x_93); - x_99 = lean::box(0); -} -x_100 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_100, 0, x_39); -lean::cnstr_set(x_100, 1, x_94); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_97); -if (lean::is_scalar(x_99)) { - x_102 = lean::alloc_cnstr(0, 4, 0); -} else { - x_102 = x_99; -} -lean::cnstr_set(x_102, 0, x_95); -lean::cnstr_set(x_102, 1, x_96); -lean::cnstr_set(x_102, 2, x_101); -lean::cnstr_set(x_102, 3, x_98); -x_103 = lean::cnstr_get(x_15, 1); -lean::inc(x_103); -lean::dec(x_15); -x_104 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8(x_2, x_103, x_102, x_3); -if (lean::obj_tag(x_104) == 0) -{ -obj* x_105; obj* x_106; obj* x_107; -lean::free_heap_obj(x_16); -lean::dec(x_14); -x_105 = lean::cnstr_get(x_104, 0); -lean::inc(x_105); -if (lean::is_exclusive(x_104)) { - lean::cnstr_release(x_104, 0); - x_106 = x_104; -} else { - lean::dec_ref(x_104); - x_106 = lean::box(0); -} -if (lean::is_scalar(x_106)) { - x_107 = lean::alloc_cnstr(0, 1, 0); -} else { - x_107 = x_106; -} -lean::cnstr_set(x_107, 0, x_105); -return x_107; -} -else -{ -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; -x_108 = lean::cnstr_get(x_104, 0); -lean::inc(x_108); -if (lean::is_exclusive(x_104)) { - lean::cnstr_release(x_104, 0); - x_109 = x_104; -} else { - lean::dec_ref(x_104); - x_109 = lean::box(0); -} -x_110 = lean::cnstr_get(x_108, 1); -lean::inc(x_110); -lean::dec(x_108); -x_111 = lean::cnstr_get(x_110, 2); -lean::inc(x_111); -lean::dec(x_110); -x_112 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_111); -x_113 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_113, 0, x_112); -x_114 = lean::cnstr_get(x_14, 4); -lean::inc(x_114); -lean::dec(x_14); -x_115 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_113, x_114); -lean::cnstr_set(x_16, 0, x_115); -if (lean::is_scalar(x_109)) { - x_116 = lean::alloc_cnstr(1, 1, 0); -} else { - x_116 = x_109; -} -lean::cnstr_set(x_116, 0, x_16); -return x_116; -} -} -} -} -else -{ -obj* x_117; obj* x_118; -x_117 = lean::cnstr_get(x_16, 0); -lean::inc(x_117); -lean::dec(x_16); -x_118 = l___private_init_lean_expander_1__popStxArg(x_13, x_3); -if (lean::obj_tag(x_118) == 0) -{ -obj* x_119; obj* x_120; obj* x_121; -lean::dec(x_117); -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_2); -x_119 = lean::cnstr_get(x_118, 0); -lean::inc(x_119); -if (lean::is_exclusive(x_118)) { - lean::cnstr_release(x_118, 0); - x_120 = x_118; -} else { - lean::dec_ref(x_118); - x_120 = lean::box(0); -} -if (lean::is_scalar(x_120)) { - x_121 = lean::alloc_cnstr(0, 1, 0); -} else { - x_121 = x_120; -} -lean::cnstr_set(x_121, 0, x_119); -return x_121; -} -else -{ -obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; -x_122 = lean::cnstr_get(x_118, 0); -lean::inc(x_122); -lean::dec(x_118); -x_123 = lean::cnstr_get(x_122, 1); -lean::inc(x_123); -x_124 = lean::cnstr_get(x_122, 0); -lean::inc(x_124); -if (lean::is_exclusive(x_122)) { - lean::cnstr_release(x_122, 0); - lean::cnstr_release(x_122, 1); - x_125 = x_122; -} else { - lean::dec_ref(x_122); - x_125 = lean::box(0); -} -x_126 = lean::cnstr_get(x_123, 0); -lean::inc(x_126); -x_127 = lean::cnstr_get(x_123, 1); -lean::inc(x_127); -x_128 = lean::cnstr_get(x_123, 2); -lean::inc(x_128); -x_129 = lean::cnstr_get(x_123, 3); -lean::inc(x_129); -if (lean::is_exclusive(x_123)) { - lean::cnstr_release(x_123, 0); - lean::cnstr_release(x_123, 1); - lean::cnstr_release(x_123, 2); - lean::cnstr_release(x_123, 3); - x_130 = x_123; -} else { - lean::dec_ref(x_123); - x_130 = lean::box(0); -} -if (lean::is_scalar(x_125)) { - x_131 = lean::alloc_cnstr(0, 2, 0); -} else { - x_131 = x_125; -} -lean::cnstr_set(x_131, 0, x_117); -lean::cnstr_set(x_131, 1, x_124); -x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_131); -lean::cnstr_set(x_132, 1, x_128); -if (lean::is_scalar(x_130)) { - x_133 = lean::alloc_cnstr(0, 4, 0); -} else { - x_133 = x_130; -} -lean::cnstr_set(x_133, 0, x_126); -lean::cnstr_set(x_133, 1, x_127); -lean::cnstr_set(x_133, 2, x_132); -lean::cnstr_set(x_133, 3, x_129); -x_134 = lean::cnstr_get(x_15, 1); -lean::inc(x_134); -lean::dec(x_15); -x_135 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8(x_2, x_134, x_133, x_3); -if (lean::obj_tag(x_135) == 0) -{ -obj* x_136; obj* x_137; obj* x_138; -lean::dec(x_14); -x_136 = lean::cnstr_get(x_135, 0); -lean::inc(x_136); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - x_137 = x_135; -} else { - lean::dec_ref(x_135); - x_137 = lean::box(0); -} -if (lean::is_scalar(x_137)) { - x_138 = lean::alloc_cnstr(0, 1, 0); -} else { - x_138 = x_137; -} -lean::cnstr_set(x_138, 0, x_136); -return x_138; -} -else -{ -obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; -x_139 = lean::cnstr_get(x_135, 0); -lean::inc(x_139); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - x_140 = x_135; -} else { - lean::dec_ref(x_135); - x_140 = lean::box(0); -} -x_141 = lean::cnstr_get(x_139, 1); -lean::inc(x_141); -lean::dec(x_139); -x_142 = lean::cnstr_get(x_141, 2); -lean::inc(x_142); -lean::dec(x_141); -x_143 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_142); -x_144 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_144, 0, x_143); -x_145 = lean::cnstr_get(x_14, 4); -lean::inc(x_145); -lean::dec(x_14); -x_146 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_144, x_145); -x_147 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_147, 0, x_146); -if (lean::is_scalar(x_140)) { - x_148 = lean::alloc_cnstr(1, 1, 0); -} else { - x_148 = x_140; -} -lean::cnstr_set(x_148, 0, x_147); -return x_148; -} -} -} -} -} -else -{ -obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; -x_149 = lean::cnstr_get(x_4, 0); -lean::inc(x_149); -lean::dec(x_4); -x_150 = lean::cnstr_get(x_149, 1); -lean::inc(x_150); -lean::dec(x_149); -x_151 = lean::box(0); -x_152 = lean::box(0); -lean::inc(x_2); -x_153 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_153, 0, x_2); -lean::cnstr_set(x_153, 1, x_150); -lean::cnstr_set(x_153, 2, x_151); -lean::cnstr_set(x_153, 3, x_152); -x_154 = lean::cnstr_get(x_1, 1); -lean::inc(x_154); -lean::dec(x_1); -x_155 = lean::cnstr_get(x_154, 2); -lean::inc(x_155); -x_156 = lean::cnstr_get(x_155, 0); -lean::inc(x_156); -if (lean::obj_tag(x_156) == 0) -{ -obj* x_157; obj* x_158; -x_157 = lean::cnstr_get(x_155, 1); -lean::inc(x_157); -lean::dec(x_155); -x_158 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4(x_2, x_157, x_153, x_3); -if (lean::obj_tag(x_158) == 0) -{ -obj* x_159; obj* x_160; obj* x_161; -lean::dec(x_154); -x_159 = lean::cnstr_get(x_158, 0); -lean::inc(x_159); -if (lean::is_exclusive(x_158)) { - lean::cnstr_release(x_158, 0); - x_160 = x_158; -} else { - lean::dec_ref(x_158); - x_160 = lean::box(0); -} -if (lean::is_scalar(x_160)) { - x_161 = lean::alloc_cnstr(0, 1, 0); -} else { - x_161 = x_160; -} -lean::cnstr_set(x_161, 0, x_159); -return x_161; -} -else -{ -obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; -x_162 = lean::cnstr_get(x_158, 0); -lean::inc(x_162); -if (lean::is_exclusive(x_158)) { - lean::cnstr_release(x_158, 0); - x_163 = x_158; -} else { - lean::dec_ref(x_158); - x_163 = lean::box(0); -} -x_164 = lean::cnstr_get(x_162, 1); -lean::inc(x_164); -lean::dec(x_162); -x_165 = lean::cnstr_get(x_164, 2); -lean::inc(x_165); -lean::dec(x_164); -x_166 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_165); -x_167 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_167, 0, x_166); -x_168 = lean::cnstr_get(x_154, 4); -lean::inc(x_168); -lean::dec(x_154); -x_169 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_167, x_168); -x_170 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_170, 0, x_169); -if (lean::is_scalar(x_163)) { - x_171 = lean::alloc_cnstr(1, 1, 0); -} else { - x_171 = x_163; -} -lean::cnstr_set(x_171, 0, x_170); -return x_171; -} -} -else -{ -obj* x_172; obj* x_173; obj* x_174; -x_172 = lean::cnstr_get(x_156, 0); -lean::inc(x_172); -if (lean::is_exclusive(x_156)) { - lean::cnstr_release(x_156, 0); - x_173 = x_156; -} else { - lean::dec_ref(x_156); - x_173 = lean::box(0); -} -x_174 = l___private_init_lean_expander_1__popStxArg(x_153, x_3); -if (lean::obj_tag(x_174) == 0) -{ -obj* x_175; obj* x_176; obj* x_177; -lean::dec(x_173); -lean::dec(x_172); -lean::dec(x_155); -lean::dec(x_154); -lean::dec(x_2); -x_175 = lean::cnstr_get(x_174, 0); -lean::inc(x_175); -if (lean::is_exclusive(x_174)) { - lean::cnstr_release(x_174, 0); - x_176 = x_174; -} else { - lean::dec_ref(x_174); - x_176 = lean::box(0); -} -if (lean::is_scalar(x_176)) { - x_177 = lean::alloc_cnstr(0, 1, 0); -} else { - x_177 = x_176; -} -lean::cnstr_set(x_177, 0, x_175); -return x_177; -} -else -{ -obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; -x_178 = lean::cnstr_get(x_174, 0); -lean::inc(x_178); -lean::dec(x_174); -x_179 = lean::cnstr_get(x_178, 1); -lean::inc(x_179); -x_180 = lean::cnstr_get(x_178, 0); -lean::inc(x_180); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - x_181 = x_178; -} else { - lean::dec_ref(x_178); - x_181 = lean::box(0); -} -x_182 = lean::cnstr_get(x_179, 0); -lean::inc(x_182); -x_183 = lean::cnstr_get(x_179, 1); -lean::inc(x_183); -x_184 = lean::cnstr_get(x_179, 2); -lean::inc(x_184); -x_185 = lean::cnstr_get(x_179, 3); -lean::inc(x_185); -if (lean::is_exclusive(x_179)) { - lean::cnstr_release(x_179, 0); - lean::cnstr_release(x_179, 1); - lean::cnstr_release(x_179, 2); - lean::cnstr_release(x_179, 3); - x_186 = x_179; -} else { - lean::dec_ref(x_179); - x_186 = lean::box(0); -} -if (lean::is_scalar(x_181)) { - x_187 = lean::alloc_cnstr(0, 2, 0); -} else { - x_187 = x_181; -} -lean::cnstr_set(x_187, 0, x_172); -lean::cnstr_set(x_187, 1, x_180); -x_188 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set(x_188, 1, x_184); -if (lean::is_scalar(x_186)) { - x_189 = lean::alloc_cnstr(0, 4, 0); -} else { - x_189 = x_186; -} -lean::cnstr_set(x_189, 0, x_182); -lean::cnstr_set(x_189, 1, x_183); -lean::cnstr_set(x_189, 2, x_188); -lean::cnstr_set(x_189, 3, x_185); -x_190 = lean::cnstr_get(x_155, 1); -lean::inc(x_190); -lean::dec(x_155); -x_191 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8(x_2, x_190, x_189, x_3); -if (lean::obj_tag(x_191) == 0) -{ -obj* x_192; obj* x_193; obj* x_194; -lean::dec(x_173); -lean::dec(x_154); -x_192 = lean::cnstr_get(x_191, 0); -lean::inc(x_192); -if (lean::is_exclusive(x_191)) { - lean::cnstr_release(x_191, 0); - x_193 = x_191; -} else { - lean::dec_ref(x_191); - x_193 = lean::box(0); -} -if (lean::is_scalar(x_193)) { - x_194 = lean::alloc_cnstr(0, 1, 0); -} else { - x_194 = x_193; -} -lean::cnstr_set(x_194, 0, x_192); -return x_194; -} -else -{ -obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; -x_195 = lean::cnstr_get(x_191, 0); -lean::inc(x_195); -if (lean::is_exclusive(x_191)) { - lean::cnstr_release(x_191, 0); - x_196 = x_191; -} else { - lean::dec_ref(x_191); - x_196 = lean::box(0); -} -x_197 = lean::cnstr_get(x_195, 1); -lean::inc(x_197); -lean::dec(x_195); -x_198 = lean::cnstr_get(x_197, 2); -lean::inc(x_198); -lean::dec(x_197); -x_199 = l_List_map___main___at_Lean_Expander_mkNotationTransformer___spec__5(x_198); -x_200 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mkNotationTransformer___lambda__1___boxed), 2, 1); -lean::closure_set(x_200, 0, x_199); -x_201 = lean::cnstr_get(x_154, 4); -lean::inc(x_201); -lean::dec(x_154); -x_202 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_200, x_201); -if (lean::is_scalar(x_173)) { - x_203 = lean::alloc_cnstr(1, 1, 0); -} else { - x_203 = x_173; -} -lean::cnstr_set(x_203, 0, x_202); -if (lean::is_scalar(x_196)) { - x_204 = lean::alloc_cnstr(1, 1, 0); -} else { - x_204 = x_196; -} -lean::cnstr_set(x_204, 0, x_203); -return x_204; -} -} -} -} -} -} -} -obj* l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_Lean_Parser_tryView___at_Lean_Expander_mkNotationTransformer___spec__6___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_tryView___at_Lean_Expander_mkNotationTransformer___spec__6(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_List_lookup___main___at_Lean_Expander_mkNotationTransformer___spec__7___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_lookup___main___at_Lean_Expander_mkNotationTransformer___spec__7(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__8(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_Lean_Expander_mkNotationTransformer___lambda__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_mkNotationTransformer___lambda__1(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Expander_mkNotationTransformer___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Expander_mkNotationTransformer(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* _init_l_Lean_Expander_mixfixToNotationSpec___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::box(0); -x_4 = lean::mk_string("b"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("."); -lean::inc(x_5); -x_7 = l_Lean_Name_toStringWithSep___main(x_6, x_5); -lean::dec(x_6); -x_8 = l_Lean_Parser_Substring_ofString(x_7); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_2); -lean::cnstr_set(x_9, 4, x_2); -return x_9; -} -} -obj* _init_l_Lean_Expander_mixfixToNotationSpec___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("a"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_3); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_3); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -return x_10; -} -} -obj* _init_l_Lean_Expander_mixfixToNotationSpec___closed__3() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::box(0); -x_4 = lean::mk_string("b"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("."); -lean::inc(x_5); -x_7 = l_Lean_Name_toStringWithSep___main(x_6, x_5); -lean::dec(x_6); -x_8 = l_Lean_Parser_Substring_ofString(x_7); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_2); -lean::cnstr_set(x_9, 4, 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_1); -x_11 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -return x_12; -} -} -obj* _init_l_Lean_Expander_mixfixToNotationSpec___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string(":"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mixfixToNotationSpec___closed__5() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_string("b"); -x_4 = lean_name_mk_string(x_2, x_3); -x_5 = lean::mk_string("."); -lean::inc(x_4); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_4); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_1); -x_11 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -return x_12; -} -} -obj* _init_l_Lean_Expander_mixfixToNotationSpec___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_string("b"); -x_4 = lean_name_mk_string(x_2, x_3); -x_5 = lean::mk_string("."); -lean::inc(x_4); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_4); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -return x_9; -} -} -obj* _init_l_Lean_Expander_mixfixToNotationSpec___closed__7() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("invalid `infixr` declaration, given precedence must greater than zero"); -return x_1; -} -} -obj* l_Lean_Expander_mixfixToNotationSpec(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_2, 3); -lean::inc(x_16); -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_56; obj* x_57; -x_56 = lean::box(0); -x_57 = lean::box(0); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_58 = l_Lean_Expander_mixfixToNotationSpec___closed__5; -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_2); -lean::cnstr_set(x_59, 1, x_58); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_57); -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_56); -lean::cnstr_set(x_61, 1, x_60); -x_62 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_62, 0, x_61); -return x_62; -} -else -{ -uint8 x_63; -x_63 = !lean::is_exclusive(x_16); -if (x_63 == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_64 = lean::cnstr_get(x_16, 0); -x_65 = lean::cnstr_get(x_64, 1); -lean::inc(x_65); -lean::dec(x_64); -x_66 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_66, 0, x_65); -x_67 = l_Lean_Expander_mixfixToNotationSpec___closed__4; -x_68 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_66); -lean::cnstr_set(x_16, 0, x_68); -x_69 = l_Lean_Expander_mixfixToNotationSpec___closed__6; -x_70 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_16); -x_71 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_71, 0, x_70); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_2); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_57); -x_75 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_75, 0, x_56); -lean::cnstr_set(x_75, 1, x_74); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -return x_76; -} -else -{ -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; -x_77 = lean::cnstr_get(x_16, 0); -lean::inc(x_77); -lean::dec(x_16); -x_78 = lean::cnstr_get(x_77, 1); -lean::inc(x_78); -lean::dec(x_77); -x_79 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -x_80 = l_Lean_Expander_mixfixToNotationSpec___closed__4; -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_79); -x_82 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -x_83 = l_Lean_Expander_mixfixToNotationSpec___closed__6; -x_84 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_82); -x_85 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -x_86 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_86, 0, x_85); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_2); -lean::cnstr_set(x_87, 1, x_86); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_57); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_56); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_90, 0, x_89); -return x_90; -} -} -} -case 3: -{ -if (lean::obj_tag(x_16) == 0) -{ -obj* x_91; -x_91 = lean::box(0); -x_4 = x_91; -goto block_15; -} -else -{ -uint8 x_92; -x_92 = !lean::is_exclusive(x_16); -if (x_92 == 0) -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; uint8 x_97; -x_93 = lean::cnstr_get(x_16, 0); -x_94 = lean::cnstr_get(x_93, 1); -lean::inc(x_94); -x_95 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_94); -x_96 = lean::mk_nat_obj(0u); -x_97 = lean::nat_dec_eq(x_95, x_96); -if (x_97 == 0) -{ -obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; -lean::dec(x_93); -x_98 = lean::mk_nat_obj(1u); -x_99 = lean::nat_sub(x_95, x_98); -lean::dec(x_95); -x_100 = l_Lean_Parser_number_View_ofNat(x_99); -x_101 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_101, 0, x_100); -x_102 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_102, 0, x_101); -x_103 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_103, 0, x_102); -x_104 = l_Lean_Expander_mixfixToNotationSpec___closed__4; -x_105 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_103); -lean::cnstr_set(x_16, 0, x_105); -x_4 = x_16; -goto block_15; -} -else -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -lean::dec(x_95); -x_106 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_107 = lean::cnstr_get(x_106, 1); -lean::inc(x_107); -x_108 = lean::apply_1(x_107, x_93); -lean::cnstr_set(x_16, 0, x_108); -x_109 = l_Lean_Expander_mixfixToNotationSpec___closed__7; -x_110 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_16, x_109, x_3); -lean::dec(x_16); -if (lean::obj_tag(x_110) == 0) -{ -uint8 x_111; -lean::dec(x_2); -x_111 = !lean::is_exclusive(x_110); -if (x_111 == 0) -{ -return x_110; -} -else -{ -obj* x_112; obj* x_113; -x_112 = lean::cnstr_get(x_110, 0); -lean::inc(x_112); -lean::dec(x_110); -x_113 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_113, 0, x_112); -return x_113; -} -} -else -{ -obj* x_114; -x_114 = lean::cnstr_get(x_110, 0); -lean::inc(x_114); -lean::dec(x_110); -x_4 = x_114; -goto block_15; -} -} -} -else -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; uint8 x_119; -x_115 = lean::cnstr_get(x_16, 0); -lean::inc(x_115); -lean::dec(x_16); -x_116 = lean::cnstr_get(x_115, 1); -lean::inc(x_116); -x_117 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_116); -x_118 = lean::mk_nat_obj(0u); -x_119 = lean::nat_dec_eq(x_117, x_118); -if (x_119 == 0) -{ -obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; -lean::dec(x_115); -x_120 = lean::mk_nat_obj(1u); -x_121 = lean::nat_sub(x_117, x_120); -lean::dec(x_117); -x_122 = l_Lean_Parser_number_View_ofNat(x_121); -x_123 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_123, 0, x_122); -x_124 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_124, 0, x_123); -x_125 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_125, 0, x_124); -x_126 = l_Lean_Expander_mixfixToNotationSpec___closed__4; -x_127 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_125); -x_128 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_128, 0, x_127); -x_4 = x_128; -goto block_15; -} -else -{ -obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; -lean::dec(x_117); -x_129 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_130 = lean::cnstr_get(x_129, 1); -lean::inc(x_130); -x_131 = lean::apply_1(x_130, x_115); -x_132 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_132, 0, x_131); -x_133 = l_Lean_Expander_mixfixToNotationSpec___closed__7; -x_134 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_132, x_133, x_3); -lean::dec(x_132); -if (lean::obj_tag(x_134) == 0) -{ -obj* x_135; obj* x_136; obj* x_137; -lean::dec(x_2); -x_135 = lean::cnstr_get(x_134, 0); -lean::inc(x_135); -if (lean::is_exclusive(x_134)) { - lean::cnstr_release(x_134, 0); - x_136 = x_134; -} else { - lean::dec_ref(x_134); - x_136 = lean::box(0); -} -if (lean::is_scalar(x_136)) { - x_137 = lean::alloc_cnstr(0, 1, 0); -} else { - x_137 = x_136; -} -lean::cnstr_set(x_137, 0, x_135); -return x_137; -} -else -{ -obj* x_138; -x_138 = lean::cnstr_get(x_134, 0); -lean::inc(x_138); -lean::dec(x_134); -x_4 = x_138; -goto block_15; -} -} -} -} -} -case 4: -{ -obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; -lean::dec(x_16); -x_139 = lean::box(0); -x_140 = lean::box(0); -x_141 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_141, 0, x_2); -lean::cnstr_set(x_141, 1, x_139); -x_142 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_142, 0, x_141); -lean::cnstr_set(x_142, 1, x_140); -x_143 = l_Lean_Expander_mixfixToNotationSpec___closed__2; -x_144 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_144, 0, x_143); -lean::cnstr_set(x_144, 1, x_142); -x_145 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_145, 0, x_144); -return x_145; -} -default: -{ -obj* x_146; -x_146 = lean::box(0); -x_17 = x_146; -goto block_55; -} -} -block_15: -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_5 = lean::box(0); -x_6 = l_Lean_Expander_mixfixToNotationSpec___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_4); -x_8 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_5); -x_12 = l_Lean_Expander_mixfixToNotationSpec___closed__2; -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -block_55: -{ -obj* x_18; -lean::dec(x_17); -x_18 = lean::box(0); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_19 = l_Lean_Expander_mixfixToNotationSpec___closed__3; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_2); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_18); -x_22 = l_Lean_Expander_mixfixToNotationSpec___closed__2; -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_21); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -return x_24; -} -else -{ -uint8 x_25; -x_25 = !lean::is_exclusive(x_16); -if (x_25 == 0) -{ -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_37; obj* x_38; obj* x_39; -x_26 = lean::cnstr_get(x_16, 0); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = l_Lean_Expander_mixfixToNotationSpec___closed__4; -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -lean::cnstr_set(x_16, 0, x_30); -x_31 = l_Lean_Expander_mixfixToNotationSpec___closed__1; -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_16); -x_33 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_2); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_18); -x_37 = l_Lean_Expander_mixfixToNotationSpec___closed__2; -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_36); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_40 = lean::cnstr_get(x_16, 0); -lean::inc(x_40); -lean::dec(x_16); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -x_42 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -x_43 = l_Lean_Expander_mixfixToNotationSpec___closed__4; -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = l_Lean_Expander_mixfixToNotationSpec___closed__1; -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_45); -x_48 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_48, 0, x_47); -x_49 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_2); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_18); -x_52 = l_Lean_Expander_mixfixToNotationSpec___closed__2; -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_51); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -return x_54; -} -} -} -} -} -obj* l_Lean_Expander_mixfixToNotationSpec___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Expander_mixfixToNotationSpec(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Expander_mixfix_transform___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_identUnivs_HasView; -x_3 = lean::cnstr_get(x_2, 1); -lean::inc(x_3); -x_4 = lean::box(0); -x_5 = lean::mk_string("a"); -x_6 = lean_name_mk_string(x_4, x_5); -x_7 = lean::mk_string("."); -lean::inc(x_6); -x_8 = l_Lean_Name_toStringWithSep___main(x_7, x_6); -lean::dec(x_7); -x_9 = l_Lean_Parser_Substring_ofString(x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_9); -lean::cnstr_set(x_11, 2, x_6); -lean::cnstr_set(x_11, 3, x_10); -lean::cnstr_set(x_11, 4, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_1); -x_13 = lean::apply_1(x_3, x_12); -return x_13; -} -} -obj* _init_l_Lean_Expander_mixfix_transform___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_identUnivs_HasView; -x_3 = lean::cnstr_get(x_2, 1); -lean::inc(x_3); -x_4 = lean::box(0); -x_5 = lean::box(0); -x_6 = lean::mk_string("b"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("."); -lean::inc(x_7); -x_9 = l_Lean_Name_toStringWithSep___main(x_8, x_7); -lean::dec(x_8); -x_10 = l_Lean_Parser_Substring_ofString(x_9); -x_11 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -lean::cnstr_set(x_11, 2, x_7); -lean::cnstr_set(x_11, 3, x_4); -lean::cnstr_set(x_11, 4, x_4); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_1); -x_13 = lean::apply_1(x_3, x_12); -return x_13; -} -} -obj* _init_l_Lean_Expander_mixfix_transform___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("notation"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mixfix_transform___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string(":="); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mixfix_transform___closed__5() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_identUnivs_HasView; -x_3 = lean::cnstr_get(x_2, 1); -lean::inc(x_3); -x_4 = lean::box(0); -x_5 = lean::mk_string("b"); -x_6 = lean_name_mk_string(x_4, x_5); -x_7 = lean::mk_string("."); -lean::inc(x_6); -x_8 = l_Lean_Name_toStringWithSep___main(x_7, x_6); -lean::dec(x_7); -x_9 = l_Lean_Parser_Substring_ofString(x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_9); -lean::cnstr_set(x_11, 2, x_6); -lean::cnstr_set(x_11, 3, x_10); -lean::cnstr_set(x_11, 4, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_1); -x_13 = lean::apply_1(x_3, x_12); -return x_13; -} -} -obj* _init_l_Lean_Expander_mixfix_transform___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("`"); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -obj* l_Lean_Expander_mixfix_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = l_Lean_Parser_command_mixfix_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 2); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_5, 4); -lean::inc(x_9); -lean::dec(x_5); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_59; -x_59 = lean::cnstr_get(x_8, 0); -lean::inc(x_59); -lean::dec(x_8); -x_10 = x_59; -goto block_58; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_60 = lean::cnstr_get(x_8, 0); -lean::inc(x_60); -lean::dec(x_8); -x_61 = lean::box(0); -x_62 = l_Lean_Expander_mixfix_transform___closed__6; -x_63 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_60); -lean::cnstr_set(x_63, 2, x_62); -lean::cnstr_set(x_63, 3, x_61); -x_10 = x_63; -goto block_58; -} -block_58: -{ -obj* x_11; -x_11 = l_Lean_Expander_mixfixToNotationSpec(x_7, x_10, x_2); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::dec(x_9); -lean::dec(x_7); -lean::dec(x_6); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_16 = x_11; -} else { - lean::dec_ref(x_11); - x_16 = lean::box(0); -} -x_17 = l_Lean_Parser_command_notation_HasView; -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -switch (lean::obj_tag(x_7)) { -case 0: -{ -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; -lean::dec(x_16); -lean::dec(x_7); -x_35 = l_Lean_Parser_Term_app_HasView; -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -x_37 = l_Lean_Expander_mixfix_transform___closed__5; -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_9); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::apply_1(x_36, x_38); -x_40 = l_Lean_Expander_mixfix_transform___closed__3; -x_41 = l_Lean_Expander_mixfix_transform___closed__4; -x_42 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_42, 0, x_6); -lean::cnstr_set(x_42, 1, x_40); -lean::cnstr_set(x_42, 2, x_15); -lean::cnstr_set(x_42, 3, x_41); -lean::cnstr_set(x_42, 4, x_39); -x_43 = lean::apply_1(x_18, x_42); -x_44 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -case 4: -{ -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; -lean::dec(x_16); -lean::dec(x_7); -x_46 = l_Lean_Parser_Term_app_HasView; -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -x_48 = l_Lean_Expander_mixfix_transform___closed__1; -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_9); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::apply_1(x_47, x_49); -x_51 = l_Lean_Expander_mixfix_transform___closed__3; -x_52 = l_Lean_Expander_mixfix_transform___closed__4; -x_53 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_53, 0, x_6); -lean::cnstr_set(x_53, 1, x_51); -lean::cnstr_set(x_53, 2, x_15); -lean::cnstr_set(x_53, 3, x_52); -lean::cnstr_set(x_53, 4, x_50); -x_54 = lean::apply_1(x_18, x_53); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -return x_56; -} -default: -{ -obj* x_57; -lean::dec(x_7); -x_57 = lean::box(0); -x_19 = x_57; -goto block_34; -} -} -block_34: -{ -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; -lean::dec(x_19); -x_20 = l_Lean_Parser_Term_app_HasView; -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -x_22 = l_Lean_Expander_mixfix_transform___closed__1; -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_9); -lean::cnstr_set(x_23, 1, x_22); -lean::inc(x_21); -x_24 = lean::apply_1(x_21, x_23); -x_25 = l_Lean_Expander_mixfix_transform___closed__2; -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::apply_1(x_21, x_26); -x_28 = l_Lean_Expander_mixfix_transform___closed__3; -x_29 = l_Lean_Expander_mixfix_transform___closed__4; -x_30 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_30, 0, x_6); -lean::cnstr_set(x_30, 1, x_28); -lean::cnstr_set(x_30, 2, x_15); -lean::cnstr_set(x_30, 3, x_29); -lean::cnstr_set(x_30, 4, x_27); -x_31 = lean::apply_1(x_18, x_30); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -if (lean::is_scalar(x_16)) { - x_33 = lean::alloc_cnstr(1, 1, 0); -} else { - x_33 = x_16; -} -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -} -} -} -} -obj* l_Lean_Expander_mixfix_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_mixfix_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_reserveMixfix_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("reserve"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* l_Lean_Expander_reserveMixfix_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = l_Lean_Parser_command_reserveMixfix_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_5, 2); -lean::inc(x_7); -lean::dec(x_5); -x_8 = l_Lean_Expander_mixfixToNotationSpec(x_6, x_7, x_2); -lean::dec(x_6); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -return x_8; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_8); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = lean::cnstr_get(x_8, 0); -x_14 = l_Lean_Parser_command_reserveNotation_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = l_Lean_Expander_reserveMixfix_transform___closed__1; -x_17 = l_Lean_Expander_mixfix_transform___closed__3; -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_18, 2, x_13); -x_19 = lean::apply_1(x_15, x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_8, 0, x_20); -return x_8; -} -else -{ -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_21 = lean::cnstr_get(x_8, 0); -lean::inc(x_21); -lean::dec(x_8); -x_22 = l_Lean_Parser_command_reserveNotation_HasView; -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -x_24 = l_Lean_Expander_reserveMixfix_transform___closed__1; -x_25 = l_Lean_Expander_mixfix_transform___closed__3; -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_25); -lean::cnstr_set(x_26, 2, x_21); -x_27 = lean::apply_1(x_23, x_26); -x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -return x_29; -} -} -} -} -obj* l_Lean_Expander_reserveMixfix_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_reserveMixfix_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_mkSimpleBinder___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string(" : "); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mkSimpleBinder___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("{"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mkSimpleBinder___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("}"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mkSimpleBinder___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("⦃"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mkSimpleBinder___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("⦄"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mkSimpleBinder___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("["); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Expander_mkSimpleBinder___closed__7() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("]"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* l_Lean_Expander_mkSimpleBinder(obj* x_1, uint8 x_2, obj* x_3) { -_start: -{ -switch (x_2) { -case 0: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = l_Lean_Expander_coeBinderBracketedBinder___closed__1; -x_5 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_6 = l_Lean_Expander_coeBinderBracketedBinder___closed__2; -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_1); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_3); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -case 1: -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Expander_mkSimpleBinder___closed__2; -x_10 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_11 = l_Lean_Expander_mkSimpleBinder___closed__3; -x_12 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_12, 0, x_9); -lean::cnstr_set(x_12, 1, x_1); -lean::cnstr_set(x_12, 2, x_10); -lean::cnstr_set(x_12, 3, x_3); -lean::cnstr_set(x_12, 4, x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -return x_13; -} -case 2: -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = l_Lean_Expander_mkSimpleBinder___closed__4; -x_15 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_16 = l_Lean_Expander_mkSimpleBinder___closed__5; -x_17 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_17, 0, x_14); -lean::cnstr_set(x_17, 1, x_1); -lean::cnstr_set(x_17, 2, x_15); -lean::cnstr_set(x_17, 3, x_3); -lean::cnstr_set(x_17, 4, x_16); -x_18 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -return x_18; -} -case 3: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = l_Lean_Expander_mkSimpleBinder___closed__6; -x_20 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_21 = l_Lean_Expander_mkSimpleBinder___closed__7; -x_22 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_1); -lean::cnstr_set(x_22, 2, x_20); -lean::cnstr_set(x_22, 3, x_3); -lean::cnstr_set(x_22, 4, x_21); -x_23 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -return x_23; -} -default: -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_24 = l_Lean_Expander_coeBinderBracketedBinder___closed__1; -x_25 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_26 = l_Lean_Expander_coeBinderBracketedBinder___closed__2; -x_27 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_1); -lean::cnstr_set(x_27, 2, x_25); -lean::cnstr_set(x_27, 3, x_3); -lean::cnstr_set(x_27, 4, x_26); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -return x_28; -} -} -} -} -obj* l_Lean_Expander_mkSimpleBinder___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_2); -lean::dec(x_2); -x_5 = l_Lean_Expander_mkSimpleBinder(x_1, x_4, x_3); -return x_5; -} -} -obj* _init_l_Lean_Expander_binderIdentToIdent___main___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("a"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_3); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_3); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -return x_9; -} -} -obj* l_Lean_Expander_binderIdentToIdent___main(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -else -{ -obj* x_3; -x_3 = l_Lean_Expander_binderIdentToIdent___main___closed__1; -return x_3; -} -} -} -obj* l_Lean_Expander_binderIdentToIdent___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_binderIdentToIdent___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Expander_binderIdentToIdent(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_binderIdentToIdent___main(x_1); -return x_2; -} -} -obj* l_Lean_Expander_binderIdentToIdent___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_binderIdentToIdent(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Expander_getOptType___main___closed__1() { -_start: -{ -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_1 = l_Lean_Parser_Term_hole_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -x_3 = lean::box(0); -x_4 = lean::mk_string("_"); -x_5 = l_String_trim(x_4); -lean::dec(x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -x_8 = lean::apply_1(x_2, x_7); -return x_8; -} -} -obj* l_Lean_Expander_getOptType___main(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Expander_getOptType___main___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -return x_4; -} -} -} -obj* l_Lean_Expander_getOptType___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_getOptType___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Expander_getOptType(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_getOptType___main(x_1); -return x_2; -} -} -obj* l_Lean_Expander_getOptType___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_getOptType(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__1(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_6); -lean::dec(x_6); -lean::inc(x_2); -x_9 = l_Lean_Expander_mkSimpleBinder(x_8, x_1, x_2); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__1(x_1, x_2, x_7); -lean::cnstr_set(x_3, 1, x_10); -lean::cnstr_set(x_3, 0, x_9); -return x_3; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_3); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -lean::inc(x_2); -x_14 = l_Lean_Expander_mkSimpleBinder(x_13, x_1, x_2); -x_15 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__1(x_1, x_2, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__2(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_6); -lean::dec(x_6); -lean::inc(x_2); -x_9 = l_Lean_Expander_mkSimpleBinder(x_8, x_1, x_2); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__2(x_1, x_2, x_7); -lean::cnstr_set(x_3, 1, x_10); -lean::cnstr_set(x_3, 0, x_9); -return x_3; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_3); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -lean::inc(x_2); -x_14 = l_Lean_Expander_mkSimpleBinder(x_13, x_1, x_2); -x_15 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__2(x_1, x_2, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__3(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_6); -lean::dec(x_6); -lean::inc(x_2); -x_9 = l_Lean_Expander_mkSimpleBinder(x_8, x_1, x_2); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__3(x_1, x_2, x_7); -lean::cnstr_set(x_3, 1, x_10); -lean::cnstr_set(x_3, 0, x_9); -return x_3; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_3); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -lean::inc(x_2); -x_14 = l_Lean_Expander_mkSimpleBinder(x_13, x_1, x_2); -x_15 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__3(x_1, x_2, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_6); -lean::dec(x_6); -lean::inc(x_2); -x_9 = l_Lean_Expander_mkSimpleBinder(x_8, x_1, x_2); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4(x_1, x_2, x_7); -lean::cnstr_set(x_3, 1, x_10); -lean::cnstr_set(x_3, 0, x_9); -return x_3; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_3); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -lean::inc(x_2); -x_14 = l_Lean_Expander_mkSimpleBinder(x_13, x_1, x_2); -x_15 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4(x_1, x_2, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__5(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 0; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__5(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 0; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__5(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__6(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 0; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__6(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 0; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__6(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__7(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 0; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__7(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 0; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__7(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__8(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 0; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__8(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 0; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__8(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__9(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 1; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__9(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 1; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__9(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__10(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 1; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__10(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 1; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__10(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__11(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 1; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__11(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 1; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__11(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__12(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 1; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__12(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 1; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__12(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__13(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 2; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__13(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 2; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__13(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__14(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 2; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__14(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 2; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__14(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__15(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 2; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__15(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 2; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__15(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__16(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = l_Lean_Expander_binderIdentToIdent___main(x_5); -lean::dec(x_5); -x_8 = 2; -lean::inc(x_1); -x_9 = l_Lean_Expander_mkSimpleBinder(x_7, x_8, x_1); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__16(x_1, x_6); -lean::cnstr_set(x_2, 1, x_10); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -x_14 = 2; -lean::inc(x_1); -x_15 = l_Lean_Expander_mkSimpleBinder(x_13, x_14, x_1); -x_16 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__16(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_6); -lean::dec(x_6); -lean::inc(x_2); -x_9 = l_Lean_Expander_mkSimpleBinder(x_8, x_1, x_2); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17(x_1, x_2, x_7); -lean::cnstr_set(x_3, 1, x_10); -lean::cnstr_set(x_3, 0, x_9); -return x_3; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_3); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -lean::inc(x_2); -x_14 = l_Lean_Expander_mkSimpleBinder(x_13, x_1, x_2); -x_15 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17(x_1, x_2, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_6); -lean::dec(x_6); -lean::inc(x_2); -x_9 = l_Lean_Expander_mkSimpleBinder(x_8, x_1, x_2); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18(x_1, x_2, x_7); -lean::cnstr_set(x_3, 1, x_10); -lean::cnstr_set(x_3, 0, x_9); -return x_3; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_3); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -lean::inc(x_2); -x_14 = l_Lean_Expander_mkSimpleBinder(x_13, x_1, x_2); -x_15 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18(x_1, x_2, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_6); -lean::dec(x_6); -lean::inc(x_2); -x_9 = l_Lean_Expander_mkSimpleBinder(x_8, x_1, x_2); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19(x_1, x_2, x_7); -lean::cnstr_set(x_3, 1, x_10); -lean::cnstr_set(x_3, 0, x_9); -return x_3; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_3); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -lean::inc(x_2); -x_14 = l_Lean_Expander_mkSimpleBinder(x_13, x_1, x_2); -x_15 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19(x_1, x_2, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_6); -lean::dec(x_6); -lean::inc(x_2); -x_9 = l_Lean_Expander_mkSimpleBinder(x_8, x_1, x_2); -x_10 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(x_1, x_2, x_7); -lean::cnstr_set(x_3, 1, x_10); -lean::cnstr_set(x_3, 0, x_9); -return x_3; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_3); -x_13 = l_Lean_Expander_binderIdentToIdent___main(x_11); -lean::dec(x_11); -lean::inc(x_2); -x_14 = l_Lean_Expander_mkSimpleBinder(x_13, x_1, x_2); -x_15 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(x_1, x_2, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -} -obj* _init_l_Lean_Expander_expandBracketedBinder___main___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("optParam"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = l_Lean_Expander_globId(x_3); -return x_4; -} -} -obj* _init_l_Lean_Expander_expandBracketedBinder___main___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("autoParam"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = l_Lean_Expander_globId(x_3); -return x_4; -} -} -obj* _init_l_Lean_Expander_expandBracketedBinder___main___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("unexpected auto Param after Type annotation"); -return x_1; -} -} -obj* _init_l_Lean_Expander_expandBracketedBinder___main___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Expander_expandBracketedBinder___main___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("_inst_"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_3); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_3); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -x_10 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_8); -return x_11; -} -} -obj* _init_l_Lean_Expander_expandBracketedBinder___main___closed__6() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("unexpected anonymous Constructor"); -return x_1; -} -} -obj* l_Lean_Expander_expandBracketedBinder___main(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_1, 0); -lean::inc(x_71); -lean::dec(x_1); -x_72 = lean::cnstr_get(x_71, 1); -lean::inc(x_72); -lean::dec(x_71); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; -lean::dec(x_72); -x_73 = l_Lean_Expander_expandBracketedBinder___main___closed__4; -return x_73; -} -else -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_74 = lean::cnstr_get(x_72, 0); -lean::inc(x_74); -lean::dec(x_72); -x_75 = lean::cnstr_get(x_74, 1); -lean::inc(x_75); -x_76 = l_Lean_Expander_getOptType___main(x_75); -x_77 = lean::cnstr_get(x_74, 2); -lean::inc(x_77); -if (lean::obj_tag(x_77) == 0) -{ -obj* x_78; obj* x_79; obj* x_80; -lean::dec(x_75); -x_78 = lean::cnstr_get(x_74, 0); -lean::inc(x_78); -lean::dec(x_74); -x_79 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__5(x_76, x_78); -x_80 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_80, 0, x_79); -return x_80; -} -else -{ -obj* x_81; -x_81 = lean::cnstr_get(x_77, 0); -lean::inc(x_81); -lean::dec(x_77); -if (lean::obj_tag(x_81) == 0) -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -lean::dec(x_75); -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -lean::dec(x_81); -x_83 = lean::cnstr_get(x_82, 1); -lean::inc(x_83); -lean::dec(x_82); -x_84 = lean::box(0); -x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_83); -lean::cnstr_set(x_85, 1, x_84); -x_86 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_86, 0, x_76); -lean::cnstr_set(x_86, 1, x_85); -x_87 = l_Lean_Expander_expandBracketedBinder___main___closed__1; -x_88 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_87, x_86); -x_89 = lean::cnstr_get(x_74, 0); -lean::inc(x_89); -lean::dec(x_74); -x_90 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__6(x_88, x_89); -x_91 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_91, 0, x_90); -return x_91; -} -else -{ -lean::dec(x_76); -if (lean::obj_tag(x_75) == 0) -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_92 = lean::cnstr_get(x_81, 0); -lean::inc(x_92); -lean::dec(x_81); -x_93 = lean::cnstr_get(x_92, 1); -lean::inc(x_93); -lean::dec(x_92); -x_94 = lean::box(0); -x_95 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_95, 0, x_93); -lean::cnstr_set(x_95, 1, x_94); -x_96 = l_Lean_Expander_expandBracketedBinder___main___closed__2; -x_97 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_96, x_95); -x_98 = lean::cnstr_get(x_74, 0); -lean::inc(x_98); -lean::dec(x_74); -x_99 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__7(x_97, x_98); -x_100 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_100, 0, x_99); -return x_100; -} -else -{ -uint8 x_101; -x_101 = !lean::is_exclusive(x_75); -if (x_101 == 0) -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_102 = lean::cnstr_get(x_75, 0); -lean::dec(x_102); -x_103 = l_Lean_Parser_Term_binderDefault_HasView; -x_104 = lean::cnstr_get(x_103, 1); -lean::inc(x_104); -x_105 = lean::apply_1(x_104, x_81); -lean::cnstr_set(x_75, 0, x_105); -x_106 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_107 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_75, x_106, x_2); -lean::dec(x_75); -if (lean::obj_tag(x_107) == 0) -{ -uint8 x_108; -lean::dec(x_74); -x_108 = !lean::is_exclusive(x_107); -if (x_108 == 0) -{ -return x_107; -} -else -{ -obj* x_109; obj* x_110; -x_109 = lean::cnstr_get(x_107, 0); -lean::inc(x_109); -lean::dec(x_107); -x_110 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_110, 0, x_109); -return x_110; -} -} -else -{ -uint8 x_111; -x_111 = !lean::is_exclusive(x_107); -if (x_111 == 0) -{ -obj* x_112; obj* x_113; obj* x_114; -x_112 = lean::cnstr_get(x_107, 0); -x_113 = lean::cnstr_get(x_74, 0); -lean::inc(x_113); -lean::dec(x_74); -x_114 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__8(x_112, x_113); -lean::cnstr_set(x_107, 0, x_114); -return x_107; -} -else -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_115 = lean::cnstr_get(x_107, 0); -lean::inc(x_115); -lean::dec(x_107); -x_116 = lean::cnstr_get(x_74, 0); -lean::inc(x_116); -lean::dec(x_74); -x_117 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__8(x_115, x_116); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -return x_118; -} -} -} -else -{ -obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; -lean::dec(x_75); -x_119 = l_Lean_Parser_Term_binderDefault_HasView; -x_120 = lean::cnstr_get(x_119, 1); -lean::inc(x_120); -x_121 = lean::apply_1(x_120, x_81); -x_122 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_122, 0, x_121); -x_123 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_124 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_122, x_123, x_2); -lean::dec(x_122); -if (lean::obj_tag(x_124) == 0) -{ -obj* x_125; obj* x_126; obj* x_127; -lean::dec(x_74); -x_125 = lean::cnstr_get(x_124, 0); -lean::inc(x_125); -if (lean::is_exclusive(x_124)) { - lean::cnstr_release(x_124, 0); - x_126 = x_124; -} else { - lean::dec_ref(x_124); - x_126 = lean::box(0); -} -if (lean::is_scalar(x_126)) { - x_127 = lean::alloc_cnstr(0, 1, 0); -} else { - x_127 = x_126; -} -lean::cnstr_set(x_127, 0, x_125); -return x_127; -} -else -{ -obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; -x_128 = lean::cnstr_get(x_124, 0); -lean::inc(x_128); -if (lean::is_exclusive(x_124)) { - lean::cnstr_release(x_124, 0); - x_129 = x_124; -} else { - lean::dec_ref(x_124); - x_129 = lean::box(0); -} -x_130 = lean::cnstr_get(x_74, 0); -lean::inc(x_130); -lean::dec(x_74); -x_131 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__8(x_128, x_130); -if (lean::is_scalar(x_129)) { - x_132 = lean::alloc_cnstr(1, 1, 0); -} else { - x_132 = x_129; -} -lean::cnstr_set(x_132, 0, x_131); -return x_132; -} -} -} -} -} -} -} -case 1: -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; -x_133 = lean::cnstr_get(x_1, 0); -lean::inc(x_133); -lean::dec(x_1); -x_134 = lean::cnstr_get(x_133, 1); -lean::inc(x_134); -lean::dec(x_133); -x_135 = lean::cnstr_get(x_134, 1); -lean::inc(x_135); -x_136 = l_Lean_Expander_getOptType___main(x_135); -x_137 = lean::cnstr_get(x_134, 2); -lean::inc(x_137); -if (lean::obj_tag(x_137) == 0) -{ -obj* x_138; obj* x_139; obj* x_140; -lean::dec(x_135); -x_138 = lean::cnstr_get(x_134, 0); -lean::inc(x_138); -lean::dec(x_134); -x_139 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__9(x_136, x_138); -x_140 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_140, 0, x_139); -return x_140; -} -else -{ -obj* x_141; -x_141 = lean::cnstr_get(x_137, 0); -lean::inc(x_141); -lean::dec(x_137); -if (lean::obj_tag(x_141) == 0) -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -lean::dec(x_135); -x_142 = lean::cnstr_get(x_141, 0); -lean::inc(x_142); -lean::dec(x_141); -x_143 = lean::cnstr_get(x_142, 1); -lean::inc(x_143); -lean::dec(x_142); -x_144 = lean::box(0); -x_145 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_145, 0, x_143); -lean::cnstr_set(x_145, 1, x_144); -x_146 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_146, 0, x_136); -lean::cnstr_set(x_146, 1, x_145); -x_147 = l_Lean_Expander_expandBracketedBinder___main___closed__1; -x_148 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_147, x_146); -x_149 = lean::cnstr_get(x_134, 0); -lean::inc(x_149); -lean::dec(x_134); -x_150 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__10(x_148, x_149); -x_151 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_151, 0, x_150); -return x_151; -} -else -{ -lean::dec(x_136); -if (lean::obj_tag(x_135) == 0) -{ -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; -x_152 = lean::cnstr_get(x_141, 0); -lean::inc(x_152); -lean::dec(x_141); -x_153 = lean::cnstr_get(x_152, 1); -lean::inc(x_153); -lean::dec(x_152); -x_154 = lean::box(0); -x_155 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_155, 0, x_153); -lean::cnstr_set(x_155, 1, x_154); -x_156 = l_Lean_Expander_expandBracketedBinder___main___closed__2; -x_157 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_156, x_155); -x_158 = lean::cnstr_get(x_134, 0); -lean::inc(x_158); -lean::dec(x_134); -x_159 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__11(x_157, x_158); -x_160 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_160, 0, x_159); -return x_160; -} -else -{ -uint8 x_161; -x_161 = !lean::is_exclusive(x_135); -if (x_161 == 0) -{ -obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; -x_162 = lean::cnstr_get(x_135, 0); -lean::dec(x_162); -x_163 = l_Lean_Parser_Term_binderDefault_HasView; -x_164 = lean::cnstr_get(x_163, 1); -lean::inc(x_164); -x_165 = lean::apply_1(x_164, x_141); -lean::cnstr_set(x_135, 0, x_165); -x_166 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_167 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_135, x_166, x_2); -lean::dec(x_135); -if (lean::obj_tag(x_167) == 0) -{ -uint8 x_168; -lean::dec(x_134); -x_168 = !lean::is_exclusive(x_167); -if (x_168 == 0) -{ -return x_167; -} -else -{ -obj* x_169; obj* x_170; -x_169 = lean::cnstr_get(x_167, 0); -lean::inc(x_169); -lean::dec(x_167); -x_170 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_170, 0, x_169); -return x_170; -} -} -else -{ -uint8 x_171; -x_171 = !lean::is_exclusive(x_167); -if (x_171 == 0) -{ -obj* x_172; obj* x_173; obj* x_174; -x_172 = lean::cnstr_get(x_167, 0); -x_173 = lean::cnstr_get(x_134, 0); -lean::inc(x_173); -lean::dec(x_134); -x_174 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__12(x_172, x_173); -lean::cnstr_set(x_167, 0, x_174); -return x_167; -} -else -{ -obj* x_175; obj* x_176; obj* x_177; obj* x_178; -x_175 = lean::cnstr_get(x_167, 0); -lean::inc(x_175); -lean::dec(x_167); -x_176 = lean::cnstr_get(x_134, 0); -lean::inc(x_176); -lean::dec(x_134); -x_177 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__12(x_175, x_176); -x_178 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_178, 0, x_177); -return x_178; -} -} -} -else -{ -obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; -lean::dec(x_135); -x_179 = l_Lean_Parser_Term_binderDefault_HasView; -x_180 = lean::cnstr_get(x_179, 1); -lean::inc(x_180); -x_181 = lean::apply_1(x_180, x_141); -x_182 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_182, 0, x_181); -x_183 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_184 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_182, x_183, x_2); -lean::dec(x_182); -if (lean::obj_tag(x_184) == 0) -{ -obj* x_185; obj* x_186; obj* x_187; -lean::dec(x_134); -x_185 = lean::cnstr_get(x_184, 0); -lean::inc(x_185); -if (lean::is_exclusive(x_184)) { - lean::cnstr_release(x_184, 0); - x_186 = x_184; -} else { - lean::dec_ref(x_184); - x_186 = lean::box(0); -} -if (lean::is_scalar(x_186)) { - x_187 = lean::alloc_cnstr(0, 1, 0); -} else { - x_187 = x_186; -} -lean::cnstr_set(x_187, 0, x_185); -return x_187; -} -else -{ -obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; -x_188 = lean::cnstr_get(x_184, 0); -lean::inc(x_188); -if (lean::is_exclusive(x_184)) { - lean::cnstr_release(x_184, 0); - x_189 = x_184; -} else { - lean::dec_ref(x_184); - x_189 = lean::box(0); -} -x_190 = lean::cnstr_get(x_134, 0); -lean::inc(x_190); -lean::dec(x_134); -x_191 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__12(x_188, x_190); -if (lean::is_scalar(x_189)) { - x_192 = lean::alloc_cnstr(1, 1, 0); -} else { - x_192 = x_189; -} -lean::cnstr_set(x_192, 0, x_191); -return x_192; -} -} -} -} -} -} -case 2: -{ -obj* x_193; obj* x_194; obj* x_195; obj* x_196; obj* x_197; -x_193 = lean::cnstr_get(x_1, 0); -lean::inc(x_193); -lean::dec(x_1); -x_194 = lean::cnstr_get(x_193, 1); -lean::inc(x_194); -lean::dec(x_193); -x_195 = lean::cnstr_get(x_194, 1); -lean::inc(x_195); -x_196 = l_Lean_Expander_getOptType___main(x_195); -x_197 = lean::cnstr_get(x_194, 2); -lean::inc(x_197); -if (lean::obj_tag(x_197) == 0) -{ -obj* x_198; obj* x_199; obj* x_200; -lean::dec(x_195); -x_198 = lean::cnstr_get(x_194, 0); -lean::inc(x_198); -lean::dec(x_194); -x_199 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__13(x_196, x_198); -x_200 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_200, 0, x_199); -return x_200; -} -else -{ -obj* x_201; -x_201 = lean::cnstr_get(x_197, 0); -lean::inc(x_201); -lean::dec(x_197); -if (lean::obj_tag(x_201) == 0) -{ -obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; -lean::dec(x_195); -x_202 = lean::cnstr_get(x_201, 0); -lean::inc(x_202); -lean::dec(x_201); -x_203 = lean::cnstr_get(x_202, 1); -lean::inc(x_203); -lean::dec(x_202); -x_204 = lean::box(0); -x_205 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_205, 0, x_203); -lean::cnstr_set(x_205, 1, x_204); -x_206 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_206, 0, x_196); -lean::cnstr_set(x_206, 1, x_205); -x_207 = l_Lean_Expander_expandBracketedBinder___main___closed__1; -x_208 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_207, x_206); -x_209 = lean::cnstr_get(x_194, 0); -lean::inc(x_209); -lean::dec(x_194); -x_210 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__14(x_208, x_209); -x_211 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_211, 0, x_210); -return x_211; -} -else -{ -lean::dec(x_196); -if (lean::obj_tag(x_195) == 0) -{ -obj* x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; -x_212 = lean::cnstr_get(x_201, 0); -lean::inc(x_212); -lean::dec(x_201); -x_213 = lean::cnstr_get(x_212, 1); -lean::inc(x_213); -lean::dec(x_212); -x_214 = lean::box(0); -x_215 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_215, 0, x_213); -lean::cnstr_set(x_215, 1, x_214); -x_216 = l_Lean_Expander_expandBracketedBinder___main___closed__2; -x_217 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_216, x_215); -x_218 = lean::cnstr_get(x_194, 0); -lean::inc(x_218); -lean::dec(x_194); -x_219 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__15(x_217, x_218); -x_220 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_220, 0, x_219); -return x_220; -} -else -{ -uint8 x_221; -x_221 = !lean::is_exclusive(x_195); -if (x_221 == 0) -{ -obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; -x_222 = lean::cnstr_get(x_195, 0); -lean::dec(x_222); -x_223 = l_Lean_Parser_Term_binderDefault_HasView; -x_224 = lean::cnstr_get(x_223, 1); -lean::inc(x_224); -x_225 = lean::apply_1(x_224, x_201); -lean::cnstr_set(x_195, 0, x_225); -x_226 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_227 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_195, x_226, x_2); -lean::dec(x_195); -if (lean::obj_tag(x_227) == 0) -{ -uint8 x_228; -lean::dec(x_194); -x_228 = !lean::is_exclusive(x_227); -if (x_228 == 0) -{ -return x_227; -} -else -{ -obj* x_229; obj* x_230; -x_229 = lean::cnstr_get(x_227, 0); -lean::inc(x_229); -lean::dec(x_227); -x_230 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_230, 0, x_229); -return x_230; -} -} -else -{ -uint8 x_231; -x_231 = !lean::is_exclusive(x_227); -if (x_231 == 0) -{ -obj* x_232; obj* x_233; obj* x_234; -x_232 = lean::cnstr_get(x_227, 0); -x_233 = lean::cnstr_get(x_194, 0); -lean::inc(x_233); -lean::dec(x_194); -x_234 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__16(x_232, x_233); -lean::cnstr_set(x_227, 0, x_234); -return x_227; -} -else -{ -obj* x_235; obj* x_236; obj* x_237; obj* x_238; -x_235 = lean::cnstr_get(x_227, 0); -lean::inc(x_235); -lean::dec(x_227); -x_236 = lean::cnstr_get(x_194, 0); -lean::inc(x_236); -lean::dec(x_194); -x_237 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__16(x_235, x_236); -x_238 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_238, 0, x_237); -return x_238; -} -} -} -else -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; -lean::dec(x_195); -x_239 = l_Lean_Parser_Term_binderDefault_HasView; -x_240 = lean::cnstr_get(x_239, 1); -lean::inc(x_240); -x_241 = lean::apply_1(x_240, x_201); -x_242 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_242, 0, x_241); -x_243 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_244 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_242, x_243, x_2); -lean::dec(x_242); -if (lean::obj_tag(x_244) == 0) -{ -obj* x_245; obj* x_246; obj* x_247; -lean::dec(x_194); -x_245 = lean::cnstr_get(x_244, 0); -lean::inc(x_245); -if (lean::is_exclusive(x_244)) { - lean::cnstr_release(x_244, 0); - x_246 = x_244; -} else { - lean::dec_ref(x_244); - x_246 = lean::box(0); -} -if (lean::is_scalar(x_246)) { - x_247 = lean::alloc_cnstr(0, 1, 0); -} else { - x_247 = x_246; -} -lean::cnstr_set(x_247, 0, x_245); -return x_247; -} -else -{ -obj* x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; -x_248 = lean::cnstr_get(x_244, 0); -lean::inc(x_248); -if (lean::is_exclusive(x_244)) { - lean::cnstr_release(x_244, 0); - x_249 = x_244; -} else { - lean::dec_ref(x_244); - x_249 = lean::box(0); -} -x_250 = lean::cnstr_get(x_194, 0); -lean::inc(x_250); -lean::dec(x_194); -x_251 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__16(x_248, x_250); -if (lean::is_scalar(x_249)) { - x_252 = lean::alloc_cnstr(1, 1, 0); -} else { - x_252 = x_249; -} -lean::cnstr_set(x_252, 0, x_251); -return x_252; -} -} -} -} -} -} -case 3: -{ -obj* x_253; obj* x_254; -x_253 = lean::cnstr_get(x_1, 0); -lean::inc(x_253); -lean::dec(x_1); -x_254 = lean::cnstr_get(x_253, 1); -lean::inc(x_254); -lean::dec(x_253); -if (lean::obj_tag(x_254) == 0) -{ -obj* x_255; obj* x_256; obj* x_257; obj* x_258; obj* x_259; obj* x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_264; obj* x_265; uint8 x_266; obj* x_267; obj* x_268; -x_255 = lean::cnstr_get(x_254, 0); -lean::inc(x_255); -lean::dec(x_254); -x_256 = lean::cnstr_get(x_255, 0); -lean::inc(x_256); -x_257 = lean::cnstr_get(x_255, 2); -lean::inc(x_257); -lean::dec(x_255); -x_258 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_258, 0, x_256); -x_259 = lean::box(0); -x_260 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_260, 0, x_258); -lean::cnstr_set(x_260, 1, x_259); -x_261 = lean::box(0); -x_262 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_263 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_263, 0, x_262); -lean::cnstr_set(x_263, 1, x_257); -x_264 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_264, 0, x_263); -x_265 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_265, 0, x_260); -lean::cnstr_set(x_265, 1, x_264); -lean::cnstr_set(x_265, 2, x_261); -x_266 = 3; -x_267 = lean::box(x_266); -x_268 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_268, 0, x_267); -lean::cnstr_set(x_268, 1, x_265); -x_3 = x_268; -goto block_70; -} -else -{ -obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_273; obj* x_274; obj* x_275; uint8 x_276; obj* x_277; obj* x_278; -x_269 = lean::cnstr_get(x_254, 0); -lean::inc(x_269); -lean::dec(x_254); -x_270 = lean::box(0); -x_271 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_272 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_272, 0, x_271); -lean::cnstr_set(x_272, 1, x_269); -x_273 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_273, 0, x_272); -x_274 = l_Lean_Expander_expandBracketedBinder___main___closed__5; -x_275 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_275, 0, x_274); -lean::cnstr_set(x_275, 1, x_273); -lean::cnstr_set(x_275, 2, x_270); -x_276 = 3; -x_277 = lean::box(x_276); -x_278 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_278, 0, x_277); -lean::cnstr_set(x_278, 1, x_275); -x_3 = x_278; -goto block_70; -} -} -default: -{ -obj* x_279; obj* x_280; obj* x_281; obj* x_282; obj* x_283; obj* x_284; obj* x_285; -x_279 = lean::cnstr_get(x_1, 0); -lean::inc(x_279); -lean::dec(x_1); -x_280 = l_Lean_Parser_Term_anonymousConstructor_HasView; -x_281 = lean::cnstr_get(x_280, 1); -lean::inc(x_281); -x_282 = lean::apply_1(x_281, x_279); -x_283 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_283, 0, x_282); -x_284 = l_Lean_Expander_expandBracketedBinder___main___closed__6; -x_285 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_283, x_284, x_2); -lean::dec(x_283); -if (lean::obj_tag(x_285) == 0) -{ -uint8 x_286; -x_286 = !lean::is_exclusive(x_285); -if (x_286 == 0) -{ -return x_285; -} -else -{ -obj* x_287; obj* x_288; -x_287 = lean::cnstr_get(x_285, 0); -lean::inc(x_287); -lean::dec(x_285); -x_288 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_288, 0, x_287); -return x_288; -} -} -else -{ -uint8 x_289; -x_289 = !lean::is_exclusive(x_285); -if (x_289 == 0) -{ -obj* x_290; obj* x_291; obj* x_292; obj* x_293; obj* x_294; obj* x_295; -x_290 = lean::cnstr_get(x_285, 0); -x_291 = lean::cnstr_get(x_290, 0); -lean::inc(x_291); -x_292 = lean::cnstr_get(x_290, 1); -lean::inc(x_292); -lean::dec(x_290); -x_293 = lean::cnstr_get(x_292, 1); -lean::inc(x_293); -x_294 = l_Lean_Expander_getOptType___main(x_293); -x_295 = lean::cnstr_get(x_292, 2); -lean::inc(x_295); -if (lean::obj_tag(x_295) == 0) -{ -obj* x_296; uint8 x_297; obj* x_298; -lean::dec(x_293); -x_296 = lean::cnstr_get(x_292, 0); -lean::inc(x_296); -lean::dec(x_292); -x_297 = lean::unbox(x_291); -lean::dec(x_291); -x_298 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17(x_297, x_294, x_296); -lean::cnstr_set(x_285, 0, x_298); -return x_285; -} -else -{ -obj* x_299; -x_299 = lean::cnstr_get(x_295, 0); -lean::inc(x_299); -lean::dec(x_295); -if (lean::obj_tag(x_299) == 0) -{ -obj* x_300; obj* x_301; obj* x_302; obj* x_303; obj* x_304; obj* x_305; obj* x_306; obj* x_307; uint8 x_308; obj* x_309; -lean::dec(x_293); -x_300 = lean::cnstr_get(x_299, 0); -lean::inc(x_300); -lean::dec(x_299); -x_301 = lean::cnstr_get(x_300, 1); -lean::inc(x_301); -lean::dec(x_300); -x_302 = lean::box(0); -x_303 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_303, 0, x_301); -lean::cnstr_set(x_303, 1, x_302); -x_304 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_304, 0, x_294); -lean::cnstr_set(x_304, 1, x_303); -x_305 = l_Lean_Expander_expandBracketedBinder___main___closed__1; -x_306 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_305, x_304); -x_307 = lean::cnstr_get(x_292, 0); -lean::inc(x_307); -lean::dec(x_292); -x_308 = lean::unbox(x_291); -lean::dec(x_291); -x_309 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18(x_308, x_306, x_307); -lean::cnstr_set(x_285, 0, x_309); -return x_285; -} -else -{ -lean::dec(x_294); -if (lean::obj_tag(x_293) == 0) -{ -obj* x_310; obj* x_311; obj* x_312; obj* x_313; obj* x_314; obj* x_315; obj* x_316; uint8 x_317; obj* x_318; -x_310 = lean::cnstr_get(x_299, 0); -lean::inc(x_310); -lean::dec(x_299); -x_311 = lean::cnstr_get(x_310, 1); -lean::inc(x_311); -lean::dec(x_310); -x_312 = lean::box(0); -x_313 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_313, 0, x_311); -lean::cnstr_set(x_313, 1, x_312); -x_314 = l_Lean_Expander_expandBracketedBinder___main___closed__2; -x_315 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_314, x_313); -x_316 = lean::cnstr_get(x_292, 0); -lean::inc(x_316); -lean::dec(x_292); -x_317 = lean::unbox(x_291); -lean::dec(x_291); -x_318 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19(x_317, x_315, x_316); -lean::cnstr_set(x_285, 0, x_318); -return x_285; -} -else -{ -uint8 x_319; -lean::free_heap_obj(x_285); -x_319 = !lean::is_exclusive(x_293); -if (x_319 == 0) -{ -obj* x_320; obj* x_321; obj* x_322; obj* x_323; obj* x_324; obj* x_325; -x_320 = lean::cnstr_get(x_293, 0); -lean::dec(x_320); -x_321 = l_Lean_Parser_Term_binderDefault_HasView; -x_322 = lean::cnstr_get(x_321, 1); -lean::inc(x_322); -x_323 = lean::apply_1(x_322, x_299); -lean::cnstr_set(x_293, 0, x_323); -x_324 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_325 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_293, x_324, x_2); -lean::dec(x_293); -if (lean::obj_tag(x_325) == 0) -{ -uint8 x_326; -lean::dec(x_292); -lean::dec(x_291); -x_326 = !lean::is_exclusive(x_325); -if (x_326 == 0) -{ -return x_325; -} -else -{ -obj* x_327; obj* x_328; -x_327 = lean::cnstr_get(x_325, 0); -lean::inc(x_327); -lean::dec(x_325); -x_328 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_328, 0, x_327); -return x_328; -} -} -else -{ -uint8 x_329; -x_329 = !lean::is_exclusive(x_325); -if (x_329 == 0) -{ -obj* x_330; obj* x_331; uint8 x_332; obj* x_333; -x_330 = lean::cnstr_get(x_325, 0); -x_331 = lean::cnstr_get(x_292, 0); -lean::inc(x_331); -lean::dec(x_292); -x_332 = lean::unbox(x_291); -lean::dec(x_291); -x_333 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(x_332, x_330, x_331); -lean::cnstr_set(x_325, 0, x_333); -return x_325; -} -else -{ -obj* x_334; obj* x_335; uint8 x_336; obj* x_337; obj* x_338; -x_334 = lean::cnstr_get(x_325, 0); -lean::inc(x_334); -lean::dec(x_325); -x_335 = lean::cnstr_get(x_292, 0); -lean::inc(x_335); -lean::dec(x_292); -x_336 = lean::unbox(x_291); -lean::dec(x_291); -x_337 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(x_336, x_334, x_335); -x_338 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_338, 0, x_337); -return x_338; -} -} -} -else -{ -obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; obj* x_344; -lean::dec(x_293); -x_339 = l_Lean_Parser_Term_binderDefault_HasView; -x_340 = lean::cnstr_get(x_339, 1); -lean::inc(x_340); -x_341 = lean::apply_1(x_340, x_299); -x_342 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_342, 0, x_341); -x_343 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_344 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_342, x_343, x_2); -lean::dec(x_342); -if (lean::obj_tag(x_344) == 0) -{ -obj* x_345; obj* x_346; obj* x_347; -lean::dec(x_292); -lean::dec(x_291); -x_345 = lean::cnstr_get(x_344, 0); -lean::inc(x_345); -if (lean::is_exclusive(x_344)) { - lean::cnstr_release(x_344, 0); - x_346 = x_344; -} else { - lean::dec_ref(x_344); - x_346 = lean::box(0); -} -if (lean::is_scalar(x_346)) { - x_347 = lean::alloc_cnstr(0, 1, 0); -} else { - x_347 = x_346; -} -lean::cnstr_set(x_347, 0, x_345); -return x_347; -} -else -{ -obj* x_348; obj* x_349; obj* x_350; uint8 x_351; obj* x_352; obj* x_353; -x_348 = lean::cnstr_get(x_344, 0); -lean::inc(x_348); -if (lean::is_exclusive(x_344)) { - lean::cnstr_release(x_344, 0); - x_349 = x_344; -} else { - lean::dec_ref(x_344); - x_349 = lean::box(0); -} -x_350 = lean::cnstr_get(x_292, 0); -lean::inc(x_350); -lean::dec(x_292); -x_351 = lean::unbox(x_291); -lean::dec(x_291); -x_352 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(x_351, x_348, x_350); -if (lean::is_scalar(x_349)) { - x_353 = lean::alloc_cnstr(1, 1, 0); -} else { - x_353 = x_349; -} -lean::cnstr_set(x_353, 0, x_352); -return x_353; -} -} -} -} -} -} -else -{ -obj* x_354; obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; -x_354 = lean::cnstr_get(x_285, 0); -lean::inc(x_354); -lean::dec(x_285); -x_355 = lean::cnstr_get(x_354, 0); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_354, 1); -lean::inc(x_356); -lean::dec(x_354); -x_357 = lean::cnstr_get(x_356, 1); -lean::inc(x_357); -x_358 = l_Lean_Expander_getOptType___main(x_357); -x_359 = lean::cnstr_get(x_356, 2); -lean::inc(x_359); -if (lean::obj_tag(x_359) == 0) -{ -obj* x_360; uint8 x_361; obj* x_362; obj* x_363; -lean::dec(x_357); -x_360 = lean::cnstr_get(x_356, 0); -lean::inc(x_360); -lean::dec(x_356); -x_361 = lean::unbox(x_355); -lean::dec(x_355); -x_362 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17(x_361, x_358, x_360); -x_363 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_363, 0, x_362); -return x_363; -} -else -{ -obj* x_364; -x_364 = lean::cnstr_get(x_359, 0); -lean::inc(x_364); -lean::dec(x_359); -if (lean::obj_tag(x_364) == 0) -{ -obj* x_365; obj* x_366; obj* x_367; obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_372; uint8 x_373; obj* x_374; obj* x_375; -lean::dec(x_357); -x_365 = lean::cnstr_get(x_364, 0); -lean::inc(x_365); -lean::dec(x_364); -x_366 = lean::cnstr_get(x_365, 1); -lean::inc(x_366); -lean::dec(x_365); -x_367 = lean::box(0); -x_368 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_368, 0, x_366); -lean::cnstr_set(x_368, 1, x_367); -x_369 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_369, 0, x_358); -lean::cnstr_set(x_369, 1, x_368); -x_370 = l_Lean_Expander_expandBracketedBinder___main___closed__1; -x_371 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_370, x_369); -x_372 = lean::cnstr_get(x_356, 0); -lean::inc(x_372); -lean::dec(x_356); -x_373 = lean::unbox(x_355); -lean::dec(x_355); -x_374 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18(x_373, x_371, x_372); -x_375 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_375, 0, x_374); -return x_375; -} -else -{ -lean::dec(x_358); -if (lean::obj_tag(x_357) == 0) -{ -obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; uint8 x_383; obj* x_384; obj* x_385; -x_376 = lean::cnstr_get(x_364, 0); -lean::inc(x_376); -lean::dec(x_364); -x_377 = lean::cnstr_get(x_376, 1); -lean::inc(x_377); -lean::dec(x_376); -x_378 = lean::box(0); -x_379 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_379, 0, x_377); -lean::cnstr_set(x_379, 1, x_378); -x_380 = l_Lean_Expander_expandBracketedBinder___main___closed__2; -x_381 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_380, x_379); -x_382 = lean::cnstr_get(x_356, 0); -lean::inc(x_382); -lean::dec(x_356); -x_383 = lean::unbox(x_355); -lean::dec(x_355); -x_384 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19(x_383, x_381, x_382); -x_385 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_385, 0, x_384); -return x_385; -} -else -{ -obj* x_386; obj* x_387; obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; -if (lean::is_exclusive(x_357)) { - lean::cnstr_release(x_357, 0); - x_386 = x_357; -} else { - lean::dec_ref(x_357); - x_386 = lean::box(0); -} -x_387 = l_Lean_Parser_Term_binderDefault_HasView; -x_388 = lean::cnstr_get(x_387, 1); -lean::inc(x_388); -x_389 = lean::apply_1(x_388, x_364); -if (lean::is_scalar(x_386)) { - x_390 = lean::alloc_cnstr(1, 1, 0); -} else { - x_390 = x_386; -} -lean::cnstr_set(x_390, 0, x_389); -x_391 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_392 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_390, x_391, x_2); -lean::dec(x_390); -if (lean::obj_tag(x_392) == 0) -{ -obj* x_393; obj* x_394; obj* x_395; -lean::dec(x_356); -lean::dec(x_355); -x_393 = lean::cnstr_get(x_392, 0); -lean::inc(x_393); -if (lean::is_exclusive(x_392)) { - lean::cnstr_release(x_392, 0); - x_394 = x_392; -} else { - lean::dec_ref(x_392); - x_394 = lean::box(0); -} -if (lean::is_scalar(x_394)) { - x_395 = lean::alloc_cnstr(0, 1, 0); -} else { - x_395 = x_394; -} -lean::cnstr_set(x_395, 0, x_393); -return x_395; -} -else -{ -obj* x_396; obj* x_397; obj* x_398; uint8 x_399; obj* x_400; obj* x_401; -x_396 = lean::cnstr_get(x_392, 0); -lean::inc(x_396); -if (lean::is_exclusive(x_392)) { - lean::cnstr_release(x_392, 0); - x_397 = x_392; -} else { - lean::dec_ref(x_392); - x_397 = lean::box(0); -} -x_398 = lean::cnstr_get(x_356, 0); -lean::inc(x_398); -lean::dec(x_356); -x_399 = lean::unbox(x_355); -lean::dec(x_355); -x_400 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(x_399, x_396, x_398); -if (lean::is_scalar(x_397)) { - x_401 = lean::alloc_cnstr(1, 1, 0); -} else { - x_401 = x_397; -} -lean::cnstr_set(x_401, 0, x_400); -return x_401; -} -} -} -} -} -} -} -} -block_70: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -lean::dec(x_3); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = l_Lean_Expander_getOptType___main(x_6); -x_8 = lean::cnstr_get(x_5, 2); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; uint8 x_10; obj* x_11; obj* x_12; -lean::dec(x_6); -x_9 = lean::cnstr_get(x_5, 0); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::unbox(x_4); -lean::dec(x_4); -x_11 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__1(x_10, x_7, x_9); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_8, 0); -lean::inc(x_13); -lean::dec(x_8); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 x_22; obj* x_23; obj* x_24; -lean::dec(x_6); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -lean::dec(x_13); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Expander_expandBracketedBinder___main___closed__1; -x_20 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_19, x_18); -x_21 = lean::cnstr_get(x_5, 0); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::unbox(x_4); -lean::dec(x_4); -x_23 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__2(x_22, x_20, x_21); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -return x_24; -} -else -{ -lean::dec(x_7); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; obj* x_33; obj* x_34; -x_25 = lean::cnstr_get(x_13, 0); -lean::inc(x_25); -lean::dec(x_13); -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -lean::dec(x_25); -x_27 = lean::box(0); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Expander_expandBracketedBinder___main___closed__2; -x_30 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_29, x_28); -x_31 = lean::cnstr_get(x_5, 0); -lean::inc(x_31); -lean::dec(x_5); -x_32 = lean::unbox(x_4); -lean::dec(x_4); -x_33 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__3(x_32, x_30, x_31); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -else -{ -uint8 x_35; -x_35 = !lean::is_exclusive(x_6); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_36 = lean::cnstr_get(x_6, 0); -lean::dec(x_36); -x_37 = l_Lean_Parser_Term_binderDefault_HasView; -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -x_39 = lean::apply_1(x_38, x_13); -lean::cnstr_set(x_6, 0, x_39); -x_40 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_41 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_6, x_40, x_2); -lean::dec(x_6); -if (lean::obj_tag(x_41) == 0) -{ -uint8 x_42; -lean::dec(x_5); -lean::dec(x_4); -x_42 = !lean::is_exclusive(x_41); -if (x_42 == 0) -{ -return x_41; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_41, 0); -lean::inc(x_43); -lean::dec(x_41); -x_44 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -return x_44; -} -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_41); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; uint8 x_48; obj* x_49; -x_46 = lean::cnstr_get(x_41, 0); -x_47 = lean::cnstr_get(x_5, 0); -lean::inc(x_47); -lean::dec(x_5); -x_48 = lean::unbox(x_4); -lean::dec(x_4); -x_49 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4(x_48, x_46, x_47); -lean::cnstr_set(x_41, 0, x_49); -return x_41; -} -else -{ -obj* x_50; obj* x_51; uint8 x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_41, 0); -lean::inc(x_50); -lean::dec(x_41); -x_51 = lean::cnstr_get(x_5, 0); -lean::inc(x_51); -lean::dec(x_5); -x_52 = lean::unbox(x_4); -lean::dec(x_4); -x_53 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4(x_52, x_50, x_51); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -return x_54; -} -} -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_6); -x_55 = l_Lean_Parser_Term_binderDefault_HasView; -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -x_57 = lean::apply_1(x_56, x_13); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = l_Lean_Expander_expandBracketedBinder___main___closed__3; -x_60 = l_Lean_Expander_error___at_Lean_Expander_mkNotationTransformer___spec__1___rarg(x_58, x_59, x_2); -lean::dec(x_58); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; -lean::dec(x_5); -lean::dec(x_4); -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - x_62 = x_60; -} else { - lean::dec_ref(x_60); - x_62 = lean::box(0); -} -if (lean::is_scalar(x_62)) { - x_63 = lean::alloc_cnstr(0, 1, 0); -} else { - x_63 = x_62; -} -lean::cnstr_set(x_63, 0, x_61); -return x_63; -} -else -{ -obj* x_64; obj* x_65; obj* x_66; uint8 x_67; obj* x_68; obj* x_69; -x_64 = lean::cnstr_get(x_60, 0); -lean::inc(x_64); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - x_65 = x_60; -} else { - lean::dec_ref(x_60); - x_65 = lean::box(0); -} -x_66 = lean::cnstr_get(x_5, 0); -lean::inc(x_66); -lean::dec(x_5); -x_67 = lean::unbox(x_4); -lean::dec(x_4); -x_68 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4(x_67, x_64, x_66); -if (lean::is_scalar(x_65)) { - x_69 = lean::alloc_cnstr(1, 1, 0); -} else { - x_69 = x_65; -} -lean::cnstr_set(x_69, 0, x_68); -return x_69; -} -} -} -} -} -} -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__1(x_4, x_2, x_3); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__2(x_4, x_2, x_3); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__3(x_4, x_2, x_3); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__4(x_4, x_2, x_3); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__17(x_4, x_2, x_3); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__18(x_4, x_2, x_3); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__19(x_4, x_2, x_3); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Expander_expandBracketedBinder___main___spec__20(x_4, x_2, x_3); -return x_5; -} -} -obj* l_Lean_Expander_expandBracketedBinder___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_expandBracketedBinder___main(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_expandBracketedBinder(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_expandBracketedBinder___main(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Expander_expandBracketedBinder___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_expandBracketedBinder(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -lean::dec(x_2); -lean::dec(x_1); -lean::inc(x_3); -return x_3; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; obj* x_10; obj* x_11; obj* x_12; -x_5 = lean::cnstr_get(x_4, 0); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_2); -lean::inc(x_1); -x_7 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__1(x_1, x_2, x_3, x_6); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_5); -x_9 = 0; -x_10 = l_Lean_Expander_mkSimpleBinder(x_8, x_9, x_2); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::apply_2(x_1, x_11, x_7); -return x_12; -} -} -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -lean::dec(x_2); -lean::dec(x_1); -lean::inc(x_3); -return x_3; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; obj* x_10; obj* x_11; obj* x_12; -x_5 = lean::cnstr_get(x_4, 0); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_2); -lean::inc(x_1); -x_7 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__2(x_1, x_2, x_3, x_6); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_5); -x_9 = 0; -x_10 = l_Lean_Expander_mkSimpleBinder(x_8, x_9, x_2); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::apply_2(x_1, x_11, x_7); -return x_12; -} -} -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -lean::dec(x_1); -lean::inc(x_2); -return x_2; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_3, 0); -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_1); -x_6 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3(x_1, x_2, x_5); -lean::inc(x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_4); -x_8 = lean::apply_2(x_1, x_7, x_6); -return x_8; -} -} -} -obj* _init_l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("match "); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("x"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_3); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_3); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -x_10 = l_Lean_Parser_identUnivs_HasView; -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_9); -lean::cnstr_set(x_12, 1, x_4); -x_13 = lean::apply_1(x_11, x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_4); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -return x_15; -} -} -obj* _init_l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string(" with "); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__4() { -_start: -{ -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; uint8 x_17; obj* x_18; obj* x_19; -x_1 = lean::box(0); -x_2 = lean::mk_string("x"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_3); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_3); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -x_10 = l_Lean_Parser_Term_hole_HasView; -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::mk_string("_"); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_4); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::apply_1(x_11, x_15); -x_17 = 0; -x_18 = l_Lean_Expander_mkSimpleBinder(x_9, x_17, x_16); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -return x_19; -} -} -obj* l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; -lean::dec(x_1); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_2); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -lean::inc(x_1); -x_9 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4(x_1, x_2, x_8, x_4); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -lean::free_heap_obj(x_3); -lean::dec(x_7); -lean::dec(x_1); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -return x_9; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -return x_12; -} -} -else -{ -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_9); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_7, 0); -lean::inc(x_15); -lean::dec(x_7); -if (lean::obj_tag(x_15) == 4) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_28 = lean::cnstr_get(x_15, 0); -lean::inc(x_28); -lean::dec(x_15); -x_29 = lean::box(0); -x_30 = lean::box(0); -x_31 = l_Lean_Parser_Term_match_HasView; -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = l_Lean_Parser_Term_anonymousConstructor_HasView; -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -x_35 = lean::apply_1(x_34, x_28); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_29); -lean::cnstr_set(x_3, 1, x_30); -lean::cnstr_set(x_3, 0, x_36); -x_37 = l_Lean_Expander_mixfix_transform___closed__4; -x_38 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_38, 0, x_3); -lean::cnstr_set(x_38, 1, x_37); -lean::cnstr_set(x_38, 2, x_14); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_29); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_30); -x_41 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1; -x_42 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__2; -x_43 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3; -x_44 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_44, 0, x_41); -lean::cnstr_set(x_44, 1, x_42); -lean::cnstr_set(x_44, 2, x_29); -lean::cnstr_set(x_44, 3, x_43); -lean::cnstr_set(x_44, 4, x_29); -lean::cnstr_set(x_44, 5, x_40); -x_45 = lean::apply_1(x_32, x_44); -x_46 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__4; -x_47 = lean::apply_2(x_1, x_46, x_45); -lean::cnstr_set(x_9, 0, x_47); -return x_9; -} -else -{ -obj* x_48; -lean::free_heap_obj(x_9); -lean::free_heap_obj(x_3); -x_48 = lean::box(0); -x_16 = x_48; -goto block_27; -} -block_27: -{ -obj* x_17; -lean::dec(x_16); -x_17 = l_Lean_Expander_expandBracketedBinder___main(x_15, x_4); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -lean::dec(x_14); -lean::dec(x_1); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -return x_17; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_17); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_17, 0); -x_23 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3(x_1, x_14, x_22); -lean::dec(x_22); -lean::dec(x_14); -lean::cnstr_set(x_17, 0, x_23); -return x_17; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -lean::dec(x_17); -x_25 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3(x_1, x_14, x_24); -lean::dec(x_24); -lean::dec(x_14); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -} -} -} -else -{ -obj* x_49; obj* x_50; obj* x_51; -x_49 = lean::cnstr_get(x_9, 0); -lean::inc(x_49); -lean::dec(x_9); -x_50 = lean::cnstr_get(x_7, 0); -lean::inc(x_50); -lean::dec(x_7); -if (lean::obj_tag(x_50) == 4) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_61 = lean::cnstr_get(x_50, 0); -lean::inc(x_61); -lean::dec(x_50); -x_62 = lean::box(0); -x_63 = lean::box(0); -x_64 = l_Lean_Parser_Term_match_HasView; -x_65 = lean::cnstr_get(x_64, 1); -lean::inc(x_65); -x_66 = l_Lean_Parser_Term_anonymousConstructor_HasView; -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -x_68 = lean::apply_1(x_67, x_61); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_62); -lean::cnstr_set(x_3, 1, x_63); -lean::cnstr_set(x_3, 0, x_69); -x_70 = l_Lean_Expander_mixfix_transform___closed__4; -x_71 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_71, 0, x_3); -lean::cnstr_set(x_71, 1, x_70); -lean::cnstr_set(x_71, 2, x_49); -x_72 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_62); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_63); -x_74 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1; -x_75 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__2; -x_76 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3; -x_77 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_77, 0, x_74); -lean::cnstr_set(x_77, 1, x_75); -lean::cnstr_set(x_77, 2, x_62); -lean::cnstr_set(x_77, 3, x_76); -lean::cnstr_set(x_77, 4, x_62); -lean::cnstr_set(x_77, 5, x_73); -x_78 = lean::apply_1(x_65, x_77); -x_79 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__4; -x_80 = lean::apply_2(x_1, x_79, x_78); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -return x_81; -} -else -{ -obj* x_82; -lean::free_heap_obj(x_3); -x_82 = lean::box(0); -x_51 = x_82; -goto block_60; -} -block_60: -{ -obj* x_52; -lean::dec(x_51); -x_52 = l_Lean_Expander_expandBracketedBinder___main(x_50, x_4); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; -lean::dec(x_49); -lean::dec(x_1); -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - x_54 = x_52; -} else { - lean::dec_ref(x_52); - x_54 = lean::box(0); -} -if (lean::is_scalar(x_54)) { - x_55 = lean::alloc_cnstr(0, 1, 0); -} else { - x_55 = x_54; -} -lean::cnstr_set(x_55, 0, x_53); -return x_55; -} -else -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_56 = lean::cnstr_get(x_52, 0); -lean::inc(x_56); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - x_57 = x_52; -} else { - lean::dec_ref(x_52); - x_57 = lean::box(0); -} -x_58 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3(x_1, x_49, x_56); -lean::dec(x_56); -lean::dec(x_49); -if (lean::is_scalar(x_57)) { - x_59 = lean::alloc_cnstr(1, 1, 0); -} else { - x_59 = x_57; -} -lean::cnstr_set(x_59, 0, x_58); -return x_59; -} -} -} -} -else -{ -uint8 x_83; -lean::free_heap_obj(x_3); -x_83 = !lean::is_exclusive(x_9); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; obj* x_86; uint8 x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_84 = lean::cnstr_get(x_9, 0); -x_85 = lean::cnstr_get(x_7, 0); -lean::inc(x_85); -lean::dec(x_7); -x_86 = l_Lean_Expander_binderIdentToIdent___main(x_85); -lean::dec(x_85); -x_87 = 0; -x_88 = l_Lean_Expander_getOptType___main___closed__1; -x_89 = l_Lean_Expander_mkSimpleBinder(x_86, x_87, x_88); -x_90 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_90, 0, x_89); -x_91 = lean::apply_2(x_1, x_90, x_84); -lean::cnstr_set(x_9, 0, x_91); -return x_9; -} -else -{ -obj* x_92; obj* x_93; obj* x_94; uint8 x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_92 = lean::cnstr_get(x_9, 0); -lean::inc(x_92); -lean::dec(x_9); -x_93 = lean::cnstr_get(x_7, 0); -lean::inc(x_93); -lean::dec(x_7); -x_94 = l_Lean_Expander_binderIdentToIdent___main(x_93); -lean::dec(x_93); -x_95 = 0; -x_96 = l_Lean_Expander_getOptType___main___closed__1; -x_97 = l_Lean_Expander_mkSimpleBinder(x_94, x_95, x_96); -x_98 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -x_99 = lean::apply_2(x_1, x_98, x_92); -x_100 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_100, 0, x_99); -return x_100; -} -} -} -} -else -{ -obj* x_101; obj* x_102; obj* x_103; -x_101 = lean::cnstr_get(x_3, 0); -x_102 = lean::cnstr_get(x_3, 1); -lean::inc(x_102); -lean::inc(x_101); -lean::dec(x_3); -lean::inc(x_1); -x_103 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4(x_1, x_2, x_102, x_4); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_101); -lean::dec(x_1); -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_105 = x_103; -} else { - lean::dec_ref(x_103); - x_105 = lean::box(0); -} -if (lean::is_scalar(x_105)) { - x_106 = lean::alloc_cnstr(0, 1, 0); -} else { - x_106 = x_105; -} -lean::cnstr_set(x_106, 0, x_104); -return x_106; -} -else -{ -if (lean::obj_tag(x_101) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; -x_107 = lean::cnstr_get(x_103, 0); -lean::inc(x_107); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_108 = x_103; -} else { - lean::dec_ref(x_103); - x_108 = lean::box(0); -} -x_109 = lean::cnstr_get(x_101, 0); -lean::inc(x_109); -lean::dec(x_101); -if (lean::obj_tag(x_109) == 4) -{ -obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_120 = lean::cnstr_get(x_109, 0); -lean::inc(x_120); -lean::dec(x_109); -x_121 = lean::box(0); -x_122 = lean::box(0); -x_123 = l_Lean_Parser_Term_match_HasView; -x_124 = lean::cnstr_get(x_123, 1); -lean::inc(x_124); -x_125 = l_Lean_Parser_Term_anonymousConstructor_HasView; -x_126 = lean::cnstr_get(x_125, 1); -lean::inc(x_126); -x_127 = lean::apply_1(x_126, x_120); -x_128 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_128, 0, x_127); -lean::cnstr_set(x_128, 1, x_121); -x_129 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_122); -x_130 = l_Lean_Expander_mixfix_transform___closed__4; -x_131 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_131, 0, x_129); -lean::cnstr_set(x_131, 1, x_130); -lean::cnstr_set(x_131, 2, x_107); -x_132 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_132, 0, x_131); -lean::cnstr_set(x_132, 1, x_121); -x_133 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_133, 0, x_132); -lean::cnstr_set(x_133, 1, x_122); -x_134 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1; -x_135 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__2; -x_136 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3; -x_137 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_137, 0, x_134); -lean::cnstr_set(x_137, 1, x_135); -lean::cnstr_set(x_137, 2, x_121); -lean::cnstr_set(x_137, 3, x_136); -lean::cnstr_set(x_137, 4, x_121); -lean::cnstr_set(x_137, 5, x_133); -x_138 = lean::apply_1(x_124, x_137); -x_139 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__4; -x_140 = lean::apply_2(x_1, x_139, x_138); -if (lean::is_scalar(x_108)) { - x_141 = lean::alloc_cnstr(1, 1, 0); -} else { - x_141 = x_108; -} -lean::cnstr_set(x_141, 0, x_140); -return x_141; -} -else -{ -obj* x_142; -lean::dec(x_108); -x_142 = lean::box(0); -x_110 = x_142; -goto block_119; -} -block_119: -{ -obj* x_111; -lean::dec(x_110); -x_111 = l_Lean_Expander_expandBracketedBinder___main(x_109, x_4); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_112; obj* x_113; obj* x_114; -lean::dec(x_107); -lean::dec(x_1); -x_112 = lean::cnstr_get(x_111, 0); -lean::inc(x_112); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - x_113 = x_111; -} else { - lean::dec_ref(x_111); - x_113 = lean::box(0); -} -if (lean::is_scalar(x_113)) { - x_114 = lean::alloc_cnstr(0, 1, 0); -} else { - x_114 = x_113; -} -lean::cnstr_set(x_114, 0, x_112); -return x_114; -} -else -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_115 = lean::cnstr_get(x_111, 0); -lean::inc(x_115); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - x_116 = x_111; -} else { - lean::dec_ref(x_111); - x_116 = lean::box(0); -} -x_117 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3(x_1, x_107, x_115); -lean::dec(x_115); -lean::dec(x_107); -if (lean::is_scalar(x_116)) { - x_118 = lean::alloc_cnstr(1, 1, 0); -} else { - x_118 = x_116; -} -lean::cnstr_set(x_118, 0, x_117); -return x_118; -} -} -} -else -{ -obj* x_143; obj* x_144; obj* x_145; obj* x_146; uint8 x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_143 = lean::cnstr_get(x_103, 0); -lean::inc(x_143); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_144 = x_103; -} else { - lean::dec_ref(x_103); - x_144 = lean::box(0); -} -x_145 = lean::cnstr_get(x_101, 0); -lean::inc(x_145); -lean::dec(x_101); -x_146 = l_Lean_Expander_binderIdentToIdent___main(x_145); -lean::dec(x_145); -x_147 = 0; -x_148 = l_Lean_Expander_getOptType___main___closed__1; -x_149 = l_Lean_Expander_mkSimpleBinder(x_146, x_147, x_148); -x_150 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_150, 0, x_149); -x_151 = lean::apply_2(x_1, x_150, x_143); -if (lean::is_scalar(x_144)) { - x_152 = lean::alloc_cnstr(1, 1, 0); -} else { - x_152 = x_144; -} -lean::cnstr_set(x_152, 0, x_151); -return x_152; -} -} -} -} -} -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -lean::dec(x_2); -lean::dec(x_1); -lean::inc(x_3); -return x_3; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; obj* x_10; obj* x_11; obj* x_12; -x_5 = lean::cnstr_get(x_4, 0); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_2); -lean::inc(x_1); -x_7 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5(x_1, x_2, x_3, x_6); -x_8 = l_Lean_Expander_binderIdentToIdent___main(x_5); -x_9 = 0; -x_10 = l_Lean_Expander_mkSimpleBinder(x_8, x_9, x_2); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::apply_2(x_1, x_11, x_7); -return x_12; -} -} -} -obj* l_Lean_Expander_expandBinders(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -lean::dec(x_2); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = l_Lean_Expander_getOptType___main___closed__1; -x_9 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__1(x_1, x_8, x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_6); -if (x_12 == 0) -{ -obj* x_13; -x_13 = lean::cnstr_get(x_6, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -lean::dec(x_13); -x_15 = lean::cnstr_get(x_5, 0); -lean::inc(x_15); -lean::dec(x_5); -x_16 = lean::cnstr_get(x_14, 1); -lean::inc(x_16); -lean::dec(x_14); -x_17 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__2(x_1, x_16, x_3, x_15); -lean::dec(x_15); -lean::dec(x_3); -lean::cnstr_set(x_6, 0, x_17); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_6); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_13, 0); -lean::inc(x_19); -lean::dec(x_13); -lean::inc(x_1); -x_20 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4(x_1, x_3, x_19, x_4); -if (lean::obj_tag(x_20) == 0) -{ -uint8 x_21; -lean::free_heap_obj(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -return x_20; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_20, 0); -lean::inc(x_22); -lean::dec(x_20); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -return x_23; -} -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_20); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_25 = lean::cnstr_get(x_20, 0); -x_26 = lean::cnstr_get(x_5, 0); -lean::inc(x_26); -lean::dec(x_5); -x_27 = l_Lean_Expander_getOptType___main___closed__1; -x_28 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5(x_1, x_27, x_25, x_26); -lean::dec(x_26); -lean::dec(x_25); -lean::cnstr_set(x_6, 0, x_28); -lean::cnstr_set(x_20, 0, x_6); -return x_20; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_29 = lean::cnstr_get(x_20, 0); -lean::inc(x_29); -lean::dec(x_20); -x_30 = lean::cnstr_get(x_5, 0); -lean::inc(x_30); -lean::dec(x_5); -x_31 = l_Lean_Expander_getOptType___main___closed__1; -x_32 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5(x_1, x_31, x_29, x_30); -lean::dec(x_30); -lean::dec(x_29); -lean::cnstr_set(x_6, 0, x_32); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_6); -return x_33; -} -} -} -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_6, 0); -lean::inc(x_34); -lean::dec(x_6); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -lean::dec(x_34); -x_36 = lean::cnstr_get(x_5, 0); -lean::inc(x_36); -lean::dec(x_5); -x_37 = lean::cnstr_get(x_35, 1); -lean::inc(x_37); -lean::dec(x_35); -x_38 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__2(x_1, x_37, x_3, x_36); -lean::dec(x_36); -lean::dec(x_3); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -return x_40; -} -else -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_34, 0); -lean::inc(x_41); -lean::dec(x_34); -lean::inc(x_1); -x_42 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4(x_1, x_3, x_41, x_4); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; -lean::dec(x_5); -lean::dec(x_1); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - x_44 = x_42; -} else { - lean::dec_ref(x_42); - x_44 = lean::box(0); -} -if (lean::is_scalar(x_44)) { - x_45 = lean::alloc_cnstr(0, 1, 0); -} else { - x_45 = x_44; -} -lean::cnstr_set(x_45, 0, x_43); -return x_45; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_46 = lean::cnstr_get(x_42, 0); -lean::inc(x_46); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - x_47 = x_42; -} else { - lean::dec_ref(x_42); - x_47 = lean::box(0); -} -x_48 = lean::cnstr_get(x_5, 0); -lean::inc(x_48); -lean::dec(x_5); -x_49 = l_Lean_Expander_getOptType___main___closed__1; -x_50 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5(x_1, x_49, x_46, x_48); -lean::dec(x_48); -lean::dec(x_46); -x_51 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_51, 0, x_50); -if (lean::is_scalar(x_47)) { - x_52 = lean::alloc_cnstr(1, 1, 0); -} else { - x_52 = x_47; -} -lean::cnstr_set(x_52, 0, x_51); -return x_52; -} -} -} -} -} -else -{ -obj* x_53; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_53 = l_Lean_Expander_noExpansion(x_4); -return x_53; -} -} -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -return x_5; -} -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__2(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -return x_5; -} -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__3(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_foldr___main___at_Lean_Expander_expandBinders___spec__5(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -return x_5; -} -} -obj* l_Lean_Expander_expandBinders___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Expander_expandBinders(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = l_Lean_Expander_expandBracketedBinder___main___closed__4; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_1); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 0); -x_6 = lean::cnstr_get(x_1, 1); -x_7 = l_Lean_Expander_expandBracketedBinder___main(x_5, x_2); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -lean::free_heap_obj(x_1); -lean::dec(x_6); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -return x_7; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -return x_10; -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_7, 0); -lean::inc(x_11); -lean::dec(x_7); -x_12 = l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1(x_6, x_2); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -lean::dec(x_11); -lean::free_heap_obj(x_1); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -} -else -{ -uint8 x_16; -x_16 = !lean::is_exclusive(x_12); -if (x_16 == 0) -{ -obj* x_17; -x_17 = lean::cnstr_get(x_12, 0); -lean::cnstr_set(x_1, 1, x_17); -lean::cnstr_set(x_1, 0, x_11); -lean::cnstr_set(x_12, 0, x_1); -return x_12; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_12, 0); -lean::inc(x_18); -lean::dec(x_12); -lean::cnstr_set(x_1, 1, x_18); -lean::cnstr_set(x_1, 0, x_11); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_1); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; -x_20 = lean::cnstr_get(x_1, 0); -x_21 = lean::cnstr_get(x_1, 1); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_1); -x_22 = l_Lean_Expander_expandBracketedBinder___main(x_20, x_2); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_21); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -if (lean::is_exclusive(x_22)) { - lean::cnstr_release(x_22, 0); - x_24 = x_22; -} else { - lean::dec_ref(x_22); - x_24 = lean::box(0); -} -if (lean::is_scalar(x_24)) { - x_25 = lean::alloc_cnstr(0, 1, 0); -} else { - x_25 = x_24; -} -lean::cnstr_set(x_25, 0, x_23); -return x_25; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1(x_21, x_2); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_26); -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -if (lean::is_exclusive(x_27)) { - lean::cnstr_release(x_27, 0); - x_29 = x_27; -} else { - lean::dec_ref(x_27); - x_29 = lean::box(0); -} -if (lean::is_scalar(x_29)) { - x_30 = lean::alloc_cnstr(0, 1, 0); -} else { - x_30 = x_29; -} -lean::cnstr_set(x_30, 0, x_28); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_27, 0); -lean::inc(x_31); -if (lean::is_exclusive(x_27)) { - lean::cnstr_release(x_27, 0); - x_32 = x_27; -} else { - lean::dec_ref(x_27); - x_32 = lean::box(0); -} -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_26); -lean::cnstr_set(x_33, 1, x_31); -if (lean::is_scalar(x_32)) { - x_34 = lean::alloc_cnstr(1, 1, 0); -} else { - x_34 = x_32; -} -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -} -} -obj* l_Lean_Expander_bracketedBinders_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -x_8 = l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1(x_7, x_2); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -lean::free_heap_obj(x_5); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -return x_8; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_8); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_8, 0); -x_14 = lean::cnstr_get(x_3, 1); -lean::inc(x_14); -x_15 = l_List_join___main___rarg(x_13); -lean::cnstr_set_tag(x_5, 1); -lean::cnstr_set(x_5, 0, x_15); -x_16 = lean::apply_1(x_14, x_5); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_8, 0, x_17); -return x_8; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::cnstr_get(x_8, 0); -lean::inc(x_18); -lean::dec(x_8); -x_19 = lean::cnstr_get(x_3, 1); -lean::inc(x_19); -x_20 = l_List_join___main___rarg(x_18); -lean::cnstr_set_tag(x_5, 1); -lean::cnstr_set(x_5, 0, x_20); -x_21 = lean::apply_1(x_19, x_5); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -return x_23; -} -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_5, 0); -lean::inc(x_24); -lean::dec(x_5); -x_25 = l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1(x_24, x_2); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -if (lean::is_exclusive(x_25)) { - lean::cnstr_release(x_25, 0); - x_27 = x_25; -} else { - lean::dec_ref(x_25); - x_27 = lean::box(0); -} -if (lean::is_scalar(x_27)) { - x_28 = lean::alloc_cnstr(0, 1, 0); -} else { - x_28 = x_27; -} -lean::cnstr_set(x_28, 0, x_26); -return x_28; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_29 = lean::cnstr_get(x_25, 0); -lean::inc(x_29); -if (lean::is_exclusive(x_25)) { - lean::cnstr_release(x_25, 0); - x_30 = x_25; -} else { - lean::dec_ref(x_25); - x_30 = lean::box(0); -} -x_31 = lean::cnstr_get(x_3, 1); -lean::inc(x_31); -x_32 = l_List_join___main___rarg(x_29); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::apply_1(x_31, x_33); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -if (lean::is_scalar(x_30)) { - x_36 = lean::alloc_cnstr(1, 1, 0); -} else { - x_36 = x_30; -} -lean::cnstr_set(x_36, 0, x_35); -return x_36; -} -} -} -else -{ -obj* x_37; -lean::dec(x_5); -x_37 = l_Lean_Expander_noExpansion(x_2); -return x_37; -} -} -} -obj* l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_mmap___main___at_Lean_Expander_bracketedBinders_transform___spec__1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_bracketedBinders_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_bracketedBinders_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_lambda_transform___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = l_Lean_Parser_Term_lambda_HasView; -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -x_5 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_6 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_7 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_1); -lean::cnstr_set(x_7, 2, x_6); -lean::cnstr_set(x_7, 3, x_2); -x_8 = lean::apply_1(x_4, x_7); -return x_8; -} -} -obj* _init_l_Lean_Expander_lambda_transform___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_lambda_transform___lambda__1), 2, 0); -return x_1; -} -} -obj* l_Lean_Expander_lambda_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_3 = l_Lean_Parser_Term_lambda_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_5, 3); -lean::inc(x_7); -lean::dec(x_5); -x_8 = l_Lean_Expander_lambda_transform___closed__1; -x_9 = l_Lean_Expander_expandBinders(x_8, x_6, x_7, x_2); -return x_9; -} -} -obj* l_Lean_Expander_lambda_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_lambda_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_pi_transform___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; uint8 x_6; -x_4 = l_Lean_Parser_Term_pi_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = !lean::is_exclusive(x_1); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_1, 3); -lean::dec(x_7); -x_8 = lean::cnstr_get(x_1, 2); -lean::dec(x_8); -x_9 = lean::cnstr_get(x_1, 1); -lean::dec(x_9); -x_10 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -lean::cnstr_set(x_1, 3, x_3); -lean::cnstr_set(x_1, 2, x_10); -lean::cnstr_set(x_1, 1, x_2); -x_11 = lean::apply_1(x_5, x_1); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_1, 0); -lean::inc(x_12); -lean::dec(x_1); -x_13 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_2); -lean::cnstr_set(x_14, 2, x_13); -lean::cnstr_set(x_14, 3, x_3); -x_15 = lean::apply_1(x_5, x_14); -return x_15; -} -} -} -obj* l_Lean_Expander_pi_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_3 = l_Lean_Parser_Term_pi_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -lean::inc(x_5); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_pi_transform___lambda__1), 3, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 3); -lean::inc(x_8); -lean::dec(x_5); -x_9 = l_Lean_Expander_expandBinders(x_6, x_7, x_8, x_2); -return x_9; -} -} -obj* l_Lean_Expander_pi_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_pi_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_coe___at_Lean_Expander_depArrow_transform___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_4); -x_7 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_10, 0, x_8); -x_11 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(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_11); -return x_12; -} -} -} -} -obj* _init_l_Lean_Expander_depArrow_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("Π"); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -x_4 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -obj* l_Lean_Expander_depArrow_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_3 = l_Lean_Parser_Term_depArrow_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = l_Lean_Parser_Term_pi_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_5, 2); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_10); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = l_Lean_Expander_depArrow_transform___closed__1; -x_18 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_19 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_16); -lean::cnstr_set(x_19, 2, x_18); -lean::cnstr_set(x_19, 3, x_9); -x_20 = lean::apply_1(x_7, x_19); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -} -obj* l_Lean_Expander_depArrow_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_depArrow_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_arrow_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_string("a"); -x_4 = lean_name_mk_string(x_2, x_3); -x_5 = lean::mk_string("."); -lean::inc(x_4); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_4); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -return x_9; -} -} -obj* l_Lean_Expander_arrow_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_3 = l_Lean_Parser_Term_arrow_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = l_Lean_Parser_Term_pi_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -x_9 = l_Lean_Expander_coeBinderBracketedBinder___closed__1; -x_10 = l_Lean_Expander_arrow_transform___closed__1; -x_11 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_12 = l_Lean_Expander_coeBinderBracketedBinder___closed__2; -x_13 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_11); -lean::cnstr_set(x_13, 3, x_8); -lean::cnstr_set(x_13, 4, x_12); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::cnstr_get(x_5, 2); -lean::inc(x_16); -lean::dec(x_5); -x_17 = l_Lean_Expander_depArrow_transform___closed__1; -x_18 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_19 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_15); -lean::cnstr_set(x_19, 2, x_18); -lean::cnstr_set(x_19, 3, x_16); -x_20 = lean::apply_1(x_7, x_19); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -} -obj* l_Lean_Expander_arrow_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_arrow_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_List_map___main___at_Lean_Expander_paren_transform___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_4, 0); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_List_map___main___at_Lean_Expander_paren_transform___spec__1(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -x_11 = l_List_map___main___at_Lean_Expander_paren_transform___spec__1(x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -} -} -obj* _init_l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::mk_string("Prod"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("mk"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = l_Lean_Expander_globId(x_5); -return x_6; -} -} -obj* l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_1); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::cnstr_get(x_1, 1); -lean::dec(x_6); -lean::inc(x_3); -x_7 = l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3(x_3, lean::box(0)); -x_8 = !lean::is_exclusive(x_3); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_3, 1); -lean::dec(x_9); -x_10 = lean::cnstr_get(x_3, 0); -lean::dec(x_10); -x_11 = lean::box(0); -lean::cnstr_set(x_3, 1, x_11); -lean::cnstr_set(x_3, 0, x_7); -x_12 = l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3___closed__1; -x_13 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_12, x_1); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_3); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_7); -lean::cnstr_set(x_15, 1, x_14); -lean::cnstr_set(x_1, 1, x_15); -x_16 = l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3___closed__1; -x_17 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_16, x_1); -return x_17; -} -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_18 = lean::cnstr_get(x_1, 0); -lean::inc(x_18); -lean::dec(x_1); -lean::inc(x_3); -x_19 = l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3(x_3, lean::box(0)); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_20 = x_3; -} else { - lean::dec_ref(x_3); - x_20 = lean::box(0); -} -x_21 = lean::box(0); -if (lean::is_scalar(x_20)) { - x_22 = lean::alloc_cnstr(1, 2, 0); -} else { - x_22 = x_20; -} -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_18); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3___closed__1; -x_25 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_24, x_23); -return x_25; -} -} -} -} -obj* l_List_foldr1Opt___main___at_Lean_Expander_paren_transform___spec__2(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -obj* x_3; obj* x_4; -x_3 = l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3(x_1, lean::box(0)); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -} -obj* _init_l_Lean_Expander_paren_transform___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("Unit"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("unit"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = l_Lean_Expander_globId(x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -obj* _init_l_Lean_Expander_paren_transform___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("typedExpr"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = l_Lean_Expander_globId(x_3); -return x_4; -} -} -obj* l_Lean_Expander_paren_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = l_Lean_Parser_Term_paren_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -x_7 = l_Lean_Expander_paren_transform___closed__1; -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -lean::cnstr_set(x_6, 0, x_11); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_6); -return x_12; -} -else -{ -uint8 x_13; -lean::free_heap_obj(x_6); -x_13 = !lean::is_exclusive(x_10); -if (x_13 == 0) -{ -obj* x_14; -x_14 = lean::cnstr_get(x_10, 0); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -lean::free_heap_obj(x_10); -x_15 = lean::cnstr_get(x_9, 0); -lean::inc(x_15); -lean::dec(x_9); -x_16 = lean::cnstr_get(x_14, 0); -lean::inc(x_16); -lean::dec(x_14); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = l_List_map___main___at_Lean_Expander_paren_transform___spec__1(x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_15); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_List_foldr1Opt___main___at_Lean_Expander_paren_transform___spec__2(x_19); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_9, 0); -lean::inc(x_22); -lean::dec(x_9); -x_23 = lean::cnstr_get(x_14, 0); -lean::inc(x_23); -lean::dec(x_14); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -x_25 = lean::box(0); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_22); -lean::cnstr_set(x_26, 1, 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_26); -x_28 = l_Lean_Expander_paren_transform___closed__2; -x_29 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_28, x_27); -lean::cnstr_set(x_10, 0, x_29); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_10); -return x_30; -} -} -else -{ -obj* x_31; -x_31 = lean::cnstr_get(x_10, 0); -lean::inc(x_31); -lean::dec(x_10); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_32 = lean::cnstr_get(x_9, 0); -lean::inc(x_32); -lean::dec(x_9); -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -x_35 = l_List_map___main___at_Lean_Expander_paren_transform___spec__1(x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_32); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_List_foldr1Opt___main___at_Lean_Expander_paren_transform___spec__2(x_36); -x_38 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -return x_38; -} -else -{ -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; -x_39 = lean::cnstr_get(x_9, 0); -lean::inc(x_39); -lean::dec(x_9); -x_40 = lean::cnstr_get(x_31, 0); -lean::inc(x_40); -lean::dec(x_31); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -x_42 = lean::box(0); -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_41); -lean::cnstr_set(x_44, 1, x_43); -x_45 = l_Lean_Expander_paren_transform___closed__2; -x_46 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_45, x_44); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -x_48 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_48, 0, x_47); -return x_48; -} -} -} -} -else -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_6, 0); -lean::inc(x_49); -lean::dec(x_6); -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; -x_51 = lean::cnstr_get(x_49, 0); -lean::inc(x_51); -lean::dec(x_49); -x_52 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_52, 0, x_51); -x_53 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -return x_53; -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_50, 0); -lean::inc(x_54); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - x_55 = x_50; -} else { - lean::dec_ref(x_50); - x_55 = lean::box(0); -} -if (lean::obj_tag(x_54) == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -lean::dec(x_55); -x_56 = lean::cnstr_get(x_49, 0); -lean::inc(x_56); -lean::dec(x_49); -x_57 = lean::cnstr_get(x_54, 0); -lean::inc(x_57); -lean::dec(x_54); -x_58 = lean::cnstr_get(x_57, 1); -lean::inc(x_58); -lean::dec(x_57); -x_59 = l_List_map___main___at_Lean_Expander_paren_transform___spec__1(x_58); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_56); -lean::cnstr_set(x_60, 1, x_59); -x_61 = l_List_foldr1Opt___main___at_Lean_Expander_paren_transform___spec__2(x_60); -x_62 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_62, 0, x_61); -return x_62; -} -else -{ -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; -x_63 = lean::cnstr_get(x_49, 0); -lean::inc(x_63); -lean::dec(x_49); -x_64 = lean::cnstr_get(x_54, 0); -lean::inc(x_64); -lean::dec(x_54); -x_65 = lean::cnstr_get(x_64, 1); -lean::inc(x_65); -lean::dec(x_64); -x_66 = lean::box(0); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_63); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_65); -lean::cnstr_set(x_68, 1, x_67); -x_69 = l_Lean_Expander_paren_transform___closed__2; -x_70 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_69, x_68); -if (lean::is_scalar(x_55)) { - x_71 = lean::alloc_cnstr(1, 1, 0); -} else { - x_71 = x_55; -} -lean::cnstr_set(x_71, 0, x_70); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -return x_72; -} -} -} -} -} -} -obj* l_Lean_Expander_paren_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_paren_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_assume_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_string("this"); -x_4 = lean_name_mk_string(x_2, x_3); -x_5 = lean::mk_string("."); -lean::inc(x_4); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_4); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -return x_9; -} -} -obj* l_Lean_Expander_assume_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = l_Lean_Parser_Term_assume_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_5, 3); -lean::inc(x_7); -lean::dec(x_5); -x_8 = l_Lean_Parser_Term_lambda_HasView; -if (lean::obj_tag(x_6) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_6, 0); -lean::inc(x_10); -lean::dec(x_6); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -x_12 = l_Lean_Expander_coeBinderBracketedBinder___closed__1; -x_13 = l_Lean_Expander_assume_transform___closed__1; -x_14 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_15 = l_Lean_Expander_coeBinderBracketedBinder___closed__2; -x_16 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_16, 0, x_12); -lean::cnstr_set(x_16, 1, x_13); -lean::cnstr_set(x_16, 2, x_14); -lean::cnstr_set(x_16, 3, x_11); -lean::cnstr_set(x_16, 4, x_15); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_20 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_21 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_18); -lean::cnstr_set(x_21, 2, x_20); -lean::cnstr_set(x_21, 3, x_7); -x_22 = lean::apply_1(x_9, x_21); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_25 = lean::cnstr_get(x_8, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_6, 0); -lean::inc(x_26); -lean::dec(x_6); -x_27 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_28 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_29 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set(x_29, 1, x_26); -lean::cnstr_set(x_29, 2, x_28); -lean::cnstr_set(x_29, 3, x_7); -x_30 = lean::apply_1(x_25, x_29); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -return x_32; -} -} -} -obj* l_Lean_Expander_assume_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_assume_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_if_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("ite"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = l_Lean_Expander_globId(x_3); -return x_4; -} -} -obj* _init_l_Lean_Expander_if_transform___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("Not"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = l_Lean_Expander_globId(x_3); -return x_4; -} -} -obj* _init_l_Lean_Expander_if_transform___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("dite"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = l_Lean_Expander_globId(x_3); -return x_4; -} -} -obj* l_Lean_Expander_if_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = l_Lean_Parser_Term_if_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_7 = lean::cnstr_get(x_5, 2); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 4); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_5, 6); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Expander_if_transform___closed__1; -x_15 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_14, x_13); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -return x_17; -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_6); -if (x_18 == 0) -{ -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_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_47; obj* x_48; obj* x_49; obj* x_50; -x_19 = lean::cnstr_get(x_6, 0); -x_20 = lean::cnstr_get(x_5, 2); -lean::inc(x_20); -x_21 = l_Lean_Parser_Term_lambda_HasView; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_19, 0); -lean::inc(x_23); -lean::dec(x_19); -x_24 = l_Lean_Expander_coeBinderBracketedBinder___closed__1; -x_25 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_26 = l_Lean_Expander_coeBinderBracketedBinder___closed__2; -lean::inc(x_20); -lean::inc(x_23); -x_27 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_23); -lean::cnstr_set(x_27, 2, x_25); -lean::cnstr_set(x_27, 3, x_20); -lean::cnstr_set(x_27, 4, x_26); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::cnstr_get(x_5, 4); -lean::inc(x_30); -x_31 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_32 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_33 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_29); -lean::cnstr_set(x_33, 2, x_32); -lean::cnstr_set(x_33, 3, x_30); -lean::inc(x_22); -x_34 = lean::apply_1(x_22, x_33); -x_35 = lean::box(0); -lean::inc(x_20); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_20); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Expander_if_transform___closed__2; -x_38 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_37, x_36); -x_39 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_39, 0, x_24); -lean::cnstr_set(x_39, 1, x_23); -lean::cnstr_set(x_39, 2, x_25); -lean::cnstr_set(x_39, 3, x_38); -lean::cnstr_set(x_39, 4, x_26); -x_40 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -x_42 = lean::cnstr_get(x_5, 6); -lean::inc(x_42); -lean::dec(x_5); -x_43 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_43, 0, x_31); -lean::cnstr_set(x_43, 1, x_41); -lean::cnstr_set(x_43, 2, x_32); -lean::cnstr_set(x_43, 3, x_42); -x_44 = lean::apply_1(x_22, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_35); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_34); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_20); -lean::cnstr_set(x_47, 1, x_46); -x_48 = l_Lean_Expander_if_transform___closed__3; -x_49 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_48, x_47); -lean::cnstr_set(x_6, 0, x_49); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_6); -return x_50; -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_51 = lean::cnstr_get(x_6, 0); -lean::inc(x_51); -lean::dec(x_6); -x_52 = lean::cnstr_get(x_5, 2); -lean::inc(x_52); -x_53 = l_Lean_Parser_Term_lambda_HasView; -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_51, 0); -lean::inc(x_55); -lean::dec(x_51); -x_56 = l_Lean_Expander_coeBinderBracketedBinder___closed__1; -x_57 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_58 = l_Lean_Expander_coeBinderBracketedBinder___closed__2; -lean::inc(x_52); -lean::inc(x_55); -x_59 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_59, 0, x_56); -lean::cnstr_set(x_59, 1, x_55); -lean::cnstr_set(x_59, 2, x_57); -lean::cnstr_set(x_59, 3, x_52); -lean::cnstr_set(x_59, 4, x_58); -x_60 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -x_62 = lean::cnstr_get(x_5, 4); -lean::inc(x_62); -x_63 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_64 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_65 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_65, 0, x_63); -lean::cnstr_set(x_65, 1, x_61); -lean::cnstr_set(x_65, 2, x_64); -lean::cnstr_set(x_65, 3, x_62); -lean::inc(x_54); -x_66 = lean::apply_1(x_54, x_65); -x_67 = lean::box(0); -lean::inc(x_52); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_52); -lean::cnstr_set(x_68, 1, x_67); -x_69 = l_Lean_Expander_if_transform___closed__2; -x_70 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_69, x_68); -x_71 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_71, 0, x_56); -lean::cnstr_set(x_71, 1, x_55); -lean::cnstr_set(x_71, 2, x_57); -lean::cnstr_set(x_71, 3, x_70); -lean::cnstr_set(x_71, 4, x_58); -x_72 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -x_73 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_73, 0, x_72); -x_74 = lean::cnstr_get(x_5, 6); -lean::inc(x_74); -lean::dec(x_5); -x_75 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_75, 0, x_63); -lean::cnstr_set(x_75, 1, x_73); -lean::cnstr_set(x_75, 2, x_64); -lean::cnstr_set(x_75, 3, x_74); -x_76 = lean::apply_1(x_54, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_67); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_66); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_52); -lean::cnstr_set(x_79, 1, x_78); -x_80 = l_Lean_Expander_if_transform___closed__3; -x_81 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_80, x_79); -x_82 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -return x_83; -} -} -} -} -obj* l_Lean_Expander_if_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_if_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_let_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::box(0); -x_2 = lean::mk_string(" : "); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = l_Lean_Parser_Term_hole_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::mk_string("_"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::apply_1(x_7, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_5); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -obj* l_Lean_Expander_let_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = l_Lean_Parser_Term_let_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 2); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_5); -if (x_11 == 0) -{ -obj* x_12; uint8 x_13; -x_12 = lean::cnstr_get(x_5, 1); -lean::dec(x_12); -x_13 = !lean::is_exclusive(x_8); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_14 = lean::cnstr_get(x_8, 2); -lean::dec(x_14); -x_15 = lean::cnstr_get(x_8, 1); -lean::dec(x_15); -x_16 = lean::cnstr_get(x_3, 1); -lean::inc(x_16); -x_17 = l_Lean_Expander_let_transform___closed__1; -lean::cnstr_set(x_8, 2, x_17); -x_18 = lean::apply_1(x_16, x_5); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_21 = lean::cnstr_get(x_8, 0); -lean::inc(x_21); -lean::dec(x_8); -x_22 = lean::cnstr_get(x_3, 1); -lean::inc(x_22); -x_23 = l_Lean_Expander_let_transform___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_9); -lean::cnstr_set(x_24, 2, x_23); -lean::cnstr_set(x_6, 0, x_24); -x_25 = lean::apply_1(x_22, x_5); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_28 = lean::cnstr_get(x_5, 0); -x_29 = lean::cnstr_get(x_5, 2); -x_30 = lean::cnstr_get(x_5, 3); -x_31 = lean::cnstr_get(x_5, 4); -x_32 = lean::cnstr_get(x_5, 5); -lean::inc(x_32); -lean::inc(x_31); -lean::inc(x_30); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_5); -x_33 = lean::cnstr_get(x_8, 0); -lean::inc(x_33); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_34 = x_8; -} else { - lean::dec_ref(x_8); - x_34 = lean::box(0); -} -x_35 = lean::cnstr_get(x_3, 1); -lean::inc(x_35); -x_36 = l_Lean_Expander_let_transform___closed__1; -if (lean::is_scalar(x_34)) { - x_37 = lean::alloc_cnstr(0, 3, 0); -} else { - x_37 = x_34; -} -lean::cnstr_set(x_37, 0, x_33); -lean::cnstr_set(x_37, 1, x_9); -lean::cnstr_set(x_37, 2, x_36); -lean::cnstr_set(x_6, 0, x_37); -x_38 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_38, 0, x_28); -lean::cnstr_set(x_38, 1, x_6); -lean::cnstr_set(x_38, 2, x_29); -lean::cnstr_set(x_38, 3, x_30); -lean::cnstr_set(x_38, 4, x_31); -lean::cnstr_set(x_38, 5, x_32); -x_39 = lean::apply_1(x_35, x_38); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -return x_41; -} -} -else -{ -obj* x_42; -lean::dec(x_10); -lean::free_heap_obj(x_6); -lean::dec(x_8); -lean::dec(x_5); -x_42 = l_Lean_Expander_noExpansion(x_2); -return x_42; -} -} -else -{ -uint8 x_43; -x_43 = !lean::is_exclusive(x_5); -if (x_43 == 0) -{ -obj* x_44; obj* x_45; uint8 x_46; -x_44 = lean::cnstr_get(x_5, 3); -x_45 = lean::cnstr_get(x_5, 1); -lean::dec(x_45); -x_46 = !lean::is_exclusive(x_8); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_47 = lean::cnstr_get(x_8, 2); -x_48 = lean::cnstr_get(x_8, 1); -lean::dec(x_48); -x_49 = lean::box(0); -x_50 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_9); -x_51 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_51, 0, x_50); -x_52 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_52, 0, x_51); -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_49); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = lean::cnstr_get(x_3, 1); -lean::inc(x_55); -x_56 = l_Lean_Parser_Term_pi_HasView; -x_57 = lean::cnstr_get(x_56, 1); -lean::inc(x_57); -x_58 = l_Lean_Expander_getOptType___main(x_47); -lean::dec(x_47); -x_59 = l_Lean_Expander_depArrow_transform___closed__1; -x_60 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -lean::inc(x_54); -x_61 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_61, 0, x_59); -lean::cnstr_set(x_61, 1, x_54); -lean::cnstr_set(x_61, 2, x_60); -lean::cnstr_set(x_61, 3, x_58); -x_62 = lean::apply_1(x_57, x_61); -x_63 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_62); -x_65 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_8, 2, x_65); -lean::cnstr_set(x_8, 1, x_49); -x_66 = l_Lean_Parser_Term_lambda_HasView; -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -x_68 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_69 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_54); -lean::cnstr_set(x_69, 2, x_60); -lean::cnstr_set(x_69, 3, x_44); -x_70 = lean::apply_1(x_67, x_69); -lean::cnstr_set(x_5, 3, x_70); -x_71 = lean::apply_1(x_55, x_5); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -x_73 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_73, 0, x_72); -return x_73; -} -else -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_74 = lean::cnstr_get(x_8, 0); -x_75 = lean::cnstr_get(x_8, 2); -lean::inc(x_75); -lean::inc(x_74); -lean::dec(x_8); -x_76 = lean::box(0); -x_77 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_9); -x_78 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_78, 0, x_77); -x_79 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_76); -lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -x_82 = lean::cnstr_get(x_3, 1); -lean::inc(x_82); -x_83 = l_Lean_Parser_Term_pi_HasView; -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -x_85 = l_Lean_Expander_getOptType___main(x_75); -lean::dec(x_75); -x_86 = l_Lean_Expander_depArrow_transform___closed__1; -x_87 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -lean::inc(x_81); -x_88 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_88, 0, x_86); -lean::cnstr_set(x_88, 1, x_81); -lean::cnstr_set(x_88, 2, x_87); -lean::cnstr_set(x_88, 3, x_85); -x_89 = lean::apply_1(x_84, x_88); -x_90 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_91 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_89); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -x_93 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_93, 0, x_74); -lean::cnstr_set(x_93, 1, x_76); -lean::cnstr_set(x_93, 2, x_92); -lean::cnstr_set(x_6, 0, x_93); -x_94 = l_Lean_Parser_Term_lambda_HasView; -x_95 = lean::cnstr_get(x_94, 1); -lean::inc(x_95); -x_96 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_97 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_81); -lean::cnstr_set(x_97, 2, x_87); -lean::cnstr_set(x_97, 3, x_44); -x_98 = lean::apply_1(x_95, x_97); -lean::cnstr_set(x_5, 3, x_98); -x_99 = lean::apply_1(x_82, x_5); -x_100 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_100, 0, x_99); -x_101 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_101, 0, x_100); -return x_101; -} -} -else -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; -x_102 = lean::cnstr_get(x_5, 0); -x_103 = lean::cnstr_get(x_5, 2); -x_104 = lean::cnstr_get(x_5, 3); -x_105 = lean::cnstr_get(x_5, 4); -x_106 = lean::cnstr_get(x_5, 5); -lean::inc(x_106); -lean::inc(x_105); -lean::inc(x_104); -lean::inc(x_103); -lean::inc(x_102); -lean::dec(x_5); -x_107 = lean::cnstr_get(x_8, 0); -lean::inc(x_107); -x_108 = lean::cnstr_get(x_8, 2); -lean::inc(x_108); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_109 = x_8; -} else { - lean::dec_ref(x_8); - x_109 = lean::box(0); -} -x_110 = lean::box(0); -x_111 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_9); -x_112 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_112, 0, x_111); -x_113 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_113, 0, x_112); -x_114 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_114, 0, x_110); -lean::cnstr_set(x_114, 1, x_113); -x_115 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_115, 0, x_114); -x_116 = lean::cnstr_get(x_3, 1); -lean::inc(x_116); -x_117 = l_Lean_Parser_Term_pi_HasView; -x_118 = lean::cnstr_get(x_117, 1); -lean::inc(x_118); -x_119 = l_Lean_Expander_getOptType___main(x_108); -lean::dec(x_108); -x_120 = l_Lean_Expander_depArrow_transform___closed__1; -x_121 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -lean::inc(x_115); -x_122 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_122, 0, x_120); -lean::cnstr_set(x_122, 1, x_115); -lean::cnstr_set(x_122, 2, x_121); -lean::cnstr_set(x_122, 3, x_119); -x_123 = lean::apply_1(x_118, x_122); -x_124 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_125 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_125, 0, x_124); -lean::cnstr_set(x_125, 1, x_123); -x_126 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_126, 0, x_125); -if (lean::is_scalar(x_109)) { - x_127 = lean::alloc_cnstr(0, 3, 0); -} else { - x_127 = x_109; -} -lean::cnstr_set(x_127, 0, x_107); -lean::cnstr_set(x_127, 1, x_110); -lean::cnstr_set(x_127, 2, x_126); -lean::cnstr_set(x_6, 0, x_127); -x_128 = l_Lean_Parser_Term_lambda_HasView; -x_129 = lean::cnstr_get(x_128, 1); -lean::inc(x_129); -x_130 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_131 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_115); -lean::cnstr_set(x_131, 2, x_121); -lean::cnstr_set(x_131, 3, x_104); -x_132 = lean::apply_1(x_129, x_131); -x_133 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_133, 0, x_102); -lean::cnstr_set(x_133, 1, x_6); -lean::cnstr_set(x_133, 2, x_103); -lean::cnstr_set(x_133, 3, x_132); -lean::cnstr_set(x_133, 4, x_105); -lean::cnstr_set(x_133, 5, x_106); -x_134 = lean::apply_1(x_116, x_133); -x_135 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_135, 0, x_134); -x_136 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_136, 0, x_135); -return x_136; -} -} -} -else -{ -obj* x_137; obj* x_138; -x_137 = lean::cnstr_get(x_6, 0); -lean::inc(x_137); -lean::dec(x_6); -x_138 = lean::cnstr_get(x_137, 1); -lean::inc(x_138); -if (lean::obj_tag(x_138) == 0) -{ -obj* x_139; -x_139 = lean::cnstr_get(x_137, 2); -lean::inc(x_139); -if (lean::obj_tag(x_139) == 0) -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; -x_140 = lean::cnstr_get(x_5, 0); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_5, 2); -lean::inc(x_141); -x_142 = lean::cnstr_get(x_5, 3); -lean::inc(x_142); -x_143 = lean::cnstr_get(x_5, 4); -lean::inc(x_143); -x_144 = lean::cnstr_get(x_5, 5); -lean::inc(x_144); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - lean::cnstr_release(x_5, 3); - lean::cnstr_release(x_5, 4); - lean::cnstr_release(x_5, 5); - x_145 = x_5; -} else { - lean::dec_ref(x_5); - x_145 = lean::box(0); -} -x_146 = lean::cnstr_get(x_137, 0); -lean::inc(x_146); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - lean::cnstr_release(x_137, 2); - x_147 = x_137; -} else { - lean::dec_ref(x_137); - x_147 = lean::box(0); -} -x_148 = lean::cnstr_get(x_3, 1); -lean::inc(x_148); -x_149 = l_Lean_Expander_let_transform___closed__1; -if (lean::is_scalar(x_147)) { - x_150 = lean::alloc_cnstr(0, 3, 0); -} else { - x_150 = x_147; -} -lean::cnstr_set(x_150, 0, x_146); -lean::cnstr_set(x_150, 1, x_138); -lean::cnstr_set(x_150, 2, x_149); -x_151 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_151, 0, x_150); -if (lean::is_scalar(x_145)) { - x_152 = lean::alloc_cnstr(0, 6, 0); -} else { - x_152 = x_145; -} -lean::cnstr_set(x_152, 0, x_140); -lean::cnstr_set(x_152, 1, x_151); -lean::cnstr_set(x_152, 2, x_141); -lean::cnstr_set(x_152, 3, x_142); -lean::cnstr_set(x_152, 4, x_143); -lean::cnstr_set(x_152, 5, x_144); -x_153 = lean::apply_1(x_148, x_152); -x_154 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_154, 0, x_153); -x_155 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_155, 0, x_154); -return x_155; -} -else -{ -obj* x_156; -lean::dec(x_139); -lean::dec(x_137); -lean::dec(x_5); -x_156 = l_Lean_Expander_noExpansion(x_2); -return x_156; -} -} -else -{ -obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; -x_157 = lean::cnstr_get(x_5, 0); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_5, 2); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_5, 3); -lean::inc(x_159); -x_160 = lean::cnstr_get(x_5, 4); -lean::inc(x_160); -x_161 = lean::cnstr_get(x_5, 5); -lean::inc(x_161); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - lean::cnstr_release(x_5, 3); - lean::cnstr_release(x_5, 4); - lean::cnstr_release(x_5, 5); - x_162 = x_5; -} else { - lean::dec_ref(x_5); - x_162 = lean::box(0); -} -x_163 = lean::cnstr_get(x_137, 0); -lean::inc(x_163); -x_164 = lean::cnstr_get(x_137, 2); -lean::inc(x_164); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - lean::cnstr_release(x_137, 2); - x_165 = x_137; -} else { - lean::dec_ref(x_137); - x_165 = lean::box(0); -} -x_166 = lean::box(0); -x_167 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_138); -x_168 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_168, 0, x_167); -x_169 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_169, 0, x_168); -x_170 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_170, 0, x_166); -lean::cnstr_set(x_170, 1, x_169); -x_171 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_171, 0, x_170); -x_172 = lean::cnstr_get(x_3, 1); -lean::inc(x_172); -x_173 = l_Lean_Parser_Term_pi_HasView; -x_174 = lean::cnstr_get(x_173, 1); -lean::inc(x_174); -x_175 = l_Lean_Expander_getOptType___main(x_164); -lean::dec(x_164); -x_176 = l_Lean_Expander_depArrow_transform___closed__1; -x_177 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -lean::inc(x_171); -x_178 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_178, 0, x_176); -lean::cnstr_set(x_178, 1, x_171); -lean::cnstr_set(x_178, 2, x_177); -lean::cnstr_set(x_178, 3, x_175); -x_179 = lean::apply_1(x_174, x_178); -x_180 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_181 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_181, 0, x_180); -lean::cnstr_set(x_181, 1, x_179); -x_182 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_182, 0, x_181); -if (lean::is_scalar(x_165)) { - x_183 = lean::alloc_cnstr(0, 3, 0); -} else { - x_183 = x_165; -} -lean::cnstr_set(x_183, 0, x_163); -lean::cnstr_set(x_183, 1, x_166); -lean::cnstr_set(x_183, 2, x_182); -x_184 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_184, 0, x_183); -x_185 = l_Lean_Parser_Term_lambda_HasView; -x_186 = lean::cnstr_get(x_185, 1); -lean::inc(x_186); -x_187 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_188 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set(x_188, 1, x_171); -lean::cnstr_set(x_188, 2, x_177); -lean::cnstr_set(x_188, 3, x_159); -x_189 = lean::apply_1(x_186, x_188); -if (lean::is_scalar(x_162)) { - x_190 = lean::alloc_cnstr(0, 6, 0); -} else { - x_190 = x_162; -} -lean::cnstr_set(x_190, 0, x_157); -lean::cnstr_set(x_190, 1, x_184); -lean::cnstr_set(x_190, 2, x_158); -lean::cnstr_set(x_190, 3, x_189); -lean::cnstr_set(x_190, 4, x_160); -lean::cnstr_set(x_190, 5, x_161); -x_191 = lean::apply_1(x_172, x_190); -x_192 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_192, 0, x_191); -x_193 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_193, 0, x_192); -return x_193; -} -} -} -else -{ -obj* x_194; obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; obj* x_214; -x_194 = lean::cnstr_get(x_5, 3); -lean::inc(x_194); -x_195 = lean::cnstr_get(x_5, 5); -lean::inc(x_195); -lean::dec(x_5); -x_196 = lean::cnstr_get(x_6, 0); -lean::inc(x_196); -lean::dec(x_6); -x_197 = l_Lean_Parser_Term_match_HasView; -x_198 = lean::cnstr_get(x_197, 1); -lean::inc(x_198); -x_199 = lean::box(0); -x_200 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_200, 0, x_194); -lean::cnstr_set(x_200, 1, x_199); -x_201 = lean::box(0); -x_202 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_202, 0, x_200); -lean::cnstr_set(x_202, 1, x_201); -x_203 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_203, 0, x_196); -lean::cnstr_set(x_203, 1, x_199); -x_204 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_204, 0, x_203); -lean::cnstr_set(x_204, 1, x_201); -x_205 = l_Lean_Expander_mixfix_transform___closed__4; -x_206 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_206, 0, x_204); -lean::cnstr_set(x_206, 1, x_205); -lean::cnstr_set(x_206, 2, x_195); -x_207 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_207, 0, x_206); -lean::cnstr_set(x_207, 1, x_199); -x_208 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_208, 0, x_207); -lean::cnstr_set(x_208, 1, x_201); -x_209 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1; -x_210 = l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3; -x_211 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_211, 0, x_209); -lean::cnstr_set(x_211, 1, x_202); -lean::cnstr_set(x_211, 2, x_199); -lean::cnstr_set(x_211, 3, x_210); -lean::cnstr_set(x_211, 4, x_199); -lean::cnstr_set(x_211, 5, x_208); -x_212 = lean::apply_1(x_198, x_211); -x_213 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_213, 0, x_212); -x_214 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_214, 0, x_213); -return x_214; -} -} -} -obj* l_Lean_Expander_let_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_let_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_axiom_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Expander_axiom_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = l_Lean_Parser_command_axiom_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 2); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; uint8 x_10; -x_9 = lean::cnstr_get(x_5, 2); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_11 = lean::cnstr_get(x_6, 1); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -x_13 = lean::cnstr_get(x_7, 0); -lean::inc(x_13); -lean::dec(x_7); -x_14 = lean::box(0); -x_15 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_13); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_14); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = lean::cnstr_get(x_3, 1); -lean::inc(x_20); -x_21 = l_Lean_Parser_Term_pi_HasView; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_11, 1); -lean::inc(x_23); -lean::dec(x_11); -x_24 = l_Lean_Expander_depArrow_transform___closed__1; -x_25 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_26 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_19); -lean::cnstr_set(x_26, 2, x_25); -lean::cnstr_set(x_26, 3, x_23); -x_27 = lean::apply_1(x_22, x_26); -x_28 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -x_30 = l_Lean_Expander_axiom_transform___closed__1; -lean::cnstr_set(x_6, 1, x_29); -lean::cnstr_set(x_6, 0, x_30); -x_31 = lean::apply_1(x_20, x_5); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -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_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; -x_34 = lean::cnstr_get(x_6, 1); -lean::inc(x_34); -lean::dec(x_6); -x_35 = lean::cnstr_get(x_7, 0); -lean::inc(x_35); -lean::dec(x_7); -x_36 = lean::box(0); -x_37 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_35); -x_38 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_36); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -x_42 = lean::cnstr_get(x_3, 1); -lean::inc(x_42); -x_43 = l_Lean_Parser_Term_pi_HasView; -x_44 = lean::cnstr_get(x_43, 1); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_34, 1); -lean::inc(x_45); -lean::dec(x_34); -x_46 = l_Lean_Expander_depArrow_transform___closed__1; -x_47 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_48 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_41); -lean::cnstr_set(x_48, 2, x_47); -lean::cnstr_set(x_48, 3, x_45); -x_49 = lean::apply_1(x_44, x_48); -x_50 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_49); -x_52 = l_Lean_Expander_axiom_transform___closed__1; -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_51); -lean::cnstr_set(x_5, 2, x_53); -x_54 = lean::apply_1(x_42, x_5); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -return x_56; -} -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_57 = lean::cnstr_get(x_5, 0); -x_58 = lean::cnstr_get(x_5, 1); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_5); -x_59 = lean::cnstr_get(x_6, 1); -lean::inc(x_59); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - x_60 = x_6; -} else { - lean::dec_ref(x_6); - x_60 = lean::box(0); -} -x_61 = lean::cnstr_get(x_7, 0); -lean::inc(x_61); -lean::dec(x_7); -x_62 = lean::box(0); -x_63 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_61); -x_64 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_64, 0, x_63); -x_65 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_65, 0, x_64); -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_62); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -x_68 = lean::cnstr_get(x_3, 1); -lean::inc(x_68); -x_69 = l_Lean_Parser_Term_pi_HasView; -x_70 = lean::cnstr_get(x_69, 1); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_59, 1); -lean::inc(x_71); -lean::dec(x_59); -x_72 = l_Lean_Expander_depArrow_transform___closed__1; -x_73 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_74 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set(x_74, 1, x_67); -lean::cnstr_set(x_74, 2, x_73); -lean::cnstr_set(x_74, 3, x_71); -x_75 = lean::apply_1(x_70, x_74); -x_76 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_77 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_75); -x_78 = l_Lean_Expander_axiom_transform___closed__1; -if (lean::is_scalar(x_60)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_60; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_77); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_57); -lean::cnstr_set(x_80, 1, x_58); -lean::cnstr_set(x_80, 2, x_79); -x_81 = lean::apply_1(x_68, x_80); -x_82 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -return x_83; -} -} -else -{ -obj* x_84; -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -x_84 = l_Lean_Expander_noExpansion(x_2); -return x_84; -} -} -} -obj* l_Lean_Expander_axiom_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_axiom_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_declaration_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::box(0); -x_2 = lean::mk_string("class"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_3); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_3); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_4); -x_12 = lean::mk_string("@["); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_4); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::mk_string("]"); -x_17 = l_String_trim(x_16); -lean::dec(x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_11); -lean::cnstr_set(x_20, 1, x_8); -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_15); -lean::cnstr_set(x_21, 1, x_20); -lean::cnstr_set(x_21, 2, x_19); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -} -obj* _init_l_Lean_Expander_declaration_transform___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("class"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_3); -lean::dec(x_5); -x_7 = l_Lean_Parser_Substring_ofString(x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_3); -lean::cnstr_set(x_9, 3, x_8); -lean::cnstr_set(x_9, 4, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_4); -return x_11; -} -} -obj* _init_l_Lean_Expander_declaration_transform___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::mk_string("structure"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -} -obj* l_Lean_Expander_declaration_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = l_Lean_Parser_command_declaration_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -switch (lean::obj_tag(x_6)) { -case 4: -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; -lean::free_heap_obj(x_6); -lean::dec(x_8); -lean::dec(x_5); -x_10 = l_Lean_Expander_noExpansion(x_2); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; uint8 x_14; -x_12 = lean::cnstr_get(x_9, 0); -lean::dec(x_12); -x_13 = lean::cnstr_get(x_5, 0); -lean::inc(x_13); -lean::dec(x_5); -x_14 = !lean::is_exclusive(x_8); -if (x_14 == 0) -{ -obj* x_15; uint8 x_16; -x_15 = lean::cnstr_get(x_8, 0); -lean::dec(x_15); -x_16 = !lean::is_exclusive(x_13); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_13, 1); -x_18 = lean::cnstr_get(x_3, 1); -lean::inc(x_18); -x_19 = lean::box(0); -lean::cnstr_set(x_8, 0, x_19); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = l_Lean_Expander_declaration_transform___closed__1; -lean::cnstr_set(x_13, 1, x_20); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_13); -lean::cnstr_set(x_21, 1, x_6); -x_22 = lean::apply_1(x_18, x_21); -lean::cnstr_set(x_9, 0, x_22); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_9); -return x_23; -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_17); -if (x_24 == 0) -{ -obj* x_25; uint8 x_26; -x_25 = lean::cnstr_get(x_17, 0); -x_26 = !lean::is_exclusive(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::cnstr_get(x_25, 1); -x_28 = l_Lean_Expander_declaration_transform___closed__2; -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -lean::cnstr_set(x_25, 1, x_29); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_13); -lean::cnstr_set(x_30, 1, x_6); -x_31 = lean::apply_1(x_18, x_30); -lean::cnstr_set(x_9, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_9); -return x_32; -} -else -{ -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; -x_33 = lean::cnstr_get(x_25, 0); -x_34 = lean::cnstr_get(x_25, 1); -x_35 = lean::cnstr_get(x_25, 2); -lean::inc(x_35); -lean::inc(x_34); -lean::inc(x_33); -lean::dec(x_25); -x_36 = l_Lean_Expander_declaration_transform___closed__2; -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_34); -x_38 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_38, 0, x_33); -lean::cnstr_set(x_38, 1, x_37); -lean::cnstr_set(x_38, 2, x_35); -lean::cnstr_set(x_17, 0, x_38); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_13); -lean::cnstr_set(x_39, 1, x_6); -x_40 = lean::apply_1(x_18, x_39); -lean::cnstr_set(x_9, 0, x_40); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_9); -return x_41; -} -} -else -{ -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; -x_42 = lean::cnstr_get(x_17, 0); -lean::inc(x_42); -lean::dec(x_17); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_42, 1); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_42, 2); -lean::inc(x_45); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - lean::cnstr_release(x_42, 1); - lean::cnstr_release(x_42, 2); - x_46 = x_42; -} else { - lean::dec_ref(x_42); - x_46 = lean::box(0); -} -x_47 = l_Lean_Expander_declaration_transform___closed__2; -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_44); -if (lean::is_scalar(x_46)) { - x_49 = lean::alloc_cnstr(0, 3, 0); -} else { - x_49 = x_46; -} -lean::cnstr_set(x_49, 0, x_43); -lean::cnstr_set(x_49, 1, x_48); -lean::cnstr_set(x_49, 2, x_45); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_13, 1, x_50); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_13); -lean::cnstr_set(x_51, 1, x_6); -x_52 = lean::apply_1(x_18, x_51); -lean::cnstr_set(x_9, 0, x_52); -x_53 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_53, 0, x_9); -return x_53; -} -} -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_54 = lean::cnstr_get(x_13, 0); -x_55 = lean::cnstr_get(x_13, 1); -x_56 = lean::cnstr_get(x_13, 2); -x_57 = lean::cnstr_get(x_13, 3); -x_58 = lean::cnstr_get(x_13, 4); -lean::inc(x_58); -lean::inc(x_57); -lean::inc(x_56); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_13); -x_59 = lean::cnstr_get(x_3, 1); -lean::inc(x_59); -x_60 = lean::box(0); -lean::cnstr_set(x_8, 0, x_60); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_61 = l_Lean_Expander_declaration_transform___closed__1; -x_62 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_62, 0, x_54); -lean::cnstr_set(x_62, 1, x_61); -lean::cnstr_set(x_62, 2, x_56); -lean::cnstr_set(x_62, 3, x_57); -lean::cnstr_set(x_62, 4, x_58); -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_6); -x_64 = lean::apply_1(x_59, x_63); -lean::cnstr_set(x_9, 0, x_64); -x_65 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_65, 0, x_9); -return x_65; -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_66 = lean::cnstr_get(x_55, 0); -lean::inc(x_66); -if (lean::is_exclusive(x_55)) { - lean::cnstr_release(x_55, 0); - x_67 = x_55; -} else { - lean::dec_ref(x_55); - x_67 = lean::box(0); -} -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_66, 1); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_66, 2); -lean::inc(x_70); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - lean::cnstr_release(x_66, 2); - x_71 = x_66; -} else { - lean::dec_ref(x_66); - x_71 = lean::box(0); -} -x_72 = l_Lean_Expander_declaration_transform___closed__2; -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_69); -if (lean::is_scalar(x_71)) { - x_74 = lean::alloc_cnstr(0, 3, 0); -} else { - x_74 = x_71; -} -lean::cnstr_set(x_74, 0, x_68); -lean::cnstr_set(x_74, 1, x_73); -lean::cnstr_set(x_74, 2, x_70); -if (lean::is_scalar(x_67)) { - x_75 = lean::alloc_cnstr(1, 1, 0); -} else { - x_75 = x_67; -} -lean::cnstr_set(x_75, 0, x_74); -x_76 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_76, 0, x_54); -lean::cnstr_set(x_76, 1, x_75); -lean::cnstr_set(x_76, 2, x_56); -lean::cnstr_set(x_76, 3, x_57); -lean::cnstr_set(x_76, 4, x_58); -x_77 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_6); -x_78 = lean::apply_1(x_59, x_77); -lean::cnstr_set(x_9, 0, x_78); -x_79 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_79, 0, x_9); -return x_79; -} -} -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_80 = lean::cnstr_get(x_8, 1); -x_81 = lean::cnstr_get(x_8, 2); -x_82 = lean::cnstr_get(x_8, 3); -x_83 = lean::cnstr_get(x_8, 4); -x_84 = lean::cnstr_get(x_8, 5); -x_85 = lean::cnstr_get(x_8, 6); -lean::inc(x_85); -lean::inc(x_84); -lean::inc(x_83); -lean::inc(x_82); -lean::inc(x_81); -lean::inc(x_80); -lean::dec(x_8); -x_86 = lean::cnstr_get(x_13, 0); -lean::inc(x_86); -x_87 = lean::cnstr_get(x_13, 1); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_13, 2); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_13, 3); -lean::inc(x_89); -x_90 = lean::cnstr_get(x_13, 4); -lean::inc(x_90); -if (lean::is_exclusive(x_13)) { - lean::cnstr_release(x_13, 0); - lean::cnstr_release(x_13, 1); - lean::cnstr_release(x_13, 2); - lean::cnstr_release(x_13, 3); - lean::cnstr_release(x_13, 4); - x_91 = x_13; -} else { - lean::dec_ref(x_13); - x_91 = lean::box(0); -} -x_92 = lean::cnstr_get(x_3, 1); -lean::inc(x_92); -x_93 = lean::box(0); -x_94 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_80); -lean::cnstr_set(x_94, 2, x_81); -lean::cnstr_set(x_94, 3, x_82); -lean::cnstr_set(x_94, 4, x_83); -lean::cnstr_set(x_94, 5, x_84); -lean::cnstr_set(x_94, 6, x_85); -lean::cnstr_set(x_6, 0, x_94); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -x_95 = l_Lean_Expander_declaration_transform___closed__1; -if (lean::is_scalar(x_91)) { - x_96 = lean::alloc_cnstr(0, 5, 0); -} else { - x_96 = x_91; -} -lean::cnstr_set(x_96, 0, x_86); -lean::cnstr_set(x_96, 1, x_95); -lean::cnstr_set(x_96, 2, x_88); -lean::cnstr_set(x_96, 3, x_89); -lean::cnstr_set(x_96, 4, x_90); -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_6); -x_98 = lean::apply_1(x_92, x_97); -lean::cnstr_set(x_9, 0, x_98); -x_99 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_99, 0, x_9); -return x_99; -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_100 = lean::cnstr_get(x_87, 0); -lean::inc(x_100); -if (lean::is_exclusive(x_87)) { - lean::cnstr_release(x_87, 0); - x_101 = x_87; -} else { - lean::dec_ref(x_87); - x_101 = lean::box(0); -} -x_102 = lean::cnstr_get(x_100, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_100, 1); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_100, 2); -lean::inc(x_104); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - lean::cnstr_release(x_100, 1); - lean::cnstr_release(x_100, 2); - x_105 = x_100; -} else { - lean::dec_ref(x_100); - x_105 = lean::box(0); -} -x_106 = l_Lean_Expander_declaration_transform___closed__2; -x_107 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_107, 1, x_103); -if (lean::is_scalar(x_105)) { - x_108 = lean::alloc_cnstr(0, 3, 0); -} else { - x_108 = x_105; -} -lean::cnstr_set(x_108, 0, x_102); -lean::cnstr_set(x_108, 1, x_107); -lean::cnstr_set(x_108, 2, x_104); -if (lean::is_scalar(x_101)) { - x_109 = lean::alloc_cnstr(1, 1, 0); -} else { - x_109 = x_101; -} -lean::cnstr_set(x_109, 0, x_108); -if (lean::is_scalar(x_91)) { - x_110 = lean::alloc_cnstr(0, 5, 0); -} else { - x_110 = x_91; -} -lean::cnstr_set(x_110, 0, x_86); -lean::cnstr_set(x_110, 1, x_109); -lean::cnstr_set(x_110, 2, x_88); -lean::cnstr_set(x_110, 3, x_89); -lean::cnstr_set(x_110, 4, x_90); -x_111 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_6); -x_112 = lean::apply_1(x_92, x_111); -lean::cnstr_set(x_9, 0, x_112); -x_113 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_113, 0, x_9); -return x_113; -} -} -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -lean::dec(x_9); -x_114 = lean::cnstr_get(x_5, 0); -lean::inc(x_114); -lean::dec(x_5); -x_115 = lean::cnstr_get(x_8, 1); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_8, 2); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_8, 3); -lean::inc(x_117); -x_118 = lean::cnstr_get(x_8, 4); -lean::inc(x_118); -x_119 = lean::cnstr_get(x_8, 5); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_8, 6); -lean::inc(x_120); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - lean::cnstr_release(x_8, 3); - lean::cnstr_release(x_8, 4); - lean::cnstr_release(x_8, 5); - lean::cnstr_release(x_8, 6); - x_121 = x_8; -} else { - lean::dec_ref(x_8); - x_121 = lean::box(0); -} -x_122 = lean::cnstr_get(x_114, 0); -lean::inc(x_122); -x_123 = lean::cnstr_get(x_114, 1); -lean::inc(x_123); -x_124 = lean::cnstr_get(x_114, 2); -lean::inc(x_124); -x_125 = lean::cnstr_get(x_114, 3); -lean::inc(x_125); -x_126 = lean::cnstr_get(x_114, 4); -lean::inc(x_126); -if (lean::is_exclusive(x_114)) { - lean::cnstr_release(x_114, 0); - lean::cnstr_release(x_114, 1); - lean::cnstr_release(x_114, 2); - lean::cnstr_release(x_114, 3); - lean::cnstr_release(x_114, 4); - x_127 = x_114; -} else { - lean::dec_ref(x_114); - x_127 = lean::box(0); -} -x_128 = lean::cnstr_get(x_3, 1); -lean::inc(x_128); -x_129 = lean::box(0); -if (lean::is_scalar(x_121)) { - x_130 = lean::alloc_cnstr(0, 7, 0); -} else { - x_130 = x_121; -} -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_115); -lean::cnstr_set(x_130, 2, x_116); -lean::cnstr_set(x_130, 3, x_117); -lean::cnstr_set(x_130, 4, x_118); -lean::cnstr_set(x_130, 5, x_119); -lean::cnstr_set(x_130, 6, x_120); -lean::cnstr_set(x_6, 0, x_130); -if (lean::obj_tag(x_123) == 0) -{ -obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; -x_131 = l_Lean_Expander_declaration_transform___closed__1; -if (lean::is_scalar(x_127)) { - x_132 = lean::alloc_cnstr(0, 5, 0); -} else { - x_132 = x_127; -} -lean::cnstr_set(x_132, 0, x_122); -lean::cnstr_set(x_132, 1, x_131); -lean::cnstr_set(x_132, 2, x_124); -lean::cnstr_set(x_132, 3, x_125); -lean::cnstr_set(x_132, 4, x_126); -x_133 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_133, 0, x_132); -lean::cnstr_set(x_133, 1, x_6); -x_134 = lean::apply_1(x_128, x_133); -x_135 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_135, 0, x_134); -x_136 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_136, 0, x_135); -return x_136; -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_137 = lean::cnstr_get(x_123, 0); -lean::inc(x_137); -if (lean::is_exclusive(x_123)) { - lean::cnstr_release(x_123, 0); - x_138 = x_123; -} else { - lean::dec_ref(x_123); - x_138 = lean::box(0); -} -x_139 = lean::cnstr_get(x_137, 0); -lean::inc(x_139); -x_140 = lean::cnstr_get(x_137, 1); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_137, 2); -lean::inc(x_141); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - lean::cnstr_release(x_137, 2); - x_142 = x_137; -} else { - lean::dec_ref(x_137); - x_142 = lean::box(0); -} -x_143 = l_Lean_Expander_declaration_transform___closed__2; -x_144 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_144, 0, x_143); -lean::cnstr_set(x_144, 1, x_140); -if (lean::is_scalar(x_142)) { - x_145 = lean::alloc_cnstr(0, 3, 0); -} else { - x_145 = x_142; -} -lean::cnstr_set(x_145, 0, x_139); -lean::cnstr_set(x_145, 1, x_144); -lean::cnstr_set(x_145, 2, x_141); -if (lean::is_scalar(x_138)) { - x_146 = lean::alloc_cnstr(1, 1, 0); -} else { - x_146 = x_138; -} -lean::cnstr_set(x_146, 0, x_145); -if (lean::is_scalar(x_127)) { - x_147 = lean::alloc_cnstr(0, 5, 0); -} else { - x_147 = x_127; -} -lean::cnstr_set(x_147, 0, x_122); -lean::cnstr_set(x_147, 1, x_146); -lean::cnstr_set(x_147, 2, x_124); -lean::cnstr_set(x_147, 3, x_125); -lean::cnstr_set(x_147, 4, x_126); -x_148 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_148, 0, x_147); -lean::cnstr_set(x_148, 1, x_6); -x_149 = lean::apply_1(x_128, x_148); -x_150 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_150, 0, x_149); -x_151 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_151, 0, x_150); -return x_151; -} -} -} -} -else -{ -obj* x_152; obj* x_153; -x_152 = lean::cnstr_get(x_6, 0); -lean::inc(x_152); -lean::dec(x_6); -x_153 = lean::cnstr_get(x_152, 0); -lean::inc(x_153); -if (lean::obj_tag(x_153) == 0) -{ -obj* x_154; -lean::dec(x_152); -lean::dec(x_5); -x_154 = l_Lean_Expander_noExpansion(x_2); -return x_154; -} -else -{ -obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; -if (lean::is_exclusive(x_153)) { - lean::cnstr_release(x_153, 0); - x_155 = x_153; -} else { - lean::dec_ref(x_153); - x_155 = lean::box(0); -} -x_156 = lean::cnstr_get(x_5, 0); -lean::inc(x_156); -lean::dec(x_5); -x_157 = lean::cnstr_get(x_152, 1); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_152, 2); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_152, 3); -lean::inc(x_159); -x_160 = lean::cnstr_get(x_152, 4); -lean::inc(x_160); -x_161 = lean::cnstr_get(x_152, 5); -lean::inc(x_161); -x_162 = lean::cnstr_get(x_152, 6); -lean::inc(x_162); -if (lean::is_exclusive(x_152)) { - lean::cnstr_release(x_152, 0); - lean::cnstr_release(x_152, 1); - lean::cnstr_release(x_152, 2); - lean::cnstr_release(x_152, 3); - lean::cnstr_release(x_152, 4); - lean::cnstr_release(x_152, 5); - lean::cnstr_release(x_152, 6); - x_163 = x_152; -} else { - lean::dec_ref(x_152); - x_163 = lean::box(0); -} -x_164 = lean::cnstr_get(x_156, 0); -lean::inc(x_164); -x_165 = lean::cnstr_get(x_156, 1); -lean::inc(x_165); -x_166 = lean::cnstr_get(x_156, 2); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_156, 3); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_156, 4); -lean::inc(x_168); -if (lean::is_exclusive(x_156)) { - lean::cnstr_release(x_156, 0); - lean::cnstr_release(x_156, 1); - lean::cnstr_release(x_156, 2); - lean::cnstr_release(x_156, 3); - lean::cnstr_release(x_156, 4); - x_169 = x_156; -} else { - lean::dec_ref(x_156); - x_169 = lean::box(0); -} -x_170 = lean::cnstr_get(x_3, 1); -lean::inc(x_170); -x_171 = lean::box(0); -if (lean::is_scalar(x_163)) { - x_172 = lean::alloc_cnstr(0, 7, 0); -} else { - x_172 = x_163; -} -lean::cnstr_set(x_172, 0, x_171); -lean::cnstr_set(x_172, 1, x_157); -lean::cnstr_set(x_172, 2, x_158); -lean::cnstr_set(x_172, 3, x_159); -lean::cnstr_set(x_172, 4, x_160); -lean::cnstr_set(x_172, 5, x_161); -lean::cnstr_set(x_172, 6, x_162); -x_173 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_173, 0, x_172); -if (lean::obj_tag(x_165) == 0) -{ -obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; -x_174 = l_Lean_Expander_declaration_transform___closed__1; -if (lean::is_scalar(x_169)) { - x_175 = lean::alloc_cnstr(0, 5, 0); -} else { - x_175 = x_169; -} -lean::cnstr_set(x_175, 0, x_164); -lean::cnstr_set(x_175, 1, x_174); -lean::cnstr_set(x_175, 2, x_166); -lean::cnstr_set(x_175, 3, x_167); -lean::cnstr_set(x_175, 4, x_168); -x_176 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_176, 0, x_175); -lean::cnstr_set(x_176, 1, x_173); -x_177 = lean::apply_1(x_170, x_176); -if (lean::is_scalar(x_155)) { - x_178 = lean::alloc_cnstr(1, 1, 0); -} else { - x_178 = x_155; -} -lean::cnstr_set(x_178, 0, x_177); -x_179 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_179, 0, x_178); -return x_179; -} -else -{ -obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; -x_180 = lean::cnstr_get(x_165, 0); -lean::inc(x_180); -if (lean::is_exclusive(x_165)) { - lean::cnstr_release(x_165, 0); - x_181 = x_165; -} else { - lean::dec_ref(x_165); - x_181 = lean::box(0); -} -x_182 = lean::cnstr_get(x_180, 0); -lean::inc(x_182); -x_183 = lean::cnstr_get(x_180, 1); -lean::inc(x_183); -x_184 = lean::cnstr_get(x_180, 2); -lean::inc(x_184); -if (lean::is_exclusive(x_180)) { - lean::cnstr_release(x_180, 0); - lean::cnstr_release(x_180, 1); - lean::cnstr_release(x_180, 2); - x_185 = x_180; -} else { - lean::dec_ref(x_180); - x_185 = lean::box(0); -} -x_186 = l_Lean_Expander_declaration_transform___closed__2; -x_187 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_187, 0, x_186); -lean::cnstr_set(x_187, 1, x_183); -if (lean::is_scalar(x_185)) { - x_188 = lean::alloc_cnstr(0, 3, 0); -} else { - x_188 = x_185; -} -lean::cnstr_set(x_188, 0, x_182); -lean::cnstr_set(x_188, 1, x_187); -lean::cnstr_set(x_188, 2, x_184); -if (lean::is_scalar(x_181)) { - x_189 = lean::alloc_cnstr(1, 1, 0); -} else { - x_189 = x_181; -} -lean::cnstr_set(x_189, 0, x_188); -if (lean::is_scalar(x_169)) { - x_190 = lean::alloc_cnstr(0, 5, 0); -} else { - x_190 = x_169; -} -lean::cnstr_set(x_190, 0, x_164); -lean::cnstr_set(x_190, 1, x_189); -lean::cnstr_set(x_190, 2, x_166); -lean::cnstr_set(x_190, 3, x_167); -lean::cnstr_set(x_190, 4, x_168); -x_191 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_191, 0, x_190); -lean::cnstr_set(x_191, 1, x_173); -x_192 = lean::apply_1(x_170, x_191); -if (lean::is_scalar(x_155)) { - x_193 = lean::alloc_cnstr(1, 1, 0); -} else { - x_193 = x_155; -} -lean::cnstr_set(x_193, 0, x_192); -x_194 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_194, 0, x_193); -return x_194; -} -} -} -} -case 5: -{ -uint8 x_195; -x_195 = !lean::is_exclusive(x_6); -if (x_195 == 0) -{ -obj* x_196; obj* x_197; -x_196 = lean::cnstr_get(x_6, 0); -x_197 = lean::cnstr_get(x_196, 0); -lean::inc(x_197); -if (lean::obj_tag(x_197) == 0) -{ -obj* x_198; -lean::dec(x_197); -lean::free_heap_obj(x_6); -lean::dec(x_196); -lean::dec(x_5); -x_198 = l_Lean_Expander_noExpansion(x_2); -return x_198; -} -else -{ -obj* x_199; uint8 x_200; -lean::dec(x_197); -x_199 = lean::cnstr_get(x_5, 0); -lean::inc(x_199); -lean::dec(x_5); -x_200 = !lean::is_exclusive(x_196); -if (x_200 == 0) -{ -obj* x_201; uint8 x_202; -x_201 = lean::cnstr_get(x_196, 0); -lean::dec(x_201); -x_202 = !lean::is_exclusive(x_199); -if (x_202 == 0) -{ -obj* x_203; obj* x_204; obj* x_205; -x_203 = lean::cnstr_get(x_199, 1); -x_204 = lean::cnstr_get(x_3, 1); -lean::inc(x_204); -x_205 = l_Lean_Expander_declaration_transform___closed__3; -lean::cnstr_set(x_196, 0, x_205); -if (lean::obj_tag(x_203) == 0) -{ -obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; -x_206 = l_Lean_Expander_declaration_transform___closed__1; -lean::cnstr_set(x_199, 1, x_206); -x_207 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_207, 0, x_199); -lean::cnstr_set(x_207, 1, x_6); -x_208 = lean::apply_1(x_204, x_207); -x_209 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_209, 0, x_208); -x_210 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_210, 0, x_209); -return x_210; -} -else -{ -uint8 x_211; -x_211 = !lean::is_exclusive(x_203); -if (x_211 == 0) -{ -obj* x_212; uint8 x_213; -x_212 = lean::cnstr_get(x_203, 0); -x_213 = !lean::is_exclusive(x_212); -if (x_213 == 0) -{ -obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; -x_214 = lean::cnstr_get(x_212, 1); -x_215 = l_Lean_Expander_declaration_transform___closed__2; -x_216 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_216, 0, x_215); -lean::cnstr_set(x_216, 1, x_214); -lean::cnstr_set(x_212, 1, x_216); -x_217 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_217, 0, x_199); -lean::cnstr_set(x_217, 1, x_6); -x_218 = lean::apply_1(x_204, x_217); -x_219 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_219, 0, x_218); -x_220 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_220, 0, x_219); -return x_220; -} -else -{ -obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; -x_221 = lean::cnstr_get(x_212, 0); -x_222 = lean::cnstr_get(x_212, 1); -x_223 = lean::cnstr_get(x_212, 2); -lean::inc(x_223); -lean::inc(x_222); -lean::inc(x_221); -lean::dec(x_212); -x_224 = l_Lean_Expander_declaration_transform___closed__2; -x_225 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_225, 0, x_224); -lean::cnstr_set(x_225, 1, x_222); -x_226 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_226, 0, x_221); -lean::cnstr_set(x_226, 1, x_225); -lean::cnstr_set(x_226, 2, x_223); -lean::cnstr_set(x_203, 0, x_226); -x_227 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_227, 0, x_199); -lean::cnstr_set(x_227, 1, x_6); -x_228 = lean::apply_1(x_204, x_227); -x_229 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_229, 0, x_228); -x_230 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_230, 0, x_229); -return x_230; -} -} -else -{ -obj* x_231; obj* x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; -x_231 = lean::cnstr_get(x_203, 0); -lean::inc(x_231); -lean::dec(x_203); -x_232 = lean::cnstr_get(x_231, 0); -lean::inc(x_232); -x_233 = lean::cnstr_get(x_231, 1); -lean::inc(x_233); -x_234 = lean::cnstr_get(x_231, 2); -lean::inc(x_234); -if (lean::is_exclusive(x_231)) { - lean::cnstr_release(x_231, 0); - lean::cnstr_release(x_231, 1); - lean::cnstr_release(x_231, 2); - x_235 = x_231; -} else { - lean::dec_ref(x_231); - x_235 = lean::box(0); -} -x_236 = l_Lean_Expander_declaration_transform___closed__2; -x_237 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_237, 0, x_236); -lean::cnstr_set(x_237, 1, x_233); -if (lean::is_scalar(x_235)) { - x_238 = lean::alloc_cnstr(0, 3, 0); -} else { - x_238 = x_235; -} -lean::cnstr_set(x_238, 0, x_232); -lean::cnstr_set(x_238, 1, x_237); -lean::cnstr_set(x_238, 2, x_234); -x_239 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_239, 0, x_238); -lean::cnstr_set(x_199, 1, x_239); -x_240 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_240, 0, x_199); -lean::cnstr_set(x_240, 1, x_6); -x_241 = lean::apply_1(x_204, x_240); -x_242 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_242, 0, x_241); -x_243 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_243, 0, x_242); -return x_243; -} -} -} -else -{ -obj* x_244; obj* x_245; obj* x_246; obj* x_247; obj* x_248; obj* x_249; obj* x_250; -x_244 = lean::cnstr_get(x_199, 0); -x_245 = lean::cnstr_get(x_199, 1); -x_246 = lean::cnstr_get(x_199, 2); -x_247 = lean::cnstr_get(x_199, 3); -x_248 = lean::cnstr_get(x_199, 4); -lean::inc(x_248); -lean::inc(x_247); -lean::inc(x_246); -lean::inc(x_245); -lean::inc(x_244); -lean::dec(x_199); -x_249 = lean::cnstr_get(x_3, 1); -lean::inc(x_249); -x_250 = l_Lean_Expander_declaration_transform___closed__3; -lean::cnstr_set(x_196, 0, x_250); -if (lean::obj_tag(x_245) == 0) -{ -obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; obj* x_256; -x_251 = l_Lean_Expander_declaration_transform___closed__1; -x_252 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_252, 0, x_244); -lean::cnstr_set(x_252, 1, x_251); -lean::cnstr_set(x_252, 2, x_246); -lean::cnstr_set(x_252, 3, x_247); -lean::cnstr_set(x_252, 4, x_248); -x_253 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_253, 0, x_252); -lean::cnstr_set(x_253, 1, x_6); -x_254 = lean::apply_1(x_249, x_253); -x_255 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_255, 0, x_254); -x_256 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_256, 0, x_255); -return x_256; -} -else -{ -obj* x_257; obj* x_258; obj* x_259; obj* x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_264; obj* x_265; obj* x_266; obj* x_267; obj* x_268; obj* x_269; obj* x_270; obj* x_271; -x_257 = lean::cnstr_get(x_245, 0); -lean::inc(x_257); -if (lean::is_exclusive(x_245)) { - lean::cnstr_release(x_245, 0); - x_258 = x_245; -} else { - lean::dec_ref(x_245); - x_258 = lean::box(0); -} -x_259 = lean::cnstr_get(x_257, 0); -lean::inc(x_259); -x_260 = lean::cnstr_get(x_257, 1); -lean::inc(x_260); -x_261 = lean::cnstr_get(x_257, 2); -lean::inc(x_261); -if (lean::is_exclusive(x_257)) { - lean::cnstr_release(x_257, 0); - lean::cnstr_release(x_257, 1); - lean::cnstr_release(x_257, 2); - x_262 = x_257; -} else { - lean::dec_ref(x_257); - x_262 = lean::box(0); -} -x_263 = l_Lean_Expander_declaration_transform___closed__2; -x_264 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_264, 0, x_263); -lean::cnstr_set(x_264, 1, x_260); -if (lean::is_scalar(x_262)) { - x_265 = lean::alloc_cnstr(0, 3, 0); -} else { - x_265 = x_262; -} -lean::cnstr_set(x_265, 0, x_259); -lean::cnstr_set(x_265, 1, x_264); -lean::cnstr_set(x_265, 2, x_261); -if (lean::is_scalar(x_258)) { - x_266 = lean::alloc_cnstr(1, 1, 0); -} else { - x_266 = x_258; -} -lean::cnstr_set(x_266, 0, x_265); -x_267 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_267, 0, x_244); -lean::cnstr_set(x_267, 1, x_266); -lean::cnstr_set(x_267, 2, x_246); -lean::cnstr_set(x_267, 3, x_247); -lean::cnstr_set(x_267, 4, x_248); -x_268 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_268, 0, x_267); -lean::cnstr_set(x_268, 1, x_6); -x_269 = lean::apply_1(x_249, x_268); -x_270 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_270, 0, x_269); -x_271 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_271, 0, x_270); -return x_271; -} -} -} -else -{ -obj* x_272; obj* x_273; obj* x_274; obj* x_275; obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; -x_272 = lean::cnstr_get(x_196, 1); -x_273 = lean::cnstr_get(x_196, 2); -x_274 = lean::cnstr_get(x_196, 3); -x_275 = lean::cnstr_get(x_196, 4); -x_276 = lean::cnstr_get(x_196, 5); -x_277 = lean::cnstr_get(x_196, 6); -x_278 = lean::cnstr_get(x_196, 7); -lean::inc(x_278); -lean::inc(x_277); -lean::inc(x_276); -lean::inc(x_275); -lean::inc(x_274); -lean::inc(x_273); -lean::inc(x_272); -lean::dec(x_196); -x_279 = lean::cnstr_get(x_199, 0); -lean::inc(x_279); -x_280 = lean::cnstr_get(x_199, 1); -lean::inc(x_280); -x_281 = lean::cnstr_get(x_199, 2); -lean::inc(x_281); -x_282 = lean::cnstr_get(x_199, 3); -lean::inc(x_282); -x_283 = lean::cnstr_get(x_199, 4); -lean::inc(x_283); -if (lean::is_exclusive(x_199)) { - lean::cnstr_release(x_199, 0); - lean::cnstr_release(x_199, 1); - lean::cnstr_release(x_199, 2); - lean::cnstr_release(x_199, 3); - lean::cnstr_release(x_199, 4); - x_284 = x_199; -} else { - lean::dec_ref(x_199); - x_284 = lean::box(0); -} -x_285 = lean::cnstr_get(x_3, 1); -lean::inc(x_285); -x_286 = l_Lean_Expander_declaration_transform___closed__3; -x_287 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_287, 0, x_286); -lean::cnstr_set(x_287, 1, x_272); -lean::cnstr_set(x_287, 2, x_273); -lean::cnstr_set(x_287, 3, x_274); -lean::cnstr_set(x_287, 4, x_275); -lean::cnstr_set(x_287, 5, x_276); -lean::cnstr_set(x_287, 6, x_277); -lean::cnstr_set(x_287, 7, x_278); -lean::cnstr_set(x_6, 0, x_287); -if (lean::obj_tag(x_280) == 0) -{ -obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_288 = l_Lean_Expander_declaration_transform___closed__1; -if (lean::is_scalar(x_284)) { - x_289 = lean::alloc_cnstr(0, 5, 0); -} else { - x_289 = x_284; -} -lean::cnstr_set(x_289, 0, x_279); -lean::cnstr_set(x_289, 1, x_288); -lean::cnstr_set(x_289, 2, x_281); -lean::cnstr_set(x_289, 3, x_282); -lean::cnstr_set(x_289, 4, x_283); -x_290 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_290, 0, x_289); -lean::cnstr_set(x_290, 1, x_6); -x_291 = lean::apply_1(x_285, x_290); -x_292 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_292, 0, x_291); -x_293 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_293, 0, x_292); -return x_293; -} -else -{ -obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; obj* x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; -x_294 = lean::cnstr_get(x_280, 0); -lean::inc(x_294); -if (lean::is_exclusive(x_280)) { - lean::cnstr_release(x_280, 0); - x_295 = x_280; -} else { - lean::dec_ref(x_280); - x_295 = lean::box(0); -} -x_296 = lean::cnstr_get(x_294, 0); -lean::inc(x_296); -x_297 = lean::cnstr_get(x_294, 1); -lean::inc(x_297); -x_298 = lean::cnstr_get(x_294, 2); -lean::inc(x_298); -if (lean::is_exclusive(x_294)) { - lean::cnstr_release(x_294, 0); - lean::cnstr_release(x_294, 1); - lean::cnstr_release(x_294, 2); - x_299 = x_294; -} else { - lean::dec_ref(x_294); - x_299 = lean::box(0); -} -x_300 = l_Lean_Expander_declaration_transform___closed__2; -x_301 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_301, 0, x_300); -lean::cnstr_set(x_301, 1, x_297); -if (lean::is_scalar(x_299)) { - x_302 = lean::alloc_cnstr(0, 3, 0); -} else { - x_302 = x_299; -} -lean::cnstr_set(x_302, 0, x_296); -lean::cnstr_set(x_302, 1, x_301); -lean::cnstr_set(x_302, 2, x_298); -if (lean::is_scalar(x_295)) { - x_303 = lean::alloc_cnstr(1, 1, 0); -} else { - x_303 = x_295; -} -lean::cnstr_set(x_303, 0, x_302); -if (lean::is_scalar(x_284)) { - x_304 = lean::alloc_cnstr(0, 5, 0); -} else { - x_304 = x_284; -} -lean::cnstr_set(x_304, 0, x_279); -lean::cnstr_set(x_304, 1, x_303); -lean::cnstr_set(x_304, 2, x_281); -lean::cnstr_set(x_304, 3, x_282); -lean::cnstr_set(x_304, 4, x_283); -x_305 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_305, 0, x_304); -lean::cnstr_set(x_305, 1, x_6); -x_306 = lean::apply_1(x_285, x_305); -x_307 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_307, 0, x_306); -x_308 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_308, 0, x_307); -return x_308; -} -} -} -} -else -{ -obj* x_309; obj* x_310; -x_309 = lean::cnstr_get(x_6, 0); -lean::inc(x_309); -lean::dec(x_6); -x_310 = lean::cnstr_get(x_309, 0); -lean::inc(x_310); -if (lean::obj_tag(x_310) == 0) -{ -obj* x_311; -lean::dec(x_310); -lean::dec(x_309); -lean::dec(x_5); -x_311 = l_Lean_Expander_noExpansion(x_2); -return x_311; -} -else -{ -obj* x_312; obj* x_313; obj* x_314; obj* x_315; obj* x_316; obj* x_317; obj* x_318; obj* x_319; obj* x_320; obj* x_321; obj* x_322; obj* x_323; obj* x_324; obj* x_325; obj* x_326; obj* x_327; obj* x_328; obj* x_329; obj* x_330; -lean::dec(x_310); -x_312 = lean::cnstr_get(x_5, 0); -lean::inc(x_312); -lean::dec(x_5); -x_313 = lean::cnstr_get(x_309, 1); -lean::inc(x_313); -x_314 = lean::cnstr_get(x_309, 2); -lean::inc(x_314); -x_315 = lean::cnstr_get(x_309, 3); -lean::inc(x_315); -x_316 = lean::cnstr_get(x_309, 4); -lean::inc(x_316); -x_317 = lean::cnstr_get(x_309, 5); -lean::inc(x_317); -x_318 = lean::cnstr_get(x_309, 6); -lean::inc(x_318); -x_319 = lean::cnstr_get(x_309, 7); -lean::inc(x_319); -if (lean::is_exclusive(x_309)) { - lean::cnstr_release(x_309, 0); - lean::cnstr_release(x_309, 1); - lean::cnstr_release(x_309, 2); - lean::cnstr_release(x_309, 3); - lean::cnstr_release(x_309, 4); - lean::cnstr_release(x_309, 5); - lean::cnstr_release(x_309, 6); - lean::cnstr_release(x_309, 7); - x_320 = x_309; -} else { - lean::dec_ref(x_309); - x_320 = lean::box(0); -} -x_321 = lean::cnstr_get(x_312, 0); -lean::inc(x_321); -x_322 = lean::cnstr_get(x_312, 1); -lean::inc(x_322); -x_323 = lean::cnstr_get(x_312, 2); -lean::inc(x_323); -x_324 = lean::cnstr_get(x_312, 3); -lean::inc(x_324); -x_325 = lean::cnstr_get(x_312, 4); -lean::inc(x_325); -if (lean::is_exclusive(x_312)) { - lean::cnstr_release(x_312, 0); - lean::cnstr_release(x_312, 1); - lean::cnstr_release(x_312, 2); - lean::cnstr_release(x_312, 3); - lean::cnstr_release(x_312, 4); - x_326 = x_312; -} else { - lean::dec_ref(x_312); - x_326 = lean::box(0); -} -x_327 = lean::cnstr_get(x_3, 1); -lean::inc(x_327); -x_328 = l_Lean_Expander_declaration_transform___closed__3; -if (lean::is_scalar(x_320)) { - x_329 = lean::alloc_cnstr(0, 8, 0); -} else { - x_329 = x_320; -} -lean::cnstr_set(x_329, 0, x_328); -lean::cnstr_set(x_329, 1, x_313); -lean::cnstr_set(x_329, 2, x_314); -lean::cnstr_set(x_329, 3, x_315); -lean::cnstr_set(x_329, 4, x_316); -lean::cnstr_set(x_329, 5, x_317); -lean::cnstr_set(x_329, 6, x_318); -lean::cnstr_set(x_329, 7, x_319); -x_330 = lean::alloc_cnstr(5, 1, 0); -lean::cnstr_set(x_330, 0, x_329); -if (lean::obj_tag(x_322) == 0) -{ -obj* x_331; obj* x_332; obj* x_333; obj* x_334; obj* x_335; obj* x_336; -x_331 = l_Lean_Expander_declaration_transform___closed__1; -if (lean::is_scalar(x_326)) { - x_332 = lean::alloc_cnstr(0, 5, 0); -} else { - x_332 = x_326; -} -lean::cnstr_set(x_332, 0, x_321); -lean::cnstr_set(x_332, 1, x_331); -lean::cnstr_set(x_332, 2, x_323); -lean::cnstr_set(x_332, 3, x_324); -lean::cnstr_set(x_332, 4, x_325); -x_333 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_333, 0, x_332); -lean::cnstr_set(x_333, 1, x_330); -x_334 = lean::apply_1(x_327, x_333); -x_335 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_335, 0, x_334); -x_336 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_336, 0, x_335); -return x_336; -} -else -{ -obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; obj* x_344; obj* x_345; obj* x_346; obj* x_347; obj* x_348; obj* x_349; obj* x_350; obj* x_351; -x_337 = lean::cnstr_get(x_322, 0); -lean::inc(x_337); -if (lean::is_exclusive(x_322)) { - lean::cnstr_release(x_322, 0); - x_338 = x_322; -} else { - lean::dec_ref(x_322); - x_338 = lean::box(0); -} -x_339 = lean::cnstr_get(x_337, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get(x_337, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_337, 2); -lean::inc(x_341); -if (lean::is_exclusive(x_337)) { - lean::cnstr_release(x_337, 0); - lean::cnstr_release(x_337, 1); - lean::cnstr_release(x_337, 2); - x_342 = x_337; -} else { - lean::dec_ref(x_337); - x_342 = lean::box(0); -} -x_343 = l_Lean_Expander_declaration_transform___closed__2; -x_344 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_344, 0, x_343); -lean::cnstr_set(x_344, 1, x_340); -if (lean::is_scalar(x_342)) { - x_345 = lean::alloc_cnstr(0, 3, 0); -} else { - x_345 = x_342; -} -lean::cnstr_set(x_345, 0, x_339); -lean::cnstr_set(x_345, 1, x_344); -lean::cnstr_set(x_345, 2, x_341); -if (lean::is_scalar(x_338)) { - x_346 = lean::alloc_cnstr(1, 1, 0); -} else { - x_346 = x_338; -} -lean::cnstr_set(x_346, 0, x_345); -if (lean::is_scalar(x_326)) { - x_347 = lean::alloc_cnstr(0, 5, 0); -} else { - x_347 = x_326; -} -lean::cnstr_set(x_347, 0, x_321); -lean::cnstr_set(x_347, 1, x_346); -lean::cnstr_set(x_347, 2, x_323); -lean::cnstr_set(x_347, 3, x_324); -lean::cnstr_set(x_347, 4, x_325); -x_348 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_348, 0, x_347); -lean::cnstr_set(x_348, 1, x_330); -x_349 = lean::apply_1(x_327, x_348); -x_350 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_350, 0, x_349); -x_351 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_351, 0, x_350); -return x_351; -} -} -} -} -default: -{ -obj* x_352; -lean::dec(x_6); -lean::dec(x_5); -x_352 = l_Lean_Expander_noExpansion(x_2); -return x_352; -} -} -} -} -obj* l_Lean_Expander_declaration_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_declaration_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_introRule_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = l_Lean_Parser_command_introRule_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 3); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -x_10 = lean::cnstr_get(x_6, 0); -lean::dec(x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; -lean::free_heap_obj(x_6); -lean::dec(x_7); -lean::dec(x_5); -x_11 = l_Lean_Expander_noExpansion(x_2); -return x_11; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_5); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; uint8 x_15; -x_13 = lean::cnstr_get(x_5, 3); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_7, 0); -lean::inc(x_14); -lean::dec(x_7); -x_15 = !lean::is_exclusive(x_9); -if (x_15 == 0) -{ -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_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_16 = lean::cnstr_get(x_9, 0); -x_17 = lean::box(0); -x_18 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_14); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_9, 0, x_19); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_9); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::cnstr_get(x_3, 1); -lean::inc(x_22); -x_23 = l_Lean_Parser_Term_pi_HasView; -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_16, 1); -lean::inc(x_25); -lean::dec(x_16); -x_26 = l_Lean_Expander_depArrow_transform___closed__1; -x_27 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_28 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_21); -lean::cnstr_set(x_28, 2, x_27); -lean::cnstr_set(x_28, 3, x_25); -x_29 = lean::apply_1(x_24, x_28); -x_30 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = l_Lean_Expander_axiom_transform___closed__1; -lean::cnstr_set(x_6, 1, x_32); -lean::cnstr_set(x_6, 0, x_33); -x_34 = lean::apply_1(x_22, x_5); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_37 = lean::cnstr_get(x_9, 0); -lean::inc(x_37); -lean::dec(x_9); -x_38 = lean::box(0); -x_39 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_14); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -x_44 = lean::cnstr_get(x_3, 1); -lean::inc(x_44); -x_45 = l_Lean_Parser_Term_pi_HasView; -x_46 = lean::cnstr_get(x_45, 1); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_37, 1); -lean::inc(x_47); -lean::dec(x_37); -x_48 = l_Lean_Expander_depArrow_transform___closed__1; -x_49 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_50 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_50, 0, x_48); -lean::cnstr_set(x_50, 1, x_43); -lean::cnstr_set(x_50, 2, x_49); -lean::cnstr_set(x_50, 3, x_47); -x_51 = lean::apply_1(x_46, x_50); -x_52 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_51); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = l_Lean_Expander_axiom_transform___closed__1; -lean::cnstr_set(x_6, 1, x_54); -lean::cnstr_set(x_6, 0, x_55); -x_56 = lean::apply_1(x_44, x_5); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -return x_58; -} -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_59 = lean::cnstr_get(x_5, 0); -x_60 = lean::cnstr_get(x_5, 1); -x_61 = lean::cnstr_get(x_5, 2); -lean::inc(x_61); -lean::inc(x_60); -lean::inc(x_59); -lean::dec(x_5); -x_62 = lean::cnstr_get(x_7, 0); -lean::inc(x_62); -lean::dec(x_7); -x_63 = lean::cnstr_get(x_9, 0); -lean::inc(x_63); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_64 = x_9; -} else { - lean::dec_ref(x_9); - x_64 = lean::box(0); -} -x_65 = lean::box(0); -x_66 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_62); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -if (lean::is_scalar(x_64)) { - x_68 = lean::alloc_cnstr(1, 1, 0); -} else { - x_68 = x_64; -} -lean::cnstr_set(x_68, 0, x_67); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_65); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_70, 0, x_69); -x_71 = lean::cnstr_get(x_3, 1); -lean::inc(x_71); -x_72 = l_Lean_Parser_Term_pi_HasView; -x_73 = lean::cnstr_get(x_72, 1); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_63, 1); -lean::inc(x_74); -lean::dec(x_63); -x_75 = l_Lean_Expander_depArrow_transform___closed__1; -x_76 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_77 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_77, 0, x_75); -lean::cnstr_set(x_77, 1, x_70); -lean::cnstr_set(x_77, 2, x_76); -lean::cnstr_set(x_77, 3, x_74); -x_78 = lean::apply_1(x_73, x_77); -x_79 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_78); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -x_82 = l_Lean_Expander_axiom_transform___closed__1; -lean::cnstr_set(x_6, 1, x_81); -lean::cnstr_set(x_6, 0, x_82); -x_83 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_83, 0, x_59); -lean::cnstr_set(x_83, 1, x_60); -lean::cnstr_set(x_83, 2, x_61); -lean::cnstr_set(x_83, 3, x_6); -x_84 = lean::apply_1(x_71, x_83); -x_85 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -x_86 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_86, 0, x_85); -return x_86; -} -} -} -else -{ -obj* x_87; -x_87 = lean::cnstr_get(x_6, 1); -lean::inc(x_87); -lean::dec(x_6); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_88; -lean::dec(x_7); -lean::dec(x_5); -x_88 = l_Lean_Expander_noExpansion(x_2); -return x_88; -} -else -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_89 = lean::cnstr_get(x_5, 0); -lean::inc(x_89); -x_90 = lean::cnstr_get(x_5, 1); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_5, 2); -lean::inc(x_91); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - lean::cnstr_release(x_5, 3); - x_92 = x_5; -} else { - lean::dec_ref(x_5); - x_92 = lean::box(0); -} -x_93 = lean::cnstr_get(x_7, 0); -lean::inc(x_93); -lean::dec(x_7); -x_94 = lean::cnstr_get(x_87, 0); -lean::inc(x_94); -if (lean::is_exclusive(x_87)) { - lean::cnstr_release(x_87, 0); - x_95 = x_87; -} else { - lean::dec_ref(x_87); - x_95 = lean::box(0); -} -x_96 = lean::box(0); -x_97 = l_List_map___main___at_Lean_Expander_depArrow_transform___spec__2(x_93); -x_98 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -if (lean::is_scalar(x_95)) { - x_99 = lean::alloc_cnstr(1, 1, 0); -} else { - x_99 = x_95; -} -lean::cnstr_set(x_99, 0, x_98); -x_100 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_100, 0, x_96); -lean::cnstr_set(x_100, 1, x_99); -x_101 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_101, 0, x_100); -x_102 = lean::cnstr_get(x_3, 1); -lean::inc(x_102); -x_103 = l_Lean_Parser_Term_pi_HasView; -x_104 = lean::cnstr_get(x_103, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_94, 1); -lean::inc(x_105); -lean::dec(x_94); -x_106 = l_Lean_Expander_depArrow_transform___closed__1; -x_107 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_108 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_108, 0, x_106); -lean::cnstr_set(x_108, 1, x_101); -lean::cnstr_set(x_108, 2, x_107); -lean::cnstr_set(x_108, 3, x_105); -x_109 = lean::apply_1(x_104, x_108); -x_110 = l_Lean_Expander_mkSimpleBinder___closed__1; -x_111 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_109); -x_112 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_112, 0, x_111); -x_113 = l_Lean_Expander_axiom_transform___closed__1; -x_114 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_114, 0, x_113); -lean::cnstr_set(x_114, 1, x_112); -if (lean::is_scalar(x_92)) { - x_115 = lean::alloc_cnstr(0, 4, 0); -} else { - x_115 = x_92; -} -lean::cnstr_set(x_115, 0, x_89); -lean::cnstr_set(x_115, 1, x_90); -lean::cnstr_set(x_115, 2, x_91); -lean::cnstr_set(x_115, 3, x_114); -x_116 = lean::apply_1(x_102, x_115); -x_117 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_117, 0, x_116); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -return x_118; -} -} -} -else -{ -obj* x_119; -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -x_119 = l_Lean_Expander_noExpansion(x_2); -return x_119; -} -} -} -obj* l_Lean_Expander_introRule_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_introRule_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_variable_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("variables"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* l_Lean_Expander_variable_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_3 = l_Lean_Parser_command_variable_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = l_Lean_Parser_command_variables_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -lean::dec(x_5); -x_9 = lean::box(0); -if (lean::obj_tag(x_8) == 0) -{ -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_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = l_Lean_Expander_variable_transform___closed__1; -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::apply_1(x_7, x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -return x_17; -} -else -{ -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; -x_18 = lean::cnstr_get(x_8, 0); -lean::inc(x_18); -lean::dec(x_8); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = l_Lean_Expander_coeBinderBracketedBinder___closed__1; -x_21 = l_Lean_Expander_coeBinderBracketedBinder___closed__2; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_19); -lean::cnstr_set(x_22, 2, x_21); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_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_9); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -x_26 = l_Lean_Expander_variable_transform___closed__1; -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::apply_1(x_7, x_27); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -return x_30; -} -} -} -obj* l_Lean_Expander_variable_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_variable_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_bindingAnnotationUpdate() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Expander"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("bindingAnnotationUpdate"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Expander_bindingAnnotationUpdate; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = l_Lean_Expander_bindingAnnotationUpdate; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -} -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_10; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -return x_10; -} -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; -x_13 = lean::box(0); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -else -{ -obj* x_17; -lean::dec(x_14); -x_17 = lean::box(0); -return x_17; -} -} -} -} -} -} -obj* _init_l_Lean_Expander_bindingAnnotationUpdate_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Expander_bindingAnnotationUpdate_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Expander_bindingAnnotationUpdate_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Expander_bindingAnnotationUpdate_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::mk_string("dummy"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = l_Lean_Parser_TermParserM_Monad; -x_9 = l_Lean_Parser_TermParserM_MonadExcept; -x_10 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_11 = l_Lean_Parser_TermParserM_Alternative; -x_12 = l_Lean_Expander_bindingAnnotationUpdate; -x_13 = l_Lean_Expander_bindingAnnotationUpdate_HasView; -x_14 = l_Lean_Parser_Combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); -lean::dec(x_7); -return x_14; -} -} -obj* _init_l_Lean_Expander_bindingAnnotationUpdate_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::mk_string("dummy"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Expander_bindingAnnotationUpdate_Parser(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; -x_6 = l_Lean_Expander_bindingAnnotationUpdate; -x_7 = l_Lean_Expander_bindingAnnotationUpdate_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::box(0); -x_2 = lean::mk_string(" : "); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = l_Lean_Expander_bindingAnnotationUpdate_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::mk_string("dummy"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::apply_1(x_7, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_5); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -obj* l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = l_Lean_Expander_expandBracketedBinder___main___closed__4; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -if (lean::is_exclusive(x_1)) { - lean::cnstr_release(x_1, 0); - lean::cnstr_release(x_1, 1); - x_6 = x_1; -} else { - lean::dec_ref(x_1); - x_6 = lean::box(0); -} -if (lean::obj_tag(x_4) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_4, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -lean::dec(x_24); -lean::dec(x_23); -x_25 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_25; -goto block_22; -} -else -{ -uint8 x_26; -x_26 = !lean::is_exclusive(x_24); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_24, 0); -x_28 = lean::cnstr_get(x_27, 1); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; -x_29 = lean::cnstr_get(x_27, 2); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -x_30 = !lean::is_exclusive(x_4); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::cnstr_get(x_4, 0); -lean::dec(x_31); -x_32 = !lean::is_exclusive(x_23); -if (x_32 == 0) -{ -obj* x_33; uint8 x_34; -x_33 = lean::cnstr_get(x_23, 1); -lean::dec(x_33); -x_34 = !lean::is_exclusive(x_27); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_27, 2); -lean::dec(x_35); -x_36 = lean::cnstr_get(x_27, 1); -lean::dec(x_36); -x_37 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1; -lean::cnstr_set(x_27, 1, x_37); -x_38 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_38; -goto block_22; -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_39 = lean::cnstr_get(x_27, 0); -lean::inc(x_39); -lean::dec(x_27); -x_40 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1; -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_39); -lean::cnstr_set(x_41, 1, x_40); -lean::cnstr_set(x_41, 2, x_29); -lean::cnstr_set(x_24, 0, x_41); -x_42 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_42; -goto block_22; -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_43 = lean::cnstr_get(x_23, 0); -x_44 = lean::cnstr_get(x_23, 2); -lean::inc(x_44); -lean::inc(x_43); -lean::dec(x_23); -x_45 = lean::cnstr_get(x_27, 0); -lean::inc(x_45); -if (lean::is_exclusive(x_27)) { - lean::cnstr_release(x_27, 0); - lean::cnstr_release(x_27, 1); - lean::cnstr_release(x_27, 2); - x_46 = x_27; -} else { - lean::dec_ref(x_27); - x_46 = lean::box(0); -} -x_47 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1; -if (lean::is_scalar(x_46)) { - x_48 = lean::alloc_cnstr(0, 3, 0); -} else { - x_48 = x_46; -} -lean::cnstr_set(x_48, 0, x_45); -lean::cnstr_set(x_48, 1, x_47); -lean::cnstr_set(x_48, 2, x_29); -lean::cnstr_set(x_24, 0, x_48); -x_49 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_49, 0, x_43); -lean::cnstr_set(x_49, 1, x_24); -lean::cnstr_set(x_49, 2, x_44); -lean::cnstr_set(x_4, 0, x_49); -x_50 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_50; -goto block_22; -} -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_4); -x_51 = lean::cnstr_get(x_23, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_23, 2); -lean::inc(x_52); -if (lean::is_exclusive(x_23)) { - lean::cnstr_release(x_23, 0); - lean::cnstr_release(x_23, 1); - lean::cnstr_release(x_23, 2); - x_53 = x_23; -} else { - lean::dec_ref(x_23); - x_53 = lean::box(0); -} -x_54 = lean::cnstr_get(x_27, 0); -lean::inc(x_54); -if (lean::is_exclusive(x_27)) { - lean::cnstr_release(x_27, 0); - lean::cnstr_release(x_27, 1); - lean::cnstr_release(x_27, 2); - x_55 = x_27; -} else { - lean::dec_ref(x_27); - x_55 = lean::box(0); -} -x_56 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1; -if (lean::is_scalar(x_55)) { - x_57 = lean::alloc_cnstr(0, 3, 0); -} else { - x_57 = x_55; -} -lean::cnstr_set(x_57, 0, x_54); -lean::cnstr_set(x_57, 1, x_56); -lean::cnstr_set(x_57, 2, x_29); -lean::cnstr_set(x_24, 0, x_57); -if (lean::is_scalar(x_53)) { - x_58 = lean::alloc_cnstr(0, 3, 0); -} else { - x_58 = x_53; -} -lean::cnstr_set(x_58, 0, x_51); -lean::cnstr_set(x_58, 1, x_24); -lean::cnstr_set(x_58, 2, x_52); -x_59 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -x_60 = l_Lean_Expander_expandBracketedBinder___main(x_59, x_2); -x_7 = x_60; -goto block_22; -} -} -else -{ -obj* x_61; -lean::dec(x_29); -lean::free_heap_obj(x_24); -lean::dec(x_27); -lean::dec(x_23); -x_61 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_61; -goto block_22; -} -} -else -{ -obj* x_62; -lean::dec(x_28); -lean::free_heap_obj(x_24); -lean::dec(x_27); -lean::dec(x_23); -x_62 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_62; -goto block_22; -} -} -else -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_24, 0); -lean::inc(x_63); -lean::dec(x_24); -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; -x_65 = lean::cnstr_get(x_63, 2); -lean::inc(x_65); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - x_66 = x_4; -} else { - lean::dec_ref(x_4); - x_66 = lean::box(0); -} -x_67 = lean::cnstr_get(x_23, 0); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_23, 2); -lean::inc(x_68); -if (lean::is_exclusive(x_23)) { - lean::cnstr_release(x_23, 0); - lean::cnstr_release(x_23, 1); - lean::cnstr_release(x_23, 2); - x_69 = x_23; -} else { - lean::dec_ref(x_23); - x_69 = lean::box(0); -} -x_70 = lean::cnstr_get(x_63, 0); -lean::inc(x_70); -if (lean::is_exclusive(x_63)) { - lean::cnstr_release(x_63, 0); - lean::cnstr_release(x_63, 1); - lean::cnstr_release(x_63, 2); - x_71 = x_63; -} else { - lean::dec_ref(x_63); - x_71 = lean::box(0); -} -x_72 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1; -if (lean::is_scalar(x_71)) { - x_73 = lean::alloc_cnstr(0, 3, 0); -} else { - x_73 = x_71; -} -lean::cnstr_set(x_73, 0, x_70); -lean::cnstr_set(x_73, 1, x_72); -lean::cnstr_set(x_73, 2, x_65); -x_74 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_74, 0, x_73); -if (lean::is_scalar(x_69)) { - x_75 = lean::alloc_cnstr(0, 3, 0); -} else { - x_75 = x_69; -} -lean::cnstr_set(x_75, 0, x_67); -lean::cnstr_set(x_75, 1, x_74); -lean::cnstr_set(x_75, 2, x_68); -if (lean::is_scalar(x_66)) { - x_76 = lean::alloc_cnstr(0, 1, 0); -} else { - x_76 = x_66; -} -lean::cnstr_set(x_76, 0, x_75); -x_77 = l_Lean_Expander_expandBracketedBinder___main(x_76, x_2); -x_7 = x_77; -goto block_22; -} -else -{ -obj* x_78; -lean::dec(x_65); -lean::dec(x_63); -lean::dec(x_23); -x_78 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_78; -goto block_22; -} -} -else -{ -obj* x_79; -lean::dec(x_64); -lean::dec(x_63); -lean::dec(x_23); -x_79 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_79; -goto block_22; -} -} -} -} -else -{ -obj* x_80; -x_80 = l_Lean_Expander_expandBracketedBinder___main(x_4, x_2); -x_7 = x_80; -goto block_22; -} -block_22: -{ -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -lean::dec(x_6); -lean::dec(x_5); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -return x_7; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -return x_10; -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_7, 0); -lean::inc(x_11); -lean::dec(x_7); -x_12 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1(x_5, x_2); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -lean::dec(x_11); -lean::dec(x_6); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; -} -} -else -{ -uint8 x_16; -x_16 = !lean::is_exclusive(x_12); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_12, 0); -if (lean::is_scalar(x_6)) { - x_18 = lean::alloc_cnstr(1, 2, 0); -} else { - x_18 = x_6; -} -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_12, 0, x_18); -return x_12; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_12, 0); -lean::inc(x_19); -lean::dec(x_12); -if (lean::is_scalar(x_6)) { - x_20 = lean::alloc_cnstr(1, 2, 0); -} else { - x_20 = x_6; -} -lean::cnstr_set(x_20, 0, x_11); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -} -} -} -} -} -obj* l_Lean_Expander_variables_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = l_Lean_Parser_command_variables_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1(x_8, x_2); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -lean::free_heap_obj(x_6); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -return x_9; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -return x_12; -} -} -else -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_9); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_3, 1); -lean::inc(x_15); -x_16 = l_List_join___main___rarg(x_14); -lean::cnstr_set_tag(x_6, 1); -lean::cnstr_set(x_6, 0, x_16); -x_17 = l_Lean_Expander_variable_transform___closed__1; -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_6); -x_19 = lean::apply_1(x_15, x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_9, 0, x_20); -return x_9; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_21 = lean::cnstr_get(x_9, 0); -lean::inc(x_21); -lean::dec(x_9); -x_22 = lean::cnstr_get(x_3, 1); -lean::inc(x_22); -x_23 = l_List_join___main___rarg(x_21); -lean::cnstr_set_tag(x_6, 1); -lean::cnstr_set(x_6, 0, x_23); -x_24 = l_Lean_Expander_variable_transform___closed__1; -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_6); -x_26 = lean::apply_1(x_22, x_25); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -return x_28; -} -} -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_6, 0); -lean::inc(x_29); -lean::dec(x_6); -x_30 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1(x_29, x_2); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - x_32 = x_30; -} else { - lean::dec_ref(x_30); - x_32 = lean::box(0); -} -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(0, 1, 0); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_31); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_34 = lean::cnstr_get(x_30, 0); -lean::inc(x_34); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - x_35 = x_30; -} else { - lean::dec_ref(x_30); - x_35 = lean::box(0); -} -x_36 = lean::cnstr_get(x_3, 1); -lean::inc(x_36); -x_37 = l_List_join___main___rarg(x_34); -x_38 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -x_39 = l_Lean_Expander_variable_transform___closed__1; -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_38); -x_41 = lean::apply_1(x_36, x_40); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -if (lean::is_scalar(x_35)) { - x_43 = lean::alloc_cnstr(1, 1, 0); -} else { - x_43 = x_35; -} -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -} -else -{ -obj* x_44; -lean::dec(x_6); -x_44 = l_Lean_Expander_noExpansion(x_2); -return x_44; -} -} -} -obj* l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_variables_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_variables_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_Level_leading_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_Lean_Parser_Level_leading_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -if (lean::obj_tag(x_5) == 3) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; -} -else -{ -obj* x_10; -lean::dec(x_5); -x_10 = l_Lean_Expander_noExpansion(x_2); -return x_10; -} -} -} -obj* l_Lean_Expander_Level_leading_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_Level_leading_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_Subtype_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string("Subtype"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = l_Lean_Expander_globId(x_3); -return x_4; -} -} -obj* l_Lean_Expander_Subtype_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_3 = l_Lean_Parser_Term_Subtype_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = l_Lean_Parser_Term_lambda_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_5, 2); -lean::inc(x_9); -x_10 = l_Lean_Expander_getOptType___main(x_9); -lean::dec(x_9); -x_11 = 0; -x_12 = l_Lean_Expander_mkSimpleBinder(x_8, x_11, x_10); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = lean::cnstr_get(x_5, 4); -lean::inc(x_14); -lean::dec(x_5); -x_15 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2; -x_16 = l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3; -x_17 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_13); -lean::cnstr_set(x_17, 2, x_16); -lean::cnstr_set(x_17, 3, x_14); -x_18 = lean::apply_1(x_7, x_17); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Expander_Subtype_transform___closed__1; -x_22 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_21, x_20); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -return x_24; -} -} -obj* l_Lean_Expander_Subtype_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_Subtype_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_List_map___main___at_Lean_Expander_universes_transform___spec__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("universe"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Expander_universes_transform___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_Lean_Parser_command_universe_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = l_List_map___main___at_Lean_Expander_universes_transform___spec__1___closed__1; -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_4); -x_10 = lean::apply_1(x_7, x_9); -x_11 = l_List_map___main___at_Lean_Expander_universes_transform___spec__1(x_5); -lean::cnstr_set(x_1, 1, x_11); -lean::cnstr_set(x_1, 0, x_10); -return x_1; -} -else -{ -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; -x_12 = lean::cnstr_get(x_1, 0); -x_13 = lean::cnstr_get(x_1, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_1); -x_14 = l_Lean_Parser_command_universe_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = l_List_map___main___at_Lean_Expander_universes_transform___spec__1___closed__1; -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_12); -x_18 = lean::apply_1(x_15, x_17); -x_19 = l_List_map___main___at_Lean_Expander_universes_transform___spec__1(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_19); -return x_20; -} -} -} -} -obj* l_Lean_Expander_universes_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_3 = l_Lean_Parser_command_universes_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = l_List_map___main___at_Lean_Expander_universes_transform___spec__1(x_6); -x_8 = l_Lean_Parser_noKind; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -} -obj* l_Lean_Expander_universes_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_universes_transform(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Expander_sorry_transform___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::box(0); -x_2 = lean::mk_string("sorryAx"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = l_Lean_Expander_globId(x_3); -x_5 = l_Lean_Parser_Term_hole_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::box(0); -x_8 = lean::mk_string("_"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::apply_1(x_6, x_11); -x_13 = lean::mk_string("Bool"); -x_14 = lean_name_mk_string(x_1, x_13); -x_15 = lean::mk_string("false"); -x_16 = lean_name_mk_string(x_14, x_15); -x_17 = l_Lean_Expander_globId(x_16); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_12); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_4, x_20); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -return x_23; -} -} -obj* l_Lean_Expander_sorry_transform(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_sorry_transform___closed__1; -return x_3; -} -} -obj* l_Lean_Expander_sorry_transform___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_sorry_transform(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; -x_4 = 0; -x_5 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 3, x_1); -lean::cnstr_set_scalar(x_5, sizeof(void*)*4, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_6 == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -x_10 = lean::cnstr_get(x_1, 2); -x_11 = lean::cnstr_get(x_1, 3); -x_12 = l_Lean_Name_quickLt(x_2, x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = l_Lean_Name_quickLt(x_9, x_2); -if (x_13 == 0) -{ -lean::dec(x_10); -lean::dec(x_9); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -obj* x_14; -x_14 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_11, x_2, x_3); -lean::cnstr_set(x_1, 3, x_14); -return x_1; -} -} -else -{ -obj* x_15; -x_15 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_8, x_2, x_3); -lean::cnstr_set(x_1, 0, x_15); -return x_1; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = lean::cnstr_get(x_1, 1); -x_18 = lean::cnstr_get(x_1, 2); -x_19 = lean::cnstr_get(x_1, 3); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_1); -x_20 = l_Lean_Name_quickLt(x_2, x_17); -if (x_20 == 0) -{ -uint8 x_21; -x_21 = l_Lean_Name_quickLt(x_17, x_2); -if (x_21 == 0) -{ -obj* x_22; -lean::dec(x_18); -lean::dec(x_17); -x_22 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_22, 0, x_16); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_3); -lean::cnstr_set(x_22, 3, x_19); -lean::cnstr_set_scalar(x_22, sizeof(void*)*4, x_6); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_19, x_2, x_3); -x_24 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_24, 0, x_16); -lean::cnstr_set(x_24, 1, x_17); -lean::cnstr_set(x_24, 2, x_18); -lean::cnstr_set(x_24, 3, x_23); -lean::cnstr_set_scalar(x_24, sizeof(void*)*4, x_6); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_16, x_2, x_3); -x_26 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_18); -lean::cnstr_set(x_26, 3, x_19); -lean::cnstr_set_scalar(x_26, sizeof(void*)*4, x_6); -return x_26; -} -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_28 = lean::cnstr_get(x_1, 0); -x_29 = lean::cnstr_get(x_1, 1); -x_30 = lean::cnstr_get(x_1, 2); -x_31 = lean::cnstr_get(x_1, 3); -x_32 = l_Lean_Name_quickLt(x_2, x_29); -if (x_32 == 0) -{ -uint8 x_33; -x_33 = l_Lean_Name_quickLt(x_29, x_2); -if (x_33 == 0) -{ -lean::dec(x_30); -lean::dec(x_29); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -uint8 x_34; -x_34 = l_RBNode_isRed___main___rarg(x_31); -if (x_34 == 0) -{ -obj* x_35; -x_35 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_31, x_2, x_3); -lean::cnstr_set(x_1, 3, x_35); -return x_1; -} -else -{ -obj* x_36; -x_36 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_31, x_2, x_3); -if (lean::obj_tag(x_36) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_28); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = lean::cnstr_get(x_36, 3); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; uint8 x_43; -x_40 = lean::cnstr_get(x_36, 3); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_36, 0); -lean::dec(x_41); -x_42 = 0; -lean::cnstr_set(x_36, 0, x_38); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_42); -x_43 = 1; -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_43); -return x_1; -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; uint8 x_48; -x_44 = lean::cnstr_get(x_36, 1); -x_45 = lean::cnstr_get(x_36, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_36); -x_46 = 0; -x_47 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_47, 0, x_38); -lean::cnstr_set(x_47, 1, x_44); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_38); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_46); -x_48 = 1; -lean::cnstr_set(x_1, 3, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_48); -return x_1; -} -} -else -{ -uint8 x_49; -x_49 = lean::cnstr_get_scalar(x_38, sizeof(void*)*4); -if (x_49 == 0) -{ -uint8 x_50; -x_50 = !lean::is_exclusive(x_36); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; uint8 x_55; -x_51 = lean::cnstr_get(x_36, 1); -x_52 = lean::cnstr_get(x_36, 2); -x_53 = lean::cnstr_get(x_36, 3); -lean::dec(x_53); -x_54 = lean::cnstr_get(x_36, 0); -lean::dec(x_54); -x_55 = !lean::is_exclusive(x_38); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_56 = lean::cnstr_get(x_38, 0); -x_57 = lean::cnstr_get(x_38, 1); -x_58 = lean::cnstr_get(x_38, 2); -x_59 = lean::cnstr_get(x_38, 3); -x_60 = 1; -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 2, x_30); -lean::cnstr_set(x_38, 1, x_29); -lean::cnstr_set(x_38, 0, x_28); -lean::cnstr_set_scalar(x_38, sizeof(void*)*4, x_60); -lean::cnstr_set(x_36, 3, x_59); -lean::cnstr_set(x_36, 2, x_58); -lean::cnstr_set(x_36, 1, x_57); -lean::cnstr_set(x_36, 0, x_56); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_60); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_38); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; obj* x_66; -x_61 = lean::cnstr_get(x_38, 0); -x_62 = lean::cnstr_get(x_38, 1); -x_63 = lean::cnstr_get(x_38, 2); -x_64 = lean::cnstr_get(x_38, 3); -lean::inc(x_64); -lean::inc(x_63); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_38); -x_65 = 1; -x_66 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_66, 0, x_28); -lean::cnstr_set(x_66, 1, x_29); -lean::cnstr_set(x_66, 2, x_30); -lean::cnstr_set(x_66, 3, x_37); -lean::cnstr_set_scalar(x_66, sizeof(void*)*4, x_65); -lean::cnstr_set(x_36, 3, x_64); -lean::cnstr_set(x_36, 2, x_63); -lean::cnstr_set(x_36, 1, x_62); -lean::cnstr_set(x_36, 0, x_61); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_65); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_66); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; -x_67 = lean::cnstr_get(x_36, 1); -x_68 = lean::cnstr_get(x_36, 2); -lean::inc(x_68); -lean::inc(x_67); -lean::dec(x_36); -x_69 = lean::cnstr_get(x_38, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_38, 1); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_38, 2); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_38, 3); -lean::inc(x_72); -if (lean::is_exclusive(x_38)) { - lean::cnstr_release(x_38, 0); - lean::cnstr_release(x_38, 1); - lean::cnstr_release(x_38, 2); - lean::cnstr_release(x_38, 3); - x_73 = x_38; -} else { - lean::dec_ref(x_38); - x_73 = lean::box(0); -} -x_74 = 1; -if (lean::is_scalar(x_73)) { - x_75 = lean::alloc_cnstr(1, 4, 1); -} else { - x_75 = x_73; -} -lean::cnstr_set(x_75, 0, x_28); -lean::cnstr_set(x_75, 1, x_29); -lean::cnstr_set(x_75, 2, x_30); -lean::cnstr_set(x_75, 3, x_37); -lean::cnstr_set_scalar(x_75, sizeof(void*)*4, x_74); -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_69); -lean::cnstr_set(x_76, 1, x_70); -lean::cnstr_set(x_76, 2, x_71); -lean::cnstr_set(x_76, 3, x_72); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_74); -lean::cnstr_set(x_1, 3, x_76); -lean::cnstr_set(x_1, 2, x_68); -lean::cnstr_set(x_1, 1, x_67); -lean::cnstr_set(x_1, 0, x_75); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -uint8 x_77; -x_77 = !lean::is_exclusive(x_36); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; uint8 x_80; -x_78 = lean::cnstr_get(x_36, 3); -lean::dec(x_78); -x_79 = lean::cnstr_get(x_36, 0); -lean::dec(x_79); -x_80 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_80); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_81; obj* x_82; uint8 x_83; obj* x_84; -x_81 = lean::cnstr_get(x_36, 1); -x_82 = lean::cnstr_get(x_36, 2); -lean::inc(x_82); -lean::inc(x_81); -lean::dec(x_36); -x_83 = 0; -x_84 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_84, 0, x_37); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_82); -lean::cnstr_set(x_84, 3, x_38); -lean::cnstr_set_scalar(x_84, sizeof(void*)*4, x_83); -lean::cnstr_set(x_1, 3, x_84); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -} -} -else -{ -uint8 x_85; -x_85 = lean::cnstr_get_scalar(x_37, sizeof(void*)*4); -if (x_85 == 0) -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_36); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_36, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_37); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint8 x_93; -x_89 = lean::cnstr_get(x_37, 0); -x_90 = lean::cnstr_get(x_37, 1); -x_91 = lean::cnstr_get(x_37, 2); -x_92 = lean::cnstr_get(x_37, 3); -x_93 = 1; -lean::cnstr_set(x_37, 3, x_89); -lean::cnstr_set(x_37, 2, x_30); -lean::cnstr_set(x_37, 1, x_29); -lean::cnstr_set(x_37, 0, x_28); -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_93); -lean::cnstr_set(x_36, 0, x_92); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_91); -lean::cnstr_set(x_1, 1, x_90); -lean::cnstr_set(x_1, 0, x_37); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; uint8 x_98; obj* x_99; -x_94 = lean::cnstr_get(x_37, 0); -x_95 = lean::cnstr_get(x_37, 1); -x_96 = lean::cnstr_get(x_37, 2); -x_97 = lean::cnstr_get(x_37, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_37); -x_98 = 1; -x_99 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_29); -lean::cnstr_set(x_99, 2, x_30); -lean::cnstr_set(x_99, 3, x_94); -lean::cnstr_set_scalar(x_99, sizeof(void*)*4, x_98); -lean::cnstr_set(x_36, 0, x_97); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_98); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_96); -lean::cnstr_set(x_1, 1, x_95); -lean::cnstr_set(x_1, 0, x_99); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; obj* x_110; -x_100 = lean::cnstr_get(x_36, 1); -x_101 = lean::cnstr_get(x_36, 2); -x_102 = lean::cnstr_get(x_36, 3); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_36); -x_103 = lean::cnstr_get(x_37, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_37, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_37, 2); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_37, 3); -lean::inc(x_106); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_107 = x_37; -} else { - lean::dec_ref(x_37); - x_107 = lean::box(0); -} -x_108 = 1; -if (lean::is_scalar(x_107)) { - x_109 = lean::alloc_cnstr(1, 4, 1); -} else { - x_109 = x_107; -} -lean::cnstr_set(x_109, 0, x_28); -lean::cnstr_set(x_109, 1, x_29); -lean::cnstr_set(x_109, 2, x_30); -lean::cnstr_set(x_109, 3, x_103); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -x_110 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_110, 0, x_106); -lean::cnstr_set(x_110, 1, x_100); -lean::cnstr_set(x_110, 2, x_101); -lean::cnstr_set(x_110, 3, x_102); -lean::cnstr_set_scalar(x_110, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_110); -lean::cnstr_set(x_1, 2, x_105); -lean::cnstr_set(x_1, 1, x_104); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_111; -x_111 = lean::cnstr_get(x_36, 3); -lean::inc(x_111); -if (lean::obj_tag(x_111) == 0) -{ -uint8 x_112; -x_112 = !lean::is_exclusive(x_36); -if (x_112 == 0) -{ -obj* x_113; obj* x_114; uint8 x_115; -x_113 = lean::cnstr_get(x_36, 3); -lean::dec(x_113); -x_114 = lean::cnstr_get(x_36, 0); -lean::dec(x_114); -x_115 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_115); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; -x_116 = lean::cnstr_get(x_36, 1); -x_117 = lean::cnstr_get(x_36, 2); -lean::inc(x_117); -lean::inc(x_116); -lean::dec(x_36); -x_118 = 0; -x_119 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_119, 0, x_37); -lean::cnstr_set(x_119, 1, x_116); -lean::cnstr_set(x_119, 2, x_117); -lean::cnstr_set(x_119, 3, x_111); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -uint8 x_120; -x_120 = lean::cnstr_get_scalar(x_111, sizeof(void*)*4); -if (x_120 == 0) -{ -uint8 x_121; -lean::free_heap_obj(x_1); -x_121 = !lean::is_exclusive(x_36); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; uint8 x_124; -x_122 = lean::cnstr_get(x_36, 3); -lean::dec(x_122); -x_123 = lean::cnstr_get(x_36, 0); -lean::dec(x_123); -x_124 = !lean::is_exclusive(x_111); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; uint8 x_129; -x_125 = lean::cnstr_get(x_111, 0); -x_126 = lean::cnstr_get(x_111, 1); -x_127 = lean::cnstr_get(x_111, 2); -x_128 = lean::cnstr_get(x_111, 3); -lean::inc(x_37); -lean::cnstr_set(x_111, 3, x_37); -lean::cnstr_set(x_111, 2, x_30); -lean::cnstr_set(x_111, 1, x_29); -lean::cnstr_set(x_111, 0, x_28); -x_129 = !lean::is_exclusive(x_37); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_130 = lean::cnstr_get(x_37, 3); -lean::dec(x_130); -x_131 = lean::cnstr_get(x_37, 2); -lean::dec(x_131); -x_132 = lean::cnstr_get(x_37, 1); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_37, 0); -lean::dec(x_133); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -lean::cnstr_set(x_37, 3, x_128); -lean::cnstr_set(x_37, 2, x_127); -lean::cnstr_set(x_37, 1, x_126); -lean::cnstr_set(x_37, 0, x_125); -lean::cnstr_set(x_36, 3, x_37); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -else -{ -obj* x_134; -lean::dec(x_37); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -x_134 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_134, 0, x_125); -lean::cnstr_set(x_134, 1, x_126); -lean::cnstr_set(x_134, 2, x_127); -lean::cnstr_set(x_134, 3, x_128); -lean::cnstr_set_scalar(x_134, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_134); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_135 = lean::cnstr_get(x_111, 0); -x_136 = lean::cnstr_get(x_111, 1); -x_137 = lean::cnstr_get(x_111, 2); -x_138 = lean::cnstr_get(x_111, 3); -lean::inc(x_138); -lean::inc(x_137); -lean::inc(x_136); -lean::inc(x_135); -lean::dec(x_111); -lean::inc(x_37); -x_139 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_139, 0, x_28); -lean::cnstr_set(x_139, 1, x_29); -lean::cnstr_set(x_139, 2, x_30); -lean::cnstr_set(x_139, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_140 = x_37; -} else { - lean::dec_ref(x_37); - x_140 = lean::box(0); -} -lean::cnstr_set_scalar(x_139, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(1, 4, 1); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_135); -lean::cnstr_set(x_141, 1, x_136); -lean::cnstr_set(x_141, 2, x_137); -lean::cnstr_set(x_141, 3, x_138); -lean::cnstr_set_scalar(x_141, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_141); -lean::cnstr_set(x_36, 0, x_139); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_142 = lean::cnstr_get(x_36, 1); -x_143 = lean::cnstr_get(x_36, 2); -lean::inc(x_143); -lean::inc(x_142); -lean::dec(x_36); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_111, 1); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_111, 2); -lean::inc(x_146); -x_147 = lean::cnstr_get(x_111, 3); -lean::inc(x_147); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - lean::cnstr_release(x_111, 2); - lean::cnstr_release(x_111, 3); - x_148 = x_111; -} else { - lean::dec_ref(x_111); - x_148 = lean::box(0); -} -lean::inc(x_37); -if (lean::is_scalar(x_148)) { - x_149 = lean::alloc_cnstr(1, 4, 1); -} else { - x_149 = x_148; -} -lean::cnstr_set(x_149, 0, x_28); -lean::cnstr_set(x_149, 1, x_29); -lean::cnstr_set(x_149, 2, x_30); -lean::cnstr_set(x_149, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_150 = x_37; -} else { - lean::dec_ref(x_37); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_144); -lean::cnstr_set(x_151, 1, x_145); -lean::cnstr_set(x_151, 2, x_146); -lean::cnstr_set(x_151, 3, x_147); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_85); -x_152 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_152, 0, x_149); -lean::cnstr_set(x_152, 1, x_142); -lean::cnstr_set(x_152, 2, x_143); -lean::cnstr_set(x_152, 3, x_151); -lean::cnstr_set_scalar(x_152, sizeof(void*)*4, x_120); -return x_152; -} -} -else -{ -uint8 x_153; -x_153 = !lean::is_exclusive(x_36); -if (x_153 == 0) -{ -obj* x_154; obj* x_155; uint8 x_156; -x_154 = lean::cnstr_get(x_36, 3); -lean::dec(x_154); -x_155 = lean::cnstr_get(x_36, 0); -lean::dec(x_155); -x_156 = !lean::is_exclusive(x_37); -if (x_156 == 0) -{ -uint8 x_157; -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_120); -x_157 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_157); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -else -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; uint8 x_163; -x_158 = lean::cnstr_get(x_37, 0); -x_159 = lean::cnstr_get(x_37, 1); -x_160 = lean::cnstr_get(x_37, 2); -x_161 = lean::cnstr_get(x_37, 3); -lean::inc(x_161); -lean::inc(x_160); -lean::inc(x_159); -lean::inc(x_158); -lean::dec(x_37); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_158); -lean::cnstr_set(x_162, 1, x_159); -lean::cnstr_set(x_162, 2, x_160); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_120); -x_163 = 0; -lean::cnstr_set(x_36, 0, x_162); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_163); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; uint8 x_172; obj* x_173; -x_164 = lean::cnstr_get(x_36, 1); -x_165 = lean::cnstr_get(x_36, 2); -lean::inc(x_165); -lean::inc(x_164); -lean::dec(x_36); -x_166 = lean::cnstr_get(x_37, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_37, 1); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_37, 2); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_37, 3); -lean::inc(x_169); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_170 = x_37; -} else { - lean::dec_ref(x_37); - x_170 = lean::box(0); -} -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(1, 4, 1); -} else { - x_171 = x_170; -} -lean::cnstr_set(x_171, 0, x_166); -lean::cnstr_set(x_171, 1, x_167); -lean::cnstr_set(x_171, 2, x_168); -lean::cnstr_set(x_171, 3, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*4, x_120); -x_172 = 0; -x_173 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_173, 0, x_171); -lean::cnstr_set(x_173, 1, x_164); -lean::cnstr_set(x_173, 2, x_165); -lean::cnstr_set(x_173, 3, x_111); -lean::cnstr_set_scalar(x_173, sizeof(void*)*4, x_172); -lean::cnstr_set(x_1, 3, x_173); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_174; -x_174 = l_RBNode_isRed___main___rarg(x_28); -if (x_174 == 0) -{ -obj* x_175; -x_175 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_28, x_2, x_3); -lean::cnstr_set(x_1, 0, x_175); -return x_1; -} -else -{ -obj* x_176; -x_176 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_28, x_2, x_3); -if (lean::obj_tag(x_176) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_31); -lean::dec(x_30); -lean::dec(x_29); -return x_176; -} -else -{ -obj* x_177; -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -if (lean::obj_tag(x_177) == 0) -{ -obj* x_178; -x_178 = lean::cnstr_get(x_176, 3); -lean::inc(x_178); -if (lean::obj_tag(x_178) == 0) -{ -uint8 x_179; -x_179 = !lean::is_exclusive(x_176); -if (x_179 == 0) -{ -obj* x_180; obj* x_181; uint8 x_182; uint8 x_183; -x_180 = lean::cnstr_get(x_176, 3); -lean::dec(x_180); -x_181 = lean::cnstr_get(x_176, 0); -lean::dec(x_181); -x_182 = 0; -lean::cnstr_set(x_176, 0, x_178); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_182); -x_183 = 1; -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_183); -return x_1; -} -else -{ -obj* x_184; obj* x_185; uint8 x_186; obj* x_187; uint8 x_188; -x_184 = lean::cnstr_get(x_176, 1); -x_185 = lean::cnstr_get(x_176, 2); -lean::inc(x_185); -lean::inc(x_184); -lean::dec(x_176); -x_186 = 0; -x_187 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_187, 0, x_178); -lean::cnstr_set(x_187, 1, x_184); -lean::cnstr_set(x_187, 2, x_185); -lean::cnstr_set(x_187, 3, x_178); -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_186); -x_188 = 1; -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_188); -return x_1; -} -} -else -{ -uint8 x_189; -x_189 = lean::cnstr_get_scalar(x_178, sizeof(void*)*4); -if (x_189 == 0) -{ -uint8 x_190; -x_190 = !lean::is_exclusive(x_176); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; uint8 x_195; -x_191 = lean::cnstr_get(x_176, 1); -x_192 = lean::cnstr_get(x_176, 2); -x_193 = lean::cnstr_get(x_176, 3); -lean::dec(x_193); -x_194 = lean::cnstr_get(x_176, 0); -lean::dec(x_194); -x_195 = !lean::is_exclusive(x_178); -if (x_195 == 0) -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; uint8 x_200; -x_196 = lean::cnstr_get(x_178, 0); -x_197 = lean::cnstr_get(x_178, 1); -x_198 = lean::cnstr_get(x_178, 2); -x_199 = lean::cnstr_get(x_178, 3); -x_200 = 1; -lean::cnstr_set(x_178, 3, x_196); -lean::cnstr_set(x_178, 2, x_192); -lean::cnstr_set(x_178, 1, x_191); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set_scalar(x_178, sizeof(void*)*4, x_200); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_199); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_200); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_198); -lean::cnstr_set(x_1, 1, x_197); -lean::cnstr_set(x_1, 0, x_178); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; obj* x_206; -x_201 = lean::cnstr_get(x_178, 0); -x_202 = lean::cnstr_get(x_178, 1); -x_203 = lean::cnstr_get(x_178, 2); -x_204 = lean::cnstr_get(x_178, 3); -lean::inc(x_204); -lean::inc(x_203); -lean::inc(x_202); -lean::inc(x_201); -lean::dec(x_178); -x_205 = 1; -x_206 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_206, 0, x_177); -lean::cnstr_set(x_206, 1, x_191); -lean::cnstr_set(x_206, 2, x_192); -lean::cnstr_set(x_206, 3, x_201); -lean::cnstr_set_scalar(x_206, sizeof(void*)*4, x_205); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_204); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_205); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_203); -lean::cnstr_set(x_1, 1, x_202); -lean::cnstr_set(x_1, 0, x_206); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; -x_207 = lean::cnstr_get(x_176, 1); -x_208 = lean::cnstr_get(x_176, 2); -lean::inc(x_208); -lean::inc(x_207); -lean::dec(x_176); -x_209 = lean::cnstr_get(x_178, 0); -lean::inc(x_209); -x_210 = lean::cnstr_get(x_178, 1); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_178, 2); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_178, 3); -lean::inc(x_212); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - lean::cnstr_release(x_178, 2); - lean::cnstr_release(x_178, 3); - x_213 = x_178; -} else { - lean::dec_ref(x_178); - x_213 = lean::box(0); -} -x_214 = 1; -if (lean::is_scalar(x_213)) { - x_215 = lean::alloc_cnstr(1, 4, 1); -} else { - x_215 = x_213; -} -lean::cnstr_set(x_215, 0, x_177); -lean::cnstr_set(x_215, 1, x_207); -lean::cnstr_set(x_215, 2, x_208); -lean::cnstr_set(x_215, 3, x_209); -lean::cnstr_set_scalar(x_215, sizeof(void*)*4, x_214); -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_212); -lean::cnstr_set(x_216, 1, x_29); -lean::cnstr_set(x_216, 2, x_30); -lean::cnstr_set(x_216, 3, x_31); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_214); -lean::cnstr_set(x_1, 3, x_216); -lean::cnstr_set(x_1, 2, x_211); -lean::cnstr_set(x_1, 1, x_210); -lean::cnstr_set(x_1, 0, x_215); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -uint8 x_217; -x_217 = !lean::is_exclusive(x_176); -if (x_217 == 0) -{ -obj* x_218; obj* x_219; uint8 x_220; -x_218 = lean::cnstr_get(x_176, 3); -lean::dec(x_218); -x_219 = lean::cnstr_get(x_176, 0); -lean::dec(x_219); -x_220 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_220); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_221; obj* x_222; uint8 x_223; obj* x_224; -x_221 = lean::cnstr_get(x_176, 1); -x_222 = lean::cnstr_get(x_176, 2); -lean::inc(x_222); -lean::inc(x_221); -lean::dec(x_176); -x_223 = 0; -x_224 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_224, 0, x_177); -lean::cnstr_set(x_224, 1, x_221); -lean::cnstr_set(x_224, 2, x_222); -lean::cnstr_set(x_224, 3, x_178); -lean::cnstr_set_scalar(x_224, sizeof(void*)*4, x_223); -lean::cnstr_set(x_1, 0, x_224); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -} -} -else -{ -uint8 x_225; -x_225 = lean::cnstr_get_scalar(x_177, sizeof(void*)*4); -if (x_225 == 0) -{ -uint8 x_226; -x_226 = !lean::is_exclusive(x_176); -if (x_226 == 0) -{ -obj* x_227; obj* x_228; obj* x_229; obj* x_230; uint8 x_231; -x_227 = lean::cnstr_get(x_176, 1); -x_228 = lean::cnstr_get(x_176, 2); -x_229 = lean::cnstr_get(x_176, 3); -x_230 = lean::cnstr_get(x_176, 0); -lean::dec(x_230); -x_231 = !lean::is_exclusive(x_177); -if (x_231 == 0) -{ -uint8 x_232; -x_232 = 1; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_232); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_232); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_177); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; uint8 x_237; obj* x_238; -x_233 = lean::cnstr_get(x_177, 0); -x_234 = lean::cnstr_get(x_177, 1); -x_235 = lean::cnstr_get(x_177, 2); -x_236 = lean::cnstr_get(x_177, 3); -lean::inc(x_236); -lean::inc(x_235); -lean::inc(x_234); -lean::inc(x_233); -lean::dec(x_177); -x_237 = 1; -x_238 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_238, 0, x_233); -lean::cnstr_set(x_238, 1, x_234); -lean::cnstr_set(x_238, 2, x_235); -lean::cnstr_set(x_238, 3, x_236); -lean::cnstr_set_scalar(x_238, sizeof(void*)*4, x_237); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_237); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_238); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; obj* x_249; -x_239 = lean::cnstr_get(x_176, 1); -x_240 = lean::cnstr_get(x_176, 2); -x_241 = lean::cnstr_get(x_176, 3); -lean::inc(x_241); -lean::inc(x_240); -lean::inc(x_239); -lean::dec(x_176); -x_242 = lean::cnstr_get(x_177, 0); -lean::inc(x_242); -x_243 = lean::cnstr_get(x_177, 1); -lean::inc(x_243); -x_244 = lean::cnstr_get(x_177, 2); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_177, 3); -lean::inc(x_245); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_246 = x_177; -} else { - lean::dec_ref(x_177); - x_246 = lean::box(0); -} -x_247 = 1; -if (lean::is_scalar(x_246)) { - x_248 = lean::alloc_cnstr(1, 4, 1); -} else { - x_248 = x_246; -} -lean::cnstr_set(x_248, 0, x_242); -lean::cnstr_set(x_248, 1, x_243); -lean::cnstr_set(x_248, 2, x_244); -lean::cnstr_set(x_248, 3, x_245); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -x_249 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_249, 0, x_241); -lean::cnstr_set(x_249, 1, x_29); -lean::cnstr_set(x_249, 2, x_30); -lean::cnstr_set(x_249, 3, x_31); -lean::cnstr_set_scalar(x_249, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_249); -lean::cnstr_set(x_1, 2, x_240); -lean::cnstr_set(x_1, 1, x_239); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_250; -x_250 = lean::cnstr_get(x_176, 3); -lean::inc(x_250); -if (lean::obj_tag(x_250) == 0) -{ -uint8 x_251; -x_251 = !lean::is_exclusive(x_176); -if (x_251 == 0) -{ -obj* x_252; obj* x_253; uint8 x_254; -x_252 = lean::cnstr_get(x_176, 3); -lean::dec(x_252); -x_253 = lean::cnstr_get(x_176, 0); -lean::dec(x_253); -x_254 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_254); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_255; obj* x_256; uint8 x_257; obj* x_258; -x_255 = lean::cnstr_get(x_176, 1); -x_256 = lean::cnstr_get(x_176, 2); -lean::inc(x_256); -lean::inc(x_255); -lean::dec(x_176); -x_257 = 0; -x_258 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_258, 0, x_177); -lean::cnstr_set(x_258, 1, x_255); -lean::cnstr_set(x_258, 2, x_256); -lean::cnstr_set(x_258, 3, x_250); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -uint8 x_259; -x_259 = lean::cnstr_get_scalar(x_250, sizeof(void*)*4); -if (x_259 == 0) -{ -uint8 x_260; -lean::free_heap_obj(x_1); -x_260 = !lean::is_exclusive(x_176); -if (x_260 == 0) -{ -obj* x_261; obj* x_262; obj* x_263; obj* x_264; uint8 x_265; -x_261 = lean::cnstr_get(x_176, 1); -x_262 = lean::cnstr_get(x_176, 2); -x_263 = lean::cnstr_get(x_176, 3); -lean::dec(x_263); -x_264 = lean::cnstr_get(x_176, 0); -lean::dec(x_264); -x_265 = !lean::is_exclusive(x_250); -if (x_265 == 0) -{ -obj* x_266; obj* x_267; obj* x_268; obj* x_269; uint8 x_270; -x_266 = lean::cnstr_get(x_250, 0); -x_267 = lean::cnstr_get(x_250, 1); -x_268 = lean::cnstr_get(x_250, 2); -x_269 = lean::cnstr_get(x_250, 3); -lean::inc(x_177); -lean::cnstr_set(x_250, 3, x_266); -lean::cnstr_set(x_250, 2, x_262); -lean::cnstr_set(x_250, 1, x_261); -lean::cnstr_set(x_250, 0, x_177); -x_270 = !lean::is_exclusive(x_177); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; -x_271 = lean::cnstr_get(x_177, 3); -lean::dec(x_271); -x_272 = lean::cnstr_get(x_177, 2); -lean::dec(x_272); -x_273 = lean::cnstr_get(x_177, 1); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_177, 0); -lean::dec(x_274); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -lean::cnstr_set(x_177, 3, x_31); -lean::cnstr_set(x_177, 2, x_30); -lean::cnstr_set(x_177, 1, x_29); -lean::cnstr_set(x_177, 0, x_269); -lean::cnstr_set(x_176, 3, x_177); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -else -{ -obj* x_275; -lean::dec(x_177); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -x_275 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_275, 0, x_269); -lean::cnstr_set(x_275, 1, x_29); -lean::cnstr_set(x_275, 2, x_30); -lean::cnstr_set(x_275, 3, x_31); -lean::cnstr_set_scalar(x_275, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_275); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -x_276 = lean::cnstr_get(x_250, 0); -x_277 = lean::cnstr_get(x_250, 1); -x_278 = lean::cnstr_get(x_250, 2); -x_279 = lean::cnstr_get(x_250, 3); -lean::inc(x_279); -lean::inc(x_278); -lean::inc(x_277); -lean::inc(x_276); -lean::dec(x_250); -lean::inc(x_177); -x_280 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_280, 0, x_177); -lean::cnstr_set(x_280, 1, x_261); -lean::cnstr_set(x_280, 2, x_262); -lean::cnstr_set(x_280, 3, x_276); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_281 = x_177; -} else { - lean::dec_ref(x_177); - x_281 = lean::box(0); -} -lean::cnstr_set_scalar(x_280, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_281)) { - x_282 = lean::alloc_cnstr(1, 4, 1); -} else { - x_282 = x_281; -} -lean::cnstr_set(x_282, 0, x_279); -lean::cnstr_set(x_282, 1, x_29); -lean::cnstr_set(x_282, 2, x_30); -lean::cnstr_set(x_282, 3, x_31); -lean::cnstr_set_scalar(x_282, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_282); -lean::cnstr_set(x_176, 2, x_278); -lean::cnstr_set(x_176, 1, x_277); -lean::cnstr_set(x_176, 0, x_280); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_283 = lean::cnstr_get(x_176, 1); -x_284 = lean::cnstr_get(x_176, 2); -lean::inc(x_284); -lean::inc(x_283); -lean::dec(x_176); -x_285 = lean::cnstr_get(x_250, 0); -lean::inc(x_285); -x_286 = lean::cnstr_get(x_250, 1); -lean::inc(x_286); -x_287 = lean::cnstr_get(x_250, 2); -lean::inc(x_287); -x_288 = lean::cnstr_get(x_250, 3); -lean::inc(x_288); -if (lean::is_exclusive(x_250)) { - lean::cnstr_release(x_250, 0); - lean::cnstr_release(x_250, 1); - lean::cnstr_release(x_250, 2); - lean::cnstr_release(x_250, 3); - x_289 = x_250; -} else { - lean::dec_ref(x_250); - x_289 = lean::box(0); -} -lean::inc(x_177); -if (lean::is_scalar(x_289)) { - x_290 = lean::alloc_cnstr(1, 4, 1); -} else { - x_290 = x_289; -} -lean::cnstr_set(x_290, 0, x_177); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_285); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_291 = x_177; -} else { - lean::dec_ref(x_177); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_288); -lean::cnstr_set(x_292, 1, x_29); -lean::cnstr_set(x_292, 2, x_30); -lean::cnstr_set(x_292, 3, x_31); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_225); -x_293 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_293, 0, x_290); -lean::cnstr_set(x_293, 1, x_286); -lean::cnstr_set(x_293, 2, x_287); -lean::cnstr_set(x_293, 3, x_292); -lean::cnstr_set_scalar(x_293, sizeof(void*)*4, x_259); -return x_293; -} -} -else -{ -uint8 x_294; -x_294 = !lean::is_exclusive(x_176); -if (x_294 == 0) -{ -obj* x_295; obj* x_296; uint8 x_297; -x_295 = lean::cnstr_get(x_176, 3); -lean::dec(x_295); -x_296 = lean::cnstr_get(x_176, 0); -lean::dec(x_296); -x_297 = !lean::is_exclusive(x_177); -if (x_297 == 0) -{ -uint8 x_298; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_259); -x_298 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_298); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -else -{ -obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; uint8 x_304; -x_299 = lean::cnstr_get(x_177, 0); -x_300 = lean::cnstr_get(x_177, 1); -x_301 = lean::cnstr_get(x_177, 2); -x_302 = lean::cnstr_get(x_177, 3); -lean::inc(x_302); -lean::inc(x_301); -lean::inc(x_300); -lean::inc(x_299); -lean::dec(x_177); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_299); -lean::cnstr_set(x_303, 1, x_300); -lean::cnstr_set(x_303, 2, x_301); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_259); -x_304 = 0; -lean::cnstr_set(x_176, 0, x_303); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_304); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -else -{ -obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; uint8 x_313; obj* x_314; -x_305 = lean::cnstr_get(x_176, 1); -x_306 = lean::cnstr_get(x_176, 2); -lean::inc(x_306); -lean::inc(x_305); -lean::dec(x_176); -x_307 = lean::cnstr_get(x_177, 0); -lean::inc(x_307); -x_308 = lean::cnstr_get(x_177, 1); -lean::inc(x_308); -x_309 = lean::cnstr_get(x_177, 2); -lean::inc(x_309); -x_310 = lean::cnstr_get(x_177, 3); -lean::inc(x_310); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_311 = x_177; -} else { - lean::dec_ref(x_177); - x_311 = lean::box(0); -} -if (lean::is_scalar(x_311)) { - x_312 = lean::alloc_cnstr(1, 4, 1); -} else { - x_312 = x_311; -} -lean::cnstr_set(x_312, 0, x_307); -lean::cnstr_set(x_312, 1, x_308); -lean::cnstr_set(x_312, 2, x_309); -lean::cnstr_set(x_312, 3, x_310); -lean::cnstr_set_scalar(x_312, sizeof(void*)*4, x_259); -x_313 = 0; -x_314 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_314, 0, x_312); -lean::cnstr_set(x_314, 1, x_305); -lean::cnstr_set(x_314, 2, x_306); -lean::cnstr_set(x_314, 3, x_250); -lean::cnstr_set_scalar(x_314, sizeof(void*)*4, x_313); -lean::cnstr_set(x_1, 0, x_314); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; uint8 x_319; -x_315 = lean::cnstr_get(x_1, 0); -x_316 = lean::cnstr_get(x_1, 1); -x_317 = lean::cnstr_get(x_1, 2); -x_318 = lean::cnstr_get(x_1, 3); -lean::inc(x_318); -lean::inc(x_317); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_1); -x_319 = l_Lean_Name_quickLt(x_2, x_316); -if (x_319 == 0) -{ -uint8 x_320; -x_320 = l_Lean_Name_quickLt(x_316, x_2); -if (x_320 == 0) -{ -obj* x_321; -lean::dec(x_317); -lean::dec(x_316); -x_321 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_321, 0, x_315); -lean::cnstr_set(x_321, 1, x_2); -lean::cnstr_set(x_321, 2, x_3); -lean::cnstr_set(x_321, 3, x_318); -lean::cnstr_set_scalar(x_321, sizeof(void*)*4, x_6); -return x_321; -} -else -{ -uint8 x_322; -x_322 = l_RBNode_isRed___main___rarg(x_318); -if (x_322 == 0) -{ -obj* x_323; obj* x_324; -x_323 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_318, x_2, x_3); -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_315); -lean::cnstr_set(x_324, 1, x_316); -lean::cnstr_set(x_324, 2, x_317); -lean::cnstr_set(x_324, 3, x_323); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_6); -return x_324; -} -else -{ -obj* x_325; -x_325 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_318, x_2, x_3); -if (lean::obj_tag(x_325) == 0) -{ -lean::dec(x_317); -lean::dec(x_316); -lean::dec(x_315); -return x_325; -} -else -{ -obj* x_326; -x_326 = lean::cnstr_get(x_325, 0); -lean::inc(x_326); -if (lean::obj_tag(x_326) == 0) -{ -obj* x_327; -x_327 = lean::cnstr_get(x_325, 3); -lean::inc(x_327); -if (lean::obj_tag(x_327) == 0) -{ -obj* x_328; obj* x_329; obj* x_330; uint8 x_331; obj* x_332; uint8 x_333; obj* x_334; -x_328 = lean::cnstr_get(x_325, 1); -lean::inc(x_328); -x_329 = lean::cnstr_get(x_325, 2); -lean::inc(x_329); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_330 = x_325; -} else { - lean::dec_ref(x_325); - x_330 = lean::box(0); -} -x_331 = 0; -if (lean::is_scalar(x_330)) { - x_332 = lean::alloc_cnstr(1, 4, 1); -} else { - x_332 = x_330; -} -lean::cnstr_set(x_332, 0, x_327); -lean::cnstr_set(x_332, 1, x_328); -lean::cnstr_set(x_332, 2, x_329); -lean::cnstr_set(x_332, 3, x_327); -lean::cnstr_set_scalar(x_332, sizeof(void*)*4, x_331); -x_333 = 1; -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_315); -lean::cnstr_set(x_334, 1, x_316); -lean::cnstr_set(x_334, 2, x_317); -lean::cnstr_set(x_334, 3, x_332); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_333); -return x_334; -} -else -{ -uint8 x_335; -x_335 = lean::cnstr_get_scalar(x_327, sizeof(void*)*4); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; obj* x_346; obj* x_347; -x_336 = lean::cnstr_get(x_325, 1); -lean::inc(x_336); -x_337 = lean::cnstr_get(x_325, 2); -lean::inc(x_337); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_338 = x_325; -} else { - lean::dec_ref(x_325); - x_338 = lean::box(0); -} -x_339 = lean::cnstr_get(x_327, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get(x_327, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_327, 2); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_327, 3); -lean::inc(x_342); -if (lean::is_exclusive(x_327)) { - lean::cnstr_release(x_327, 0); - lean::cnstr_release(x_327, 1); - lean::cnstr_release(x_327, 2); - lean::cnstr_release(x_327, 3); - x_343 = x_327; -} else { - lean::dec_ref(x_327); - x_343 = lean::box(0); -} -x_344 = 1; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_315); -lean::cnstr_set(x_345, 1, x_316); -lean::cnstr_set(x_345, 2, x_317); -lean::cnstr_set(x_345, 3, x_326); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -if (lean::is_scalar(x_338)) { - x_346 = lean::alloc_cnstr(1, 4, 1); -} else { - x_346 = x_338; -} -lean::cnstr_set(x_346, 0, x_339); -lean::cnstr_set(x_346, 1, x_340); -lean::cnstr_set(x_346, 2, x_341); -lean::cnstr_set(x_346, 3, x_342); -lean::cnstr_set_scalar(x_346, sizeof(void*)*4, x_344); -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_345); -lean::cnstr_set(x_347, 1, x_336); -lean::cnstr_set(x_347, 2, x_337); -lean::cnstr_set(x_347, 3, x_346); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_335); -return x_347; -} -else -{ -obj* x_348; obj* x_349; obj* x_350; uint8 x_351; obj* x_352; obj* x_353; -x_348 = lean::cnstr_get(x_325, 1); -lean::inc(x_348); -x_349 = lean::cnstr_get(x_325, 2); -lean::inc(x_349); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_350 = x_325; -} else { - lean::dec_ref(x_325); - x_350 = lean::box(0); -} -x_351 = 0; -if (lean::is_scalar(x_350)) { - x_352 = lean::alloc_cnstr(1, 4, 1); -} else { - x_352 = x_350; -} -lean::cnstr_set(x_352, 0, x_326); -lean::cnstr_set(x_352, 1, x_348); -lean::cnstr_set(x_352, 2, x_349); -lean::cnstr_set(x_352, 3, x_327); -lean::cnstr_set_scalar(x_352, sizeof(void*)*4, x_351); -x_353 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_353, 0, x_315); -lean::cnstr_set(x_353, 1, x_316); -lean::cnstr_set(x_353, 2, x_317); -lean::cnstr_set(x_353, 3, x_352); -lean::cnstr_set_scalar(x_353, sizeof(void*)*4, x_335); -return x_353; -} -} -} -else -{ -uint8 x_354; -x_354 = lean::cnstr_get_scalar(x_326, sizeof(void*)*4); -if (x_354 == 0) -{ -obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; obj* x_367; -x_355 = lean::cnstr_get(x_325, 1); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_325, 2); -lean::inc(x_356); -x_357 = lean::cnstr_get(x_325, 3); -lean::inc(x_357); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_358 = x_325; -} else { - lean::dec_ref(x_325); - x_358 = lean::box(0); -} -x_359 = lean::cnstr_get(x_326, 0); -lean::inc(x_359); -x_360 = lean::cnstr_get(x_326, 1); -lean::inc(x_360); -x_361 = lean::cnstr_get(x_326, 2); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_326, 3); -lean::inc(x_362); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_363 = x_326; -} else { - lean::dec_ref(x_326); - x_363 = lean::box(0); -} -x_364 = 1; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_315); -lean::cnstr_set(x_365, 1, x_316); -lean::cnstr_set(x_365, 2, x_317); -lean::cnstr_set(x_365, 3, x_359); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -if (lean::is_scalar(x_358)) { - x_366 = lean::alloc_cnstr(1, 4, 1); -} else { - x_366 = x_358; -} -lean::cnstr_set(x_366, 0, x_362); -lean::cnstr_set(x_366, 1, x_355); -lean::cnstr_set(x_366, 2, x_356); -lean::cnstr_set(x_366, 3, x_357); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_364); -x_367 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_360); -lean::cnstr_set(x_367, 2, x_361); -lean::cnstr_set(x_367, 3, x_366); -lean::cnstr_set_scalar(x_367, sizeof(void*)*4, x_354); -return x_367; -} -else -{ -obj* x_368; -x_368 = lean::cnstr_get(x_325, 3); -lean::inc(x_368); -if (lean::obj_tag(x_368) == 0) -{ -obj* x_369; obj* x_370; obj* x_371; uint8 x_372; obj* x_373; obj* x_374; -x_369 = lean::cnstr_get(x_325, 1); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_325, 2); -lean::inc(x_370); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_371 = x_325; -} else { - lean::dec_ref(x_325); - x_371 = lean::box(0); -} -x_372 = 0; -if (lean::is_scalar(x_371)) { - x_373 = lean::alloc_cnstr(1, 4, 1); -} else { - x_373 = x_371; -} -lean::cnstr_set(x_373, 0, x_326); -lean::cnstr_set(x_373, 1, x_369); -lean::cnstr_set(x_373, 2, x_370); -lean::cnstr_set(x_373, 3, x_368); -lean::cnstr_set_scalar(x_373, sizeof(void*)*4, x_372); -x_374 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_374, 0, x_315); -lean::cnstr_set(x_374, 1, x_316); -lean::cnstr_set(x_374, 2, x_317); -lean::cnstr_set(x_374, 3, x_373); -lean::cnstr_set_scalar(x_374, sizeof(void*)*4, x_354); -return x_374; -} -else -{ -uint8 x_375; -x_375 = lean::cnstr_get_scalar(x_368, sizeof(void*)*4); -if (x_375 == 0) -{ -obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; -x_376 = lean::cnstr_get(x_325, 1); -lean::inc(x_376); -x_377 = lean::cnstr_get(x_325, 2); -lean::inc(x_377); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_378 = x_325; -} else { - lean::dec_ref(x_325); - x_378 = lean::box(0); -} -x_379 = lean::cnstr_get(x_368, 0); -lean::inc(x_379); -x_380 = lean::cnstr_get(x_368, 1); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_368, 2); -lean::inc(x_381); -x_382 = lean::cnstr_get(x_368, 3); -lean::inc(x_382); -if (lean::is_exclusive(x_368)) { - lean::cnstr_release(x_368, 0); - lean::cnstr_release(x_368, 1); - lean::cnstr_release(x_368, 2); - lean::cnstr_release(x_368, 3); - x_383 = x_368; -} else { - lean::dec_ref(x_368); - x_383 = lean::box(0); -} -lean::inc(x_326); -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(1, 4, 1); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_315); -lean::cnstr_set(x_384, 1, x_316); -lean::cnstr_set(x_384, 2, x_317); -lean::cnstr_set(x_384, 3, x_326); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_385 = x_326; -} else { - lean::dec_ref(x_326); - x_385 = lean::box(0); -} -lean::cnstr_set_scalar(x_384, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_385)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_385; -} -lean::cnstr_set(x_386, 0, x_379); -lean::cnstr_set(x_386, 1, x_380); -lean::cnstr_set(x_386, 2, x_381); -lean::cnstr_set(x_386, 3, x_382); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_378)) { - x_387 = lean::alloc_cnstr(1, 4, 1); -} else { - x_387 = x_378; -} -lean::cnstr_set(x_387, 0, x_384); -lean::cnstr_set(x_387, 1, x_376); -lean::cnstr_set(x_387, 2, x_377); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_375); -return x_387; -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; uint8 x_397; obj* x_398; obj* x_399; -x_388 = lean::cnstr_get(x_325, 1); -lean::inc(x_388); -x_389 = lean::cnstr_get(x_325, 2); -lean::inc(x_389); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_390 = x_325; -} else { - lean::dec_ref(x_325); - x_390 = lean::box(0); -} -x_391 = lean::cnstr_get(x_326, 0); -lean::inc(x_391); -x_392 = lean::cnstr_get(x_326, 1); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_326, 2); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_326, 3); -lean::inc(x_394); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_395 = x_326; -} else { - lean::dec_ref(x_326); - x_395 = lean::box(0); -} -if (lean::is_scalar(x_395)) { - x_396 = lean::alloc_cnstr(1, 4, 1); -} else { - x_396 = x_395; -} -lean::cnstr_set(x_396, 0, x_391); -lean::cnstr_set(x_396, 1, x_392); -lean::cnstr_set(x_396, 2, x_393); -lean::cnstr_set(x_396, 3, x_394); -lean::cnstr_set_scalar(x_396, sizeof(void*)*4, x_375); -x_397 = 0; -if (lean::is_scalar(x_390)) { - x_398 = lean::alloc_cnstr(1, 4, 1); -} else { - x_398 = x_390; -} -lean::cnstr_set(x_398, 0, x_396); -lean::cnstr_set(x_398, 1, x_388); -lean::cnstr_set(x_398, 2, x_389); -lean::cnstr_set(x_398, 3, x_368); -lean::cnstr_set_scalar(x_398, sizeof(void*)*4, x_397); -x_399 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_399, 0, x_315); -lean::cnstr_set(x_399, 1, x_316); -lean::cnstr_set(x_399, 2, x_317); -lean::cnstr_set(x_399, 3, x_398); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_375); -return x_399; -} -} -} -} -} -} -} -} -else -{ -uint8 x_400; -x_400 = l_RBNode_isRed___main___rarg(x_315); -if (x_400 == 0) -{ -obj* x_401; obj* x_402; -x_401 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_315, x_2, x_3); -x_402 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_402, 0, x_401); -lean::cnstr_set(x_402, 1, x_316); -lean::cnstr_set(x_402, 2, x_317); -lean::cnstr_set(x_402, 3, x_318); -lean::cnstr_set_scalar(x_402, sizeof(void*)*4, x_6); -return x_402; -} -else -{ -obj* x_403; -x_403 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_315, x_2, x_3); -if (lean::obj_tag(x_403) == 0) -{ -lean::dec(x_318); -lean::dec(x_317); -lean::dec(x_316); -return x_403; -} -else -{ -obj* x_404; -x_404 = lean::cnstr_get(x_403, 0); -lean::inc(x_404); -if (lean::obj_tag(x_404) == 0) -{ -obj* x_405; -x_405 = lean::cnstr_get(x_403, 3); -lean::inc(x_405); -if (lean::obj_tag(x_405) == 0) -{ -obj* x_406; obj* x_407; obj* x_408; uint8 x_409; obj* x_410; uint8 x_411; obj* x_412; -x_406 = lean::cnstr_get(x_403, 1); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_403, 2); -lean::inc(x_407); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_408 = x_403; -} else { - lean::dec_ref(x_403); - x_408 = lean::box(0); -} -x_409 = 0; -if (lean::is_scalar(x_408)) { - x_410 = lean::alloc_cnstr(1, 4, 1); -} else { - x_410 = x_408; -} -lean::cnstr_set(x_410, 0, x_405); -lean::cnstr_set(x_410, 1, x_406); -lean::cnstr_set(x_410, 2, x_407); -lean::cnstr_set(x_410, 3, x_405); -lean::cnstr_set_scalar(x_410, sizeof(void*)*4, x_409); -x_411 = 1; -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_410); -lean::cnstr_set(x_412, 1, x_316); -lean::cnstr_set(x_412, 2, x_317); -lean::cnstr_set(x_412, 3, x_318); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_411); -return x_412; -} -else -{ -uint8 x_413; -x_413 = lean::cnstr_get_scalar(x_405, sizeof(void*)*4); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; obj* x_424; obj* x_425; -x_414 = lean::cnstr_get(x_403, 1); -lean::inc(x_414); -x_415 = lean::cnstr_get(x_403, 2); -lean::inc(x_415); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_416 = x_403; -} else { - lean::dec_ref(x_403); - x_416 = lean::box(0); -} -x_417 = lean::cnstr_get(x_405, 0); -lean::inc(x_417); -x_418 = lean::cnstr_get(x_405, 1); -lean::inc(x_418); -x_419 = lean::cnstr_get(x_405, 2); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_405, 3); -lean::inc(x_420); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - lean::cnstr_release(x_405, 2); - lean::cnstr_release(x_405, 3); - x_421 = x_405; -} else { - lean::dec_ref(x_405); - x_421 = lean::box(0); -} -x_422 = 1; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_404); -lean::cnstr_set(x_423, 1, x_414); -lean::cnstr_set(x_423, 2, x_415); -lean::cnstr_set(x_423, 3, x_417); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -if (lean::is_scalar(x_416)) { - x_424 = lean::alloc_cnstr(1, 4, 1); -} else { - x_424 = x_416; -} -lean::cnstr_set(x_424, 0, x_420); -lean::cnstr_set(x_424, 1, x_316); -lean::cnstr_set(x_424, 2, x_317); -lean::cnstr_set(x_424, 3, x_318); -lean::cnstr_set_scalar(x_424, sizeof(void*)*4, x_422); -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_418); -lean::cnstr_set(x_425, 2, x_419); -lean::cnstr_set(x_425, 3, x_424); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_413); -return x_425; -} -else -{ -obj* x_426; obj* x_427; obj* x_428; uint8 x_429; obj* x_430; obj* x_431; -x_426 = lean::cnstr_get(x_403, 1); -lean::inc(x_426); -x_427 = lean::cnstr_get(x_403, 2); -lean::inc(x_427); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_428 = x_403; -} else { - lean::dec_ref(x_403); - x_428 = lean::box(0); -} -x_429 = 0; -if (lean::is_scalar(x_428)) { - x_430 = lean::alloc_cnstr(1, 4, 1); -} else { - x_430 = x_428; -} -lean::cnstr_set(x_430, 0, x_404); -lean::cnstr_set(x_430, 1, x_426); -lean::cnstr_set(x_430, 2, x_427); -lean::cnstr_set(x_430, 3, x_405); -lean::cnstr_set_scalar(x_430, sizeof(void*)*4, x_429); -x_431 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_431, 0, x_430); -lean::cnstr_set(x_431, 1, x_316); -lean::cnstr_set(x_431, 2, x_317); -lean::cnstr_set(x_431, 3, x_318); -lean::cnstr_set_scalar(x_431, sizeof(void*)*4, x_413); -return x_431; -} -} -} -else -{ -uint8 x_432; -x_432 = lean::cnstr_get_scalar(x_404, sizeof(void*)*4); -if (x_432 == 0) -{ -obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; obj* x_445; -x_433 = lean::cnstr_get(x_403, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_403, 2); -lean::inc(x_434); -x_435 = lean::cnstr_get(x_403, 3); -lean::inc(x_435); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_436 = x_403; -} else { - lean::dec_ref(x_403); - x_436 = lean::box(0); -} -x_437 = lean::cnstr_get(x_404, 0); -lean::inc(x_437); -x_438 = lean::cnstr_get(x_404, 1); -lean::inc(x_438); -x_439 = lean::cnstr_get(x_404, 2); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_404, 3); -lean::inc(x_440); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_441 = x_404; -} else { - lean::dec_ref(x_404); - x_441 = lean::box(0); -} -x_442 = 1; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_437); -lean::cnstr_set(x_443, 1, x_438); -lean::cnstr_set(x_443, 2, x_439); -lean::cnstr_set(x_443, 3, x_440); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -if (lean::is_scalar(x_436)) { - x_444 = lean::alloc_cnstr(1, 4, 1); -} else { - x_444 = x_436; -} -lean::cnstr_set(x_444, 0, x_435); -lean::cnstr_set(x_444, 1, x_316); -lean::cnstr_set(x_444, 2, x_317); -lean::cnstr_set(x_444, 3, x_318); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_442); -x_445 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_445, 0, x_443); -lean::cnstr_set(x_445, 1, x_433); -lean::cnstr_set(x_445, 2, x_434); -lean::cnstr_set(x_445, 3, x_444); -lean::cnstr_set_scalar(x_445, sizeof(void*)*4, x_432); -return x_445; -} -else -{ -obj* x_446; -x_446 = lean::cnstr_get(x_403, 3); -lean::inc(x_446); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; uint8 x_450; obj* x_451; obj* x_452; -x_447 = lean::cnstr_get(x_403, 1); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_403, 2); -lean::inc(x_448); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_449 = x_403; -} else { - lean::dec_ref(x_403); - x_449 = lean::box(0); -} -x_450 = 0; -if (lean::is_scalar(x_449)) { - x_451 = lean::alloc_cnstr(1, 4, 1); -} else { - x_451 = x_449; -} -lean::cnstr_set(x_451, 0, x_404); -lean::cnstr_set(x_451, 1, x_447); -lean::cnstr_set(x_451, 2, x_448); -lean::cnstr_set(x_451, 3, x_446); -lean::cnstr_set_scalar(x_451, sizeof(void*)*4, x_450); -x_452 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_452, 0, x_451); -lean::cnstr_set(x_452, 1, x_316); -lean::cnstr_set(x_452, 2, x_317); -lean::cnstr_set(x_452, 3, x_318); -lean::cnstr_set_scalar(x_452, sizeof(void*)*4, x_432); -return x_452; -} -else -{ -uint8 x_453; -x_453 = lean::cnstr_get_scalar(x_446, sizeof(void*)*4); -if (x_453 == 0) -{ -obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; obj* x_465; -x_454 = lean::cnstr_get(x_403, 1); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_403, 2); -lean::inc(x_455); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_456 = x_403; -} else { - lean::dec_ref(x_403); - x_456 = lean::box(0); -} -x_457 = lean::cnstr_get(x_446, 0); -lean::inc(x_457); -x_458 = lean::cnstr_get(x_446, 1); -lean::inc(x_458); -x_459 = lean::cnstr_get(x_446, 2); -lean::inc(x_459); -x_460 = lean::cnstr_get(x_446, 3); -lean::inc(x_460); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - lean::cnstr_release(x_446, 1); - lean::cnstr_release(x_446, 2); - lean::cnstr_release(x_446, 3); - x_461 = x_446; -} else { - lean::dec_ref(x_446); - x_461 = lean::box(0); -} -lean::inc(x_404); -if (lean::is_scalar(x_461)) { - x_462 = lean::alloc_cnstr(1, 4, 1); -} else { - x_462 = x_461; -} -lean::cnstr_set(x_462, 0, x_404); -lean::cnstr_set(x_462, 1, x_454); -lean::cnstr_set(x_462, 2, x_455); -lean::cnstr_set(x_462, 3, x_457); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_463 = x_404; -} else { - lean::dec_ref(x_404); - x_463 = lean::box(0); -} -lean::cnstr_set_scalar(x_462, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_463)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_463; -} -lean::cnstr_set(x_464, 0, x_460); -lean::cnstr_set(x_464, 1, x_316); -lean::cnstr_set(x_464, 2, x_317); -lean::cnstr_set(x_464, 3, x_318); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_456)) { - x_465 = lean::alloc_cnstr(1, 4, 1); -} else { - x_465 = x_456; -} -lean::cnstr_set(x_465, 0, x_462); -lean::cnstr_set(x_465, 1, x_458); -lean::cnstr_set(x_465, 2, x_459); -lean::cnstr_set(x_465, 3, x_464); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_453); -return x_465; -} -else -{ -obj* x_466; obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; uint8 x_475; obj* x_476; obj* x_477; -x_466 = lean::cnstr_get(x_403, 1); -lean::inc(x_466); -x_467 = lean::cnstr_get(x_403, 2); -lean::inc(x_467); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_468 = x_403; -} else { - lean::dec_ref(x_403); - x_468 = lean::box(0); -} -x_469 = lean::cnstr_get(x_404, 0); -lean::inc(x_469); -x_470 = lean::cnstr_get(x_404, 1); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_404, 2); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_404, 3); -lean::inc(x_472); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_473 = x_404; -} else { - lean::dec_ref(x_404); - x_473 = lean::box(0); -} -if (lean::is_scalar(x_473)) { - x_474 = lean::alloc_cnstr(1, 4, 1); -} else { - x_474 = x_473; -} -lean::cnstr_set(x_474, 0, x_469); -lean::cnstr_set(x_474, 1, x_470); -lean::cnstr_set(x_474, 2, x_471); -lean::cnstr_set(x_474, 3, x_472); -lean::cnstr_set_scalar(x_474, sizeof(void*)*4, x_453); -x_475 = 0; -if (lean::is_scalar(x_468)) { - x_476 = lean::alloc_cnstr(1, 4, 1); -} else { - x_476 = x_468; -} -lean::cnstr_set(x_476, 0, x_474); -lean::cnstr_set(x_476, 1, x_466); -lean::cnstr_set(x_476, 2, x_467); -lean::cnstr_set(x_476, 3, x_446); -lean::cnstr_set_scalar(x_476, sizeof(void*)*4, x_475); -x_477 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_477, 0, x_476); -lean::cnstr_set(x_477, 1, x_316); -lean::cnstr_set(x_477, 2, x_317); -lean::cnstr_set(x_477, 3, x_318); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_453); -return x_477; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_RBNode_isRed___main___rarg(x_1); -if (x_4 == 0) -{ -obj* x_5; -x_5 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_1, x_2, x_3); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = l_RBNode_ins___main___at_Lean_Expander_builtinTransformers___spec__2(x_1, x_2, x_3); -x_7 = l_RBNode_setBlack___main___rarg(x_6); -return x_7; -} -} -} -obj* l_List_foldl___main___at_Lean_Expander_builtinTransformers___spec__3(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_3, 1); -lean::inc(x_6); -lean::dec(x_3); -x_7 = l_RBNode_insert___at_Lean_Expander_builtinTransformers___spec__1(x_1, x_5, x_6); -x_1 = x_7; -x_2 = x_4; -goto _start; -} -} -} -obj* _init_l_Lean_Expander_builtinTransformers() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_1 = l_Lean_Parser_command_mixfix; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_mixfix_transform___boxed), 2, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -x_4 = l_Lean_Parser_command_reserveMixfix; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_reserveMixfix_transform___boxed), 2, 0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_Term_bracketedBinders; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_bracketedBinders_transform___boxed), 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_Term_lambda; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_lambda_transform___boxed), 2, 0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_Term_pi; -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_pi_transform___boxed), 2, 0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = l_Lean_Parser_Term_depArrow; -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_depArrow_transform___boxed), 2, 0); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Term_arrow; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_arrow_transform___boxed), 2, 0); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_Term_paren; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_paren_transform___boxed), 2, 0); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Term_assume; -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_assume_transform___boxed), 2, 0); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_Term_if; -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_if_transform___boxed), 2, 0); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_Term_let; -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_let_transform___boxed), 2, 0); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_32); -x_34 = l_Lean_Parser_command_axiom; -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_axiom_transform___boxed), 2, 0); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Parser_command_declaration; -x_38 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_declaration_transform___boxed), 2, 0); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_38); -x_40 = l_Lean_Parser_command_introRule; -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_introRule_transform___boxed), 2, 0); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_command_variable; -x_44 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_variable_transform___boxed), 2, 0); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_command_variables; -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_variables_transform___boxed), 2, 0); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_Lean_Parser_Level_leading; -x_50 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_Level_leading_transform___boxed), 2, 0); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_Lean_Parser_Term_Subtype; -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_Subtype_transform___boxed), 2, 0); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_command_universes; -x_56 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_universes_transform___boxed), 2, 0); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_55); -lean::cnstr_set(x_57, 1, x_56); -x_58 = l_Lean_Parser_Term_sorry; -x_59 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_sorry_transform___boxed), 2, 0); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_58); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::box(0); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_60); -lean::cnstr_set(x_62, 1, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_57); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_54); -lean::cnstr_set(x_64, 1, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_51); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_48); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_45); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_42); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_39); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_36); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_33); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_30); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_27); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_24); -lean::cnstr_set(x_74, 1, x_73); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_21); -lean::cnstr_set(x_75, 1, x_74); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_18); -lean::cnstr_set(x_76, 1, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_15); -lean::cnstr_set(x_77, 1, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_12); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_9); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_6); -lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_3); -lean::cnstr_set(x_81, 1, x_80); -x_82 = lean::box(0); -x_83 = l_List_foldl___main___at_Lean_Expander_builtinTransformers___spec__3(x_82, x_81); -return x_83; -} -} -obj* l_Lean_Expander_ExpanderConfig_HasLift(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Expander_ExpanderConfig_HasLift___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Expander_ExpanderConfig_HasLift(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Expander_ExpanderState_new() { -_start: -{ -obj* x_1; -x_1 = lean::mk_nat_obj(0u); -return x_1; -} -} -obj* l_Lean_Expander_mkScope(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::mk_nat_obj(1u); -x_4 = lean::nat_add(x_1, x_3); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -} -obj* l_Lean_Expander_mkScope___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Expander_mkScope(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1___rarg(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; -x_5 = lean::cnstr_get(x_4, 0); -x_6 = lean::cnstr_get(x_5, 0); -x_7 = lean::cnstr_get(x_5, 2); -x_8 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::mk_nat_obj(0u); -x_10 = l_Lean_FileMap_toPosition(x_7, x_9); -x_11 = 2; -x_12 = l_String_splitAux___main___closed__1; -lean::inc(x_6); -x_13 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_8); -lean::cnstr_set(x_13, 3, x_12); -lean::cnstr_set(x_13, 4, x_2); -lean::cnstr_set_scalar(x_13, sizeof(void*)*5, x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_1, 0); -x_16 = l_Lean_Parser_Syntax_getPos(x_15); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; uint8 x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = lean::mk_nat_obj(0u); -x_18 = l_Lean_FileMap_toPosition(x_7, x_17); -x_19 = 2; -x_20 = l_String_splitAux___main___closed__1; -lean::inc(x_6); -x_21 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_21, 0, x_6); -lean::cnstr_set(x_21, 1, x_18); -lean::cnstr_set(x_21, 2, x_8); -lean::cnstr_set(x_21, 3, x_20); -lean::cnstr_set(x_21, 4, x_2); -lean::cnstr_set_scalar(x_21, sizeof(void*)*5, x_19); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -else -{ -obj* x_23; obj* x_24; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_16, 0); -lean::inc(x_23); -lean::dec(x_16); -x_24 = l_Lean_FileMap_toPosition(x_7, x_23); -x_25 = 2; -x_26 = l_String_splitAux___main___closed__1; -lean::inc(x_6); -x_27 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_24); -lean::cnstr_set(x_27, 2, x_8); -lean::cnstr_set(x_27, 3, x_26); -lean::cnstr_set(x_27, 4, x_2); -lean::cnstr_set_scalar(x_27, sizeof(void*)*5, x_25); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -return x_28; -} -} -} -} -obj* l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_expander_2__expandCore___main___spec__2(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_4); -lean::dec(x_1); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_2); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_2, 0); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::inc(x_1); -x_11 = l___private_init_lean_expander_2__expandCore___main(x_1, x_9, x_3, x_4); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::free_heap_obj(x_2); -lean::dec(x_10); -lean::dec(x_4); -lean::dec(x_1); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__3(x_1, x_10, x_17, x_4); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_16); -lean::free_heap_obj(x_2); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_23, 0); -lean::cnstr_set(x_2, 1, x_25); -lean::cnstr_set(x_2, 0, x_16); -lean::cnstr_set(x_23, 0, x_2); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_23, 0); -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_23); -lean::cnstr_set(x_2, 1, x_26); -lean::cnstr_set(x_2, 0, x_16); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_2); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_18, 0, x_28); -return x_18; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_18, 0); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - lean::cnstr_release(x_29, 1); - x_32 = x_29; -} else { - lean::dec_ref(x_29); - x_32 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_30); -lean::cnstr_set(x_2, 0, x_16); -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_2); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_2, 0); -x_36 = lean::cnstr_get(x_2, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_2); -lean::inc(x_4); -lean::inc(x_1); -x_37 = l___private_init_lean_expander_2__expandCore___main(x_1, x_35, x_3, x_4); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_36); -lean::dec(x_4); -lean::dec(x_1); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - x_39 = x_37; -} else { - lean::dec_ref(x_37); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(0, 1, 0); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_38); -return x_40; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__3(x_1, x_36, x_43, x_4); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_42); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_46 = x_44; -} else { - lean::dec_ref(x_44); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(0, 1, 0); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_49 = x_44; -} else { - lean::dec_ref(x_44); - x_49 = lean::box(0); -} -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_52 = x_48; -} else { - lean::dec_ref(x_48); - x_52 = lean::box(0); -} -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_42); -lean::cnstr_set(x_53, 1, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -if (lean::is_scalar(x_49)) { - x_55 = lean::alloc_cnstr(1, 1, 0); -} else { - x_55 = x_49; -} -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -} -} -} -} -obj* l_List_map___main___at___private_init_lean_expander_2__expandCore___main___spec__4(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = lean::box(0); -lean::inc(x_1); -lean::cnstr_set(x_2, 1, x_7); -lean::cnstr_set(x_2, 0, x_1); -x_8 = l_Lean_Parser_Syntax_flipScopes___main(x_2, x_5); -x_9 = l_List_map___main___at___private_init_lean_expander_2__expandCore___main___spec__4(x_1, x_6); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 0); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_2); -x_13 = lean::box(0); -lean::inc(x_1); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_1); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Syntax_flipScopes___main(x_14, x_11); -x_16 = l_List_map___main___at___private_init_lean_expander_2__expandCore___main___spec__4(x_1, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -} -obj* l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__5(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_4); -lean::dec(x_1); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_2); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_2, 0); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::inc(x_1); -x_11 = l___private_init_lean_expander_2__expandCore___main(x_1, x_9, x_3, x_4); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -lean::free_heap_obj(x_2); -lean::dec(x_10); -lean::dec(x_4); -lean::dec(x_1); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__5(x_1, x_10, x_17, x_4); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_16); -lean::free_heap_obj(x_2); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -return x_18; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -return x_21; -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_23, 0); -lean::cnstr_set(x_2, 1, x_25); -lean::cnstr_set(x_2, 0, x_16); -lean::cnstr_set(x_23, 0, x_2); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_23, 0); -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_23); -lean::cnstr_set(x_2, 1, x_26); -lean::cnstr_set(x_2, 0, x_16); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_2); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_18, 0, x_28); -return x_18; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_18, 0); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - lean::cnstr_release(x_29, 1); - x_32 = x_29; -} else { - lean::dec_ref(x_29); - x_32 = lean::box(0); -} -lean::cnstr_set(x_2, 1, x_30); -lean::cnstr_set(x_2, 0, x_16); -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_2); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_2, 0); -x_36 = lean::cnstr_get(x_2, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_2); -lean::inc(x_4); -lean::inc(x_1); -x_37 = l___private_init_lean_expander_2__expandCore___main(x_1, x_35, x_3, x_4); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_36); -lean::dec(x_4); -lean::dec(x_1); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - x_39 = x_37; -} else { - lean::dec_ref(x_37); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(0, 1, 0); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_38); -return x_40; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__5(x_1, x_36, x_43, x_4); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_42); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_46 = x_44; -} else { - lean::dec_ref(x_44); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(0, 1, 0); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_49 = x_44; -} else { - lean::dec_ref(x_44); - x_49 = lean::box(0); -} -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_52 = x_48; -} else { - lean::dec_ref(x_48); - x_52 = lean::box(0); -} -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_42); -lean::cnstr_set(x_53, 1, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -if (lean::is_scalar(x_49)) { - x_55 = lean::alloc_cnstr(1, 1, 0); -} else { - x_55 = x_49; -} -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -} -} -} -} -} -obj* _init_l___private_init_lean_expander_2__expandCore___main___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("macro expansion limit exceeded"); -return x_1; -} -} -obj* l___private_init_lean_expander_2__expandCore___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_1, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_1, x_7); -lean::dec(x_1); -lean::inc(x_2); -x_9 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; -lean::dec(x_8); -lean::dec(x_4); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_3); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -lean::dec(x_2); -x_12 = lean::cnstr_get(x_9, 0); -lean::inc(x_12); -lean::dec(x_9); -x_13 = lean::cnstr_get(x_4, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -x_15 = l_RBNode_find___main___at___private_init_lean_expander_2__expandCore___main___spec__2(x_13, x_14); -lean::dec(x_13); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_12, 1); -lean::inc(x_16); -lean::dec(x_12); -x_17 = l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__3(x_8, x_16, x_3, x_4); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -lean::dec(x_14); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -return x_17; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -return x_20; -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_17); -if (x_21 == 0) -{ -obj* x_22; uint8 x_23; -x_22 = lean::cnstr_get(x_17, 0); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_22, 0); -x_25 = l_Lean_Parser_Syntax_mkNode(x_14, x_24); -lean::cnstr_set(x_22, 0, x_25); -return x_17; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_22, 0); -x_27 = lean::cnstr_get(x_22, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_22); -x_28 = l_Lean_Parser_Syntax_mkNode(x_14, x_26); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -lean::cnstr_set(x_17, 0, x_29); -return x_17; -} -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_17, 0); -lean::inc(x_30); -lean::dec(x_17); -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_30, 1); -lean::inc(x_32); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - lean::cnstr_release(x_30, 1); - x_33 = x_30; -} else { - lean::dec_ref(x_30); - x_33 = lean::box(0); -} -x_34 = l_Lean_Parser_Syntax_mkNode(x_14, x_31); -if (lean::is_scalar(x_33)) { - x_35 = lean::alloc_cnstr(0, 2, 0); -} else { - x_35 = x_33; -} -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_32); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -return x_36; -} -} -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_15, 0); -lean::inc(x_37); -lean::dec(x_15); -x_38 = l_Lean_Expander_mkScope(x_3, x_4); -if (lean::obj_tag(x_38) == 0) -{ -uint8 x_39; -lean::dec(x_37); -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_8); -lean::dec(x_4); -x_39 = !lean::is_exclusive(x_38); -if (x_39 == 0) -{ -return x_38; -} -else -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_38, 0); -lean::inc(x_40); -lean::dec(x_38); -x_41 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -return x_41; -} -} -else -{ -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; -x_42 = lean::cnstr_get(x_38, 0); -lean::inc(x_42); -lean::dec(x_38); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_42, 1); -lean::inc(x_44); -lean::dec(x_42); -x_45 = lean::box(0); -lean::inc(x_43); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_43); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::cnstr_get(x_12, 1); -lean::inc(x_47); -lean::dec(x_12); -lean::inc(x_47); -x_48 = l_List_map___main___at___private_init_lean_expander_2__expandCore___main___spec__4(x_43, x_47); -lean::inc(x_14); -x_49 = l_Lean_Parser_Syntax_mkNode(x_14, x_48); -x_50 = lean::cnstr_get(x_4, 0); -lean::inc(x_50); -x_51 = lean::apply_2(x_37, x_49, x_50); -if (lean::obj_tag(x_51) == 0) -{ -uint8 x_52; -lean::dec(x_47); -lean::dec(x_46); -lean::dec(x_44); -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_4); -x_52 = !lean::is_exclusive(x_51); -if (x_52 == 0) -{ -return x_51; -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_51, 0); -lean::inc(x_53); -lean::dec(x_51); -x_54 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -return x_54; -} -} -else -{ -obj* x_55; -x_55 = lean::cnstr_get(x_51, 0); -lean::inc(x_55); -lean::dec(x_51); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; -lean::dec(x_46); -x_56 = l_List_mmap___main___at___private_init_lean_expander_2__expandCore___main___spec__5(x_8, x_47, x_44, x_4); -if (lean::obj_tag(x_56) == 0) -{ -uint8 x_57; -lean::dec(x_14); -x_57 = !lean::is_exclusive(x_56); -if (x_57 == 0) -{ -return x_56; -} -else -{ -obj* x_58; obj* x_59; -x_58 = lean::cnstr_get(x_56, 0); -lean::inc(x_58); -lean::dec(x_56); -x_59 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -return x_59; -} -} -else -{ -uint8 x_60; -x_60 = !lean::is_exclusive(x_56); -if (x_60 == 0) -{ -obj* x_61; uint8 x_62; -x_61 = lean::cnstr_get(x_56, 0); -x_62 = !lean::is_exclusive(x_61); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_61, 0); -x_64 = l_Lean_Parser_Syntax_mkNode(x_14, x_63); -lean::cnstr_set(x_61, 0, x_64); -return x_56; -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_65 = lean::cnstr_get(x_61, 0); -x_66 = lean::cnstr_get(x_61, 1); -lean::inc(x_66); -lean::inc(x_65); -lean::dec(x_61); -x_67 = l_Lean_Parser_Syntax_mkNode(x_14, x_65); -x_68 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_66); -lean::cnstr_set(x_56, 0, x_68); -return x_56; -} -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = lean::cnstr_get(x_56, 0); -lean::inc(x_69); -lean::dec(x_56); -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -if (lean::is_exclusive(x_69)) { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_72 = x_69; -} else { - lean::dec_ref(x_69); - x_72 = lean::box(0); -} -x_73 = l_Lean_Parser_Syntax_mkNode(x_14, x_70); -if (lean::is_scalar(x_72)) { - x_74 = lean::alloc_cnstr(0, 2, 0); -} else { - x_74 = x_72; -} -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_71); -x_75 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_75, 0, x_74); -return x_75; -} -} -} -else -{ -obj* x_76; obj* x_77; -lean::dec(x_47); -lean::dec(x_14); -x_76 = lean::cnstr_get(x_55, 0); -lean::inc(x_76); -lean::dec(x_55); -x_77 = l_Lean_Parser_Syntax_flipScopes___main(x_46, x_76); -x_1 = x_8; -x_2 = x_77; -x_3 = x_44; -goto _start; -} -} -} -} -} -} -else -{ -obj* x_79; obj* x_80; obj* x_81; -lean::dec(x_1); -x_79 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_79, 0, x_2); -x_80 = l___private_init_lean_expander_2__expandCore___main___closed__1; -x_81 = l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1___rarg(x_79, x_80, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_79); -return x_81; -} -} -} -obj* l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Expander_error___at___private_init_lean_expander_2__expandCore___main___spec__1___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -return x_5; -} -} -obj* l_RBNode_find___main___at___private_init_lean_expander_2__expandCore___main___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_expander_2__expandCore___main___spec__2(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l___private_init_lean_expander_2__expandCore(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_expander_2__expandCore___main(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l_Lean_Expander_expand(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::mk_nat_obj(1000u); -x_4 = l_Lean_Expander_ExpanderState_new; -x_5 = l___private_init_lean_expander_2__expandCore___main(x_3, x_1, x_4, x_2); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -lean::dec(x_10); -lean::cnstr_set(x_5, 0, x_11); -return x_5; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_5, 0); -lean::inc(x_12); -lean::dec(x_5); -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -lean::dec(x_12); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -} -} -obj* initialize_init_lean_parser_module(obj*); -obj* initialize_init_lean_expr(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_expander(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_module(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_expr(w); -if (io_result_is_error(w)) return w; -l_Lean_Expander_TransformM_Monad = _init_l_Lean_Expander_TransformM_Monad(); -lean::mark_persistent(l_Lean_Expander_TransformM_Monad); -l_Lean_Expander_TransformM_MonadReader = _init_l_Lean_Expander_TransformM_MonadReader(); -lean::mark_persistent(l_Lean_Expander_TransformM_MonadReader); -l_Lean_Expander_TransformM_MonadExcept = _init_l_Lean_Expander_TransformM_MonadExcept(); -lean::mark_persistent(l_Lean_Expander_TransformM_MonadExcept); -l_Lean_Expander_noExpansion___closed__1 = _init_l_Lean_Expander_noExpansion___closed__1(); -lean::mark_persistent(l_Lean_Expander_noExpansion___closed__1); -l_Lean_Expander_coeBinderBracketedBinder___closed__1 = _init_l_Lean_Expander_coeBinderBracketedBinder___closed__1(); -lean::mark_persistent(l_Lean_Expander_coeBinderBracketedBinder___closed__1); -l_Lean_Expander_coeBinderBracketedBinder___closed__2 = _init_l_Lean_Expander_coeBinderBracketedBinder___closed__2(); -lean::mark_persistent(l_Lean_Expander_coeBinderBracketedBinder___closed__2); -l___private_init_lean_expander_1__popStxArg___closed__1 = _init_l___private_init_lean_expander_1__popStxArg___closed__1(); -lean::mark_persistent(l___private_init_lean_expander_1__popStxArg___closed__1); -l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1 = _init_l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1(); -lean::mark_persistent(l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__1); -l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2 = _init_l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2(); -lean::mark_persistent(l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__2); -l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3 = _init_l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3(); -lean::mark_persistent(l_List_mfor___main___at_Lean_Expander_mkNotationTransformer___spec__4___closed__3); -l_Lean_Expander_mixfixToNotationSpec___closed__1 = _init_l_Lean_Expander_mixfixToNotationSpec___closed__1(); -lean::mark_persistent(l_Lean_Expander_mixfixToNotationSpec___closed__1); -l_Lean_Expander_mixfixToNotationSpec___closed__2 = _init_l_Lean_Expander_mixfixToNotationSpec___closed__2(); -lean::mark_persistent(l_Lean_Expander_mixfixToNotationSpec___closed__2); -l_Lean_Expander_mixfixToNotationSpec___closed__3 = _init_l_Lean_Expander_mixfixToNotationSpec___closed__3(); -lean::mark_persistent(l_Lean_Expander_mixfixToNotationSpec___closed__3); -l_Lean_Expander_mixfixToNotationSpec___closed__4 = _init_l_Lean_Expander_mixfixToNotationSpec___closed__4(); -lean::mark_persistent(l_Lean_Expander_mixfixToNotationSpec___closed__4); -l_Lean_Expander_mixfixToNotationSpec___closed__5 = _init_l_Lean_Expander_mixfixToNotationSpec___closed__5(); -lean::mark_persistent(l_Lean_Expander_mixfixToNotationSpec___closed__5); -l_Lean_Expander_mixfixToNotationSpec___closed__6 = _init_l_Lean_Expander_mixfixToNotationSpec___closed__6(); -lean::mark_persistent(l_Lean_Expander_mixfixToNotationSpec___closed__6); -l_Lean_Expander_mixfixToNotationSpec___closed__7 = _init_l_Lean_Expander_mixfixToNotationSpec___closed__7(); -lean::mark_persistent(l_Lean_Expander_mixfixToNotationSpec___closed__7); -l_Lean_Expander_mixfix_transform___closed__1 = _init_l_Lean_Expander_mixfix_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_mixfix_transform___closed__1); -l_Lean_Expander_mixfix_transform___closed__2 = _init_l_Lean_Expander_mixfix_transform___closed__2(); -lean::mark_persistent(l_Lean_Expander_mixfix_transform___closed__2); -l_Lean_Expander_mixfix_transform___closed__3 = _init_l_Lean_Expander_mixfix_transform___closed__3(); -lean::mark_persistent(l_Lean_Expander_mixfix_transform___closed__3); -l_Lean_Expander_mixfix_transform___closed__4 = _init_l_Lean_Expander_mixfix_transform___closed__4(); -lean::mark_persistent(l_Lean_Expander_mixfix_transform___closed__4); -l_Lean_Expander_mixfix_transform___closed__5 = _init_l_Lean_Expander_mixfix_transform___closed__5(); -lean::mark_persistent(l_Lean_Expander_mixfix_transform___closed__5); -l_Lean_Expander_mixfix_transform___closed__6 = _init_l_Lean_Expander_mixfix_transform___closed__6(); -lean::mark_persistent(l_Lean_Expander_mixfix_transform___closed__6); -l_Lean_Expander_reserveMixfix_transform___closed__1 = _init_l_Lean_Expander_reserveMixfix_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_reserveMixfix_transform___closed__1); -l_Lean_Expander_mkSimpleBinder___closed__1 = _init_l_Lean_Expander_mkSimpleBinder___closed__1(); -lean::mark_persistent(l_Lean_Expander_mkSimpleBinder___closed__1); -l_Lean_Expander_mkSimpleBinder___closed__2 = _init_l_Lean_Expander_mkSimpleBinder___closed__2(); -lean::mark_persistent(l_Lean_Expander_mkSimpleBinder___closed__2); -l_Lean_Expander_mkSimpleBinder___closed__3 = _init_l_Lean_Expander_mkSimpleBinder___closed__3(); -lean::mark_persistent(l_Lean_Expander_mkSimpleBinder___closed__3); -l_Lean_Expander_mkSimpleBinder___closed__4 = _init_l_Lean_Expander_mkSimpleBinder___closed__4(); -lean::mark_persistent(l_Lean_Expander_mkSimpleBinder___closed__4); -l_Lean_Expander_mkSimpleBinder___closed__5 = _init_l_Lean_Expander_mkSimpleBinder___closed__5(); -lean::mark_persistent(l_Lean_Expander_mkSimpleBinder___closed__5); -l_Lean_Expander_mkSimpleBinder___closed__6 = _init_l_Lean_Expander_mkSimpleBinder___closed__6(); -lean::mark_persistent(l_Lean_Expander_mkSimpleBinder___closed__6); -l_Lean_Expander_mkSimpleBinder___closed__7 = _init_l_Lean_Expander_mkSimpleBinder___closed__7(); -lean::mark_persistent(l_Lean_Expander_mkSimpleBinder___closed__7); -l_Lean_Expander_binderIdentToIdent___main___closed__1 = _init_l_Lean_Expander_binderIdentToIdent___main___closed__1(); -lean::mark_persistent(l_Lean_Expander_binderIdentToIdent___main___closed__1); -l_Lean_Expander_getOptType___main___closed__1 = _init_l_Lean_Expander_getOptType___main___closed__1(); -lean::mark_persistent(l_Lean_Expander_getOptType___main___closed__1); -l_Lean_Expander_expandBracketedBinder___main___closed__1 = _init_l_Lean_Expander_expandBracketedBinder___main___closed__1(); -lean::mark_persistent(l_Lean_Expander_expandBracketedBinder___main___closed__1); -l_Lean_Expander_expandBracketedBinder___main___closed__2 = _init_l_Lean_Expander_expandBracketedBinder___main___closed__2(); -lean::mark_persistent(l_Lean_Expander_expandBracketedBinder___main___closed__2); -l_Lean_Expander_expandBracketedBinder___main___closed__3 = _init_l_Lean_Expander_expandBracketedBinder___main___closed__3(); -lean::mark_persistent(l_Lean_Expander_expandBracketedBinder___main___closed__3); -l_Lean_Expander_expandBracketedBinder___main___closed__4 = _init_l_Lean_Expander_expandBracketedBinder___main___closed__4(); -lean::mark_persistent(l_Lean_Expander_expandBracketedBinder___main___closed__4); -l_Lean_Expander_expandBracketedBinder___main___closed__5 = _init_l_Lean_Expander_expandBracketedBinder___main___closed__5(); -lean::mark_persistent(l_Lean_Expander_expandBracketedBinder___main___closed__5); -l_Lean_Expander_expandBracketedBinder___main___closed__6 = _init_l_Lean_Expander_expandBracketedBinder___main___closed__6(); -lean::mark_persistent(l_Lean_Expander_expandBracketedBinder___main___closed__6); -l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1 = _init_l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1(); -lean::mark_persistent(l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__1); -l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__2 = _init_l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__2(); -lean::mark_persistent(l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__2); -l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3 = _init_l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3(); -lean::mark_persistent(l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__3); -l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__4 = _init_l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__4(); -lean::mark_persistent(l_List_mfoldr___main___at_Lean_Expander_expandBinders___spec__4___closed__4); -l_Lean_Expander_lambda_transform___closed__1 = _init_l_Lean_Expander_lambda_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_lambda_transform___closed__1); -l_Lean_Expander_depArrow_transform___closed__1 = _init_l_Lean_Expander_depArrow_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_depArrow_transform___closed__1); -l_Lean_Expander_arrow_transform___closed__1 = _init_l_Lean_Expander_arrow_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_arrow_transform___closed__1); -l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3___closed__1 = _init_l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3___closed__1(); -lean::mark_persistent(l_List_foldr1___main___at_Lean_Expander_paren_transform___spec__3___closed__1); -l_Lean_Expander_paren_transform___closed__1 = _init_l_Lean_Expander_paren_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_paren_transform___closed__1); -l_Lean_Expander_paren_transform___closed__2 = _init_l_Lean_Expander_paren_transform___closed__2(); -lean::mark_persistent(l_Lean_Expander_paren_transform___closed__2); -l_Lean_Expander_assume_transform___closed__1 = _init_l_Lean_Expander_assume_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_assume_transform___closed__1); -l_Lean_Expander_if_transform___closed__1 = _init_l_Lean_Expander_if_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_if_transform___closed__1); -l_Lean_Expander_if_transform___closed__2 = _init_l_Lean_Expander_if_transform___closed__2(); -lean::mark_persistent(l_Lean_Expander_if_transform___closed__2); -l_Lean_Expander_if_transform___closed__3 = _init_l_Lean_Expander_if_transform___closed__3(); -lean::mark_persistent(l_Lean_Expander_if_transform___closed__3); -l_Lean_Expander_let_transform___closed__1 = _init_l_Lean_Expander_let_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_let_transform___closed__1); -l_Lean_Expander_axiom_transform___closed__1 = _init_l_Lean_Expander_axiom_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_axiom_transform___closed__1); -l_Lean_Expander_declaration_transform___closed__1 = _init_l_Lean_Expander_declaration_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_declaration_transform___closed__1); -l_Lean_Expander_declaration_transform___closed__2 = _init_l_Lean_Expander_declaration_transform___closed__2(); -lean::mark_persistent(l_Lean_Expander_declaration_transform___closed__2); -l_Lean_Expander_declaration_transform___closed__3 = _init_l_Lean_Expander_declaration_transform___closed__3(); -lean::mark_persistent(l_Lean_Expander_declaration_transform___closed__3); -l_Lean_Expander_variable_transform___closed__1 = _init_l_Lean_Expander_variable_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_variable_transform___closed__1); -l_Lean_Expander_bindingAnnotationUpdate = _init_l_Lean_Expander_bindingAnnotationUpdate(); -lean::mark_persistent(l_Lean_Expander_bindingAnnotationUpdate); -l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Expander_bindingAnnotationUpdate_HasView_x27___elambda__1___closed__1); -l_Lean_Expander_bindingAnnotationUpdate_HasView_x27 = _init_l_Lean_Expander_bindingAnnotationUpdate_HasView_x27(); -lean::mark_persistent(l_Lean_Expander_bindingAnnotationUpdate_HasView_x27); -l_Lean_Expander_bindingAnnotationUpdate_HasView = _init_l_Lean_Expander_bindingAnnotationUpdate_HasView(); -lean::mark_persistent(l_Lean_Expander_bindingAnnotationUpdate_HasView); -l_Lean_Expander_bindingAnnotationUpdate_Parser_Lean_Parser_HasView = _init_l_Lean_Expander_bindingAnnotationUpdate_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Expander_bindingAnnotationUpdate_Parser_Lean_Parser_HasView); -l_Lean_Expander_bindingAnnotationUpdate_Parser___closed__1 = _init_l_Lean_Expander_bindingAnnotationUpdate_Parser___closed__1(); -lean::mark_persistent(l_Lean_Expander_bindingAnnotationUpdate_Parser___closed__1); -l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1 = _init_l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Expander_variables_transform___spec__1___closed__1); -l_Lean_Expander_Subtype_transform___closed__1 = _init_l_Lean_Expander_Subtype_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_Subtype_transform___closed__1); -l_List_map___main___at_Lean_Expander_universes_transform___spec__1___closed__1 = _init_l_List_map___main___at_Lean_Expander_universes_transform___spec__1___closed__1(); -lean::mark_persistent(l_List_map___main___at_Lean_Expander_universes_transform___spec__1___closed__1); -l_Lean_Expander_sorry_transform___closed__1 = _init_l_Lean_Expander_sorry_transform___closed__1(); -lean::mark_persistent(l_Lean_Expander_sorry_transform___closed__1); -l_Lean_Expander_builtinTransformers = _init_l_Lean_Expander_builtinTransformers(); -lean::mark_persistent(l_Lean_Expander_builtinTransformers); -l_Lean_Expander_ExpanderState_new = _init_l_Lean_Expander_ExpanderState_new(); -lean::mark_persistent(l_Lean_Expander_ExpanderState_new); -l___private_init_lean_expander_2__expandCore___main___closed__1 = _init_l___private_init_lean_expander_2__expandCore___main___closed__1(); -lean::mark_persistent(l___private_init_lean_expander_2__expandCore___main___closed__1); -return w; -} diff --git a/src/stage0/init/lean/frontend.cpp b/src/stage0/init/lean/frontend.cpp deleted file mode 100644 index 0d91a3ca91..0000000000 --- a/src/stage0/init/lean/frontend.cpp +++ /dev/null @@ -1,7591 +0,0 @@ -// Lean compiler output -// Module: init.lean.frontend -// Imports: init.default init.lean.parser.module init.lean.expander init.lean.elaborator init.lean.util init.io -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -obj* l_Lean_KVMap_setBool(obj*, obj*, uint8); -extern obj* l_Lean_Parser_Term_builtinTrailingParsers_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_Term_builtinLeadingParsers; -obj* l_Lean_Elaborator_processCommand(obj*, obj*, obj*); -obj* l_Lean_mkConfig(obj*, obj*); -obj* l_Lean_processFile___lambda__1___closed__7; -obj* l_Lean_processFile___lambda__1___closed__1; -obj* l_Lean_runFrontend___closed__1; -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2(obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_builtinCommandParsers; -obj* l_List_reverse___rarg(obj*); -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l_Lean_processFile___lambda__1___closed__4; -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3(obj*, obj*, obj*, obj*); -obj* l_ioOfExcept___at_Lean_runFrontend___spec__1(obj*, obj*); -obj* l_Lean_Parser_mkTokenTrie(obj*); -extern obj* l_Lean_Options_empty; -extern obj* l_Lean_Parser_Module_header_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Elaborator_notation_elaborate___closed__1; -obj* l_Nat_repr(obj*); -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed(obj*, obj*, obj*); -obj* l_Lean_processFile___closed__1; -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_List_mfor___main___at_Lean_runFrontend___spec__4(obj*, obj*, obj*); -extern obj* l_Lean_Expander_builtinTransformers; -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed(obj*, obj*, obj*, obj*); -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(obj*, uint8, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Elaborator_mkState(obj*, obj*, obj*); -obj* l_List_append___rarg(obj*, obj*); -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__1(obj*, obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_Lean_processFile___lambda__1___closed__2; -extern obj* l_Lean_Parser_Module_eoi; -obj* l_Lean_Parser_tokens___rarg(obj*); -extern obj* l_Lean_Parser_command_builtinCommandParsers_Lean_Parser_HasTokens; -obj* l_List_mfor___main___at_Lean_runFrontend___spec__5(obj*, obj*, obj*); -obj* l_Lean_processFile___lambda__1___closed__8; -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2; -obj* l_Lean_runFrontend(obj*, obj*, obj*, uint8, obj*, obj*); -obj* l_ioOfExcept___at_Lean_runFrontend___spec__1___boxed(obj*, obj*); -obj* l_Lean_processFile___lambda__1___closed__6; -obj* l_IO_println___at_HasRepr_HasEval___spec__1(obj*, obj*); -obj* l_Lean_processFile___lambda__1___boxed(obj*, obj*, obj*); -obj* l_List_mfor___main___at_Lean_runFrontend___spec__3(obj*, obj*, obj*); -obj* l_Lean_processFile___lambda__1(uint8, obj*, obj*); -obj* l_Lean_processFile___lambda__1___closed__3; -obj* l_Lean_Message_toString(obj*); -obj* l_Lean_processFile___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__1; -obj* l_Lean_profileitPure___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseCommand(obj*, obj*); -obj* lean_process_file(obj*, obj*, uint8, obj*, obj*); -extern obj* l_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_Term_builtinTrailingParsers; -obj* l_Lean_processFile___lambda__1___closed__5; -obj* l_Lean_FileMap_toPosition(obj*, obj*); -obj* l_String_quote(obj*); -obj* l_List_mfor___main___at_Lean_runFrontend___spec__2(obj*, obj*, obj*); -obj* l_Lean_FileMap_fromString(obj*); -obj* l_Lean_runFrontend___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Expander_expand(obj*, obj*); -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Parser_parseHeader(obj*); -obj* l_Lean_processFile___lambda__1___closed__9; -obj* l_Lean_mkConfig(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_3 = l_Lean_Parser_Module_header_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = l_Lean_Parser_command_builtinCommandParsers_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_tokens___rarg(x_5); -x_7 = l_List_append___rarg(x_4, x_6); -x_8 = l_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens; -x_9 = l_Lean_Parser_tokens___rarg(x_8); -x_10 = l_List_append___rarg(x_7, x_9); -x_11 = l_Lean_Parser_Term_builtinTrailingParsers_Lean_Parser_HasTokens; -x_12 = l_Lean_Parser_tokens___rarg(x_11); -x_13 = l_List_append___rarg(x_10, x_12); -x_14 = l_Lean_Parser_mkTokenTrie(x_13); -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_15; -lean::dec(x_2); -lean::dec(x_1); -x_15 = !lean::is_exclusive(x_14); -if (x_15 == 0) -{ -return x_14; -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_14, 0); -lean::inc(x_16); -lean::dec(x_14); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -return x_17; -} -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_14); -if (x_18 == 0) -{ -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; -x_19 = lean::cnstr_get(x_14, 0); -lean::inc(x_2); -x_20 = l_Lean_FileMap_fromString(x_2); -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_2); -lean::cnstr_set(x_21, 2, x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_19); -x_23 = lean::box(0); -x_24 = l_Lean_Parser_Term_builtinLeadingParsers; -x_25 = l_Lean_Parser_Term_builtinTrailingParsers; -x_26 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_26, 0, x_22); -lean::cnstr_set(x_26, 1, x_24); -lean::cnstr_set(x_26, 2, x_25); -lean::cnstr_set(x_26, 3, x_23); -lean::cnstr_set(x_26, 4, x_23); -x_27 = l_Lean_Parser_command_builtinCommandParsers; -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_14, 0, x_28); -return x_14; -} -else -{ -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; -x_29 = lean::cnstr_get(x_14, 0); -lean::inc(x_29); -lean::dec(x_14); -lean::inc(x_2); -x_30 = l_Lean_FileMap_fromString(x_2); -x_31 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_31, 0, x_1); -lean::cnstr_set(x_31, 1, x_2); -lean::cnstr_set(x_31, 2, x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_29); -x_33 = lean::box(0); -x_34 = l_Lean_Parser_Term_builtinLeadingParsers; -x_35 = l_Lean_Parser_Term_builtinTrailingParsers; -x_36 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_36, 0, x_32); -lean::cnstr_set(x_36, 1, x_34); -lean::cnstr_set(x_36, 2, x_35); -lean::cnstr_set(x_36, 3, x_33); -lean::cnstr_set(x_36, 4, x_33); -x_37 = l_Lean_Parser_command_builtinCommandParsers; -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -} -} -obj* l_ioOfExcept___at_Lean_runFrontend___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_2, 0); -lean::dec(x_5); -lean::inc(x_4); -lean::cnstr_set_tag(x_2, 1); -lean::cnstr_set(x_2, 0, x_4); -return x_2; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = lean::cnstr_get(x_2, 1); -lean::inc(x_7); -lean::dec(x_2); -lean::inc(x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_2); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_1, 0); -x_11 = lean::cnstr_get(x_2, 0); -lean::dec(x_11); -lean::inc(x_10); -lean::cnstr_set(x_2, 0, x_10); -return x_2; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_1, 0); -x_13 = lean::cnstr_get(x_2, 1); -lean::inc(x_13); -lean::dec(x_2); -lean::inc(x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -} -} -obj* l_List_mfor___main___at_Lean_runFrontend___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_4; -lean::dec(x_1); -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_3, 0); -lean::dec(x_5); -x_6 = lean::box(0); -lean::cnstr_set(x_3, 0, x_6); -return x_3; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_3, 1); -lean::inc(x_7); -lean::dec(x_3); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -return x_9; -} -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::dec(x_2); -lean::inc(x_1); -x_12 = lean::apply_2(x_1, x_10, x_3); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::dec(x_14); -x_15 = lean::box(0); -lean::cnstr_set(x_12, 0, x_15); -x_2 = x_11; -x_3 = x_12; -goto _start; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -lean::dec(x_12); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -x_2 = x_11; -x_3 = x_19; -goto _start; -} -} -else -{ -uint8 x_21; -lean::dec(x_11); -lean::dec(x_1); -x_21 = !lean::is_exclusive(x_12); -if (x_21 == 0) -{ -return x_12; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_12, 0); -x_23 = lean::cnstr_get(x_12, 1); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_12); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -} -} -} -} -obj* l_List_mfor___main___at_Lean_runFrontend___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_4; -lean::dec(x_1); -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_3, 0); -lean::dec(x_5); -x_6 = lean::box(0); -lean::cnstr_set(x_3, 0, x_6); -return x_3; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_3, 1); -lean::inc(x_7); -lean::dec(x_3); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -return x_9; -} -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::dec(x_2); -lean::inc(x_1); -x_12 = lean::apply_2(x_1, x_10, x_3); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::dec(x_14); -x_15 = lean::box(0); -lean::cnstr_set(x_12, 0, x_15); -x_2 = x_11; -x_3 = x_12; -goto _start; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -lean::dec(x_12); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -x_2 = x_11; -x_3 = x_19; -goto _start; -} -} -else -{ -uint8 x_21; -lean::dec(x_11); -lean::dec(x_1); -x_21 = !lean::is_exclusive(x_12); -if (x_21 == 0) -{ -return x_12; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_12, 0); -x_23 = lean::cnstr_get(x_12, 1); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_12); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -} -} -} -} -obj* l_List_mfor___main___at_Lean_runFrontend___spec__4(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_4; -lean::dec(x_1); -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_3, 0); -lean::dec(x_5); -x_6 = lean::box(0); -lean::cnstr_set(x_3, 0, x_6); -return x_3; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_3, 1); -lean::inc(x_7); -lean::dec(x_3); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -return x_9; -} -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::dec(x_2); -lean::inc(x_1); -x_12 = lean::apply_2(x_1, x_10, x_3); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::dec(x_14); -x_15 = lean::box(0); -lean::cnstr_set(x_12, 0, x_15); -x_2 = x_11; -x_3 = x_12; -goto _start; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -lean::dec(x_12); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -x_2 = x_11; -x_3 = x_19; -goto _start; -} -} -else -{ -uint8 x_21; -lean::dec(x_11); -lean::dec(x_1); -x_21 = !lean::is_exclusive(x_12); -if (x_21 == 0) -{ -return x_12; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_12, 0); -x_23 = lean::cnstr_get(x_12, 1); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_12); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -} -} -} -} -obj* l_List_mfor___main___at_Lean_runFrontend___spec__5(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_4; -lean::dec(x_1); -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_3, 0); -lean::dec(x_5); -x_6 = lean::box(0); -lean::cnstr_set(x_3, 0, x_6); -return x_3; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_3, 1); -lean::inc(x_7); -lean::dec(x_3); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -return x_9; -} -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::dec(x_2); -lean::inc(x_1); -x_12 = lean::apply_2(x_1, x_10, x_3); -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -lean::dec(x_14); -x_15 = lean::box(0); -lean::cnstr_set(x_12, 0, x_15); -x_2 = x_11; -x_3 = x_12; -goto _start; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -lean::dec(x_12); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -x_2 = x_11; -x_3 = x_19; -goto _start; -} -} -else -{ -uint8 x_21; -lean::dec(x_11); -lean::dec(x_1); -x_21 = !lean::is_exclusive(x_12); -if (x_21 == 0) -{ -return x_12; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_12, 0); -x_23 = lean::cnstr_get(x_12, 1); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_12); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -} -} -} -} -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_parseCommand(x_1, x_2); -return x_4; -} -} -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Expander_expand(x_1, x_2); -return x_4; -} -} -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Elaborator_processCommand(x_1, x_2, x_3); -return x_5; -} -} -obj* _init_l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("parsing"); -return x_1; -} -} -obj* _init_l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("expanding"); -return x_1; -} -} -obj* _init_l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("elaborating"); -return x_1; -} -} -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(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_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 x_22; -x_17 = lean::cnstr_get(x_6, 1); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_6, 0); -lean::inc(x_20); -lean::dec(x_6); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -lean::dec(x_17); -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; uint8 x_25; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = lean::cnstr_get(x_18, 1); -lean::dec(x_24); -x_25 = !lean::is_exclusive(x_19); -if (x_25 == 0) -{ -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_37; -x_26 = lean::cnstr_get(x_19, 0); -x_27 = lean::cnstr_get(x_19, 1); -x_28 = lean::cnstr_get(x_23, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -lean::dec(x_28); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -lean::dec(x_29); -x_31 = lean::cnstr_get(x_30, 2); -lean::inc(x_31); -lean::dec(x_30); -x_32 = lean::cnstr_get(x_20, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -x_34 = l_Lean_FileMap_toPosition(x_31, x_33); -lean::dec(x_31); -lean::inc(x_23); -x_35 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__1___boxed), 3, 2); -lean::closure_set(x_35, 0, x_23); -lean::closure_set(x_35, 1, x_20); -x_36 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__1; -x_37 = l_Lean_profileitPure___rarg(x_36, x_34, x_35, x_7); -if (lean::obj_tag(x_37) == 0) -{ -uint8 x_38; -x_38 = !lean::is_exclusive(x_37); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; obj* x_41; -x_39 = lean::cnstr_get(x_37, 0); -x_40 = lean::box(0); -lean::cnstr_set(x_37, 0, x_40); -x_41 = lean::cnstr_get(x_39, 1); -lean::inc(x_41); -if (lean::obj_tag(x_41) == 0) -{ -uint8 x_42; -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -x_42 = !lean::is_exclusive(x_39); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_43 = lean::cnstr_get(x_39, 0); -x_44 = lean::cnstr_get(x_39, 1); -lean::dec(x_44); -x_45 = lean::cnstr_get(x_41, 0); -lean::inc(x_45); -lean::dec(x_41); -lean::inc(x_1); -x_46 = lean::apply_2(x_1, x_45, x_37); -if (lean::obj_tag(x_46) == 0) -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_46); -if (x_47 == 0) -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_46, 0); -lean::dec(x_48); -lean::cnstr_set(x_46, 0, x_40); -lean::inc(x_3); -lean::inc(x_1); -x_49 = l_List_mfor___main___at_Lean_runFrontend___spec__3(x_1, x_3, x_46); -if (lean::obj_tag(x_49) == 0) -{ -if (x_2 == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; -lean::dec(x_43); -lean::dec(x_27); -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -lean::dec(x_49); -x_51 = lean::cnstr_get(x_21, 8); -lean::inc(x_51); -lean::dec(x_21); -lean::inc(x_5); -x_52 = l_List_reverse___rarg(x_5); -lean::cnstr_set(x_39, 1, x_51); -lean::cnstr_set(x_39, 0, x_52); -x_53 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_53, 0, x_39); -x_8 = x_53; -x_9 = x_50; -goto block_16; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_54 = lean::cnstr_get(x_49, 1); -lean::inc(x_54); -lean::dec(x_49); -x_55 = lean::cnstr_get(x_21, 8); -lean::inc(x_55); -lean::dec(x_21); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_43); -lean::cnstr_set(x_56, 1, x_27); -x_57 = l_List_reverse___rarg(x_56); -lean::cnstr_set(x_39, 1, x_55); -lean::cnstr_set(x_39, 0, x_57); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_39); -x_8 = x_58; -x_9 = x_54; -goto block_16; -} -} -else -{ -uint8 x_59; -lean::free_heap_obj(x_39); -lean::dec(x_43); -lean::dec(x_27); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_59 = !lean::is_exclusive(x_49); -if (x_59 == 0) -{ -return x_49; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; -x_60 = lean::cnstr_get(x_49, 0); -x_61 = lean::cnstr_get(x_49, 1); -lean::inc(x_61); -lean::inc(x_60); -lean::dec(x_49); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_60); -lean::cnstr_set(x_62, 1, x_61); -return x_62; -} -} -} -else -{ -obj* x_63; obj* x_64; obj* x_65; -x_63 = lean::cnstr_get(x_46, 1); -lean::inc(x_63); -lean::dec(x_46); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_40); -lean::cnstr_set(x_64, 1, x_63); -lean::inc(x_3); -lean::inc(x_1); -x_65 = l_List_mfor___main___at_Lean_runFrontend___spec__3(x_1, x_3, x_64); -if (lean::obj_tag(x_65) == 0) -{ -if (x_2 == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; -lean::dec(x_43); -lean::dec(x_27); -x_66 = lean::cnstr_get(x_65, 1); -lean::inc(x_66); -lean::dec(x_65); -x_67 = lean::cnstr_get(x_21, 8); -lean::inc(x_67); -lean::dec(x_21); -lean::inc(x_5); -x_68 = l_List_reverse___rarg(x_5); -lean::cnstr_set(x_39, 1, x_67); -lean::cnstr_set(x_39, 0, x_68); -x_69 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_69, 0, x_39); -x_8 = x_69; -x_9 = x_66; -goto block_16; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_70 = lean::cnstr_get(x_65, 1); -lean::inc(x_70); -lean::dec(x_65); -x_71 = lean::cnstr_get(x_21, 8); -lean::inc(x_71); -lean::dec(x_21); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_43); -lean::cnstr_set(x_72, 1, x_27); -x_73 = l_List_reverse___rarg(x_72); -lean::cnstr_set(x_39, 1, x_71); -lean::cnstr_set(x_39, 0, x_73); -x_74 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_74, 0, x_39); -x_8 = x_74; -x_9 = x_70; -goto block_16; -} -} -else -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; -lean::free_heap_obj(x_39); -lean::dec(x_43); -lean::dec(x_27); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_75 = lean::cnstr_get(x_65, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_65, 1); -lean::inc(x_76); -if (lean::is_exclusive(x_65)) { - lean::cnstr_release(x_65, 0); - lean::cnstr_release(x_65, 1); - x_77 = x_65; -} else { - lean::dec_ref(x_65); - x_77 = lean::box(0); -} -if (lean::is_scalar(x_77)) { - x_78 = lean::alloc_cnstr(1, 2, 0); -} else { - x_78 = x_77; -} -lean::cnstr_set(x_78, 0, x_75); -lean::cnstr_set(x_78, 1, x_76); -return x_78; -} -} -} -else -{ -uint8 x_79; -lean::free_heap_obj(x_39); -lean::dec(x_43); -lean::dec(x_27); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_79 = !lean::is_exclusive(x_46); -if (x_79 == 0) -{ -return x_46; -} -else -{ -obj* x_80; obj* x_81; obj* x_82; -x_80 = lean::cnstr_get(x_46, 0); -x_81 = lean::cnstr_get(x_46, 1); -lean::inc(x_81); -lean::inc(x_80); -lean::dec(x_46); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_80); -lean::cnstr_set(x_82, 1, x_81); -return x_82; -} -} -} -else -{ -obj* x_83; obj* x_84; obj* x_85; -x_83 = lean::cnstr_get(x_39, 0); -lean::inc(x_83); -lean::dec(x_39); -x_84 = lean::cnstr_get(x_41, 0); -lean::inc(x_84); -lean::dec(x_41); -lean::inc(x_1); -x_85 = lean::apply_2(x_1, x_84, x_37); -if (lean::obj_tag(x_85) == 0) -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; -x_86 = lean::cnstr_get(x_85, 1); -lean::inc(x_86); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - lean::cnstr_release(x_85, 1); - x_87 = x_85; -} else { - lean::dec_ref(x_85); - x_87 = lean::box(0); -} -if (lean::is_scalar(x_87)) { - x_88 = lean::alloc_cnstr(0, 2, 0); -} else { - x_88 = x_87; -} -lean::cnstr_set(x_88, 0, x_40); -lean::cnstr_set(x_88, 1, x_86); -lean::inc(x_3); -lean::inc(x_1); -x_89 = l_List_mfor___main___at_Lean_runFrontend___spec__3(x_1, x_3, x_88); -if (lean::obj_tag(x_89) == 0) -{ -if (x_2 == 0) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -lean::dec(x_83); -lean::dec(x_27); -x_90 = lean::cnstr_get(x_89, 1); -lean::inc(x_90); -lean::dec(x_89); -x_91 = lean::cnstr_get(x_21, 8); -lean::inc(x_91); -lean::dec(x_21); -lean::inc(x_5); -x_92 = l_List_reverse___rarg(x_5); -x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set(x_93, 1, x_91); -x_94 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -x_8 = x_94; -x_9 = x_90; -goto block_16; -} -else -{ -obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_95 = lean::cnstr_get(x_89, 1); -lean::inc(x_95); -lean::dec(x_89); -x_96 = lean::cnstr_get(x_21, 8); -lean::inc(x_96); -lean::dec(x_21); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_83); -lean::cnstr_set(x_97, 1, x_27); -x_98 = l_List_reverse___rarg(x_97); -x_99 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_96); -x_100 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_100, 0, x_99); -x_8 = x_100; -x_9 = x_95; -goto block_16; -} -} -else -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; -lean::dec(x_83); -lean::dec(x_27); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_101 = lean::cnstr_get(x_89, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_89, 1); -lean::inc(x_102); -if (lean::is_exclusive(x_89)) { - lean::cnstr_release(x_89, 0); - lean::cnstr_release(x_89, 1); - x_103 = x_89; -} else { - lean::dec_ref(x_89); - x_103 = lean::box(0); -} -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(1, 2, 0); -} else { - x_104 = x_103; -} -lean::cnstr_set(x_104, 0, x_101); -lean::cnstr_set(x_104, 1, x_102); -return x_104; -} -} -else -{ -obj* x_105; obj* x_106; obj* x_107; obj* x_108; -lean::dec(x_83); -lean::dec(x_27); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_105 = lean::cnstr_get(x_85, 0); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_85, 1); -lean::inc(x_106); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - lean::cnstr_release(x_85, 1); - x_107 = x_85; -} else { - lean::dec_ref(x_85); - x_107 = lean::box(0); -} -if (lean::is_scalar(x_107)) { - x_108 = lean::alloc_cnstr(1, 2, 0); -} else { - x_108 = x_107; -} -lean::cnstr_set(x_108, 0, x_105); -lean::cnstr_set(x_108, 1, x_106); -return x_108; -} -} -} -else -{ -obj* x_109; uint8 x_110; -x_109 = lean::cnstr_get(x_41, 0); -lean::inc(x_109); -lean::dec(x_41); -x_110 = !lean::is_exclusive(x_39); -if (x_110 == 0) -{ -obj* x_111; obj* x_112; uint8 x_113; -x_111 = lean::cnstr_get(x_39, 0); -x_112 = lean::cnstr_get(x_39, 1); -lean::dec(x_112); -x_113 = !lean::is_exclusive(x_109); -if (x_113 == 0) -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; -x_114 = lean::cnstr_get(x_109, 0); -x_115 = lean::cnstr_get(x_109, 1); -x_116 = l_List_reverse___rarg(x_115); -lean::inc(x_1); -x_117 = l_List_mfor___main___at_Lean_runFrontend___spec__4(x_1, x_116, x_37); -if (lean::obj_tag(x_117) == 0) -{ -uint8 x_118; -x_118 = !lean::is_exclusive(x_117); -if (x_118 == 0) -{ -obj* x_119; obj* x_120; obj* x_121; obj* x_122; -x_119 = lean::cnstr_get(x_117, 0); -lean::dec(x_119); -lean::cnstr_set(x_117, 0, x_40); -lean::inc(x_26); -lean::inc(x_111); -x_120 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed), 3, 2); -lean::closure_set(x_120, 0, x_111); -lean::closure_set(x_120, 1, x_26); -x_121 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2; -x_122 = l_Lean_profileitPure___rarg(x_121, x_34, x_120, x_117); -if (lean::obj_tag(x_122) == 0) -{ -uint8 x_123; -x_123 = !lean::is_exclusive(x_122); -if (x_123 == 0) -{ -obj* x_124; -x_124 = lean::cnstr_get(x_122, 0); -lean::cnstr_set(x_122, 0, x_40); -if (lean::obj_tag(x_124) == 0) -{ -lean::dec(x_34); -if (x_2 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; -lean::dec(x_111); -lean::dec(x_27); -x_125 = lean::cnstr_get(x_124, 0); -lean::inc(x_125); -lean::dec(x_124); -lean::inc(x_5); -lean::cnstr_set(x_109, 1, x_5); -lean::cnstr_set(x_109, 0, x_26); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_114); -x_126 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_126, 0, x_18); -lean::inc(x_1); -x_127 = lean::apply_2(x_1, x_125, x_122); -if (lean::obj_tag(x_127) == 0) -{ -obj* x_128; -x_128 = lean::cnstr_get(x_127, 1); -lean::inc(x_128); -lean::dec(x_127); -x_8 = x_126; -x_9 = x_128; -goto block_16; -} -else -{ -uint8 x_129; -lean::dec(x_126); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_129 = !lean::is_exclusive(x_127); -if (x_129 == 0) -{ -return x_127; -} -else -{ -obj* x_130; obj* x_131; obj* x_132; -x_130 = lean::cnstr_get(x_127, 0); -x_131 = lean::cnstr_get(x_127, 1); -lean::inc(x_131); -lean::inc(x_130); -lean::dec(x_127); -x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_130); -lean::cnstr_set(x_132, 1, x_131); -return x_132; -} -} -} -else -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; -x_133 = lean::cnstr_get(x_124, 0); -lean::inc(x_133); -lean::dec(x_124); -x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_111); -lean::cnstr_set(x_134, 1, x_27); -lean::cnstr_set(x_109, 1, x_134); -lean::cnstr_set(x_109, 0, x_26); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_114); -x_135 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_135, 0, x_18); -lean::inc(x_1); -x_136 = lean::apply_2(x_1, x_133, x_122); -if (lean::obj_tag(x_136) == 0) -{ -obj* x_137; -x_137 = lean::cnstr_get(x_136, 1); -lean::inc(x_137); -lean::dec(x_136); -x_8 = x_135; -x_9 = x_137; -goto block_16; -} -else -{ -uint8 x_138; -lean::dec(x_135); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_138 = !lean::is_exclusive(x_136); -if (x_138 == 0) -{ -return x_136; -} -else -{ -obj* x_139; obj* x_140; obj* x_141; -x_139 = lean::cnstr_get(x_136, 0); -x_140 = lean::cnstr_get(x_136, 1); -lean::inc(x_140); -lean::inc(x_139); -lean::dec(x_136); -x_141 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_141, 0, x_139); -lean::cnstr_set(x_141, 1, x_140); -return x_141; -} -} -} -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; -lean::dec(x_26); -lean::dec(x_23); -x_142 = lean::cnstr_get(x_124, 0); -lean::inc(x_142); -lean::dec(x_124); -lean::inc(x_142); -lean::inc(x_4); -x_143 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed), 4, 3); -lean::closure_set(x_143, 0, x_4); -lean::closure_set(x_143, 1, x_21); -lean::closure_set(x_143, 2, x_142); -x_144 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -x_145 = l_Lean_profileitPure___rarg(x_144, x_34, x_143, x_122); -lean::dec(x_34); -if (lean::obj_tag(x_145) == 0) -{ -uint8 x_146; -x_146 = !lean::is_exclusive(x_145); -if (x_146 == 0) -{ -obj* x_147; obj* x_148; obj* x_149; obj* x_150; -x_147 = lean::cnstr_get(x_145, 0); -lean::cnstr_set(x_145, 0, x_40); -x_148 = lean::cnstr_get(x_147, 5); -lean::inc(x_148); -x_149 = l_List_reverse___rarg(x_148); -lean::inc(x_1); -x_150 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_149, x_145); -if (lean::obj_tag(x_150) == 0) -{ -obj* x_151; obj* x_152; uint8 x_153; -x_151 = lean::cnstr_get(x_150, 1); -lean::inc(x_151); -lean::dec(x_150); -x_152 = l_Lean_Parser_Module_eoi; -x_153 = l_Lean_Parser_Syntax_isOfKind___main(x_152, x_142); -lean::dec(x_142); -if (x_153 == 0) -{ -if (x_2 == 0) -{ -obj* x_154; obj* x_155; obj* x_156; -lean::dec(x_111); -lean::dec(x_27); -x_154 = lean::cnstr_get(x_147, 6); -lean::inc(x_154); -x_155 = lean::cnstr_get(x_147, 7); -lean::inc(x_155); -lean::inc(x_5); -lean::cnstr_set(x_109, 1, x_5); -lean::cnstr_set(x_109, 0, x_155); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_154); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_147); -lean::cnstr_set(x_18, 0, x_114); -x_156 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_156, 0, x_18); -x_8 = x_156; -x_9 = x_151; -goto block_16; -} -else -{ -obj* x_157; obj* x_158; obj* x_159; obj* x_160; -x_157 = lean::cnstr_get(x_147, 6); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_147, 7); -lean::inc(x_158); -x_159 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_159, 0, x_111); -lean::cnstr_set(x_159, 1, x_27); -lean::cnstr_set(x_109, 1, x_159); -lean::cnstr_set(x_109, 0, x_158); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_157); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_147); -lean::cnstr_set(x_18, 0, x_114); -x_160 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_160, 0, x_18); -x_8 = x_160; -x_9 = x_151; -goto block_16; -} -} -else -{ -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_18); -if (x_2 == 0) -{ -obj* x_161; obj* x_162; obj* x_163; -lean::dec(x_111); -lean::dec(x_27); -x_161 = lean::cnstr_get(x_147, 8); -lean::inc(x_161); -lean::dec(x_147); -lean::inc(x_5); -x_162 = l_List_reverse___rarg(x_5); -lean::cnstr_set(x_109, 1, x_161); -lean::cnstr_set(x_109, 0, x_162); -x_163 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_163, 0, x_109); -x_8 = x_163; -x_9 = x_151; -goto block_16; -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; -x_164 = lean::cnstr_get(x_147, 8); -lean::inc(x_164); -lean::dec(x_147); -x_165 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_165, 0, x_111); -lean::cnstr_set(x_165, 1, x_27); -x_166 = l_List_reverse___rarg(x_165); -lean::cnstr_set(x_109, 1, x_164); -lean::cnstr_set(x_109, 0, x_166); -x_167 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_167, 0, x_109); -x_8 = x_167; -x_9 = x_151; -goto block_16; -} -} -} -else -{ -uint8 x_168; -lean::dec(x_147); -lean::dec(x_142); -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_168 = !lean::is_exclusive(x_150); -if (x_168 == 0) -{ -return x_150; -} -else -{ -obj* x_169; obj* x_170; obj* x_171; -x_169 = lean::cnstr_get(x_150, 0); -x_170 = lean::cnstr_get(x_150, 1); -lean::inc(x_170); -lean::inc(x_169); -lean::dec(x_150); -x_171 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_171, 0, x_169); -lean::cnstr_set(x_171, 1, x_170); -return x_171; -} -} -} -else -{ -obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; -x_172 = lean::cnstr_get(x_145, 0); -x_173 = lean::cnstr_get(x_145, 1); -lean::inc(x_173); -lean::inc(x_172); -lean::dec(x_145); -x_174 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_174, 0, x_40); -lean::cnstr_set(x_174, 1, x_173); -x_175 = lean::cnstr_get(x_172, 5); -lean::inc(x_175); -x_176 = l_List_reverse___rarg(x_175); -lean::inc(x_1); -x_177 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_176, x_174); -if (lean::obj_tag(x_177) == 0) -{ -obj* x_178; obj* x_179; uint8 x_180; -x_178 = lean::cnstr_get(x_177, 1); -lean::inc(x_178); -lean::dec(x_177); -x_179 = l_Lean_Parser_Module_eoi; -x_180 = l_Lean_Parser_Syntax_isOfKind___main(x_179, x_142); -lean::dec(x_142); -if (x_180 == 0) -{ -if (x_2 == 0) -{ -obj* x_181; obj* x_182; obj* x_183; -lean::dec(x_111); -lean::dec(x_27); -x_181 = lean::cnstr_get(x_172, 6); -lean::inc(x_181); -x_182 = lean::cnstr_get(x_172, 7); -lean::inc(x_182); -lean::inc(x_5); -lean::cnstr_set(x_109, 1, x_5); -lean::cnstr_set(x_109, 0, x_182); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_181); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_172); -lean::cnstr_set(x_18, 0, x_114); -x_183 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_183, 0, x_18); -x_8 = x_183; -x_9 = x_178; -goto block_16; -} -else -{ -obj* x_184; obj* x_185; obj* x_186; obj* x_187; -x_184 = lean::cnstr_get(x_172, 6); -lean::inc(x_184); -x_185 = lean::cnstr_get(x_172, 7); -lean::inc(x_185); -x_186 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_186, 0, x_111); -lean::cnstr_set(x_186, 1, x_27); -lean::cnstr_set(x_109, 1, x_186); -lean::cnstr_set(x_109, 0, x_185); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_184); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_172); -lean::cnstr_set(x_18, 0, x_114); -x_187 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_187, 0, x_18); -x_8 = x_187; -x_9 = x_178; -goto block_16; -} -} -else -{ -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_18); -if (x_2 == 0) -{ -obj* x_188; obj* x_189; obj* x_190; -lean::dec(x_111); -lean::dec(x_27); -x_188 = lean::cnstr_get(x_172, 8); -lean::inc(x_188); -lean::dec(x_172); -lean::inc(x_5); -x_189 = l_List_reverse___rarg(x_5); -lean::cnstr_set(x_109, 1, x_188); -lean::cnstr_set(x_109, 0, x_189); -x_190 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_190, 0, x_109); -x_8 = x_190; -x_9 = x_178; -goto block_16; -} -else -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; -x_191 = lean::cnstr_get(x_172, 8); -lean::inc(x_191); -lean::dec(x_172); -x_192 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_192, 0, x_111); -lean::cnstr_set(x_192, 1, x_27); -x_193 = l_List_reverse___rarg(x_192); -lean::cnstr_set(x_109, 1, x_191); -lean::cnstr_set(x_109, 0, x_193); -x_194 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_194, 0, x_109); -x_8 = x_194; -x_9 = x_178; -goto block_16; -} -} -} -else -{ -obj* x_195; obj* x_196; obj* x_197; obj* x_198; -lean::dec(x_172); -lean::dec(x_142); -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_195 = lean::cnstr_get(x_177, 0); -lean::inc(x_195); -x_196 = lean::cnstr_get(x_177, 1); -lean::inc(x_196); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - x_197 = x_177; -} else { - lean::dec_ref(x_177); - x_197 = lean::box(0); -} -if (lean::is_scalar(x_197)) { - x_198 = lean::alloc_cnstr(1, 2, 0); -} else { - x_198 = x_197; -} -lean::cnstr_set(x_198, 0, x_195); -lean::cnstr_set(x_198, 1, x_196); -return x_198; -} -} -} -else -{ -uint8 x_199; -lean::dec(x_142); -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_199 = !lean::is_exclusive(x_145); -if (x_199 == 0) -{ -return x_145; -} -else -{ -obj* x_200; obj* x_201; obj* x_202; -x_200 = lean::cnstr_get(x_145, 0); -x_201 = lean::cnstr_get(x_145, 1); -lean::inc(x_201); -lean::inc(x_200); -lean::dec(x_145); -x_202 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_202, 0, x_200); -lean::cnstr_set(x_202, 1, x_201); -return x_202; -} -} -} -} -else -{ -obj* x_203; obj* x_204; obj* x_205; -x_203 = lean::cnstr_get(x_122, 0); -x_204 = lean::cnstr_get(x_122, 1); -lean::inc(x_204); -lean::inc(x_203); -lean::dec(x_122); -x_205 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_205, 0, x_40); -lean::cnstr_set(x_205, 1, x_204); -if (lean::obj_tag(x_203) == 0) -{ -lean::dec(x_34); -if (x_2 == 0) -{ -obj* x_206; obj* x_207; obj* x_208; -lean::dec(x_111); -lean::dec(x_27); -x_206 = lean::cnstr_get(x_203, 0); -lean::inc(x_206); -lean::dec(x_203); -lean::inc(x_5); -lean::cnstr_set(x_109, 1, x_5); -lean::cnstr_set(x_109, 0, x_26); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_114); -x_207 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_207, 0, x_18); -lean::inc(x_1); -x_208 = lean::apply_2(x_1, x_206, x_205); -if (lean::obj_tag(x_208) == 0) -{ -obj* x_209; -x_209 = lean::cnstr_get(x_208, 1); -lean::inc(x_209); -lean::dec(x_208); -x_8 = x_207; -x_9 = x_209; -goto block_16; -} -else -{ -obj* x_210; obj* x_211; obj* x_212; obj* x_213; -lean::dec(x_207); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_210 = lean::cnstr_get(x_208, 0); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_208, 1); -lean::inc(x_211); -if (lean::is_exclusive(x_208)) { - lean::cnstr_release(x_208, 0); - lean::cnstr_release(x_208, 1); - x_212 = x_208; -} else { - lean::dec_ref(x_208); - x_212 = lean::box(0); -} -if (lean::is_scalar(x_212)) { - x_213 = lean::alloc_cnstr(1, 2, 0); -} else { - x_213 = x_212; -} -lean::cnstr_set(x_213, 0, x_210); -lean::cnstr_set(x_213, 1, x_211); -return x_213; -} -} -else -{ -obj* x_214; obj* x_215; obj* x_216; obj* x_217; -x_214 = lean::cnstr_get(x_203, 0); -lean::inc(x_214); -lean::dec(x_203); -x_215 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_215, 0, x_111); -lean::cnstr_set(x_215, 1, x_27); -lean::cnstr_set(x_109, 1, x_215); -lean::cnstr_set(x_109, 0, x_26); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_114); -x_216 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_216, 0, x_18); -lean::inc(x_1); -x_217 = lean::apply_2(x_1, x_214, x_205); -if (lean::obj_tag(x_217) == 0) -{ -obj* x_218; -x_218 = lean::cnstr_get(x_217, 1); -lean::inc(x_218); -lean::dec(x_217); -x_8 = x_216; -x_9 = x_218; -goto block_16; -} -else -{ -obj* x_219; obj* x_220; obj* x_221; obj* x_222; -lean::dec(x_216); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_219 = lean::cnstr_get(x_217, 0); -lean::inc(x_219); -x_220 = lean::cnstr_get(x_217, 1); -lean::inc(x_220); -if (lean::is_exclusive(x_217)) { - lean::cnstr_release(x_217, 0); - lean::cnstr_release(x_217, 1); - x_221 = x_217; -} else { - lean::dec_ref(x_217); - x_221 = lean::box(0); -} -if (lean::is_scalar(x_221)) { - x_222 = lean::alloc_cnstr(1, 2, 0); -} else { - x_222 = x_221; -} -lean::cnstr_set(x_222, 0, x_219); -lean::cnstr_set(x_222, 1, x_220); -return x_222; -} -} -} -else -{ -obj* x_223; obj* x_224; obj* x_225; obj* x_226; -lean::dec(x_26); -lean::dec(x_23); -x_223 = lean::cnstr_get(x_203, 0); -lean::inc(x_223); -lean::dec(x_203); -lean::inc(x_223); -lean::inc(x_4); -x_224 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed), 4, 3); -lean::closure_set(x_224, 0, x_4); -lean::closure_set(x_224, 1, x_21); -lean::closure_set(x_224, 2, x_223); -x_225 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -x_226 = l_Lean_profileitPure___rarg(x_225, x_34, x_224, x_205); -lean::dec(x_34); -if (lean::obj_tag(x_226) == 0) -{ -obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; obj* x_233; -x_227 = lean::cnstr_get(x_226, 0); -lean::inc(x_227); -x_228 = lean::cnstr_get(x_226, 1); -lean::inc(x_228); -if (lean::is_exclusive(x_226)) { - lean::cnstr_release(x_226, 0); - lean::cnstr_release(x_226, 1); - x_229 = x_226; -} else { - lean::dec_ref(x_226); - x_229 = lean::box(0); -} -if (lean::is_scalar(x_229)) { - x_230 = lean::alloc_cnstr(0, 2, 0); -} else { - x_230 = x_229; -} -lean::cnstr_set(x_230, 0, x_40); -lean::cnstr_set(x_230, 1, x_228); -x_231 = lean::cnstr_get(x_227, 5); -lean::inc(x_231); -x_232 = l_List_reverse___rarg(x_231); -lean::inc(x_1); -x_233 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_232, x_230); -if (lean::obj_tag(x_233) == 0) -{ -obj* x_234; obj* x_235; uint8 x_236; -x_234 = lean::cnstr_get(x_233, 1); -lean::inc(x_234); -lean::dec(x_233); -x_235 = l_Lean_Parser_Module_eoi; -x_236 = l_Lean_Parser_Syntax_isOfKind___main(x_235, x_223); -lean::dec(x_223); -if (x_236 == 0) -{ -if (x_2 == 0) -{ -obj* x_237; obj* x_238; obj* x_239; -lean::dec(x_111); -lean::dec(x_27); -x_237 = lean::cnstr_get(x_227, 6); -lean::inc(x_237); -x_238 = lean::cnstr_get(x_227, 7); -lean::inc(x_238); -lean::inc(x_5); -lean::cnstr_set(x_109, 1, x_5); -lean::cnstr_set(x_109, 0, x_238); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_237); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_227); -lean::cnstr_set(x_18, 0, x_114); -x_239 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_239, 0, x_18); -x_8 = x_239; -x_9 = x_234; -goto block_16; -} -else -{ -obj* x_240; obj* x_241; obj* x_242; obj* x_243; -x_240 = lean::cnstr_get(x_227, 6); -lean::inc(x_240); -x_241 = lean::cnstr_get(x_227, 7); -lean::inc(x_241); -x_242 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_242, 0, x_111); -lean::cnstr_set(x_242, 1, x_27); -lean::cnstr_set(x_109, 1, x_242); -lean::cnstr_set(x_109, 0, x_241); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_240); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_227); -lean::cnstr_set(x_18, 0, x_114); -x_243 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_243, 0, x_18); -x_8 = x_243; -x_9 = x_234; -goto block_16; -} -} -else -{ -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_18); -if (x_2 == 0) -{ -obj* x_244; obj* x_245; obj* x_246; -lean::dec(x_111); -lean::dec(x_27); -x_244 = lean::cnstr_get(x_227, 8); -lean::inc(x_244); -lean::dec(x_227); -lean::inc(x_5); -x_245 = l_List_reverse___rarg(x_5); -lean::cnstr_set(x_109, 1, x_244); -lean::cnstr_set(x_109, 0, x_245); -x_246 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_246, 0, x_109); -x_8 = x_246; -x_9 = x_234; -goto block_16; -} -else -{ -obj* x_247; obj* x_248; obj* x_249; obj* x_250; -x_247 = lean::cnstr_get(x_227, 8); -lean::inc(x_247); -lean::dec(x_227); -x_248 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_248, 0, x_111); -lean::cnstr_set(x_248, 1, x_27); -x_249 = l_List_reverse___rarg(x_248); -lean::cnstr_set(x_109, 1, x_247); -lean::cnstr_set(x_109, 0, x_249); -x_250 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_250, 0, x_109); -x_8 = x_250; -x_9 = x_234; -goto block_16; -} -} -} -else -{ -obj* x_251; obj* x_252; obj* x_253; obj* x_254; -lean::dec(x_227); -lean::dec(x_223); -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_251 = lean::cnstr_get(x_233, 0); -lean::inc(x_251); -x_252 = lean::cnstr_get(x_233, 1); -lean::inc(x_252); -if (lean::is_exclusive(x_233)) { - lean::cnstr_release(x_233, 0); - lean::cnstr_release(x_233, 1); - x_253 = x_233; -} else { - lean::dec_ref(x_233); - x_253 = lean::box(0); -} -if (lean::is_scalar(x_253)) { - x_254 = lean::alloc_cnstr(1, 2, 0); -} else { - x_254 = x_253; -} -lean::cnstr_set(x_254, 0, x_251); -lean::cnstr_set(x_254, 1, x_252); -return x_254; -} -} -else -{ -obj* x_255; obj* x_256; obj* x_257; obj* x_258; -lean::dec(x_223); -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_255 = lean::cnstr_get(x_226, 0); -lean::inc(x_255); -x_256 = lean::cnstr_get(x_226, 1); -lean::inc(x_256); -if (lean::is_exclusive(x_226)) { - lean::cnstr_release(x_226, 0); - lean::cnstr_release(x_226, 1); - x_257 = x_226; -} else { - lean::dec_ref(x_226); - x_257 = lean::box(0); -} -if (lean::is_scalar(x_257)) { - x_258 = lean::alloc_cnstr(1, 2, 0); -} else { - x_258 = x_257; -} -lean::cnstr_set(x_258, 0, x_255); -lean::cnstr_set(x_258, 1, x_256); -return x_258; -} -} -} -} -else -{ -uint8 x_259; -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_259 = !lean::is_exclusive(x_122); -if (x_259 == 0) -{ -return x_122; -} -else -{ -obj* x_260; obj* x_261; obj* x_262; -x_260 = lean::cnstr_get(x_122, 0); -x_261 = lean::cnstr_get(x_122, 1); -lean::inc(x_261); -lean::inc(x_260); -lean::dec(x_122); -x_262 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_262, 0, x_260); -lean::cnstr_set(x_262, 1, x_261); -return x_262; -} -} -} -else -{ -obj* x_263; obj* x_264; obj* x_265; obj* x_266; obj* x_267; -x_263 = lean::cnstr_get(x_117, 1); -lean::inc(x_263); -lean::dec(x_117); -x_264 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_264, 0, x_40); -lean::cnstr_set(x_264, 1, x_263); -lean::inc(x_26); -lean::inc(x_111); -x_265 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed), 3, 2); -lean::closure_set(x_265, 0, x_111); -lean::closure_set(x_265, 1, x_26); -x_266 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2; -x_267 = l_Lean_profileitPure___rarg(x_266, x_34, x_265, x_264); -if (lean::obj_tag(x_267) == 0) -{ -obj* x_268; obj* x_269; obj* x_270; obj* x_271; -x_268 = lean::cnstr_get(x_267, 0); -lean::inc(x_268); -x_269 = lean::cnstr_get(x_267, 1); -lean::inc(x_269); -if (lean::is_exclusive(x_267)) { - lean::cnstr_release(x_267, 0); - lean::cnstr_release(x_267, 1); - x_270 = x_267; -} else { - lean::dec_ref(x_267); - x_270 = lean::box(0); -} -if (lean::is_scalar(x_270)) { - x_271 = lean::alloc_cnstr(0, 2, 0); -} else { - x_271 = x_270; -} -lean::cnstr_set(x_271, 0, x_40); -lean::cnstr_set(x_271, 1, x_269); -if (lean::obj_tag(x_268) == 0) -{ -lean::dec(x_34); -if (x_2 == 0) -{ -obj* x_272; obj* x_273; obj* x_274; -lean::dec(x_111); -lean::dec(x_27); -x_272 = lean::cnstr_get(x_268, 0); -lean::inc(x_272); -lean::dec(x_268); -lean::inc(x_5); -lean::cnstr_set(x_109, 1, x_5); -lean::cnstr_set(x_109, 0, x_26); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_114); -x_273 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_273, 0, x_18); -lean::inc(x_1); -x_274 = lean::apply_2(x_1, x_272, x_271); -if (lean::obj_tag(x_274) == 0) -{ -obj* x_275; -x_275 = lean::cnstr_get(x_274, 1); -lean::inc(x_275); -lean::dec(x_274); -x_8 = x_273; -x_9 = x_275; -goto block_16; -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; -lean::dec(x_273); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_276 = lean::cnstr_get(x_274, 0); -lean::inc(x_276); -x_277 = lean::cnstr_get(x_274, 1); -lean::inc(x_277); -if (lean::is_exclusive(x_274)) { - lean::cnstr_release(x_274, 0); - lean::cnstr_release(x_274, 1); - x_278 = x_274; -} else { - lean::dec_ref(x_274); - x_278 = lean::box(0); -} -if (lean::is_scalar(x_278)) { - x_279 = lean::alloc_cnstr(1, 2, 0); -} else { - x_279 = x_278; -} -lean::cnstr_set(x_279, 0, x_276); -lean::cnstr_set(x_279, 1, x_277); -return x_279; -} -} -else -{ -obj* x_280; obj* x_281; obj* x_282; obj* x_283; -x_280 = lean::cnstr_get(x_268, 0); -lean::inc(x_280); -lean::dec(x_268); -x_281 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_281, 0, x_111); -lean::cnstr_set(x_281, 1, x_27); -lean::cnstr_set(x_109, 1, x_281); -lean::cnstr_set(x_109, 0, x_26); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_114); -x_282 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_282, 0, x_18); -lean::inc(x_1); -x_283 = lean::apply_2(x_1, x_280, x_271); -if (lean::obj_tag(x_283) == 0) -{ -obj* x_284; -x_284 = lean::cnstr_get(x_283, 1); -lean::inc(x_284); -lean::dec(x_283); -x_8 = x_282; -x_9 = x_284; -goto block_16; -} -else -{ -obj* x_285; obj* x_286; obj* x_287; obj* x_288; -lean::dec(x_282); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_285 = lean::cnstr_get(x_283, 0); -lean::inc(x_285); -x_286 = lean::cnstr_get(x_283, 1); -lean::inc(x_286); -if (lean::is_exclusive(x_283)) { - lean::cnstr_release(x_283, 0); - lean::cnstr_release(x_283, 1); - x_287 = x_283; -} else { - lean::dec_ref(x_283); - x_287 = lean::box(0); -} -if (lean::is_scalar(x_287)) { - x_288 = lean::alloc_cnstr(1, 2, 0); -} else { - x_288 = x_287; -} -lean::cnstr_set(x_288, 0, x_285); -lean::cnstr_set(x_288, 1, x_286); -return x_288; -} -} -} -else -{ -obj* x_289; obj* x_290; obj* x_291; obj* x_292; -lean::dec(x_26); -lean::dec(x_23); -x_289 = lean::cnstr_get(x_268, 0); -lean::inc(x_289); -lean::dec(x_268); -lean::inc(x_289); -lean::inc(x_4); -x_290 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed), 4, 3); -lean::closure_set(x_290, 0, x_4); -lean::closure_set(x_290, 1, x_21); -lean::closure_set(x_290, 2, x_289); -x_291 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -x_292 = l_Lean_profileitPure___rarg(x_291, x_34, x_290, x_271); -lean::dec(x_34); -if (lean::obj_tag(x_292) == 0) -{ -obj* x_293; obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; -x_293 = lean::cnstr_get(x_292, 0); -lean::inc(x_293); -x_294 = lean::cnstr_get(x_292, 1); -lean::inc(x_294); -if (lean::is_exclusive(x_292)) { - lean::cnstr_release(x_292, 0); - lean::cnstr_release(x_292, 1); - x_295 = x_292; -} else { - lean::dec_ref(x_292); - x_295 = lean::box(0); -} -if (lean::is_scalar(x_295)) { - x_296 = lean::alloc_cnstr(0, 2, 0); -} else { - x_296 = x_295; -} -lean::cnstr_set(x_296, 0, x_40); -lean::cnstr_set(x_296, 1, x_294); -x_297 = lean::cnstr_get(x_293, 5); -lean::inc(x_297); -x_298 = l_List_reverse___rarg(x_297); -lean::inc(x_1); -x_299 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_298, x_296); -if (lean::obj_tag(x_299) == 0) -{ -obj* x_300; obj* x_301; uint8 x_302; -x_300 = lean::cnstr_get(x_299, 1); -lean::inc(x_300); -lean::dec(x_299); -x_301 = l_Lean_Parser_Module_eoi; -x_302 = l_Lean_Parser_Syntax_isOfKind___main(x_301, x_289); -lean::dec(x_289); -if (x_302 == 0) -{ -if (x_2 == 0) -{ -obj* x_303; obj* x_304; obj* x_305; -lean::dec(x_111); -lean::dec(x_27); -x_303 = lean::cnstr_get(x_293, 6); -lean::inc(x_303); -x_304 = lean::cnstr_get(x_293, 7); -lean::inc(x_304); -lean::inc(x_5); -lean::cnstr_set(x_109, 1, x_5); -lean::cnstr_set(x_109, 0, x_304); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_303); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_293); -lean::cnstr_set(x_18, 0, x_114); -x_305 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_305, 0, x_18); -x_8 = x_305; -x_9 = x_300; -goto block_16; -} -else -{ -obj* x_306; obj* x_307; obj* x_308; obj* x_309; -x_306 = lean::cnstr_get(x_293, 6); -lean::inc(x_306); -x_307 = lean::cnstr_get(x_293, 7); -lean::inc(x_307); -x_308 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_308, 0, x_111); -lean::cnstr_set(x_308, 1, x_27); -lean::cnstr_set(x_109, 1, x_308); -lean::cnstr_set(x_109, 0, x_307); -lean::cnstr_set(x_39, 1, x_109); -lean::cnstr_set(x_39, 0, x_306); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_293); -lean::cnstr_set(x_18, 0, x_114); -x_309 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_309, 0, x_18); -x_8 = x_309; -x_9 = x_300; -goto block_16; -} -} -else -{ -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_18); -if (x_2 == 0) -{ -obj* x_310; obj* x_311; obj* x_312; -lean::dec(x_111); -lean::dec(x_27); -x_310 = lean::cnstr_get(x_293, 8); -lean::inc(x_310); -lean::dec(x_293); -lean::inc(x_5); -x_311 = l_List_reverse___rarg(x_5); -lean::cnstr_set(x_109, 1, x_310); -lean::cnstr_set(x_109, 0, x_311); -x_312 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_312, 0, x_109); -x_8 = x_312; -x_9 = x_300; -goto block_16; -} -else -{ -obj* x_313; obj* x_314; obj* x_315; obj* x_316; -x_313 = lean::cnstr_get(x_293, 8); -lean::inc(x_313); -lean::dec(x_293); -x_314 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_314, 0, x_111); -lean::cnstr_set(x_314, 1, x_27); -x_315 = l_List_reverse___rarg(x_314); -lean::cnstr_set(x_109, 1, x_313); -lean::cnstr_set(x_109, 0, x_315); -x_316 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_316, 0, x_109); -x_8 = x_316; -x_9 = x_300; -goto block_16; -} -} -} -else -{ -obj* x_317; obj* x_318; obj* x_319; obj* x_320; -lean::dec(x_293); -lean::dec(x_289); -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_317 = lean::cnstr_get(x_299, 0); -lean::inc(x_317); -x_318 = lean::cnstr_get(x_299, 1); -lean::inc(x_318); -if (lean::is_exclusive(x_299)) { - lean::cnstr_release(x_299, 0); - lean::cnstr_release(x_299, 1); - x_319 = x_299; -} else { - lean::dec_ref(x_299); - x_319 = lean::box(0); -} -if (lean::is_scalar(x_319)) { - x_320 = lean::alloc_cnstr(1, 2, 0); -} else { - x_320 = x_319; -} -lean::cnstr_set(x_320, 0, x_317); -lean::cnstr_set(x_320, 1, x_318); -return x_320; -} -} -else -{ -obj* x_321; obj* x_322; obj* x_323; obj* x_324; -lean::dec(x_289); -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_321 = lean::cnstr_get(x_292, 0); -lean::inc(x_321); -x_322 = lean::cnstr_get(x_292, 1); -lean::inc(x_322); -if (lean::is_exclusive(x_292)) { - lean::cnstr_release(x_292, 0); - lean::cnstr_release(x_292, 1); - x_323 = x_292; -} else { - lean::dec_ref(x_292); - x_323 = lean::box(0); -} -if (lean::is_scalar(x_323)) { - x_324 = lean::alloc_cnstr(1, 2, 0); -} else { - x_324 = x_323; -} -lean::cnstr_set(x_324, 0, x_321); -lean::cnstr_set(x_324, 1, x_322); -return x_324; -} -} -} -else -{ -obj* x_325; obj* x_326; obj* x_327; obj* x_328; -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_325 = lean::cnstr_get(x_267, 0); -lean::inc(x_325); -x_326 = lean::cnstr_get(x_267, 1); -lean::inc(x_326); -if (lean::is_exclusive(x_267)) { - lean::cnstr_release(x_267, 0); - lean::cnstr_release(x_267, 1); - x_327 = x_267; -} else { - lean::dec_ref(x_267); - x_327 = lean::box(0); -} -if (lean::is_scalar(x_327)) { - x_328 = lean::alloc_cnstr(1, 2, 0); -} else { - x_328 = x_327; -} -lean::cnstr_set(x_328, 0, x_325); -lean::cnstr_set(x_328, 1, x_326); -return x_328; -} -} -} -else -{ -uint8 x_329; -lean::free_heap_obj(x_109); -lean::dec(x_114); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_329 = !lean::is_exclusive(x_117); -if (x_329 == 0) -{ -return x_117; -} -else -{ -obj* x_330; obj* x_331; obj* x_332; -x_330 = lean::cnstr_get(x_117, 0); -x_331 = lean::cnstr_get(x_117, 1); -lean::inc(x_331); -lean::inc(x_330); -lean::dec(x_117); -x_332 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_332, 0, x_330); -lean::cnstr_set(x_332, 1, x_331); -return x_332; -} -} -} -else -{ -obj* x_333; obj* x_334; obj* x_335; obj* x_336; -x_333 = lean::cnstr_get(x_109, 0); -x_334 = lean::cnstr_get(x_109, 1); -lean::inc(x_334); -lean::inc(x_333); -lean::dec(x_109); -x_335 = l_List_reverse___rarg(x_334); -lean::inc(x_1); -x_336 = l_List_mfor___main___at_Lean_runFrontend___spec__4(x_1, x_335, x_37); -if (lean::obj_tag(x_336) == 0) -{ -obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; -x_337 = lean::cnstr_get(x_336, 1); -lean::inc(x_337); -if (lean::is_exclusive(x_336)) { - lean::cnstr_release(x_336, 0); - lean::cnstr_release(x_336, 1); - x_338 = x_336; -} else { - lean::dec_ref(x_336); - x_338 = lean::box(0); -} -if (lean::is_scalar(x_338)) { - x_339 = lean::alloc_cnstr(0, 2, 0); -} else { - x_339 = x_338; -} -lean::cnstr_set(x_339, 0, x_40); -lean::cnstr_set(x_339, 1, x_337); -lean::inc(x_26); -lean::inc(x_111); -x_340 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed), 3, 2); -lean::closure_set(x_340, 0, x_111); -lean::closure_set(x_340, 1, x_26); -x_341 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2; -x_342 = l_Lean_profileitPure___rarg(x_341, x_34, x_340, x_339); -if (lean::obj_tag(x_342) == 0) -{ -obj* x_343; obj* x_344; obj* x_345; obj* x_346; -x_343 = lean::cnstr_get(x_342, 0); -lean::inc(x_343); -x_344 = lean::cnstr_get(x_342, 1); -lean::inc(x_344); -if (lean::is_exclusive(x_342)) { - lean::cnstr_release(x_342, 0); - lean::cnstr_release(x_342, 1); - x_345 = x_342; -} else { - lean::dec_ref(x_342); - x_345 = lean::box(0); -} -if (lean::is_scalar(x_345)) { - x_346 = lean::alloc_cnstr(0, 2, 0); -} else { - x_346 = x_345; -} -lean::cnstr_set(x_346, 0, x_40); -lean::cnstr_set(x_346, 1, x_344); -if (lean::obj_tag(x_343) == 0) -{ -lean::dec(x_34); -if (x_2 == 0) -{ -obj* x_347; obj* x_348; obj* x_349; obj* x_350; -lean::dec(x_111); -lean::dec(x_27); -x_347 = lean::cnstr_get(x_343, 0); -lean::inc(x_347); -lean::dec(x_343); -lean::inc(x_5); -x_348 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_348, 0, x_26); -lean::cnstr_set(x_348, 1, x_5); -lean::cnstr_set(x_39, 1, x_348); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_333); -x_349 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_349, 0, x_18); -lean::inc(x_1); -x_350 = lean::apply_2(x_1, x_347, x_346); -if (lean::obj_tag(x_350) == 0) -{ -obj* x_351; -x_351 = lean::cnstr_get(x_350, 1); -lean::inc(x_351); -lean::dec(x_350); -x_8 = x_349; -x_9 = x_351; -goto block_16; -} -else -{ -obj* x_352; obj* x_353; obj* x_354; obj* x_355; -lean::dec(x_349); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_352 = lean::cnstr_get(x_350, 0); -lean::inc(x_352); -x_353 = lean::cnstr_get(x_350, 1); -lean::inc(x_353); -if (lean::is_exclusive(x_350)) { - lean::cnstr_release(x_350, 0); - lean::cnstr_release(x_350, 1); - x_354 = x_350; -} else { - lean::dec_ref(x_350); - x_354 = lean::box(0); -} -if (lean::is_scalar(x_354)) { - x_355 = lean::alloc_cnstr(1, 2, 0); -} else { - x_355 = x_354; -} -lean::cnstr_set(x_355, 0, x_352); -lean::cnstr_set(x_355, 1, x_353); -return x_355; -} -} -else -{ -obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; -x_356 = lean::cnstr_get(x_343, 0); -lean::inc(x_356); -lean::dec(x_343); -x_357 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_357, 0, x_111); -lean::cnstr_set(x_357, 1, x_27); -x_358 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_358, 0, x_26); -lean::cnstr_set(x_358, 1, x_357); -lean::cnstr_set(x_39, 1, x_358); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_333); -x_359 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_359, 0, x_18); -lean::inc(x_1); -x_360 = lean::apply_2(x_1, x_356, x_346); -if (lean::obj_tag(x_360) == 0) -{ -obj* x_361; -x_361 = lean::cnstr_get(x_360, 1); -lean::inc(x_361); -lean::dec(x_360); -x_8 = x_359; -x_9 = x_361; -goto block_16; -} -else -{ -obj* x_362; obj* x_363; obj* x_364; obj* x_365; -lean::dec(x_359); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_362 = lean::cnstr_get(x_360, 0); -lean::inc(x_362); -x_363 = lean::cnstr_get(x_360, 1); -lean::inc(x_363); -if (lean::is_exclusive(x_360)) { - lean::cnstr_release(x_360, 0); - lean::cnstr_release(x_360, 1); - x_364 = x_360; -} else { - lean::dec_ref(x_360); - x_364 = lean::box(0); -} -if (lean::is_scalar(x_364)) { - x_365 = lean::alloc_cnstr(1, 2, 0); -} else { - x_365 = x_364; -} -lean::cnstr_set(x_365, 0, x_362); -lean::cnstr_set(x_365, 1, x_363); -return x_365; -} -} -} -else -{ -obj* x_366; obj* x_367; obj* x_368; obj* x_369; -lean::dec(x_26); -lean::dec(x_23); -x_366 = lean::cnstr_get(x_343, 0); -lean::inc(x_366); -lean::dec(x_343); -lean::inc(x_366); -lean::inc(x_4); -x_367 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed), 4, 3); -lean::closure_set(x_367, 0, x_4); -lean::closure_set(x_367, 1, x_21); -lean::closure_set(x_367, 2, x_366); -x_368 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -x_369 = l_Lean_profileitPure___rarg(x_368, x_34, x_367, x_346); -lean::dec(x_34); -if (lean::obj_tag(x_369) == 0) -{ -obj* x_370; obj* x_371; obj* x_372; obj* x_373; obj* x_374; obj* x_375; obj* x_376; -x_370 = lean::cnstr_get(x_369, 0); -lean::inc(x_370); -x_371 = lean::cnstr_get(x_369, 1); -lean::inc(x_371); -if (lean::is_exclusive(x_369)) { - lean::cnstr_release(x_369, 0); - lean::cnstr_release(x_369, 1); - x_372 = x_369; -} else { - lean::dec_ref(x_369); - x_372 = lean::box(0); -} -if (lean::is_scalar(x_372)) { - x_373 = lean::alloc_cnstr(0, 2, 0); -} else { - x_373 = x_372; -} -lean::cnstr_set(x_373, 0, x_40); -lean::cnstr_set(x_373, 1, x_371); -x_374 = lean::cnstr_get(x_370, 5); -lean::inc(x_374); -x_375 = l_List_reverse___rarg(x_374); -lean::inc(x_1); -x_376 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_375, x_373); -if (lean::obj_tag(x_376) == 0) -{ -obj* x_377; obj* x_378; uint8 x_379; -x_377 = lean::cnstr_get(x_376, 1); -lean::inc(x_377); -lean::dec(x_376); -x_378 = l_Lean_Parser_Module_eoi; -x_379 = l_Lean_Parser_Syntax_isOfKind___main(x_378, x_366); -lean::dec(x_366); -if (x_379 == 0) -{ -if (x_2 == 0) -{ -obj* x_380; obj* x_381; obj* x_382; obj* x_383; -lean::dec(x_111); -lean::dec(x_27); -x_380 = lean::cnstr_get(x_370, 6); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_370, 7); -lean::inc(x_381); -lean::inc(x_5); -x_382 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_382, 0, x_381); -lean::cnstr_set(x_382, 1, x_5); -lean::cnstr_set(x_39, 1, x_382); -lean::cnstr_set(x_39, 0, x_380); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_370); -lean::cnstr_set(x_18, 0, x_333); -x_383 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_383, 0, x_18); -x_8 = x_383; -x_9 = x_377; -goto block_16; -} -else -{ -obj* x_384; obj* x_385; obj* x_386; obj* x_387; obj* x_388; -x_384 = lean::cnstr_get(x_370, 6); -lean::inc(x_384); -x_385 = lean::cnstr_get(x_370, 7); -lean::inc(x_385); -x_386 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_386, 0, x_111); -lean::cnstr_set(x_386, 1, x_27); -x_387 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_387, 0, x_385); -lean::cnstr_set(x_387, 1, x_386); -lean::cnstr_set(x_39, 1, x_387); -lean::cnstr_set(x_39, 0, x_384); -lean::cnstr_set(x_19, 1, x_39); -lean::cnstr_set(x_19, 0, x_370); -lean::cnstr_set(x_18, 0, x_333); -x_388 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_388, 0, x_18); -x_8 = x_388; -x_9 = x_377; -goto block_16; -} -} -else -{ -lean::dec(x_333); -lean::free_heap_obj(x_39); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_18); -if (x_2 == 0) -{ -obj* x_389; obj* x_390; obj* x_391; obj* x_392; -lean::dec(x_111); -lean::dec(x_27); -x_389 = lean::cnstr_get(x_370, 8); -lean::inc(x_389); -lean::dec(x_370); -lean::inc(x_5); -x_390 = l_List_reverse___rarg(x_5); -x_391 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_391, 0, x_390); -lean::cnstr_set(x_391, 1, x_389); -x_392 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_392, 0, x_391); -x_8 = x_392; -x_9 = x_377; -goto block_16; -} -else -{ -obj* x_393; obj* x_394; obj* x_395; obj* x_396; obj* x_397; -x_393 = lean::cnstr_get(x_370, 8); -lean::inc(x_393); -lean::dec(x_370); -x_394 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_394, 0, x_111); -lean::cnstr_set(x_394, 1, x_27); -x_395 = l_List_reverse___rarg(x_394); -x_396 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_396, 0, x_395); -lean::cnstr_set(x_396, 1, x_393); -x_397 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_397, 0, x_396); -x_8 = x_397; -x_9 = x_377; -goto block_16; -} -} -} -else -{ -obj* x_398; obj* x_399; obj* x_400; obj* x_401; -lean::dec(x_370); -lean::dec(x_366); -lean::dec(x_333); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_398 = lean::cnstr_get(x_376, 0); -lean::inc(x_398); -x_399 = lean::cnstr_get(x_376, 1); -lean::inc(x_399); -if (lean::is_exclusive(x_376)) { - lean::cnstr_release(x_376, 0); - lean::cnstr_release(x_376, 1); - x_400 = x_376; -} else { - lean::dec_ref(x_376); - x_400 = lean::box(0); -} -if (lean::is_scalar(x_400)) { - x_401 = lean::alloc_cnstr(1, 2, 0); -} else { - x_401 = x_400; -} -lean::cnstr_set(x_401, 0, x_398); -lean::cnstr_set(x_401, 1, x_399); -return x_401; -} -} -else -{ -obj* x_402; obj* x_403; obj* x_404; obj* x_405; -lean::dec(x_366); -lean::dec(x_333); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_402 = lean::cnstr_get(x_369, 0); -lean::inc(x_402); -x_403 = lean::cnstr_get(x_369, 1); -lean::inc(x_403); -if (lean::is_exclusive(x_369)) { - lean::cnstr_release(x_369, 0); - lean::cnstr_release(x_369, 1); - x_404 = x_369; -} else { - lean::dec_ref(x_369); - x_404 = lean::box(0); -} -if (lean::is_scalar(x_404)) { - x_405 = lean::alloc_cnstr(1, 2, 0); -} else { - x_405 = x_404; -} -lean::cnstr_set(x_405, 0, x_402); -lean::cnstr_set(x_405, 1, x_403); -return x_405; -} -} -} -else -{ -obj* x_406; obj* x_407; obj* x_408; obj* x_409; -lean::dec(x_333); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_406 = lean::cnstr_get(x_342, 0); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_342, 1); -lean::inc(x_407); -if (lean::is_exclusive(x_342)) { - lean::cnstr_release(x_342, 0); - lean::cnstr_release(x_342, 1); - x_408 = x_342; -} else { - lean::dec_ref(x_342); - x_408 = lean::box(0); -} -if (lean::is_scalar(x_408)) { - x_409 = lean::alloc_cnstr(1, 2, 0); -} else { - x_409 = x_408; -} -lean::cnstr_set(x_409, 0, x_406); -lean::cnstr_set(x_409, 1, x_407); -return x_409; -} -} -else -{ -obj* x_410; obj* x_411; obj* x_412; obj* x_413; -lean::dec(x_333); -lean::free_heap_obj(x_39); -lean::dec(x_111); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_410 = lean::cnstr_get(x_336, 0); -lean::inc(x_410); -x_411 = lean::cnstr_get(x_336, 1); -lean::inc(x_411); -if (lean::is_exclusive(x_336)) { - lean::cnstr_release(x_336, 0); - lean::cnstr_release(x_336, 1); - x_412 = x_336; -} else { - lean::dec_ref(x_336); - x_412 = lean::box(0); -} -if (lean::is_scalar(x_412)) { - x_413 = lean::alloc_cnstr(1, 2, 0); -} else { - x_413 = x_412; -} -lean::cnstr_set(x_413, 0, x_410); -lean::cnstr_set(x_413, 1, x_411); -return x_413; -} -} -} -else -{ -obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; -x_414 = lean::cnstr_get(x_39, 0); -lean::inc(x_414); -lean::dec(x_39); -x_415 = lean::cnstr_get(x_109, 0); -lean::inc(x_415); -x_416 = lean::cnstr_get(x_109, 1); -lean::inc(x_416); -if (lean::is_exclusive(x_109)) { - lean::cnstr_release(x_109, 0); - lean::cnstr_release(x_109, 1); - x_417 = x_109; -} else { - lean::dec_ref(x_109); - x_417 = lean::box(0); -} -x_418 = l_List_reverse___rarg(x_416); -lean::inc(x_1); -x_419 = l_List_mfor___main___at_Lean_runFrontend___spec__4(x_1, x_418, x_37); -if (lean::obj_tag(x_419) == 0) -{ -obj* x_420; obj* x_421; obj* x_422; obj* x_423; obj* x_424; obj* x_425; -x_420 = lean::cnstr_get(x_419, 1); -lean::inc(x_420); -if (lean::is_exclusive(x_419)) { - lean::cnstr_release(x_419, 0); - lean::cnstr_release(x_419, 1); - x_421 = x_419; -} else { - lean::dec_ref(x_419); - x_421 = lean::box(0); -} -if (lean::is_scalar(x_421)) { - x_422 = lean::alloc_cnstr(0, 2, 0); -} else { - x_422 = x_421; -} -lean::cnstr_set(x_422, 0, x_40); -lean::cnstr_set(x_422, 1, x_420); -lean::inc(x_26); -lean::inc(x_414); -x_423 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed), 3, 2); -lean::closure_set(x_423, 0, x_414); -lean::closure_set(x_423, 1, x_26); -x_424 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2; -x_425 = l_Lean_profileitPure___rarg(x_424, x_34, x_423, x_422); -if (lean::obj_tag(x_425) == 0) -{ -obj* x_426; obj* x_427; obj* x_428; obj* x_429; -x_426 = lean::cnstr_get(x_425, 0); -lean::inc(x_426); -x_427 = lean::cnstr_get(x_425, 1); -lean::inc(x_427); -if (lean::is_exclusive(x_425)) { - lean::cnstr_release(x_425, 0); - lean::cnstr_release(x_425, 1); - x_428 = x_425; -} else { - lean::dec_ref(x_425); - x_428 = lean::box(0); -} -if (lean::is_scalar(x_428)) { - x_429 = lean::alloc_cnstr(0, 2, 0); -} else { - x_429 = x_428; -} -lean::cnstr_set(x_429, 0, x_40); -lean::cnstr_set(x_429, 1, x_427); -if (lean::obj_tag(x_426) == 0) -{ -lean::dec(x_34); -if (x_2 == 0) -{ -obj* x_430; obj* x_431; obj* x_432; obj* x_433; obj* x_434; -lean::dec(x_414); -lean::dec(x_27); -x_430 = lean::cnstr_get(x_426, 0); -lean::inc(x_430); -lean::dec(x_426); -lean::inc(x_5); -if (lean::is_scalar(x_417)) { - x_431 = lean::alloc_cnstr(0, 2, 0); -} else { - x_431 = x_417; -} -lean::cnstr_set(x_431, 0, x_26); -lean::cnstr_set(x_431, 1, x_5); -x_432 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_432, 0, x_23); -lean::cnstr_set(x_432, 1, x_431); -lean::cnstr_set(x_19, 1, x_432); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_415); -x_433 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_433, 0, x_18); -lean::inc(x_1); -x_434 = lean::apply_2(x_1, x_430, x_429); -if (lean::obj_tag(x_434) == 0) -{ -obj* x_435; -x_435 = lean::cnstr_get(x_434, 1); -lean::inc(x_435); -lean::dec(x_434); -x_8 = x_433; -x_9 = x_435; -goto block_16; -} -else -{ -obj* x_436; obj* x_437; obj* x_438; obj* x_439; -lean::dec(x_433); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_436 = lean::cnstr_get(x_434, 0); -lean::inc(x_436); -x_437 = lean::cnstr_get(x_434, 1); -lean::inc(x_437); -if (lean::is_exclusive(x_434)) { - lean::cnstr_release(x_434, 0); - lean::cnstr_release(x_434, 1); - x_438 = x_434; -} else { - lean::dec_ref(x_434); - x_438 = lean::box(0); -} -if (lean::is_scalar(x_438)) { - x_439 = lean::alloc_cnstr(1, 2, 0); -} else { - x_439 = x_438; -} -lean::cnstr_set(x_439, 0, x_436); -lean::cnstr_set(x_439, 1, x_437); -return x_439; -} -} -else -{ -obj* x_440; obj* x_441; obj* x_442; obj* x_443; obj* x_444; obj* x_445; -x_440 = lean::cnstr_get(x_426, 0); -lean::inc(x_440); -lean::dec(x_426); -x_441 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_441, 0, x_414); -lean::cnstr_set(x_441, 1, x_27); -if (lean::is_scalar(x_417)) { - x_442 = lean::alloc_cnstr(0, 2, 0); -} else { - x_442 = x_417; -} -lean::cnstr_set(x_442, 0, x_26); -lean::cnstr_set(x_442, 1, x_441); -x_443 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_443, 0, x_23); -lean::cnstr_set(x_443, 1, x_442); -lean::cnstr_set(x_19, 1, x_443); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_415); -x_444 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_444, 0, x_18); -lean::inc(x_1); -x_445 = lean::apply_2(x_1, x_440, x_429); -if (lean::obj_tag(x_445) == 0) -{ -obj* x_446; -x_446 = lean::cnstr_get(x_445, 1); -lean::inc(x_446); -lean::dec(x_445); -x_8 = x_444; -x_9 = x_446; -goto block_16; -} -else -{ -obj* x_447; obj* x_448; obj* x_449; obj* x_450; -lean::dec(x_444); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_447 = lean::cnstr_get(x_445, 0); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_445, 1); -lean::inc(x_448); -if (lean::is_exclusive(x_445)) { - lean::cnstr_release(x_445, 0); - lean::cnstr_release(x_445, 1); - x_449 = x_445; -} else { - lean::dec_ref(x_445); - x_449 = lean::box(0); -} -if (lean::is_scalar(x_449)) { - x_450 = lean::alloc_cnstr(1, 2, 0); -} else { - x_450 = x_449; -} -lean::cnstr_set(x_450, 0, x_447); -lean::cnstr_set(x_450, 1, x_448); -return x_450; -} -} -} -else -{ -obj* x_451; obj* x_452; obj* x_453; obj* x_454; -lean::dec(x_26); -lean::dec(x_23); -x_451 = lean::cnstr_get(x_426, 0); -lean::inc(x_451); -lean::dec(x_426); -lean::inc(x_451); -lean::inc(x_4); -x_452 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed), 4, 3); -lean::closure_set(x_452, 0, x_4); -lean::closure_set(x_452, 1, x_21); -lean::closure_set(x_452, 2, x_451); -x_453 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -x_454 = l_Lean_profileitPure___rarg(x_453, x_34, x_452, x_429); -lean::dec(x_34); -if (lean::obj_tag(x_454) == 0) -{ -obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; -x_455 = lean::cnstr_get(x_454, 0); -lean::inc(x_455); -x_456 = lean::cnstr_get(x_454, 1); -lean::inc(x_456); -if (lean::is_exclusive(x_454)) { - lean::cnstr_release(x_454, 0); - lean::cnstr_release(x_454, 1); - x_457 = x_454; -} else { - lean::dec_ref(x_454); - x_457 = lean::box(0); -} -if (lean::is_scalar(x_457)) { - x_458 = lean::alloc_cnstr(0, 2, 0); -} else { - x_458 = x_457; -} -lean::cnstr_set(x_458, 0, x_40); -lean::cnstr_set(x_458, 1, x_456); -x_459 = lean::cnstr_get(x_455, 5); -lean::inc(x_459); -x_460 = l_List_reverse___rarg(x_459); -lean::inc(x_1); -x_461 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_460, x_458); -if (lean::obj_tag(x_461) == 0) -{ -obj* x_462; obj* x_463; uint8 x_464; -x_462 = lean::cnstr_get(x_461, 1); -lean::inc(x_462); -lean::dec(x_461); -x_463 = l_Lean_Parser_Module_eoi; -x_464 = l_Lean_Parser_Syntax_isOfKind___main(x_463, x_451); -lean::dec(x_451); -if (x_464 == 0) -{ -if (x_2 == 0) -{ -obj* x_465; obj* x_466; obj* x_467; obj* x_468; obj* x_469; -lean::dec(x_414); -lean::dec(x_27); -x_465 = lean::cnstr_get(x_455, 6); -lean::inc(x_465); -x_466 = lean::cnstr_get(x_455, 7); -lean::inc(x_466); -lean::inc(x_5); -if (lean::is_scalar(x_417)) { - x_467 = lean::alloc_cnstr(0, 2, 0); -} else { - x_467 = x_417; -} -lean::cnstr_set(x_467, 0, x_466); -lean::cnstr_set(x_467, 1, x_5); -x_468 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_468, 0, x_465); -lean::cnstr_set(x_468, 1, x_467); -lean::cnstr_set(x_19, 1, x_468); -lean::cnstr_set(x_19, 0, x_455); -lean::cnstr_set(x_18, 0, x_415); -x_469 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_469, 0, x_18); -x_8 = x_469; -x_9 = x_462; -goto block_16; -} -else -{ -obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; obj* x_475; -x_470 = lean::cnstr_get(x_455, 6); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_455, 7); -lean::inc(x_471); -x_472 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_472, 0, x_414); -lean::cnstr_set(x_472, 1, x_27); -if (lean::is_scalar(x_417)) { - x_473 = lean::alloc_cnstr(0, 2, 0); -} else { - x_473 = x_417; -} -lean::cnstr_set(x_473, 0, x_471); -lean::cnstr_set(x_473, 1, x_472); -x_474 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_474, 0, x_470); -lean::cnstr_set(x_474, 1, x_473); -lean::cnstr_set(x_19, 1, x_474); -lean::cnstr_set(x_19, 0, x_455); -lean::cnstr_set(x_18, 0, x_415); -x_475 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_475, 0, x_18); -x_8 = x_475; -x_9 = x_462; -goto block_16; -} -} -else -{ -lean::dec(x_415); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_18); -if (x_2 == 0) -{ -obj* x_476; obj* x_477; obj* x_478; obj* x_479; -lean::dec(x_414); -lean::dec(x_27); -x_476 = lean::cnstr_get(x_455, 8); -lean::inc(x_476); -lean::dec(x_455); -lean::inc(x_5); -x_477 = l_List_reverse___rarg(x_5); -if (lean::is_scalar(x_417)) { - x_478 = lean::alloc_cnstr(0, 2, 0); -} else { - x_478 = x_417; -} -lean::cnstr_set(x_478, 0, x_477); -lean::cnstr_set(x_478, 1, x_476); -x_479 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_479, 0, x_478); -x_8 = x_479; -x_9 = x_462; -goto block_16; -} -else -{ -obj* x_480; obj* x_481; obj* x_482; obj* x_483; obj* x_484; -x_480 = lean::cnstr_get(x_455, 8); -lean::inc(x_480); -lean::dec(x_455); -x_481 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_481, 0, x_414); -lean::cnstr_set(x_481, 1, x_27); -x_482 = l_List_reverse___rarg(x_481); -if (lean::is_scalar(x_417)) { - x_483 = lean::alloc_cnstr(0, 2, 0); -} else { - x_483 = x_417; -} -lean::cnstr_set(x_483, 0, x_482); -lean::cnstr_set(x_483, 1, x_480); -x_484 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_484, 0, x_483); -x_8 = x_484; -x_9 = x_462; -goto block_16; -} -} -} -else -{ -obj* x_485; obj* x_486; obj* x_487; obj* x_488; -lean::dec(x_455); -lean::dec(x_451); -lean::dec(x_417); -lean::dec(x_415); -lean::dec(x_414); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_485 = lean::cnstr_get(x_461, 0); -lean::inc(x_485); -x_486 = lean::cnstr_get(x_461, 1); -lean::inc(x_486); -if (lean::is_exclusive(x_461)) { - lean::cnstr_release(x_461, 0); - lean::cnstr_release(x_461, 1); - x_487 = x_461; -} else { - lean::dec_ref(x_461); - x_487 = lean::box(0); -} -if (lean::is_scalar(x_487)) { - x_488 = lean::alloc_cnstr(1, 2, 0); -} else { - x_488 = x_487; -} -lean::cnstr_set(x_488, 0, x_485); -lean::cnstr_set(x_488, 1, x_486); -return x_488; -} -} -else -{ -obj* x_489; obj* x_490; obj* x_491; obj* x_492; -lean::dec(x_451); -lean::dec(x_417); -lean::dec(x_415); -lean::dec(x_414); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_489 = lean::cnstr_get(x_454, 0); -lean::inc(x_489); -x_490 = lean::cnstr_get(x_454, 1); -lean::inc(x_490); -if (lean::is_exclusive(x_454)) { - lean::cnstr_release(x_454, 0); - lean::cnstr_release(x_454, 1); - x_491 = x_454; -} else { - lean::dec_ref(x_454); - x_491 = lean::box(0); -} -if (lean::is_scalar(x_491)) { - x_492 = lean::alloc_cnstr(1, 2, 0); -} else { - x_492 = x_491; -} -lean::cnstr_set(x_492, 0, x_489); -lean::cnstr_set(x_492, 1, x_490); -return x_492; -} -} -} -else -{ -obj* x_493; obj* x_494; obj* x_495; obj* x_496; -lean::dec(x_417); -lean::dec(x_415); -lean::dec(x_414); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_493 = lean::cnstr_get(x_425, 0); -lean::inc(x_493); -x_494 = lean::cnstr_get(x_425, 1); -lean::inc(x_494); -if (lean::is_exclusive(x_425)) { - lean::cnstr_release(x_425, 0); - lean::cnstr_release(x_425, 1); - x_495 = x_425; -} else { - lean::dec_ref(x_425); - x_495 = lean::box(0); -} -if (lean::is_scalar(x_495)) { - x_496 = lean::alloc_cnstr(1, 2, 0); -} else { - x_496 = x_495; -} -lean::cnstr_set(x_496, 0, x_493); -lean::cnstr_set(x_496, 1, x_494); -return x_496; -} -} -else -{ -obj* x_497; obj* x_498; obj* x_499; obj* x_500; -lean::dec(x_417); -lean::dec(x_415); -lean::dec(x_414); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_497 = lean::cnstr_get(x_419, 0); -lean::inc(x_497); -x_498 = lean::cnstr_get(x_419, 1); -lean::inc(x_498); -if (lean::is_exclusive(x_419)) { - lean::cnstr_release(x_419, 0); - lean::cnstr_release(x_419, 1); - x_499 = x_419; -} else { - lean::dec_ref(x_419); - x_499 = lean::box(0); -} -if (lean::is_scalar(x_499)) { - x_500 = lean::alloc_cnstr(1, 2, 0); -} else { - x_500 = x_499; -} -lean::cnstr_set(x_500, 0, x_497); -lean::cnstr_set(x_500, 1, x_498); -return x_500; -} -} -} -} -else -{ -obj* x_501; obj* x_502; obj* x_503; obj* x_504; obj* x_505; -x_501 = lean::cnstr_get(x_37, 0); -x_502 = lean::cnstr_get(x_37, 1); -lean::inc(x_502); -lean::inc(x_501); -lean::dec(x_37); -x_503 = lean::box(0); -x_504 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_504, 0, x_503); -lean::cnstr_set(x_504, 1, x_502); -x_505 = lean::cnstr_get(x_501, 1); -lean::inc(x_505); -if (lean::obj_tag(x_505) == 0) -{ -obj* x_506; obj* x_507; obj* x_508; obj* x_509; -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -x_506 = lean::cnstr_get(x_501, 0); -lean::inc(x_506); -if (lean::is_exclusive(x_501)) { - lean::cnstr_release(x_501, 0); - lean::cnstr_release(x_501, 1); - x_507 = x_501; -} else { - lean::dec_ref(x_501); - x_507 = lean::box(0); -} -x_508 = lean::cnstr_get(x_505, 0); -lean::inc(x_508); -lean::dec(x_505); -lean::inc(x_1); -x_509 = lean::apply_2(x_1, x_508, x_504); -if (lean::obj_tag(x_509) == 0) -{ -obj* x_510; obj* x_511; obj* x_512; obj* x_513; -x_510 = lean::cnstr_get(x_509, 1); -lean::inc(x_510); -if (lean::is_exclusive(x_509)) { - lean::cnstr_release(x_509, 0); - lean::cnstr_release(x_509, 1); - x_511 = x_509; -} else { - lean::dec_ref(x_509); - x_511 = lean::box(0); -} -if (lean::is_scalar(x_511)) { - x_512 = lean::alloc_cnstr(0, 2, 0); -} else { - x_512 = x_511; -} -lean::cnstr_set(x_512, 0, x_503); -lean::cnstr_set(x_512, 1, x_510); -lean::inc(x_3); -lean::inc(x_1); -x_513 = l_List_mfor___main___at_Lean_runFrontend___spec__3(x_1, x_3, x_512); -if (lean::obj_tag(x_513) == 0) -{ -if (x_2 == 0) -{ -obj* x_514; obj* x_515; obj* x_516; obj* x_517; obj* x_518; -lean::dec(x_506); -lean::dec(x_27); -x_514 = lean::cnstr_get(x_513, 1); -lean::inc(x_514); -lean::dec(x_513); -x_515 = lean::cnstr_get(x_21, 8); -lean::inc(x_515); -lean::dec(x_21); -lean::inc(x_5); -x_516 = l_List_reverse___rarg(x_5); -if (lean::is_scalar(x_507)) { - x_517 = lean::alloc_cnstr(0, 2, 0); -} else { - x_517 = x_507; -} -lean::cnstr_set(x_517, 0, x_516); -lean::cnstr_set(x_517, 1, x_515); -x_518 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_518, 0, x_517); -x_8 = x_518; -x_9 = x_514; -goto block_16; -} -else -{ -obj* x_519; obj* x_520; obj* x_521; obj* x_522; obj* x_523; obj* x_524; -x_519 = lean::cnstr_get(x_513, 1); -lean::inc(x_519); -lean::dec(x_513); -x_520 = lean::cnstr_get(x_21, 8); -lean::inc(x_520); -lean::dec(x_21); -x_521 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_521, 0, x_506); -lean::cnstr_set(x_521, 1, x_27); -x_522 = l_List_reverse___rarg(x_521); -if (lean::is_scalar(x_507)) { - x_523 = lean::alloc_cnstr(0, 2, 0); -} else { - x_523 = x_507; -} -lean::cnstr_set(x_523, 0, x_522); -lean::cnstr_set(x_523, 1, x_520); -x_524 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_524, 0, x_523); -x_8 = x_524; -x_9 = x_519; -goto block_16; -} -} -else -{ -obj* x_525; obj* x_526; obj* x_527; obj* x_528; -lean::dec(x_507); -lean::dec(x_506); -lean::dec(x_27); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_525 = lean::cnstr_get(x_513, 0); -lean::inc(x_525); -x_526 = lean::cnstr_get(x_513, 1); -lean::inc(x_526); -if (lean::is_exclusive(x_513)) { - lean::cnstr_release(x_513, 0); - lean::cnstr_release(x_513, 1); - x_527 = x_513; -} else { - lean::dec_ref(x_513); - x_527 = lean::box(0); -} -if (lean::is_scalar(x_527)) { - x_528 = lean::alloc_cnstr(1, 2, 0); -} else { - x_528 = x_527; -} -lean::cnstr_set(x_528, 0, x_525); -lean::cnstr_set(x_528, 1, x_526); -return x_528; -} -} -else -{ -obj* x_529; obj* x_530; obj* x_531; obj* x_532; -lean::dec(x_507); -lean::dec(x_506); -lean::dec(x_27); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_529 = lean::cnstr_get(x_509, 0); -lean::inc(x_529); -x_530 = lean::cnstr_get(x_509, 1); -lean::inc(x_530); -if (lean::is_exclusive(x_509)) { - lean::cnstr_release(x_509, 0); - lean::cnstr_release(x_509, 1); - x_531 = x_509; -} else { - lean::dec_ref(x_509); - x_531 = lean::box(0); -} -if (lean::is_scalar(x_531)) { - x_532 = lean::alloc_cnstr(1, 2, 0); -} else { - x_532 = x_531; -} -lean::cnstr_set(x_532, 0, x_529); -lean::cnstr_set(x_532, 1, x_530); -return x_532; -} -} -else -{ -obj* x_533; obj* x_534; obj* x_535; obj* x_536; obj* x_537; obj* x_538; obj* x_539; obj* x_540; -x_533 = lean::cnstr_get(x_505, 0); -lean::inc(x_533); -lean::dec(x_505); -x_534 = lean::cnstr_get(x_501, 0); -lean::inc(x_534); -if (lean::is_exclusive(x_501)) { - lean::cnstr_release(x_501, 0); - lean::cnstr_release(x_501, 1); - x_535 = x_501; -} else { - lean::dec_ref(x_501); - x_535 = lean::box(0); -} -x_536 = lean::cnstr_get(x_533, 0); -lean::inc(x_536); -x_537 = lean::cnstr_get(x_533, 1); -lean::inc(x_537); -if (lean::is_exclusive(x_533)) { - lean::cnstr_release(x_533, 0); - lean::cnstr_release(x_533, 1); - x_538 = x_533; -} else { - lean::dec_ref(x_533); - x_538 = lean::box(0); -} -x_539 = l_List_reverse___rarg(x_537); -lean::inc(x_1); -x_540 = l_List_mfor___main___at_Lean_runFrontend___spec__4(x_1, x_539, x_504); -if (lean::obj_tag(x_540) == 0) -{ -obj* x_541; obj* x_542; obj* x_543; obj* x_544; obj* x_545; obj* x_546; -x_541 = lean::cnstr_get(x_540, 1); -lean::inc(x_541); -if (lean::is_exclusive(x_540)) { - lean::cnstr_release(x_540, 0); - lean::cnstr_release(x_540, 1); - x_542 = x_540; -} else { - lean::dec_ref(x_540); - x_542 = lean::box(0); -} -if (lean::is_scalar(x_542)) { - x_543 = lean::alloc_cnstr(0, 2, 0); -} else { - x_543 = x_542; -} -lean::cnstr_set(x_543, 0, x_503); -lean::cnstr_set(x_543, 1, x_541); -lean::inc(x_26); -lean::inc(x_534); -x_544 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed), 3, 2); -lean::closure_set(x_544, 0, x_534); -lean::closure_set(x_544, 1, x_26); -x_545 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2; -x_546 = l_Lean_profileitPure___rarg(x_545, x_34, x_544, x_543); -if (lean::obj_tag(x_546) == 0) -{ -obj* x_547; obj* x_548; obj* x_549; obj* x_550; -x_547 = lean::cnstr_get(x_546, 0); -lean::inc(x_547); -x_548 = lean::cnstr_get(x_546, 1); -lean::inc(x_548); -if (lean::is_exclusive(x_546)) { - lean::cnstr_release(x_546, 0); - lean::cnstr_release(x_546, 1); - x_549 = x_546; -} else { - lean::dec_ref(x_546); - x_549 = lean::box(0); -} -if (lean::is_scalar(x_549)) { - x_550 = lean::alloc_cnstr(0, 2, 0); -} else { - x_550 = x_549; -} -lean::cnstr_set(x_550, 0, x_503); -lean::cnstr_set(x_550, 1, x_548); -if (lean::obj_tag(x_547) == 0) -{ -lean::dec(x_34); -if (x_2 == 0) -{ -obj* x_551; obj* x_552; obj* x_553; obj* x_554; obj* x_555; -lean::dec(x_534); -lean::dec(x_27); -x_551 = lean::cnstr_get(x_547, 0); -lean::inc(x_551); -lean::dec(x_547); -lean::inc(x_5); -if (lean::is_scalar(x_538)) { - x_552 = lean::alloc_cnstr(0, 2, 0); -} else { - x_552 = x_538; -} -lean::cnstr_set(x_552, 0, x_26); -lean::cnstr_set(x_552, 1, x_5); -if (lean::is_scalar(x_535)) { - x_553 = lean::alloc_cnstr(0, 2, 0); -} else { - x_553 = x_535; -} -lean::cnstr_set(x_553, 0, x_23); -lean::cnstr_set(x_553, 1, x_552); -lean::cnstr_set(x_19, 1, x_553); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_536); -x_554 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_554, 0, x_18); -lean::inc(x_1); -x_555 = lean::apply_2(x_1, x_551, x_550); -if (lean::obj_tag(x_555) == 0) -{ -obj* x_556; -x_556 = lean::cnstr_get(x_555, 1); -lean::inc(x_556); -lean::dec(x_555); -x_8 = x_554; -x_9 = x_556; -goto block_16; -} -else -{ -obj* x_557; obj* x_558; obj* x_559; obj* x_560; -lean::dec(x_554); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_557 = lean::cnstr_get(x_555, 0); -lean::inc(x_557); -x_558 = lean::cnstr_get(x_555, 1); -lean::inc(x_558); -if (lean::is_exclusive(x_555)) { - lean::cnstr_release(x_555, 0); - lean::cnstr_release(x_555, 1); - x_559 = x_555; -} else { - lean::dec_ref(x_555); - x_559 = lean::box(0); -} -if (lean::is_scalar(x_559)) { - x_560 = lean::alloc_cnstr(1, 2, 0); -} else { - x_560 = x_559; -} -lean::cnstr_set(x_560, 0, x_557); -lean::cnstr_set(x_560, 1, x_558); -return x_560; -} -} -else -{ -obj* x_561; obj* x_562; obj* x_563; obj* x_564; obj* x_565; obj* x_566; -x_561 = lean::cnstr_get(x_547, 0); -lean::inc(x_561); -lean::dec(x_547); -x_562 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_562, 0, x_534); -lean::cnstr_set(x_562, 1, x_27); -if (lean::is_scalar(x_538)) { - x_563 = lean::alloc_cnstr(0, 2, 0); -} else { - x_563 = x_538; -} -lean::cnstr_set(x_563, 0, x_26); -lean::cnstr_set(x_563, 1, x_562); -if (lean::is_scalar(x_535)) { - x_564 = lean::alloc_cnstr(0, 2, 0); -} else { - x_564 = x_535; -} -lean::cnstr_set(x_564, 0, x_23); -lean::cnstr_set(x_564, 1, x_563); -lean::cnstr_set(x_19, 1, x_564); -lean::cnstr_set(x_19, 0, x_21); -lean::cnstr_set(x_18, 0, x_536); -x_565 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_565, 0, x_18); -lean::inc(x_1); -x_566 = lean::apply_2(x_1, x_561, x_550); -if (lean::obj_tag(x_566) == 0) -{ -obj* x_567; -x_567 = lean::cnstr_get(x_566, 1); -lean::inc(x_567); -lean::dec(x_566); -x_8 = x_565; -x_9 = x_567; -goto block_16; -} -else -{ -obj* x_568; obj* x_569; obj* x_570; obj* x_571; -lean::dec(x_565); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_568 = lean::cnstr_get(x_566, 0); -lean::inc(x_568); -x_569 = lean::cnstr_get(x_566, 1); -lean::inc(x_569); -if (lean::is_exclusive(x_566)) { - lean::cnstr_release(x_566, 0); - lean::cnstr_release(x_566, 1); - x_570 = x_566; -} else { - lean::dec_ref(x_566); - x_570 = lean::box(0); -} -if (lean::is_scalar(x_570)) { - x_571 = lean::alloc_cnstr(1, 2, 0); -} else { - x_571 = x_570; -} -lean::cnstr_set(x_571, 0, x_568); -lean::cnstr_set(x_571, 1, x_569); -return x_571; -} -} -} -else -{ -obj* x_572; obj* x_573; obj* x_574; obj* x_575; -lean::dec(x_26); -lean::dec(x_23); -x_572 = lean::cnstr_get(x_547, 0); -lean::inc(x_572); -lean::dec(x_547); -lean::inc(x_572); -lean::inc(x_4); -x_573 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed), 4, 3); -lean::closure_set(x_573, 0, x_4); -lean::closure_set(x_573, 1, x_21); -lean::closure_set(x_573, 2, x_572); -x_574 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -x_575 = l_Lean_profileitPure___rarg(x_574, x_34, x_573, x_550); -lean::dec(x_34); -if (lean::obj_tag(x_575) == 0) -{ -obj* x_576; obj* x_577; obj* x_578; obj* x_579; obj* x_580; obj* x_581; obj* x_582; -x_576 = lean::cnstr_get(x_575, 0); -lean::inc(x_576); -x_577 = lean::cnstr_get(x_575, 1); -lean::inc(x_577); -if (lean::is_exclusive(x_575)) { - lean::cnstr_release(x_575, 0); - lean::cnstr_release(x_575, 1); - x_578 = x_575; -} else { - lean::dec_ref(x_575); - x_578 = lean::box(0); -} -if (lean::is_scalar(x_578)) { - x_579 = lean::alloc_cnstr(0, 2, 0); -} else { - x_579 = x_578; -} -lean::cnstr_set(x_579, 0, x_503); -lean::cnstr_set(x_579, 1, x_577); -x_580 = lean::cnstr_get(x_576, 5); -lean::inc(x_580); -x_581 = l_List_reverse___rarg(x_580); -lean::inc(x_1); -x_582 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_581, x_579); -if (lean::obj_tag(x_582) == 0) -{ -obj* x_583; obj* x_584; uint8 x_585; -x_583 = lean::cnstr_get(x_582, 1); -lean::inc(x_583); -lean::dec(x_582); -x_584 = l_Lean_Parser_Module_eoi; -x_585 = l_Lean_Parser_Syntax_isOfKind___main(x_584, x_572); -lean::dec(x_572); -if (x_585 == 0) -{ -if (x_2 == 0) -{ -obj* x_586; obj* x_587; obj* x_588; obj* x_589; obj* x_590; -lean::dec(x_534); -lean::dec(x_27); -x_586 = lean::cnstr_get(x_576, 6); -lean::inc(x_586); -x_587 = lean::cnstr_get(x_576, 7); -lean::inc(x_587); -lean::inc(x_5); -if (lean::is_scalar(x_538)) { - x_588 = lean::alloc_cnstr(0, 2, 0); -} else { - x_588 = x_538; -} -lean::cnstr_set(x_588, 0, x_587); -lean::cnstr_set(x_588, 1, x_5); -if (lean::is_scalar(x_535)) { - x_589 = lean::alloc_cnstr(0, 2, 0); -} else { - x_589 = x_535; -} -lean::cnstr_set(x_589, 0, x_586); -lean::cnstr_set(x_589, 1, x_588); -lean::cnstr_set(x_19, 1, x_589); -lean::cnstr_set(x_19, 0, x_576); -lean::cnstr_set(x_18, 0, x_536); -x_590 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_590, 0, x_18); -x_8 = x_590; -x_9 = x_583; -goto block_16; -} -else -{ -obj* x_591; obj* x_592; obj* x_593; obj* x_594; obj* x_595; obj* x_596; -x_591 = lean::cnstr_get(x_576, 6); -lean::inc(x_591); -x_592 = lean::cnstr_get(x_576, 7); -lean::inc(x_592); -x_593 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_593, 0, x_534); -lean::cnstr_set(x_593, 1, x_27); -if (lean::is_scalar(x_538)) { - x_594 = lean::alloc_cnstr(0, 2, 0); -} else { - x_594 = x_538; -} -lean::cnstr_set(x_594, 0, x_592); -lean::cnstr_set(x_594, 1, x_593); -if (lean::is_scalar(x_535)) { - x_595 = lean::alloc_cnstr(0, 2, 0); -} else { - x_595 = x_535; -} -lean::cnstr_set(x_595, 0, x_591); -lean::cnstr_set(x_595, 1, x_594); -lean::cnstr_set(x_19, 1, x_595); -lean::cnstr_set(x_19, 0, x_576); -lean::cnstr_set(x_18, 0, x_536); -x_596 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_596, 0, x_18); -x_8 = x_596; -x_9 = x_583; -goto block_16; -} -} -else -{ -lean::dec(x_536); -lean::dec(x_535); -lean::free_heap_obj(x_19); -lean::free_heap_obj(x_18); -if (x_2 == 0) -{ -obj* x_597; obj* x_598; obj* x_599; obj* x_600; -lean::dec(x_534); -lean::dec(x_27); -x_597 = lean::cnstr_get(x_576, 8); -lean::inc(x_597); -lean::dec(x_576); -lean::inc(x_5); -x_598 = l_List_reverse___rarg(x_5); -if (lean::is_scalar(x_538)) { - x_599 = lean::alloc_cnstr(0, 2, 0); -} else { - x_599 = x_538; -} -lean::cnstr_set(x_599, 0, x_598); -lean::cnstr_set(x_599, 1, x_597); -x_600 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_600, 0, x_599); -x_8 = x_600; -x_9 = x_583; -goto block_16; -} -else -{ -obj* x_601; obj* x_602; obj* x_603; obj* x_604; obj* x_605; -x_601 = lean::cnstr_get(x_576, 8); -lean::inc(x_601); -lean::dec(x_576); -x_602 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_602, 0, x_534); -lean::cnstr_set(x_602, 1, x_27); -x_603 = l_List_reverse___rarg(x_602); -if (lean::is_scalar(x_538)) { - x_604 = lean::alloc_cnstr(0, 2, 0); -} else { - x_604 = x_538; -} -lean::cnstr_set(x_604, 0, x_603); -lean::cnstr_set(x_604, 1, x_601); -x_605 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_605, 0, x_604); -x_8 = x_605; -x_9 = x_583; -goto block_16; -} -} -} -else -{ -obj* x_606; obj* x_607; obj* x_608; obj* x_609; -lean::dec(x_576); -lean::dec(x_572); -lean::dec(x_538); -lean::dec(x_536); -lean::dec(x_535); -lean::dec(x_534); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_606 = lean::cnstr_get(x_582, 0); -lean::inc(x_606); -x_607 = lean::cnstr_get(x_582, 1); -lean::inc(x_607); -if (lean::is_exclusive(x_582)) { - lean::cnstr_release(x_582, 0); - lean::cnstr_release(x_582, 1); - x_608 = x_582; -} else { - lean::dec_ref(x_582); - x_608 = lean::box(0); -} -if (lean::is_scalar(x_608)) { - x_609 = lean::alloc_cnstr(1, 2, 0); -} else { - x_609 = x_608; -} -lean::cnstr_set(x_609, 0, x_606); -lean::cnstr_set(x_609, 1, x_607); -return x_609; -} -} -else -{ -obj* x_610; obj* x_611; obj* x_612; obj* x_613; -lean::dec(x_572); -lean::dec(x_538); -lean::dec(x_536); -lean::dec(x_535); -lean::dec(x_534); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_610 = lean::cnstr_get(x_575, 0); -lean::inc(x_610); -x_611 = lean::cnstr_get(x_575, 1); -lean::inc(x_611); -if (lean::is_exclusive(x_575)) { - lean::cnstr_release(x_575, 0); - lean::cnstr_release(x_575, 1); - x_612 = x_575; -} else { - lean::dec_ref(x_575); - x_612 = lean::box(0); -} -if (lean::is_scalar(x_612)) { - x_613 = lean::alloc_cnstr(1, 2, 0); -} else { - x_613 = x_612; -} -lean::cnstr_set(x_613, 0, x_610); -lean::cnstr_set(x_613, 1, x_611); -return x_613; -} -} -} -else -{ -obj* x_614; obj* x_615; obj* x_616; obj* x_617; -lean::dec(x_538); -lean::dec(x_536); -lean::dec(x_535); -lean::dec(x_534); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_614 = lean::cnstr_get(x_546, 0); -lean::inc(x_614); -x_615 = lean::cnstr_get(x_546, 1); -lean::inc(x_615); -if (lean::is_exclusive(x_546)) { - lean::cnstr_release(x_546, 0); - lean::cnstr_release(x_546, 1); - x_616 = x_546; -} else { - lean::dec_ref(x_546); - x_616 = lean::box(0); -} -if (lean::is_scalar(x_616)) { - x_617 = lean::alloc_cnstr(1, 2, 0); -} else { - x_617 = x_616; -} -lean::cnstr_set(x_617, 0, x_614); -lean::cnstr_set(x_617, 1, x_615); -return x_617; -} -} -else -{ -obj* x_618; obj* x_619; obj* x_620; obj* x_621; -lean::dec(x_538); -lean::dec(x_536); -lean::dec(x_535); -lean::dec(x_534); -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_618 = lean::cnstr_get(x_540, 0); -lean::inc(x_618); -x_619 = lean::cnstr_get(x_540, 1); -lean::inc(x_619); -if (lean::is_exclusive(x_540)) { - lean::cnstr_release(x_540, 0); - lean::cnstr_release(x_540, 1); - x_620 = x_540; -} else { - lean::dec_ref(x_540); - x_620 = lean::box(0); -} -if (lean::is_scalar(x_620)) { - x_621 = lean::alloc_cnstr(1, 2, 0); -} else { - x_621 = x_620; -} -lean::cnstr_set(x_621, 0, x_618); -lean::cnstr_set(x_621, 1, x_619); -return x_621; -} -} -} -} -else -{ -uint8 x_622; -lean::dec(x_34); -lean::free_heap_obj(x_19); -lean::dec(x_27); -lean::dec(x_26); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_622 = !lean::is_exclusive(x_37); -if (x_622 == 0) -{ -return x_37; -} -else -{ -obj* x_623; obj* x_624; obj* x_625; -x_623 = lean::cnstr_get(x_37, 0); -x_624 = lean::cnstr_get(x_37, 1); -lean::inc(x_624); -lean::inc(x_623); -lean::dec(x_37); -x_625 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_625, 0, x_623); -lean::cnstr_set(x_625, 1, x_624); -return x_625; -} -} -} -else -{ -obj* x_626; obj* x_627; obj* x_628; obj* x_629; obj* x_630; obj* x_631; obj* x_632; obj* x_633; obj* x_634; obj* x_635; obj* x_636; obj* x_637; -x_626 = lean::cnstr_get(x_19, 0); -x_627 = lean::cnstr_get(x_19, 1); -lean::inc(x_627); -lean::inc(x_626); -lean::dec(x_19); -x_628 = lean::cnstr_get(x_23, 0); -lean::inc(x_628); -x_629 = lean::cnstr_get(x_628, 0); -lean::inc(x_629); -lean::dec(x_628); -x_630 = lean::cnstr_get(x_629, 0); -lean::inc(x_630); -lean::dec(x_629); -x_631 = lean::cnstr_get(x_630, 2); -lean::inc(x_631); -lean::dec(x_630); -x_632 = lean::cnstr_get(x_20, 0); -lean::inc(x_632); -x_633 = lean::cnstr_get(x_632, 1); -lean::inc(x_633); -lean::dec(x_632); -x_634 = l_Lean_FileMap_toPosition(x_631, x_633); -lean::dec(x_631); -lean::inc(x_23); -x_635 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__1___boxed), 3, 2); -lean::closure_set(x_635, 0, x_23); -lean::closure_set(x_635, 1, x_20); -x_636 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__1; -x_637 = l_Lean_profileitPure___rarg(x_636, x_634, x_635, x_7); -if (lean::obj_tag(x_637) == 0) -{ -obj* x_638; obj* x_639; obj* x_640; obj* x_641; obj* x_642; obj* x_643; -x_638 = lean::cnstr_get(x_637, 0); -lean::inc(x_638); -x_639 = lean::cnstr_get(x_637, 1); -lean::inc(x_639); -if (lean::is_exclusive(x_637)) { - lean::cnstr_release(x_637, 0); - lean::cnstr_release(x_637, 1); - x_640 = x_637; -} else { - lean::dec_ref(x_637); - x_640 = lean::box(0); -} -x_641 = lean::box(0); -if (lean::is_scalar(x_640)) { - x_642 = lean::alloc_cnstr(0, 2, 0); -} else { - x_642 = x_640; -} -lean::cnstr_set(x_642, 0, x_641); -lean::cnstr_set(x_642, 1, x_639); -x_643 = lean::cnstr_get(x_638, 1); -lean::inc(x_643); -if (lean::obj_tag(x_643) == 0) -{ -obj* x_644; obj* x_645; obj* x_646; obj* x_647; -lean::dec(x_634); -lean::dec(x_626); -lean::free_heap_obj(x_18); -lean::dec(x_23); -x_644 = lean::cnstr_get(x_638, 0); -lean::inc(x_644); -if (lean::is_exclusive(x_638)) { - lean::cnstr_release(x_638, 0); - lean::cnstr_release(x_638, 1); - x_645 = x_638; -} else { - lean::dec_ref(x_638); - x_645 = lean::box(0); -} -x_646 = lean::cnstr_get(x_643, 0); -lean::inc(x_646); -lean::dec(x_643); -lean::inc(x_1); -x_647 = lean::apply_2(x_1, x_646, x_642); -if (lean::obj_tag(x_647) == 0) -{ -obj* x_648; obj* x_649; obj* x_650; obj* x_651; -x_648 = lean::cnstr_get(x_647, 1); -lean::inc(x_648); -if (lean::is_exclusive(x_647)) { - lean::cnstr_release(x_647, 0); - lean::cnstr_release(x_647, 1); - x_649 = x_647; -} else { - lean::dec_ref(x_647); - x_649 = lean::box(0); -} -if (lean::is_scalar(x_649)) { - x_650 = lean::alloc_cnstr(0, 2, 0); -} else { - x_650 = x_649; -} -lean::cnstr_set(x_650, 0, x_641); -lean::cnstr_set(x_650, 1, x_648); -lean::inc(x_3); -lean::inc(x_1); -x_651 = l_List_mfor___main___at_Lean_runFrontend___spec__3(x_1, x_3, x_650); -if (lean::obj_tag(x_651) == 0) -{ -if (x_2 == 0) -{ -obj* x_652; obj* x_653; obj* x_654; obj* x_655; obj* x_656; -lean::dec(x_644); -lean::dec(x_627); -x_652 = lean::cnstr_get(x_651, 1); -lean::inc(x_652); -lean::dec(x_651); -x_653 = lean::cnstr_get(x_21, 8); -lean::inc(x_653); -lean::dec(x_21); -lean::inc(x_5); -x_654 = l_List_reverse___rarg(x_5); -if (lean::is_scalar(x_645)) { - x_655 = lean::alloc_cnstr(0, 2, 0); -} else { - x_655 = x_645; -} -lean::cnstr_set(x_655, 0, x_654); -lean::cnstr_set(x_655, 1, x_653); -x_656 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_656, 0, x_655); -x_8 = x_656; -x_9 = x_652; -goto block_16; -} -else -{ -obj* x_657; obj* x_658; obj* x_659; obj* x_660; obj* x_661; obj* x_662; -x_657 = lean::cnstr_get(x_651, 1); -lean::inc(x_657); -lean::dec(x_651); -x_658 = lean::cnstr_get(x_21, 8); -lean::inc(x_658); -lean::dec(x_21); -x_659 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_659, 0, x_644); -lean::cnstr_set(x_659, 1, x_627); -x_660 = l_List_reverse___rarg(x_659); -if (lean::is_scalar(x_645)) { - x_661 = lean::alloc_cnstr(0, 2, 0); -} else { - x_661 = x_645; -} -lean::cnstr_set(x_661, 0, x_660); -lean::cnstr_set(x_661, 1, x_658); -x_662 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_662, 0, x_661); -x_8 = x_662; -x_9 = x_657; -goto block_16; -} -} -else -{ -obj* x_663; obj* x_664; obj* x_665; obj* x_666; -lean::dec(x_645); -lean::dec(x_644); -lean::dec(x_627); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_663 = lean::cnstr_get(x_651, 0); -lean::inc(x_663); -x_664 = lean::cnstr_get(x_651, 1); -lean::inc(x_664); -if (lean::is_exclusive(x_651)) { - lean::cnstr_release(x_651, 0); - lean::cnstr_release(x_651, 1); - x_665 = x_651; -} else { - lean::dec_ref(x_651); - x_665 = lean::box(0); -} -if (lean::is_scalar(x_665)) { - x_666 = lean::alloc_cnstr(1, 2, 0); -} else { - x_666 = x_665; -} -lean::cnstr_set(x_666, 0, x_663); -lean::cnstr_set(x_666, 1, x_664); -return x_666; -} -} -else -{ -obj* x_667; obj* x_668; obj* x_669; obj* x_670; -lean::dec(x_645); -lean::dec(x_644); -lean::dec(x_627); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_667 = lean::cnstr_get(x_647, 0); -lean::inc(x_667); -x_668 = lean::cnstr_get(x_647, 1); -lean::inc(x_668); -if (lean::is_exclusive(x_647)) { - lean::cnstr_release(x_647, 0); - lean::cnstr_release(x_647, 1); - x_669 = x_647; -} else { - lean::dec_ref(x_647); - x_669 = lean::box(0); -} -if (lean::is_scalar(x_669)) { - x_670 = lean::alloc_cnstr(1, 2, 0); -} else { - x_670 = x_669; -} -lean::cnstr_set(x_670, 0, x_667); -lean::cnstr_set(x_670, 1, x_668); -return x_670; -} -} -else -{ -obj* x_671; obj* x_672; obj* x_673; obj* x_674; obj* x_675; obj* x_676; obj* x_677; obj* x_678; -x_671 = lean::cnstr_get(x_643, 0); -lean::inc(x_671); -lean::dec(x_643); -x_672 = lean::cnstr_get(x_638, 0); -lean::inc(x_672); -if (lean::is_exclusive(x_638)) { - lean::cnstr_release(x_638, 0); - lean::cnstr_release(x_638, 1); - x_673 = x_638; -} else { - lean::dec_ref(x_638); - x_673 = lean::box(0); -} -x_674 = lean::cnstr_get(x_671, 0); -lean::inc(x_674); -x_675 = lean::cnstr_get(x_671, 1); -lean::inc(x_675); -if (lean::is_exclusive(x_671)) { - lean::cnstr_release(x_671, 0); - lean::cnstr_release(x_671, 1); - x_676 = x_671; -} else { - lean::dec_ref(x_671); - x_676 = lean::box(0); -} -x_677 = l_List_reverse___rarg(x_675); -lean::inc(x_1); -x_678 = l_List_mfor___main___at_Lean_runFrontend___spec__4(x_1, x_677, x_642); -if (lean::obj_tag(x_678) == 0) -{ -obj* x_679; obj* x_680; obj* x_681; obj* x_682; obj* x_683; obj* x_684; -x_679 = lean::cnstr_get(x_678, 1); -lean::inc(x_679); -if (lean::is_exclusive(x_678)) { - lean::cnstr_release(x_678, 0); - lean::cnstr_release(x_678, 1); - x_680 = x_678; -} else { - lean::dec_ref(x_678); - x_680 = lean::box(0); -} -if (lean::is_scalar(x_680)) { - x_681 = lean::alloc_cnstr(0, 2, 0); -} else { - x_681 = x_680; -} -lean::cnstr_set(x_681, 0, x_641); -lean::cnstr_set(x_681, 1, x_679); -lean::inc(x_626); -lean::inc(x_672); -x_682 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed), 3, 2); -lean::closure_set(x_682, 0, x_672); -lean::closure_set(x_682, 1, x_626); -x_683 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2; -x_684 = l_Lean_profileitPure___rarg(x_683, x_634, x_682, x_681); -if (lean::obj_tag(x_684) == 0) -{ -obj* x_685; obj* x_686; obj* x_687; obj* x_688; -x_685 = lean::cnstr_get(x_684, 0); -lean::inc(x_685); -x_686 = lean::cnstr_get(x_684, 1); -lean::inc(x_686); -if (lean::is_exclusive(x_684)) { - lean::cnstr_release(x_684, 0); - lean::cnstr_release(x_684, 1); - x_687 = x_684; -} else { - lean::dec_ref(x_684); - x_687 = lean::box(0); -} -if (lean::is_scalar(x_687)) { - x_688 = lean::alloc_cnstr(0, 2, 0); -} else { - x_688 = x_687; -} -lean::cnstr_set(x_688, 0, x_641); -lean::cnstr_set(x_688, 1, x_686); -if (lean::obj_tag(x_685) == 0) -{ -lean::dec(x_634); -if (x_2 == 0) -{ -obj* x_689; obj* x_690; obj* x_691; obj* x_692; obj* x_693; obj* x_694; -lean::dec(x_672); -lean::dec(x_627); -x_689 = lean::cnstr_get(x_685, 0); -lean::inc(x_689); -lean::dec(x_685); -lean::inc(x_5); -if (lean::is_scalar(x_676)) { - x_690 = lean::alloc_cnstr(0, 2, 0); -} else { - x_690 = x_676; -} -lean::cnstr_set(x_690, 0, x_626); -lean::cnstr_set(x_690, 1, x_5); -if (lean::is_scalar(x_673)) { - x_691 = lean::alloc_cnstr(0, 2, 0); -} else { - x_691 = x_673; -} -lean::cnstr_set(x_691, 0, x_23); -lean::cnstr_set(x_691, 1, x_690); -x_692 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_692, 0, x_21); -lean::cnstr_set(x_692, 1, x_691); -lean::cnstr_set(x_18, 1, x_692); -lean::cnstr_set(x_18, 0, x_674); -x_693 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_693, 0, x_18); -lean::inc(x_1); -x_694 = lean::apply_2(x_1, x_689, x_688); -if (lean::obj_tag(x_694) == 0) -{ -obj* x_695; -x_695 = lean::cnstr_get(x_694, 1); -lean::inc(x_695); -lean::dec(x_694); -x_8 = x_693; -x_9 = x_695; -goto block_16; -} -else -{ -obj* x_696; obj* x_697; obj* x_698; obj* x_699; -lean::dec(x_693); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_696 = lean::cnstr_get(x_694, 0); -lean::inc(x_696); -x_697 = lean::cnstr_get(x_694, 1); -lean::inc(x_697); -if (lean::is_exclusive(x_694)) { - lean::cnstr_release(x_694, 0); - lean::cnstr_release(x_694, 1); - x_698 = x_694; -} else { - lean::dec_ref(x_694); - x_698 = lean::box(0); -} -if (lean::is_scalar(x_698)) { - x_699 = lean::alloc_cnstr(1, 2, 0); -} else { - x_699 = x_698; -} -lean::cnstr_set(x_699, 0, x_696); -lean::cnstr_set(x_699, 1, x_697); -return x_699; -} -} -else -{ -obj* x_700; obj* x_701; obj* x_702; obj* x_703; obj* x_704; obj* x_705; obj* x_706; -x_700 = lean::cnstr_get(x_685, 0); -lean::inc(x_700); -lean::dec(x_685); -x_701 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_701, 0, x_672); -lean::cnstr_set(x_701, 1, x_627); -if (lean::is_scalar(x_676)) { - x_702 = lean::alloc_cnstr(0, 2, 0); -} else { - x_702 = x_676; -} -lean::cnstr_set(x_702, 0, x_626); -lean::cnstr_set(x_702, 1, x_701); -if (lean::is_scalar(x_673)) { - x_703 = lean::alloc_cnstr(0, 2, 0); -} else { - x_703 = x_673; -} -lean::cnstr_set(x_703, 0, x_23); -lean::cnstr_set(x_703, 1, x_702); -x_704 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_704, 0, x_21); -lean::cnstr_set(x_704, 1, x_703); -lean::cnstr_set(x_18, 1, x_704); -lean::cnstr_set(x_18, 0, x_674); -x_705 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_705, 0, x_18); -lean::inc(x_1); -x_706 = lean::apply_2(x_1, x_700, x_688); -if (lean::obj_tag(x_706) == 0) -{ -obj* x_707; -x_707 = lean::cnstr_get(x_706, 1); -lean::inc(x_707); -lean::dec(x_706); -x_8 = x_705; -x_9 = x_707; -goto block_16; -} -else -{ -obj* x_708; obj* x_709; obj* x_710; obj* x_711; -lean::dec(x_705); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_708 = lean::cnstr_get(x_706, 0); -lean::inc(x_708); -x_709 = lean::cnstr_get(x_706, 1); -lean::inc(x_709); -if (lean::is_exclusive(x_706)) { - lean::cnstr_release(x_706, 0); - lean::cnstr_release(x_706, 1); - x_710 = x_706; -} else { - lean::dec_ref(x_706); - x_710 = lean::box(0); -} -if (lean::is_scalar(x_710)) { - x_711 = lean::alloc_cnstr(1, 2, 0); -} else { - x_711 = x_710; -} -lean::cnstr_set(x_711, 0, x_708); -lean::cnstr_set(x_711, 1, x_709); -return x_711; -} -} -} -else -{ -obj* x_712; obj* x_713; obj* x_714; obj* x_715; -lean::dec(x_626); -lean::dec(x_23); -x_712 = lean::cnstr_get(x_685, 0); -lean::inc(x_712); -lean::dec(x_685); -lean::inc(x_712); -lean::inc(x_4); -x_713 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed), 4, 3); -lean::closure_set(x_713, 0, x_4); -lean::closure_set(x_713, 1, x_21); -lean::closure_set(x_713, 2, x_712); -x_714 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -x_715 = l_Lean_profileitPure___rarg(x_714, x_634, x_713, x_688); -lean::dec(x_634); -if (lean::obj_tag(x_715) == 0) -{ -obj* x_716; obj* x_717; obj* x_718; obj* x_719; obj* x_720; obj* x_721; obj* x_722; -x_716 = lean::cnstr_get(x_715, 0); -lean::inc(x_716); -x_717 = lean::cnstr_get(x_715, 1); -lean::inc(x_717); -if (lean::is_exclusive(x_715)) { - lean::cnstr_release(x_715, 0); - lean::cnstr_release(x_715, 1); - x_718 = x_715; -} else { - lean::dec_ref(x_715); - x_718 = lean::box(0); -} -if (lean::is_scalar(x_718)) { - x_719 = lean::alloc_cnstr(0, 2, 0); -} else { - x_719 = x_718; -} -lean::cnstr_set(x_719, 0, x_641); -lean::cnstr_set(x_719, 1, x_717); -x_720 = lean::cnstr_get(x_716, 5); -lean::inc(x_720); -x_721 = l_List_reverse___rarg(x_720); -lean::inc(x_1); -x_722 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_721, x_719); -if (lean::obj_tag(x_722) == 0) -{ -obj* x_723; obj* x_724; uint8 x_725; -x_723 = lean::cnstr_get(x_722, 1); -lean::inc(x_723); -lean::dec(x_722); -x_724 = l_Lean_Parser_Module_eoi; -x_725 = l_Lean_Parser_Syntax_isOfKind___main(x_724, x_712); -lean::dec(x_712); -if (x_725 == 0) -{ -if (x_2 == 0) -{ -obj* x_726; obj* x_727; obj* x_728; obj* x_729; obj* x_730; obj* x_731; -lean::dec(x_672); -lean::dec(x_627); -x_726 = lean::cnstr_get(x_716, 6); -lean::inc(x_726); -x_727 = lean::cnstr_get(x_716, 7); -lean::inc(x_727); -lean::inc(x_5); -if (lean::is_scalar(x_676)) { - x_728 = lean::alloc_cnstr(0, 2, 0); -} else { - x_728 = x_676; -} -lean::cnstr_set(x_728, 0, x_727); -lean::cnstr_set(x_728, 1, x_5); -if (lean::is_scalar(x_673)) { - x_729 = lean::alloc_cnstr(0, 2, 0); -} else { - x_729 = x_673; -} -lean::cnstr_set(x_729, 0, x_726); -lean::cnstr_set(x_729, 1, x_728); -x_730 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_730, 0, x_716); -lean::cnstr_set(x_730, 1, x_729); -lean::cnstr_set(x_18, 1, x_730); -lean::cnstr_set(x_18, 0, x_674); -x_731 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_731, 0, x_18); -x_8 = x_731; -x_9 = x_723; -goto block_16; -} -else -{ -obj* x_732; obj* x_733; obj* x_734; obj* x_735; obj* x_736; obj* x_737; obj* x_738; -x_732 = lean::cnstr_get(x_716, 6); -lean::inc(x_732); -x_733 = lean::cnstr_get(x_716, 7); -lean::inc(x_733); -x_734 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_734, 0, x_672); -lean::cnstr_set(x_734, 1, x_627); -if (lean::is_scalar(x_676)) { - x_735 = lean::alloc_cnstr(0, 2, 0); -} else { - x_735 = x_676; -} -lean::cnstr_set(x_735, 0, x_733); -lean::cnstr_set(x_735, 1, x_734); -if (lean::is_scalar(x_673)) { - x_736 = lean::alloc_cnstr(0, 2, 0); -} else { - x_736 = x_673; -} -lean::cnstr_set(x_736, 0, x_732); -lean::cnstr_set(x_736, 1, x_735); -x_737 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_737, 0, x_716); -lean::cnstr_set(x_737, 1, x_736); -lean::cnstr_set(x_18, 1, x_737); -lean::cnstr_set(x_18, 0, x_674); -x_738 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_738, 0, x_18); -x_8 = x_738; -x_9 = x_723; -goto block_16; -} -} -else -{ -lean::dec(x_674); -lean::dec(x_673); -lean::free_heap_obj(x_18); -if (x_2 == 0) -{ -obj* x_739; obj* x_740; obj* x_741; obj* x_742; -lean::dec(x_672); -lean::dec(x_627); -x_739 = lean::cnstr_get(x_716, 8); -lean::inc(x_739); -lean::dec(x_716); -lean::inc(x_5); -x_740 = l_List_reverse___rarg(x_5); -if (lean::is_scalar(x_676)) { - x_741 = lean::alloc_cnstr(0, 2, 0); -} else { - x_741 = x_676; -} -lean::cnstr_set(x_741, 0, x_740); -lean::cnstr_set(x_741, 1, x_739); -x_742 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_742, 0, x_741); -x_8 = x_742; -x_9 = x_723; -goto block_16; -} -else -{ -obj* x_743; obj* x_744; obj* x_745; obj* x_746; obj* x_747; -x_743 = lean::cnstr_get(x_716, 8); -lean::inc(x_743); -lean::dec(x_716); -x_744 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_744, 0, x_672); -lean::cnstr_set(x_744, 1, x_627); -x_745 = l_List_reverse___rarg(x_744); -if (lean::is_scalar(x_676)) { - x_746 = lean::alloc_cnstr(0, 2, 0); -} else { - x_746 = x_676; -} -lean::cnstr_set(x_746, 0, x_745); -lean::cnstr_set(x_746, 1, x_743); -x_747 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_747, 0, x_746); -x_8 = x_747; -x_9 = x_723; -goto block_16; -} -} -} -else -{ -obj* x_748; obj* x_749; obj* x_750; obj* x_751; -lean::dec(x_716); -lean::dec(x_712); -lean::dec(x_676); -lean::dec(x_674); -lean::dec(x_673); -lean::dec(x_672); -lean::dec(x_627); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_748 = lean::cnstr_get(x_722, 0); -lean::inc(x_748); -x_749 = lean::cnstr_get(x_722, 1); -lean::inc(x_749); -if (lean::is_exclusive(x_722)) { - lean::cnstr_release(x_722, 0); - lean::cnstr_release(x_722, 1); - x_750 = x_722; -} else { - lean::dec_ref(x_722); - x_750 = lean::box(0); -} -if (lean::is_scalar(x_750)) { - x_751 = lean::alloc_cnstr(1, 2, 0); -} else { - x_751 = x_750; -} -lean::cnstr_set(x_751, 0, x_748); -lean::cnstr_set(x_751, 1, x_749); -return x_751; -} -} -else -{ -obj* x_752; obj* x_753; obj* x_754; obj* x_755; -lean::dec(x_712); -lean::dec(x_676); -lean::dec(x_674); -lean::dec(x_673); -lean::dec(x_672); -lean::dec(x_627); -lean::free_heap_obj(x_18); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_752 = lean::cnstr_get(x_715, 0); -lean::inc(x_752); -x_753 = lean::cnstr_get(x_715, 1); -lean::inc(x_753); -if (lean::is_exclusive(x_715)) { - lean::cnstr_release(x_715, 0); - lean::cnstr_release(x_715, 1); - x_754 = x_715; -} else { - lean::dec_ref(x_715); - x_754 = lean::box(0); -} -if (lean::is_scalar(x_754)) { - x_755 = lean::alloc_cnstr(1, 2, 0); -} else { - x_755 = x_754; -} -lean::cnstr_set(x_755, 0, x_752); -lean::cnstr_set(x_755, 1, x_753); -return x_755; -} -} -} -else -{ -obj* x_756; obj* x_757; obj* x_758; obj* x_759; -lean::dec(x_676); -lean::dec(x_674); -lean::dec(x_673); -lean::dec(x_672); -lean::dec(x_634); -lean::dec(x_627); -lean::dec(x_626); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_756 = lean::cnstr_get(x_684, 0); -lean::inc(x_756); -x_757 = lean::cnstr_get(x_684, 1); -lean::inc(x_757); -if (lean::is_exclusive(x_684)) { - lean::cnstr_release(x_684, 0); - lean::cnstr_release(x_684, 1); - x_758 = x_684; -} else { - lean::dec_ref(x_684); - x_758 = lean::box(0); -} -if (lean::is_scalar(x_758)) { - x_759 = lean::alloc_cnstr(1, 2, 0); -} else { - x_759 = x_758; -} -lean::cnstr_set(x_759, 0, x_756); -lean::cnstr_set(x_759, 1, x_757); -return x_759; -} -} -else -{ -obj* x_760; obj* x_761; obj* x_762; obj* x_763; -lean::dec(x_676); -lean::dec(x_674); -lean::dec(x_673); -lean::dec(x_672); -lean::dec(x_634); -lean::dec(x_627); -lean::dec(x_626); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_760 = lean::cnstr_get(x_678, 0); -lean::inc(x_760); -x_761 = lean::cnstr_get(x_678, 1); -lean::inc(x_761); -if (lean::is_exclusive(x_678)) { - lean::cnstr_release(x_678, 0); - lean::cnstr_release(x_678, 1); - x_762 = x_678; -} else { - lean::dec_ref(x_678); - x_762 = lean::box(0); -} -if (lean::is_scalar(x_762)) { - x_763 = lean::alloc_cnstr(1, 2, 0); -} else { - x_763 = x_762; -} -lean::cnstr_set(x_763, 0, x_760); -lean::cnstr_set(x_763, 1, x_761); -return x_763; -} -} -} -else -{ -obj* x_764; obj* x_765; obj* x_766; obj* x_767; -lean::dec(x_634); -lean::dec(x_627); -lean::dec(x_626); -lean::free_heap_obj(x_18); -lean::dec(x_23); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_764 = lean::cnstr_get(x_637, 0); -lean::inc(x_764); -x_765 = lean::cnstr_get(x_637, 1); -lean::inc(x_765); -if (lean::is_exclusive(x_637)) { - lean::cnstr_release(x_637, 0); - lean::cnstr_release(x_637, 1); - x_766 = x_637; -} else { - lean::dec_ref(x_637); - x_766 = lean::box(0); -} -if (lean::is_scalar(x_766)) { - x_767 = lean::alloc_cnstr(1, 2, 0); -} else { - x_767 = x_766; -} -lean::cnstr_set(x_767, 0, x_764); -lean::cnstr_set(x_767, 1, x_765); -return x_767; -} -} -} -else -{ -obj* x_768; obj* x_769; obj* x_770; obj* x_771; obj* x_772; obj* x_773; obj* x_774; obj* x_775; obj* x_776; obj* x_777; obj* x_778; obj* x_779; obj* x_780; obj* x_781; -x_768 = lean::cnstr_get(x_18, 0); -lean::inc(x_768); -lean::dec(x_18); -x_769 = lean::cnstr_get(x_19, 0); -lean::inc(x_769); -x_770 = lean::cnstr_get(x_19, 1); -lean::inc(x_770); -if (lean::is_exclusive(x_19)) { - lean::cnstr_release(x_19, 0); - lean::cnstr_release(x_19, 1); - x_771 = x_19; -} else { - lean::dec_ref(x_19); - x_771 = lean::box(0); -} -x_772 = lean::cnstr_get(x_768, 0); -lean::inc(x_772); -x_773 = lean::cnstr_get(x_772, 0); -lean::inc(x_773); -lean::dec(x_772); -x_774 = lean::cnstr_get(x_773, 0); -lean::inc(x_774); -lean::dec(x_773); -x_775 = lean::cnstr_get(x_774, 2); -lean::inc(x_775); -lean::dec(x_774); -x_776 = lean::cnstr_get(x_20, 0); -lean::inc(x_776); -x_777 = lean::cnstr_get(x_776, 1); -lean::inc(x_777); -lean::dec(x_776); -x_778 = l_Lean_FileMap_toPosition(x_775, x_777); -lean::dec(x_775); -lean::inc(x_768); -x_779 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__1___boxed), 3, 2); -lean::closure_set(x_779, 0, x_768); -lean::closure_set(x_779, 1, x_20); -x_780 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__1; -x_781 = l_Lean_profileitPure___rarg(x_780, x_778, x_779, x_7); -if (lean::obj_tag(x_781) == 0) -{ -obj* x_782; obj* x_783; obj* x_784; obj* x_785; obj* x_786; obj* x_787; -x_782 = lean::cnstr_get(x_781, 0); -lean::inc(x_782); -x_783 = lean::cnstr_get(x_781, 1); -lean::inc(x_783); -if (lean::is_exclusive(x_781)) { - lean::cnstr_release(x_781, 0); - lean::cnstr_release(x_781, 1); - x_784 = x_781; -} else { - lean::dec_ref(x_781); - x_784 = lean::box(0); -} -x_785 = lean::box(0); -if (lean::is_scalar(x_784)) { - x_786 = lean::alloc_cnstr(0, 2, 0); -} else { - x_786 = x_784; -} -lean::cnstr_set(x_786, 0, x_785); -lean::cnstr_set(x_786, 1, x_783); -x_787 = lean::cnstr_get(x_782, 1); -lean::inc(x_787); -if (lean::obj_tag(x_787) == 0) -{ -obj* x_788; obj* x_789; obj* x_790; obj* x_791; -lean::dec(x_778); -lean::dec(x_771); -lean::dec(x_769); -lean::dec(x_768); -x_788 = lean::cnstr_get(x_782, 0); -lean::inc(x_788); -if (lean::is_exclusive(x_782)) { - lean::cnstr_release(x_782, 0); - lean::cnstr_release(x_782, 1); - x_789 = x_782; -} else { - lean::dec_ref(x_782); - x_789 = lean::box(0); -} -x_790 = lean::cnstr_get(x_787, 0); -lean::inc(x_790); -lean::dec(x_787); -lean::inc(x_1); -x_791 = lean::apply_2(x_1, x_790, x_786); -if (lean::obj_tag(x_791) == 0) -{ -obj* x_792; obj* x_793; obj* x_794; obj* x_795; -x_792 = lean::cnstr_get(x_791, 1); -lean::inc(x_792); -if (lean::is_exclusive(x_791)) { - lean::cnstr_release(x_791, 0); - lean::cnstr_release(x_791, 1); - x_793 = x_791; -} else { - lean::dec_ref(x_791); - x_793 = lean::box(0); -} -if (lean::is_scalar(x_793)) { - x_794 = lean::alloc_cnstr(0, 2, 0); -} else { - x_794 = x_793; -} -lean::cnstr_set(x_794, 0, x_785); -lean::cnstr_set(x_794, 1, x_792); -lean::inc(x_3); -lean::inc(x_1); -x_795 = l_List_mfor___main___at_Lean_runFrontend___spec__3(x_1, x_3, x_794); -if (lean::obj_tag(x_795) == 0) -{ -if (x_2 == 0) -{ -obj* x_796; obj* x_797; obj* x_798; obj* x_799; obj* x_800; -lean::dec(x_788); -lean::dec(x_770); -x_796 = lean::cnstr_get(x_795, 1); -lean::inc(x_796); -lean::dec(x_795); -x_797 = lean::cnstr_get(x_21, 8); -lean::inc(x_797); -lean::dec(x_21); -lean::inc(x_5); -x_798 = l_List_reverse___rarg(x_5); -if (lean::is_scalar(x_789)) { - x_799 = lean::alloc_cnstr(0, 2, 0); -} else { - x_799 = x_789; -} -lean::cnstr_set(x_799, 0, x_798); -lean::cnstr_set(x_799, 1, x_797); -x_800 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_800, 0, x_799); -x_8 = x_800; -x_9 = x_796; -goto block_16; -} -else -{ -obj* x_801; obj* x_802; obj* x_803; obj* x_804; obj* x_805; obj* x_806; -x_801 = lean::cnstr_get(x_795, 1); -lean::inc(x_801); -lean::dec(x_795); -x_802 = lean::cnstr_get(x_21, 8); -lean::inc(x_802); -lean::dec(x_21); -x_803 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_803, 0, x_788); -lean::cnstr_set(x_803, 1, x_770); -x_804 = l_List_reverse___rarg(x_803); -if (lean::is_scalar(x_789)) { - x_805 = lean::alloc_cnstr(0, 2, 0); -} else { - x_805 = x_789; -} -lean::cnstr_set(x_805, 0, x_804); -lean::cnstr_set(x_805, 1, x_802); -x_806 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_806, 0, x_805); -x_8 = x_806; -x_9 = x_801; -goto block_16; -} -} -else -{ -obj* x_807; obj* x_808; obj* x_809; obj* x_810; -lean::dec(x_789); -lean::dec(x_788); -lean::dec(x_770); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_807 = lean::cnstr_get(x_795, 0); -lean::inc(x_807); -x_808 = lean::cnstr_get(x_795, 1); -lean::inc(x_808); -if (lean::is_exclusive(x_795)) { - lean::cnstr_release(x_795, 0); - lean::cnstr_release(x_795, 1); - x_809 = x_795; -} else { - lean::dec_ref(x_795); - x_809 = lean::box(0); -} -if (lean::is_scalar(x_809)) { - x_810 = lean::alloc_cnstr(1, 2, 0); -} else { - x_810 = x_809; -} -lean::cnstr_set(x_810, 0, x_807); -lean::cnstr_set(x_810, 1, x_808); -return x_810; -} -} -else -{ -obj* x_811; obj* x_812; obj* x_813; obj* x_814; -lean::dec(x_789); -lean::dec(x_788); -lean::dec(x_770); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_811 = lean::cnstr_get(x_791, 0); -lean::inc(x_811); -x_812 = lean::cnstr_get(x_791, 1); -lean::inc(x_812); -if (lean::is_exclusive(x_791)) { - lean::cnstr_release(x_791, 0); - lean::cnstr_release(x_791, 1); - x_813 = x_791; -} else { - lean::dec_ref(x_791); - x_813 = lean::box(0); -} -if (lean::is_scalar(x_813)) { - x_814 = lean::alloc_cnstr(1, 2, 0); -} else { - x_814 = x_813; -} -lean::cnstr_set(x_814, 0, x_811); -lean::cnstr_set(x_814, 1, x_812); -return x_814; -} -} -else -{ -obj* x_815; obj* x_816; obj* x_817; obj* x_818; obj* x_819; obj* x_820; obj* x_821; obj* x_822; -x_815 = lean::cnstr_get(x_787, 0); -lean::inc(x_815); -lean::dec(x_787); -x_816 = lean::cnstr_get(x_782, 0); -lean::inc(x_816); -if (lean::is_exclusive(x_782)) { - lean::cnstr_release(x_782, 0); - lean::cnstr_release(x_782, 1); - x_817 = x_782; -} else { - lean::dec_ref(x_782); - x_817 = lean::box(0); -} -x_818 = lean::cnstr_get(x_815, 0); -lean::inc(x_818); -x_819 = lean::cnstr_get(x_815, 1); -lean::inc(x_819); -if (lean::is_exclusive(x_815)) { - lean::cnstr_release(x_815, 0); - lean::cnstr_release(x_815, 1); - x_820 = x_815; -} else { - lean::dec_ref(x_815); - x_820 = lean::box(0); -} -x_821 = l_List_reverse___rarg(x_819); -lean::inc(x_1); -x_822 = l_List_mfor___main___at_Lean_runFrontend___spec__4(x_1, x_821, x_786); -if (lean::obj_tag(x_822) == 0) -{ -obj* x_823; obj* x_824; obj* x_825; obj* x_826; obj* x_827; obj* x_828; -x_823 = lean::cnstr_get(x_822, 1); -lean::inc(x_823); -if (lean::is_exclusive(x_822)) { - lean::cnstr_release(x_822, 0); - lean::cnstr_release(x_822, 1); - x_824 = x_822; -} else { - lean::dec_ref(x_822); - x_824 = lean::box(0); -} -if (lean::is_scalar(x_824)) { - x_825 = lean::alloc_cnstr(0, 2, 0); -} else { - x_825 = x_824; -} -lean::cnstr_set(x_825, 0, x_785); -lean::cnstr_set(x_825, 1, x_823); -lean::inc(x_769); -lean::inc(x_816); -x_826 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed), 3, 2); -lean::closure_set(x_826, 0, x_816); -lean::closure_set(x_826, 1, x_769); -x_827 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2; -x_828 = l_Lean_profileitPure___rarg(x_827, x_778, x_826, x_825); -if (lean::obj_tag(x_828) == 0) -{ -obj* x_829; obj* x_830; obj* x_831; obj* x_832; -x_829 = lean::cnstr_get(x_828, 0); -lean::inc(x_829); -x_830 = lean::cnstr_get(x_828, 1); -lean::inc(x_830); -if (lean::is_exclusive(x_828)) { - lean::cnstr_release(x_828, 0); - lean::cnstr_release(x_828, 1); - x_831 = x_828; -} else { - lean::dec_ref(x_828); - x_831 = lean::box(0); -} -if (lean::is_scalar(x_831)) { - x_832 = lean::alloc_cnstr(0, 2, 0); -} else { - x_832 = x_831; -} -lean::cnstr_set(x_832, 0, x_785); -lean::cnstr_set(x_832, 1, x_830); -if (lean::obj_tag(x_829) == 0) -{ -lean::dec(x_778); -if (x_2 == 0) -{ -obj* x_833; obj* x_834; obj* x_835; obj* x_836; obj* x_837; obj* x_838; obj* x_839; -lean::dec(x_816); -lean::dec(x_770); -x_833 = lean::cnstr_get(x_829, 0); -lean::inc(x_833); -lean::dec(x_829); -lean::inc(x_5); -if (lean::is_scalar(x_820)) { - x_834 = lean::alloc_cnstr(0, 2, 0); -} else { - x_834 = x_820; -} -lean::cnstr_set(x_834, 0, x_769); -lean::cnstr_set(x_834, 1, x_5); -if (lean::is_scalar(x_817)) { - x_835 = lean::alloc_cnstr(0, 2, 0); -} else { - x_835 = x_817; -} -lean::cnstr_set(x_835, 0, x_768); -lean::cnstr_set(x_835, 1, x_834); -if (lean::is_scalar(x_771)) { - x_836 = lean::alloc_cnstr(0, 2, 0); -} else { - x_836 = x_771; -} -lean::cnstr_set(x_836, 0, x_21); -lean::cnstr_set(x_836, 1, x_835); -x_837 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_837, 0, x_818); -lean::cnstr_set(x_837, 1, x_836); -x_838 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_838, 0, x_837); -lean::inc(x_1); -x_839 = lean::apply_2(x_1, x_833, x_832); -if (lean::obj_tag(x_839) == 0) -{ -obj* x_840; -x_840 = lean::cnstr_get(x_839, 1); -lean::inc(x_840); -lean::dec(x_839); -x_8 = x_838; -x_9 = x_840; -goto block_16; -} -else -{ -obj* x_841; obj* x_842; obj* x_843; obj* x_844; -lean::dec(x_838); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_841 = lean::cnstr_get(x_839, 0); -lean::inc(x_841); -x_842 = lean::cnstr_get(x_839, 1); -lean::inc(x_842); -if (lean::is_exclusive(x_839)) { - lean::cnstr_release(x_839, 0); - lean::cnstr_release(x_839, 1); - x_843 = x_839; -} else { - lean::dec_ref(x_839); - x_843 = lean::box(0); -} -if (lean::is_scalar(x_843)) { - x_844 = lean::alloc_cnstr(1, 2, 0); -} else { - x_844 = x_843; -} -lean::cnstr_set(x_844, 0, x_841); -lean::cnstr_set(x_844, 1, x_842); -return x_844; -} -} -else -{ -obj* x_845; obj* x_846; obj* x_847; obj* x_848; obj* x_849; obj* x_850; obj* x_851; obj* x_852; -x_845 = lean::cnstr_get(x_829, 0); -lean::inc(x_845); -lean::dec(x_829); -x_846 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_846, 0, x_816); -lean::cnstr_set(x_846, 1, x_770); -if (lean::is_scalar(x_820)) { - x_847 = lean::alloc_cnstr(0, 2, 0); -} else { - x_847 = x_820; -} -lean::cnstr_set(x_847, 0, x_769); -lean::cnstr_set(x_847, 1, x_846); -if (lean::is_scalar(x_817)) { - x_848 = lean::alloc_cnstr(0, 2, 0); -} else { - x_848 = x_817; -} -lean::cnstr_set(x_848, 0, x_768); -lean::cnstr_set(x_848, 1, x_847); -if (lean::is_scalar(x_771)) { - x_849 = lean::alloc_cnstr(0, 2, 0); -} else { - x_849 = x_771; -} -lean::cnstr_set(x_849, 0, x_21); -lean::cnstr_set(x_849, 1, x_848); -x_850 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_850, 0, x_818); -lean::cnstr_set(x_850, 1, x_849); -x_851 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_851, 0, x_850); -lean::inc(x_1); -x_852 = lean::apply_2(x_1, x_845, x_832); -if (lean::obj_tag(x_852) == 0) -{ -obj* x_853; -x_853 = lean::cnstr_get(x_852, 1); -lean::inc(x_853); -lean::dec(x_852); -x_8 = x_851; -x_9 = x_853; -goto block_16; -} -else -{ -obj* x_854; obj* x_855; obj* x_856; obj* x_857; -lean::dec(x_851); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_854 = lean::cnstr_get(x_852, 0); -lean::inc(x_854); -x_855 = lean::cnstr_get(x_852, 1); -lean::inc(x_855); -if (lean::is_exclusive(x_852)) { - lean::cnstr_release(x_852, 0); - lean::cnstr_release(x_852, 1); - x_856 = x_852; -} else { - lean::dec_ref(x_852); - x_856 = lean::box(0); -} -if (lean::is_scalar(x_856)) { - x_857 = lean::alloc_cnstr(1, 2, 0); -} else { - x_857 = x_856; -} -lean::cnstr_set(x_857, 0, x_854); -lean::cnstr_set(x_857, 1, x_855); -return x_857; -} -} -} -else -{ -obj* x_858; obj* x_859; obj* x_860; obj* x_861; -lean::dec(x_769); -lean::dec(x_768); -x_858 = lean::cnstr_get(x_829, 0); -lean::inc(x_858); -lean::dec(x_829); -lean::inc(x_858); -lean::inc(x_4); -x_859 = lean::alloc_closure(reinterpret_cast(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed), 4, 3); -lean::closure_set(x_859, 0, x_4); -lean::closure_set(x_859, 1, x_21); -lean::closure_set(x_859, 2, x_858); -x_860 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3; -x_861 = l_Lean_profileitPure___rarg(x_860, x_778, x_859, x_832); -lean::dec(x_778); -if (lean::obj_tag(x_861) == 0) -{ -obj* x_862; obj* x_863; obj* x_864; obj* x_865; obj* x_866; obj* x_867; obj* x_868; -x_862 = lean::cnstr_get(x_861, 0); -lean::inc(x_862); -x_863 = lean::cnstr_get(x_861, 1); -lean::inc(x_863); -if (lean::is_exclusive(x_861)) { - lean::cnstr_release(x_861, 0); - lean::cnstr_release(x_861, 1); - x_864 = x_861; -} else { - lean::dec_ref(x_861); - x_864 = lean::box(0); -} -if (lean::is_scalar(x_864)) { - x_865 = lean::alloc_cnstr(0, 2, 0); -} else { - x_865 = x_864; -} -lean::cnstr_set(x_865, 0, x_785); -lean::cnstr_set(x_865, 1, x_863); -x_866 = lean::cnstr_get(x_862, 5); -lean::inc(x_866); -x_867 = l_List_reverse___rarg(x_866); -lean::inc(x_1); -x_868 = l_List_mfor___main___at_Lean_runFrontend___spec__5(x_1, x_867, x_865); -if (lean::obj_tag(x_868) == 0) -{ -obj* x_869; obj* x_870; uint8 x_871; -x_869 = lean::cnstr_get(x_868, 1); -lean::inc(x_869); -lean::dec(x_868); -x_870 = l_Lean_Parser_Module_eoi; -x_871 = l_Lean_Parser_Syntax_isOfKind___main(x_870, x_858); -lean::dec(x_858); -if (x_871 == 0) -{ -if (x_2 == 0) -{ -obj* x_872; obj* x_873; obj* x_874; obj* x_875; obj* x_876; obj* x_877; obj* x_878; -lean::dec(x_816); -lean::dec(x_770); -x_872 = lean::cnstr_get(x_862, 6); -lean::inc(x_872); -x_873 = lean::cnstr_get(x_862, 7); -lean::inc(x_873); -lean::inc(x_5); -if (lean::is_scalar(x_820)) { - x_874 = lean::alloc_cnstr(0, 2, 0); -} else { - x_874 = x_820; -} -lean::cnstr_set(x_874, 0, x_873); -lean::cnstr_set(x_874, 1, x_5); -if (lean::is_scalar(x_817)) { - x_875 = lean::alloc_cnstr(0, 2, 0); -} else { - x_875 = x_817; -} -lean::cnstr_set(x_875, 0, x_872); -lean::cnstr_set(x_875, 1, x_874); -if (lean::is_scalar(x_771)) { - x_876 = lean::alloc_cnstr(0, 2, 0); -} else { - x_876 = x_771; -} -lean::cnstr_set(x_876, 0, x_862); -lean::cnstr_set(x_876, 1, x_875); -x_877 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_877, 0, x_818); -lean::cnstr_set(x_877, 1, x_876); -x_878 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_878, 0, x_877); -x_8 = x_878; -x_9 = x_869; -goto block_16; -} -else -{ -obj* x_879; obj* x_880; obj* x_881; obj* x_882; obj* x_883; obj* x_884; obj* x_885; obj* x_886; -x_879 = lean::cnstr_get(x_862, 6); -lean::inc(x_879); -x_880 = lean::cnstr_get(x_862, 7); -lean::inc(x_880); -x_881 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_881, 0, x_816); -lean::cnstr_set(x_881, 1, x_770); -if (lean::is_scalar(x_820)) { - x_882 = lean::alloc_cnstr(0, 2, 0); -} else { - x_882 = x_820; -} -lean::cnstr_set(x_882, 0, x_880); -lean::cnstr_set(x_882, 1, x_881); -if (lean::is_scalar(x_817)) { - x_883 = lean::alloc_cnstr(0, 2, 0); -} else { - x_883 = x_817; -} -lean::cnstr_set(x_883, 0, x_879); -lean::cnstr_set(x_883, 1, x_882); -if (lean::is_scalar(x_771)) { - x_884 = lean::alloc_cnstr(0, 2, 0); -} else { - x_884 = x_771; -} -lean::cnstr_set(x_884, 0, x_862); -lean::cnstr_set(x_884, 1, x_883); -x_885 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_885, 0, x_818); -lean::cnstr_set(x_885, 1, x_884); -x_886 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_886, 0, x_885); -x_8 = x_886; -x_9 = x_869; -goto block_16; -} -} -else -{ -lean::dec(x_818); -lean::dec(x_817); -lean::dec(x_771); -if (x_2 == 0) -{ -obj* x_887; obj* x_888; obj* x_889; obj* x_890; -lean::dec(x_816); -lean::dec(x_770); -x_887 = lean::cnstr_get(x_862, 8); -lean::inc(x_887); -lean::dec(x_862); -lean::inc(x_5); -x_888 = l_List_reverse___rarg(x_5); -if (lean::is_scalar(x_820)) { - x_889 = lean::alloc_cnstr(0, 2, 0); -} else { - x_889 = x_820; -} -lean::cnstr_set(x_889, 0, x_888); -lean::cnstr_set(x_889, 1, x_887); -x_890 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_890, 0, x_889); -x_8 = x_890; -x_9 = x_869; -goto block_16; -} -else -{ -obj* x_891; obj* x_892; obj* x_893; obj* x_894; obj* x_895; -x_891 = lean::cnstr_get(x_862, 8); -lean::inc(x_891); -lean::dec(x_862); -x_892 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_892, 0, x_816); -lean::cnstr_set(x_892, 1, x_770); -x_893 = l_List_reverse___rarg(x_892); -if (lean::is_scalar(x_820)) { - x_894 = lean::alloc_cnstr(0, 2, 0); -} else { - x_894 = x_820; -} -lean::cnstr_set(x_894, 0, x_893); -lean::cnstr_set(x_894, 1, x_891); -x_895 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_895, 0, x_894); -x_8 = x_895; -x_9 = x_869; -goto block_16; -} -} -} -else -{ -obj* x_896; obj* x_897; obj* x_898; obj* x_899; -lean::dec(x_862); -lean::dec(x_858); -lean::dec(x_820); -lean::dec(x_818); -lean::dec(x_817); -lean::dec(x_816); -lean::dec(x_771); -lean::dec(x_770); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_896 = lean::cnstr_get(x_868, 0); -lean::inc(x_896); -x_897 = lean::cnstr_get(x_868, 1); -lean::inc(x_897); -if (lean::is_exclusive(x_868)) { - lean::cnstr_release(x_868, 0); - lean::cnstr_release(x_868, 1); - x_898 = x_868; -} else { - lean::dec_ref(x_868); - x_898 = lean::box(0); -} -if (lean::is_scalar(x_898)) { - x_899 = lean::alloc_cnstr(1, 2, 0); -} else { - x_899 = x_898; -} -lean::cnstr_set(x_899, 0, x_896); -lean::cnstr_set(x_899, 1, x_897); -return x_899; -} -} -else -{ -obj* x_900; obj* x_901; obj* x_902; obj* x_903; -lean::dec(x_858); -lean::dec(x_820); -lean::dec(x_818); -lean::dec(x_817); -lean::dec(x_816); -lean::dec(x_771); -lean::dec(x_770); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_900 = lean::cnstr_get(x_861, 0); -lean::inc(x_900); -x_901 = lean::cnstr_get(x_861, 1); -lean::inc(x_901); -if (lean::is_exclusive(x_861)) { - lean::cnstr_release(x_861, 0); - lean::cnstr_release(x_861, 1); - x_902 = x_861; -} else { - lean::dec_ref(x_861); - x_902 = lean::box(0); -} -if (lean::is_scalar(x_902)) { - x_903 = lean::alloc_cnstr(1, 2, 0); -} else { - x_903 = x_902; -} -lean::cnstr_set(x_903, 0, x_900); -lean::cnstr_set(x_903, 1, x_901); -return x_903; -} -} -} -else -{ -obj* x_904; obj* x_905; obj* x_906; obj* x_907; -lean::dec(x_820); -lean::dec(x_818); -lean::dec(x_817); -lean::dec(x_816); -lean::dec(x_778); -lean::dec(x_771); -lean::dec(x_770); -lean::dec(x_769); -lean::dec(x_768); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_904 = lean::cnstr_get(x_828, 0); -lean::inc(x_904); -x_905 = lean::cnstr_get(x_828, 1); -lean::inc(x_905); -if (lean::is_exclusive(x_828)) { - lean::cnstr_release(x_828, 0); - lean::cnstr_release(x_828, 1); - x_906 = x_828; -} else { - lean::dec_ref(x_828); - x_906 = lean::box(0); -} -if (lean::is_scalar(x_906)) { - x_907 = lean::alloc_cnstr(1, 2, 0); -} else { - x_907 = x_906; -} -lean::cnstr_set(x_907, 0, x_904); -lean::cnstr_set(x_907, 1, x_905); -return x_907; -} -} -else -{ -obj* x_908; obj* x_909; obj* x_910; obj* x_911; -lean::dec(x_820); -lean::dec(x_818); -lean::dec(x_817); -lean::dec(x_816); -lean::dec(x_778); -lean::dec(x_771); -lean::dec(x_770); -lean::dec(x_769); -lean::dec(x_768); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_908 = lean::cnstr_get(x_822, 0); -lean::inc(x_908); -x_909 = lean::cnstr_get(x_822, 1); -lean::inc(x_909); -if (lean::is_exclusive(x_822)) { - lean::cnstr_release(x_822, 0); - lean::cnstr_release(x_822, 1); - x_910 = x_822; -} else { - lean::dec_ref(x_822); - x_910 = lean::box(0); -} -if (lean::is_scalar(x_910)) { - x_911 = lean::alloc_cnstr(1, 2, 0); -} else { - x_911 = x_910; -} -lean::cnstr_set(x_911, 0, x_908); -lean::cnstr_set(x_911, 1, x_909); -return x_911; -} -} -} -else -{ -obj* x_912; obj* x_913; obj* x_914; obj* x_915; -lean::dec(x_778); -lean::dec(x_771); -lean::dec(x_770); -lean::dec(x_769); -lean::dec(x_768); -lean::dec(x_21); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_912 = lean::cnstr_get(x_781, 0); -lean::inc(x_912); -x_913 = lean::cnstr_get(x_781, 1); -lean::inc(x_913); -if (lean::is_exclusive(x_781)) { - lean::cnstr_release(x_781, 0); - lean::cnstr_release(x_781, 1); - x_914 = x_781; -} else { - lean::dec_ref(x_781); - x_914 = lean::box(0); -} -if (lean::is_scalar(x_914)) { - x_915 = lean::alloc_cnstr(1, 2, 0); -} else { - x_915 = x_914; -} -lean::cnstr_set(x_915, 0, x_912); -lean::cnstr_set(x_915, 1, x_913); -return x_915; -} -} -block_16: -{ -if (lean::obj_tag(x_8) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_9); -x_6 = x_10; -x_7 = x_12; -goto _start; -} -else -{ -obj* x_14; obj* x_15; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_14 = lean::cnstr_get(x_8, 0); -lean::inc(x_14); -lean::dec(x_8); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_9); -return x_15; -} -} -} -} -obj* _init_l_Lean_runFrontend___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; obj* x_8; -x_1 = lean::box(0); -x_2 = lean::mk_string("trace"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("as_messages"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = l_Lean_Options_empty; -x_7 = 1; -x_8 = l_Lean_KVMap_setBool(x_6, x_5, x_7); -return x_8; -} -} -obj* l_Lean_runFrontend(obj* x_1, obj* x_2, obj* x_3, uint8 x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_2); -lean::inc(x_1); -x_7 = l_Lean_mkConfig(x_1, x_2); -x_8 = l_ioOfExcept___at_Lean_runFrontend___spec__1(x_7, x_6); -lean::dec(x_7); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; uint8 x_13; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = lean::box(0); -lean::cnstr_set(x_8, 0, x_11); -lean::inc(x_10); -x_12 = l_Lean_Parser_parseHeader(x_10); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 1); -x_15 = lean::cnstr_get(x_12, 0); -lean::dec(x_15); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_10); -lean::dec(x_2); -lean::dec(x_1); -x_16 = lean::cnstr_get(x_14, 0); -lean::inc(x_16); -lean::dec(x_14); -x_17 = lean::box(0); -lean::cnstr_set(x_12, 1, x_5); -lean::cnstr_set(x_12, 0, x_17); -x_18 = lean::apply_2(x_3, x_16, x_8); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; -x_20 = lean::cnstr_get(x_18, 0); -lean::dec(x_20); -lean::cnstr_set(x_18, 0, x_12); -return x_18; -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_18, 1); -lean::inc(x_21); -lean::dec(x_18); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_12); -lean::cnstr_set(x_22, 1, x_21); -return x_22; -} -} -else -{ -uint8 x_23; -lean::dec(x_12); -x_23 = !lean::is_exclusive(x_18); -if (x_23 == 0) -{ -return x_18; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_18, 0); -x_25 = lean::cnstr_get(x_18, 1); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_18); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_25); -return x_26; -} -} -} -else -{ -obj* x_27; uint8 x_28; -x_27 = lean::cnstr_get(x_14, 0); -lean::inc(x_27); -lean::dec(x_14); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::cnstr_get(x_27, 0); -x_30 = lean::cnstr_get(x_27, 1); -x_31 = l_List_reverse___rarg(x_30); -lean::inc(x_31); -lean::inc(x_3); -x_32 = l_List_mfor___main___at_Lean_runFrontend___spec__2(x_3, x_31, x_8); -if (lean::obj_tag(x_32) == 0) -{ -uint8 x_33; -x_33 = !lean::is_exclusive(x_32); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; uint8 x_40; -x_34 = lean::cnstr_get(x_32, 0); -lean::dec(x_34); -lean::cnstr_set(x_32, 0, x_11); -x_35 = lean::cnstr_get(x_10, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -lean::dec(x_35); -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -lean::dec(x_36); -x_38 = l_Lean_Expander_builtinTransformers; -lean::inc(x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_38); -x_40 = !lean::is_exclusive(x_37); -if (x_40 == 0) -{ -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; -x_41 = lean::cnstr_get(x_37, 1); -lean::dec(x_41); -x_42 = lean::cnstr_get(x_37, 0); -lean::dec(x_42); -lean::cnstr_set(x_37, 1, x_2); -lean::cnstr_set(x_37, 0, x_1); -lean::inc(x_10); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_37); -lean::cnstr_set(x_43, 1, x_10); -x_44 = l_Lean_runFrontend___closed__1; -x_45 = l_Lean_Elaborator_mkState(x_43, x_5, x_44); -x_46 = lean::box(0); -lean::cnstr_set(x_27, 1, x_46); -lean::cnstr_set(x_27, 0, x_39); -lean::cnstr_set(x_12, 1, x_27); -lean::cnstr_set(x_12, 0, x_10); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_12); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_29); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(x_3, x_4, x_31, x_43, x_46, x_48, x_32); -return x_49; -} -else -{ -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; -x_50 = lean::cnstr_get(x_37, 2); -lean::inc(x_50); -lean::dec(x_37); -x_51 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_51, 0, x_1); -lean::cnstr_set(x_51, 1, x_2); -lean::cnstr_set(x_51, 2, x_50); -lean::inc(x_10); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_10); -x_53 = l_Lean_runFrontend___closed__1; -x_54 = l_Lean_Elaborator_mkState(x_52, x_5, x_53); -x_55 = lean::box(0); -lean::cnstr_set(x_27, 1, x_55); -lean::cnstr_set(x_27, 0, x_39); -lean::cnstr_set(x_12, 1, x_27); -lean::cnstr_set(x_12, 0, x_10); -x_56 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_56, 0, x_54); -lean::cnstr_set(x_56, 1, x_12); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_29); -lean::cnstr_set(x_57, 1, x_56); -x_58 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(x_3, x_4, x_31, x_52, x_55, x_57, x_32); -return x_58; -} -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_59 = lean::cnstr_get(x_32, 1); -lean::inc(x_59); -lean::dec(x_32); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_11); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::cnstr_get(x_10, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_61, 0); -lean::inc(x_62); -lean::dec(x_61); -x_63 = lean::cnstr_get(x_62, 0); -lean::inc(x_63); -lean::dec(x_62); -x_64 = l_Lean_Expander_builtinTransformers; -lean::inc(x_63); -x_65 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_65, 0, x_63); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::cnstr_get(x_63, 2); -lean::inc(x_66); -if (lean::is_exclusive(x_63)) { - lean::cnstr_release(x_63, 0); - lean::cnstr_release(x_63, 1); - lean::cnstr_release(x_63, 2); - x_67 = x_63; -} else { - lean::dec_ref(x_63); - x_67 = lean::box(0); -} -if (lean::is_scalar(x_67)) { - x_68 = lean::alloc_cnstr(0, 3, 0); -} else { - x_68 = x_67; -} -lean::cnstr_set(x_68, 0, x_1); -lean::cnstr_set(x_68, 1, x_2); -lean::cnstr_set(x_68, 2, x_66); -lean::inc(x_10); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_10); -x_70 = l_Lean_runFrontend___closed__1; -x_71 = l_Lean_Elaborator_mkState(x_69, x_5, x_70); -x_72 = lean::box(0); -lean::cnstr_set(x_27, 1, x_72); -lean::cnstr_set(x_27, 0, x_65); -lean::cnstr_set(x_12, 1, x_27); -lean::cnstr_set(x_12, 0, x_10); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_71); -lean::cnstr_set(x_73, 1, x_12); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_29); -lean::cnstr_set(x_74, 1, x_73); -x_75 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(x_3, x_4, x_31, x_69, x_72, x_74, x_60); -return x_75; -} -} -else -{ -uint8 x_76; -lean::dec(x_31); -lean::free_heap_obj(x_27); -lean::dec(x_29); -lean::free_heap_obj(x_12); -lean::dec(x_10); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_76 = !lean::is_exclusive(x_32); -if (x_76 == 0) -{ -return x_32; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; -x_77 = lean::cnstr_get(x_32, 0); -x_78 = lean::cnstr_get(x_32, 1); -lean::inc(x_78); -lean::inc(x_77); -lean::dec(x_32); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_77); -lean::cnstr_set(x_79, 1, x_78); -return x_79; -} -} -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_80 = lean::cnstr_get(x_27, 0); -x_81 = lean::cnstr_get(x_27, 1); -lean::inc(x_81); -lean::inc(x_80); -lean::dec(x_27); -x_82 = l_List_reverse___rarg(x_81); -lean::inc(x_82); -lean::inc(x_3); -x_83 = l_List_mfor___main___at_Lean_runFrontend___spec__2(x_3, x_82, x_8); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - x_85 = x_83; -} else { - lean::dec_ref(x_83); - x_85 = lean::box(0); -} -if (lean::is_scalar(x_85)) { - x_86 = lean::alloc_cnstr(0, 2, 0); -} else { - x_86 = x_85; -} -lean::cnstr_set(x_86, 0, x_11); -lean::cnstr_set(x_86, 1, x_84); -x_87 = lean::cnstr_get(x_10, 0); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -lean::dec(x_87); -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -lean::dec(x_88); -x_90 = l_Lean_Expander_builtinTransformers; -lean::inc(x_89); -x_91 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_91, 0, x_89); -lean::cnstr_set(x_91, 1, x_90); -x_92 = lean::cnstr_get(x_89, 2); -lean::inc(x_92); -if (lean::is_exclusive(x_89)) { - lean::cnstr_release(x_89, 0); - lean::cnstr_release(x_89, 1); - lean::cnstr_release(x_89, 2); - x_93 = x_89; -} else { - lean::dec_ref(x_89); - x_93 = lean::box(0); -} -if (lean::is_scalar(x_93)) { - x_94 = lean::alloc_cnstr(0, 3, 0); -} else { - x_94 = x_93; -} -lean::cnstr_set(x_94, 0, x_1); -lean::cnstr_set(x_94, 1, x_2); -lean::cnstr_set(x_94, 2, x_92); -lean::inc(x_10); -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_10); -x_96 = l_Lean_runFrontend___closed__1; -x_97 = l_Lean_Elaborator_mkState(x_95, x_5, x_96); -x_98 = lean::box(0); -x_99 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_99, 0, x_91); -lean::cnstr_set(x_99, 1, x_98); -lean::cnstr_set(x_12, 1, x_99); -lean::cnstr_set(x_12, 0, x_10); -x_100 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_100, 0, x_97); -lean::cnstr_set(x_100, 1, x_12); -x_101 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_101, 0, x_80); -lean::cnstr_set(x_101, 1, x_100); -x_102 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(x_3, x_4, x_82, x_95, x_98, x_101, x_86); -return x_102; -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_82); -lean::dec(x_80); -lean::free_heap_obj(x_12); -lean::dec(x_10); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_103 = lean::cnstr_get(x_83, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_83, 1); -lean::inc(x_104); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - x_105 = x_83; -} else { - lean::dec_ref(x_83); - x_105 = lean::box(0); -} -if (lean::is_scalar(x_105)) { - x_106 = lean::alloc_cnstr(1, 2, 0); -} else { - x_106 = x_105; -} -lean::cnstr_set(x_106, 0, x_103); -lean::cnstr_set(x_106, 1, x_104); -return x_106; -} -} -} -} -else -{ -obj* x_107; -x_107 = lean::cnstr_get(x_12, 1); -lean::inc(x_107); -lean::dec(x_12); -if (lean::obj_tag(x_107) == 0) -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; -lean::dec(x_10); -lean::dec(x_2); -lean::dec(x_1); -x_108 = lean::cnstr_get(x_107, 0); -lean::inc(x_108); -lean::dec(x_107); -x_109 = lean::box(0); -x_110 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_110, 0, x_109); -lean::cnstr_set(x_110, 1, x_5); -x_111 = lean::apply_2(x_3, x_108, x_8); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_112; obj* x_113; obj* x_114; -x_112 = lean::cnstr_get(x_111, 1); -lean::inc(x_112); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - x_113 = x_111; -} else { - lean::dec_ref(x_111); - x_113 = lean::box(0); -} -if (lean::is_scalar(x_113)) { - x_114 = lean::alloc_cnstr(0, 2, 0); -} else { - x_114 = x_113; -} -lean::cnstr_set(x_114, 0, x_110); -lean::cnstr_set(x_114, 1, x_112); -return x_114; -} -else -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; -lean::dec(x_110); -x_115 = lean::cnstr_get(x_111, 0); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_111, 1); -lean::inc(x_116); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - x_117 = x_111; -} else { - lean::dec_ref(x_111); - x_117 = lean::box(0); -} -if (lean::is_scalar(x_117)) { - x_118 = lean::alloc_cnstr(1, 2, 0); -} else { - x_118 = x_117; -} -lean::cnstr_set(x_118, 0, x_115); -lean::cnstr_set(x_118, 1, x_116); -return x_118; -} -} -else -{ -obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_119 = lean::cnstr_get(x_107, 0); -lean::inc(x_119); -lean::dec(x_107); -x_120 = lean::cnstr_get(x_119, 0); -lean::inc(x_120); -x_121 = lean::cnstr_get(x_119, 1); -lean::inc(x_121); -if (lean::is_exclusive(x_119)) { - lean::cnstr_release(x_119, 0); - lean::cnstr_release(x_119, 1); - x_122 = x_119; -} else { - lean::dec_ref(x_119); - x_122 = lean::box(0); -} -x_123 = l_List_reverse___rarg(x_121); -lean::inc(x_123); -lean::inc(x_3); -x_124 = l_List_mfor___main___at_Lean_runFrontend___spec__2(x_3, x_123, x_8); -if (lean::obj_tag(x_124) == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; -x_125 = lean::cnstr_get(x_124, 1); -lean::inc(x_125); -if (lean::is_exclusive(x_124)) { - lean::cnstr_release(x_124, 0); - lean::cnstr_release(x_124, 1); - x_126 = x_124; -} else { - lean::dec_ref(x_124); - x_126 = lean::box(0); -} -if (lean::is_scalar(x_126)) { - x_127 = lean::alloc_cnstr(0, 2, 0); -} else { - x_127 = x_126; -} -lean::cnstr_set(x_127, 0, x_11); -lean::cnstr_set(x_127, 1, x_125); -x_128 = lean::cnstr_get(x_10, 0); -lean::inc(x_128); -x_129 = lean::cnstr_get(x_128, 0); -lean::inc(x_129); -lean::dec(x_128); -x_130 = lean::cnstr_get(x_129, 0); -lean::inc(x_130); -lean::dec(x_129); -x_131 = l_Lean_Expander_builtinTransformers; -lean::inc(x_130); -x_132 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_132, 0, x_130); -lean::cnstr_set(x_132, 1, x_131); -x_133 = lean::cnstr_get(x_130, 2); -lean::inc(x_133); -if (lean::is_exclusive(x_130)) { - lean::cnstr_release(x_130, 0); - lean::cnstr_release(x_130, 1); - lean::cnstr_release(x_130, 2); - x_134 = x_130; -} else { - lean::dec_ref(x_130); - x_134 = lean::box(0); -} -if (lean::is_scalar(x_134)) { - x_135 = lean::alloc_cnstr(0, 3, 0); -} else { - x_135 = x_134; -} -lean::cnstr_set(x_135, 0, x_1); -lean::cnstr_set(x_135, 1, x_2); -lean::cnstr_set(x_135, 2, x_133); -lean::inc(x_10); -x_136 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_136, 0, x_135); -lean::cnstr_set(x_136, 1, x_10); -x_137 = l_Lean_runFrontend___closed__1; -x_138 = l_Lean_Elaborator_mkState(x_136, x_5, x_137); -x_139 = lean::box(0); -if (lean::is_scalar(x_122)) { - x_140 = lean::alloc_cnstr(0, 2, 0); -} else { - x_140 = x_122; -} -lean::cnstr_set(x_140, 0, x_132); -lean::cnstr_set(x_140, 1, x_139); -x_141 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_141, 0, x_10); -lean::cnstr_set(x_141, 1, x_140); -x_142 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_142, 0, x_138); -lean::cnstr_set(x_142, 1, x_141); -x_143 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_143, 0, x_120); -lean::cnstr_set(x_143, 1, x_142); -x_144 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(x_3, x_4, x_123, x_136, x_139, x_143, x_127); -return x_144; -} -else -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; -lean::dec(x_123); -lean::dec(x_122); -lean::dec(x_120); -lean::dec(x_10); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_145 = lean::cnstr_get(x_124, 0); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_124, 1); -lean::inc(x_146); -if (lean::is_exclusive(x_124)) { - lean::cnstr_release(x_124, 0); - lean::cnstr_release(x_124, 1); - x_147 = x_124; -} else { - lean::dec_ref(x_124); - x_147 = lean::box(0); -} -if (lean::is_scalar(x_147)) { - x_148 = lean::alloc_cnstr(1, 2, 0); -} else { - x_148 = x_147; -} -lean::cnstr_set(x_148, 0, x_145); -lean::cnstr_set(x_148, 1, x_146); -return x_148; -} -} -} -} -else -{ -obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; -x_149 = lean::cnstr_get(x_8, 0); -x_150 = lean::cnstr_get(x_8, 1); -lean::inc(x_150); -lean::inc(x_149); -lean::dec(x_8); -x_151 = lean::box(0); -x_152 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_152, 0, x_151); -lean::cnstr_set(x_152, 1, x_150); -lean::inc(x_149); -x_153 = l_Lean_Parser_parseHeader(x_149); -x_154 = lean::cnstr_get(x_153, 1); -lean::inc(x_154); -if (lean::is_exclusive(x_153)) { - lean::cnstr_release(x_153, 0); - lean::cnstr_release(x_153, 1); - x_155 = x_153; -} else { - lean::dec_ref(x_153); - x_155 = lean::box(0); -} -if (lean::obj_tag(x_154) == 0) -{ -obj* x_156; obj* x_157; obj* x_158; obj* x_159; -lean::dec(x_149); -lean::dec(x_2); -lean::dec(x_1); -x_156 = lean::cnstr_get(x_154, 0); -lean::inc(x_156); -lean::dec(x_154); -x_157 = lean::box(0); -if (lean::is_scalar(x_155)) { - x_158 = lean::alloc_cnstr(0, 2, 0); -} else { - x_158 = x_155; -} -lean::cnstr_set(x_158, 0, x_157); -lean::cnstr_set(x_158, 1, x_5); -x_159 = lean::apply_2(x_3, x_156, x_152); -if (lean::obj_tag(x_159) == 0) -{ -obj* x_160; obj* x_161; obj* x_162; -x_160 = lean::cnstr_get(x_159, 1); -lean::inc(x_160); -if (lean::is_exclusive(x_159)) { - lean::cnstr_release(x_159, 0); - lean::cnstr_release(x_159, 1); - x_161 = x_159; -} else { - lean::dec_ref(x_159); - x_161 = lean::box(0); -} -if (lean::is_scalar(x_161)) { - x_162 = lean::alloc_cnstr(0, 2, 0); -} else { - x_162 = x_161; -} -lean::cnstr_set(x_162, 0, x_158); -lean::cnstr_set(x_162, 1, x_160); -return x_162; -} -else -{ -obj* x_163; obj* x_164; obj* x_165; obj* x_166; -lean::dec(x_158); -x_163 = lean::cnstr_get(x_159, 0); -lean::inc(x_163); -x_164 = lean::cnstr_get(x_159, 1); -lean::inc(x_164); -if (lean::is_exclusive(x_159)) { - lean::cnstr_release(x_159, 0); - lean::cnstr_release(x_159, 1); - x_165 = x_159; -} else { - lean::dec_ref(x_159); - x_165 = lean::box(0); -} -if (lean::is_scalar(x_165)) { - x_166 = lean::alloc_cnstr(1, 2, 0); -} else { - x_166 = x_165; -} -lean::cnstr_set(x_166, 0, x_163); -lean::cnstr_set(x_166, 1, x_164); -return x_166; -} -} -else -{ -obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; -x_167 = lean::cnstr_get(x_154, 0); -lean::inc(x_167); -lean::dec(x_154); -x_168 = lean::cnstr_get(x_167, 0); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_167, 1); -lean::inc(x_169); -if (lean::is_exclusive(x_167)) { - lean::cnstr_release(x_167, 0); - lean::cnstr_release(x_167, 1); - x_170 = x_167; -} else { - lean::dec_ref(x_167); - x_170 = lean::box(0); -} -x_171 = l_List_reverse___rarg(x_169); -lean::inc(x_171); -lean::inc(x_3); -x_172 = l_List_mfor___main___at_Lean_runFrontend___spec__2(x_3, x_171, x_152); -if (lean::obj_tag(x_172) == 0) -{ -obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; -x_173 = lean::cnstr_get(x_172, 1); -lean::inc(x_173); -if (lean::is_exclusive(x_172)) { - lean::cnstr_release(x_172, 0); - lean::cnstr_release(x_172, 1); - x_174 = x_172; -} else { - lean::dec_ref(x_172); - x_174 = lean::box(0); -} -if (lean::is_scalar(x_174)) { - x_175 = lean::alloc_cnstr(0, 2, 0); -} else { - x_175 = x_174; -} -lean::cnstr_set(x_175, 0, x_151); -lean::cnstr_set(x_175, 1, x_173); -x_176 = lean::cnstr_get(x_149, 0); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -lean::dec(x_176); -x_178 = lean::cnstr_get(x_177, 0); -lean::inc(x_178); -lean::dec(x_177); -x_179 = l_Lean_Expander_builtinTransformers; -lean::inc(x_178); -x_180 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_180, 0, x_178); -lean::cnstr_set(x_180, 1, x_179); -x_181 = lean::cnstr_get(x_178, 2); -lean::inc(x_181); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - lean::cnstr_release(x_178, 2); - x_182 = x_178; -} else { - lean::dec_ref(x_178); - x_182 = lean::box(0); -} -if (lean::is_scalar(x_182)) { - x_183 = lean::alloc_cnstr(0, 3, 0); -} else { - x_183 = x_182; -} -lean::cnstr_set(x_183, 0, x_1); -lean::cnstr_set(x_183, 1, x_2); -lean::cnstr_set(x_183, 2, x_181); -lean::inc(x_149); -x_184 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_184, 0, x_183); -lean::cnstr_set(x_184, 1, x_149); -x_185 = l_Lean_runFrontend___closed__1; -x_186 = l_Lean_Elaborator_mkState(x_184, x_5, x_185); -x_187 = lean::box(0); -if (lean::is_scalar(x_170)) { - x_188 = lean::alloc_cnstr(0, 2, 0); -} else { - x_188 = x_170; -} -lean::cnstr_set(x_188, 0, x_180); -lean::cnstr_set(x_188, 1, x_187); -if (lean::is_scalar(x_155)) { - x_189 = lean::alloc_cnstr(0, 2, 0); -} else { - x_189 = x_155; -} -lean::cnstr_set(x_189, 0, x_149); -lean::cnstr_set(x_189, 1, x_188); -x_190 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_190, 0, x_186); -lean::cnstr_set(x_190, 1, x_189); -x_191 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_191, 0, x_168); -lean::cnstr_set(x_191, 1, x_190); -x_192 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(x_3, x_4, x_171, x_184, x_187, x_191, x_175); -return x_192; -} -else -{ -obj* x_193; obj* x_194; obj* x_195; obj* x_196; -lean::dec(x_171); -lean::dec(x_170); -lean::dec(x_168); -lean::dec(x_155); -lean::dec(x_149); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_193 = lean::cnstr_get(x_172, 0); -lean::inc(x_193); -x_194 = lean::cnstr_get(x_172, 1); -lean::inc(x_194); -if (lean::is_exclusive(x_172)) { - lean::cnstr_release(x_172, 0); - lean::cnstr_release(x_172, 1); - x_195 = x_172; -} else { - lean::dec_ref(x_172); - x_195 = lean::box(0); -} -if (lean::is_scalar(x_195)) { - x_196 = lean::alloc_cnstr(1, 2, 0); -} else { - x_196 = x_195; -} -lean::cnstr_set(x_196, 0, x_193); -lean::cnstr_set(x_196, 1, x_194); -return x_196; -} -} -} -} -else -{ -uint8 x_197; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_197 = !lean::is_exclusive(x_8); -if (x_197 == 0) -{ -return x_8; -} -else -{ -obj* x_198; obj* x_199; obj* x_200; -x_198 = lean::cnstr_get(x_8, 0); -x_199 = lean::cnstr_get(x_8, 1); -lean::inc(x_199); -lean::inc(x_198); -lean::dec(x_8); -x_200 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_200, 0, x_198); -lean::cnstr_set(x_200, 1, x_199); -return x_200; -} -} -} -} -obj* l_ioOfExcept___at_Lean_runFrontend___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_ioOfExcept___at_Lean_runFrontend___spec__1(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__1(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__2(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___lambda__3(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___boxed(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); -lean::dec(x_2); -x_9 = l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6(x_1, x_8, x_3, x_4, x_5, x_6, x_7); -return x_9; -} -} -obj* l_Lean_runFrontend___boxed(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_4); -lean::dec(x_4); -x_8 = l_Lean_runFrontend(x_1, x_2, x_3, x_7, x_5, x_6); -return x_8; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("{\"file_name\": \"\", \"pos_line\": "); -return x_1; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(", \"pos_col\": "); -return x_1; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(", \"severity\": "); -return x_1; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("information"); -x_2 = l_String_quote(x_1); -return x_2; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__5() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(", \"caption\": "); -return x_1; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__6() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(", \"text\": "); -return x_1; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__7() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("}"); -return x_1; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__8() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("warning"); -x_2 = l_String_quote(x_1); -return x_2; -} -} -obj* _init_l_Lean_processFile___lambda__1___closed__9() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("error"); -x_2 = l_String_quote(x_1); -return x_2; -} -} -obj* l_Lean_processFile___lambda__1(uint8 x_1, obj* x_2, obj* x_3) { -_start: -{ -if (x_1 == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Message_toString(x_2); -x_5 = l_IO_println___at_HasRepr_HasEval___spec__1(x_4, x_3); -lean::dec(x_4); -return x_5; -} -else -{ -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; uint8 x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = l_Nat_repr(x_7); -x_9 = l_Lean_processFile___lambda__1___closed__1; -x_10 = lean::string_append(x_9, x_8); -lean::dec(x_8); -x_11 = l_Lean_processFile___lambda__1___closed__2; -x_12 = lean::string_append(x_10, x_11); -x_13 = lean::cnstr_get(x_6, 1); -lean::inc(x_13); -lean::dec(x_6); -x_14 = l_Nat_repr(x_13); -x_15 = lean::string_append(x_12, x_14); -lean::dec(x_14); -x_16 = l_Lean_processFile___lambda__1___closed__3; -x_17 = lean::string_append(x_15, x_16); -x_18 = lean::cnstr_get_scalar(x_2, sizeof(void*)*5); -x_19 = lean::cnstr_get(x_2, 3); -lean::inc(x_19); -x_20 = l_String_quote(x_19); -x_21 = lean::cnstr_get(x_2, 4); -lean::inc(x_21); -lean::dec(x_2); -x_22 = l_String_quote(x_21); -switch (x_18) { -case 0: -{ -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; -x_23 = l_Lean_processFile___lambda__1___closed__4; -x_24 = lean::string_append(x_17, x_23); -x_25 = l_Lean_processFile___lambda__1___closed__5; -x_26 = lean::string_append(x_24, x_25); -x_27 = lean::string_append(x_26, x_20); -lean::dec(x_20); -x_28 = l_Lean_processFile___lambda__1___closed__6; -x_29 = lean::string_append(x_27, x_28); -x_30 = lean::string_append(x_29, x_22); -lean::dec(x_22); -x_31 = l_Lean_processFile___lambda__1___closed__7; -x_32 = lean::string_append(x_30, x_31); -x_33 = l_IO_println___at_HasRepr_HasEval___spec__1(x_32, x_3); -lean::dec(x_32); -return x_33; -} -case 1: -{ -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; -x_34 = l_Lean_processFile___lambda__1___closed__8; -x_35 = lean::string_append(x_17, x_34); -x_36 = l_Lean_processFile___lambda__1___closed__5; -x_37 = lean::string_append(x_35, x_36); -x_38 = lean::string_append(x_37, x_20); -lean::dec(x_20); -x_39 = l_Lean_processFile___lambda__1___closed__6; -x_40 = lean::string_append(x_38, x_39); -x_41 = lean::string_append(x_40, x_22); -lean::dec(x_22); -x_42 = l_Lean_processFile___lambda__1___closed__7; -x_43 = lean::string_append(x_41, x_42); -x_44 = l_IO_println___at_HasRepr_HasEval___spec__1(x_43, x_3); -lean::dec(x_43); -return x_44; -} -default: -{ -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; -x_45 = l_Lean_processFile___lambda__1___closed__9; -x_46 = lean::string_append(x_17, x_45); -x_47 = l_Lean_processFile___lambda__1___closed__5; -x_48 = lean::string_append(x_46, x_47); -x_49 = lean::string_append(x_48, x_20); -lean::dec(x_20); -x_50 = l_Lean_processFile___lambda__1___closed__6; -x_51 = lean::string_append(x_49, x_50); -x_52 = lean::string_append(x_51, x_22); -lean::dec(x_22); -x_53 = l_Lean_processFile___lambda__1___closed__7; -x_54 = lean::string_append(x_52, x_53); -x_55 = l_IO_println___at_HasRepr_HasEval___spec__1(x_54, x_3); -lean::dec(x_54); -return x_55; -} -} -} -} -} -obj* _init_l_Lean_processFile___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_1 = lean::mk_nat_obj(1u); -x_2 = l_Nat_repr(x_1); -x_3 = lean::mk_string("{\"file_name\": \"\", \"pos_line\": "); -x_4 = lean::string_append(x_3, x_2); -lean::dec(x_2); -x_5 = lean::mk_string(", \"pos_col\": "); -x_6 = lean::string_append(x_4, x_5); -lean::dec(x_5); -x_7 = lean::mk_nat_obj(0u); -x_8 = l_Nat_repr(x_7); -x_9 = lean::string_append(x_6, x_8); -lean::dec(x_8); -x_10 = lean::mk_string(", \"severity\": "); -x_11 = lean::string_append(x_9, x_10); -lean::dec(x_10); -x_12 = lean::mk_string("error"); -x_13 = l_String_quote(x_12); -x_14 = lean::string_append(x_11, x_13); -lean::dec(x_13); -x_15 = lean::mk_string(", \"caption\": "); -x_16 = lean::string_append(x_14, x_15); -lean::dec(x_15); -x_17 = lean::mk_string(""); -x_18 = l_String_quote(x_17); -x_19 = lean::string_append(x_16, x_18); -lean::dec(x_18); -x_20 = lean::mk_string(", \"text\": "); -x_21 = lean::string_append(x_19, x_20); -lean::dec(x_20); -return x_21; -} -} -obj* lean_process_file(obj* x_1, obj* x_2, uint8 x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; uint8 x_8; obj* x_9; -x_6 = lean::box(x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_processFile___lambda__1___boxed), 3, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = 0; -lean::inc(x_1); -x_9 = l_Lean_runFrontend(x_1, x_2, x_7, x_8, x_4, x_5); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -lean::dec(x_1); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -lean::dec(x_13); -x_14 = lean::box(0); -lean::cnstr_set(x_11, 0, x_14); -return x_9; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_11, 1); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_15); -lean::cnstr_set(x_9, 0, x_17); -return x_9; -} -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_18 = lean::cnstr_get(x_9, 0); -x_19 = lean::cnstr_get(x_9, 1); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_9); -x_20 = lean::cnstr_get(x_18, 1); -lean::inc(x_20); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - lean::cnstr_release(x_18, 1); - x_21 = x_18; -} else { - lean::dec_ref(x_18); - x_21 = lean::box(0); -} -x_22 = lean::box(0); -if (lean::is_scalar(x_21)) { - x_23 = lean::alloc_cnstr(0, 2, 0); -} else { - x_23 = x_21; -} -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_20); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_19); -return x_24; -} -} -else -{ -uint8 x_25; -x_25 = !lean::is_exclusive(x_9); -if (x_25 == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_9, 0); -x_27 = lean::box(0); -lean::cnstr_set_tag(x_9, 0); -lean::cnstr_set(x_9, 0, x_27); -if (x_3 == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_28 = lean::box(0); -x_29 = l_Lean_Elaborator_notation_elaborate___closed__1; -x_30 = 2; -x_31 = l_String_splitAux___main___closed__1; -lean::inc(x_26); -x_32 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_32, 0, x_1); -lean::cnstr_set(x_32, 1, x_29); -lean::cnstr_set(x_32, 2, x_28); -lean::cnstr_set(x_32, 3, x_31); -lean::cnstr_set(x_32, 4, x_26); -lean::cnstr_set_scalar(x_32, sizeof(void*)*5, x_30); -x_33 = l_Lean_Message_toString(x_32); -x_34 = l_IO_println___at_HasRepr_HasEval___spec__1(x_33, x_9); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -uint8 x_35; -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; -x_36 = lean::cnstr_get(x_34, 0); -lean::dec(x_36); -lean::cnstr_set_tag(x_34, 1); -lean::cnstr_set(x_34, 0, x_26); -return x_34; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -lean::dec(x_34); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_26); -lean::cnstr_set(x_38, 1, x_37); -return x_38; -} -} -else -{ -uint8 x_39; -lean::dec(x_26); -x_39 = !lean::is_exclusive(x_34); -if (x_39 == 0) -{ -return x_34; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; -x_40 = lean::cnstr_get(x_34, 0); -x_41 = lean::cnstr_get(x_34, 1); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_34); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_41); -return x_42; -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -lean::dec(x_1); -lean::inc(x_26); -x_43 = l_String_quote(x_26); -x_44 = l_Lean_processFile___closed__1; -x_45 = lean::string_append(x_44, x_43); -lean::dec(x_43); -x_46 = l_Lean_processFile___lambda__1___closed__7; -x_47 = lean::string_append(x_45, x_46); -x_48 = l_IO_println___at_HasRepr_HasEval___spec__1(x_47, x_9); -lean::dec(x_47); -if (lean::obj_tag(x_48) == 0) -{ -uint8 x_49; -x_49 = !lean::is_exclusive(x_48); -if (x_49 == 0) -{ -obj* x_50; -x_50 = lean::cnstr_get(x_48, 0); -lean::dec(x_50); -lean::cnstr_set_tag(x_48, 1); -lean::cnstr_set(x_48, 0, x_26); -return x_48; -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -lean::dec(x_48); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_26); -lean::cnstr_set(x_52, 1, x_51); -return x_52; -} -} -else -{ -uint8 x_53; -lean::dec(x_26); -x_53 = !lean::is_exclusive(x_48); -if (x_53 == 0) -{ -return x_48; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; -x_54 = lean::cnstr_get(x_48, 0); -x_55 = lean::cnstr_get(x_48, 1); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_48); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_54); -lean::cnstr_set(x_56, 1, x_55); -return x_56; -} -} -} -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_57 = lean::cnstr_get(x_9, 0); -x_58 = lean::cnstr_get(x_9, 1); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_9); -x_59 = lean::box(0); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_58); -if (x_3 == 0) -{ -obj* x_61; obj* x_62; uint8 x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_61 = lean::box(0); -x_62 = l_Lean_Elaborator_notation_elaborate___closed__1; -x_63 = 2; -x_64 = l_String_splitAux___main___closed__1; -lean::inc(x_57); -x_65 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_65, 0, x_1); -lean::cnstr_set(x_65, 1, x_62); -lean::cnstr_set(x_65, 2, x_61); -lean::cnstr_set(x_65, 3, x_64); -lean::cnstr_set(x_65, 4, x_57); -lean::cnstr_set_scalar(x_65, sizeof(void*)*5, x_63); -x_66 = l_Lean_Message_toString(x_65); -x_67 = l_IO_println___at_HasRepr_HasEval___spec__1(x_66, x_60); -lean::dec(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; obj* x_70; -x_68 = lean::cnstr_get(x_67, 1); -lean::inc(x_68); -if (lean::is_exclusive(x_67)) { - lean::cnstr_release(x_67, 0); - lean::cnstr_release(x_67, 1); - x_69 = x_67; -} else { - lean::dec_ref(x_67); - x_69 = lean::box(0); -} -if (lean::is_scalar(x_69)) { - x_70 = lean::alloc_cnstr(1, 2, 0); -} else { - x_70 = x_69; - lean::cnstr_set_tag(x_70, 1); -} -lean::cnstr_set(x_70, 0, x_57); -lean::cnstr_set(x_70, 1, x_68); -return x_70; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; -lean::dec(x_57); -x_71 = lean::cnstr_get(x_67, 0); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_67, 1); -lean::inc(x_72); -if (lean::is_exclusive(x_67)) { - lean::cnstr_release(x_67, 0); - lean::cnstr_release(x_67, 1); - x_73 = x_67; -} else { - lean::dec_ref(x_67); - x_73 = lean::box(0); -} -if (lean::is_scalar(x_73)) { - x_74 = lean::alloc_cnstr(1, 2, 0); -} else { - x_74 = x_73; -} -lean::cnstr_set(x_74, 0, x_71); -lean::cnstr_set(x_74, 1, x_72); -return x_74; -} -} -else -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -lean::dec(x_1); -lean::inc(x_57); -x_75 = l_String_quote(x_57); -x_76 = l_Lean_processFile___closed__1; -x_77 = lean::string_append(x_76, x_75); -lean::dec(x_75); -x_78 = l_Lean_processFile___lambda__1___closed__7; -x_79 = lean::string_append(x_77, x_78); -x_80 = l_IO_println___at_HasRepr_HasEval___spec__1(x_79, x_60); -lean::dec(x_79); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; obj* x_82; obj* x_83; -x_81 = lean::cnstr_get(x_80, 1); -lean::inc(x_81); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - lean::cnstr_release(x_80, 1); - x_82 = x_80; -} else { - lean::dec_ref(x_80); - x_82 = lean::box(0); -} -if (lean::is_scalar(x_82)) { - x_83 = lean::alloc_cnstr(1, 2, 0); -} else { - x_83 = x_82; - lean::cnstr_set_tag(x_83, 1); -} -lean::cnstr_set(x_83, 0, x_57); -lean::cnstr_set(x_83, 1, x_81); -return x_83; -} -else -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; -lean::dec(x_57); -x_84 = lean::cnstr_get(x_80, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_80, 1); -lean::inc(x_85); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - lean::cnstr_release(x_80, 1); - x_86 = x_80; -} else { - lean::dec_ref(x_80); - x_86 = lean::box(0); -} -if (lean::is_scalar(x_86)) { - x_87 = lean::alloc_cnstr(1, 2, 0); -} else { - x_87 = x_86; -} -lean::cnstr_set(x_87, 0, x_84); -lean::cnstr_set(x_87, 1, x_85); -return x_87; -} -} -} -} -} -} -obj* l_Lean_processFile___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_1); -lean::dec(x_1); -x_5 = l_Lean_processFile___lambda__1(x_4, x_2, x_3); -return x_5; -} -} -obj* l_Lean_processFile___boxed(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_3); -lean::dec(x_3); -x_7 = lean_process_file(x_1, x_2, x_6, x_4, x_5); -return x_7; -} -} -obj* initialize_init_default(obj*); -obj* initialize_init_lean_parser_module(obj*); -obj* initialize_init_lean_expander(obj*); -obj* initialize_init_lean_elaborator(obj*); -obj* initialize_init_lean_util(obj*); -obj* initialize_init_io(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_frontend(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_default(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_module(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_expander(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_elaborator(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_util(w); -if (io_result_is_error(w)) return w; -w = initialize_init_io(w); -if (io_result_is_error(w)) return w; -l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__1 = _init_l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__1(); -lean::mark_persistent(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__1); -l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2 = _init_l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2(); -lean::mark_persistent(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__2); -l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3 = _init_l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3(); -lean::mark_persistent(l_IO_Prim_iterate___main___at_Lean_runFrontend___spec__6___closed__3); -l_Lean_runFrontend___closed__1 = _init_l_Lean_runFrontend___closed__1(); -lean::mark_persistent(l_Lean_runFrontend___closed__1); -l_Lean_processFile___lambda__1___closed__1 = _init_l_Lean_processFile___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__1); -l_Lean_processFile___lambda__1___closed__2 = _init_l_Lean_processFile___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__2); -l_Lean_processFile___lambda__1___closed__3 = _init_l_Lean_processFile___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__3); -l_Lean_processFile___lambda__1___closed__4 = _init_l_Lean_processFile___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__4); -l_Lean_processFile___lambda__1___closed__5 = _init_l_Lean_processFile___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__5); -l_Lean_processFile___lambda__1___closed__6 = _init_l_Lean_processFile___lambda__1___closed__6(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__6); -l_Lean_processFile___lambda__1___closed__7 = _init_l_Lean_processFile___lambda__1___closed__7(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__7); -l_Lean_processFile___lambda__1___closed__8 = _init_l_Lean_processFile___lambda__1___closed__8(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__8); -l_Lean_processFile___lambda__1___closed__9 = _init_l_Lean_processFile___lambda__1___closed__9(); -lean::mark_persistent(l_Lean_processFile___lambda__1___closed__9); -l_Lean_processFile___closed__1 = _init_l_Lean_processFile___closed__1(); -lean::mark_persistent(l_Lean_processFile___closed__1); -return w; -} diff --git a/src/stage0/init/lean/message.cpp b/src/stage0/init/lean/message.cpp index 154d08fa9e..fe460126f1 100644 --- a/src/stage0/init/lean/message.cpp +++ b/src/stage0/init/lean/message.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 -extern obj* l_Lean_Parser_Parsec_Message_toString___rarg___closed__3; obj* l_Lean_MessageLog_empty; obj* l_Lean_Message_toString___closed__2; obj* l_Lean_Message_toString___closed__1; @@ -28,6 +27,7 @@ obj* l_Nat_repr(obj*); obj* l_List_foldr___main___at_Lean_MessageLog_hasErrors___spec__1___boxed(obj*, obj*); extern obj* l_EState_Result_toString___main___rarg___closed__2; uint8 l_Lean_MessageLog_hasErrors(obj*); +obj* l_Lean_Message_toString___closed__4; namespace lean { obj* string_append(obj*, obj*); } @@ -61,6 +61,14 @@ obj* _init_l_Lean_Message_toString___closed__3() { _start: { obj* x_1; +x_1 = lean::mk_string(":\n"); +return x_1; +} +} +obj* _init_l_Lean_Message_toString___closed__4() { +_start: +{ +obj* x_1; x_1 = lean::mk_string("warning: "); return x_1; } @@ -105,7 +113,7 @@ x_20 = lean::string_append(x_14, x_17); if (x_18 == 0) { obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = l_Lean_Parser_Parsec_Message_toString___rarg___closed__3; +x_21 = l_Lean_Message_toString___closed__3; x_22 = lean::string_append(x_16, x_21); x_23 = lean::string_append(x_20, x_22); lean::dec(x_22); @@ -129,12 +137,12 @@ obj* x_27; obj* x_28; obj* x_29; x_27 = lean::cnstr_get(x_1, 4); lean::inc(x_27); lean::dec(x_1); -x_28 = l_Lean_Message_toString___closed__3; +x_28 = l_Lean_Message_toString___closed__4; x_29 = lean::string_append(x_14, x_28); if (x_18 == 0) { obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Parsec_Message_toString___rarg___closed__3; +x_30 = l_Lean_Message_toString___closed__3; x_31 = lean::string_append(x_16, x_30); x_32 = lean::string_append(x_29, x_31); lean::dec(x_31); @@ -163,7 +171,7 @@ x_38 = lean::string_append(x_14, x_37); if (x_18 == 0) { obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_39 = l_Lean_Parser_Parsec_Message_toString___rarg___closed__3; +x_39 = l_Lean_Message_toString___closed__3; x_40 = lean::string_append(x_16, x_39); x_41 = lean::string_append(x_38, x_40); lean::dec(x_40); @@ -338,6 +346,8 @@ l_Lean_Message_toString___closed__2 = _init_l_Lean_Message_toString___closed__2( lean::mark_persistent(l_Lean_Message_toString___closed__2); l_Lean_Message_toString___closed__3 = _init_l_Lean_Message_toString___closed__3(); lean::mark_persistent(l_Lean_Message_toString___closed__3); +l_Lean_Message_toString___closed__4 = _init_l_Lean_Message_toString___closed__4(); +lean::mark_persistent(l_Lean_Message_toString___closed__4); l_Lean_Message_Inhabited = _init_l_Lean_Message_Inhabited(); lean::mark_persistent(l_Lean_Message_Inhabited); l_Lean_Message_HasToString = _init_l_Lean_Message_HasToString(); diff --git a/src/stage0/init/lean/name_mangling.cpp b/src/stage0/init/lean/name_mangling.cpp index 58ed93d960..6ef9ea68d7 100644 --- a/src/stage0/init/lean/name_mangling.cpp +++ b/src/stage0/init/lean/name_mangling.cpp @@ -1,6 +1,6 @@ // Lean compiler output // Module: init.lean.name_mangling -// Imports: init.lean.name init.lean.parser.stringliteral +// Imports: init.lean.name #include "runtime/object.h" #include "runtime/apply.h" typedef lean::object obj; typedef lean::usize usize; @@ -318,7 +318,6 @@ return x_4; } } obj* initialize_init_lean_name(obj*); -obj* initialize_init_lean_parser_stringliteral(obj*); static bool _G_initialized = false; obj* initialize_init_lean_name__mangling(obj* w) { if (_G_initialized) return w; @@ -326,8 +325,6 @@ _G_initialized = true; if (io_result_is_error(w)) return w; w = initialize_init_lean_name(w); if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_stringliteral(w); -if (io_result_is_error(w)) return w; l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__1 = _init_l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__1(); lean::mark_persistent(l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__1); l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__2 = _init_l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__2(); diff --git a/src/stage0/init/lean/parser/basic.cpp b/src/stage0/init/lean/parser/basic.cpp deleted file mode 100644 index 2258b5c359..0000000000 --- a/src/stage0/init/lean/parser/basic.cpp +++ /dev/null @@ -1,11971 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.basic -// Imports: init.lean.parser.parsec init.lean.parser.syntax init.lean.parser.rec init.lean.parser.trie init.lean.parser.identifier init.data.rbmap.default init.lean.message -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_RBNode_setBlack___main___rarg(obj*); -obj* l_Lean_Parser_tryView___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_trailingTermParserCoe___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_monadParsecTrans___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_run___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParserT_Lean_Parser_MonadParsec___boxed(obj*, obj*); -obj* l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadRec; -obj* l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -obj* l_Lean_Parser_BasicParserM_Alternative; -obj* l_Lean_Parser_TermParserM_Lean_Parser_MonadRec; -extern obj* l_Lean_MessageLog_empty; -obj* l_Lean_Parser_CommandParserM_Monad___closed__1; -obj* l_Lean_Parser_TokenMap_ofList___main(obj*); -obj* l_Lean_Parser_logMessage(obj*, obj*, obj*); -obj* l_Lean_Parser_CommandParserM_MonadReader(obj*); -obj* l_Lean_Parser_messageOfParsecMessage(obj*); -obj* l_Lean_Parser_MonadRec_trans___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParserT_Lean_Parser_MonadParsec___rarg(obj*); -obj* l_Lean_Parser_logMessage___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_TokenMap_ofList___rarg(obj*); -obj* l_Lean_Parser_ParserT_Alternative___rarg(obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_ParserT_Lean_Parser_MonadParsec(obj*, obj*); -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec___closed__1; -extern obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -obj* l_Lean_Parser_HasTokens_Inhabited(obj*, obj*); -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_BasicParserM_Monad; -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg___lambda__1(obj*, obj*); -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(obj*, obj*, obj*); -obj* l_StateT_Monad___rarg(obj*); -obj* l_Lean_Parser_run___rarg___closed__1; -obj* l_Lean_Parser_TokenMap_ofList(obj*); -obj* l_Lean_Parser_ParserT_Alternative(obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1(obj*); -obj* l_Lean_Parser_tokenMapCons_tokens___rarg___boxed(obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__3; -obj* l_Lean_Parser_CommandParserM_basicParser(obj*); -obj* l_Lean_Parser_tokenMapNil_tokens(obj*); -obj* l_Lean_Parser_run___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_TokenMap_insert___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParserT_MonadExcept___rarg(obj*); -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l_ReaderT_MonadReaderAdapter___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_HasTokens_Inhabited___boxed(obj*, obj*); -obj* l_Lean_Parser_TermParserM_Alternative; -obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__2___rarg(obj*, obj*, obj*); -obj* l_id___rarg___boxed(obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__2; -obj* l_Lean_Parser_ParserT_MonadExcept___boxed(obj*, obj*); -obj* l_Lean_Parser_mkTokenTrie(obj*); -obj* l_Lean_Parser_parserCoreT_Monad(obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1(obj*, obj*); -obj* l_Lean_Parser_tokenMapCons_tokens___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parserCoreT_Alternative___rarg(obj*); -obj* l_Lean_Parser_tokenMapCons_tokens(obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1(obj*); -obj* l_Lean_Parser_logMessage___boxed(obj*, obj*, obj*); -extern obj* l_Id_Monad; -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_logMessage___rarg___lambda__2(obj*, obj*, obj*, obj*); -obj* l_ReaderT_read___rarg(obj*, obj*); -obj* l_Lean_Parser_parserCoreT_MonadExcept___rarg(obj*); -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3(obj*); -obj* l_Nat_repr(obj*); -obj* l_Lean_Parser_commandParserConfigCoeParserConfig___boxed(obj*); -obj* l_ReaderT_lift___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_BasicParserM_MonadReader; -obj* l_ReaderT_Monad___rarg(obj*); -obj* l_Lean_Parser_getCache___boxed(obj*); -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_CommandParserM_MonadExcept___closed__1; -obj* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_TrailingTermParserM_Alternative; -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_Lean_Parser_parserCoreT_MonadExcept(obj*); -obj* l___private_init_lean_parser_trie_3__findAux___main___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg(obj*, obj*); -obj* l_Lean_Parser_List_cons_tokens___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec(obj*); -obj* l_hasMonadLiftTTrans___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_commandParserConfigCoeParserConfig(obj*); -obj* l_Lean_Parser_TermParserM_MonadReader; -obj* l_Lean_Parser_parserCoreT_MonadExcept___boxed(obj*); -obj* l_Lean_Parser_putCache___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parserConfigCoe___boxed(obj*); -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParserT_MonadReader___boxed(obj*, obj*); -obj* l_List_append___rarg(obj*, obj*); -obj* l_Lean_Parser_ParserT_MonadReader(obj*, obj*); -obj* l_Lean_Parser_run___boxed(obj*, obj*, obj*); -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6(obj*); -obj* l_Lean_Parser_tokens___rarg(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -uint8 l_RBNode_isRed___main___rarg(obj*); -obj* l_Lean_Parser_CommandParserM_basicParser___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_trailingTermParserCoe(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_List_cons_tokens(obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_Message_text___rarg(obj*); -obj* l_Lean_Parser_TokenMap_insert(obj*); -obj* l_Lean_Parser_ParserT_MonadExcept(obj*, obj*); -obj* l_Lean_Parser_tryView(obj*); -obj* l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec; -obj* l_Lean_Parser_parserConfigCoe(obj*); -obj* l_Lean_Parser_List_cons_tokens___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_putCache(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_maxPrec; -obj* l_Lean_Parser_ParserT_Monad___rarg(obj*); -obj* l_Lean_Parser_List_nil_tokens(obj*); -extern obj* l_Lean_Parser_Trie_HasEmptyc___closed__1; -obj* l_Lean_Parser_Lean_Parser_MonadParsec___rarg(obj*); -obj* l_Lean_Parser_getCache___rarg(obj*, obj*); -obj* l_Lean_Parser_TrailingTermParserM_MonadReader; -obj* l_ReaderT_MonadFunctor___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_run___rarg___lambda__1___closed__1; -obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__2(obj*); -obj* l_Lean_Parser_TermParserM_Monad; -uint8 l_Lean_Name_quickLt(obj*, obj*); -obj* l_ReaderT_MonadExcept___rarg(obj*); -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec___closed__1; -obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5(obj*); -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7(obj*); -obj* l_Lean_Parser_List_cons_tokens___rarg(obj*, obj*); -obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_tokens(obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg(obj*, obj*); -obj* l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec(obj*); -obj* l_Lean_Parser_tokenMapCons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg(obj*, obj*); -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4(obj*); -obj* l_Lean_Parser_RecT_recurse___rarg(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Alternative___rarg(obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___boxed(obj*); -obj* l_Lean_Parser_messageOfParsecMessage___rarg(obj*, obj*); -obj* l_Lean_Parser_CommandParserM_MonadReaderAdapter(obj*, obj*); -obj* l_Lean_Parser_TermParserM_Lean_Parser_monadBasicParser; -obj* l_ReaderT_Alternative___rarg(obj*, obj*); -obj* l_Lean_Parser_messageOfParsecMessage___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_parserCoreT_Monad___rarg(obj*); -obj* l_Lean_Parser_CommandParserM_MonadReader___closed__1; -obj* l_Lean_Parser_HasView_default___rarg(obj*); -obj* l_Lean_Parser_getCache(obj*); -obj* l_Lean_Parser_CommandParserM_Alternative(obj*); -obj* l_Lean_Parser_run(obj*, obj*, obj*); -obj* l_Lean_Parser_CommandParserM_Alternative___closed__1; -obj* l_Lean_Parser_TrailingTermParserM_Monad; -obj* l_Lean_Parser_ParserT_Monad___boxed(obj*, obj*); -obj* l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec___boxed(obj*); -obj* l_Lean_FileMap_toPosition(obj*, obj*); -obj* l_Lean_Parser_CommandParserM_Monad(obj*); -obj* l_Lean_Parser_tokens___boxed(obj*, obj*); -obj* l_Lean_Parser_CommandParserM_basicParser___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_HasView_default___rarg___boxed(obj*); -obj* l_Lean_Parser_TermParserM_MonadExcept; -obj* l_Lean_Parser_ParserT_Alternative___boxed(obj*, obj*); -obj* l_Lean_Parser_CommandParserM_MonadReaderAdapter___closed__1; -obj* l_Lean_Parser_HasView_default(obj*); -obj* l_Lean_Parser_parserCoreT_Alternative___boxed(obj*); -obj* l_Lean_Parser_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_ParserT_MonadReader___rarg(obj*); -obj* l_Lean_Parser_TrailingTermParserM_MonadExcept; -obj* l_Lean_Parser_BasicParserM_MonadExcept; -obj* l_ReaderT_lift___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_logMessage___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_TrailingTermParserM_Lean_Parser_monadBasicParser; -obj* l_Lean_Parser_tryView___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParserT_Monad(obj*, obj*); -obj* l_Lean_Parser_mkTokenTrie___closed__1; -obj* l_Lean_Parser_TokenMap_ofList___main___rarg(obj*); -obj* l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec___rarg(obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_CommandParserM_MonadExcept(obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__1; -obj* l_Lean_Parser_parserCoreT_Monad___boxed(obj*); -obj* l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -obj* l___private_init_lean_parser_trie_2__insertAux___main___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parserCoreT_Alternative(obj*); -extern obj* l_String_splitAux___main___closed__1; -obj* _init_l_Lean_Parser_maxPrec() { -_start: -{ -obj* x_1; -x_1 = lean::mk_nat_obj(1024u); -return x_1; -} -} -obj* l_Lean_Parser_parserConfigCoe(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_parserConfigCoe___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_parserConfigCoe(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_parserCoreT_Monad___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_StateT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_ParsecT_Monad___rarg(x_2, lean::box(0)); -return x_3; -} -} -obj* l_Lean_Parser_parserCoreT_Monad(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parserCoreT_Monad___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_parserCoreT_Monad___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_parserCoreT_Monad(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_parserCoreT_Alternative___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_StateT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_ParsecT_Alternative___rarg(x_2, lean::box(0)); -return x_3; -} -} -obj* l_Lean_Parser_parserCoreT_Alternative(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parserCoreT_Alternative___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_parserCoreT_Alternative___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_parserCoreT_Alternative(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_StateT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_Lean_Parser_MonadParsec___rarg(x_2); -return x_3; -} -} -obj* l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_parserCoreT_MonadExcept___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_StateT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_ParsecT_MonadExcept___rarg(x_2, lean::box(0)); -return x_3; -} -} -obj* l_Lean_Parser_parserCoreT_MonadExcept(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parserCoreT_MonadExcept___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_parserCoreT_MonadExcept___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_parserCoreT_MonadExcept(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParserT_Monad___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -x_3 = l_ReaderT_Monad___rarg(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_Monad(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParserT_Monad___rarg), 1, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_Monad___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParserT_Monad(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_Alternative___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -lean::inc(x_1); -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_parserCoreT_Alternative___rarg(x_1); -x_4 = l_ReaderT_Alternative___rarg(x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_ParserT_Alternative(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParserT_Alternative___rarg), 1, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_Alternative___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParserT_Alternative(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_MonadReader___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_read___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_MonadReader(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParserT_MonadReader___rarg), 1, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_MonadReader___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParserT_MonadReader(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_Lean_Parser_MonadParsec___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -lean::inc(x_1); -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 4, 3); -lean::closure_set(x_3, 0, lean::box(0)); -lean::closure_set(x_3, 1, lean::box(0)); -lean::closure_set(x_3, 2, x_2); -lean::inc(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_MonadFunctor___boxed), 6, 5); -lean::closure_set(x_4, 0, lean::box(0)); -lean::closure_set(x_4, 1, lean::box(0)); -lean::closure_set(x_4, 2, lean::box(0)); -lean::closure_set(x_4, 3, x_2); -lean::closure_set(x_4, 4, x_2); -x_5 = l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec___rarg(x_1); -x_6 = l_Lean_Parser_monadParsecTrans___rarg(x_3, x_4, x_5); -return x_6; -} -} -obj* l_Lean_Parser_ParserT_Lean_Parser_MonadParsec(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParserT_Lean_Parser_MonadParsec___rarg), 1, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_Lean_Parser_MonadParsec___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParserT_Lean_Parser_MonadParsec(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_MonadExcept___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_parserCoreT_MonadExcept___rarg(x_1); -x_3 = l_ReaderT_MonadExcept___rarg(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_MonadExcept(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParserT_MonadExcept___rarg), 1, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParserT_MonadExcept___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParserT_MonadExcept(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_BasicParserM_Monad() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Monad___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_BasicParserM_Alternative() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Alternative___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_BasicParserM_MonadReader() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_MonadReader___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Lean_Parser_MonadParsec___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_BasicParserM_MonadExcept() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_MonadExcept___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_getCache___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_2); -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_1); -lean::cnstr_set(x_4, 2, x_3); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_2); -return x_5; -} -} -obj* l_Lean_Parser_getCache(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_getCache___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_getCache___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_getCache(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_putCache(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; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* l_Lean_Parser_putCache___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_putCache(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_tokens___rarg(obj* x_1) { -_start: -{ -lean::inc(x_1); -return x_1; -} -} -obj* l_Lean_Parser_tokens(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_tokens___rarg___boxed), 1, 0); -return x_3; -} -} -obj* l_Lean_Parser_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_tokens___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_tokens(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_HasTokens_Inhabited(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -} -obj* l_Lean_Parser_HasTokens_Inhabited___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_HasTokens_Inhabited(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_List_nil_tokens(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -} -obj* l_Lean_Parser_List_cons_tokens___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_Lean_Parser_tokens___rarg(x_1); -x_4 = l_Lean_Parser_tokens___rarg(x_2); -x_5 = l_List_append___rarg(x_3, x_4); -return x_5; -} -} -obj* l_Lean_Parser_List_cons_tokens(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_List_cons_tokens___rarg___boxed), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_List_cons_tokens___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_List_cons_tokens___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_List_cons_tokens(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_tryView___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_Lean_Parser_Syntax_isOfKind___main(x_1, x_3); -if (x_4 == 0) -{ -obj* x_5; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -} -obj* l_Lean_Parser_tryView(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_tryView___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_tryView___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_tryView___rarg(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_HasView_default___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_mjoin___rarg___closed__1; -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_HasView_default(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_HasView_default___rarg___boxed), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_HasView_default___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_HasView_default___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_messageOfParsecMessage___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; uint8 x_10; obj* x_11; obj* x_12; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = l_Lean_FileMap_toPosition(x_4, x_6); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_Parsec_Message_text___rarg(x_2); -x_10 = 2; -x_11 = l_String_splitAux___main___closed__1; -lean::inc(x_3); -x_12 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_12, 0, x_3); -lean::cnstr_set(x_12, 1, x_7); -lean::cnstr_set(x_12, 2, x_8); -lean::cnstr_set(x_12, 3, x_11); -lean::cnstr_set(x_12, 4, x_9); -lean::cnstr_set_scalar(x_12, sizeof(void*)*5, x_10); -return x_12; -} -} -obj* l_Lean_Parser_messageOfParsecMessage(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_messageOfParsecMessage___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_messageOfParsecMessage___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_messageOfParsecMessage___rarg(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -lean::dec(x_5); -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_7); -x_10 = lean::apply_2(x_9, lean::box(0), x_2); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -lean::dec(x_3); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_11); -x_17 = lean::apply_2(x_15, lean::box(0), x_16); -return x_17; -} -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_2); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_19 = lean::cnstr_get(x_2, 0); -lean::dec(x_19); -x_20 = lean::cnstr_get(x_3, 0); -lean::inc(x_20); -lean::dec(x_3); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::cnstr_get(x_1, 0); -lean::inc(x_22); -lean::dec(x_1); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -lean::cnstr_set(x_2, 0, x_21); -x_24 = lean::apply_2(x_23, lean::box(0), x_2); -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_2, 1); -lean::inc(x_25); -lean::dec(x_2); -x_26 = lean::cnstr_get(x_3, 0); -lean::inc(x_26); -lean::dec(x_3); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::cnstr_get(x_1, 0); -lean::inc(x_28); -lean::dec(x_1); -x_29 = lean::cnstr_get(x_28, 1); -lean::inc(x_29); -lean::dec(x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set(x_30, 1, x_25); -x_31 = lean::apply_2(x_29, lean::box(0), x_30); -return x_31; -} -} -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_8); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -x_11 = lean::apply_2(x_4, x_9, x_7); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg___lambda__1), 2, 1); -lean::closure_set(x_12, 0, x_1); -x_13 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_11, x_12); -return x_13; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg___boxed), 7, 0); -return x_2; -} -} -obj* _init_l_Lean_Parser_run___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_run___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_4, 0); -x_7 = lean::cnstr_get(x_4, 1); -lean::dec(x_7); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_6, 0); -lean::inc(x_10); -lean::dec(x_6); -x_11 = lean::cnstr_get(x_10, 3); -lean::inc(x_11); -x_12 = lean::apply_1(x_2, x_3); -x_13 = l_Lean_Parser_messageOfParsecMessage___rarg(x_12, x_10); -lean::dec(x_12); -x_14 = l_Lean_MessageLog_empty; -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_16; obj* x_17; -x_16 = l_Lean_Parser_run___rarg___lambda__1___closed__1; -lean::cnstr_set(x_4, 1, x_15); -lean::cnstr_set(x_4, 0, x_16); -x_17 = lean::apply_2(x_9, lean::box(0), x_4); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_4, 1, x_15); -lean::cnstr_set(x_4, 0, x_19); -x_20 = lean::apply_2(x_9, lean::box(0), x_4); -return x_20; -} -} -else -{ -obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -lean::free_heap_obj(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_6, 0); -lean::inc(x_21); -lean::dec(x_6); -x_22 = lean::cnstr_get(x_1, 0); -lean::inc(x_22); -lean::dec(x_1); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -x_24 = !lean::is_exclusive(x_21); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; -x_25 = lean::cnstr_get(x_21, 0); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_21, 0, x_26); -x_27 = lean::apply_2(x_23, lean::box(0), x_21); -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_28 = lean::cnstr_get(x_21, 0); -x_29 = lean::cnstr_get(x_21, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_21); -x_30 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_30, 0, x_28); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -x_32 = lean::apply_2(x_23, lean::box(0), x_31); -return x_32; -} -} -} -else -{ -obj* x_33; -x_33 = lean::cnstr_get(x_4, 0); -lean::inc(x_33); -lean::dec(x_4); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_34 = lean::cnstr_get(x_1, 0); -lean::inc(x_34); -lean::dec(x_1); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -x_36 = lean::cnstr_get(x_33, 0); -lean::inc(x_36); -lean::dec(x_33); -x_37 = lean::cnstr_get(x_36, 3); -lean::inc(x_37); -x_38 = lean::apply_1(x_2, x_3); -x_39 = l_Lean_Parser_messageOfParsecMessage___rarg(x_38, x_36); -lean::dec(x_38); -x_40 = l_Lean_MessageLog_empty; -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_39); -lean::cnstr_set(x_41, 1, x_40); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; -x_42 = l_Lean_Parser_run___rarg___lambda__1___closed__1; -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_41); -x_44 = lean::apply_2(x_35, lean::box(0), x_43); -return x_44; -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_45 = lean::cnstr_get(x_37, 0); -lean::inc(x_45); -lean::dec(x_37); -x_46 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_41); -x_48 = lean::apply_2(x_35, lean::box(0), x_47); -return x_48; -} -} -else -{ -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; -lean::dec(x_3); -lean::dec(x_2); -x_49 = lean::cnstr_get(x_33, 0); -lean::inc(x_49); -lean::dec(x_33); -x_50 = lean::cnstr_get(x_1, 0); -lean::inc(x_50); -lean::dec(x_1); -x_51 = lean::cnstr_get(x_50, 1); -lean::inc(x_51); -lean::dec(x_50); -x_52 = lean::cnstr_get(x_49, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_49, 1); -lean::inc(x_53); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_54 = x_49; -} else { - lean::dec_ref(x_49); - x_54 = lean::box(0); -} -x_55 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_55, 0, x_52); -if (lean::is_scalar(x_54)) { - x_56 = lean::alloc_cnstr(0, 2, 0); -} else { - x_56 = x_54; -} -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_53); -x_57 = lean::apply_2(x_51, lean::box(0), x_56); -return x_57; -} -} -} -} -obj* _init_l_Lean_Parser_run___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(0u); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -lean::cnstr_set(x_3, 2, x_2); -return x_3; -} -} -obj* l_Lean_Parser_run___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = l_Lean_MessageLog_empty; -lean::inc(x_3); -x_8 = lean::apply_2(x_5, x_7, x_3); -x_9 = l_String_splitAux___main___closed__1; -x_10 = l_Lean_Parser_run___rarg___closed__1; -lean::inc(x_1); -x_11 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg(x_1, lean::box(0), lean::box(0), x_8, x_4, x_9, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_run___rarg___lambda__1), 4, 3); -lean::closure_set(x_12, 0, x_1); -lean::closure_set(x_12, 1, x_2); -lean::closure_set(x_12, 2, x_3); -x_13 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_11, x_12); -return x_13; -} -} -obj* l_Lean_Parser_run(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_run___rarg), 5, 0); -return x_4; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg___boxed(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; -x_8 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_6); -return x_8; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_run___spec__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_run___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_run(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_logMessage___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::apply_1(x_1, x_2); -x_6 = l_Lean_Parser_messageOfParsecMessage___rarg(x_5, x_3); -lean::dec(x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_4); -return x_7; -} -} -obj* l_Lean_Parser_logMessage___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 2); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_logMessage___rarg___lambda__1), 4, 3); -lean::closure_set(x_6, 0, x_2); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::apply_1(x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_logMessage___rarg(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; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_logMessage___rarg___lambda__2), 4, 3); -lean::closure_set(x_7, 0, x_4); -lean::closure_set(x_7, 1, x_3); -lean::closure_set(x_7, 2, x_5); -x_8 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_2, x_7); -return x_8; -} -} -obj* l_Lean_Parser_logMessage(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_logMessage___rarg), 5, 0); -return x_4; -} -} -obj* l_Lean_Parser_logMessage___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_logMessage(x_1, x_2, x_3); -lean::dec(x_2); -return x_4; -} -} -obj* _init_l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("invalid token '"); -return x_1; -} -} -obj* _init_l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("', has been defined with precedences "); -return x_1; -} -} -obj* _init_l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(" and "); -return x_1; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_3, 0, x_1); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 1); -lean::inc(x_5); -lean::dec(x_2); -x_6 = lean::cnstr_get(x_4, 0); -lean::inc(x_6); -x_7 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_8 = l___private_init_lean_parser_trie_3__findAux___main___rarg(x_6, x_1, x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_6, x_4, x_1, x_7); -lean::dec(x_6); -x_1 = x_9; -x_2 = x_5; -goto _start; -} -else -{ -obj* x_11; obj* x_12; uint8 x_13; -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -lean::dec(x_8); -x_12 = lean::cnstr_get(x_4, 1); -lean::inc(x_12); -x_13 = lean::nat_dec_eq(x_12, x_7); -if (x_13 == 0) -{ -obj* x_14; uint8 x_15; -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -lean::dec(x_11); -x_15 = lean::nat_dec_eq(x_14, x_7); -if (x_15 == 0) -{ -uint8 x_16; -lean::dec(x_4); -x_16 = lean::nat_dec_eq(x_12, x_14); -if (x_16 == 0) -{ -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; -lean::dec(x_5); -lean::dec(x_1); -x_17 = l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__1; -x_18 = lean::string_append(x_17, x_6); -lean::dec(x_6); -x_19 = l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__2; -x_20 = lean::string_append(x_18, x_19); -x_21 = l_Nat_repr(x_12); -x_22 = lean::string_append(x_20, x_21); -lean::dec(x_21); -x_23 = l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__3; -x_24 = lean::string_append(x_22, x_23); -x_25 = l_Nat_repr(x_14); -x_26 = lean::string_append(x_24, x_25); -lean::dec(x_25); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -else -{ -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_6); -x_2 = x_5; -goto _start; -} -} -else -{ -obj* x_29; -lean::dec(x_14); -lean::dec(x_12); -x_29 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_6, x_4, x_1, x_7); -lean::dec(x_6); -x_1 = x_29; -x_2 = x_5; -goto _start; -} -} -else -{ -obj* x_31; uint8 x_32; -lean::dec(x_12); -x_31 = lean::cnstr_get(x_11, 1); -lean::inc(x_31); -lean::dec(x_11); -x_32 = lean::nat_dec_eq(x_31, x_7); -lean::dec(x_31); -if (x_32 == 0) -{ -lean::dec(x_6); -lean::dec(x_4); -x_2 = x_5; -goto _start; -} -else -{ -obj* x_34; -x_34 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_6, x_4, x_1, x_7); -lean::dec(x_6); -x_1 = x_34; -x_2 = x_5; -goto _start; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_mkTokenTrie___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("/-"); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -lean::cnstr_set(x_4, 2, x_1); -x_5 = lean::mk_string("--"); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -lean::cnstr_set(x_6, 2, x_1); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_mkTokenTrie(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = l_Lean_Parser_mkTokenTrie___closed__1; -x_3 = l_List_append___rarg(x_2, x_1); -x_4 = l_Lean_Parser_Trie_HasEmptyc___closed__1; -x_5 = l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1(x_4, x_3); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -return x_5; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_5, 0); -lean::inc(x_10); -lean::dec(x_5); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -} -} -} -obj* _init_l_Lean_Parser_CommandParserM_Monad___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -x_3 = l_ReaderT_Monad___rarg(x_2); -x_4 = l_ReaderT_Monad___rarg(x_3); -return x_4; -} -} -obj* l_Lean_Parser_CommandParserM_Monad(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_CommandParserM_Monad___closed__1; -return x_2; -} -} -obj* _init_l_Lean_Parser_CommandParserM_Alternative___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -lean::inc(x_2); -x_3 = l_ReaderT_Monad___rarg(x_2); -x_4 = l_Lean_Parser_parserCoreT_Alternative___rarg(x_1); -x_5 = l_ReaderT_Alternative___rarg(x_2, x_4); -x_6 = l_ReaderT_Alternative___rarg(x_3, x_5); -return x_6; -} -} -obj* l_Lean_Parser_CommandParserM_Alternative(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_CommandParserM_Alternative___closed__1; -return x_2; -} -} -obj* _init_l_Lean_Parser_CommandParserM_MonadReader___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -x_3 = l_ReaderT_Monad___rarg(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_read___rarg), 2, 1); -lean::closure_set(x_4, 0, x_3); -return x_4; -} -} -obj* l_Lean_Parser_CommandParserM_MonadReader(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_CommandParserM_MonadReader___closed__1; -return x_2; -} -} -obj* _init_l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec___closed__1() { -_start: -{ -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_1 = l_Id_Monad; -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -lean::inc(x_2); -x_3 = l_ReaderT_Monad___rarg(x_2); -lean::inc(x_3); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 4, 3); -lean::closure_set(x_4, 0, lean::box(0)); -lean::closure_set(x_4, 1, lean::box(0)); -lean::closure_set(x_4, 2, x_3); -lean::inc(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_MonadFunctor___boxed), 6, 5); -lean::closure_set(x_5, 0, lean::box(0)); -lean::closure_set(x_5, 1, lean::box(0)); -lean::closure_set(x_5, 2, lean::box(0)); -lean::closure_set(x_5, 3, x_3); -lean::closure_set(x_5, 4, x_3); -x_6 = l_Lean_Parser_parserCoreT_Lean_Parser_MonadParsec___rarg(x_1); -x_7 = l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(x_2, lean::box(0), x_6); -x_8 = l_Lean_Parser_monadParsecTrans___rarg(x_4, x_5, x_7); -return x_8; -} -} -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec___closed__1; -return x_2; -} -} -obj* _init_l_Lean_Parser_CommandParserM_MonadExcept___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_parserCoreT_MonadExcept___rarg(x_1); -x_3 = l_ReaderT_MonadExcept___rarg(x_2); -x_4 = l_ReaderT_MonadExcept___rarg(x_3); -return x_4; -} -} -obj* l_Lean_Parser_CommandParserM_MonadExcept(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_CommandParserM_MonadExcept___closed__1; -return x_2; -} -} -obj* _init_l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -x_3 = l_ReaderT_Monad___rarg(x_2); -lean::inc(x_3); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 4, 3); -lean::closure_set(x_4, 0, lean::box(0)); -lean::closure_set(x_4, 1, lean::box(0)); -lean::closure_set(x_4, 2, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___rarg), 2, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadRec_trans___rarg___boxed), 4, 3); -lean::closure_set(x_6, 0, x_4); -lean::closure_set(x_6, 1, x_5); -lean::closure_set(x_6, 2, x_3); -return x_6; -} -} -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec___closed__1; -return x_2; -} -} -obj* _init_l_Lean_Parser_CommandParserM_MonadReaderAdapter___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_parserCoreT_Monad___rarg(x_1); -x_3 = l_ReaderT_Monad___rarg(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_MonadReaderAdapter___boxed), 5, 4); -lean::closure_set(x_4, 0, lean::box(0)); -lean::closure_set(x_4, 1, lean::box(0)); -lean::closure_set(x_4, 2, lean::box(0)); -lean::closure_set(x_4, 3, x_3); -return x_4; -} -} -obj* l_Lean_Parser_CommandParserM_MonadReaderAdapter(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_CommandParserM_MonadReaderAdapter___closed__1; -return x_3; -} -} -obj* l_Lean_Parser_CommandParserM_basicParser___rarg(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; -x_8 = lean::apply_1(x_1, x_4); -x_9 = lean::apply_3(x_3, x_8, x_6, x_7); -return x_9; -} -} -obj* l_Lean_Parser_CommandParserM_basicParser(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_CommandParserM_basicParser___rarg___boxed), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_CommandParserM_basicParser___rarg___boxed(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; -x_8 = l_Lean_Parser_CommandParserM_basicParser___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_TermParserM_Monad() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TermParserM_Alternative() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_3 = l_ReaderT_Alternative___rarg(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_TermParserM_MonadReader() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_CommandParserM_MonadReader(lean::box(0)); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___rarg___boxed), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_3 = l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(x_1, lean::box(0), x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_TermParserM_MonadExcept() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_2 = l_ReaderT_MonadExcept___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TermParserM_Lean_Parser_MonadRec() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___rarg), 2, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_TermParserM_Lean_Parser_monadBasicParser() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_CommandParserM_basicParser___rarg___boxed), 7, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_hasMonadLiftTTrans___rarg), 4, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_TrailingTermParserM_Monad() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_TermParserM_Monad; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TrailingTermParserM_Alternative() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_TermParserM_Monad; -x_2 = l_Lean_Parser_TermParserM_Alternative; -x_3 = l_ReaderT_Alternative___rarg(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_TrailingTermParserM_MonadReader() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_TermParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_read___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_TermParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_MonadFunctor___boxed), 6, 5); -lean::closure_set(x_3, 0, lean::box(0)); -lean::closure_set(x_3, 1, lean::box(0)); -lean::closure_set(x_3, 2, lean::box(0)); -lean::closure_set(x_3, 3, x_1); -lean::closure_set(x_3, 4, x_1); -x_4 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_5 = l_Lean_Parser_monadParsecTrans___rarg(x_2, x_3, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_TrailingTermParserM_MonadExcept() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_TermParserM_MonadExcept; -x_2 = l_ReaderT_MonadExcept___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadRec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_TermParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -x_3 = l_Lean_Parser_TermParserM_Lean_Parser_MonadRec; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadRec_trans___rarg___boxed), 4, 3); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -lean::closure_set(x_4, 2, x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_TrailingTermParserM_Lean_Parser_monadBasicParser() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_TermParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -x_3 = l_Lean_Parser_TermParserM_Lean_Parser_monadBasicParser; -x_4 = lean::alloc_closure(reinterpret_cast(l_hasMonadLiftTTrans___rarg), 4, 2); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_trailingTermParserCoe(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; -x_8 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_trailingTermParserCoe___boxed(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; -x_8 = l_Lean_Parser_trailingTermParserCoe(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_2); -return x_8; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; -x_4 = 0; -x_5 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 3, x_1); -lean::cnstr_set_scalar(x_5, sizeof(void*)*4, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_6 == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -x_10 = lean::cnstr_get(x_1, 2); -x_11 = lean::cnstr_get(x_1, 3); -x_12 = l_Lean_Name_quickLt(x_2, x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = l_Lean_Name_quickLt(x_9, x_2); -if (x_13 == 0) -{ -lean::dec(x_10); -lean::dec(x_9); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -obj* x_14; -x_14 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_11, x_2, x_3); -lean::cnstr_set(x_1, 3, x_14); -return x_1; -} -} -else -{ -obj* x_15; -x_15 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_8, x_2, x_3); -lean::cnstr_set(x_1, 0, x_15); -return x_1; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = lean::cnstr_get(x_1, 1); -x_18 = lean::cnstr_get(x_1, 2); -x_19 = lean::cnstr_get(x_1, 3); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_1); -x_20 = l_Lean_Name_quickLt(x_2, x_17); -if (x_20 == 0) -{ -uint8 x_21; -x_21 = l_Lean_Name_quickLt(x_17, x_2); -if (x_21 == 0) -{ -obj* x_22; -lean::dec(x_18); -lean::dec(x_17); -x_22 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_22, 0, x_16); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_3); -lean::cnstr_set(x_22, 3, x_19); -lean::cnstr_set_scalar(x_22, sizeof(void*)*4, x_6); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_19, x_2, x_3); -x_24 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_24, 0, x_16); -lean::cnstr_set(x_24, 1, x_17); -lean::cnstr_set(x_24, 2, x_18); -lean::cnstr_set(x_24, 3, x_23); -lean::cnstr_set_scalar(x_24, sizeof(void*)*4, x_6); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_16, x_2, x_3); -x_26 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_18); -lean::cnstr_set(x_26, 3, x_19); -lean::cnstr_set_scalar(x_26, sizeof(void*)*4, x_6); -return x_26; -} -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_28 = lean::cnstr_get(x_1, 0); -x_29 = lean::cnstr_get(x_1, 1); -x_30 = lean::cnstr_get(x_1, 2); -x_31 = lean::cnstr_get(x_1, 3); -x_32 = l_Lean_Name_quickLt(x_2, x_29); -if (x_32 == 0) -{ -uint8 x_33; -x_33 = l_Lean_Name_quickLt(x_29, x_2); -if (x_33 == 0) -{ -lean::dec(x_30); -lean::dec(x_29); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -uint8 x_34; -x_34 = l_RBNode_isRed___main___rarg(x_31); -if (x_34 == 0) -{ -obj* x_35; -x_35 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_31, x_2, x_3); -lean::cnstr_set(x_1, 3, x_35); -return x_1; -} -else -{ -obj* x_36; -x_36 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_31, x_2, x_3); -if (lean::obj_tag(x_36) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_28); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = lean::cnstr_get(x_36, 3); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; uint8 x_43; -x_40 = lean::cnstr_get(x_36, 3); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_36, 0); -lean::dec(x_41); -x_42 = 0; -lean::cnstr_set(x_36, 0, x_38); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_42); -x_43 = 1; -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_43); -return x_1; -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; uint8 x_48; -x_44 = lean::cnstr_get(x_36, 1); -x_45 = lean::cnstr_get(x_36, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_36); -x_46 = 0; -x_47 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_47, 0, x_38); -lean::cnstr_set(x_47, 1, x_44); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_38); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_46); -x_48 = 1; -lean::cnstr_set(x_1, 3, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_48); -return x_1; -} -} -else -{ -uint8 x_49; -x_49 = lean::cnstr_get_scalar(x_38, sizeof(void*)*4); -if (x_49 == 0) -{ -uint8 x_50; -x_50 = !lean::is_exclusive(x_36); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; uint8 x_55; -x_51 = lean::cnstr_get(x_36, 1); -x_52 = lean::cnstr_get(x_36, 2); -x_53 = lean::cnstr_get(x_36, 3); -lean::dec(x_53); -x_54 = lean::cnstr_get(x_36, 0); -lean::dec(x_54); -x_55 = !lean::is_exclusive(x_38); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_56 = lean::cnstr_get(x_38, 0); -x_57 = lean::cnstr_get(x_38, 1); -x_58 = lean::cnstr_get(x_38, 2); -x_59 = lean::cnstr_get(x_38, 3); -x_60 = 1; -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 2, x_30); -lean::cnstr_set(x_38, 1, x_29); -lean::cnstr_set(x_38, 0, x_28); -lean::cnstr_set_scalar(x_38, sizeof(void*)*4, x_60); -lean::cnstr_set(x_36, 3, x_59); -lean::cnstr_set(x_36, 2, x_58); -lean::cnstr_set(x_36, 1, x_57); -lean::cnstr_set(x_36, 0, x_56); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_60); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_38); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; obj* x_66; -x_61 = lean::cnstr_get(x_38, 0); -x_62 = lean::cnstr_get(x_38, 1); -x_63 = lean::cnstr_get(x_38, 2); -x_64 = lean::cnstr_get(x_38, 3); -lean::inc(x_64); -lean::inc(x_63); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_38); -x_65 = 1; -x_66 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_66, 0, x_28); -lean::cnstr_set(x_66, 1, x_29); -lean::cnstr_set(x_66, 2, x_30); -lean::cnstr_set(x_66, 3, x_37); -lean::cnstr_set_scalar(x_66, sizeof(void*)*4, x_65); -lean::cnstr_set(x_36, 3, x_64); -lean::cnstr_set(x_36, 2, x_63); -lean::cnstr_set(x_36, 1, x_62); -lean::cnstr_set(x_36, 0, x_61); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_65); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_66); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; -x_67 = lean::cnstr_get(x_36, 1); -x_68 = lean::cnstr_get(x_36, 2); -lean::inc(x_68); -lean::inc(x_67); -lean::dec(x_36); -x_69 = lean::cnstr_get(x_38, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_38, 1); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_38, 2); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_38, 3); -lean::inc(x_72); -if (lean::is_exclusive(x_38)) { - lean::cnstr_release(x_38, 0); - lean::cnstr_release(x_38, 1); - lean::cnstr_release(x_38, 2); - lean::cnstr_release(x_38, 3); - x_73 = x_38; -} else { - lean::dec_ref(x_38); - x_73 = lean::box(0); -} -x_74 = 1; -if (lean::is_scalar(x_73)) { - x_75 = lean::alloc_cnstr(1, 4, 1); -} else { - x_75 = x_73; -} -lean::cnstr_set(x_75, 0, x_28); -lean::cnstr_set(x_75, 1, x_29); -lean::cnstr_set(x_75, 2, x_30); -lean::cnstr_set(x_75, 3, x_37); -lean::cnstr_set_scalar(x_75, sizeof(void*)*4, x_74); -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_69); -lean::cnstr_set(x_76, 1, x_70); -lean::cnstr_set(x_76, 2, x_71); -lean::cnstr_set(x_76, 3, x_72); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_74); -lean::cnstr_set(x_1, 3, x_76); -lean::cnstr_set(x_1, 2, x_68); -lean::cnstr_set(x_1, 1, x_67); -lean::cnstr_set(x_1, 0, x_75); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -uint8 x_77; -x_77 = !lean::is_exclusive(x_36); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; uint8 x_80; -x_78 = lean::cnstr_get(x_36, 3); -lean::dec(x_78); -x_79 = lean::cnstr_get(x_36, 0); -lean::dec(x_79); -x_80 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_80); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_81; obj* x_82; uint8 x_83; obj* x_84; -x_81 = lean::cnstr_get(x_36, 1); -x_82 = lean::cnstr_get(x_36, 2); -lean::inc(x_82); -lean::inc(x_81); -lean::dec(x_36); -x_83 = 0; -x_84 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_84, 0, x_37); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_82); -lean::cnstr_set(x_84, 3, x_38); -lean::cnstr_set_scalar(x_84, sizeof(void*)*4, x_83); -lean::cnstr_set(x_1, 3, x_84); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -} -} -else -{ -uint8 x_85; -x_85 = lean::cnstr_get_scalar(x_37, sizeof(void*)*4); -if (x_85 == 0) -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_36); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_36, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_37); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint8 x_93; -x_89 = lean::cnstr_get(x_37, 0); -x_90 = lean::cnstr_get(x_37, 1); -x_91 = lean::cnstr_get(x_37, 2); -x_92 = lean::cnstr_get(x_37, 3); -x_93 = 1; -lean::cnstr_set(x_37, 3, x_89); -lean::cnstr_set(x_37, 2, x_30); -lean::cnstr_set(x_37, 1, x_29); -lean::cnstr_set(x_37, 0, x_28); -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_93); -lean::cnstr_set(x_36, 0, x_92); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_91); -lean::cnstr_set(x_1, 1, x_90); -lean::cnstr_set(x_1, 0, x_37); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; uint8 x_98; obj* x_99; -x_94 = lean::cnstr_get(x_37, 0); -x_95 = lean::cnstr_get(x_37, 1); -x_96 = lean::cnstr_get(x_37, 2); -x_97 = lean::cnstr_get(x_37, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_37); -x_98 = 1; -x_99 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_29); -lean::cnstr_set(x_99, 2, x_30); -lean::cnstr_set(x_99, 3, x_94); -lean::cnstr_set_scalar(x_99, sizeof(void*)*4, x_98); -lean::cnstr_set(x_36, 0, x_97); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_98); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_96); -lean::cnstr_set(x_1, 1, x_95); -lean::cnstr_set(x_1, 0, x_99); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; obj* x_110; -x_100 = lean::cnstr_get(x_36, 1); -x_101 = lean::cnstr_get(x_36, 2); -x_102 = lean::cnstr_get(x_36, 3); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_36); -x_103 = lean::cnstr_get(x_37, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_37, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_37, 2); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_37, 3); -lean::inc(x_106); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_107 = x_37; -} else { - lean::dec_ref(x_37); - x_107 = lean::box(0); -} -x_108 = 1; -if (lean::is_scalar(x_107)) { - x_109 = lean::alloc_cnstr(1, 4, 1); -} else { - x_109 = x_107; -} -lean::cnstr_set(x_109, 0, x_28); -lean::cnstr_set(x_109, 1, x_29); -lean::cnstr_set(x_109, 2, x_30); -lean::cnstr_set(x_109, 3, x_103); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -x_110 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_110, 0, x_106); -lean::cnstr_set(x_110, 1, x_100); -lean::cnstr_set(x_110, 2, x_101); -lean::cnstr_set(x_110, 3, x_102); -lean::cnstr_set_scalar(x_110, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_110); -lean::cnstr_set(x_1, 2, x_105); -lean::cnstr_set(x_1, 1, x_104); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_111; -x_111 = lean::cnstr_get(x_36, 3); -lean::inc(x_111); -if (lean::obj_tag(x_111) == 0) -{ -uint8 x_112; -x_112 = !lean::is_exclusive(x_36); -if (x_112 == 0) -{ -obj* x_113; obj* x_114; uint8 x_115; -x_113 = lean::cnstr_get(x_36, 3); -lean::dec(x_113); -x_114 = lean::cnstr_get(x_36, 0); -lean::dec(x_114); -x_115 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_115); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; -x_116 = lean::cnstr_get(x_36, 1); -x_117 = lean::cnstr_get(x_36, 2); -lean::inc(x_117); -lean::inc(x_116); -lean::dec(x_36); -x_118 = 0; -x_119 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_119, 0, x_37); -lean::cnstr_set(x_119, 1, x_116); -lean::cnstr_set(x_119, 2, x_117); -lean::cnstr_set(x_119, 3, x_111); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -uint8 x_120; -x_120 = lean::cnstr_get_scalar(x_111, sizeof(void*)*4); -if (x_120 == 0) -{ -uint8 x_121; -lean::free_heap_obj(x_1); -x_121 = !lean::is_exclusive(x_36); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; uint8 x_124; -x_122 = lean::cnstr_get(x_36, 3); -lean::dec(x_122); -x_123 = lean::cnstr_get(x_36, 0); -lean::dec(x_123); -x_124 = !lean::is_exclusive(x_111); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; uint8 x_129; -x_125 = lean::cnstr_get(x_111, 0); -x_126 = lean::cnstr_get(x_111, 1); -x_127 = lean::cnstr_get(x_111, 2); -x_128 = lean::cnstr_get(x_111, 3); -lean::inc(x_37); -lean::cnstr_set(x_111, 3, x_37); -lean::cnstr_set(x_111, 2, x_30); -lean::cnstr_set(x_111, 1, x_29); -lean::cnstr_set(x_111, 0, x_28); -x_129 = !lean::is_exclusive(x_37); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_130 = lean::cnstr_get(x_37, 3); -lean::dec(x_130); -x_131 = lean::cnstr_get(x_37, 2); -lean::dec(x_131); -x_132 = lean::cnstr_get(x_37, 1); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_37, 0); -lean::dec(x_133); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -lean::cnstr_set(x_37, 3, x_128); -lean::cnstr_set(x_37, 2, x_127); -lean::cnstr_set(x_37, 1, x_126); -lean::cnstr_set(x_37, 0, x_125); -lean::cnstr_set(x_36, 3, x_37); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -else -{ -obj* x_134; -lean::dec(x_37); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -x_134 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_134, 0, x_125); -lean::cnstr_set(x_134, 1, x_126); -lean::cnstr_set(x_134, 2, x_127); -lean::cnstr_set(x_134, 3, x_128); -lean::cnstr_set_scalar(x_134, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_134); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_135 = lean::cnstr_get(x_111, 0); -x_136 = lean::cnstr_get(x_111, 1); -x_137 = lean::cnstr_get(x_111, 2); -x_138 = lean::cnstr_get(x_111, 3); -lean::inc(x_138); -lean::inc(x_137); -lean::inc(x_136); -lean::inc(x_135); -lean::dec(x_111); -lean::inc(x_37); -x_139 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_139, 0, x_28); -lean::cnstr_set(x_139, 1, x_29); -lean::cnstr_set(x_139, 2, x_30); -lean::cnstr_set(x_139, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_140 = x_37; -} else { - lean::dec_ref(x_37); - x_140 = lean::box(0); -} -lean::cnstr_set_scalar(x_139, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(1, 4, 1); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_135); -lean::cnstr_set(x_141, 1, x_136); -lean::cnstr_set(x_141, 2, x_137); -lean::cnstr_set(x_141, 3, x_138); -lean::cnstr_set_scalar(x_141, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_141); -lean::cnstr_set(x_36, 0, x_139); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_142 = lean::cnstr_get(x_36, 1); -x_143 = lean::cnstr_get(x_36, 2); -lean::inc(x_143); -lean::inc(x_142); -lean::dec(x_36); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_111, 1); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_111, 2); -lean::inc(x_146); -x_147 = lean::cnstr_get(x_111, 3); -lean::inc(x_147); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - lean::cnstr_release(x_111, 2); - lean::cnstr_release(x_111, 3); - x_148 = x_111; -} else { - lean::dec_ref(x_111); - x_148 = lean::box(0); -} -lean::inc(x_37); -if (lean::is_scalar(x_148)) { - x_149 = lean::alloc_cnstr(1, 4, 1); -} else { - x_149 = x_148; -} -lean::cnstr_set(x_149, 0, x_28); -lean::cnstr_set(x_149, 1, x_29); -lean::cnstr_set(x_149, 2, x_30); -lean::cnstr_set(x_149, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_150 = x_37; -} else { - lean::dec_ref(x_37); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_144); -lean::cnstr_set(x_151, 1, x_145); -lean::cnstr_set(x_151, 2, x_146); -lean::cnstr_set(x_151, 3, x_147); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_85); -x_152 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_152, 0, x_149); -lean::cnstr_set(x_152, 1, x_142); -lean::cnstr_set(x_152, 2, x_143); -lean::cnstr_set(x_152, 3, x_151); -lean::cnstr_set_scalar(x_152, sizeof(void*)*4, x_120); -return x_152; -} -} -else -{ -uint8 x_153; -x_153 = !lean::is_exclusive(x_36); -if (x_153 == 0) -{ -obj* x_154; obj* x_155; uint8 x_156; -x_154 = lean::cnstr_get(x_36, 3); -lean::dec(x_154); -x_155 = lean::cnstr_get(x_36, 0); -lean::dec(x_155); -x_156 = !lean::is_exclusive(x_37); -if (x_156 == 0) -{ -uint8 x_157; -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_120); -x_157 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_157); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -else -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; uint8 x_163; -x_158 = lean::cnstr_get(x_37, 0); -x_159 = lean::cnstr_get(x_37, 1); -x_160 = lean::cnstr_get(x_37, 2); -x_161 = lean::cnstr_get(x_37, 3); -lean::inc(x_161); -lean::inc(x_160); -lean::inc(x_159); -lean::inc(x_158); -lean::dec(x_37); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_158); -lean::cnstr_set(x_162, 1, x_159); -lean::cnstr_set(x_162, 2, x_160); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_120); -x_163 = 0; -lean::cnstr_set(x_36, 0, x_162); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_163); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; uint8 x_172; obj* x_173; -x_164 = lean::cnstr_get(x_36, 1); -x_165 = lean::cnstr_get(x_36, 2); -lean::inc(x_165); -lean::inc(x_164); -lean::dec(x_36); -x_166 = lean::cnstr_get(x_37, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_37, 1); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_37, 2); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_37, 3); -lean::inc(x_169); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_170 = x_37; -} else { - lean::dec_ref(x_37); - x_170 = lean::box(0); -} -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(1, 4, 1); -} else { - x_171 = x_170; -} -lean::cnstr_set(x_171, 0, x_166); -lean::cnstr_set(x_171, 1, x_167); -lean::cnstr_set(x_171, 2, x_168); -lean::cnstr_set(x_171, 3, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*4, x_120); -x_172 = 0; -x_173 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_173, 0, x_171); -lean::cnstr_set(x_173, 1, x_164); -lean::cnstr_set(x_173, 2, x_165); -lean::cnstr_set(x_173, 3, x_111); -lean::cnstr_set_scalar(x_173, sizeof(void*)*4, x_172); -lean::cnstr_set(x_1, 3, x_173); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_174; -x_174 = l_RBNode_isRed___main___rarg(x_28); -if (x_174 == 0) -{ -obj* x_175; -x_175 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_28, x_2, x_3); -lean::cnstr_set(x_1, 0, x_175); -return x_1; -} -else -{ -obj* x_176; -x_176 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_28, x_2, x_3); -if (lean::obj_tag(x_176) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_31); -lean::dec(x_30); -lean::dec(x_29); -return x_176; -} -else -{ -obj* x_177; -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -if (lean::obj_tag(x_177) == 0) -{ -obj* x_178; -x_178 = lean::cnstr_get(x_176, 3); -lean::inc(x_178); -if (lean::obj_tag(x_178) == 0) -{ -uint8 x_179; -x_179 = !lean::is_exclusive(x_176); -if (x_179 == 0) -{ -obj* x_180; obj* x_181; uint8 x_182; uint8 x_183; -x_180 = lean::cnstr_get(x_176, 3); -lean::dec(x_180); -x_181 = lean::cnstr_get(x_176, 0); -lean::dec(x_181); -x_182 = 0; -lean::cnstr_set(x_176, 0, x_178); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_182); -x_183 = 1; -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_183); -return x_1; -} -else -{ -obj* x_184; obj* x_185; uint8 x_186; obj* x_187; uint8 x_188; -x_184 = lean::cnstr_get(x_176, 1); -x_185 = lean::cnstr_get(x_176, 2); -lean::inc(x_185); -lean::inc(x_184); -lean::dec(x_176); -x_186 = 0; -x_187 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_187, 0, x_178); -lean::cnstr_set(x_187, 1, x_184); -lean::cnstr_set(x_187, 2, x_185); -lean::cnstr_set(x_187, 3, x_178); -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_186); -x_188 = 1; -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_188); -return x_1; -} -} -else -{ -uint8 x_189; -x_189 = lean::cnstr_get_scalar(x_178, sizeof(void*)*4); -if (x_189 == 0) -{ -uint8 x_190; -x_190 = !lean::is_exclusive(x_176); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; uint8 x_195; -x_191 = lean::cnstr_get(x_176, 1); -x_192 = lean::cnstr_get(x_176, 2); -x_193 = lean::cnstr_get(x_176, 3); -lean::dec(x_193); -x_194 = lean::cnstr_get(x_176, 0); -lean::dec(x_194); -x_195 = !lean::is_exclusive(x_178); -if (x_195 == 0) -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; uint8 x_200; -x_196 = lean::cnstr_get(x_178, 0); -x_197 = lean::cnstr_get(x_178, 1); -x_198 = lean::cnstr_get(x_178, 2); -x_199 = lean::cnstr_get(x_178, 3); -x_200 = 1; -lean::cnstr_set(x_178, 3, x_196); -lean::cnstr_set(x_178, 2, x_192); -lean::cnstr_set(x_178, 1, x_191); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set_scalar(x_178, sizeof(void*)*4, x_200); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_199); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_200); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_198); -lean::cnstr_set(x_1, 1, x_197); -lean::cnstr_set(x_1, 0, x_178); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; obj* x_206; -x_201 = lean::cnstr_get(x_178, 0); -x_202 = lean::cnstr_get(x_178, 1); -x_203 = lean::cnstr_get(x_178, 2); -x_204 = lean::cnstr_get(x_178, 3); -lean::inc(x_204); -lean::inc(x_203); -lean::inc(x_202); -lean::inc(x_201); -lean::dec(x_178); -x_205 = 1; -x_206 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_206, 0, x_177); -lean::cnstr_set(x_206, 1, x_191); -lean::cnstr_set(x_206, 2, x_192); -lean::cnstr_set(x_206, 3, x_201); -lean::cnstr_set_scalar(x_206, sizeof(void*)*4, x_205); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_204); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_205); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_203); -lean::cnstr_set(x_1, 1, x_202); -lean::cnstr_set(x_1, 0, x_206); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; -x_207 = lean::cnstr_get(x_176, 1); -x_208 = lean::cnstr_get(x_176, 2); -lean::inc(x_208); -lean::inc(x_207); -lean::dec(x_176); -x_209 = lean::cnstr_get(x_178, 0); -lean::inc(x_209); -x_210 = lean::cnstr_get(x_178, 1); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_178, 2); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_178, 3); -lean::inc(x_212); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - lean::cnstr_release(x_178, 2); - lean::cnstr_release(x_178, 3); - x_213 = x_178; -} else { - lean::dec_ref(x_178); - x_213 = lean::box(0); -} -x_214 = 1; -if (lean::is_scalar(x_213)) { - x_215 = lean::alloc_cnstr(1, 4, 1); -} else { - x_215 = x_213; -} -lean::cnstr_set(x_215, 0, x_177); -lean::cnstr_set(x_215, 1, x_207); -lean::cnstr_set(x_215, 2, x_208); -lean::cnstr_set(x_215, 3, x_209); -lean::cnstr_set_scalar(x_215, sizeof(void*)*4, x_214); -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_212); -lean::cnstr_set(x_216, 1, x_29); -lean::cnstr_set(x_216, 2, x_30); -lean::cnstr_set(x_216, 3, x_31); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_214); -lean::cnstr_set(x_1, 3, x_216); -lean::cnstr_set(x_1, 2, x_211); -lean::cnstr_set(x_1, 1, x_210); -lean::cnstr_set(x_1, 0, x_215); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -uint8 x_217; -x_217 = !lean::is_exclusive(x_176); -if (x_217 == 0) -{ -obj* x_218; obj* x_219; uint8 x_220; -x_218 = lean::cnstr_get(x_176, 3); -lean::dec(x_218); -x_219 = lean::cnstr_get(x_176, 0); -lean::dec(x_219); -x_220 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_220); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_221; obj* x_222; uint8 x_223; obj* x_224; -x_221 = lean::cnstr_get(x_176, 1); -x_222 = lean::cnstr_get(x_176, 2); -lean::inc(x_222); -lean::inc(x_221); -lean::dec(x_176); -x_223 = 0; -x_224 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_224, 0, x_177); -lean::cnstr_set(x_224, 1, x_221); -lean::cnstr_set(x_224, 2, x_222); -lean::cnstr_set(x_224, 3, x_178); -lean::cnstr_set_scalar(x_224, sizeof(void*)*4, x_223); -lean::cnstr_set(x_1, 0, x_224); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -} -} -else -{ -uint8 x_225; -x_225 = lean::cnstr_get_scalar(x_177, sizeof(void*)*4); -if (x_225 == 0) -{ -uint8 x_226; -x_226 = !lean::is_exclusive(x_176); -if (x_226 == 0) -{ -obj* x_227; obj* x_228; obj* x_229; obj* x_230; uint8 x_231; -x_227 = lean::cnstr_get(x_176, 1); -x_228 = lean::cnstr_get(x_176, 2); -x_229 = lean::cnstr_get(x_176, 3); -x_230 = lean::cnstr_get(x_176, 0); -lean::dec(x_230); -x_231 = !lean::is_exclusive(x_177); -if (x_231 == 0) -{ -uint8 x_232; -x_232 = 1; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_232); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_232); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_177); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; uint8 x_237; obj* x_238; -x_233 = lean::cnstr_get(x_177, 0); -x_234 = lean::cnstr_get(x_177, 1); -x_235 = lean::cnstr_get(x_177, 2); -x_236 = lean::cnstr_get(x_177, 3); -lean::inc(x_236); -lean::inc(x_235); -lean::inc(x_234); -lean::inc(x_233); -lean::dec(x_177); -x_237 = 1; -x_238 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_238, 0, x_233); -lean::cnstr_set(x_238, 1, x_234); -lean::cnstr_set(x_238, 2, x_235); -lean::cnstr_set(x_238, 3, x_236); -lean::cnstr_set_scalar(x_238, sizeof(void*)*4, x_237); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_237); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_238); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; obj* x_249; -x_239 = lean::cnstr_get(x_176, 1); -x_240 = lean::cnstr_get(x_176, 2); -x_241 = lean::cnstr_get(x_176, 3); -lean::inc(x_241); -lean::inc(x_240); -lean::inc(x_239); -lean::dec(x_176); -x_242 = lean::cnstr_get(x_177, 0); -lean::inc(x_242); -x_243 = lean::cnstr_get(x_177, 1); -lean::inc(x_243); -x_244 = lean::cnstr_get(x_177, 2); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_177, 3); -lean::inc(x_245); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_246 = x_177; -} else { - lean::dec_ref(x_177); - x_246 = lean::box(0); -} -x_247 = 1; -if (lean::is_scalar(x_246)) { - x_248 = lean::alloc_cnstr(1, 4, 1); -} else { - x_248 = x_246; -} -lean::cnstr_set(x_248, 0, x_242); -lean::cnstr_set(x_248, 1, x_243); -lean::cnstr_set(x_248, 2, x_244); -lean::cnstr_set(x_248, 3, x_245); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -x_249 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_249, 0, x_241); -lean::cnstr_set(x_249, 1, x_29); -lean::cnstr_set(x_249, 2, x_30); -lean::cnstr_set(x_249, 3, x_31); -lean::cnstr_set_scalar(x_249, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_249); -lean::cnstr_set(x_1, 2, x_240); -lean::cnstr_set(x_1, 1, x_239); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_250; -x_250 = lean::cnstr_get(x_176, 3); -lean::inc(x_250); -if (lean::obj_tag(x_250) == 0) -{ -uint8 x_251; -x_251 = !lean::is_exclusive(x_176); -if (x_251 == 0) -{ -obj* x_252; obj* x_253; uint8 x_254; -x_252 = lean::cnstr_get(x_176, 3); -lean::dec(x_252); -x_253 = lean::cnstr_get(x_176, 0); -lean::dec(x_253); -x_254 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_254); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_255; obj* x_256; uint8 x_257; obj* x_258; -x_255 = lean::cnstr_get(x_176, 1); -x_256 = lean::cnstr_get(x_176, 2); -lean::inc(x_256); -lean::inc(x_255); -lean::dec(x_176); -x_257 = 0; -x_258 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_258, 0, x_177); -lean::cnstr_set(x_258, 1, x_255); -lean::cnstr_set(x_258, 2, x_256); -lean::cnstr_set(x_258, 3, x_250); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -uint8 x_259; -x_259 = lean::cnstr_get_scalar(x_250, sizeof(void*)*4); -if (x_259 == 0) -{ -uint8 x_260; -lean::free_heap_obj(x_1); -x_260 = !lean::is_exclusive(x_176); -if (x_260 == 0) -{ -obj* x_261; obj* x_262; obj* x_263; obj* x_264; uint8 x_265; -x_261 = lean::cnstr_get(x_176, 1); -x_262 = lean::cnstr_get(x_176, 2); -x_263 = lean::cnstr_get(x_176, 3); -lean::dec(x_263); -x_264 = lean::cnstr_get(x_176, 0); -lean::dec(x_264); -x_265 = !lean::is_exclusive(x_250); -if (x_265 == 0) -{ -obj* x_266; obj* x_267; obj* x_268; obj* x_269; uint8 x_270; -x_266 = lean::cnstr_get(x_250, 0); -x_267 = lean::cnstr_get(x_250, 1); -x_268 = lean::cnstr_get(x_250, 2); -x_269 = lean::cnstr_get(x_250, 3); -lean::inc(x_177); -lean::cnstr_set(x_250, 3, x_266); -lean::cnstr_set(x_250, 2, x_262); -lean::cnstr_set(x_250, 1, x_261); -lean::cnstr_set(x_250, 0, x_177); -x_270 = !lean::is_exclusive(x_177); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; -x_271 = lean::cnstr_get(x_177, 3); -lean::dec(x_271); -x_272 = lean::cnstr_get(x_177, 2); -lean::dec(x_272); -x_273 = lean::cnstr_get(x_177, 1); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_177, 0); -lean::dec(x_274); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -lean::cnstr_set(x_177, 3, x_31); -lean::cnstr_set(x_177, 2, x_30); -lean::cnstr_set(x_177, 1, x_29); -lean::cnstr_set(x_177, 0, x_269); -lean::cnstr_set(x_176, 3, x_177); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -else -{ -obj* x_275; -lean::dec(x_177); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -x_275 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_275, 0, x_269); -lean::cnstr_set(x_275, 1, x_29); -lean::cnstr_set(x_275, 2, x_30); -lean::cnstr_set(x_275, 3, x_31); -lean::cnstr_set_scalar(x_275, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_275); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -x_276 = lean::cnstr_get(x_250, 0); -x_277 = lean::cnstr_get(x_250, 1); -x_278 = lean::cnstr_get(x_250, 2); -x_279 = lean::cnstr_get(x_250, 3); -lean::inc(x_279); -lean::inc(x_278); -lean::inc(x_277); -lean::inc(x_276); -lean::dec(x_250); -lean::inc(x_177); -x_280 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_280, 0, x_177); -lean::cnstr_set(x_280, 1, x_261); -lean::cnstr_set(x_280, 2, x_262); -lean::cnstr_set(x_280, 3, x_276); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_281 = x_177; -} else { - lean::dec_ref(x_177); - x_281 = lean::box(0); -} -lean::cnstr_set_scalar(x_280, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_281)) { - x_282 = lean::alloc_cnstr(1, 4, 1); -} else { - x_282 = x_281; -} -lean::cnstr_set(x_282, 0, x_279); -lean::cnstr_set(x_282, 1, x_29); -lean::cnstr_set(x_282, 2, x_30); -lean::cnstr_set(x_282, 3, x_31); -lean::cnstr_set_scalar(x_282, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_282); -lean::cnstr_set(x_176, 2, x_278); -lean::cnstr_set(x_176, 1, x_277); -lean::cnstr_set(x_176, 0, x_280); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_283 = lean::cnstr_get(x_176, 1); -x_284 = lean::cnstr_get(x_176, 2); -lean::inc(x_284); -lean::inc(x_283); -lean::dec(x_176); -x_285 = lean::cnstr_get(x_250, 0); -lean::inc(x_285); -x_286 = lean::cnstr_get(x_250, 1); -lean::inc(x_286); -x_287 = lean::cnstr_get(x_250, 2); -lean::inc(x_287); -x_288 = lean::cnstr_get(x_250, 3); -lean::inc(x_288); -if (lean::is_exclusive(x_250)) { - lean::cnstr_release(x_250, 0); - lean::cnstr_release(x_250, 1); - lean::cnstr_release(x_250, 2); - lean::cnstr_release(x_250, 3); - x_289 = x_250; -} else { - lean::dec_ref(x_250); - x_289 = lean::box(0); -} -lean::inc(x_177); -if (lean::is_scalar(x_289)) { - x_290 = lean::alloc_cnstr(1, 4, 1); -} else { - x_290 = x_289; -} -lean::cnstr_set(x_290, 0, x_177); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_285); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_291 = x_177; -} else { - lean::dec_ref(x_177); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_288); -lean::cnstr_set(x_292, 1, x_29); -lean::cnstr_set(x_292, 2, x_30); -lean::cnstr_set(x_292, 3, x_31); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_225); -x_293 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_293, 0, x_290); -lean::cnstr_set(x_293, 1, x_286); -lean::cnstr_set(x_293, 2, x_287); -lean::cnstr_set(x_293, 3, x_292); -lean::cnstr_set_scalar(x_293, sizeof(void*)*4, x_259); -return x_293; -} -} -else -{ -uint8 x_294; -x_294 = !lean::is_exclusive(x_176); -if (x_294 == 0) -{ -obj* x_295; obj* x_296; uint8 x_297; -x_295 = lean::cnstr_get(x_176, 3); -lean::dec(x_295); -x_296 = lean::cnstr_get(x_176, 0); -lean::dec(x_296); -x_297 = !lean::is_exclusive(x_177); -if (x_297 == 0) -{ -uint8 x_298; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_259); -x_298 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_298); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -else -{ -obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; uint8 x_304; -x_299 = lean::cnstr_get(x_177, 0); -x_300 = lean::cnstr_get(x_177, 1); -x_301 = lean::cnstr_get(x_177, 2); -x_302 = lean::cnstr_get(x_177, 3); -lean::inc(x_302); -lean::inc(x_301); -lean::inc(x_300); -lean::inc(x_299); -lean::dec(x_177); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_299); -lean::cnstr_set(x_303, 1, x_300); -lean::cnstr_set(x_303, 2, x_301); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_259); -x_304 = 0; -lean::cnstr_set(x_176, 0, x_303); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_304); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -else -{ -obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; uint8 x_313; obj* x_314; -x_305 = lean::cnstr_get(x_176, 1); -x_306 = lean::cnstr_get(x_176, 2); -lean::inc(x_306); -lean::inc(x_305); -lean::dec(x_176); -x_307 = lean::cnstr_get(x_177, 0); -lean::inc(x_307); -x_308 = lean::cnstr_get(x_177, 1); -lean::inc(x_308); -x_309 = lean::cnstr_get(x_177, 2); -lean::inc(x_309); -x_310 = lean::cnstr_get(x_177, 3); -lean::inc(x_310); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_311 = x_177; -} else { - lean::dec_ref(x_177); - x_311 = lean::box(0); -} -if (lean::is_scalar(x_311)) { - x_312 = lean::alloc_cnstr(1, 4, 1); -} else { - x_312 = x_311; -} -lean::cnstr_set(x_312, 0, x_307); -lean::cnstr_set(x_312, 1, x_308); -lean::cnstr_set(x_312, 2, x_309); -lean::cnstr_set(x_312, 3, x_310); -lean::cnstr_set_scalar(x_312, sizeof(void*)*4, x_259); -x_313 = 0; -x_314 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_314, 0, x_312); -lean::cnstr_set(x_314, 1, x_305); -lean::cnstr_set(x_314, 2, x_306); -lean::cnstr_set(x_314, 3, x_250); -lean::cnstr_set_scalar(x_314, sizeof(void*)*4, x_313); -lean::cnstr_set(x_1, 0, x_314); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; uint8 x_319; -x_315 = lean::cnstr_get(x_1, 0); -x_316 = lean::cnstr_get(x_1, 1); -x_317 = lean::cnstr_get(x_1, 2); -x_318 = lean::cnstr_get(x_1, 3); -lean::inc(x_318); -lean::inc(x_317); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_1); -x_319 = l_Lean_Name_quickLt(x_2, x_316); -if (x_319 == 0) -{ -uint8 x_320; -x_320 = l_Lean_Name_quickLt(x_316, x_2); -if (x_320 == 0) -{ -obj* x_321; -lean::dec(x_317); -lean::dec(x_316); -x_321 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_321, 0, x_315); -lean::cnstr_set(x_321, 1, x_2); -lean::cnstr_set(x_321, 2, x_3); -lean::cnstr_set(x_321, 3, x_318); -lean::cnstr_set_scalar(x_321, sizeof(void*)*4, x_6); -return x_321; -} -else -{ -uint8 x_322; -x_322 = l_RBNode_isRed___main___rarg(x_318); -if (x_322 == 0) -{ -obj* x_323; obj* x_324; -x_323 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_318, x_2, x_3); -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_315); -lean::cnstr_set(x_324, 1, x_316); -lean::cnstr_set(x_324, 2, x_317); -lean::cnstr_set(x_324, 3, x_323); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_6); -return x_324; -} -else -{ -obj* x_325; -x_325 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_318, x_2, x_3); -if (lean::obj_tag(x_325) == 0) -{ -lean::dec(x_317); -lean::dec(x_316); -lean::dec(x_315); -return x_325; -} -else -{ -obj* x_326; -x_326 = lean::cnstr_get(x_325, 0); -lean::inc(x_326); -if (lean::obj_tag(x_326) == 0) -{ -obj* x_327; -x_327 = lean::cnstr_get(x_325, 3); -lean::inc(x_327); -if (lean::obj_tag(x_327) == 0) -{ -obj* x_328; obj* x_329; obj* x_330; uint8 x_331; obj* x_332; uint8 x_333; obj* x_334; -x_328 = lean::cnstr_get(x_325, 1); -lean::inc(x_328); -x_329 = lean::cnstr_get(x_325, 2); -lean::inc(x_329); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_330 = x_325; -} else { - lean::dec_ref(x_325); - x_330 = lean::box(0); -} -x_331 = 0; -if (lean::is_scalar(x_330)) { - x_332 = lean::alloc_cnstr(1, 4, 1); -} else { - x_332 = x_330; -} -lean::cnstr_set(x_332, 0, x_327); -lean::cnstr_set(x_332, 1, x_328); -lean::cnstr_set(x_332, 2, x_329); -lean::cnstr_set(x_332, 3, x_327); -lean::cnstr_set_scalar(x_332, sizeof(void*)*4, x_331); -x_333 = 1; -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_315); -lean::cnstr_set(x_334, 1, x_316); -lean::cnstr_set(x_334, 2, x_317); -lean::cnstr_set(x_334, 3, x_332); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_333); -return x_334; -} -else -{ -uint8 x_335; -x_335 = lean::cnstr_get_scalar(x_327, sizeof(void*)*4); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; obj* x_346; obj* x_347; -x_336 = lean::cnstr_get(x_325, 1); -lean::inc(x_336); -x_337 = lean::cnstr_get(x_325, 2); -lean::inc(x_337); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_338 = x_325; -} else { - lean::dec_ref(x_325); - x_338 = lean::box(0); -} -x_339 = lean::cnstr_get(x_327, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get(x_327, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_327, 2); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_327, 3); -lean::inc(x_342); -if (lean::is_exclusive(x_327)) { - lean::cnstr_release(x_327, 0); - lean::cnstr_release(x_327, 1); - lean::cnstr_release(x_327, 2); - lean::cnstr_release(x_327, 3); - x_343 = x_327; -} else { - lean::dec_ref(x_327); - x_343 = lean::box(0); -} -x_344 = 1; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_315); -lean::cnstr_set(x_345, 1, x_316); -lean::cnstr_set(x_345, 2, x_317); -lean::cnstr_set(x_345, 3, x_326); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -if (lean::is_scalar(x_338)) { - x_346 = lean::alloc_cnstr(1, 4, 1); -} else { - x_346 = x_338; -} -lean::cnstr_set(x_346, 0, x_339); -lean::cnstr_set(x_346, 1, x_340); -lean::cnstr_set(x_346, 2, x_341); -lean::cnstr_set(x_346, 3, x_342); -lean::cnstr_set_scalar(x_346, sizeof(void*)*4, x_344); -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_345); -lean::cnstr_set(x_347, 1, x_336); -lean::cnstr_set(x_347, 2, x_337); -lean::cnstr_set(x_347, 3, x_346); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_335); -return x_347; -} -else -{ -obj* x_348; obj* x_349; obj* x_350; uint8 x_351; obj* x_352; obj* x_353; -x_348 = lean::cnstr_get(x_325, 1); -lean::inc(x_348); -x_349 = lean::cnstr_get(x_325, 2); -lean::inc(x_349); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_350 = x_325; -} else { - lean::dec_ref(x_325); - x_350 = lean::box(0); -} -x_351 = 0; -if (lean::is_scalar(x_350)) { - x_352 = lean::alloc_cnstr(1, 4, 1); -} else { - x_352 = x_350; -} -lean::cnstr_set(x_352, 0, x_326); -lean::cnstr_set(x_352, 1, x_348); -lean::cnstr_set(x_352, 2, x_349); -lean::cnstr_set(x_352, 3, x_327); -lean::cnstr_set_scalar(x_352, sizeof(void*)*4, x_351); -x_353 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_353, 0, x_315); -lean::cnstr_set(x_353, 1, x_316); -lean::cnstr_set(x_353, 2, x_317); -lean::cnstr_set(x_353, 3, x_352); -lean::cnstr_set_scalar(x_353, sizeof(void*)*4, x_335); -return x_353; -} -} -} -else -{ -uint8 x_354; -x_354 = lean::cnstr_get_scalar(x_326, sizeof(void*)*4); -if (x_354 == 0) -{ -obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; obj* x_367; -x_355 = lean::cnstr_get(x_325, 1); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_325, 2); -lean::inc(x_356); -x_357 = lean::cnstr_get(x_325, 3); -lean::inc(x_357); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_358 = x_325; -} else { - lean::dec_ref(x_325); - x_358 = lean::box(0); -} -x_359 = lean::cnstr_get(x_326, 0); -lean::inc(x_359); -x_360 = lean::cnstr_get(x_326, 1); -lean::inc(x_360); -x_361 = lean::cnstr_get(x_326, 2); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_326, 3); -lean::inc(x_362); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_363 = x_326; -} else { - lean::dec_ref(x_326); - x_363 = lean::box(0); -} -x_364 = 1; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_315); -lean::cnstr_set(x_365, 1, x_316); -lean::cnstr_set(x_365, 2, x_317); -lean::cnstr_set(x_365, 3, x_359); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -if (lean::is_scalar(x_358)) { - x_366 = lean::alloc_cnstr(1, 4, 1); -} else { - x_366 = x_358; -} -lean::cnstr_set(x_366, 0, x_362); -lean::cnstr_set(x_366, 1, x_355); -lean::cnstr_set(x_366, 2, x_356); -lean::cnstr_set(x_366, 3, x_357); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_364); -x_367 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_360); -lean::cnstr_set(x_367, 2, x_361); -lean::cnstr_set(x_367, 3, x_366); -lean::cnstr_set_scalar(x_367, sizeof(void*)*4, x_354); -return x_367; -} -else -{ -obj* x_368; -x_368 = lean::cnstr_get(x_325, 3); -lean::inc(x_368); -if (lean::obj_tag(x_368) == 0) -{ -obj* x_369; obj* x_370; obj* x_371; uint8 x_372; obj* x_373; obj* x_374; -x_369 = lean::cnstr_get(x_325, 1); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_325, 2); -lean::inc(x_370); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_371 = x_325; -} else { - lean::dec_ref(x_325); - x_371 = lean::box(0); -} -x_372 = 0; -if (lean::is_scalar(x_371)) { - x_373 = lean::alloc_cnstr(1, 4, 1); -} else { - x_373 = x_371; -} -lean::cnstr_set(x_373, 0, x_326); -lean::cnstr_set(x_373, 1, x_369); -lean::cnstr_set(x_373, 2, x_370); -lean::cnstr_set(x_373, 3, x_368); -lean::cnstr_set_scalar(x_373, sizeof(void*)*4, x_372); -x_374 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_374, 0, x_315); -lean::cnstr_set(x_374, 1, x_316); -lean::cnstr_set(x_374, 2, x_317); -lean::cnstr_set(x_374, 3, x_373); -lean::cnstr_set_scalar(x_374, sizeof(void*)*4, x_354); -return x_374; -} -else -{ -uint8 x_375; -x_375 = lean::cnstr_get_scalar(x_368, sizeof(void*)*4); -if (x_375 == 0) -{ -obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; -x_376 = lean::cnstr_get(x_325, 1); -lean::inc(x_376); -x_377 = lean::cnstr_get(x_325, 2); -lean::inc(x_377); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_378 = x_325; -} else { - lean::dec_ref(x_325); - x_378 = lean::box(0); -} -x_379 = lean::cnstr_get(x_368, 0); -lean::inc(x_379); -x_380 = lean::cnstr_get(x_368, 1); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_368, 2); -lean::inc(x_381); -x_382 = lean::cnstr_get(x_368, 3); -lean::inc(x_382); -if (lean::is_exclusive(x_368)) { - lean::cnstr_release(x_368, 0); - lean::cnstr_release(x_368, 1); - lean::cnstr_release(x_368, 2); - lean::cnstr_release(x_368, 3); - x_383 = x_368; -} else { - lean::dec_ref(x_368); - x_383 = lean::box(0); -} -lean::inc(x_326); -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(1, 4, 1); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_315); -lean::cnstr_set(x_384, 1, x_316); -lean::cnstr_set(x_384, 2, x_317); -lean::cnstr_set(x_384, 3, x_326); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_385 = x_326; -} else { - lean::dec_ref(x_326); - x_385 = lean::box(0); -} -lean::cnstr_set_scalar(x_384, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_385)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_385; -} -lean::cnstr_set(x_386, 0, x_379); -lean::cnstr_set(x_386, 1, x_380); -lean::cnstr_set(x_386, 2, x_381); -lean::cnstr_set(x_386, 3, x_382); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_378)) { - x_387 = lean::alloc_cnstr(1, 4, 1); -} else { - x_387 = x_378; -} -lean::cnstr_set(x_387, 0, x_384); -lean::cnstr_set(x_387, 1, x_376); -lean::cnstr_set(x_387, 2, x_377); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_375); -return x_387; -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; uint8 x_397; obj* x_398; obj* x_399; -x_388 = lean::cnstr_get(x_325, 1); -lean::inc(x_388); -x_389 = lean::cnstr_get(x_325, 2); -lean::inc(x_389); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_390 = x_325; -} else { - lean::dec_ref(x_325); - x_390 = lean::box(0); -} -x_391 = lean::cnstr_get(x_326, 0); -lean::inc(x_391); -x_392 = lean::cnstr_get(x_326, 1); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_326, 2); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_326, 3); -lean::inc(x_394); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_395 = x_326; -} else { - lean::dec_ref(x_326); - x_395 = lean::box(0); -} -if (lean::is_scalar(x_395)) { - x_396 = lean::alloc_cnstr(1, 4, 1); -} else { - x_396 = x_395; -} -lean::cnstr_set(x_396, 0, x_391); -lean::cnstr_set(x_396, 1, x_392); -lean::cnstr_set(x_396, 2, x_393); -lean::cnstr_set(x_396, 3, x_394); -lean::cnstr_set_scalar(x_396, sizeof(void*)*4, x_375); -x_397 = 0; -if (lean::is_scalar(x_390)) { - x_398 = lean::alloc_cnstr(1, 4, 1); -} else { - x_398 = x_390; -} -lean::cnstr_set(x_398, 0, x_396); -lean::cnstr_set(x_398, 1, x_388); -lean::cnstr_set(x_398, 2, x_389); -lean::cnstr_set(x_398, 3, x_368); -lean::cnstr_set_scalar(x_398, sizeof(void*)*4, x_397); -x_399 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_399, 0, x_315); -lean::cnstr_set(x_399, 1, x_316); -lean::cnstr_set(x_399, 2, x_317); -lean::cnstr_set(x_399, 3, x_398); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_375); -return x_399; -} -} -} -} -} -} -} -} -else -{ -uint8 x_400; -x_400 = l_RBNode_isRed___main___rarg(x_315); -if (x_400 == 0) -{ -obj* x_401; obj* x_402; -x_401 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_315, x_2, x_3); -x_402 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_402, 0, x_401); -lean::cnstr_set(x_402, 1, x_316); -lean::cnstr_set(x_402, 2, x_317); -lean::cnstr_set(x_402, 3, x_318); -lean::cnstr_set_scalar(x_402, sizeof(void*)*4, x_6); -return x_402; -} -else -{ -obj* x_403; -x_403 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_315, x_2, x_3); -if (lean::obj_tag(x_403) == 0) -{ -lean::dec(x_318); -lean::dec(x_317); -lean::dec(x_316); -return x_403; -} -else -{ -obj* x_404; -x_404 = lean::cnstr_get(x_403, 0); -lean::inc(x_404); -if (lean::obj_tag(x_404) == 0) -{ -obj* x_405; -x_405 = lean::cnstr_get(x_403, 3); -lean::inc(x_405); -if (lean::obj_tag(x_405) == 0) -{ -obj* x_406; obj* x_407; obj* x_408; uint8 x_409; obj* x_410; uint8 x_411; obj* x_412; -x_406 = lean::cnstr_get(x_403, 1); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_403, 2); -lean::inc(x_407); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_408 = x_403; -} else { - lean::dec_ref(x_403); - x_408 = lean::box(0); -} -x_409 = 0; -if (lean::is_scalar(x_408)) { - x_410 = lean::alloc_cnstr(1, 4, 1); -} else { - x_410 = x_408; -} -lean::cnstr_set(x_410, 0, x_405); -lean::cnstr_set(x_410, 1, x_406); -lean::cnstr_set(x_410, 2, x_407); -lean::cnstr_set(x_410, 3, x_405); -lean::cnstr_set_scalar(x_410, sizeof(void*)*4, x_409); -x_411 = 1; -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_410); -lean::cnstr_set(x_412, 1, x_316); -lean::cnstr_set(x_412, 2, x_317); -lean::cnstr_set(x_412, 3, x_318); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_411); -return x_412; -} -else -{ -uint8 x_413; -x_413 = lean::cnstr_get_scalar(x_405, sizeof(void*)*4); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; obj* x_424; obj* x_425; -x_414 = lean::cnstr_get(x_403, 1); -lean::inc(x_414); -x_415 = lean::cnstr_get(x_403, 2); -lean::inc(x_415); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_416 = x_403; -} else { - lean::dec_ref(x_403); - x_416 = lean::box(0); -} -x_417 = lean::cnstr_get(x_405, 0); -lean::inc(x_417); -x_418 = lean::cnstr_get(x_405, 1); -lean::inc(x_418); -x_419 = lean::cnstr_get(x_405, 2); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_405, 3); -lean::inc(x_420); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - lean::cnstr_release(x_405, 2); - lean::cnstr_release(x_405, 3); - x_421 = x_405; -} else { - lean::dec_ref(x_405); - x_421 = lean::box(0); -} -x_422 = 1; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_404); -lean::cnstr_set(x_423, 1, x_414); -lean::cnstr_set(x_423, 2, x_415); -lean::cnstr_set(x_423, 3, x_417); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -if (lean::is_scalar(x_416)) { - x_424 = lean::alloc_cnstr(1, 4, 1); -} else { - x_424 = x_416; -} -lean::cnstr_set(x_424, 0, x_420); -lean::cnstr_set(x_424, 1, x_316); -lean::cnstr_set(x_424, 2, x_317); -lean::cnstr_set(x_424, 3, x_318); -lean::cnstr_set_scalar(x_424, sizeof(void*)*4, x_422); -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_418); -lean::cnstr_set(x_425, 2, x_419); -lean::cnstr_set(x_425, 3, x_424); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_413); -return x_425; -} -else -{ -obj* x_426; obj* x_427; obj* x_428; uint8 x_429; obj* x_430; obj* x_431; -x_426 = lean::cnstr_get(x_403, 1); -lean::inc(x_426); -x_427 = lean::cnstr_get(x_403, 2); -lean::inc(x_427); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_428 = x_403; -} else { - lean::dec_ref(x_403); - x_428 = lean::box(0); -} -x_429 = 0; -if (lean::is_scalar(x_428)) { - x_430 = lean::alloc_cnstr(1, 4, 1); -} else { - x_430 = x_428; -} -lean::cnstr_set(x_430, 0, x_404); -lean::cnstr_set(x_430, 1, x_426); -lean::cnstr_set(x_430, 2, x_427); -lean::cnstr_set(x_430, 3, x_405); -lean::cnstr_set_scalar(x_430, sizeof(void*)*4, x_429); -x_431 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_431, 0, x_430); -lean::cnstr_set(x_431, 1, x_316); -lean::cnstr_set(x_431, 2, x_317); -lean::cnstr_set(x_431, 3, x_318); -lean::cnstr_set_scalar(x_431, sizeof(void*)*4, x_413); -return x_431; -} -} -} -else -{ -uint8 x_432; -x_432 = lean::cnstr_get_scalar(x_404, sizeof(void*)*4); -if (x_432 == 0) -{ -obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; obj* x_445; -x_433 = lean::cnstr_get(x_403, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_403, 2); -lean::inc(x_434); -x_435 = lean::cnstr_get(x_403, 3); -lean::inc(x_435); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_436 = x_403; -} else { - lean::dec_ref(x_403); - x_436 = lean::box(0); -} -x_437 = lean::cnstr_get(x_404, 0); -lean::inc(x_437); -x_438 = lean::cnstr_get(x_404, 1); -lean::inc(x_438); -x_439 = lean::cnstr_get(x_404, 2); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_404, 3); -lean::inc(x_440); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_441 = x_404; -} else { - lean::dec_ref(x_404); - x_441 = lean::box(0); -} -x_442 = 1; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_437); -lean::cnstr_set(x_443, 1, x_438); -lean::cnstr_set(x_443, 2, x_439); -lean::cnstr_set(x_443, 3, x_440); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -if (lean::is_scalar(x_436)) { - x_444 = lean::alloc_cnstr(1, 4, 1); -} else { - x_444 = x_436; -} -lean::cnstr_set(x_444, 0, x_435); -lean::cnstr_set(x_444, 1, x_316); -lean::cnstr_set(x_444, 2, x_317); -lean::cnstr_set(x_444, 3, x_318); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_442); -x_445 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_445, 0, x_443); -lean::cnstr_set(x_445, 1, x_433); -lean::cnstr_set(x_445, 2, x_434); -lean::cnstr_set(x_445, 3, x_444); -lean::cnstr_set_scalar(x_445, sizeof(void*)*4, x_432); -return x_445; -} -else -{ -obj* x_446; -x_446 = lean::cnstr_get(x_403, 3); -lean::inc(x_446); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; uint8 x_450; obj* x_451; obj* x_452; -x_447 = lean::cnstr_get(x_403, 1); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_403, 2); -lean::inc(x_448); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_449 = x_403; -} else { - lean::dec_ref(x_403); - x_449 = lean::box(0); -} -x_450 = 0; -if (lean::is_scalar(x_449)) { - x_451 = lean::alloc_cnstr(1, 4, 1); -} else { - x_451 = x_449; -} -lean::cnstr_set(x_451, 0, x_404); -lean::cnstr_set(x_451, 1, x_447); -lean::cnstr_set(x_451, 2, x_448); -lean::cnstr_set(x_451, 3, x_446); -lean::cnstr_set_scalar(x_451, sizeof(void*)*4, x_450); -x_452 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_452, 0, x_451); -lean::cnstr_set(x_452, 1, x_316); -lean::cnstr_set(x_452, 2, x_317); -lean::cnstr_set(x_452, 3, x_318); -lean::cnstr_set_scalar(x_452, sizeof(void*)*4, x_432); -return x_452; -} -else -{ -uint8 x_453; -x_453 = lean::cnstr_get_scalar(x_446, sizeof(void*)*4); -if (x_453 == 0) -{ -obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; obj* x_465; -x_454 = lean::cnstr_get(x_403, 1); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_403, 2); -lean::inc(x_455); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_456 = x_403; -} else { - lean::dec_ref(x_403); - x_456 = lean::box(0); -} -x_457 = lean::cnstr_get(x_446, 0); -lean::inc(x_457); -x_458 = lean::cnstr_get(x_446, 1); -lean::inc(x_458); -x_459 = lean::cnstr_get(x_446, 2); -lean::inc(x_459); -x_460 = lean::cnstr_get(x_446, 3); -lean::inc(x_460); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - lean::cnstr_release(x_446, 1); - lean::cnstr_release(x_446, 2); - lean::cnstr_release(x_446, 3); - x_461 = x_446; -} else { - lean::dec_ref(x_446); - x_461 = lean::box(0); -} -lean::inc(x_404); -if (lean::is_scalar(x_461)) { - x_462 = lean::alloc_cnstr(1, 4, 1); -} else { - x_462 = x_461; -} -lean::cnstr_set(x_462, 0, x_404); -lean::cnstr_set(x_462, 1, x_454); -lean::cnstr_set(x_462, 2, x_455); -lean::cnstr_set(x_462, 3, x_457); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_463 = x_404; -} else { - lean::dec_ref(x_404); - x_463 = lean::box(0); -} -lean::cnstr_set_scalar(x_462, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_463)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_463; -} -lean::cnstr_set(x_464, 0, x_460); -lean::cnstr_set(x_464, 1, x_316); -lean::cnstr_set(x_464, 2, x_317); -lean::cnstr_set(x_464, 3, x_318); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_456)) { - x_465 = lean::alloc_cnstr(1, 4, 1); -} else { - x_465 = x_456; -} -lean::cnstr_set(x_465, 0, x_462); -lean::cnstr_set(x_465, 1, x_458); -lean::cnstr_set(x_465, 2, x_459); -lean::cnstr_set(x_465, 3, x_464); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_453); -return x_465; -} -else -{ -obj* x_466; obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; uint8 x_475; obj* x_476; obj* x_477; -x_466 = lean::cnstr_get(x_403, 1); -lean::inc(x_466); -x_467 = lean::cnstr_get(x_403, 2); -lean::inc(x_467); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_468 = x_403; -} else { - lean::dec_ref(x_403); - x_468 = lean::box(0); -} -x_469 = lean::cnstr_get(x_404, 0); -lean::inc(x_469); -x_470 = lean::cnstr_get(x_404, 1); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_404, 2); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_404, 3); -lean::inc(x_472); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_473 = x_404; -} else { - lean::dec_ref(x_404); - x_473 = lean::box(0); -} -if (lean::is_scalar(x_473)) { - x_474 = lean::alloc_cnstr(1, 4, 1); -} else { - x_474 = x_473; -} -lean::cnstr_set(x_474, 0, x_469); -lean::cnstr_set(x_474, 1, x_470); -lean::cnstr_set(x_474, 2, x_471); -lean::cnstr_set(x_474, 3, x_472); -lean::cnstr_set_scalar(x_474, sizeof(void*)*4, x_453); -x_475 = 0; -if (lean::is_scalar(x_468)) { - x_476 = lean::alloc_cnstr(1, 4, 1); -} else { - x_476 = x_468; -} -lean::cnstr_set(x_476, 0, x_474); -lean::cnstr_set(x_476, 1, x_466); -lean::cnstr_set(x_476, 2, x_467); -lean::cnstr_set(x_476, 3, x_446); -lean::cnstr_set_scalar(x_476, sizeof(void*)*4, x_475); -x_477 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_477, 0, x_476); -lean::cnstr_set(x_477, 1, x_316); -lean::cnstr_set(x_477, 2, x_317); -lean::cnstr_set(x_477, 3, x_318); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_453); -return x_477; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg), 3, 0); -return x_2; -} -} -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; -x_4 = 0; -x_5 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 3, x_1); -lean::cnstr_set_scalar(x_5, sizeof(void*)*4, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_6 == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -x_10 = lean::cnstr_get(x_1, 2); -x_11 = lean::cnstr_get(x_1, 3); -x_12 = l_Lean_Name_quickLt(x_2, x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = l_Lean_Name_quickLt(x_9, x_2); -if (x_13 == 0) -{ -lean::dec(x_10); -lean::dec(x_9); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -obj* x_14; -x_14 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_11, x_2, x_3); -lean::cnstr_set(x_1, 3, x_14); -return x_1; -} -} -else -{ -obj* x_15; -x_15 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_8, x_2, x_3); -lean::cnstr_set(x_1, 0, x_15); -return x_1; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = lean::cnstr_get(x_1, 1); -x_18 = lean::cnstr_get(x_1, 2); -x_19 = lean::cnstr_get(x_1, 3); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_1); -x_20 = l_Lean_Name_quickLt(x_2, x_17); -if (x_20 == 0) -{ -uint8 x_21; -x_21 = l_Lean_Name_quickLt(x_17, x_2); -if (x_21 == 0) -{ -obj* x_22; -lean::dec(x_18); -lean::dec(x_17); -x_22 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_22, 0, x_16); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_3); -lean::cnstr_set(x_22, 3, x_19); -lean::cnstr_set_scalar(x_22, sizeof(void*)*4, x_6); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_19, x_2, x_3); -x_24 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_24, 0, x_16); -lean::cnstr_set(x_24, 1, x_17); -lean::cnstr_set(x_24, 2, x_18); -lean::cnstr_set(x_24, 3, x_23); -lean::cnstr_set_scalar(x_24, sizeof(void*)*4, x_6); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_16, x_2, x_3); -x_26 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_18); -lean::cnstr_set(x_26, 3, x_19); -lean::cnstr_set_scalar(x_26, sizeof(void*)*4, x_6); -return x_26; -} -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_28 = lean::cnstr_get(x_1, 0); -x_29 = lean::cnstr_get(x_1, 1); -x_30 = lean::cnstr_get(x_1, 2); -x_31 = lean::cnstr_get(x_1, 3); -x_32 = l_Lean_Name_quickLt(x_2, x_29); -if (x_32 == 0) -{ -uint8 x_33; -x_33 = l_Lean_Name_quickLt(x_29, x_2); -if (x_33 == 0) -{ -lean::dec(x_30); -lean::dec(x_29); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -uint8 x_34; -x_34 = l_RBNode_isRed___main___rarg(x_31); -if (x_34 == 0) -{ -obj* x_35; -x_35 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_31, x_2, x_3); -lean::cnstr_set(x_1, 3, x_35); -return x_1; -} -else -{ -obj* x_36; -x_36 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_31, x_2, x_3); -if (lean::obj_tag(x_36) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_28); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = lean::cnstr_get(x_36, 3); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; uint8 x_43; -x_40 = lean::cnstr_get(x_36, 3); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_36, 0); -lean::dec(x_41); -x_42 = 0; -lean::cnstr_set(x_36, 0, x_38); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_42); -x_43 = 1; -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_43); -return x_1; -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; uint8 x_48; -x_44 = lean::cnstr_get(x_36, 1); -x_45 = lean::cnstr_get(x_36, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_36); -x_46 = 0; -x_47 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_47, 0, x_38); -lean::cnstr_set(x_47, 1, x_44); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_38); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_46); -x_48 = 1; -lean::cnstr_set(x_1, 3, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_48); -return x_1; -} -} -else -{ -uint8 x_49; -x_49 = lean::cnstr_get_scalar(x_38, sizeof(void*)*4); -if (x_49 == 0) -{ -uint8 x_50; -x_50 = !lean::is_exclusive(x_36); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; uint8 x_55; -x_51 = lean::cnstr_get(x_36, 1); -x_52 = lean::cnstr_get(x_36, 2); -x_53 = lean::cnstr_get(x_36, 3); -lean::dec(x_53); -x_54 = lean::cnstr_get(x_36, 0); -lean::dec(x_54); -x_55 = !lean::is_exclusive(x_38); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_56 = lean::cnstr_get(x_38, 0); -x_57 = lean::cnstr_get(x_38, 1); -x_58 = lean::cnstr_get(x_38, 2); -x_59 = lean::cnstr_get(x_38, 3); -x_60 = 1; -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 2, x_30); -lean::cnstr_set(x_38, 1, x_29); -lean::cnstr_set(x_38, 0, x_28); -lean::cnstr_set_scalar(x_38, sizeof(void*)*4, x_60); -lean::cnstr_set(x_36, 3, x_59); -lean::cnstr_set(x_36, 2, x_58); -lean::cnstr_set(x_36, 1, x_57); -lean::cnstr_set(x_36, 0, x_56); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_60); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_38); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; obj* x_66; -x_61 = lean::cnstr_get(x_38, 0); -x_62 = lean::cnstr_get(x_38, 1); -x_63 = lean::cnstr_get(x_38, 2); -x_64 = lean::cnstr_get(x_38, 3); -lean::inc(x_64); -lean::inc(x_63); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_38); -x_65 = 1; -x_66 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_66, 0, x_28); -lean::cnstr_set(x_66, 1, x_29); -lean::cnstr_set(x_66, 2, x_30); -lean::cnstr_set(x_66, 3, x_37); -lean::cnstr_set_scalar(x_66, sizeof(void*)*4, x_65); -lean::cnstr_set(x_36, 3, x_64); -lean::cnstr_set(x_36, 2, x_63); -lean::cnstr_set(x_36, 1, x_62); -lean::cnstr_set(x_36, 0, x_61); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_65); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_66); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; -x_67 = lean::cnstr_get(x_36, 1); -x_68 = lean::cnstr_get(x_36, 2); -lean::inc(x_68); -lean::inc(x_67); -lean::dec(x_36); -x_69 = lean::cnstr_get(x_38, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_38, 1); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_38, 2); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_38, 3); -lean::inc(x_72); -if (lean::is_exclusive(x_38)) { - lean::cnstr_release(x_38, 0); - lean::cnstr_release(x_38, 1); - lean::cnstr_release(x_38, 2); - lean::cnstr_release(x_38, 3); - x_73 = x_38; -} else { - lean::dec_ref(x_38); - x_73 = lean::box(0); -} -x_74 = 1; -if (lean::is_scalar(x_73)) { - x_75 = lean::alloc_cnstr(1, 4, 1); -} else { - x_75 = x_73; -} -lean::cnstr_set(x_75, 0, x_28); -lean::cnstr_set(x_75, 1, x_29); -lean::cnstr_set(x_75, 2, x_30); -lean::cnstr_set(x_75, 3, x_37); -lean::cnstr_set_scalar(x_75, sizeof(void*)*4, x_74); -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_69); -lean::cnstr_set(x_76, 1, x_70); -lean::cnstr_set(x_76, 2, x_71); -lean::cnstr_set(x_76, 3, x_72); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_74); -lean::cnstr_set(x_1, 3, x_76); -lean::cnstr_set(x_1, 2, x_68); -lean::cnstr_set(x_1, 1, x_67); -lean::cnstr_set(x_1, 0, x_75); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -uint8 x_77; -x_77 = !lean::is_exclusive(x_36); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; uint8 x_80; -x_78 = lean::cnstr_get(x_36, 3); -lean::dec(x_78); -x_79 = lean::cnstr_get(x_36, 0); -lean::dec(x_79); -x_80 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_80); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_81; obj* x_82; uint8 x_83; obj* x_84; -x_81 = lean::cnstr_get(x_36, 1); -x_82 = lean::cnstr_get(x_36, 2); -lean::inc(x_82); -lean::inc(x_81); -lean::dec(x_36); -x_83 = 0; -x_84 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_84, 0, x_37); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_82); -lean::cnstr_set(x_84, 3, x_38); -lean::cnstr_set_scalar(x_84, sizeof(void*)*4, x_83); -lean::cnstr_set(x_1, 3, x_84); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -} -} -else -{ -uint8 x_85; -x_85 = lean::cnstr_get_scalar(x_37, sizeof(void*)*4); -if (x_85 == 0) -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_36); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_36, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_37); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint8 x_93; -x_89 = lean::cnstr_get(x_37, 0); -x_90 = lean::cnstr_get(x_37, 1); -x_91 = lean::cnstr_get(x_37, 2); -x_92 = lean::cnstr_get(x_37, 3); -x_93 = 1; -lean::cnstr_set(x_37, 3, x_89); -lean::cnstr_set(x_37, 2, x_30); -lean::cnstr_set(x_37, 1, x_29); -lean::cnstr_set(x_37, 0, x_28); -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_93); -lean::cnstr_set(x_36, 0, x_92); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_91); -lean::cnstr_set(x_1, 1, x_90); -lean::cnstr_set(x_1, 0, x_37); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; uint8 x_98; obj* x_99; -x_94 = lean::cnstr_get(x_37, 0); -x_95 = lean::cnstr_get(x_37, 1); -x_96 = lean::cnstr_get(x_37, 2); -x_97 = lean::cnstr_get(x_37, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_37); -x_98 = 1; -x_99 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_29); -lean::cnstr_set(x_99, 2, x_30); -lean::cnstr_set(x_99, 3, x_94); -lean::cnstr_set_scalar(x_99, sizeof(void*)*4, x_98); -lean::cnstr_set(x_36, 0, x_97); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_98); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_96); -lean::cnstr_set(x_1, 1, x_95); -lean::cnstr_set(x_1, 0, x_99); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; obj* x_110; -x_100 = lean::cnstr_get(x_36, 1); -x_101 = lean::cnstr_get(x_36, 2); -x_102 = lean::cnstr_get(x_36, 3); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_36); -x_103 = lean::cnstr_get(x_37, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_37, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_37, 2); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_37, 3); -lean::inc(x_106); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_107 = x_37; -} else { - lean::dec_ref(x_37); - x_107 = lean::box(0); -} -x_108 = 1; -if (lean::is_scalar(x_107)) { - x_109 = lean::alloc_cnstr(1, 4, 1); -} else { - x_109 = x_107; -} -lean::cnstr_set(x_109, 0, x_28); -lean::cnstr_set(x_109, 1, x_29); -lean::cnstr_set(x_109, 2, x_30); -lean::cnstr_set(x_109, 3, x_103); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -x_110 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_110, 0, x_106); -lean::cnstr_set(x_110, 1, x_100); -lean::cnstr_set(x_110, 2, x_101); -lean::cnstr_set(x_110, 3, x_102); -lean::cnstr_set_scalar(x_110, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_110); -lean::cnstr_set(x_1, 2, x_105); -lean::cnstr_set(x_1, 1, x_104); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_111; -x_111 = lean::cnstr_get(x_36, 3); -lean::inc(x_111); -if (lean::obj_tag(x_111) == 0) -{ -uint8 x_112; -x_112 = !lean::is_exclusive(x_36); -if (x_112 == 0) -{ -obj* x_113; obj* x_114; uint8 x_115; -x_113 = lean::cnstr_get(x_36, 3); -lean::dec(x_113); -x_114 = lean::cnstr_get(x_36, 0); -lean::dec(x_114); -x_115 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_115); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; -x_116 = lean::cnstr_get(x_36, 1); -x_117 = lean::cnstr_get(x_36, 2); -lean::inc(x_117); -lean::inc(x_116); -lean::dec(x_36); -x_118 = 0; -x_119 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_119, 0, x_37); -lean::cnstr_set(x_119, 1, x_116); -lean::cnstr_set(x_119, 2, x_117); -lean::cnstr_set(x_119, 3, x_111); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -uint8 x_120; -x_120 = lean::cnstr_get_scalar(x_111, sizeof(void*)*4); -if (x_120 == 0) -{ -uint8 x_121; -lean::free_heap_obj(x_1); -x_121 = !lean::is_exclusive(x_36); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; uint8 x_124; -x_122 = lean::cnstr_get(x_36, 3); -lean::dec(x_122); -x_123 = lean::cnstr_get(x_36, 0); -lean::dec(x_123); -x_124 = !lean::is_exclusive(x_111); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; uint8 x_129; -x_125 = lean::cnstr_get(x_111, 0); -x_126 = lean::cnstr_get(x_111, 1); -x_127 = lean::cnstr_get(x_111, 2); -x_128 = lean::cnstr_get(x_111, 3); -lean::inc(x_37); -lean::cnstr_set(x_111, 3, x_37); -lean::cnstr_set(x_111, 2, x_30); -lean::cnstr_set(x_111, 1, x_29); -lean::cnstr_set(x_111, 0, x_28); -x_129 = !lean::is_exclusive(x_37); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_130 = lean::cnstr_get(x_37, 3); -lean::dec(x_130); -x_131 = lean::cnstr_get(x_37, 2); -lean::dec(x_131); -x_132 = lean::cnstr_get(x_37, 1); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_37, 0); -lean::dec(x_133); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -lean::cnstr_set(x_37, 3, x_128); -lean::cnstr_set(x_37, 2, x_127); -lean::cnstr_set(x_37, 1, x_126); -lean::cnstr_set(x_37, 0, x_125); -lean::cnstr_set(x_36, 3, x_37); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -else -{ -obj* x_134; -lean::dec(x_37); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -x_134 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_134, 0, x_125); -lean::cnstr_set(x_134, 1, x_126); -lean::cnstr_set(x_134, 2, x_127); -lean::cnstr_set(x_134, 3, x_128); -lean::cnstr_set_scalar(x_134, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_134); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_135 = lean::cnstr_get(x_111, 0); -x_136 = lean::cnstr_get(x_111, 1); -x_137 = lean::cnstr_get(x_111, 2); -x_138 = lean::cnstr_get(x_111, 3); -lean::inc(x_138); -lean::inc(x_137); -lean::inc(x_136); -lean::inc(x_135); -lean::dec(x_111); -lean::inc(x_37); -x_139 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_139, 0, x_28); -lean::cnstr_set(x_139, 1, x_29); -lean::cnstr_set(x_139, 2, x_30); -lean::cnstr_set(x_139, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_140 = x_37; -} else { - lean::dec_ref(x_37); - x_140 = lean::box(0); -} -lean::cnstr_set_scalar(x_139, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(1, 4, 1); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_135); -lean::cnstr_set(x_141, 1, x_136); -lean::cnstr_set(x_141, 2, x_137); -lean::cnstr_set(x_141, 3, x_138); -lean::cnstr_set_scalar(x_141, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_141); -lean::cnstr_set(x_36, 0, x_139); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_142 = lean::cnstr_get(x_36, 1); -x_143 = lean::cnstr_get(x_36, 2); -lean::inc(x_143); -lean::inc(x_142); -lean::dec(x_36); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_111, 1); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_111, 2); -lean::inc(x_146); -x_147 = lean::cnstr_get(x_111, 3); -lean::inc(x_147); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - lean::cnstr_release(x_111, 2); - lean::cnstr_release(x_111, 3); - x_148 = x_111; -} else { - lean::dec_ref(x_111); - x_148 = lean::box(0); -} -lean::inc(x_37); -if (lean::is_scalar(x_148)) { - x_149 = lean::alloc_cnstr(1, 4, 1); -} else { - x_149 = x_148; -} -lean::cnstr_set(x_149, 0, x_28); -lean::cnstr_set(x_149, 1, x_29); -lean::cnstr_set(x_149, 2, x_30); -lean::cnstr_set(x_149, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_150 = x_37; -} else { - lean::dec_ref(x_37); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_144); -lean::cnstr_set(x_151, 1, x_145); -lean::cnstr_set(x_151, 2, x_146); -lean::cnstr_set(x_151, 3, x_147); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_85); -x_152 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_152, 0, x_149); -lean::cnstr_set(x_152, 1, x_142); -lean::cnstr_set(x_152, 2, x_143); -lean::cnstr_set(x_152, 3, x_151); -lean::cnstr_set_scalar(x_152, sizeof(void*)*4, x_120); -return x_152; -} -} -else -{ -uint8 x_153; -x_153 = !lean::is_exclusive(x_36); -if (x_153 == 0) -{ -obj* x_154; obj* x_155; uint8 x_156; -x_154 = lean::cnstr_get(x_36, 3); -lean::dec(x_154); -x_155 = lean::cnstr_get(x_36, 0); -lean::dec(x_155); -x_156 = !lean::is_exclusive(x_37); -if (x_156 == 0) -{ -uint8 x_157; -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_120); -x_157 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_157); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -else -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; uint8 x_163; -x_158 = lean::cnstr_get(x_37, 0); -x_159 = lean::cnstr_get(x_37, 1); -x_160 = lean::cnstr_get(x_37, 2); -x_161 = lean::cnstr_get(x_37, 3); -lean::inc(x_161); -lean::inc(x_160); -lean::inc(x_159); -lean::inc(x_158); -lean::dec(x_37); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_158); -lean::cnstr_set(x_162, 1, x_159); -lean::cnstr_set(x_162, 2, x_160); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_120); -x_163 = 0; -lean::cnstr_set(x_36, 0, x_162); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_163); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; uint8 x_172; obj* x_173; -x_164 = lean::cnstr_get(x_36, 1); -x_165 = lean::cnstr_get(x_36, 2); -lean::inc(x_165); -lean::inc(x_164); -lean::dec(x_36); -x_166 = lean::cnstr_get(x_37, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_37, 1); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_37, 2); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_37, 3); -lean::inc(x_169); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_170 = x_37; -} else { - lean::dec_ref(x_37); - x_170 = lean::box(0); -} -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(1, 4, 1); -} else { - x_171 = x_170; -} -lean::cnstr_set(x_171, 0, x_166); -lean::cnstr_set(x_171, 1, x_167); -lean::cnstr_set(x_171, 2, x_168); -lean::cnstr_set(x_171, 3, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*4, x_120); -x_172 = 0; -x_173 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_173, 0, x_171); -lean::cnstr_set(x_173, 1, x_164); -lean::cnstr_set(x_173, 2, x_165); -lean::cnstr_set(x_173, 3, x_111); -lean::cnstr_set_scalar(x_173, sizeof(void*)*4, x_172); -lean::cnstr_set(x_1, 3, x_173); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_174; -x_174 = l_RBNode_isRed___main___rarg(x_28); -if (x_174 == 0) -{ -obj* x_175; -x_175 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_28, x_2, x_3); -lean::cnstr_set(x_1, 0, x_175); -return x_1; -} -else -{ -obj* x_176; -x_176 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_28, x_2, x_3); -if (lean::obj_tag(x_176) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_31); -lean::dec(x_30); -lean::dec(x_29); -return x_176; -} -else -{ -obj* x_177; -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -if (lean::obj_tag(x_177) == 0) -{ -obj* x_178; -x_178 = lean::cnstr_get(x_176, 3); -lean::inc(x_178); -if (lean::obj_tag(x_178) == 0) -{ -uint8 x_179; -x_179 = !lean::is_exclusive(x_176); -if (x_179 == 0) -{ -obj* x_180; obj* x_181; uint8 x_182; uint8 x_183; -x_180 = lean::cnstr_get(x_176, 3); -lean::dec(x_180); -x_181 = lean::cnstr_get(x_176, 0); -lean::dec(x_181); -x_182 = 0; -lean::cnstr_set(x_176, 0, x_178); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_182); -x_183 = 1; -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_183); -return x_1; -} -else -{ -obj* x_184; obj* x_185; uint8 x_186; obj* x_187; uint8 x_188; -x_184 = lean::cnstr_get(x_176, 1); -x_185 = lean::cnstr_get(x_176, 2); -lean::inc(x_185); -lean::inc(x_184); -lean::dec(x_176); -x_186 = 0; -x_187 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_187, 0, x_178); -lean::cnstr_set(x_187, 1, x_184); -lean::cnstr_set(x_187, 2, x_185); -lean::cnstr_set(x_187, 3, x_178); -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_186); -x_188 = 1; -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_188); -return x_1; -} -} -else -{ -uint8 x_189; -x_189 = lean::cnstr_get_scalar(x_178, sizeof(void*)*4); -if (x_189 == 0) -{ -uint8 x_190; -x_190 = !lean::is_exclusive(x_176); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; uint8 x_195; -x_191 = lean::cnstr_get(x_176, 1); -x_192 = lean::cnstr_get(x_176, 2); -x_193 = lean::cnstr_get(x_176, 3); -lean::dec(x_193); -x_194 = lean::cnstr_get(x_176, 0); -lean::dec(x_194); -x_195 = !lean::is_exclusive(x_178); -if (x_195 == 0) -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; uint8 x_200; -x_196 = lean::cnstr_get(x_178, 0); -x_197 = lean::cnstr_get(x_178, 1); -x_198 = lean::cnstr_get(x_178, 2); -x_199 = lean::cnstr_get(x_178, 3); -x_200 = 1; -lean::cnstr_set(x_178, 3, x_196); -lean::cnstr_set(x_178, 2, x_192); -lean::cnstr_set(x_178, 1, x_191); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set_scalar(x_178, sizeof(void*)*4, x_200); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_199); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_200); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_198); -lean::cnstr_set(x_1, 1, x_197); -lean::cnstr_set(x_1, 0, x_178); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; obj* x_206; -x_201 = lean::cnstr_get(x_178, 0); -x_202 = lean::cnstr_get(x_178, 1); -x_203 = lean::cnstr_get(x_178, 2); -x_204 = lean::cnstr_get(x_178, 3); -lean::inc(x_204); -lean::inc(x_203); -lean::inc(x_202); -lean::inc(x_201); -lean::dec(x_178); -x_205 = 1; -x_206 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_206, 0, x_177); -lean::cnstr_set(x_206, 1, x_191); -lean::cnstr_set(x_206, 2, x_192); -lean::cnstr_set(x_206, 3, x_201); -lean::cnstr_set_scalar(x_206, sizeof(void*)*4, x_205); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_204); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_205); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_203); -lean::cnstr_set(x_1, 1, x_202); -lean::cnstr_set(x_1, 0, x_206); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; -x_207 = lean::cnstr_get(x_176, 1); -x_208 = lean::cnstr_get(x_176, 2); -lean::inc(x_208); -lean::inc(x_207); -lean::dec(x_176); -x_209 = lean::cnstr_get(x_178, 0); -lean::inc(x_209); -x_210 = lean::cnstr_get(x_178, 1); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_178, 2); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_178, 3); -lean::inc(x_212); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - lean::cnstr_release(x_178, 2); - lean::cnstr_release(x_178, 3); - x_213 = x_178; -} else { - lean::dec_ref(x_178); - x_213 = lean::box(0); -} -x_214 = 1; -if (lean::is_scalar(x_213)) { - x_215 = lean::alloc_cnstr(1, 4, 1); -} else { - x_215 = x_213; -} -lean::cnstr_set(x_215, 0, x_177); -lean::cnstr_set(x_215, 1, x_207); -lean::cnstr_set(x_215, 2, x_208); -lean::cnstr_set(x_215, 3, x_209); -lean::cnstr_set_scalar(x_215, sizeof(void*)*4, x_214); -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_212); -lean::cnstr_set(x_216, 1, x_29); -lean::cnstr_set(x_216, 2, x_30); -lean::cnstr_set(x_216, 3, x_31); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_214); -lean::cnstr_set(x_1, 3, x_216); -lean::cnstr_set(x_1, 2, x_211); -lean::cnstr_set(x_1, 1, x_210); -lean::cnstr_set(x_1, 0, x_215); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -uint8 x_217; -x_217 = !lean::is_exclusive(x_176); -if (x_217 == 0) -{ -obj* x_218; obj* x_219; uint8 x_220; -x_218 = lean::cnstr_get(x_176, 3); -lean::dec(x_218); -x_219 = lean::cnstr_get(x_176, 0); -lean::dec(x_219); -x_220 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_220); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_221; obj* x_222; uint8 x_223; obj* x_224; -x_221 = lean::cnstr_get(x_176, 1); -x_222 = lean::cnstr_get(x_176, 2); -lean::inc(x_222); -lean::inc(x_221); -lean::dec(x_176); -x_223 = 0; -x_224 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_224, 0, x_177); -lean::cnstr_set(x_224, 1, x_221); -lean::cnstr_set(x_224, 2, x_222); -lean::cnstr_set(x_224, 3, x_178); -lean::cnstr_set_scalar(x_224, sizeof(void*)*4, x_223); -lean::cnstr_set(x_1, 0, x_224); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -} -} -else -{ -uint8 x_225; -x_225 = lean::cnstr_get_scalar(x_177, sizeof(void*)*4); -if (x_225 == 0) -{ -uint8 x_226; -x_226 = !lean::is_exclusive(x_176); -if (x_226 == 0) -{ -obj* x_227; obj* x_228; obj* x_229; obj* x_230; uint8 x_231; -x_227 = lean::cnstr_get(x_176, 1); -x_228 = lean::cnstr_get(x_176, 2); -x_229 = lean::cnstr_get(x_176, 3); -x_230 = lean::cnstr_get(x_176, 0); -lean::dec(x_230); -x_231 = !lean::is_exclusive(x_177); -if (x_231 == 0) -{ -uint8 x_232; -x_232 = 1; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_232); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_232); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_177); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; uint8 x_237; obj* x_238; -x_233 = lean::cnstr_get(x_177, 0); -x_234 = lean::cnstr_get(x_177, 1); -x_235 = lean::cnstr_get(x_177, 2); -x_236 = lean::cnstr_get(x_177, 3); -lean::inc(x_236); -lean::inc(x_235); -lean::inc(x_234); -lean::inc(x_233); -lean::dec(x_177); -x_237 = 1; -x_238 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_238, 0, x_233); -lean::cnstr_set(x_238, 1, x_234); -lean::cnstr_set(x_238, 2, x_235); -lean::cnstr_set(x_238, 3, x_236); -lean::cnstr_set_scalar(x_238, sizeof(void*)*4, x_237); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_237); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_238); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; obj* x_249; -x_239 = lean::cnstr_get(x_176, 1); -x_240 = lean::cnstr_get(x_176, 2); -x_241 = lean::cnstr_get(x_176, 3); -lean::inc(x_241); -lean::inc(x_240); -lean::inc(x_239); -lean::dec(x_176); -x_242 = lean::cnstr_get(x_177, 0); -lean::inc(x_242); -x_243 = lean::cnstr_get(x_177, 1); -lean::inc(x_243); -x_244 = lean::cnstr_get(x_177, 2); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_177, 3); -lean::inc(x_245); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_246 = x_177; -} else { - lean::dec_ref(x_177); - x_246 = lean::box(0); -} -x_247 = 1; -if (lean::is_scalar(x_246)) { - x_248 = lean::alloc_cnstr(1, 4, 1); -} else { - x_248 = x_246; -} -lean::cnstr_set(x_248, 0, x_242); -lean::cnstr_set(x_248, 1, x_243); -lean::cnstr_set(x_248, 2, x_244); -lean::cnstr_set(x_248, 3, x_245); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -x_249 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_249, 0, x_241); -lean::cnstr_set(x_249, 1, x_29); -lean::cnstr_set(x_249, 2, x_30); -lean::cnstr_set(x_249, 3, x_31); -lean::cnstr_set_scalar(x_249, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_249); -lean::cnstr_set(x_1, 2, x_240); -lean::cnstr_set(x_1, 1, x_239); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_250; -x_250 = lean::cnstr_get(x_176, 3); -lean::inc(x_250); -if (lean::obj_tag(x_250) == 0) -{ -uint8 x_251; -x_251 = !lean::is_exclusive(x_176); -if (x_251 == 0) -{ -obj* x_252; obj* x_253; uint8 x_254; -x_252 = lean::cnstr_get(x_176, 3); -lean::dec(x_252); -x_253 = lean::cnstr_get(x_176, 0); -lean::dec(x_253); -x_254 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_254); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_255; obj* x_256; uint8 x_257; obj* x_258; -x_255 = lean::cnstr_get(x_176, 1); -x_256 = lean::cnstr_get(x_176, 2); -lean::inc(x_256); -lean::inc(x_255); -lean::dec(x_176); -x_257 = 0; -x_258 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_258, 0, x_177); -lean::cnstr_set(x_258, 1, x_255); -lean::cnstr_set(x_258, 2, x_256); -lean::cnstr_set(x_258, 3, x_250); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -uint8 x_259; -x_259 = lean::cnstr_get_scalar(x_250, sizeof(void*)*4); -if (x_259 == 0) -{ -uint8 x_260; -lean::free_heap_obj(x_1); -x_260 = !lean::is_exclusive(x_176); -if (x_260 == 0) -{ -obj* x_261; obj* x_262; obj* x_263; obj* x_264; uint8 x_265; -x_261 = lean::cnstr_get(x_176, 1); -x_262 = lean::cnstr_get(x_176, 2); -x_263 = lean::cnstr_get(x_176, 3); -lean::dec(x_263); -x_264 = lean::cnstr_get(x_176, 0); -lean::dec(x_264); -x_265 = !lean::is_exclusive(x_250); -if (x_265 == 0) -{ -obj* x_266; obj* x_267; obj* x_268; obj* x_269; uint8 x_270; -x_266 = lean::cnstr_get(x_250, 0); -x_267 = lean::cnstr_get(x_250, 1); -x_268 = lean::cnstr_get(x_250, 2); -x_269 = lean::cnstr_get(x_250, 3); -lean::inc(x_177); -lean::cnstr_set(x_250, 3, x_266); -lean::cnstr_set(x_250, 2, x_262); -lean::cnstr_set(x_250, 1, x_261); -lean::cnstr_set(x_250, 0, x_177); -x_270 = !lean::is_exclusive(x_177); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; -x_271 = lean::cnstr_get(x_177, 3); -lean::dec(x_271); -x_272 = lean::cnstr_get(x_177, 2); -lean::dec(x_272); -x_273 = lean::cnstr_get(x_177, 1); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_177, 0); -lean::dec(x_274); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -lean::cnstr_set(x_177, 3, x_31); -lean::cnstr_set(x_177, 2, x_30); -lean::cnstr_set(x_177, 1, x_29); -lean::cnstr_set(x_177, 0, x_269); -lean::cnstr_set(x_176, 3, x_177); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -else -{ -obj* x_275; -lean::dec(x_177); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -x_275 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_275, 0, x_269); -lean::cnstr_set(x_275, 1, x_29); -lean::cnstr_set(x_275, 2, x_30); -lean::cnstr_set(x_275, 3, x_31); -lean::cnstr_set_scalar(x_275, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_275); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -x_276 = lean::cnstr_get(x_250, 0); -x_277 = lean::cnstr_get(x_250, 1); -x_278 = lean::cnstr_get(x_250, 2); -x_279 = lean::cnstr_get(x_250, 3); -lean::inc(x_279); -lean::inc(x_278); -lean::inc(x_277); -lean::inc(x_276); -lean::dec(x_250); -lean::inc(x_177); -x_280 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_280, 0, x_177); -lean::cnstr_set(x_280, 1, x_261); -lean::cnstr_set(x_280, 2, x_262); -lean::cnstr_set(x_280, 3, x_276); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_281 = x_177; -} else { - lean::dec_ref(x_177); - x_281 = lean::box(0); -} -lean::cnstr_set_scalar(x_280, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_281)) { - x_282 = lean::alloc_cnstr(1, 4, 1); -} else { - x_282 = x_281; -} -lean::cnstr_set(x_282, 0, x_279); -lean::cnstr_set(x_282, 1, x_29); -lean::cnstr_set(x_282, 2, x_30); -lean::cnstr_set(x_282, 3, x_31); -lean::cnstr_set_scalar(x_282, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_282); -lean::cnstr_set(x_176, 2, x_278); -lean::cnstr_set(x_176, 1, x_277); -lean::cnstr_set(x_176, 0, x_280); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_283 = lean::cnstr_get(x_176, 1); -x_284 = lean::cnstr_get(x_176, 2); -lean::inc(x_284); -lean::inc(x_283); -lean::dec(x_176); -x_285 = lean::cnstr_get(x_250, 0); -lean::inc(x_285); -x_286 = lean::cnstr_get(x_250, 1); -lean::inc(x_286); -x_287 = lean::cnstr_get(x_250, 2); -lean::inc(x_287); -x_288 = lean::cnstr_get(x_250, 3); -lean::inc(x_288); -if (lean::is_exclusive(x_250)) { - lean::cnstr_release(x_250, 0); - lean::cnstr_release(x_250, 1); - lean::cnstr_release(x_250, 2); - lean::cnstr_release(x_250, 3); - x_289 = x_250; -} else { - lean::dec_ref(x_250); - x_289 = lean::box(0); -} -lean::inc(x_177); -if (lean::is_scalar(x_289)) { - x_290 = lean::alloc_cnstr(1, 4, 1); -} else { - x_290 = x_289; -} -lean::cnstr_set(x_290, 0, x_177); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_285); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_291 = x_177; -} else { - lean::dec_ref(x_177); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_288); -lean::cnstr_set(x_292, 1, x_29); -lean::cnstr_set(x_292, 2, x_30); -lean::cnstr_set(x_292, 3, x_31); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_225); -x_293 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_293, 0, x_290); -lean::cnstr_set(x_293, 1, x_286); -lean::cnstr_set(x_293, 2, x_287); -lean::cnstr_set(x_293, 3, x_292); -lean::cnstr_set_scalar(x_293, sizeof(void*)*4, x_259); -return x_293; -} -} -else -{ -uint8 x_294; -x_294 = !lean::is_exclusive(x_176); -if (x_294 == 0) -{ -obj* x_295; obj* x_296; uint8 x_297; -x_295 = lean::cnstr_get(x_176, 3); -lean::dec(x_295); -x_296 = lean::cnstr_get(x_176, 0); -lean::dec(x_296); -x_297 = !lean::is_exclusive(x_177); -if (x_297 == 0) -{ -uint8 x_298; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_259); -x_298 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_298); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -else -{ -obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; uint8 x_304; -x_299 = lean::cnstr_get(x_177, 0); -x_300 = lean::cnstr_get(x_177, 1); -x_301 = lean::cnstr_get(x_177, 2); -x_302 = lean::cnstr_get(x_177, 3); -lean::inc(x_302); -lean::inc(x_301); -lean::inc(x_300); -lean::inc(x_299); -lean::dec(x_177); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_299); -lean::cnstr_set(x_303, 1, x_300); -lean::cnstr_set(x_303, 2, x_301); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_259); -x_304 = 0; -lean::cnstr_set(x_176, 0, x_303); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_304); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -else -{ -obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; uint8 x_313; obj* x_314; -x_305 = lean::cnstr_get(x_176, 1); -x_306 = lean::cnstr_get(x_176, 2); -lean::inc(x_306); -lean::inc(x_305); -lean::dec(x_176); -x_307 = lean::cnstr_get(x_177, 0); -lean::inc(x_307); -x_308 = lean::cnstr_get(x_177, 1); -lean::inc(x_308); -x_309 = lean::cnstr_get(x_177, 2); -lean::inc(x_309); -x_310 = lean::cnstr_get(x_177, 3); -lean::inc(x_310); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_311 = x_177; -} else { - lean::dec_ref(x_177); - x_311 = lean::box(0); -} -if (lean::is_scalar(x_311)) { - x_312 = lean::alloc_cnstr(1, 4, 1); -} else { - x_312 = x_311; -} -lean::cnstr_set(x_312, 0, x_307); -lean::cnstr_set(x_312, 1, x_308); -lean::cnstr_set(x_312, 2, x_309); -lean::cnstr_set(x_312, 3, x_310); -lean::cnstr_set_scalar(x_312, sizeof(void*)*4, x_259); -x_313 = 0; -x_314 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_314, 0, x_312); -lean::cnstr_set(x_314, 1, x_305); -lean::cnstr_set(x_314, 2, x_306); -lean::cnstr_set(x_314, 3, x_250); -lean::cnstr_set_scalar(x_314, sizeof(void*)*4, x_313); -lean::cnstr_set(x_1, 0, x_314); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; uint8 x_319; -x_315 = lean::cnstr_get(x_1, 0); -x_316 = lean::cnstr_get(x_1, 1); -x_317 = lean::cnstr_get(x_1, 2); -x_318 = lean::cnstr_get(x_1, 3); -lean::inc(x_318); -lean::inc(x_317); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_1); -x_319 = l_Lean_Name_quickLt(x_2, x_316); -if (x_319 == 0) -{ -uint8 x_320; -x_320 = l_Lean_Name_quickLt(x_316, x_2); -if (x_320 == 0) -{ -obj* x_321; -lean::dec(x_317); -lean::dec(x_316); -x_321 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_321, 0, x_315); -lean::cnstr_set(x_321, 1, x_2); -lean::cnstr_set(x_321, 2, x_3); -lean::cnstr_set(x_321, 3, x_318); -lean::cnstr_set_scalar(x_321, sizeof(void*)*4, x_6); -return x_321; -} -else -{ -uint8 x_322; -x_322 = l_RBNode_isRed___main___rarg(x_318); -if (x_322 == 0) -{ -obj* x_323; obj* x_324; -x_323 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_318, x_2, x_3); -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_315); -lean::cnstr_set(x_324, 1, x_316); -lean::cnstr_set(x_324, 2, x_317); -lean::cnstr_set(x_324, 3, x_323); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_6); -return x_324; -} -else -{ -obj* x_325; -x_325 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_318, x_2, x_3); -if (lean::obj_tag(x_325) == 0) -{ -lean::dec(x_317); -lean::dec(x_316); -lean::dec(x_315); -return x_325; -} -else -{ -obj* x_326; -x_326 = lean::cnstr_get(x_325, 0); -lean::inc(x_326); -if (lean::obj_tag(x_326) == 0) -{ -obj* x_327; -x_327 = lean::cnstr_get(x_325, 3); -lean::inc(x_327); -if (lean::obj_tag(x_327) == 0) -{ -obj* x_328; obj* x_329; obj* x_330; uint8 x_331; obj* x_332; uint8 x_333; obj* x_334; -x_328 = lean::cnstr_get(x_325, 1); -lean::inc(x_328); -x_329 = lean::cnstr_get(x_325, 2); -lean::inc(x_329); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_330 = x_325; -} else { - lean::dec_ref(x_325); - x_330 = lean::box(0); -} -x_331 = 0; -if (lean::is_scalar(x_330)) { - x_332 = lean::alloc_cnstr(1, 4, 1); -} else { - x_332 = x_330; -} -lean::cnstr_set(x_332, 0, x_327); -lean::cnstr_set(x_332, 1, x_328); -lean::cnstr_set(x_332, 2, x_329); -lean::cnstr_set(x_332, 3, x_327); -lean::cnstr_set_scalar(x_332, sizeof(void*)*4, x_331); -x_333 = 1; -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_315); -lean::cnstr_set(x_334, 1, x_316); -lean::cnstr_set(x_334, 2, x_317); -lean::cnstr_set(x_334, 3, x_332); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_333); -return x_334; -} -else -{ -uint8 x_335; -x_335 = lean::cnstr_get_scalar(x_327, sizeof(void*)*4); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; obj* x_346; obj* x_347; -x_336 = lean::cnstr_get(x_325, 1); -lean::inc(x_336); -x_337 = lean::cnstr_get(x_325, 2); -lean::inc(x_337); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_338 = x_325; -} else { - lean::dec_ref(x_325); - x_338 = lean::box(0); -} -x_339 = lean::cnstr_get(x_327, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get(x_327, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_327, 2); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_327, 3); -lean::inc(x_342); -if (lean::is_exclusive(x_327)) { - lean::cnstr_release(x_327, 0); - lean::cnstr_release(x_327, 1); - lean::cnstr_release(x_327, 2); - lean::cnstr_release(x_327, 3); - x_343 = x_327; -} else { - lean::dec_ref(x_327); - x_343 = lean::box(0); -} -x_344 = 1; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_315); -lean::cnstr_set(x_345, 1, x_316); -lean::cnstr_set(x_345, 2, x_317); -lean::cnstr_set(x_345, 3, x_326); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -if (lean::is_scalar(x_338)) { - x_346 = lean::alloc_cnstr(1, 4, 1); -} else { - x_346 = x_338; -} -lean::cnstr_set(x_346, 0, x_339); -lean::cnstr_set(x_346, 1, x_340); -lean::cnstr_set(x_346, 2, x_341); -lean::cnstr_set(x_346, 3, x_342); -lean::cnstr_set_scalar(x_346, sizeof(void*)*4, x_344); -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_345); -lean::cnstr_set(x_347, 1, x_336); -lean::cnstr_set(x_347, 2, x_337); -lean::cnstr_set(x_347, 3, x_346); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_335); -return x_347; -} -else -{ -obj* x_348; obj* x_349; obj* x_350; uint8 x_351; obj* x_352; obj* x_353; -x_348 = lean::cnstr_get(x_325, 1); -lean::inc(x_348); -x_349 = lean::cnstr_get(x_325, 2); -lean::inc(x_349); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_350 = x_325; -} else { - lean::dec_ref(x_325); - x_350 = lean::box(0); -} -x_351 = 0; -if (lean::is_scalar(x_350)) { - x_352 = lean::alloc_cnstr(1, 4, 1); -} else { - x_352 = x_350; -} -lean::cnstr_set(x_352, 0, x_326); -lean::cnstr_set(x_352, 1, x_348); -lean::cnstr_set(x_352, 2, x_349); -lean::cnstr_set(x_352, 3, x_327); -lean::cnstr_set_scalar(x_352, sizeof(void*)*4, x_351); -x_353 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_353, 0, x_315); -lean::cnstr_set(x_353, 1, x_316); -lean::cnstr_set(x_353, 2, x_317); -lean::cnstr_set(x_353, 3, x_352); -lean::cnstr_set_scalar(x_353, sizeof(void*)*4, x_335); -return x_353; -} -} -} -else -{ -uint8 x_354; -x_354 = lean::cnstr_get_scalar(x_326, sizeof(void*)*4); -if (x_354 == 0) -{ -obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; obj* x_367; -x_355 = lean::cnstr_get(x_325, 1); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_325, 2); -lean::inc(x_356); -x_357 = lean::cnstr_get(x_325, 3); -lean::inc(x_357); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_358 = x_325; -} else { - lean::dec_ref(x_325); - x_358 = lean::box(0); -} -x_359 = lean::cnstr_get(x_326, 0); -lean::inc(x_359); -x_360 = lean::cnstr_get(x_326, 1); -lean::inc(x_360); -x_361 = lean::cnstr_get(x_326, 2); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_326, 3); -lean::inc(x_362); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_363 = x_326; -} else { - lean::dec_ref(x_326); - x_363 = lean::box(0); -} -x_364 = 1; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_315); -lean::cnstr_set(x_365, 1, x_316); -lean::cnstr_set(x_365, 2, x_317); -lean::cnstr_set(x_365, 3, x_359); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -if (lean::is_scalar(x_358)) { - x_366 = lean::alloc_cnstr(1, 4, 1); -} else { - x_366 = x_358; -} -lean::cnstr_set(x_366, 0, x_362); -lean::cnstr_set(x_366, 1, x_355); -lean::cnstr_set(x_366, 2, x_356); -lean::cnstr_set(x_366, 3, x_357); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_364); -x_367 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_360); -lean::cnstr_set(x_367, 2, x_361); -lean::cnstr_set(x_367, 3, x_366); -lean::cnstr_set_scalar(x_367, sizeof(void*)*4, x_354); -return x_367; -} -else -{ -obj* x_368; -x_368 = lean::cnstr_get(x_325, 3); -lean::inc(x_368); -if (lean::obj_tag(x_368) == 0) -{ -obj* x_369; obj* x_370; obj* x_371; uint8 x_372; obj* x_373; obj* x_374; -x_369 = lean::cnstr_get(x_325, 1); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_325, 2); -lean::inc(x_370); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_371 = x_325; -} else { - lean::dec_ref(x_325); - x_371 = lean::box(0); -} -x_372 = 0; -if (lean::is_scalar(x_371)) { - x_373 = lean::alloc_cnstr(1, 4, 1); -} else { - x_373 = x_371; -} -lean::cnstr_set(x_373, 0, x_326); -lean::cnstr_set(x_373, 1, x_369); -lean::cnstr_set(x_373, 2, x_370); -lean::cnstr_set(x_373, 3, x_368); -lean::cnstr_set_scalar(x_373, sizeof(void*)*4, x_372); -x_374 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_374, 0, x_315); -lean::cnstr_set(x_374, 1, x_316); -lean::cnstr_set(x_374, 2, x_317); -lean::cnstr_set(x_374, 3, x_373); -lean::cnstr_set_scalar(x_374, sizeof(void*)*4, x_354); -return x_374; -} -else -{ -uint8 x_375; -x_375 = lean::cnstr_get_scalar(x_368, sizeof(void*)*4); -if (x_375 == 0) -{ -obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; -x_376 = lean::cnstr_get(x_325, 1); -lean::inc(x_376); -x_377 = lean::cnstr_get(x_325, 2); -lean::inc(x_377); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_378 = x_325; -} else { - lean::dec_ref(x_325); - x_378 = lean::box(0); -} -x_379 = lean::cnstr_get(x_368, 0); -lean::inc(x_379); -x_380 = lean::cnstr_get(x_368, 1); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_368, 2); -lean::inc(x_381); -x_382 = lean::cnstr_get(x_368, 3); -lean::inc(x_382); -if (lean::is_exclusive(x_368)) { - lean::cnstr_release(x_368, 0); - lean::cnstr_release(x_368, 1); - lean::cnstr_release(x_368, 2); - lean::cnstr_release(x_368, 3); - x_383 = x_368; -} else { - lean::dec_ref(x_368); - x_383 = lean::box(0); -} -lean::inc(x_326); -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(1, 4, 1); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_315); -lean::cnstr_set(x_384, 1, x_316); -lean::cnstr_set(x_384, 2, x_317); -lean::cnstr_set(x_384, 3, x_326); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_385 = x_326; -} else { - lean::dec_ref(x_326); - x_385 = lean::box(0); -} -lean::cnstr_set_scalar(x_384, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_385)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_385; -} -lean::cnstr_set(x_386, 0, x_379); -lean::cnstr_set(x_386, 1, x_380); -lean::cnstr_set(x_386, 2, x_381); -lean::cnstr_set(x_386, 3, x_382); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_378)) { - x_387 = lean::alloc_cnstr(1, 4, 1); -} else { - x_387 = x_378; -} -lean::cnstr_set(x_387, 0, x_384); -lean::cnstr_set(x_387, 1, x_376); -lean::cnstr_set(x_387, 2, x_377); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_375); -return x_387; -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; uint8 x_397; obj* x_398; obj* x_399; -x_388 = lean::cnstr_get(x_325, 1); -lean::inc(x_388); -x_389 = lean::cnstr_get(x_325, 2); -lean::inc(x_389); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_390 = x_325; -} else { - lean::dec_ref(x_325); - x_390 = lean::box(0); -} -x_391 = lean::cnstr_get(x_326, 0); -lean::inc(x_391); -x_392 = lean::cnstr_get(x_326, 1); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_326, 2); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_326, 3); -lean::inc(x_394); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_395 = x_326; -} else { - lean::dec_ref(x_326); - x_395 = lean::box(0); -} -if (lean::is_scalar(x_395)) { - x_396 = lean::alloc_cnstr(1, 4, 1); -} else { - x_396 = x_395; -} -lean::cnstr_set(x_396, 0, x_391); -lean::cnstr_set(x_396, 1, x_392); -lean::cnstr_set(x_396, 2, x_393); -lean::cnstr_set(x_396, 3, x_394); -lean::cnstr_set_scalar(x_396, sizeof(void*)*4, x_375); -x_397 = 0; -if (lean::is_scalar(x_390)) { - x_398 = lean::alloc_cnstr(1, 4, 1); -} else { - x_398 = x_390; -} -lean::cnstr_set(x_398, 0, x_396); -lean::cnstr_set(x_398, 1, x_388); -lean::cnstr_set(x_398, 2, x_389); -lean::cnstr_set(x_398, 3, x_368); -lean::cnstr_set_scalar(x_398, sizeof(void*)*4, x_397); -x_399 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_399, 0, x_315); -lean::cnstr_set(x_399, 1, x_316); -lean::cnstr_set(x_399, 2, x_317); -lean::cnstr_set(x_399, 3, x_398); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_375); -return x_399; -} -} -} -} -} -} -} -} -else -{ -uint8 x_400; -x_400 = l_RBNode_isRed___main___rarg(x_315); -if (x_400 == 0) -{ -obj* x_401; obj* x_402; -x_401 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_315, x_2, x_3); -x_402 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_402, 0, x_401); -lean::cnstr_set(x_402, 1, x_316); -lean::cnstr_set(x_402, 2, x_317); -lean::cnstr_set(x_402, 3, x_318); -lean::cnstr_set_scalar(x_402, sizeof(void*)*4, x_6); -return x_402; -} -else -{ -obj* x_403; -x_403 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_315, x_2, x_3); -if (lean::obj_tag(x_403) == 0) -{ -lean::dec(x_318); -lean::dec(x_317); -lean::dec(x_316); -return x_403; -} -else -{ -obj* x_404; -x_404 = lean::cnstr_get(x_403, 0); -lean::inc(x_404); -if (lean::obj_tag(x_404) == 0) -{ -obj* x_405; -x_405 = lean::cnstr_get(x_403, 3); -lean::inc(x_405); -if (lean::obj_tag(x_405) == 0) -{ -obj* x_406; obj* x_407; obj* x_408; uint8 x_409; obj* x_410; uint8 x_411; obj* x_412; -x_406 = lean::cnstr_get(x_403, 1); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_403, 2); -lean::inc(x_407); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_408 = x_403; -} else { - lean::dec_ref(x_403); - x_408 = lean::box(0); -} -x_409 = 0; -if (lean::is_scalar(x_408)) { - x_410 = lean::alloc_cnstr(1, 4, 1); -} else { - x_410 = x_408; -} -lean::cnstr_set(x_410, 0, x_405); -lean::cnstr_set(x_410, 1, x_406); -lean::cnstr_set(x_410, 2, x_407); -lean::cnstr_set(x_410, 3, x_405); -lean::cnstr_set_scalar(x_410, sizeof(void*)*4, x_409); -x_411 = 1; -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_410); -lean::cnstr_set(x_412, 1, x_316); -lean::cnstr_set(x_412, 2, x_317); -lean::cnstr_set(x_412, 3, x_318); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_411); -return x_412; -} -else -{ -uint8 x_413; -x_413 = lean::cnstr_get_scalar(x_405, sizeof(void*)*4); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; obj* x_424; obj* x_425; -x_414 = lean::cnstr_get(x_403, 1); -lean::inc(x_414); -x_415 = lean::cnstr_get(x_403, 2); -lean::inc(x_415); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_416 = x_403; -} else { - lean::dec_ref(x_403); - x_416 = lean::box(0); -} -x_417 = lean::cnstr_get(x_405, 0); -lean::inc(x_417); -x_418 = lean::cnstr_get(x_405, 1); -lean::inc(x_418); -x_419 = lean::cnstr_get(x_405, 2); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_405, 3); -lean::inc(x_420); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - lean::cnstr_release(x_405, 2); - lean::cnstr_release(x_405, 3); - x_421 = x_405; -} else { - lean::dec_ref(x_405); - x_421 = lean::box(0); -} -x_422 = 1; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_404); -lean::cnstr_set(x_423, 1, x_414); -lean::cnstr_set(x_423, 2, x_415); -lean::cnstr_set(x_423, 3, x_417); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -if (lean::is_scalar(x_416)) { - x_424 = lean::alloc_cnstr(1, 4, 1); -} else { - x_424 = x_416; -} -lean::cnstr_set(x_424, 0, x_420); -lean::cnstr_set(x_424, 1, x_316); -lean::cnstr_set(x_424, 2, x_317); -lean::cnstr_set(x_424, 3, x_318); -lean::cnstr_set_scalar(x_424, sizeof(void*)*4, x_422); -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_418); -lean::cnstr_set(x_425, 2, x_419); -lean::cnstr_set(x_425, 3, x_424); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_413); -return x_425; -} -else -{ -obj* x_426; obj* x_427; obj* x_428; uint8 x_429; obj* x_430; obj* x_431; -x_426 = lean::cnstr_get(x_403, 1); -lean::inc(x_426); -x_427 = lean::cnstr_get(x_403, 2); -lean::inc(x_427); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_428 = x_403; -} else { - lean::dec_ref(x_403); - x_428 = lean::box(0); -} -x_429 = 0; -if (lean::is_scalar(x_428)) { - x_430 = lean::alloc_cnstr(1, 4, 1); -} else { - x_430 = x_428; -} -lean::cnstr_set(x_430, 0, x_404); -lean::cnstr_set(x_430, 1, x_426); -lean::cnstr_set(x_430, 2, x_427); -lean::cnstr_set(x_430, 3, x_405); -lean::cnstr_set_scalar(x_430, sizeof(void*)*4, x_429); -x_431 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_431, 0, x_430); -lean::cnstr_set(x_431, 1, x_316); -lean::cnstr_set(x_431, 2, x_317); -lean::cnstr_set(x_431, 3, x_318); -lean::cnstr_set_scalar(x_431, sizeof(void*)*4, x_413); -return x_431; -} -} -} -else -{ -uint8 x_432; -x_432 = lean::cnstr_get_scalar(x_404, sizeof(void*)*4); -if (x_432 == 0) -{ -obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; obj* x_445; -x_433 = lean::cnstr_get(x_403, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_403, 2); -lean::inc(x_434); -x_435 = lean::cnstr_get(x_403, 3); -lean::inc(x_435); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_436 = x_403; -} else { - lean::dec_ref(x_403); - x_436 = lean::box(0); -} -x_437 = lean::cnstr_get(x_404, 0); -lean::inc(x_437); -x_438 = lean::cnstr_get(x_404, 1); -lean::inc(x_438); -x_439 = lean::cnstr_get(x_404, 2); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_404, 3); -lean::inc(x_440); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_441 = x_404; -} else { - lean::dec_ref(x_404); - x_441 = lean::box(0); -} -x_442 = 1; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_437); -lean::cnstr_set(x_443, 1, x_438); -lean::cnstr_set(x_443, 2, x_439); -lean::cnstr_set(x_443, 3, x_440); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -if (lean::is_scalar(x_436)) { - x_444 = lean::alloc_cnstr(1, 4, 1); -} else { - x_444 = x_436; -} -lean::cnstr_set(x_444, 0, x_435); -lean::cnstr_set(x_444, 1, x_316); -lean::cnstr_set(x_444, 2, x_317); -lean::cnstr_set(x_444, 3, x_318); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_442); -x_445 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_445, 0, x_443); -lean::cnstr_set(x_445, 1, x_433); -lean::cnstr_set(x_445, 2, x_434); -lean::cnstr_set(x_445, 3, x_444); -lean::cnstr_set_scalar(x_445, sizeof(void*)*4, x_432); -return x_445; -} -else -{ -obj* x_446; -x_446 = lean::cnstr_get(x_403, 3); -lean::inc(x_446); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; uint8 x_450; obj* x_451; obj* x_452; -x_447 = lean::cnstr_get(x_403, 1); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_403, 2); -lean::inc(x_448); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_449 = x_403; -} else { - lean::dec_ref(x_403); - x_449 = lean::box(0); -} -x_450 = 0; -if (lean::is_scalar(x_449)) { - x_451 = lean::alloc_cnstr(1, 4, 1); -} else { - x_451 = x_449; -} -lean::cnstr_set(x_451, 0, x_404); -lean::cnstr_set(x_451, 1, x_447); -lean::cnstr_set(x_451, 2, x_448); -lean::cnstr_set(x_451, 3, x_446); -lean::cnstr_set_scalar(x_451, sizeof(void*)*4, x_450); -x_452 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_452, 0, x_451); -lean::cnstr_set(x_452, 1, x_316); -lean::cnstr_set(x_452, 2, x_317); -lean::cnstr_set(x_452, 3, x_318); -lean::cnstr_set_scalar(x_452, sizeof(void*)*4, x_432); -return x_452; -} -else -{ -uint8 x_453; -x_453 = lean::cnstr_get_scalar(x_446, sizeof(void*)*4); -if (x_453 == 0) -{ -obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; obj* x_465; -x_454 = lean::cnstr_get(x_403, 1); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_403, 2); -lean::inc(x_455); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_456 = x_403; -} else { - lean::dec_ref(x_403); - x_456 = lean::box(0); -} -x_457 = lean::cnstr_get(x_446, 0); -lean::inc(x_457); -x_458 = lean::cnstr_get(x_446, 1); -lean::inc(x_458); -x_459 = lean::cnstr_get(x_446, 2); -lean::inc(x_459); -x_460 = lean::cnstr_get(x_446, 3); -lean::inc(x_460); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - lean::cnstr_release(x_446, 1); - lean::cnstr_release(x_446, 2); - lean::cnstr_release(x_446, 3); - x_461 = x_446; -} else { - lean::dec_ref(x_446); - x_461 = lean::box(0); -} -lean::inc(x_404); -if (lean::is_scalar(x_461)) { - x_462 = lean::alloc_cnstr(1, 4, 1); -} else { - x_462 = x_461; -} -lean::cnstr_set(x_462, 0, x_404); -lean::cnstr_set(x_462, 1, x_454); -lean::cnstr_set(x_462, 2, x_455); -lean::cnstr_set(x_462, 3, x_457); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_463 = x_404; -} else { - lean::dec_ref(x_404); - x_463 = lean::box(0); -} -lean::cnstr_set_scalar(x_462, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_463)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_463; -} -lean::cnstr_set(x_464, 0, x_460); -lean::cnstr_set(x_464, 1, x_316); -lean::cnstr_set(x_464, 2, x_317); -lean::cnstr_set(x_464, 3, x_318); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_456)) { - x_465 = lean::alloc_cnstr(1, 4, 1); -} else { - x_465 = x_456; -} -lean::cnstr_set(x_465, 0, x_462); -lean::cnstr_set(x_465, 1, x_458); -lean::cnstr_set(x_465, 2, x_459); -lean::cnstr_set(x_465, 3, x_464); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_453); -return x_465; -} -else -{ -obj* x_466; obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; uint8 x_475; obj* x_476; obj* x_477; -x_466 = lean::cnstr_get(x_403, 1); -lean::inc(x_466); -x_467 = lean::cnstr_get(x_403, 2); -lean::inc(x_467); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_468 = x_403; -} else { - lean::dec_ref(x_403); - x_468 = lean::box(0); -} -x_469 = lean::cnstr_get(x_404, 0); -lean::inc(x_469); -x_470 = lean::cnstr_get(x_404, 1); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_404, 2); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_404, 3); -lean::inc(x_472); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_473 = x_404; -} else { - lean::dec_ref(x_404); - x_473 = lean::box(0); -} -if (lean::is_scalar(x_473)) { - x_474 = lean::alloc_cnstr(1, 4, 1); -} else { - x_474 = x_473; -} -lean::cnstr_set(x_474, 0, x_469); -lean::cnstr_set(x_474, 1, x_470); -lean::cnstr_set(x_474, 2, x_471); -lean::cnstr_set(x_474, 3, x_472); -lean::cnstr_set_scalar(x_474, sizeof(void*)*4, x_453); -x_475 = 0; -if (lean::is_scalar(x_468)) { - x_476 = lean::alloc_cnstr(1, 4, 1); -} else { - x_476 = x_468; -} -lean::cnstr_set(x_476, 0, x_474); -lean::cnstr_set(x_476, 1, x_466); -lean::cnstr_set(x_476, 2, x_467); -lean::cnstr_set(x_476, 3, x_446); -lean::cnstr_set_scalar(x_476, sizeof(void*)*4, x_475); -x_477 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_477, 0, x_476); -lean::cnstr_set(x_477, 1, x_316); -lean::cnstr_set(x_477, 2, x_317); -lean::cnstr_set(x_477, 3, x_318); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_453); -return x_477; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg), 3, 0); -return x_2; -} -} -obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_RBNode_isRed___main___rarg(x_1); -if (x_4 == 0) -{ -obj* x_5; -x_5 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3___rarg(x_1, x_2, x_3); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__4___rarg(x_1, x_2, x_3); -x_7 = l_RBNode_setBlack___main___rarg(x_6); -return x_7; -} -} -} -obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__2___rarg), 3, 0); -return x_2; -} -} -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; -x_4 = 0; -x_5 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 3, x_1); -lean::cnstr_set_scalar(x_5, sizeof(void*)*4, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_6 == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -x_10 = lean::cnstr_get(x_1, 2); -x_11 = lean::cnstr_get(x_1, 3); -x_12 = l_Lean_Name_quickLt(x_2, x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = l_Lean_Name_quickLt(x_9, x_2); -if (x_13 == 0) -{ -lean::dec(x_10); -lean::dec(x_9); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -obj* x_14; -x_14 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_11, x_2, x_3); -lean::cnstr_set(x_1, 3, x_14); -return x_1; -} -} -else -{ -obj* x_15; -x_15 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_8, x_2, x_3); -lean::cnstr_set(x_1, 0, x_15); -return x_1; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = lean::cnstr_get(x_1, 1); -x_18 = lean::cnstr_get(x_1, 2); -x_19 = lean::cnstr_get(x_1, 3); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_1); -x_20 = l_Lean_Name_quickLt(x_2, x_17); -if (x_20 == 0) -{ -uint8 x_21; -x_21 = l_Lean_Name_quickLt(x_17, x_2); -if (x_21 == 0) -{ -obj* x_22; -lean::dec(x_18); -lean::dec(x_17); -x_22 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_22, 0, x_16); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_3); -lean::cnstr_set(x_22, 3, x_19); -lean::cnstr_set_scalar(x_22, sizeof(void*)*4, x_6); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_19, x_2, x_3); -x_24 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_24, 0, x_16); -lean::cnstr_set(x_24, 1, x_17); -lean::cnstr_set(x_24, 2, x_18); -lean::cnstr_set(x_24, 3, x_23); -lean::cnstr_set_scalar(x_24, sizeof(void*)*4, x_6); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_16, x_2, x_3); -x_26 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_18); -lean::cnstr_set(x_26, 3, x_19); -lean::cnstr_set_scalar(x_26, sizeof(void*)*4, x_6); -return x_26; -} -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_28 = lean::cnstr_get(x_1, 0); -x_29 = lean::cnstr_get(x_1, 1); -x_30 = lean::cnstr_get(x_1, 2); -x_31 = lean::cnstr_get(x_1, 3); -x_32 = l_Lean_Name_quickLt(x_2, x_29); -if (x_32 == 0) -{ -uint8 x_33; -x_33 = l_Lean_Name_quickLt(x_29, x_2); -if (x_33 == 0) -{ -lean::dec(x_30); -lean::dec(x_29); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -uint8 x_34; -x_34 = l_RBNode_isRed___main___rarg(x_31); -if (x_34 == 0) -{ -obj* x_35; -x_35 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_31, x_2, x_3); -lean::cnstr_set(x_1, 3, x_35); -return x_1; -} -else -{ -obj* x_36; -x_36 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_31, x_2, x_3); -if (lean::obj_tag(x_36) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_28); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = lean::cnstr_get(x_36, 3); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; uint8 x_43; -x_40 = lean::cnstr_get(x_36, 3); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_36, 0); -lean::dec(x_41); -x_42 = 0; -lean::cnstr_set(x_36, 0, x_38); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_42); -x_43 = 1; -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_43); -return x_1; -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; uint8 x_48; -x_44 = lean::cnstr_get(x_36, 1); -x_45 = lean::cnstr_get(x_36, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_36); -x_46 = 0; -x_47 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_47, 0, x_38); -lean::cnstr_set(x_47, 1, x_44); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_38); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_46); -x_48 = 1; -lean::cnstr_set(x_1, 3, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_48); -return x_1; -} -} -else -{ -uint8 x_49; -x_49 = lean::cnstr_get_scalar(x_38, sizeof(void*)*4); -if (x_49 == 0) -{ -uint8 x_50; -x_50 = !lean::is_exclusive(x_36); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; uint8 x_55; -x_51 = lean::cnstr_get(x_36, 1); -x_52 = lean::cnstr_get(x_36, 2); -x_53 = lean::cnstr_get(x_36, 3); -lean::dec(x_53); -x_54 = lean::cnstr_get(x_36, 0); -lean::dec(x_54); -x_55 = !lean::is_exclusive(x_38); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_56 = lean::cnstr_get(x_38, 0); -x_57 = lean::cnstr_get(x_38, 1); -x_58 = lean::cnstr_get(x_38, 2); -x_59 = lean::cnstr_get(x_38, 3); -x_60 = 1; -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 2, x_30); -lean::cnstr_set(x_38, 1, x_29); -lean::cnstr_set(x_38, 0, x_28); -lean::cnstr_set_scalar(x_38, sizeof(void*)*4, x_60); -lean::cnstr_set(x_36, 3, x_59); -lean::cnstr_set(x_36, 2, x_58); -lean::cnstr_set(x_36, 1, x_57); -lean::cnstr_set(x_36, 0, x_56); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_60); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_38); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; obj* x_66; -x_61 = lean::cnstr_get(x_38, 0); -x_62 = lean::cnstr_get(x_38, 1); -x_63 = lean::cnstr_get(x_38, 2); -x_64 = lean::cnstr_get(x_38, 3); -lean::inc(x_64); -lean::inc(x_63); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_38); -x_65 = 1; -x_66 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_66, 0, x_28); -lean::cnstr_set(x_66, 1, x_29); -lean::cnstr_set(x_66, 2, x_30); -lean::cnstr_set(x_66, 3, x_37); -lean::cnstr_set_scalar(x_66, sizeof(void*)*4, x_65); -lean::cnstr_set(x_36, 3, x_64); -lean::cnstr_set(x_36, 2, x_63); -lean::cnstr_set(x_36, 1, x_62); -lean::cnstr_set(x_36, 0, x_61); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_65); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_66); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; -x_67 = lean::cnstr_get(x_36, 1); -x_68 = lean::cnstr_get(x_36, 2); -lean::inc(x_68); -lean::inc(x_67); -lean::dec(x_36); -x_69 = lean::cnstr_get(x_38, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_38, 1); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_38, 2); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_38, 3); -lean::inc(x_72); -if (lean::is_exclusive(x_38)) { - lean::cnstr_release(x_38, 0); - lean::cnstr_release(x_38, 1); - lean::cnstr_release(x_38, 2); - lean::cnstr_release(x_38, 3); - x_73 = x_38; -} else { - lean::dec_ref(x_38); - x_73 = lean::box(0); -} -x_74 = 1; -if (lean::is_scalar(x_73)) { - x_75 = lean::alloc_cnstr(1, 4, 1); -} else { - x_75 = x_73; -} -lean::cnstr_set(x_75, 0, x_28); -lean::cnstr_set(x_75, 1, x_29); -lean::cnstr_set(x_75, 2, x_30); -lean::cnstr_set(x_75, 3, x_37); -lean::cnstr_set_scalar(x_75, sizeof(void*)*4, x_74); -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_69); -lean::cnstr_set(x_76, 1, x_70); -lean::cnstr_set(x_76, 2, x_71); -lean::cnstr_set(x_76, 3, x_72); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_74); -lean::cnstr_set(x_1, 3, x_76); -lean::cnstr_set(x_1, 2, x_68); -lean::cnstr_set(x_1, 1, x_67); -lean::cnstr_set(x_1, 0, x_75); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -uint8 x_77; -x_77 = !lean::is_exclusive(x_36); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; uint8 x_80; -x_78 = lean::cnstr_get(x_36, 3); -lean::dec(x_78); -x_79 = lean::cnstr_get(x_36, 0); -lean::dec(x_79); -x_80 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_80); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_81; obj* x_82; uint8 x_83; obj* x_84; -x_81 = lean::cnstr_get(x_36, 1); -x_82 = lean::cnstr_get(x_36, 2); -lean::inc(x_82); -lean::inc(x_81); -lean::dec(x_36); -x_83 = 0; -x_84 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_84, 0, x_37); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_82); -lean::cnstr_set(x_84, 3, x_38); -lean::cnstr_set_scalar(x_84, sizeof(void*)*4, x_83); -lean::cnstr_set(x_1, 3, x_84); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -} -} -else -{ -uint8 x_85; -x_85 = lean::cnstr_get_scalar(x_37, sizeof(void*)*4); -if (x_85 == 0) -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_36); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_36, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_37); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint8 x_93; -x_89 = lean::cnstr_get(x_37, 0); -x_90 = lean::cnstr_get(x_37, 1); -x_91 = lean::cnstr_get(x_37, 2); -x_92 = lean::cnstr_get(x_37, 3); -x_93 = 1; -lean::cnstr_set(x_37, 3, x_89); -lean::cnstr_set(x_37, 2, x_30); -lean::cnstr_set(x_37, 1, x_29); -lean::cnstr_set(x_37, 0, x_28); -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_93); -lean::cnstr_set(x_36, 0, x_92); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_91); -lean::cnstr_set(x_1, 1, x_90); -lean::cnstr_set(x_1, 0, x_37); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; uint8 x_98; obj* x_99; -x_94 = lean::cnstr_get(x_37, 0); -x_95 = lean::cnstr_get(x_37, 1); -x_96 = lean::cnstr_get(x_37, 2); -x_97 = lean::cnstr_get(x_37, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_37); -x_98 = 1; -x_99 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_29); -lean::cnstr_set(x_99, 2, x_30); -lean::cnstr_set(x_99, 3, x_94); -lean::cnstr_set_scalar(x_99, sizeof(void*)*4, x_98); -lean::cnstr_set(x_36, 0, x_97); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_98); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_96); -lean::cnstr_set(x_1, 1, x_95); -lean::cnstr_set(x_1, 0, x_99); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; obj* x_110; -x_100 = lean::cnstr_get(x_36, 1); -x_101 = lean::cnstr_get(x_36, 2); -x_102 = lean::cnstr_get(x_36, 3); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_36); -x_103 = lean::cnstr_get(x_37, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_37, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_37, 2); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_37, 3); -lean::inc(x_106); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_107 = x_37; -} else { - lean::dec_ref(x_37); - x_107 = lean::box(0); -} -x_108 = 1; -if (lean::is_scalar(x_107)) { - x_109 = lean::alloc_cnstr(1, 4, 1); -} else { - x_109 = x_107; -} -lean::cnstr_set(x_109, 0, x_28); -lean::cnstr_set(x_109, 1, x_29); -lean::cnstr_set(x_109, 2, x_30); -lean::cnstr_set(x_109, 3, x_103); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -x_110 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_110, 0, x_106); -lean::cnstr_set(x_110, 1, x_100); -lean::cnstr_set(x_110, 2, x_101); -lean::cnstr_set(x_110, 3, x_102); -lean::cnstr_set_scalar(x_110, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_110); -lean::cnstr_set(x_1, 2, x_105); -lean::cnstr_set(x_1, 1, x_104); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_111; -x_111 = lean::cnstr_get(x_36, 3); -lean::inc(x_111); -if (lean::obj_tag(x_111) == 0) -{ -uint8 x_112; -x_112 = !lean::is_exclusive(x_36); -if (x_112 == 0) -{ -obj* x_113; obj* x_114; uint8 x_115; -x_113 = lean::cnstr_get(x_36, 3); -lean::dec(x_113); -x_114 = lean::cnstr_get(x_36, 0); -lean::dec(x_114); -x_115 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_115); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; -x_116 = lean::cnstr_get(x_36, 1); -x_117 = lean::cnstr_get(x_36, 2); -lean::inc(x_117); -lean::inc(x_116); -lean::dec(x_36); -x_118 = 0; -x_119 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_119, 0, x_37); -lean::cnstr_set(x_119, 1, x_116); -lean::cnstr_set(x_119, 2, x_117); -lean::cnstr_set(x_119, 3, x_111); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -uint8 x_120; -x_120 = lean::cnstr_get_scalar(x_111, sizeof(void*)*4); -if (x_120 == 0) -{ -uint8 x_121; -lean::free_heap_obj(x_1); -x_121 = !lean::is_exclusive(x_36); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; uint8 x_124; -x_122 = lean::cnstr_get(x_36, 3); -lean::dec(x_122); -x_123 = lean::cnstr_get(x_36, 0); -lean::dec(x_123); -x_124 = !lean::is_exclusive(x_111); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; uint8 x_129; -x_125 = lean::cnstr_get(x_111, 0); -x_126 = lean::cnstr_get(x_111, 1); -x_127 = lean::cnstr_get(x_111, 2); -x_128 = lean::cnstr_get(x_111, 3); -lean::inc(x_37); -lean::cnstr_set(x_111, 3, x_37); -lean::cnstr_set(x_111, 2, x_30); -lean::cnstr_set(x_111, 1, x_29); -lean::cnstr_set(x_111, 0, x_28); -x_129 = !lean::is_exclusive(x_37); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_130 = lean::cnstr_get(x_37, 3); -lean::dec(x_130); -x_131 = lean::cnstr_get(x_37, 2); -lean::dec(x_131); -x_132 = lean::cnstr_get(x_37, 1); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_37, 0); -lean::dec(x_133); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -lean::cnstr_set(x_37, 3, x_128); -lean::cnstr_set(x_37, 2, x_127); -lean::cnstr_set(x_37, 1, x_126); -lean::cnstr_set(x_37, 0, x_125); -lean::cnstr_set(x_36, 3, x_37); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -else -{ -obj* x_134; -lean::dec(x_37); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -x_134 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_134, 0, x_125); -lean::cnstr_set(x_134, 1, x_126); -lean::cnstr_set(x_134, 2, x_127); -lean::cnstr_set(x_134, 3, x_128); -lean::cnstr_set_scalar(x_134, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_134); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_135 = lean::cnstr_get(x_111, 0); -x_136 = lean::cnstr_get(x_111, 1); -x_137 = lean::cnstr_get(x_111, 2); -x_138 = lean::cnstr_get(x_111, 3); -lean::inc(x_138); -lean::inc(x_137); -lean::inc(x_136); -lean::inc(x_135); -lean::dec(x_111); -lean::inc(x_37); -x_139 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_139, 0, x_28); -lean::cnstr_set(x_139, 1, x_29); -lean::cnstr_set(x_139, 2, x_30); -lean::cnstr_set(x_139, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_140 = x_37; -} else { - lean::dec_ref(x_37); - x_140 = lean::box(0); -} -lean::cnstr_set_scalar(x_139, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(1, 4, 1); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_135); -lean::cnstr_set(x_141, 1, x_136); -lean::cnstr_set(x_141, 2, x_137); -lean::cnstr_set(x_141, 3, x_138); -lean::cnstr_set_scalar(x_141, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_141); -lean::cnstr_set(x_36, 0, x_139); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_142 = lean::cnstr_get(x_36, 1); -x_143 = lean::cnstr_get(x_36, 2); -lean::inc(x_143); -lean::inc(x_142); -lean::dec(x_36); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_111, 1); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_111, 2); -lean::inc(x_146); -x_147 = lean::cnstr_get(x_111, 3); -lean::inc(x_147); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - lean::cnstr_release(x_111, 2); - lean::cnstr_release(x_111, 3); - x_148 = x_111; -} else { - lean::dec_ref(x_111); - x_148 = lean::box(0); -} -lean::inc(x_37); -if (lean::is_scalar(x_148)) { - x_149 = lean::alloc_cnstr(1, 4, 1); -} else { - x_149 = x_148; -} -lean::cnstr_set(x_149, 0, x_28); -lean::cnstr_set(x_149, 1, x_29); -lean::cnstr_set(x_149, 2, x_30); -lean::cnstr_set(x_149, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_150 = x_37; -} else { - lean::dec_ref(x_37); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_144); -lean::cnstr_set(x_151, 1, x_145); -lean::cnstr_set(x_151, 2, x_146); -lean::cnstr_set(x_151, 3, x_147); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_85); -x_152 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_152, 0, x_149); -lean::cnstr_set(x_152, 1, x_142); -lean::cnstr_set(x_152, 2, x_143); -lean::cnstr_set(x_152, 3, x_151); -lean::cnstr_set_scalar(x_152, sizeof(void*)*4, x_120); -return x_152; -} -} -else -{ -uint8 x_153; -x_153 = !lean::is_exclusive(x_36); -if (x_153 == 0) -{ -obj* x_154; obj* x_155; uint8 x_156; -x_154 = lean::cnstr_get(x_36, 3); -lean::dec(x_154); -x_155 = lean::cnstr_get(x_36, 0); -lean::dec(x_155); -x_156 = !lean::is_exclusive(x_37); -if (x_156 == 0) -{ -uint8 x_157; -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_120); -x_157 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_157); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -else -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; uint8 x_163; -x_158 = lean::cnstr_get(x_37, 0); -x_159 = lean::cnstr_get(x_37, 1); -x_160 = lean::cnstr_get(x_37, 2); -x_161 = lean::cnstr_get(x_37, 3); -lean::inc(x_161); -lean::inc(x_160); -lean::inc(x_159); -lean::inc(x_158); -lean::dec(x_37); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_158); -lean::cnstr_set(x_162, 1, x_159); -lean::cnstr_set(x_162, 2, x_160); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_120); -x_163 = 0; -lean::cnstr_set(x_36, 0, x_162); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_163); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; uint8 x_172; obj* x_173; -x_164 = lean::cnstr_get(x_36, 1); -x_165 = lean::cnstr_get(x_36, 2); -lean::inc(x_165); -lean::inc(x_164); -lean::dec(x_36); -x_166 = lean::cnstr_get(x_37, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_37, 1); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_37, 2); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_37, 3); -lean::inc(x_169); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_170 = x_37; -} else { - lean::dec_ref(x_37); - x_170 = lean::box(0); -} -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(1, 4, 1); -} else { - x_171 = x_170; -} -lean::cnstr_set(x_171, 0, x_166); -lean::cnstr_set(x_171, 1, x_167); -lean::cnstr_set(x_171, 2, x_168); -lean::cnstr_set(x_171, 3, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*4, x_120); -x_172 = 0; -x_173 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_173, 0, x_171); -lean::cnstr_set(x_173, 1, x_164); -lean::cnstr_set(x_173, 2, x_165); -lean::cnstr_set(x_173, 3, x_111); -lean::cnstr_set_scalar(x_173, sizeof(void*)*4, x_172); -lean::cnstr_set(x_1, 3, x_173); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_174; -x_174 = l_RBNode_isRed___main___rarg(x_28); -if (x_174 == 0) -{ -obj* x_175; -x_175 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_28, x_2, x_3); -lean::cnstr_set(x_1, 0, x_175); -return x_1; -} -else -{ -obj* x_176; -x_176 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_28, x_2, x_3); -if (lean::obj_tag(x_176) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_31); -lean::dec(x_30); -lean::dec(x_29); -return x_176; -} -else -{ -obj* x_177; -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -if (lean::obj_tag(x_177) == 0) -{ -obj* x_178; -x_178 = lean::cnstr_get(x_176, 3); -lean::inc(x_178); -if (lean::obj_tag(x_178) == 0) -{ -uint8 x_179; -x_179 = !lean::is_exclusive(x_176); -if (x_179 == 0) -{ -obj* x_180; obj* x_181; uint8 x_182; uint8 x_183; -x_180 = lean::cnstr_get(x_176, 3); -lean::dec(x_180); -x_181 = lean::cnstr_get(x_176, 0); -lean::dec(x_181); -x_182 = 0; -lean::cnstr_set(x_176, 0, x_178); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_182); -x_183 = 1; -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_183); -return x_1; -} -else -{ -obj* x_184; obj* x_185; uint8 x_186; obj* x_187; uint8 x_188; -x_184 = lean::cnstr_get(x_176, 1); -x_185 = lean::cnstr_get(x_176, 2); -lean::inc(x_185); -lean::inc(x_184); -lean::dec(x_176); -x_186 = 0; -x_187 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_187, 0, x_178); -lean::cnstr_set(x_187, 1, x_184); -lean::cnstr_set(x_187, 2, x_185); -lean::cnstr_set(x_187, 3, x_178); -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_186); -x_188 = 1; -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_188); -return x_1; -} -} -else -{ -uint8 x_189; -x_189 = lean::cnstr_get_scalar(x_178, sizeof(void*)*4); -if (x_189 == 0) -{ -uint8 x_190; -x_190 = !lean::is_exclusive(x_176); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; uint8 x_195; -x_191 = lean::cnstr_get(x_176, 1); -x_192 = lean::cnstr_get(x_176, 2); -x_193 = lean::cnstr_get(x_176, 3); -lean::dec(x_193); -x_194 = lean::cnstr_get(x_176, 0); -lean::dec(x_194); -x_195 = !lean::is_exclusive(x_178); -if (x_195 == 0) -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; uint8 x_200; -x_196 = lean::cnstr_get(x_178, 0); -x_197 = lean::cnstr_get(x_178, 1); -x_198 = lean::cnstr_get(x_178, 2); -x_199 = lean::cnstr_get(x_178, 3); -x_200 = 1; -lean::cnstr_set(x_178, 3, x_196); -lean::cnstr_set(x_178, 2, x_192); -lean::cnstr_set(x_178, 1, x_191); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set_scalar(x_178, sizeof(void*)*4, x_200); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_199); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_200); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_198); -lean::cnstr_set(x_1, 1, x_197); -lean::cnstr_set(x_1, 0, x_178); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; obj* x_206; -x_201 = lean::cnstr_get(x_178, 0); -x_202 = lean::cnstr_get(x_178, 1); -x_203 = lean::cnstr_get(x_178, 2); -x_204 = lean::cnstr_get(x_178, 3); -lean::inc(x_204); -lean::inc(x_203); -lean::inc(x_202); -lean::inc(x_201); -lean::dec(x_178); -x_205 = 1; -x_206 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_206, 0, x_177); -lean::cnstr_set(x_206, 1, x_191); -lean::cnstr_set(x_206, 2, x_192); -lean::cnstr_set(x_206, 3, x_201); -lean::cnstr_set_scalar(x_206, sizeof(void*)*4, x_205); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_204); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_205); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_203); -lean::cnstr_set(x_1, 1, x_202); -lean::cnstr_set(x_1, 0, x_206); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; -x_207 = lean::cnstr_get(x_176, 1); -x_208 = lean::cnstr_get(x_176, 2); -lean::inc(x_208); -lean::inc(x_207); -lean::dec(x_176); -x_209 = lean::cnstr_get(x_178, 0); -lean::inc(x_209); -x_210 = lean::cnstr_get(x_178, 1); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_178, 2); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_178, 3); -lean::inc(x_212); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - lean::cnstr_release(x_178, 2); - lean::cnstr_release(x_178, 3); - x_213 = x_178; -} else { - lean::dec_ref(x_178); - x_213 = lean::box(0); -} -x_214 = 1; -if (lean::is_scalar(x_213)) { - x_215 = lean::alloc_cnstr(1, 4, 1); -} else { - x_215 = x_213; -} -lean::cnstr_set(x_215, 0, x_177); -lean::cnstr_set(x_215, 1, x_207); -lean::cnstr_set(x_215, 2, x_208); -lean::cnstr_set(x_215, 3, x_209); -lean::cnstr_set_scalar(x_215, sizeof(void*)*4, x_214); -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_212); -lean::cnstr_set(x_216, 1, x_29); -lean::cnstr_set(x_216, 2, x_30); -lean::cnstr_set(x_216, 3, x_31); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_214); -lean::cnstr_set(x_1, 3, x_216); -lean::cnstr_set(x_1, 2, x_211); -lean::cnstr_set(x_1, 1, x_210); -lean::cnstr_set(x_1, 0, x_215); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -uint8 x_217; -x_217 = !lean::is_exclusive(x_176); -if (x_217 == 0) -{ -obj* x_218; obj* x_219; uint8 x_220; -x_218 = lean::cnstr_get(x_176, 3); -lean::dec(x_218); -x_219 = lean::cnstr_get(x_176, 0); -lean::dec(x_219); -x_220 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_220); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_221; obj* x_222; uint8 x_223; obj* x_224; -x_221 = lean::cnstr_get(x_176, 1); -x_222 = lean::cnstr_get(x_176, 2); -lean::inc(x_222); -lean::inc(x_221); -lean::dec(x_176); -x_223 = 0; -x_224 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_224, 0, x_177); -lean::cnstr_set(x_224, 1, x_221); -lean::cnstr_set(x_224, 2, x_222); -lean::cnstr_set(x_224, 3, x_178); -lean::cnstr_set_scalar(x_224, sizeof(void*)*4, x_223); -lean::cnstr_set(x_1, 0, x_224); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -} -} -else -{ -uint8 x_225; -x_225 = lean::cnstr_get_scalar(x_177, sizeof(void*)*4); -if (x_225 == 0) -{ -uint8 x_226; -x_226 = !lean::is_exclusive(x_176); -if (x_226 == 0) -{ -obj* x_227; obj* x_228; obj* x_229; obj* x_230; uint8 x_231; -x_227 = lean::cnstr_get(x_176, 1); -x_228 = lean::cnstr_get(x_176, 2); -x_229 = lean::cnstr_get(x_176, 3); -x_230 = lean::cnstr_get(x_176, 0); -lean::dec(x_230); -x_231 = !lean::is_exclusive(x_177); -if (x_231 == 0) -{ -uint8 x_232; -x_232 = 1; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_232); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_232); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_177); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; uint8 x_237; obj* x_238; -x_233 = lean::cnstr_get(x_177, 0); -x_234 = lean::cnstr_get(x_177, 1); -x_235 = lean::cnstr_get(x_177, 2); -x_236 = lean::cnstr_get(x_177, 3); -lean::inc(x_236); -lean::inc(x_235); -lean::inc(x_234); -lean::inc(x_233); -lean::dec(x_177); -x_237 = 1; -x_238 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_238, 0, x_233); -lean::cnstr_set(x_238, 1, x_234); -lean::cnstr_set(x_238, 2, x_235); -lean::cnstr_set(x_238, 3, x_236); -lean::cnstr_set_scalar(x_238, sizeof(void*)*4, x_237); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_237); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_238); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; obj* x_249; -x_239 = lean::cnstr_get(x_176, 1); -x_240 = lean::cnstr_get(x_176, 2); -x_241 = lean::cnstr_get(x_176, 3); -lean::inc(x_241); -lean::inc(x_240); -lean::inc(x_239); -lean::dec(x_176); -x_242 = lean::cnstr_get(x_177, 0); -lean::inc(x_242); -x_243 = lean::cnstr_get(x_177, 1); -lean::inc(x_243); -x_244 = lean::cnstr_get(x_177, 2); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_177, 3); -lean::inc(x_245); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_246 = x_177; -} else { - lean::dec_ref(x_177); - x_246 = lean::box(0); -} -x_247 = 1; -if (lean::is_scalar(x_246)) { - x_248 = lean::alloc_cnstr(1, 4, 1); -} else { - x_248 = x_246; -} -lean::cnstr_set(x_248, 0, x_242); -lean::cnstr_set(x_248, 1, x_243); -lean::cnstr_set(x_248, 2, x_244); -lean::cnstr_set(x_248, 3, x_245); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -x_249 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_249, 0, x_241); -lean::cnstr_set(x_249, 1, x_29); -lean::cnstr_set(x_249, 2, x_30); -lean::cnstr_set(x_249, 3, x_31); -lean::cnstr_set_scalar(x_249, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_249); -lean::cnstr_set(x_1, 2, x_240); -lean::cnstr_set(x_1, 1, x_239); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_250; -x_250 = lean::cnstr_get(x_176, 3); -lean::inc(x_250); -if (lean::obj_tag(x_250) == 0) -{ -uint8 x_251; -x_251 = !lean::is_exclusive(x_176); -if (x_251 == 0) -{ -obj* x_252; obj* x_253; uint8 x_254; -x_252 = lean::cnstr_get(x_176, 3); -lean::dec(x_252); -x_253 = lean::cnstr_get(x_176, 0); -lean::dec(x_253); -x_254 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_254); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_255; obj* x_256; uint8 x_257; obj* x_258; -x_255 = lean::cnstr_get(x_176, 1); -x_256 = lean::cnstr_get(x_176, 2); -lean::inc(x_256); -lean::inc(x_255); -lean::dec(x_176); -x_257 = 0; -x_258 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_258, 0, x_177); -lean::cnstr_set(x_258, 1, x_255); -lean::cnstr_set(x_258, 2, x_256); -lean::cnstr_set(x_258, 3, x_250); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -uint8 x_259; -x_259 = lean::cnstr_get_scalar(x_250, sizeof(void*)*4); -if (x_259 == 0) -{ -uint8 x_260; -lean::free_heap_obj(x_1); -x_260 = !lean::is_exclusive(x_176); -if (x_260 == 0) -{ -obj* x_261; obj* x_262; obj* x_263; obj* x_264; uint8 x_265; -x_261 = lean::cnstr_get(x_176, 1); -x_262 = lean::cnstr_get(x_176, 2); -x_263 = lean::cnstr_get(x_176, 3); -lean::dec(x_263); -x_264 = lean::cnstr_get(x_176, 0); -lean::dec(x_264); -x_265 = !lean::is_exclusive(x_250); -if (x_265 == 0) -{ -obj* x_266; obj* x_267; obj* x_268; obj* x_269; uint8 x_270; -x_266 = lean::cnstr_get(x_250, 0); -x_267 = lean::cnstr_get(x_250, 1); -x_268 = lean::cnstr_get(x_250, 2); -x_269 = lean::cnstr_get(x_250, 3); -lean::inc(x_177); -lean::cnstr_set(x_250, 3, x_266); -lean::cnstr_set(x_250, 2, x_262); -lean::cnstr_set(x_250, 1, x_261); -lean::cnstr_set(x_250, 0, x_177); -x_270 = !lean::is_exclusive(x_177); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; -x_271 = lean::cnstr_get(x_177, 3); -lean::dec(x_271); -x_272 = lean::cnstr_get(x_177, 2); -lean::dec(x_272); -x_273 = lean::cnstr_get(x_177, 1); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_177, 0); -lean::dec(x_274); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -lean::cnstr_set(x_177, 3, x_31); -lean::cnstr_set(x_177, 2, x_30); -lean::cnstr_set(x_177, 1, x_29); -lean::cnstr_set(x_177, 0, x_269); -lean::cnstr_set(x_176, 3, x_177); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -else -{ -obj* x_275; -lean::dec(x_177); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -x_275 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_275, 0, x_269); -lean::cnstr_set(x_275, 1, x_29); -lean::cnstr_set(x_275, 2, x_30); -lean::cnstr_set(x_275, 3, x_31); -lean::cnstr_set_scalar(x_275, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_275); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -x_276 = lean::cnstr_get(x_250, 0); -x_277 = lean::cnstr_get(x_250, 1); -x_278 = lean::cnstr_get(x_250, 2); -x_279 = lean::cnstr_get(x_250, 3); -lean::inc(x_279); -lean::inc(x_278); -lean::inc(x_277); -lean::inc(x_276); -lean::dec(x_250); -lean::inc(x_177); -x_280 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_280, 0, x_177); -lean::cnstr_set(x_280, 1, x_261); -lean::cnstr_set(x_280, 2, x_262); -lean::cnstr_set(x_280, 3, x_276); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_281 = x_177; -} else { - lean::dec_ref(x_177); - x_281 = lean::box(0); -} -lean::cnstr_set_scalar(x_280, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_281)) { - x_282 = lean::alloc_cnstr(1, 4, 1); -} else { - x_282 = x_281; -} -lean::cnstr_set(x_282, 0, x_279); -lean::cnstr_set(x_282, 1, x_29); -lean::cnstr_set(x_282, 2, x_30); -lean::cnstr_set(x_282, 3, x_31); -lean::cnstr_set_scalar(x_282, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_282); -lean::cnstr_set(x_176, 2, x_278); -lean::cnstr_set(x_176, 1, x_277); -lean::cnstr_set(x_176, 0, x_280); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_283 = lean::cnstr_get(x_176, 1); -x_284 = lean::cnstr_get(x_176, 2); -lean::inc(x_284); -lean::inc(x_283); -lean::dec(x_176); -x_285 = lean::cnstr_get(x_250, 0); -lean::inc(x_285); -x_286 = lean::cnstr_get(x_250, 1); -lean::inc(x_286); -x_287 = lean::cnstr_get(x_250, 2); -lean::inc(x_287); -x_288 = lean::cnstr_get(x_250, 3); -lean::inc(x_288); -if (lean::is_exclusive(x_250)) { - lean::cnstr_release(x_250, 0); - lean::cnstr_release(x_250, 1); - lean::cnstr_release(x_250, 2); - lean::cnstr_release(x_250, 3); - x_289 = x_250; -} else { - lean::dec_ref(x_250); - x_289 = lean::box(0); -} -lean::inc(x_177); -if (lean::is_scalar(x_289)) { - x_290 = lean::alloc_cnstr(1, 4, 1); -} else { - x_290 = x_289; -} -lean::cnstr_set(x_290, 0, x_177); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_285); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_291 = x_177; -} else { - lean::dec_ref(x_177); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_288); -lean::cnstr_set(x_292, 1, x_29); -lean::cnstr_set(x_292, 2, x_30); -lean::cnstr_set(x_292, 3, x_31); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_225); -x_293 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_293, 0, x_290); -lean::cnstr_set(x_293, 1, x_286); -lean::cnstr_set(x_293, 2, x_287); -lean::cnstr_set(x_293, 3, x_292); -lean::cnstr_set_scalar(x_293, sizeof(void*)*4, x_259); -return x_293; -} -} -else -{ -uint8 x_294; -x_294 = !lean::is_exclusive(x_176); -if (x_294 == 0) -{ -obj* x_295; obj* x_296; uint8 x_297; -x_295 = lean::cnstr_get(x_176, 3); -lean::dec(x_295); -x_296 = lean::cnstr_get(x_176, 0); -lean::dec(x_296); -x_297 = !lean::is_exclusive(x_177); -if (x_297 == 0) -{ -uint8 x_298; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_259); -x_298 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_298); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -else -{ -obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; uint8 x_304; -x_299 = lean::cnstr_get(x_177, 0); -x_300 = lean::cnstr_get(x_177, 1); -x_301 = lean::cnstr_get(x_177, 2); -x_302 = lean::cnstr_get(x_177, 3); -lean::inc(x_302); -lean::inc(x_301); -lean::inc(x_300); -lean::inc(x_299); -lean::dec(x_177); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_299); -lean::cnstr_set(x_303, 1, x_300); -lean::cnstr_set(x_303, 2, x_301); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_259); -x_304 = 0; -lean::cnstr_set(x_176, 0, x_303); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_304); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -else -{ -obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; uint8 x_313; obj* x_314; -x_305 = lean::cnstr_get(x_176, 1); -x_306 = lean::cnstr_get(x_176, 2); -lean::inc(x_306); -lean::inc(x_305); -lean::dec(x_176); -x_307 = lean::cnstr_get(x_177, 0); -lean::inc(x_307); -x_308 = lean::cnstr_get(x_177, 1); -lean::inc(x_308); -x_309 = lean::cnstr_get(x_177, 2); -lean::inc(x_309); -x_310 = lean::cnstr_get(x_177, 3); -lean::inc(x_310); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_311 = x_177; -} else { - lean::dec_ref(x_177); - x_311 = lean::box(0); -} -if (lean::is_scalar(x_311)) { - x_312 = lean::alloc_cnstr(1, 4, 1); -} else { - x_312 = x_311; -} -lean::cnstr_set(x_312, 0, x_307); -lean::cnstr_set(x_312, 1, x_308); -lean::cnstr_set(x_312, 2, x_309); -lean::cnstr_set(x_312, 3, x_310); -lean::cnstr_set_scalar(x_312, sizeof(void*)*4, x_259); -x_313 = 0; -x_314 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_314, 0, x_312); -lean::cnstr_set(x_314, 1, x_305); -lean::cnstr_set(x_314, 2, x_306); -lean::cnstr_set(x_314, 3, x_250); -lean::cnstr_set_scalar(x_314, sizeof(void*)*4, x_313); -lean::cnstr_set(x_1, 0, x_314); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; uint8 x_319; -x_315 = lean::cnstr_get(x_1, 0); -x_316 = lean::cnstr_get(x_1, 1); -x_317 = lean::cnstr_get(x_1, 2); -x_318 = lean::cnstr_get(x_1, 3); -lean::inc(x_318); -lean::inc(x_317); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_1); -x_319 = l_Lean_Name_quickLt(x_2, x_316); -if (x_319 == 0) -{ -uint8 x_320; -x_320 = l_Lean_Name_quickLt(x_316, x_2); -if (x_320 == 0) -{ -obj* x_321; -lean::dec(x_317); -lean::dec(x_316); -x_321 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_321, 0, x_315); -lean::cnstr_set(x_321, 1, x_2); -lean::cnstr_set(x_321, 2, x_3); -lean::cnstr_set(x_321, 3, x_318); -lean::cnstr_set_scalar(x_321, sizeof(void*)*4, x_6); -return x_321; -} -else -{ -uint8 x_322; -x_322 = l_RBNode_isRed___main___rarg(x_318); -if (x_322 == 0) -{ -obj* x_323; obj* x_324; -x_323 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_318, x_2, x_3); -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_315); -lean::cnstr_set(x_324, 1, x_316); -lean::cnstr_set(x_324, 2, x_317); -lean::cnstr_set(x_324, 3, x_323); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_6); -return x_324; -} -else -{ -obj* x_325; -x_325 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_318, x_2, x_3); -if (lean::obj_tag(x_325) == 0) -{ -lean::dec(x_317); -lean::dec(x_316); -lean::dec(x_315); -return x_325; -} -else -{ -obj* x_326; -x_326 = lean::cnstr_get(x_325, 0); -lean::inc(x_326); -if (lean::obj_tag(x_326) == 0) -{ -obj* x_327; -x_327 = lean::cnstr_get(x_325, 3); -lean::inc(x_327); -if (lean::obj_tag(x_327) == 0) -{ -obj* x_328; obj* x_329; obj* x_330; uint8 x_331; obj* x_332; uint8 x_333; obj* x_334; -x_328 = lean::cnstr_get(x_325, 1); -lean::inc(x_328); -x_329 = lean::cnstr_get(x_325, 2); -lean::inc(x_329); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_330 = x_325; -} else { - lean::dec_ref(x_325); - x_330 = lean::box(0); -} -x_331 = 0; -if (lean::is_scalar(x_330)) { - x_332 = lean::alloc_cnstr(1, 4, 1); -} else { - x_332 = x_330; -} -lean::cnstr_set(x_332, 0, x_327); -lean::cnstr_set(x_332, 1, x_328); -lean::cnstr_set(x_332, 2, x_329); -lean::cnstr_set(x_332, 3, x_327); -lean::cnstr_set_scalar(x_332, sizeof(void*)*4, x_331); -x_333 = 1; -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_315); -lean::cnstr_set(x_334, 1, x_316); -lean::cnstr_set(x_334, 2, x_317); -lean::cnstr_set(x_334, 3, x_332); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_333); -return x_334; -} -else -{ -uint8 x_335; -x_335 = lean::cnstr_get_scalar(x_327, sizeof(void*)*4); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; obj* x_346; obj* x_347; -x_336 = lean::cnstr_get(x_325, 1); -lean::inc(x_336); -x_337 = lean::cnstr_get(x_325, 2); -lean::inc(x_337); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_338 = x_325; -} else { - lean::dec_ref(x_325); - x_338 = lean::box(0); -} -x_339 = lean::cnstr_get(x_327, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get(x_327, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_327, 2); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_327, 3); -lean::inc(x_342); -if (lean::is_exclusive(x_327)) { - lean::cnstr_release(x_327, 0); - lean::cnstr_release(x_327, 1); - lean::cnstr_release(x_327, 2); - lean::cnstr_release(x_327, 3); - x_343 = x_327; -} else { - lean::dec_ref(x_327); - x_343 = lean::box(0); -} -x_344 = 1; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_315); -lean::cnstr_set(x_345, 1, x_316); -lean::cnstr_set(x_345, 2, x_317); -lean::cnstr_set(x_345, 3, x_326); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -if (lean::is_scalar(x_338)) { - x_346 = lean::alloc_cnstr(1, 4, 1); -} else { - x_346 = x_338; -} -lean::cnstr_set(x_346, 0, x_339); -lean::cnstr_set(x_346, 1, x_340); -lean::cnstr_set(x_346, 2, x_341); -lean::cnstr_set(x_346, 3, x_342); -lean::cnstr_set_scalar(x_346, sizeof(void*)*4, x_344); -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_345); -lean::cnstr_set(x_347, 1, x_336); -lean::cnstr_set(x_347, 2, x_337); -lean::cnstr_set(x_347, 3, x_346); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_335); -return x_347; -} -else -{ -obj* x_348; obj* x_349; obj* x_350; uint8 x_351; obj* x_352; obj* x_353; -x_348 = lean::cnstr_get(x_325, 1); -lean::inc(x_348); -x_349 = lean::cnstr_get(x_325, 2); -lean::inc(x_349); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_350 = x_325; -} else { - lean::dec_ref(x_325); - x_350 = lean::box(0); -} -x_351 = 0; -if (lean::is_scalar(x_350)) { - x_352 = lean::alloc_cnstr(1, 4, 1); -} else { - x_352 = x_350; -} -lean::cnstr_set(x_352, 0, x_326); -lean::cnstr_set(x_352, 1, x_348); -lean::cnstr_set(x_352, 2, x_349); -lean::cnstr_set(x_352, 3, x_327); -lean::cnstr_set_scalar(x_352, sizeof(void*)*4, x_351); -x_353 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_353, 0, x_315); -lean::cnstr_set(x_353, 1, x_316); -lean::cnstr_set(x_353, 2, x_317); -lean::cnstr_set(x_353, 3, x_352); -lean::cnstr_set_scalar(x_353, sizeof(void*)*4, x_335); -return x_353; -} -} -} -else -{ -uint8 x_354; -x_354 = lean::cnstr_get_scalar(x_326, sizeof(void*)*4); -if (x_354 == 0) -{ -obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; obj* x_367; -x_355 = lean::cnstr_get(x_325, 1); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_325, 2); -lean::inc(x_356); -x_357 = lean::cnstr_get(x_325, 3); -lean::inc(x_357); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_358 = x_325; -} else { - lean::dec_ref(x_325); - x_358 = lean::box(0); -} -x_359 = lean::cnstr_get(x_326, 0); -lean::inc(x_359); -x_360 = lean::cnstr_get(x_326, 1); -lean::inc(x_360); -x_361 = lean::cnstr_get(x_326, 2); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_326, 3); -lean::inc(x_362); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_363 = x_326; -} else { - lean::dec_ref(x_326); - x_363 = lean::box(0); -} -x_364 = 1; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_315); -lean::cnstr_set(x_365, 1, x_316); -lean::cnstr_set(x_365, 2, x_317); -lean::cnstr_set(x_365, 3, x_359); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -if (lean::is_scalar(x_358)) { - x_366 = lean::alloc_cnstr(1, 4, 1); -} else { - x_366 = x_358; -} -lean::cnstr_set(x_366, 0, x_362); -lean::cnstr_set(x_366, 1, x_355); -lean::cnstr_set(x_366, 2, x_356); -lean::cnstr_set(x_366, 3, x_357); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_364); -x_367 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_360); -lean::cnstr_set(x_367, 2, x_361); -lean::cnstr_set(x_367, 3, x_366); -lean::cnstr_set_scalar(x_367, sizeof(void*)*4, x_354); -return x_367; -} -else -{ -obj* x_368; -x_368 = lean::cnstr_get(x_325, 3); -lean::inc(x_368); -if (lean::obj_tag(x_368) == 0) -{ -obj* x_369; obj* x_370; obj* x_371; uint8 x_372; obj* x_373; obj* x_374; -x_369 = lean::cnstr_get(x_325, 1); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_325, 2); -lean::inc(x_370); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_371 = x_325; -} else { - lean::dec_ref(x_325); - x_371 = lean::box(0); -} -x_372 = 0; -if (lean::is_scalar(x_371)) { - x_373 = lean::alloc_cnstr(1, 4, 1); -} else { - x_373 = x_371; -} -lean::cnstr_set(x_373, 0, x_326); -lean::cnstr_set(x_373, 1, x_369); -lean::cnstr_set(x_373, 2, x_370); -lean::cnstr_set(x_373, 3, x_368); -lean::cnstr_set_scalar(x_373, sizeof(void*)*4, x_372); -x_374 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_374, 0, x_315); -lean::cnstr_set(x_374, 1, x_316); -lean::cnstr_set(x_374, 2, x_317); -lean::cnstr_set(x_374, 3, x_373); -lean::cnstr_set_scalar(x_374, sizeof(void*)*4, x_354); -return x_374; -} -else -{ -uint8 x_375; -x_375 = lean::cnstr_get_scalar(x_368, sizeof(void*)*4); -if (x_375 == 0) -{ -obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; -x_376 = lean::cnstr_get(x_325, 1); -lean::inc(x_376); -x_377 = lean::cnstr_get(x_325, 2); -lean::inc(x_377); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_378 = x_325; -} else { - lean::dec_ref(x_325); - x_378 = lean::box(0); -} -x_379 = lean::cnstr_get(x_368, 0); -lean::inc(x_379); -x_380 = lean::cnstr_get(x_368, 1); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_368, 2); -lean::inc(x_381); -x_382 = lean::cnstr_get(x_368, 3); -lean::inc(x_382); -if (lean::is_exclusive(x_368)) { - lean::cnstr_release(x_368, 0); - lean::cnstr_release(x_368, 1); - lean::cnstr_release(x_368, 2); - lean::cnstr_release(x_368, 3); - x_383 = x_368; -} else { - lean::dec_ref(x_368); - x_383 = lean::box(0); -} -lean::inc(x_326); -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(1, 4, 1); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_315); -lean::cnstr_set(x_384, 1, x_316); -lean::cnstr_set(x_384, 2, x_317); -lean::cnstr_set(x_384, 3, x_326); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_385 = x_326; -} else { - lean::dec_ref(x_326); - x_385 = lean::box(0); -} -lean::cnstr_set_scalar(x_384, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_385)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_385; -} -lean::cnstr_set(x_386, 0, x_379); -lean::cnstr_set(x_386, 1, x_380); -lean::cnstr_set(x_386, 2, x_381); -lean::cnstr_set(x_386, 3, x_382); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_378)) { - x_387 = lean::alloc_cnstr(1, 4, 1); -} else { - x_387 = x_378; -} -lean::cnstr_set(x_387, 0, x_384); -lean::cnstr_set(x_387, 1, x_376); -lean::cnstr_set(x_387, 2, x_377); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_375); -return x_387; -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; uint8 x_397; obj* x_398; obj* x_399; -x_388 = lean::cnstr_get(x_325, 1); -lean::inc(x_388); -x_389 = lean::cnstr_get(x_325, 2); -lean::inc(x_389); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_390 = x_325; -} else { - lean::dec_ref(x_325); - x_390 = lean::box(0); -} -x_391 = lean::cnstr_get(x_326, 0); -lean::inc(x_391); -x_392 = lean::cnstr_get(x_326, 1); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_326, 2); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_326, 3); -lean::inc(x_394); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_395 = x_326; -} else { - lean::dec_ref(x_326); - x_395 = lean::box(0); -} -if (lean::is_scalar(x_395)) { - x_396 = lean::alloc_cnstr(1, 4, 1); -} else { - x_396 = x_395; -} -lean::cnstr_set(x_396, 0, x_391); -lean::cnstr_set(x_396, 1, x_392); -lean::cnstr_set(x_396, 2, x_393); -lean::cnstr_set(x_396, 3, x_394); -lean::cnstr_set_scalar(x_396, sizeof(void*)*4, x_375); -x_397 = 0; -if (lean::is_scalar(x_390)) { - x_398 = lean::alloc_cnstr(1, 4, 1); -} else { - x_398 = x_390; -} -lean::cnstr_set(x_398, 0, x_396); -lean::cnstr_set(x_398, 1, x_388); -lean::cnstr_set(x_398, 2, x_389); -lean::cnstr_set(x_398, 3, x_368); -lean::cnstr_set_scalar(x_398, sizeof(void*)*4, x_397); -x_399 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_399, 0, x_315); -lean::cnstr_set(x_399, 1, x_316); -lean::cnstr_set(x_399, 2, x_317); -lean::cnstr_set(x_399, 3, x_398); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_375); -return x_399; -} -} -} -} -} -} -} -} -else -{ -uint8 x_400; -x_400 = l_RBNode_isRed___main___rarg(x_315); -if (x_400 == 0) -{ -obj* x_401; obj* x_402; -x_401 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_315, x_2, x_3); -x_402 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_402, 0, x_401); -lean::cnstr_set(x_402, 1, x_316); -lean::cnstr_set(x_402, 2, x_317); -lean::cnstr_set(x_402, 3, x_318); -lean::cnstr_set_scalar(x_402, sizeof(void*)*4, x_6); -return x_402; -} -else -{ -obj* x_403; -x_403 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_315, x_2, x_3); -if (lean::obj_tag(x_403) == 0) -{ -lean::dec(x_318); -lean::dec(x_317); -lean::dec(x_316); -return x_403; -} -else -{ -obj* x_404; -x_404 = lean::cnstr_get(x_403, 0); -lean::inc(x_404); -if (lean::obj_tag(x_404) == 0) -{ -obj* x_405; -x_405 = lean::cnstr_get(x_403, 3); -lean::inc(x_405); -if (lean::obj_tag(x_405) == 0) -{ -obj* x_406; obj* x_407; obj* x_408; uint8 x_409; obj* x_410; uint8 x_411; obj* x_412; -x_406 = lean::cnstr_get(x_403, 1); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_403, 2); -lean::inc(x_407); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_408 = x_403; -} else { - lean::dec_ref(x_403); - x_408 = lean::box(0); -} -x_409 = 0; -if (lean::is_scalar(x_408)) { - x_410 = lean::alloc_cnstr(1, 4, 1); -} else { - x_410 = x_408; -} -lean::cnstr_set(x_410, 0, x_405); -lean::cnstr_set(x_410, 1, x_406); -lean::cnstr_set(x_410, 2, x_407); -lean::cnstr_set(x_410, 3, x_405); -lean::cnstr_set_scalar(x_410, sizeof(void*)*4, x_409); -x_411 = 1; -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_410); -lean::cnstr_set(x_412, 1, x_316); -lean::cnstr_set(x_412, 2, x_317); -lean::cnstr_set(x_412, 3, x_318); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_411); -return x_412; -} -else -{ -uint8 x_413; -x_413 = lean::cnstr_get_scalar(x_405, sizeof(void*)*4); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; obj* x_424; obj* x_425; -x_414 = lean::cnstr_get(x_403, 1); -lean::inc(x_414); -x_415 = lean::cnstr_get(x_403, 2); -lean::inc(x_415); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_416 = x_403; -} else { - lean::dec_ref(x_403); - x_416 = lean::box(0); -} -x_417 = lean::cnstr_get(x_405, 0); -lean::inc(x_417); -x_418 = lean::cnstr_get(x_405, 1); -lean::inc(x_418); -x_419 = lean::cnstr_get(x_405, 2); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_405, 3); -lean::inc(x_420); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - lean::cnstr_release(x_405, 2); - lean::cnstr_release(x_405, 3); - x_421 = x_405; -} else { - lean::dec_ref(x_405); - x_421 = lean::box(0); -} -x_422 = 1; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_404); -lean::cnstr_set(x_423, 1, x_414); -lean::cnstr_set(x_423, 2, x_415); -lean::cnstr_set(x_423, 3, x_417); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -if (lean::is_scalar(x_416)) { - x_424 = lean::alloc_cnstr(1, 4, 1); -} else { - x_424 = x_416; -} -lean::cnstr_set(x_424, 0, x_420); -lean::cnstr_set(x_424, 1, x_316); -lean::cnstr_set(x_424, 2, x_317); -lean::cnstr_set(x_424, 3, x_318); -lean::cnstr_set_scalar(x_424, sizeof(void*)*4, x_422); -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_418); -lean::cnstr_set(x_425, 2, x_419); -lean::cnstr_set(x_425, 3, x_424); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_413); -return x_425; -} -else -{ -obj* x_426; obj* x_427; obj* x_428; uint8 x_429; obj* x_430; obj* x_431; -x_426 = lean::cnstr_get(x_403, 1); -lean::inc(x_426); -x_427 = lean::cnstr_get(x_403, 2); -lean::inc(x_427); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_428 = x_403; -} else { - lean::dec_ref(x_403); - x_428 = lean::box(0); -} -x_429 = 0; -if (lean::is_scalar(x_428)) { - x_430 = lean::alloc_cnstr(1, 4, 1); -} else { - x_430 = x_428; -} -lean::cnstr_set(x_430, 0, x_404); -lean::cnstr_set(x_430, 1, x_426); -lean::cnstr_set(x_430, 2, x_427); -lean::cnstr_set(x_430, 3, x_405); -lean::cnstr_set_scalar(x_430, sizeof(void*)*4, x_429); -x_431 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_431, 0, x_430); -lean::cnstr_set(x_431, 1, x_316); -lean::cnstr_set(x_431, 2, x_317); -lean::cnstr_set(x_431, 3, x_318); -lean::cnstr_set_scalar(x_431, sizeof(void*)*4, x_413); -return x_431; -} -} -} -else -{ -uint8 x_432; -x_432 = lean::cnstr_get_scalar(x_404, sizeof(void*)*4); -if (x_432 == 0) -{ -obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; obj* x_445; -x_433 = lean::cnstr_get(x_403, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_403, 2); -lean::inc(x_434); -x_435 = lean::cnstr_get(x_403, 3); -lean::inc(x_435); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_436 = x_403; -} else { - lean::dec_ref(x_403); - x_436 = lean::box(0); -} -x_437 = lean::cnstr_get(x_404, 0); -lean::inc(x_437); -x_438 = lean::cnstr_get(x_404, 1); -lean::inc(x_438); -x_439 = lean::cnstr_get(x_404, 2); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_404, 3); -lean::inc(x_440); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_441 = x_404; -} else { - lean::dec_ref(x_404); - x_441 = lean::box(0); -} -x_442 = 1; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_437); -lean::cnstr_set(x_443, 1, x_438); -lean::cnstr_set(x_443, 2, x_439); -lean::cnstr_set(x_443, 3, x_440); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -if (lean::is_scalar(x_436)) { - x_444 = lean::alloc_cnstr(1, 4, 1); -} else { - x_444 = x_436; -} -lean::cnstr_set(x_444, 0, x_435); -lean::cnstr_set(x_444, 1, x_316); -lean::cnstr_set(x_444, 2, x_317); -lean::cnstr_set(x_444, 3, x_318); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_442); -x_445 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_445, 0, x_443); -lean::cnstr_set(x_445, 1, x_433); -lean::cnstr_set(x_445, 2, x_434); -lean::cnstr_set(x_445, 3, x_444); -lean::cnstr_set_scalar(x_445, sizeof(void*)*4, x_432); -return x_445; -} -else -{ -obj* x_446; -x_446 = lean::cnstr_get(x_403, 3); -lean::inc(x_446); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; uint8 x_450; obj* x_451; obj* x_452; -x_447 = lean::cnstr_get(x_403, 1); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_403, 2); -lean::inc(x_448); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_449 = x_403; -} else { - lean::dec_ref(x_403); - x_449 = lean::box(0); -} -x_450 = 0; -if (lean::is_scalar(x_449)) { - x_451 = lean::alloc_cnstr(1, 4, 1); -} else { - x_451 = x_449; -} -lean::cnstr_set(x_451, 0, x_404); -lean::cnstr_set(x_451, 1, x_447); -lean::cnstr_set(x_451, 2, x_448); -lean::cnstr_set(x_451, 3, x_446); -lean::cnstr_set_scalar(x_451, sizeof(void*)*4, x_450); -x_452 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_452, 0, x_451); -lean::cnstr_set(x_452, 1, x_316); -lean::cnstr_set(x_452, 2, x_317); -lean::cnstr_set(x_452, 3, x_318); -lean::cnstr_set_scalar(x_452, sizeof(void*)*4, x_432); -return x_452; -} -else -{ -uint8 x_453; -x_453 = lean::cnstr_get_scalar(x_446, sizeof(void*)*4); -if (x_453 == 0) -{ -obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; obj* x_465; -x_454 = lean::cnstr_get(x_403, 1); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_403, 2); -lean::inc(x_455); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_456 = x_403; -} else { - lean::dec_ref(x_403); - x_456 = lean::box(0); -} -x_457 = lean::cnstr_get(x_446, 0); -lean::inc(x_457); -x_458 = lean::cnstr_get(x_446, 1); -lean::inc(x_458); -x_459 = lean::cnstr_get(x_446, 2); -lean::inc(x_459); -x_460 = lean::cnstr_get(x_446, 3); -lean::inc(x_460); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - lean::cnstr_release(x_446, 1); - lean::cnstr_release(x_446, 2); - lean::cnstr_release(x_446, 3); - x_461 = x_446; -} else { - lean::dec_ref(x_446); - x_461 = lean::box(0); -} -lean::inc(x_404); -if (lean::is_scalar(x_461)) { - x_462 = lean::alloc_cnstr(1, 4, 1); -} else { - x_462 = x_461; -} -lean::cnstr_set(x_462, 0, x_404); -lean::cnstr_set(x_462, 1, x_454); -lean::cnstr_set(x_462, 2, x_455); -lean::cnstr_set(x_462, 3, x_457); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_463 = x_404; -} else { - lean::dec_ref(x_404); - x_463 = lean::box(0); -} -lean::cnstr_set_scalar(x_462, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_463)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_463; -} -lean::cnstr_set(x_464, 0, x_460); -lean::cnstr_set(x_464, 1, x_316); -lean::cnstr_set(x_464, 2, x_317); -lean::cnstr_set(x_464, 3, x_318); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_456)) { - x_465 = lean::alloc_cnstr(1, 4, 1); -} else { - x_465 = x_456; -} -lean::cnstr_set(x_465, 0, x_462); -lean::cnstr_set(x_465, 1, x_458); -lean::cnstr_set(x_465, 2, x_459); -lean::cnstr_set(x_465, 3, x_464); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_453); -return x_465; -} -else -{ -obj* x_466; obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; uint8 x_475; obj* x_476; obj* x_477; -x_466 = lean::cnstr_get(x_403, 1); -lean::inc(x_466); -x_467 = lean::cnstr_get(x_403, 2); -lean::inc(x_467); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_468 = x_403; -} else { - lean::dec_ref(x_403); - x_468 = lean::box(0); -} -x_469 = lean::cnstr_get(x_404, 0); -lean::inc(x_469); -x_470 = lean::cnstr_get(x_404, 1); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_404, 2); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_404, 3); -lean::inc(x_472); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_473 = x_404; -} else { - lean::dec_ref(x_404); - x_473 = lean::box(0); -} -if (lean::is_scalar(x_473)) { - x_474 = lean::alloc_cnstr(1, 4, 1); -} else { - x_474 = x_473; -} -lean::cnstr_set(x_474, 0, x_469); -lean::cnstr_set(x_474, 1, x_470); -lean::cnstr_set(x_474, 2, x_471); -lean::cnstr_set(x_474, 3, x_472); -lean::cnstr_set_scalar(x_474, sizeof(void*)*4, x_453); -x_475 = 0; -if (lean::is_scalar(x_468)) { - x_476 = lean::alloc_cnstr(1, 4, 1); -} else { - x_476 = x_468; -} -lean::cnstr_set(x_476, 0, x_474); -lean::cnstr_set(x_476, 1, x_466); -lean::cnstr_set(x_476, 2, x_467); -lean::cnstr_set(x_476, 3, x_446); -lean::cnstr_set_scalar(x_476, sizeof(void*)*4, x_475); -x_477 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_477, 0, x_476); -lean::cnstr_set(x_477, 1, x_316); -lean::cnstr_set(x_477, 2, x_317); -lean::cnstr_set(x_477, 3, x_318); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_453); -return x_477; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg), 3, 0); -return x_2; -} -} -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; -x_4 = 0; -x_5 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 3, x_1); -lean::cnstr_set_scalar(x_5, sizeof(void*)*4, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_6 == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -x_10 = lean::cnstr_get(x_1, 2); -x_11 = lean::cnstr_get(x_1, 3); -x_12 = l_Lean_Name_quickLt(x_2, x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = l_Lean_Name_quickLt(x_9, x_2); -if (x_13 == 0) -{ -lean::dec(x_10); -lean::dec(x_9); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -obj* x_14; -x_14 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_11, x_2, x_3); -lean::cnstr_set(x_1, 3, x_14); -return x_1; -} -} -else -{ -obj* x_15; -x_15 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_8, x_2, x_3); -lean::cnstr_set(x_1, 0, x_15); -return x_1; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = lean::cnstr_get(x_1, 1); -x_18 = lean::cnstr_get(x_1, 2); -x_19 = lean::cnstr_get(x_1, 3); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_1); -x_20 = l_Lean_Name_quickLt(x_2, x_17); -if (x_20 == 0) -{ -uint8 x_21; -x_21 = l_Lean_Name_quickLt(x_17, x_2); -if (x_21 == 0) -{ -obj* x_22; -lean::dec(x_18); -lean::dec(x_17); -x_22 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_22, 0, x_16); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_3); -lean::cnstr_set(x_22, 3, x_19); -lean::cnstr_set_scalar(x_22, sizeof(void*)*4, x_6); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_19, x_2, x_3); -x_24 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_24, 0, x_16); -lean::cnstr_set(x_24, 1, x_17); -lean::cnstr_set(x_24, 2, x_18); -lean::cnstr_set(x_24, 3, x_23); -lean::cnstr_set_scalar(x_24, sizeof(void*)*4, x_6); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_16, x_2, x_3); -x_26 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_18); -lean::cnstr_set(x_26, 3, x_19); -lean::cnstr_set_scalar(x_26, sizeof(void*)*4, x_6); -return x_26; -} -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_28 = lean::cnstr_get(x_1, 0); -x_29 = lean::cnstr_get(x_1, 1); -x_30 = lean::cnstr_get(x_1, 2); -x_31 = lean::cnstr_get(x_1, 3); -x_32 = l_Lean_Name_quickLt(x_2, x_29); -if (x_32 == 0) -{ -uint8 x_33; -x_33 = l_Lean_Name_quickLt(x_29, x_2); -if (x_33 == 0) -{ -lean::dec(x_30); -lean::dec(x_29); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -uint8 x_34; -x_34 = l_RBNode_isRed___main___rarg(x_31); -if (x_34 == 0) -{ -obj* x_35; -x_35 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_31, x_2, x_3); -lean::cnstr_set(x_1, 3, x_35); -return x_1; -} -else -{ -obj* x_36; -x_36 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_31, x_2, x_3); -if (lean::obj_tag(x_36) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_28); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = lean::cnstr_get(x_36, 3); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; uint8 x_43; -x_40 = lean::cnstr_get(x_36, 3); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_36, 0); -lean::dec(x_41); -x_42 = 0; -lean::cnstr_set(x_36, 0, x_38); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_42); -x_43 = 1; -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_43); -return x_1; -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; uint8 x_48; -x_44 = lean::cnstr_get(x_36, 1); -x_45 = lean::cnstr_get(x_36, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_36); -x_46 = 0; -x_47 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_47, 0, x_38); -lean::cnstr_set(x_47, 1, x_44); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_38); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_46); -x_48 = 1; -lean::cnstr_set(x_1, 3, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_48); -return x_1; -} -} -else -{ -uint8 x_49; -x_49 = lean::cnstr_get_scalar(x_38, sizeof(void*)*4); -if (x_49 == 0) -{ -uint8 x_50; -x_50 = !lean::is_exclusive(x_36); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; uint8 x_55; -x_51 = lean::cnstr_get(x_36, 1); -x_52 = lean::cnstr_get(x_36, 2); -x_53 = lean::cnstr_get(x_36, 3); -lean::dec(x_53); -x_54 = lean::cnstr_get(x_36, 0); -lean::dec(x_54); -x_55 = !lean::is_exclusive(x_38); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_56 = lean::cnstr_get(x_38, 0); -x_57 = lean::cnstr_get(x_38, 1); -x_58 = lean::cnstr_get(x_38, 2); -x_59 = lean::cnstr_get(x_38, 3); -x_60 = 1; -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 2, x_30); -lean::cnstr_set(x_38, 1, x_29); -lean::cnstr_set(x_38, 0, x_28); -lean::cnstr_set_scalar(x_38, sizeof(void*)*4, x_60); -lean::cnstr_set(x_36, 3, x_59); -lean::cnstr_set(x_36, 2, x_58); -lean::cnstr_set(x_36, 1, x_57); -lean::cnstr_set(x_36, 0, x_56); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_60); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_38); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; obj* x_66; -x_61 = lean::cnstr_get(x_38, 0); -x_62 = lean::cnstr_get(x_38, 1); -x_63 = lean::cnstr_get(x_38, 2); -x_64 = lean::cnstr_get(x_38, 3); -lean::inc(x_64); -lean::inc(x_63); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_38); -x_65 = 1; -x_66 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_66, 0, x_28); -lean::cnstr_set(x_66, 1, x_29); -lean::cnstr_set(x_66, 2, x_30); -lean::cnstr_set(x_66, 3, x_37); -lean::cnstr_set_scalar(x_66, sizeof(void*)*4, x_65); -lean::cnstr_set(x_36, 3, x_64); -lean::cnstr_set(x_36, 2, x_63); -lean::cnstr_set(x_36, 1, x_62); -lean::cnstr_set(x_36, 0, x_61); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_65); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_66); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; -x_67 = lean::cnstr_get(x_36, 1); -x_68 = lean::cnstr_get(x_36, 2); -lean::inc(x_68); -lean::inc(x_67); -lean::dec(x_36); -x_69 = lean::cnstr_get(x_38, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_38, 1); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_38, 2); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_38, 3); -lean::inc(x_72); -if (lean::is_exclusive(x_38)) { - lean::cnstr_release(x_38, 0); - lean::cnstr_release(x_38, 1); - lean::cnstr_release(x_38, 2); - lean::cnstr_release(x_38, 3); - x_73 = x_38; -} else { - lean::dec_ref(x_38); - x_73 = lean::box(0); -} -x_74 = 1; -if (lean::is_scalar(x_73)) { - x_75 = lean::alloc_cnstr(1, 4, 1); -} else { - x_75 = x_73; -} -lean::cnstr_set(x_75, 0, x_28); -lean::cnstr_set(x_75, 1, x_29); -lean::cnstr_set(x_75, 2, x_30); -lean::cnstr_set(x_75, 3, x_37); -lean::cnstr_set_scalar(x_75, sizeof(void*)*4, x_74); -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_69); -lean::cnstr_set(x_76, 1, x_70); -lean::cnstr_set(x_76, 2, x_71); -lean::cnstr_set(x_76, 3, x_72); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_74); -lean::cnstr_set(x_1, 3, x_76); -lean::cnstr_set(x_1, 2, x_68); -lean::cnstr_set(x_1, 1, x_67); -lean::cnstr_set(x_1, 0, x_75); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -uint8 x_77; -x_77 = !lean::is_exclusive(x_36); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; uint8 x_80; -x_78 = lean::cnstr_get(x_36, 3); -lean::dec(x_78); -x_79 = lean::cnstr_get(x_36, 0); -lean::dec(x_79); -x_80 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_80); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_81; obj* x_82; uint8 x_83; obj* x_84; -x_81 = lean::cnstr_get(x_36, 1); -x_82 = lean::cnstr_get(x_36, 2); -lean::inc(x_82); -lean::inc(x_81); -lean::dec(x_36); -x_83 = 0; -x_84 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_84, 0, x_37); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_82); -lean::cnstr_set(x_84, 3, x_38); -lean::cnstr_set_scalar(x_84, sizeof(void*)*4, x_83); -lean::cnstr_set(x_1, 3, x_84); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -} -} -else -{ -uint8 x_85; -x_85 = lean::cnstr_get_scalar(x_37, sizeof(void*)*4); -if (x_85 == 0) -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_36); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_36, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_37); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint8 x_93; -x_89 = lean::cnstr_get(x_37, 0); -x_90 = lean::cnstr_get(x_37, 1); -x_91 = lean::cnstr_get(x_37, 2); -x_92 = lean::cnstr_get(x_37, 3); -x_93 = 1; -lean::cnstr_set(x_37, 3, x_89); -lean::cnstr_set(x_37, 2, x_30); -lean::cnstr_set(x_37, 1, x_29); -lean::cnstr_set(x_37, 0, x_28); -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_93); -lean::cnstr_set(x_36, 0, x_92); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_91); -lean::cnstr_set(x_1, 1, x_90); -lean::cnstr_set(x_1, 0, x_37); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; uint8 x_98; obj* x_99; -x_94 = lean::cnstr_get(x_37, 0); -x_95 = lean::cnstr_get(x_37, 1); -x_96 = lean::cnstr_get(x_37, 2); -x_97 = lean::cnstr_get(x_37, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_37); -x_98 = 1; -x_99 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_29); -lean::cnstr_set(x_99, 2, x_30); -lean::cnstr_set(x_99, 3, x_94); -lean::cnstr_set_scalar(x_99, sizeof(void*)*4, x_98); -lean::cnstr_set(x_36, 0, x_97); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_98); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_96); -lean::cnstr_set(x_1, 1, x_95); -lean::cnstr_set(x_1, 0, x_99); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; obj* x_110; -x_100 = lean::cnstr_get(x_36, 1); -x_101 = lean::cnstr_get(x_36, 2); -x_102 = lean::cnstr_get(x_36, 3); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_36); -x_103 = lean::cnstr_get(x_37, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_37, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_37, 2); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_37, 3); -lean::inc(x_106); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_107 = x_37; -} else { - lean::dec_ref(x_37); - x_107 = lean::box(0); -} -x_108 = 1; -if (lean::is_scalar(x_107)) { - x_109 = lean::alloc_cnstr(1, 4, 1); -} else { - x_109 = x_107; -} -lean::cnstr_set(x_109, 0, x_28); -lean::cnstr_set(x_109, 1, x_29); -lean::cnstr_set(x_109, 2, x_30); -lean::cnstr_set(x_109, 3, x_103); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -x_110 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_110, 0, x_106); -lean::cnstr_set(x_110, 1, x_100); -lean::cnstr_set(x_110, 2, x_101); -lean::cnstr_set(x_110, 3, x_102); -lean::cnstr_set_scalar(x_110, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_110); -lean::cnstr_set(x_1, 2, x_105); -lean::cnstr_set(x_1, 1, x_104); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_111; -x_111 = lean::cnstr_get(x_36, 3); -lean::inc(x_111); -if (lean::obj_tag(x_111) == 0) -{ -uint8 x_112; -x_112 = !lean::is_exclusive(x_36); -if (x_112 == 0) -{ -obj* x_113; obj* x_114; uint8 x_115; -x_113 = lean::cnstr_get(x_36, 3); -lean::dec(x_113); -x_114 = lean::cnstr_get(x_36, 0); -lean::dec(x_114); -x_115 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_115); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; -x_116 = lean::cnstr_get(x_36, 1); -x_117 = lean::cnstr_get(x_36, 2); -lean::inc(x_117); -lean::inc(x_116); -lean::dec(x_36); -x_118 = 0; -x_119 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_119, 0, x_37); -lean::cnstr_set(x_119, 1, x_116); -lean::cnstr_set(x_119, 2, x_117); -lean::cnstr_set(x_119, 3, x_111); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -uint8 x_120; -x_120 = lean::cnstr_get_scalar(x_111, sizeof(void*)*4); -if (x_120 == 0) -{ -uint8 x_121; -lean::free_heap_obj(x_1); -x_121 = !lean::is_exclusive(x_36); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; uint8 x_124; -x_122 = lean::cnstr_get(x_36, 3); -lean::dec(x_122); -x_123 = lean::cnstr_get(x_36, 0); -lean::dec(x_123); -x_124 = !lean::is_exclusive(x_111); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; uint8 x_129; -x_125 = lean::cnstr_get(x_111, 0); -x_126 = lean::cnstr_get(x_111, 1); -x_127 = lean::cnstr_get(x_111, 2); -x_128 = lean::cnstr_get(x_111, 3); -lean::inc(x_37); -lean::cnstr_set(x_111, 3, x_37); -lean::cnstr_set(x_111, 2, x_30); -lean::cnstr_set(x_111, 1, x_29); -lean::cnstr_set(x_111, 0, x_28); -x_129 = !lean::is_exclusive(x_37); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_130 = lean::cnstr_get(x_37, 3); -lean::dec(x_130); -x_131 = lean::cnstr_get(x_37, 2); -lean::dec(x_131); -x_132 = lean::cnstr_get(x_37, 1); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_37, 0); -lean::dec(x_133); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -lean::cnstr_set(x_37, 3, x_128); -lean::cnstr_set(x_37, 2, x_127); -lean::cnstr_set(x_37, 1, x_126); -lean::cnstr_set(x_37, 0, x_125); -lean::cnstr_set(x_36, 3, x_37); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -else -{ -obj* x_134; -lean::dec(x_37); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -x_134 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_134, 0, x_125); -lean::cnstr_set(x_134, 1, x_126); -lean::cnstr_set(x_134, 2, x_127); -lean::cnstr_set(x_134, 3, x_128); -lean::cnstr_set_scalar(x_134, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_134); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_135 = lean::cnstr_get(x_111, 0); -x_136 = lean::cnstr_get(x_111, 1); -x_137 = lean::cnstr_get(x_111, 2); -x_138 = lean::cnstr_get(x_111, 3); -lean::inc(x_138); -lean::inc(x_137); -lean::inc(x_136); -lean::inc(x_135); -lean::dec(x_111); -lean::inc(x_37); -x_139 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_139, 0, x_28); -lean::cnstr_set(x_139, 1, x_29); -lean::cnstr_set(x_139, 2, x_30); -lean::cnstr_set(x_139, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_140 = x_37; -} else { - lean::dec_ref(x_37); - x_140 = lean::box(0); -} -lean::cnstr_set_scalar(x_139, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(1, 4, 1); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_135); -lean::cnstr_set(x_141, 1, x_136); -lean::cnstr_set(x_141, 2, x_137); -lean::cnstr_set(x_141, 3, x_138); -lean::cnstr_set_scalar(x_141, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_141); -lean::cnstr_set(x_36, 0, x_139); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_142 = lean::cnstr_get(x_36, 1); -x_143 = lean::cnstr_get(x_36, 2); -lean::inc(x_143); -lean::inc(x_142); -lean::dec(x_36); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_111, 1); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_111, 2); -lean::inc(x_146); -x_147 = lean::cnstr_get(x_111, 3); -lean::inc(x_147); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - lean::cnstr_release(x_111, 2); - lean::cnstr_release(x_111, 3); - x_148 = x_111; -} else { - lean::dec_ref(x_111); - x_148 = lean::box(0); -} -lean::inc(x_37); -if (lean::is_scalar(x_148)) { - x_149 = lean::alloc_cnstr(1, 4, 1); -} else { - x_149 = x_148; -} -lean::cnstr_set(x_149, 0, x_28); -lean::cnstr_set(x_149, 1, x_29); -lean::cnstr_set(x_149, 2, x_30); -lean::cnstr_set(x_149, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_150 = x_37; -} else { - lean::dec_ref(x_37); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_144); -lean::cnstr_set(x_151, 1, x_145); -lean::cnstr_set(x_151, 2, x_146); -lean::cnstr_set(x_151, 3, x_147); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_85); -x_152 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_152, 0, x_149); -lean::cnstr_set(x_152, 1, x_142); -lean::cnstr_set(x_152, 2, x_143); -lean::cnstr_set(x_152, 3, x_151); -lean::cnstr_set_scalar(x_152, sizeof(void*)*4, x_120); -return x_152; -} -} -else -{ -uint8 x_153; -x_153 = !lean::is_exclusive(x_36); -if (x_153 == 0) -{ -obj* x_154; obj* x_155; uint8 x_156; -x_154 = lean::cnstr_get(x_36, 3); -lean::dec(x_154); -x_155 = lean::cnstr_get(x_36, 0); -lean::dec(x_155); -x_156 = !lean::is_exclusive(x_37); -if (x_156 == 0) -{ -uint8 x_157; -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_120); -x_157 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_157); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -else -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; uint8 x_163; -x_158 = lean::cnstr_get(x_37, 0); -x_159 = lean::cnstr_get(x_37, 1); -x_160 = lean::cnstr_get(x_37, 2); -x_161 = lean::cnstr_get(x_37, 3); -lean::inc(x_161); -lean::inc(x_160); -lean::inc(x_159); -lean::inc(x_158); -lean::dec(x_37); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_158); -lean::cnstr_set(x_162, 1, x_159); -lean::cnstr_set(x_162, 2, x_160); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_120); -x_163 = 0; -lean::cnstr_set(x_36, 0, x_162); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_163); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; uint8 x_172; obj* x_173; -x_164 = lean::cnstr_get(x_36, 1); -x_165 = lean::cnstr_get(x_36, 2); -lean::inc(x_165); -lean::inc(x_164); -lean::dec(x_36); -x_166 = lean::cnstr_get(x_37, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_37, 1); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_37, 2); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_37, 3); -lean::inc(x_169); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_170 = x_37; -} else { - lean::dec_ref(x_37); - x_170 = lean::box(0); -} -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(1, 4, 1); -} else { - x_171 = x_170; -} -lean::cnstr_set(x_171, 0, x_166); -lean::cnstr_set(x_171, 1, x_167); -lean::cnstr_set(x_171, 2, x_168); -lean::cnstr_set(x_171, 3, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*4, x_120); -x_172 = 0; -x_173 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_173, 0, x_171); -lean::cnstr_set(x_173, 1, x_164); -lean::cnstr_set(x_173, 2, x_165); -lean::cnstr_set(x_173, 3, x_111); -lean::cnstr_set_scalar(x_173, sizeof(void*)*4, x_172); -lean::cnstr_set(x_1, 3, x_173); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_174; -x_174 = l_RBNode_isRed___main___rarg(x_28); -if (x_174 == 0) -{ -obj* x_175; -x_175 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_28, x_2, x_3); -lean::cnstr_set(x_1, 0, x_175); -return x_1; -} -else -{ -obj* x_176; -x_176 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_28, x_2, x_3); -if (lean::obj_tag(x_176) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_31); -lean::dec(x_30); -lean::dec(x_29); -return x_176; -} -else -{ -obj* x_177; -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -if (lean::obj_tag(x_177) == 0) -{ -obj* x_178; -x_178 = lean::cnstr_get(x_176, 3); -lean::inc(x_178); -if (lean::obj_tag(x_178) == 0) -{ -uint8 x_179; -x_179 = !lean::is_exclusive(x_176); -if (x_179 == 0) -{ -obj* x_180; obj* x_181; uint8 x_182; uint8 x_183; -x_180 = lean::cnstr_get(x_176, 3); -lean::dec(x_180); -x_181 = lean::cnstr_get(x_176, 0); -lean::dec(x_181); -x_182 = 0; -lean::cnstr_set(x_176, 0, x_178); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_182); -x_183 = 1; -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_183); -return x_1; -} -else -{ -obj* x_184; obj* x_185; uint8 x_186; obj* x_187; uint8 x_188; -x_184 = lean::cnstr_get(x_176, 1); -x_185 = lean::cnstr_get(x_176, 2); -lean::inc(x_185); -lean::inc(x_184); -lean::dec(x_176); -x_186 = 0; -x_187 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_187, 0, x_178); -lean::cnstr_set(x_187, 1, x_184); -lean::cnstr_set(x_187, 2, x_185); -lean::cnstr_set(x_187, 3, x_178); -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_186); -x_188 = 1; -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_188); -return x_1; -} -} -else -{ -uint8 x_189; -x_189 = lean::cnstr_get_scalar(x_178, sizeof(void*)*4); -if (x_189 == 0) -{ -uint8 x_190; -x_190 = !lean::is_exclusive(x_176); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; uint8 x_195; -x_191 = lean::cnstr_get(x_176, 1); -x_192 = lean::cnstr_get(x_176, 2); -x_193 = lean::cnstr_get(x_176, 3); -lean::dec(x_193); -x_194 = lean::cnstr_get(x_176, 0); -lean::dec(x_194); -x_195 = !lean::is_exclusive(x_178); -if (x_195 == 0) -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; uint8 x_200; -x_196 = lean::cnstr_get(x_178, 0); -x_197 = lean::cnstr_get(x_178, 1); -x_198 = lean::cnstr_get(x_178, 2); -x_199 = lean::cnstr_get(x_178, 3); -x_200 = 1; -lean::cnstr_set(x_178, 3, x_196); -lean::cnstr_set(x_178, 2, x_192); -lean::cnstr_set(x_178, 1, x_191); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set_scalar(x_178, sizeof(void*)*4, x_200); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_199); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_200); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_198); -lean::cnstr_set(x_1, 1, x_197); -lean::cnstr_set(x_1, 0, x_178); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; obj* x_206; -x_201 = lean::cnstr_get(x_178, 0); -x_202 = lean::cnstr_get(x_178, 1); -x_203 = lean::cnstr_get(x_178, 2); -x_204 = lean::cnstr_get(x_178, 3); -lean::inc(x_204); -lean::inc(x_203); -lean::inc(x_202); -lean::inc(x_201); -lean::dec(x_178); -x_205 = 1; -x_206 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_206, 0, x_177); -lean::cnstr_set(x_206, 1, x_191); -lean::cnstr_set(x_206, 2, x_192); -lean::cnstr_set(x_206, 3, x_201); -lean::cnstr_set_scalar(x_206, sizeof(void*)*4, x_205); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_204); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_205); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_203); -lean::cnstr_set(x_1, 1, x_202); -lean::cnstr_set(x_1, 0, x_206); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; -x_207 = lean::cnstr_get(x_176, 1); -x_208 = lean::cnstr_get(x_176, 2); -lean::inc(x_208); -lean::inc(x_207); -lean::dec(x_176); -x_209 = lean::cnstr_get(x_178, 0); -lean::inc(x_209); -x_210 = lean::cnstr_get(x_178, 1); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_178, 2); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_178, 3); -lean::inc(x_212); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - lean::cnstr_release(x_178, 2); - lean::cnstr_release(x_178, 3); - x_213 = x_178; -} else { - lean::dec_ref(x_178); - x_213 = lean::box(0); -} -x_214 = 1; -if (lean::is_scalar(x_213)) { - x_215 = lean::alloc_cnstr(1, 4, 1); -} else { - x_215 = x_213; -} -lean::cnstr_set(x_215, 0, x_177); -lean::cnstr_set(x_215, 1, x_207); -lean::cnstr_set(x_215, 2, x_208); -lean::cnstr_set(x_215, 3, x_209); -lean::cnstr_set_scalar(x_215, sizeof(void*)*4, x_214); -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_212); -lean::cnstr_set(x_216, 1, x_29); -lean::cnstr_set(x_216, 2, x_30); -lean::cnstr_set(x_216, 3, x_31); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_214); -lean::cnstr_set(x_1, 3, x_216); -lean::cnstr_set(x_1, 2, x_211); -lean::cnstr_set(x_1, 1, x_210); -lean::cnstr_set(x_1, 0, x_215); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -uint8 x_217; -x_217 = !lean::is_exclusive(x_176); -if (x_217 == 0) -{ -obj* x_218; obj* x_219; uint8 x_220; -x_218 = lean::cnstr_get(x_176, 3); -lean::dec(x_218); -x_219 = lean::cnstr_get(x_176, 0); -lean::dec(x_219); -x_220 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_220); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_221; obj* x_222; uint8 x_223; obj* x_224; -x_221 = lean::cnstr_get(x_176, 1); -x_222 = lean::cnstr_get(x_176, 2); -lean::inc(x_222); -lean::inc(x_221); -lean::dec(x_176); -x_223 = 0; -x_224 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_224, 0, x_177); -lean::cnstr_set(x_224, 1, x_221); -lean::cnstr_set(x_224, 2, x_222); -lean::cnstr_set(x_224, 3, x_178); -lean::cnstr_set_scalar(x_224, sizeof(void*)*4, x_223); -lean::cnstr_set(x_1, 0, x_224); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -} -} -else -{ -uint8 x_225; -x_225 = lean::cnstr_get_scalar(x_177, sizeof(void*)*4); -if (x_225 == 0) -{ -uint8 x_226; -x_226 = !lean::is_exclusive(x_176); -if (x_226 == 0) -{ -obj* x_227; obj* x_228; obj* x_229; obj* x_230; uint8 x_231; -x_227 = lean::cnstr_get(x_176, 1); -x_228 = lean::cnstr_get(x_176, 2); -x_229 = lean::cnstr_get(x_176, 3); -x_230 = lean::cnstr_get(x_176, 0); -lean::dec(x_230); -x_231 = !lean::is_exclusive(x_177); -if (x_231 == 0) -{ -uint8 x_232; -x_232 = 1; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_232); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_232); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_177); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; uint8 x_237; obj* x_238; -x_233 = lean::cnstr_get(x_177, 0); -x_234 = lean::cnstr_get(x_177, 1); -x_235 = lean::cnstr_get(x_177, 2); -x_236 = lean::cnstr_get(x_177, 3); -lean::inc(x_236); -lean::inc(x_235); -lean::inc(x_234); -lean::inc(x_233); -lean::dec(x_177); -x_237 = 1; -x_238 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_238, 0, x_233); -lean::cnstr_set(x_238, 1, x_234); -lean::cnstr_set(x_238, 2, x_235); -lean::cnstr_set(x_238, 3, x_236); -lean::cnstr_set_scalar(x_238, sizeof(void*)*4, x_237); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_237); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_238); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; obj* x_249; -x_239 = lean::cnstr_get(x_176, 1); -x_240 = lean::cnstr_get(x_176, 2); -x_241 = lean::cnstr_get(x_176, 3); -lean::inc(x_241); -lean::inc(x_240); -lean::inc(x_239); -lean::dec(x_176); -x_242 = lean::cnstr_get(x_177, 0); -lean::inc(x_242); -x_243 = lean::cnstr_get(x_177, 1); -lean::inc(x_243); -x_244 = lean::cnstr_get(x_177, 2); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_177, 3); -lean::inc(x_245); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_246 = x_177; -} else { - lean::dec_ref(x_177); - x_246 = lean::box(0); -} -x_247 = 1; -if (lean::is_scalar(x_246)) { - x_248 = lean::alloc_cnstr(1, 4, 1); -} else { - x_248 = x_246; -} -lean::cnstr_set(x_248, 0, x_242); -lean::cnstr_set(x_248, 1, x_243); -lean::cnstr_set(x_248, 2, x_244); -lean::cnstr_set(x_248, 3, x_245); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -x_249 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_249, 0, x_241); -lean::cnstr_set(x_249, 1, x_29); -lean::cnstr_set(x_249, 2, x_30); -lean::cnstr_set(x_249, 3, x_31); -lean::cnstr_set_scalar(x_249, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_249); -lean::cnstr_set(x_1, 2, x_240); -lean::cnstr_set(x_1, 1, x_239); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_250; -x_250 = lean::cnstr_get(x_176, 3); -lean::inc(x_250); -if (lean::obj_tag(x_250) == 0) -{ -uint8 x_251; -x_251 = !lean::is_exclusive(x_176); -if (x_251 == 0) -{ -obj* x_252; obj* x_253; uint8 x_254; -x_252 = lean::cnstr_get(x_176, 3); -lean::dec(x_252); -x_253 = lean::cnstr_get(x_176, 0); -lean::dec(x_253); -x_254 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_254); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_255; obj* x_256; uint8 x_257; obj* x_258; -x_255 = lean::cnstr_get(x_176, 1); -x_256 = lean::cnstr_get(x_176, 2); -lean::inc(x_256); -lean::inc(x_255); -lean::dec(x_176); -x_257 = 0; -x_258 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_258, 0, x_177); -lean::cnstr_set(x_258, 1, x_255); -lean::cnstr_set(x_258, 2, x_256); -lean::cnstr_set(x_258, 3, x_250); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -uint8 x_259; -x_259 = lean::cnstr_get_scalar(x_250, sizeof(void*)*4); -if (x_259 == 0) -{ -uint8 x_260; -lean::free_heap_obj(x_1); -x_260 = !lean::is_exclusive(x_176); -if (x_260 == 0) -{ -obj* x_261; obj* x_262; obj* x_263; obj* x_264; uint8 x_265; -x_261 = lean::cnstr_get(x_176, 1); -x_262 = lean::cnstr_get(x_176, 2); -x_263 = lean::cnstr_get(x_176, 3); -lean::dec(x_263); -x_264 = lean::cnstr_get(x_176, 0); -lean::dec(x_264); -x_265 = !lean::is_exclusive(x_250); -if (x_265 == 0) -{ -obj* x_266; obj* x_267; obj* x_268; obj* x_269; uint8 x_270; -x_266 = lean::cnstr_get(x_250, 0); -x_267 = lean::cnstr_get(x_250, 1); -x_268 = lean::cnstr_get(x_250, 2); -x_269 = lean::cnstr_get(x_250, 3); -lean::inc(x_177); -lean::cnstr_set(x_250, 3, x_266); -lean::cnstr_set(x_250, 2, x_262); -lean::cnstr_set(x_250, 1, x_261); -lean::cnstr_set(x_250, 0, x_177); -x_270 = !lean::is_exclusive(x_177); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; -x_271 = lean::cnstr_get(x_177, 3); -lean::dec(x_271); -x_272 = lean::cnstr_get(x_177, 2); -lean::dec(x_272); -x_273 = lean::cnstr_get(x_177, 1); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_177, 0); -lean::dec(x_274); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -lean::cnstr_set(x_177, 3, x_31); -lean::cnstr_set(x_177, 2, x_30); -lean::cnstr_set(x_177, 1, x_29); -lean::cnstr_set(x_177, 0, x_269); -lean::cnstr_set(x_176, 3, x_177); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -else -{ -obj* x_275; -lean::dec(x_177); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -x_275 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_275, 0, x_269); -lean::cnstr_set(x_275, 1, x_29); -lean::cnstr_set(x_275, 2, x_30); -lean::cnstr_set(x_275, 3, x_31); -lean::cnstr_set_scalar(x_275, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_275); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -x_276 = lean::cnstr_get(x_250, 0); -x_277 = lean::cnstr_get(x_250, 1); -x_278 = lean::cnstr_get(x_250, 2); -x_279 = lean::cnstr_get(x_250, 3); -lean::inc(x_279); -lean::inc(x_278); -lean::inc(x_277); -lean::inc(x_276); -lean::dec(x_250); -lean::inc(x_177); -x_280 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_280, 0, x_177); -lean::cnstr_set(x_280, 1, x_261); -lean::cnstr_set(x_280, 2, x_262); -lean::cnstr_set(x_280, 3, x_276); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_281 = x_177; -} else { - lean::dec_ref(x_177); - x_281 = lean::box(0); -} -lean::cnstr_set_scalar(x_280, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_281)) { - x_282 = lean::alloc_cnstr(1, 4, 1); -} else { - x_282 = x_281; -} -lean::cnstr_set(x_282, 0, x_279); -lean::cnstr_set(x_282, 1, x_29); -lean::cnstr_set(x_282, 2, x_30); -lean::cnstr_set(x_282, 3, x_31); -lean::cnstr_set_scalar(x_282, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_282); -lean::cnstr_set(x_176, 2, x_278); -lean::cnstr_set(x_176, 1, x_277); -lean::cnstr_set(x_176, 0, x_280); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_283 = lean::cnstr_get(x_176, 1); -x_284 = lean::cnstr_get(x_176, 2); -lean::inc(x_284); -lean::inc(x_283); -lean::dec(x_176); -x_285 = lean::cnstr_get(x_250, 0); -lean::inc(x_285); -x_286 = lean::cnstr_get(x_250, 1); -lean::inc(x_286); -x_287 = lean::cnstr_get(x_250, 2); -lean::inc(x_287); -x_288 = lean::cnstr_get(x_250, 3); -lean::inc(x_288); -if (lean::is_exclusive(x_250)) { - lean::cnstr_release(x_250, 0); - lean::cnstr_release(x_250, 1); - lean::cnstr_release(x_250, 2); - lean::cnstr_release(x_250, 3); - x_289 = x_250; -} else { - lean::dec_ref(x_250); - x_289 = lean::box(0); -} -lean::inc(x_177); -if (lean::is_scalar(x_289)) { - x_290 = lean::alloc_cnstr(1, 4, 1); -} else { - x_290 = x_289; -} -lean::cnstr_set(x_290, 0, x_177); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_285); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_291 = x_177; -} else { - lean::dec_ref(x_177); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_288); -lean::cnstr_set(x_292, 1, x_29); -lean::cnstr_set(x_292, 2, x_30); -lean::cnstr_set(x_292, 3, x_31); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_225); -x_293 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_293, 0, x_290); -lean::cnstr_set(x_293, 1, x_286); -lean::cnstr_set(x_293, 2, x_287); -lean::cnstr_set(x_293, 3, x_292); -lean::cnstr_set_scalar(x_293, sizeof(void*)*4, x_259); -return x_293; -} -} -else -{ -uint8 x_294; -x_294 = !lean::is_exclusive(x_176); -if (x_294 == 0) -{ -obj* x_295; obj* x_296; uint8 x_297; -x_295 = lean::cnstr_get(x_176, 3); -lean::dec(x_295); -x_296 = lean::cnstr_get(x_176, 0); -lean::dec(x_296); -x_297 = !lean::is_exclusive(x_177); -if (x_297 == 0) -{ -uint8 x_298; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_259); -x_298 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_298); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -else -{ -obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; uint8 x_304; -x_299 = lean::cnstr_get(x_177, 0); -x_300 = lean::cnstr_get(x_177, 1); -x_301 = lean::cnstr_get(x_177, 2); -x_302 = lean::cnstr_get(x_177, 3); -lean::inc(x_302); -lean::inc(x_301); -lean::inc(x_300); -lean::inc(x_299); -lean::dec(x_177); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_299); -lean::cnstr_set(x_303, 1, x_300); -lean::cnstr_set(x_303, 2, x_301); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_259); -x_304 = 0; -lean::cnstr_set(x_176, 0, x_303); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_304); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -else -{ -obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; uint8 x_313; obj* x_314; -x_305 = lean::cnstr_get(x_176, 1); -x_306 = lean::cnstr_get(x_176, 2); -lean::inc(x_306); -lean::inc(x_305); -lean::dec(x_176); -x_307 = lean::cnstr_get(x_177, 0); -lean::inc(x_307); -x_308 = lean::cnstr_get(x_177, 1); -lean::inc(x_308); -x_309 = lean::cnstr_get(x_177, 2); -lean::inc(x_309); -x_310 = lean::cnstr_get(x_177, 3); -lean::inc(x_310); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_311 = x_177; -} else { - lean::dec_ref(x_177); - x_311 = lean::box(0); -} -if (lean::is_scalar(x_311)) { - x_312 = lean::alloc_cnstr(1, 4, 1); -} else { - x_312 = x_311; -} -lean::cnstr_set(x_312, 0, x_307); -lean::cnstr_set(x_312, 1, x_308); -lean::cnstr_set(x_312, 2, x_309); -lean::cnstr_set(x_312, 3, x_310); -lean::cnstr_set_scalar(x_312, sizeof(void*)*4, x_259); -x_313 = 0; -x_314 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_314, 0, x_312); -lean::cnstr_set(x_314, 1, x_305); -lean::cnstr_set(x_314, 2, x_306); -lean::cnstr_set(x_314, 3, x_250); -lean::cnstr_set_scalar(x_314, sizeof(void*)*4, x_313); -lean::cnstr_set(x_1, 0, x_314); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; uint8 x_319; -x_315 = lean::cnstr_get(x_1, 0); -x_316 = lean::cnstr_get(x_1, 1); -x_317 = lean::cnstr_get(x_1, 2); -x_318 = lean::cnstr_get(x_1, 3); -lean::inc(x_318); -lean::inc(x_317); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_1); -x_319 = l_Lean_Name_quickLt(x_2, x_316); -if (x_319 == 0) -{ -uint8 x_320; -x_320 = l_Lean_Name_quickLt(x_316, x_2); -if (x_320 == 0) -{ -obj* x_321; -lean::dec(x_317); -lean::dec(x_316); -x_321 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_321, 0, x_315); -lean::cnstr_set(x_321, 1, x_2); -lean::cnstr_set(x_321, 2, x_3); -lean::cnstr_set(x_321, 3, x_318); -lean::cnstr_set_scalar(x_321, sizeof(void*)*4, x_6); -return x_321; -} -else -{ -uint8 x_322; -x_322 = l_RBNode_isRed___main___rarg(x_318); -if (x_322 == 0) -{ -obj* x_323; obj* x_324; -x_323 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_318, x_2, x_3); -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_315); -lean::cnstr_set(x_324, 1, x_316); -lean::cnstr_set(x_324, 2, x_317); -lean::cnstr_set(x_324, 3, x_323); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_6); -return x_324; -} -else -{ -obj* x_325; -x_325 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_318, x_2, x_3); -if (lean::obj_tag(x_325) == 0) -{ -lean::dec(x_317); -lean::dec(x_316); -lean::dec(x_315); -return x_325; -} -else -{ -obj* x_326; -x_326 = lean::cnstr_get(x_325, 0); -lean::inc(x_326); -if (lean::obj_tag(x_326) == 0) -{ -obj* x_327; -x_327 = lean::cnstr_get(x_325, 3); -lean::inc(x_327); -if (lean::obj_tag(x_327) == 0) -{ -obj* x_328; obj* x_329; obj* x_330; uint8 x_331; obj* x_332; uint8 x_333; obj* x_334; -x_328 = lean::cnstr_get(x_325, 1); -lean::inc(x_328); -x_329 = lean::cnstr_get(x_325, 2); -lean::inc(x_329); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_330 = x_325; -} else { - lean::dec_ref(x_325); - x_330 = lean::box(0); -} -x_331 = 0; -if (lean::is_scalar(x_330)) { - x_332 = lean::alloc_cnstr(1, 4, 1); -} else { - x_332 = x_330; -} -lean::cnstr_set(x_332, 0, x_327); -lean::cnstr_set(x_332, 1, x_328); -lean::cnstr_set(x_332, 2, x_329); -lean::cnstr_set(x_332, 3, x_327); -lean::cnstr_set_scalar(x_332, sizeof(void*)*4, x_331); -x_333 = 1; -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_315); -lean::cnstr_set(x_334, 1, x_316); -lean::cnstr_set(x_334, 2, x_317); -lean::cnstr_set(x_334, 3, x_332); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_333); -return x_334; -} -else -{ -uint8 x_335; -x_335 = lean::cnstr_get_scalar(x_327, sizeof(void*)*4); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; obj* x_346; obj* x_347; -x_336 = lean::cnstr_get(x_325, 1); -lean::inc(x_336); -x_337 = lean::cnstr_get(x_325, 2); -lean::inc(x_337); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_338 = x_325; -} else { - lean::dec_ref(x_325); - x_338 = lean::box(0); -} -x_339 = lean::cnstr_get(x_327, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get(x_327, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_327, 2); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_327, 3); -lean::inc(x_342); -if (lean::is_exclusive(x_327)) { - lean::cnstr_release(x_327, 0); - lean::cnstr_release(x_327, 1); - lean::cnstr_release(x_327, 2); - lean::cnstr_release(x_327, 3); - x_343 = x_327; -} else { - lean::dec_ref(x_327); - x_343 = lean::box(0); -} -x_344 = 1; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_315); -lean::cnstr_set(x_345, 1, x_316); -lean::cnstr_set(x_345, 2, x_317); -lean::cnstr_set(x_345, 3, x_326); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -if (lean::is_scalar(x_338)) { - x_346 = lean::alloc_cnstr(1, 4, 1); -} else { - x_346 = x_338; -} -lean::cnstr_set(x_346, 0, x_339); -lean::cnstr_set(x_346, 1, x_340); -lean::cnstr_set(x_346, 2, x_341); -lean::cnstr_set(x_346, 3, x_342); -lean::cnstr_set_scalar(x_346, sizeof(void*)*4, x_344); -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_345); -lean::cnstr_set(x_347, 1, x_336); -lean::cnstr_set(x_347, 2, x_337); -lean::cnstr_set(x_347, 3, x_346); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_335); -return x_347; -} -else -{ -obj* x_348; obj* x_349; obj* x_350; uint8 x_351; obj* x_352; obj* x_353; -x_348 = lean::cnstr_get(x_325, 1); -lean::inc(x_348); -x_349 = lean::cnstr_get(x_325, 2); -lean::inc(x_349); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_350 = x_325; -} else { - lean::dec_ref(x_325); - x_350 = lean::box(0); -} -x_351 = 0; -if (lean::is_scalar(x_350)) { - x_352 = lean::alloc_cnstr(1, 4, 1); -} else { - x_352 = x_350; -} -lean::cnstr_set(x_352, 0, x_326); -lean::cnstr_set(x_352, 1, x_348); -lean::cnstr_set(x_352, 2, x_349); -lean::cnstr_set(x_352, 3, x_327); -lean::cnstr_set_scalar(x_352, sizeof(void*)*4, x_351); -x_353 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_353, 0, x_315); -lean::cnstr_set(x_353, 1, x_316); -lean::cnstr_set(x_353, 2, x_317); -lean::cnstr_set(x_353, 3, x_352); -lean::cnstr_set_scalar(x_353, sizeof(void*)*4, x_335); -return x_353; -} -} -} -else -{ -uint8 x_354; -x_354 = lean::cnstr_get_scalar(x_326, sizeof(void*)*4); -if (x_354 == 0) -{ -obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; obj* x_367; -x_355 = lean::cnstr_get(x_325, 1); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_325, 2); -lean::inc(x_356); -x_357 = lean::cnstr_get(x_325, 3); -lean::inc(x_357); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_358 = x_325; -} else { - lean::dec_ref(x_325); - x_358 = lean::box(0); -} -x_359 = lean::cnstr_get(x_326, 0); -lean::inc(x_359); -x_360 = lean::cnstr_get(x_326, 1); -lean::inc(x_360); -x_361 = lean::cnstr_get(x_326, 2); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_326, 3); -lean::inc(x_362); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_363 = x_326; -} else { - lean::dec_ref(x_326); - x_363 = lean::box(0); -} -x_364 = 1; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_315); -lean::cnstr_set(x_365, 1, x_316); -lean::cnstr_set(x_365, 2, x_317); -lean::cnstr_set(x_365, 3, x_359); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -if (lean::is_scalar(x_358)) { - x_366 = lean::alloc_cnstr(1, 4, 1); -} else { - x_366 = x_358; -} -lean::cnstr_set(x_366, 0, x_362); -lean::cnstr_set(x_366, 1, x_355); -lean::cnstr_set(x_366, 2, x_356); -lean::cnstr_set(x_366, 3, x_357); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_364); -x_367 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_360); -lean::cnstr_set(x_367, 2, x_361); -lean::cnstr_set(x_367, 3, x_366); -lean::cnstr_set_scalar(x_367, sizeof(void*)*4, x_354); -return x_367; -} -else -{ -obj* x_368; -x_368 = lean::cnstr_get(x_325, 3); -lean::inc(x_368); -if (lean::obj_tag(x_368) == 0) -{ -obj* x_369; obj* x_370; obj* x_371; uint8 x_372; obj* x_373; obj* x_374; -x_369 = lean::cnstr_get(x_325, 1); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_325, 2); -lean::inc(x_370); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_371 = x_325; -} else { - lean::dec_ref(x_325); - x_371 = lean::box(0); -} -x_372 = 0; -if (lean::is_scalar(x_371)) { - x_373 = lean::alloc_cnstr(1, 4, 1); -} else { - x_373 = x_371; -} -lean::cnstr_set(x_373, 0, x_326); -lean::cnstr_set(x_373, 1, x_369); -lean::cnstr_set(x_373, 2, x_370); -lean::cnstr_set(x_373, 3, x_368); -lean::cnstr_set_scalar(x_373, sizeof(void*)*4, x_372); -x_374 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_374, 0, x_315); -lean::cnstr_set(x_374, 1, x_316); -lean::cnstr_set(x_374, 2, x_317); -lean::cnstr_set(x_374, 3, x_373); -lean::cnstr_set_scalar(x_374, sizeof(void*)*4, x_354); -return x_374; -} -else -{ -uint8 x_375; -x_375 = lean::cnstr_get_scalar(x_368, sizeof(void*)*4); -if (x_375 == 0) -{ -obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; -x_376 = lean::cnstr_get(x_325, 1); -lean::inc(x_376); -x_377 = lean::cnstr_get(x_325, 2); -lean::inc(x_377); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_378 = x_325; -} else { - lean::dec_ref(x_325); - x_378 = lean::box(0); -} -x_379 = lean::cnstr_get(x_368, 0); -lean::inc(x_379); -x_380 = lean::cnstr_get(x_368, 1); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_368, 2); -lean::inc(x_381); -x_382 = lean::cnstr_get(x_368, 3); -lean::inc(x_382); -if (lean::is_exclusive(x_368)) { - lean::cnstr_release(x_368, 0); - lean::cnstr_release(x_368, 1); - lean::cnstr_release(x_368, 2); - lean::cnstr_release(x_368, 3); - x_383 = x_368; -} else { - lean::dec_ref(x_368); - x_383 = lean::box(0); -} -lean::inc(x_326); -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(1, 4, 1); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_315); -lean::cnstr_set(x_384, 1, x_316); -lean::cnstr_set(x_384, 2, x_317); -lean::cnstr_set(x_384, 3, x_326); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_385 = x_326; -} else { - lean::dec_ref(x_326); - x_385 = lean::box(0); -} -lean::cnstr_set_scalar(x_384, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_385)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_385; -} -lean::cnstr_set(x_386, 0, x_379); -lean::cnstr_set(x_386, 1, x_380); -lean::cnstr_set(x_386, 2, x_381); -lean::cnstr_set(x_386, 3, x_382); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_378)) { - x_387 = lean::alloc_cnstr(1, 4, 1); -} else { - x_387 = x_378; -} -lean::cnstr_set(x_387, 0, x_384); -lean::cnstr_set(x_387, 1, x_376); -lean::cnstr_set(x_387, 2, x_377); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_375); -return x_387; -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; uint8 x_397; obj* x_398; obj* x_399; -x_388 = lean::cnstr_get(x_325, 1); -lean::inc(x_388); -x_389 = lean::cnstr_get(x_325, 2); -lean::inc(x_389); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_390 = x_325; -} else { - lean::dec_ref(x_325); - x_390 = lean::box(0); -} -x_391 = lean::cnstr_get(x_326, 0); -lean::inc(x_391); -x_392 = lean::cnstr_get(x_326, 1); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_326, 2); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_326, 3); -lean::inc(x_394); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_395 = x_326; -} else { - lean::dec_ref(x_326); - x_395 = lean::box(0); -} -if (lean::is_scalar(x_395)) { - x_396 = lean::alloc_cnstr(1, 4, 1); -} else { - x_396 = x_395; -} -lean::cnstr_set(x_396, 0, x_391); -lean::cnstr_set(x_396, 1, x_392); -lean::cnstr_set(x_396, 2, x_393); -lean::cnstr_set(x_396, 3, x_394); -lean::cnstr_set_scalar(x_396, sizeof(void*)*4, x_375); -x_397 = 0; -if (lean::is_scalar(x_390)) { - x_398 = lean::alloc_cnstr(1, 4, 1); -} else { - x_398 = x_390; -} -lean::cnstr_set(x_398, 0, x_396); -lean::cnstr_set(x_398, 1, x_388); -lean::cnstr_set(x_398, 2, x_389); -lean::cnstr_set(x_398, 3, x_368); -lean::cnstr_set_scalar(x_398, sizeof(void*)*4, x_397); -x_399 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_399, 0, x_315); -lean::cnstr_set(x_399, 1, x_316); -lean::cnstr_set(x_399, 2, x_317); -lean::cnstr_set(x_399, 3, x_398); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_375); -return x_399; -} -} -} -} -} -} -} -} -else -{ -uint8 x_400; -x_400 = l_RBNode_isRed___main___rarg(x_315); -if (x_400 == 0) -{ -obj* x_401; obj* x_402; -x_401 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_315, x_2, x_3); -x_402 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_402, 0, x_401); -lean::cnstr_set(x_402, 1, x_316); -lean::cnstr_set(x_402, 2, x_317); -lean::cnstr_set(x_402, 3, x_318); -lean::cnstr_set_scalar(x_402, sizeof(void*)*4, x_6); -return x_402; -} -else -{ -obj* x_403; -x_403 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_315, x_2, x_3); -if (lean::obj_tag(x_403) == 0) -{ -lean::dec(x_318); -lean::dec(x_317); -lean::dec(x_316); -return x_403; -} -else -{ -obj* x_404; -x_404 = lean::cnstr_get(x_403, 0); -lean::inc(x_404); -if (lean::obj_tag(x_404) == 0) -{ -obj* x_405; -x_405 = lean::cnstr_get(x_403, 3); -lean::inc(x_405); -if (lean::obj_tag(x_405) == 0) -{ -obj* x_406; obj* x_407; obj* x_408; uint8 x_409; obj* x_410; uint8 x_411; obj* x_412; -x_406 = lean::cnstr_get(x_403, 1); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_403, 2); -lean::inc(x_407); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_408 = x_403; -} else { - lean::dec_ref(x_403); - x_408 = lean::box(0); -} -x_409 = 0; -if (lean::is_scalar(x_408)) { - x_410 = lean::alloc_cnstr(1, 4, 1); -} else { - x_410 = x_408; -} -lean::cnstr_set(x_410, 0, x_405); -lean::cnstr_set(x_410, 1, x_406); -lean::cnstr_set(x_410, 2, x_407); -lean::cnstr_set(x_410, 3, x_405); -lean::cnstr_set_scalar(x_410, sizeof(void*)*4, x_409); -x_411 = 1; -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_410); -lean::cnstr_set(x_412, 1, x_316); -lean::cnstr_set(x_412, 2, x_317); -lean::cnstr_set(x_412, 3, x_318); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_411); -return x_412; -} -else -{ -uint8 x_413; -x_413 = lean::cnstr_get_scalar(x_405, sizeof(void*)*4); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; obj* x_424; obj* x_425; -x_414 = lean::cnstr_get(x_403, 1); -lean::inc(x_414); -x_415 = lean::cnstr_get(x_403, 2); -lean::inc(x_415); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_416 = x_403; -} else { - lean::dec_ref(x_403); - x_416 = lean::box(0); -} -x_417 = lean::cnstr_get(x_405, 0); -lean::inc(x_417); -x_418 = lean::cnstr_get(x_405, 1); -lean::inc(x_418); -x_419 = lean::cnstr_get(x_405, 2); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_405, 3); -lean::inc(x_420); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - lean::cnstr_release(x_405, 2); - lean::cnstr_release(x_405, 3); - x_421 = x_405; -} else { - lean::dec_ref(x_405); - x_421 = lean::box(0); -} -x_422 = 1; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_404); -lean::cnstr_set(x_423, 1, x_414); -lean::cnstr_set(x_423, 2, x_415); -lean::cnstr_set(x_423, 3, x_417); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -if (lean::is_scalar(x_416)) { - x_424 = lean::alloc_cnstr(1, 4, 1); -} else { - x_424 = x_416; -} -lean::cnstr_set(x_424, 0, x_420); -lean::cnstr_set(x_424, 1, x_316); -lean::cnstr_set(x_424, 2, x_317); -lean::cnstr_set(x_424, 3, x_318); -lean::cnstr_set_scalar(x_424, sizeof(void*)*4, x_422); -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_418); -lean::cnstr_set(x_425, 2, x_419); -lean::cnstr_set(x_425, 3, x_424); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_413); -return x_425; -} -else -{ -obj* x_426; obj* x_427; obj* x_428; uint8 x_429; obj* x_430; obj* x_431; -x_426 = lean::cnstr_get(x_403, 1); -lean::inc(x_426); -x_427 = lean::cnstr_get(x_403, 2); -lean::inc(x_427); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_428 = x_403; -} else { - lean::dec_ref(x_403); - x_428 = lean::box(0); -} -x_429 = 0; -if (lean::is_scalar(x_428)) { - x_430 = lean::alloc_cnstr(1, 4, 1); -} else { - x_430 = x_428; -} -lean::cnstr_set(x_430, 0, x_404); -lean::cnstr_set(x_430, 1, x_426); -lean::cnstr_set(x_430, 2, x_427); -lean::cnstr_set(x_430, 3, x_405); -lean::cnstr_set_scalar(x_430, sizeof(void*)*4, x_429); -x_431 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_431, 0, x_430); -lean::cnstr_set(x_431, 1, x_316); -lean::cnstr_set(x_431, 2, x_317); -lean::cnstr_set(x_431, 3, x_318); -lean::cnstr_set_scalar(x_431, sizeof(void*)*4, x_413); -return x_431; -} -} -} -else -{ -uint8 x_432; -x_432 = lean::cnstr_get_scalar(x_404, sizeof(void*)*4); -if (x_432 == 0) -{ -obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; obj* x_445; -x_433 = lean::cnstr_get(x_403, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_403, 2); -lean::inc(x_434); -x_435 = lean::cnstr_get(x_403, 3); -lean::inc(x_435); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_436 = x_403; -} else { - lean::dec_ref(x_403); - x_436 = lean::box(0); -} -x_437 = lean::cnstr_get(x_404, 0); -lean::inc(x_437); -x_438 = lean::cnstr_get(x_404, 1); -lean::inc(x_438); -x_439 = lean::cnstr_get(x_404, 2); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_404, 3); -lean::inc(x_440); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_441 = x_404; -} else { - lean::dec_ref(x_404); - x_441 = lean::box(0); -} -x_442 = 1; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_437); -lean::cnstr_set(x_443, 1, x_438); -lean::cnstr_set(x_443, 2, x_439); -lean::cnstr_set(x_443, 3, x_440); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -if (lean::is_scalar(x_436)) { - x_444 = lean::alloc_cnstr(1, 4, 1); -} else { - x_444 = x_436; -} -lean::cnstr_set(x_444, 0, x_435); -lean::cnstr_set(x_444, 1, x_316); -lean::cnstr_set(x_444, 2, x_317); -lean::cnstr_set(x_444, 3, x_318); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_442); -x_445 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_445, 0, x_443); -lean::cnstr_set(x_445, 1, x_433); -lean::cnstr_set(x_445, 2, x_434); -lean::cnstr_set(x_445, 3, x_444); -lean::cnstr_set_scalar(x_445, sizeof(void*)*4, x_432); -return x_445; -} -else -{ -obj* x_446; -x_446 = lean::cnstr_get(x_403, 3); -lean::inc(x_446); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; uint8 x_450; obj* x_451; obj* x_452; -x_447 = lean::cnstr_get(x_403, 1); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_403, 2); -lean::inc(x_448); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_449 = x_403; -} else { - lean::dec_ref(x_403); - x_449 = lean::box(0); -} -x_450 = 0; -if (lean::is_scalar(x_449)) { - x_451 = lean::alloc_cnstr(1, 4, 1); -} else { - x_451 = x_449; -} -lean::cnstr_set(x_451, 0, x_404); -lean::cnstr_set(x_451, 1, x_447); -lean::cnstr_set(x_451, 2, x_448); -lean::cnstr_set(x_451, 3, x_446); -lean::cnstr_set_scalar(x_451, sizeof(void*)*4, x_450); -x_452 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_452, 0, x_451); -lean::cnstr_set(x_452, 1, x_316); -lean::cnstr_set(x_452, 2, x_317); -lean::cnstr_set(x_452, 3, x_318); -lean::cnstr_set_scalar(x_452, sizeof(void*)*4, x_432); -return x_452; -} -else -{ -uint8 x_453; -x_453 = lean::cnstr_get_scalar(x_446, sizeof(void*)*4); -if (x_453 == 0) -{ -obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; obj* x_465; -x_454 = lean::cnstr_get(x_403, 1); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_403, 2); -lean::inc(x_455); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_456 = x_403; -} else { - lean::dec_ref(x_403); - x_456 = lean::box(0); -} -x_457 = lean::cnstr_get(x_446, 0); -lean::inc(x_457); -x_458 = lean::cnstr_get(x_446, 1); -lean::inc(x_458); -x_459 = lean::cnstr_get(x_446, 2); -lean::inc(x_459); -x_460 = lean::cnstr_get(x_446, 3); -lean::inc(x_460); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - lean::cnstr_release(x_446, 1); - lean::cnstr_release(x_446, 2); - lean::cnstr_release(x_446, 3); - x_461 = x_446; -} else { - lean::dec_ref(x_446); - x_461 = lean::box(0); -} -lean::inc(x_404); -if (lean::is_scalar(x_461)) { - x_462 = lean::alloc_cnstr(1, 4, 1); -} else { - x_462 = x_461; -} -lean::cnstr_set(x_462, 0, x_404); -lean::cnstr_set(x_462, 1, x_454); -lean::cnstr_set(x_462, 2, x_455); -lean::cnstr_set(x_462, 3, x_457); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_463 = x_404; -} else { - lean::dec_ref(x_404); - x_463 = lean::box(0); -} -lean::cnstr_set_scalar(x_462, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_463)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_463; -} -lean::cnstr_set(x_464, 0, x_460); -lean::cnstr_set(x_464, 1, x_316); -lean::cnstr_set(x_464, 2, x_317); -lean::cnstr_set(x_464, 3, x_318); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_456)) { - x_465 = lean::alloc_cnstr(1, 4, 1); -} else { - x_465 = x_456; -} -lean::cnstr_set(x_465, 0, x_462); -lean::cnstr_set(x_465, 1, x_458); -lean::cnstr_set(x_465, 2, x_459); -lean::cnstr_set(x_465, 3, x_464); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_453); -return x_465; -} -else -{ -obj* x_466; obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; uint8 x_475; obj* x_476; obj* x_477; -x_466 = lean::cnstr_get(x_403, 1); -lean::inc(x_466); -x_467 = lean::cnstr_get(x_403, 2); -lean::inc(x_467); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_468 = x_403; -} else { - lean::dec_ref(x_403); - x_468 = lean::box(0); -} -x_469 = lean::cnstr_get(x_404, 0); -lean::inc(x_469); -x_470 = lean::cnstr_get(x_404, 1); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_404, 2); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_404, 3); -lean::inc(x_472); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_473 = x_404; -} else { - lean::dec_ref(x_404); - x_473 = lean::box(0); -} -if (lean::is_scalar(x_473)) { - x_474 = lean::alloc_cnstr(1, 4, 1); -} else { - x_474 = x_473; -} -lean::cnstr_set(x_474, 0, x_469); -lean::cnstr_set(x_474, 1, x_470); -lean::cnstr_set(x_474, 2, x_471); -lean::cnstr_set(x_474, 3, x_472); -lean::cnstr_set_scalar(x_474, sizeof(void*)*4, x_453); -x_475 = 0; -if (lean::is_scalar(x_468)) { - x_476 = lean::alloc_cnstr(1, 4, 1); -} else { - x_476 = x_468; -} -lean::cnstr_set(x_476, 0, x_474); -lean::cnstr_set(x_476, 1, x_466); -lean::cnstr_set(x_476, 2, x_467); -lean::cnstr_set(x_476, 3, x_446); -lean::cnstr_set_scalar(x_476, sizeof(void*)*4, x_475); -x_477 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_477, 0, x_476); -lean::cnstr_set(x_477, 1, x_316); -lean::cnstr_set(x_477, 2, x_317); -lean::cnstr_set(x_477, 3, x_318); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_453); -return x_477; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg), 3, 0); -return x_2; -} -} -obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_RBNode_isRed___main___rarg(x_1); -if (x_4 == 0) -{ -obj* x_5; -x_5 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__6___rarg(x_1, x_2, x_3); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__7___rarg(x_1, x_2, x_3); -x_7 = l_RBNode_setBlack___main___rarg(x_6); -return x_7; -} -} -} -obj* l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_TokenMap_insert___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg(x_1, x_2); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__2___rarg(x_1, x_2, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_3); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_RBNode_insert___at_Lean_Parser_TokenMap_insert___spec__5___rarg(x_1, x_2, x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_TokenMap_insert(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_TokenMap_insert___rarg), 3, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_TokenMap_ofList___main___rarg(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_3, 1); -lean::inc(x_6); -lean::dec(x_3); -x_7 = l_Lean_Parser_TokenMap_ofList___main___rarg(x_4); -x_8 = l_Lean_Parser_TokenMap_insert___rarg(x_7, x_5, x_6); -return x_8; -} -} -} -obj* l_Lean_Parser_TokenMap_ofList___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_TokenMap_ofList___main___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_TokenMap_ofList___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_TokenMap_ofList___main___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_TokenMap_ofList(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_TokenMap_ofList___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_tokenMapNil_tokens(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -} -obj* l_Lean_Parser_tokenMapCons_tokens___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_Lean_Parser_tokens___rarg(x_1); -x_4 = l_Lean_Parser_tokens___rarg(x_2); -x_5 = l_List_append___rarg(x_3, x_4); -return x_5; -} -} -obj* l_Lean_Parser_tokenMapCons_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_tokenMapCons_tokens___rarg___boxed), 2, 0); -return x_5; -} -} -obj* l_Lean_Parser_tokenMapCons_tokens___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_tokenMapCons_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_tokenMapCons_tokens(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_commandParserConfigCoeParserConfig(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_commandParserConfigCoeParserConfig___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_commandParserConfigCoeParserConfig(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* initialize_init_lean_parser_parsec(obj*); -obj* initialize_init_lean_parser_syntax(obj*); -obj* initialize_init_lean_parser_rec(obj*); -obj* initialize_init_lean_parser_trie(obj*); -obj* initialize_init_lean_parser_identifier(obj*); -obj* initialize_init_data_rbmap_default(obj*); -obj* initialize_init_lean_message(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_basic(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_parsec(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_syntax(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_rec(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_trie(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_identifier(w); -if (io_result_is_error(w)) return w; -w = initialize_init_data_rbmap_default(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_message(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_maxPrec = _init_l_Lean_Parser_maxPrec(); -lean::mark_persistent(l_Lean_Parser_maxPrec); -l_Lean_Parser_BasicParserM_Monad = _init_l_Lean_Parser_BasicParserM_Monad(); -lean::mark_persistent(l_Lean_Parser_BasicParserM_Monad); -l_Lean_Parser_BasicParserM_Alternative = _init_l_Lean_Parser_BasicParserM_Alternative(); -lean::mark_persistent(l_Lean_Parser_BasicParserM_Alternative); -l_Lean_Parser_BasicParserM_MonadReader = _init_l_Lean_Parser_BasicParserM_MonadReader(); -lean::mark_persistent(l_Lean_Parser_BasicParserM_MonadReader); -l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec = _init_l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec(); -lean::mark_persistent(l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec); -l_Lean_Parser_BasicParserM_MonadExcept = _init_l_Lean_Parser_BasicParserM_MonadExcept(); -lean::mark_persistent(l_Lean_Parser_BasicParserM_MonadExcept); -l_Lean_Parser_run___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_run___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_run___rarg___lambda__1___closed__1); -l_Lean_Parser_run___rarg___closed__1 = _init_l_Lean_Parser_run___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_run___rarg___closed__1); -l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__1 = _init_l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__1(); -lean::mark_persistent(l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__1); -l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__2 = _init_l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__2(); -lean::mark_persistent(l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__2); -l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__3 = _init_l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__3(); -lean::mark_persistent(l_List_mfoldl___main___at_Lean_Parser_mkTokenTrie___spec__1___closed__3); -l_Lean_Parser_mkTokenTrie___closed__1 = _init_l_Lean_Parser_mkTokenTrie___closed__1(); -lean::mark_persistent(l_Lean_Parser_mkTokenTrie___closed__1); -l_Lean_Parser_CommandParserM_Monad___closed__1 = _init_l_Lean_Parser_CommandParserM_Monad___closed__1(); -lean::mark_persistent(l_Lean_Parser_CommandParserM_Monad___closed__1); -l_Lean_Parser_CommandParserM_Alternative___closed__1 = _init_l_Lean_Parser_CommandParserM_Alternative___closed__1(); -lean::mark_persistent(l_Lean_Parser_CommandParserM_Alternative___closed__1); -l_Lean_Parser_CommandParserM_MonadReader___closed__1 = _init_l_Lean_Parser_CommandParserM_MonadReader___closed__1(); -lean::mark_persistent(l_Lean_Parser_CommandParserM_MonadReader___closed__1); -l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec___closed__1 = _init_l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec___closed__1(); -lean::mark_persistent(l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec___closed__1); -l_Lean_Parser_CommandParserM_MonadExcept___closed__1 = _init_l_Lean_Parser_CommandParserM_MonadExcept___closed__1(); -lean::mark_persistent(l_Lean_Parser_CommandParserM_MonadExcept___closed__1); -l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec___closed__1 = _init_l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec___closed__1(); -lean::mark_persistent(l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec___closed__1); -l_Lean_Parser_CommandParserM_MonadReaderAdapter___closed__1 = _init_l_Lean_Parser_CommandParserM_MonadReaderAdapter___closed__1(); -lean::mark_persistent(l_Lean_Parser_CommandParserM_MonadReaderAdapter___closed__1); -l_Lean_Parser_TermParserM_Monad = _init_l_Lean_Parser_TermParserM_Monad(); -lean::mark_persistent(l_Lean_Parser_TermParserM_Monad); -l_Lean_Parser_TermParserM_Alternative = _init_l_Lean_Parser_TermParserM_Alternative(); -lean::mark_persistent(l_Lean_Parser_TermParserM_Alternative); -l_Lean_Parser_TermParserM_MonadReader = _init_l_Lean_Parser_TermParserM_MonadReader(); -lean::mark_persistent(l_Lean_Parser_TermParserM_MonadReader); -l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec = _init_l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec(); -lean::mark_persistent(l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec); -l_Lean_Parser_TermParserM_MonadExcept = _init_l_Lean_Parser_TermParserM_MonadExcept(); -lean::mark_persistent(l_Lean_Parser_TermParserM_MonadExcept); -l_Lean_Parser_TermParserM_Lean_Parser_MonadRec = _init_l_Lean_Parser_TermParserM_Lean_Parser_MonadRec(); -lean::mark_persistent(l_Lean_Parser_TermParserM_Lean_Parser_MonadRec); -l_Lean_Parser_TermParserM_Lean_Parser_monadBasicParser = _init_l_Lean_Parser_TermParserM_Lean_Parser_monadBasicParser(); -lean::mark_persistent(l_Lean_Parser_TermParserM_Lean_Parser_monadBasicParser); -l_Lean_Parser_TrailingTermParserM_Monad = _init_l_Lean_Parser_TrailingTermParserM_Monad(); -lean::mark_persistent(l_Lean_Parser_TrailingTermParserM_Monad); -l_Lean_Parser_TrailingTermParserM_Alternative = _init_l_Lean_Parser_TrailingTermParserM_Alternative(); -lean::mark_persistent(l_Lean_Parser_TrailingTermParserM_Alternative); -l_Lean_Parser_TrailingTermParserM_MonadReader = _init_l_Lean_Parser_TrailingTermParserM_MonadReader(); -lean::mark_persistent(l_Lean_Parser_TrailingTermParserM_MonadReader); -l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec = _init_l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec(); -lean::mark_persistent(l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec); -l_Lean_Parser_TrailingTermParserM_MonadExcept = _init_l_Lean_Parser_TrailingTermParserM_MonadExcept(); -lean::mark_persistent(l_Lean_Parser_TrailingTermParserM_MonadExcept); -l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadRec = _init_l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadRec(); -lean::mark_persistent(l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadRec); -l_Lean_Parser_TrailingTermParserM_Lean_Parser_monadBasicParser = _init_l_Lean_Parser_TrailingTermParserM_Lean_Parser_monadBasicParser(); -lean::mark_persistent(l_Lean_Parser_TrailingTermParserM_Lean_Parser_monadBasicParser); -return w; -} diff --git a/src/stage0/init/lean/parser/combinators.cpp b/src/stage0/init/lean/parser/combinators.cpp deleted file mode 100644 index bab65352aa..0000000000 --- a/src/stage0/init/lean/parser/combinators.cpp +++ /dev/null @@ -1,4610 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.combinators -// Imports: init.lean.parser.basic init.data.list.instances -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_Combinators_coe_view___rarg(obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_node_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf_view___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqRight_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_recurse_view(obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___boxed(obj*); -obj* l_Lean_Parser_Combinators_label_view___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestChoice_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_monadLift_view___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*, uint8); -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_anyOf_view(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_view___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choice___rarg(obj*, obj*, obj*, obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_Combinators_sepBy1___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, uint8, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestChoice___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional___boxed(obj*); -obj* l_Lean_Parser_Combinators_monadLift_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_monadLift_view(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___boxed(obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main(obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choice_tokens___rarg(obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1___boxed(obj*); -obj* l_Lean_Parser_Combinators_optional_viewDefault___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_Combinators_longestMatch_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_node___boxed(obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_Combinators_recurse_view___boxed(obj*, obj*, obj*); -extern obj* l_Lean_Parser_choice; -obj* l_Lean_Parser_Combinators_many_tokens___rarg(obj*); -obj* l_Lean_Parser_Combinators_seq___boxed(obj*); -obj* l_Lean_Parser_Combinators_optional_view___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_Combinators_monadLift_view___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_recurse_tokens(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, uint8, obj*); -obj* l_Lean_Parser_Combinators_optional(obj*); -obj* l_Lean_Parser_Combinators_anyOf(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqLeft_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_label_tokens___rarg(obj*); -obj* l_Lean_Parser_Combinators_node___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_node_tokens___rarg___boxed(obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_monadLift_tokens___rarg___boxed(obj*); -obj* l_List_reverse___rarg(obj*); -obj* l_Lean_Parser_Combinators_node___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqRight_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_label_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestMatch___boxed(obj*); -obj* l_Lean_Parser_Combinators_recurse_tokens___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_viewDefault___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqLeft_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_tokens___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1_View___boxed(obj*); -obj* l_Lean_Parser_Combinators_longestChoice_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_sepBy1_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestChoice___boxed(obj*); -obj* l_Lean_Parser_Combinators_sepBy___rarg(obj*, obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_Combinators_try_view___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_List_map___main___rarg(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__2___boxed(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_try_view(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_label_view(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1_View(obj*); -obj* l_Lean_Parser_Combinators_label_tokens___rarg___boxed(obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_view___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_Combinators_sepBy1_View___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_viewDefault___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional_viewDefault(obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Parser_Combinators_longestMatch_tokens___rarg(obj*); -obj* l_Lean_Parser_Combinators_longestChoice___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestChoice_tokens___rarg(obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1___boxed(obj*); -obj* l_Lean_Parser_Combinators_anyOf_tokens(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional_viewDefault___rarg(obj*, obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_Combinators_seq(obj*); -obj* l_Lean_Parser_Combinators_recurse_view___rarg(obj*, obj*); -obj* l_List_enumFrom___main___rarg(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_tokens___rarg(obj*, obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux(obj*); -obj* l_Lean_Parser_Combinators_anyOf_view___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_try_view___rarg(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_monadLift_view___rarg(obj*, obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -obj* l_Lean_Parser_Combinators_choice_tokens(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_join___main___rarg(obj*); -obj* l_Lean_Parser_Combinators_choice___boxed(obj*); -obj* l_Lean_Parser_Combinators_sepBy___boxed(obj*); -obj* l_Lean_Parser_Combinators_many1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqRight_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestMatch_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, uint8, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_view(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many_view(obj*, obj*); -obj* l_Lean_Parser_Combinators_many(obj*); -obj* l_Lean_Parser_Combinators_sepBy_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -obj* l_Lean_Parser_Combinators_optional___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqRight_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_try_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqLeft_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_seqRight_tokens___rarg(obj*); -obj* l_Lean_Parser_Combinators_choice_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___boxed(obj*); -obj* l_Lean_Parser_Combinators_anyOf_tokens___rarg(obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_node_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_noKind; -obj* l_Lean_Parser_Combinators_longestMatch(obj*); -obj* l_Lean_Parser_Combinators_optional_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_append___rarg(obj*, obj*); -obj* l_Lean_Parser_Combinators_choice(obj*); -obj* l_Lean_Parser_Combinators_many___boxed(obj*); -obj* l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_Combinators_optional_view___rarg___lambda__2(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1_View___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestMatch_view___rarg(obj*, obj*, obj*, obj*, obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Parser_Combinators_seqLeft_view(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_tokens___rarg(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_Combinators_seqLeft_view___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choice_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_many_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_try___rarg___closed__1; -obj* l___private_init_lean_parser_combinators_2__sepByAux___boxed(obj*); -obj* l_Lean_Parser_Combinators_coe_tokens___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional___rarg___lambda__2(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestMatch___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_try_tokens(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqRight_view(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestMatch___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_Combinators_longestChoice(obj*); -obj* l_Lean_Parser_Combinators_seqRight_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_label_view___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_node_view(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestMatch_tokens(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_try_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_optional___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1_tokens___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_longestChoice_tokens(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_List_foldl___main___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_view(obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1(obj*); -obj* l_Lean_Parser_Combinators_anyOf_view___rarg___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_node_view___boxed(obj*, obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___boxed(obj*); -obj* l_Lean_Parser_Combinators_node_tokens___rarg(obj*); -obj* l_Lean_Parser_Combinators_monadLift_tokens___rarg(obj*); -obj* l_Lean_Parser_Combinators_many1_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seq___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1___boxed(obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1(obj*); -obj* l_Lean_Parser_Combinators_many1(obj*); -obj* l_Lean_Parser_Combinators_SepBy_Elem_View_itemCoe(obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_label_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main(obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1___rarg(obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__2(obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___rarg(obj*, obj*, obj*, obj*, obj*, obj*, uint8, uint8, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1_View___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, uint8, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_viewDefault(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy(obj*); -obj* l_Lean_Parser_Combinators_optional_view___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___rarg(obj*, obj*, obj*, obj*, obj*); -extern "C" obj* lean_name_mk_numeral(obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main(obj*); -obj* l_Lean_Parser_Combinators_seqLeft_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1(obj*); -obj* l_Lean_Parser_Combinators_longestMatch_view(obj*); -extern obj* l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg(obj*, obj*, obj*, obj*, obj*, obj*, uint8, uint8, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_label_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_tokens(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_optional___rarg___closed__1; -obj* l_Lean_Parser_Combinators_node(obj*); -obj* l_Lean_Parser_Combinators_many_tokens(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_view(obj*); -obj* l_Lean_Parser_Combinators_optional_tokens___rarg(obj*, uint8); -obj* l_Lean_Parser_Combinators_choiceAux(obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, uint8, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_node___rarg___lambda__1(obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqLeft_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional_tokens___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_choice___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional___rarg___lambda__2___boxed(obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional_tokens(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___boxed(obj*); -obj* l_Lean_Parser_Combinators_optional___rarg(obj*, obj*, obj*, obj*, obj*, uint8); -obj* l___private_init_lean_parser_combinators_1__many1Aux(obj*); -obj* l_Lean_Parser_Combinators_longestMatch_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_seq___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_longestMatch_view___boxed(obj*); -obj* l_Lean_Parser_Combinators_monadLift_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1_View___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_SepBy_Elem_View_itemCoe___rarg(obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___boxed(obj*); -obj* l_Lean_Parser_Combinators_optional_view(obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_view___rarg___lambda__2(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, uint8, obj*); -obj* l_Lean_Parser_Combinators_optional_viewDefault___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqRight_view___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_coe_viewDefault___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many___rarg___closed__1; -obj* l___private_init_lean_parser_combinators_2__sepByAux___main(obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_view___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_node_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_tokens___rarg(obj*); -obj* l_Lean_Parser_Combinators_seqLeft_tokens___rarg(obj*); -obj* l_Lean_Parser_Combinators_optional_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_Combinators_recurse_view___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_many_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_try_view___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_try_tokens___rarg(obj*); -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1_view___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_Combinators_anyOf_tokens___rarg___boxed(obj*); -obj* l_Lean_Parser_Combinators_many_view___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_view___boxed(obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; -lean::dec(x_3); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -lean::dec(x_2); -x_6 = lean::apply_2(x_5, lean::box(0), x_4); -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_4, 3); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_4); -if (x_8 == 0) -{ -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_9 = lean::cnstr_get(x_4, 3); -lean::dec(x_9); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -lean::dec(x_2); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_1); -x_13 = l_List_reverse___rarg(x_12); -x_14 = l_Lean_Parser_Syntax_mkNode(x_3, x_13); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_4, 3, x_15); -x_16 = lean::apply_2(x_10, lean::box(0), x_4); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_17 = lean::cnstr_get(x_4, 0); -x_18 = lean::cnstr_get(x_4, 1); -x_19 = lean::cnstr_get(x_4, 2); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_4); -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_1); -x_23 = l_List_reverse___rarg(x_22); -x_24 = l_Lean_Parser_Syntax_mkNode(x_3, x_23); -x_25 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -x_26 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_26, 0, x_17); -lean::cnstr_set(x_26, 1, x_18); -lean::cnstr_set(x_26, 2, x_19); -lean::cnstr_set(x_26, 3, x_25); -x_27 = lean::apply_2(x_20, lean::box(0), x_26); -return x_27; -} -} -else -{ -uint8 x_28; -x_28 = !lean::is_exclusive(x_4); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; uint8 x_31; -x_29 = lean::cnstr_get(x_4, 3); -lean::dec(x_29); -x_30 = lean::cnstr_get(x_2, 0); -lean::inc(x_30); -lean::dec(x_2); -x_31 = !lean::is_exclusive(x_7); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = lean::cnstr_get(x_7, 0); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_1); -x_34 = l_List_reverse___rarg(x_33); -x_35 = l_Lean_Parser_Syntax_mkNode(x_3, x_34); -lean::cnstr_set(x_7, 0, x_35); -x_36 = lean::apply_2(x_30, lean::box(0), x_4); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_7, 0); -lean::inc(x_37); -lean::dec(x_7); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_1); -x_39 = l_List_reverse___rarg(x_38); -x_40 = l_Lean_Parser_Syntax_mkNode(x_3, x_39); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_4, 3, x_41); -x_42 = lean::apply_2(x_30, lean::box(0), x_4); -return x_42; -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_43 = lean::cnstr_get(x_4, 0); -x_44 = lean::cnstr_get(x_4, 1); -x_45 = lean::cnstr_get(x_4, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::inc(x_43); -lean::dec(x_4); -x_46 = lean::cnstr_get(x_2, 0); -lean::inc(x_46); -lean::dec(x_2); -x_47 = lean::cnstr_get(x_7, 0); -lean::inc(x_47); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_48 = x_7; -} else { - lean::dec_ref(x_7); - x_48 = lean::box(0); -} -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_1); -x_50 = l_List_reverse___rarg(x_49); -x_51 = l_Lean_Parser_Syntax_mkNode(x_3, x_50); -if (lean::is_scalar(x_48)) { - x_52 = lean::alloc_cnstr(1, 1, 0); -} else { - x_52 = x_48; -} -lean::cnstr_set(x_52, 0, x_51); -x_53 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_53, 0, x_43); -lean::cnstr_set(x_53, 1, x_44); -lean::cnstr_set(x_53, 2, x_45); -lean::cnstr_set(x_53, 3, x_52); -x_54 = lean::apply_2(x_46, lean::box(0), x_53); -return x_54; -} -} -} -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(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_2); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -return x_7; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__3(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; -x_8 = l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_7, x_6); -return x_8; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::apply_2(x_9, lean::box(0), x_6); -return x_10; -} -else -{ -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; -x_11 = lean::cnstr_get(x_7, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_7, 1); -lean::inc(x_12); -lean::dec(x_7); -x_13 = lean::cnstr_get(x_1, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_2, 1); -lean::inc(x_14); -lean::inc(x_4); -lean::inc(x_2); -lean::inc(x_6); -x_15 = lean::alloc_closure(reinterpret_cast(l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__1), 4, 3); -lean::closure_set(x_15, 0, x_6); -lean::closure_set(x_15, 1, x_2); -lean::closure_set(x_15, 2, x_4); -x_16 = lean::apply_3(x_14, lean::box(0), x_11, x_15); -lean::inc(x_3); -x_17 = lean::alloc_closure(reinterpret_cast(l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__2), 3, 2); -lean::closure_set(x_17, 0, x_3); -lean::closure_set(x_17, 1, x_6); -lean::inc(x_5); -x_18 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_16, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg___lambda__3), 7, 6); -lean::closure_set(x_19, 0, x_1); -lean::closure_set(x_19, 1, x_2); -lean::closure_set(x_19, 2, x_3); -lean::closure_set(x_19, 3, x_4); -lean::closure_set(x_19, 4, x_5); -lean::closure_set(x_19, 5, x_12); -x_20 = lean::apply_4(x_13, lean::box(0), lean::box(0), x_18, x_19); -return x_20; -} -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_node___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_List_reverse___rarg(x_3); -x_7 = l_Lean_Parser_Syntax_mkNode(x_2, x_6); -x_8 = lean::apply_2(x_5, lean::box(0), x_7); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_node___rarg(obj* x_1, obj* 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; obj* x_11; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::box(0); -lean::inc(x_7); -lean::inc(x_5); -lean::inc(x_4); -x_9 = l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___rarg(x_1, x_2, x_4, x_5, x_7, x_8, x_6); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___rarg___lambda__1), 3, 2); -lean::closure_set(x_10, 0, x_4); -lean::closure_set(x_10, 1, x_5); -x_11 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_Combinators_node(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_List_mfoldl___main___at_Lean_Parser_Combinators_node___spec__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_node___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_node___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_3); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_node___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_node(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_seq___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Combinators_node___rarg(x_1, x_2, x_3, x_4, x_6, x_5); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_seq(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_seq___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_seq___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_seq___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_seq___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_seq(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_node_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_node_tokens(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; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node_tokens___rarg___boxed), 1, 0); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_node_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_node_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_node_tokens___boxed(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; -x_8 = l_Lean_Parser_Combinators_node_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_node_view___rarg(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; -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -return x_7; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_7); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -obj* l_Lean_Parser_Combinators_node_view(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node_view___rarg___boxed), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_node_view___rarg___boxed(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; -x_8 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_node_view___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_node_view(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::cnstr_get(x_3, 3); -lean::inc(x_4); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; uint8 x_6; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_7 = lean::cnstr_get(x_3, 3); -lean::dec(x_7); -x_8 = lean::box(3); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_2); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_List_reverse___rarg(x_10); -x_12 = l_Lean_Parser_noKind; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_3, 3, x_14); -x_15 = lean::apply_2(x_5, lean::box(0), x_3); -return x_15; -} -else -{ -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; -x_16 = lean::cnstr_get(x_3, 0); -x_17 = lean::cnstr_get(x_3, 1); -x_18 = lean::cnstr_get(x_3, 2); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_3); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_List_reverse___rarg(x_21); -x_23 = l_Lean_Parser_noKind; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -x_25 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -x_26 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_26, 0, x_16); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_18); -lean::cnstr_set(x_26, 3, x_25); -x_27 = lean::apply_2(x_5, lean::box(0), x_26); -return x_27; -} -} -else -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_1, 0); -lean::inc(x_28); -lean::dec(x_1); -x_29 = !lean::is_exclusive(x_3); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::cnstr_get(x_3, 3); -lean::dec(x_30); -x_31 = !lean::is_exclusive(x_4); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_32 = lean::cnstr_get(x_4, 0); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_2); -x_34 = lean::box(3); -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 = l_List_reverse___rarg(x_35); -x_37 = l_Lean_Parser_noKind; -x_38 = l_Lean_Parser_Syntax_mkNode(x_37, x_36); -lean::cnstr_set(x_4, 0, x_38); -x_39 = lean::apply_2(x_28, lean::box(0), x_3); -return x_39; -} -else -{ -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; -x_40 = lean::cnstr_get(x_4, 0); -lean::inc(x_40); -lean::dec(x_4); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_2); -x_42 = lean::box(3); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_41); -x_44 = l_List_reverse___rarg(x_43); -x_45 = l_Lean_Parser_noKind; -x_46 = l_Lean_Parser_Syntax_mkNode(x_45, x_44); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_3, 3, x_47); -x_48 = lean::apply_2(x_28, lean::box(0), x_3); -return x_48; -} -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_49 = lean::cnstr_get(x_3, 0); -x_50 = lean::cnstr_get(x_3, 1); -x_51 = lean::cnstr_get(x_3, 2); -lean::inc(x_51); -lean::inc(x_50); -lean::inc(x_49); -lean::dec(x_3); -x_52 = lean::cnstr_get(x_4, 0); -lean::inc(x_52); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - x_53 = x_4; -} else { - lean::dec_ref(x_4); - x_53 = lean::box(0); -} -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_2); -x_55 = lean::box(3); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_54); -x_57 = l_List_reverse___rarg(x_56); -x_58 = l_Lean_Parser_noKind; -x_59 = l_Lean_Parser_Syntax_mkNode(x_58, x_57); -if (lean::is_scalar(x_53)) { - x_60 = lean::alloc_cnstr(1, 1, 0); -} else { - x_60 = x_53; -} -lean::cnstr_set(x_60, 0, x_59); -x_61 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_61, 0, x_49); -lean::cnstr_set(x_61, 1, x_50); -lean::cnstr_set(x_61, 2, x_51); -lean::cnstr_set(x_61, 3, x_60); -x_62 = lean::apply_2(x_28, lean::box(0), x_61); -return x_62; -} -} -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__2(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_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; -x_9 = lean::cnstr_get(x_1, 2); -lean::inc(x_9); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_2); -lean::inc(x_10); -lean::inc(x_1); -x_11 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg(x_3, x_4, x_5, x_1, x_6, x_10, x_7); -x_12 = lean::cnstr_get(x_1, 0); -lean::inc(x_12); -lean::dec(x_1); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -x_14 = l_List_reverse___rarg(x_10); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::apply_2(x_13, lean::box(0), x_16); -x_18 = lean::apply_3(x_9, lean::box(0), x_11, x_17); -return x_18; -} -} -obj* _init_l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("unreachable"); -return x_1; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg(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; -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::nat_dec_eq(x_7, x_8); -if (x_9 == 0) -{ -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_10 = lean::mk_nat_obj(1u); -x_11 = lean::nat_sub(x_7, x_10); -x_12 = lean::cnstr_get(x_1, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_2, 1); -lean::inc(x_13); -lean::inc(x_6); -lean::inc(x_2); -x_14 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__1), 3, 2); -lean::closure_set(x_14, 0, x_2); -lean::closure_set(x_14, 1, x_6); -lean::inc(x_5); -x_15 = lean::apply_3(x_13, lean::box(0), x_5, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__2___boxed), 8, 7); -lean::closure_set(x_16, 0, x_4); -lean::closure_set(x_16, 1, x_6); -lean::closure_set(x_16, 2, x_1); -lean::closure_set(x_16, 3, x_2); -lean::closure_set(x_16, 4, x_3); -lean::closure_set(x_16, 5, x_5); -lean::closure_set(x_16, 6, x_11); -x_17 = lean::apply_4(x_12, lean::box(0), lean::box(0), x_15, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_18 = lean::box(0); -x_19 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_20 = l_mjoin___rarg___closed__1; -x_21 = l_Lean_Parser_MonadParsec_error___rarg(x_3, lean::box(0), x_19, x_20, x_18, x_18); -return x_21; -} -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___boxed), 7, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__2___boxed(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_9; -x_9 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_7); -return x_9; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___boxed(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; -x_8 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l___private_init_lean_parser_combinators_1__many1Aux___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___rarg(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; -x_8 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -return x_8; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_1__many1Aux___rarg___boxed), 7, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___rarg___boxed(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; -x_8 = l___private_init_lean_parser_combinators_1__many1Aux___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l___private_init_lean_parser_combinators_1__many1Aux(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many1___rarg___lambda__1(obj* x_1, obj* 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; -x_7 = lean::box(0); -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_add(x_6, x_8); -x_10 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg(x_1, x_2, x_3, x_4, x_5, x_7, x_9); -lean::dec(x_9); -return x_10; -} -} -obj* l_Lean_Parser_Combinators_many1___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_3, 0); -lean::inc(x_10); -x_11 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_14 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_13, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___rarg___lambda__1___boxed), 6, 5); -lean::closure_set(x_15, 0, x_1); -lean::closure_set(x_15, 1, x_2); -lean::closure_set(x_15, 2, x_3); -lean::closure_set(x_15, 3, x_4); -lean::closure_set(x_15, 4, x_5); -x_16 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_14, x_15); -return x_16; -} -} -obj* l_Lean_Parser_Combinators_many1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many1___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_many1___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_many1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_many1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many1_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many1_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1_tokens___rarg___boxed), 1, 0); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_many1_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_many1_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many1_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_many1_tokens(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_many1_view___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::box(3); -x_6 = lean::apply_1(x_4, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -lean::dec(x_3); -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -lean::dec(x_1); -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -x_12 = l_List_map___main___rarg(x_10, x_11); -return x_12; -} -} -} -obj* l_Lean_Parser_Combinators_many1_view___rarg___lambda__2(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_map___main___rarg(x_3, x_2); -x_5 = l_Lean_Parser_noKind; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_many1_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1_view___rarg___lambda__1), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1_view___rarg___lambda__2), 2, 1); -lean::closure_set(x_8, 0, x_6); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_many1_view(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1_view___rarg___boxed), 6, 0); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_many1_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_many1_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_many1_view___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_many1_view(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Combinators_many___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_many___rarg(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_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_4, 2); -lean::inc(x_6); -lean::inc(x_4); -x_7 = l_Lean_Parser_Combinators_many1___rarg(x_1, x_2, x_3, x_4, x_5); -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_11 = lean::apply_2(x_9, lean::box(0), x_10); -x_12 = lean::apply_3(x_6, lean::box(0), x_7, x_11); -return x_12; -} -} -obj* l_Lean_Parser_Combinators_many(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_many(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many_tokens___rarg___boxed), 1, 0); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_many_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_many_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_many_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_many_tokens(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_many_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1_view___rarg___lambda__1), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1_view___rarg___lambda__2), 2, 1); -lean::closure_set(x_8, 0, x_6); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_many_view(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many_view___rarg___boxed), 6, 0); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_many_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_many_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_many_view___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_many_view(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__1(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, uint8 x_10, obj* x_11, obj* x_12) { -_start: -{ -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_2); -x_14 = l_List_reverse___rarg(x_13); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::apply_2(x_3, lean::box(0), x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_3); -x_18 = lean::cnstr_get(x_12, 0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_1); -lean::cnstr_set(x_19, 1, x_2); -lean::inc(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l___private_init_lean_parser_combinators_2__sepByAux___main___rarg(x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_10, x_20, x_11); -return x_21; -} -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, uint8 x_8, obj* x_9, obj* x_10, obj* x_11) { -_start: -{ -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_9); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_12 = lean::cnstr_get(x_1, 0); -lean::inc(x_12); -lean::dec(x_1); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -x_14 = l_List_reverse___rarg(x_2); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::apply_2(x_13, lean::box(0), x_16); -return x_17; -} -else -{ -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_31; obj* x_32; obj* x_33; obj* x_34; -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -x_19 = lean::cnstr_get(x_3, 1); -lean::inc(x_19); -x_20 = l_Lean_Parser_MonadParsec_try___rarg___closed__1; -lean::inc(x_4); -x_21 = lean::apply_3(x_19, lean::box(0), x_20, x_4); -x_22 = lean::cnstr_get(x_1, 2); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -lean::dec(x_24); -x_26 = l_optional___rarg___closed__1; -x_27 = lean::apply_4(x_25, lean::box(0), lean::box(0), x_26, x_21); -x_28 = lean::cnstr_get(x_23, 1); -lean::inc(x_28); -lean::dec(x_23); -x_29 = lean::box(0); -lean::inc(x_28); -x_30 = lean::apply_2(x_28, lean::box(0), x_29); -x_31 = lean::apply_3(x_22, lean::box(0), x_27, x_30); -x_32 = lean::box(x_8); -x_33 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__1___boxed), 12, 11); -lean::closure_set(x_33, 0, x_18); -lean::closure_set(x_33, 1, x_2); -lean::closure_set(x_33, 2, x_28); -lean::closure_set(x_33, 3, x_5); -lean::closure_set(x_33, 4, x_6); -lean::closure_set(x_33, 5, x_3); -lean::closure_set(x_33, 6, x_1); -lean::closure_set(x_33, 7, x_7); -lean::closure_set(x_33, 8, x_4); -lean::closure_set(x_33, 9, x_32); -lean::closure_set(x_33, 10, x_9); -x_34 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_31, x_33); -return x_34; -} -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7, uint8 x_8, obj* x_9, obj* x_10) { -_start: -{ -obj* x_11; uint8 x_12; -x_11 = lean::mk_nat_obj(0u); -x_12 = lean::nat_dec_eq(x_10, x_11); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = lean::mk_nat_obj(1u); -x_14 = lean::nat_sub(x_10, x_13); -x_15 = lean::cnstr_get(x_1, 1); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_2, 1); -lean::inc(x_16); -lean::inc(x_9); -lean::inc(x_2); -x_17 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___lambda__1), 3, 2); -lean::closure_set(x_17, 0, x_2); -lean::closure_set(x_17, 1, x_9); -x_18 = lean::box(x_7); -lean::inc(x_15); -lean::inc(x_5); -lean::inc(x_4); -x_19 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__2___boxed), 11, 10); -lean::closure_set(x_19, 0, x_4); -lean::closure_set(x_19, 1, x_9); -lean::closure_set(x_19, 2, x_3); -lean::closure_set(x_19, 3, x_6); -lean::closure_set(x_19, 4, x_1); -lean::closure_set(x_19, 5, x_2); -lean::closure_set(x_19, 6, x_5); -lean::closure_set(x_19, 7, x_18); -lean::closure_set(x_19, 8, x_14); -lean::closure_set(x_19, 9, x_15); -if (x_8 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_20 = lean::cnstr_get(x_4, 0); -lean::inc(x_20); -lean::dec(x_4); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -lean::dec(x_20); -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -lean::dec(x_21); -x_23 = l_optional___rarg___closed__1; -x_24 = lean::apply_4(x_22, lean::box(0), lean::box(0), x_23, x_5); -x_25 = lean::apply_3(x_16, lean::box(0), x_24, x_17); -x_26 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_25, x_19); -return x_26; -} -else -{ -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_37; obj* x_38; -x_27 = lean::cnstr_get(x_4, 2); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_4, 0); -lean::inc(x_28); -lean::dec(x_4); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -lean::dec(x_29); -x_31 = l_optional___rarg___closed__1; -x_32 = lean::apply_4(x_30, lean::box(0), lean::box(0), x_31, x_5); -x_33 = lean::cnstr_get(x_28, 1); -lean::inc(x_33); -lean::dec(x_28); -x_34 = lean::box(0); -x_35 = lean::apply_2(x_33, lean::box(0), x_34); -x_36 = lean::apply_3(x_27, lean::box(0), x_32, x_35); -x_37 = lean::apply_3(x_16, lean::box(0), x_36, x_17); -x_38 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_37, x_19); -return x_38; -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_9); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_39 = lean::box(0); -x_40 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_41 = l_mjoin___rarg___closed__1; -x_42 = l_Lean_Parser_MonadParsec_error___rarg(x_3, lean::box(0), x_40, x_41, x_39, x_39); -return x_42; -} -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___boxed), 10, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__1___boxed(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) { -_start: -{ -uint8 x_13; obj* x_14; -x_13 = lean::unbox(x_10); -lean::dec(x_10); -x_14 = l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_13, x_11, x_12); -lean::dec(x_12); -lean::dec(x_11); -return x_14; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__2___boxed(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) { -_start: -{ -uint8 x_12; obj* x_13; -x_12 = lean::unbox(x_8); -lean::dec(x_8); -x_13 = l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_12, x_9, x_10, x_11); -return x_13; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___rarg___boxed(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_7); -lean::dec(x_7); -x_12 = lean::unbox(x_8); -lean::dec(x_8); -x_13 = l___private_init_lean_parser_combinators_2__sepByAux___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_11, x_12, x_9, x_10); -lean::dec(x_10); -return x_13; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l___private_init_lean_parser_combinators_2__sepByAux___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7, uint8 x_8, obj* x_9, obj* x_10) { -_start: -{ -obj* x_11; -x_11 = l___private_init_lean_parser_combinators_2__sepByAux___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_11; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_2__sepByAux___rarg___boxed), 10, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___rarg___boxed(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_7); -lean::dec(x_7); -x_12 = lean::unbox(x_8); -lean::dec(x_8); -x_13 = l___private_init_lean_parser_combinators_2__sepByAux___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_11, x_12, x_9, x_10); -lean::dec(x_10); -return x_13; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l___private_init_lean_parser_combinators_2__sepByAux(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_sepBy___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7, obj* x_8) { -_start: -{ -obj* x_9; obj* x_10; obj* x_11; uint8 x_12; obj* x_13; -x_9 = lean::box(0); -x_10 = lean::mk_nat_obj(1u); -x_11 = lean::nat_add(x_8, x_10); -x_12 = 1; -x_13 = l___private_init_lean_parser_combinators_2__sepByAux___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_12, x_9, x_11); -lean::dec(x_11); -return x_13; -} -} -obj* l_Lean_Parser_Combinators_sepBy___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7) { -_start: -{ -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; -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -x_13 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_14 = lean::apply_2(x_12, lean::box(0), x_13); -x_15 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_16 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_15, x_14); -x_17 = lean::box(x_7); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy___rarg___lambda__1___boxed), 8, 7); -lean::closure_set(x_18, 0, x_1); -lean::closure_set(x_18, 1, x_2); -lean::closure_set(x_18, 2, x_3); -lean::closure_set(x_18, 3, x_4); -lean::closure_set(x_18, 4, x_5); -lean::closure_set(x_18, 5, x_6); -lean::closure_set(x_18, 6, x_17); -x_19 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_16, x_18); -return x_19; -} -} -obj* l_Lean_Parser_Combinators_sepBy(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy___rarg___boxed), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_sepBy___rarg___lambda__1___boxed(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: -{ -uint8 x_9; obj* x_10; -x_9 = lean::unbox(x_7); -lean::dec(x_7); -x_10 = l_Lean_Parser_Combinators_sepBy___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_9, x_8); -lean::dec(x_8); -return x_10; -} -} -obj* l_Lean_Parser_Combinators_sepBy___rarg___boxed(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_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_Combinators_sepBy___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_sepBy___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_sepBy(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_sepBy1___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7, obj* x_8) { -_start: -{ -obj* x_9; obj* x_10; obj* x_11; uint8 x_12; obj* x_13; -x_9 = lean::box(0); -x_10 = lean::mk_nat_obj(1u); -x_11 = lean::nat_add(x_8, x_10); -x_12 = 0; -x_13 = l___private_init_lean_parser_combinators_2__sepByAux___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_12, x_9, x_11); -lean::dec(x_11); -return x_13; -} -} -obj* l_Lean_Parser_Combinators_sepBy1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7) { -_start: -{ -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; -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -x_13 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_14 = lean::apply_2(x_12, lean::box(0), x_13); -x_15 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_16 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_15, x_14); -x_17 = lean::box(x_7); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___rarg___lambda__1___boxed), 8, 7); -lean::closure_set(x_18, 0, x_1); -lean::closure_set(x_18, 1, x_2); -lean::closure_set(x_18, 2, x_3); -lean::closure_set(x_18, 3, x_4); -lean::closure_set(x_18, 4, x_5); -lean::closure_set(x_18, 5, x_6); -lean::closure_set(x_18, 6, x_17); -x_19 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_16, x_18); -return x_19; -} -} -obj* l_Lean_Parser_Combinators_sepBy1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___rarg___boxed), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_sepBy1___rarg___lambda__1___boxed(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: -{ -uint8 x_9; obj* x_10; -x_9 = lean::unbox(x_7); -lean::dec(x_7); -x_10 = l_Lean_Parser_Combinators_sepBy1___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_9, x_8); -lean::dec(x_8); -return x_10; -} -} -obj* l_Lean_Parser_Combinators_sepBy1___rarg___boxed(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_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_Combinators_sepBy1___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_sepBy1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_sepBy1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_sepBy_tokens___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_Lean_Parser_tokens___rarg(x_1); -x_4 = l_Lean_Parser_tokens___rarg(x_2); -x_5 = l_List_append___rarg(x_3, x_4); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_sepBy_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, uint8 x_8) { -_start: -{ -obj* x_9; -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy_tokens___rarg___boxed), 2, 0); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_sepBy_tokens___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_sepBy_tokens___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_sepBy_tokens___boxed(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: -{ -uint8 x_9; obj* x_10; -x_9 = lean::unbox(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_Combinators_sepBy_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_9); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_10; -} -} -obj* l_Lean_Parser_Combinators_SepBy_Elem_View_itemCoe___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = lean::box(0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_SepBy_Elem_View_itemCoe(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_SepBy_Elem_View_itemCoe___rarg), 1, 0); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -lean::dec(x_4); -lean::dec(x_3); -x_6 = lean::box(0); -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -lean::dec(x_4); -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_5, 0); -x_10 = lean::cnstr_get(x_5, 1); -lean::dec(x_10); -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -lean::dec(x_3); -x_12 = lean::apply_1(x_11, x_9); -x_13 = lean::box(0); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::box(0); -lean::cnstr_set(x_5, 1, x_15); -lean::cnstr_set(x_5, 0, x_14); -return x_5; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_16 = lean::cnstr_get(x_5, 0); -lean::inc(x_16); -lean::dec(x_5); -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = lean::apply_1(x_17, x_16); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::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); -return x_22; -} -} -else -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_5, 0); -lean::inc(x_23); -lean::dec(x_5); -x_24 = !lean::is_exclusive(x_7); -if (x_24 == 0) -{ -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; -x_25 = lean::cnstr_get(x_7, 0); -x_26 = lean::cnstr_get(x_7, 1); -x_27 = lean::cnstr_get(x_3, 0); -lean::inc(x_27); -x_28 = lean::apply_1(x_27, x_23); -x_29 = lean::cnstr_get(x_4, 0); -lean::inc(x_29); -x_30 = lean::apply_1(x_29, x_25); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_28); -lean::cnstr_set(x_32, 1, x_31); -x_33 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg(x_1, x_2, x_3, x_4, x_26); -lean::cnstr_set(x_7, 1, x_33); -lean::cnstr_set(x_7, 0, x_32); -return x_7; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_34 = lean::cnstr_get(x_7, 0); -x_35 = lean::cnstr_get(x_7, 1); -lean::inc(x_35); -lean::inc(x_34); -lean::dec(x_7); -x_36 = lean::cnstr_get(x_3, 0); -lean::inc(x_36); -x_37 = lean::apply_1(x_36, x_23); -x_38 = lean::cnstr_get(x_4, 0); -lean::inc(x_38); -x_39 = lean::apply_1(x_38, x_34); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_37); -lean::cnstr_set(x_41, 1, x_40); -x_42 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg(x_1, x_2, x_3, x_4, x_35); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_42); -return x_43; -} -} -} -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg___boxed), 5, 0); -return x_4; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg(x_1, x_2, x_3, x_4, x_5); -return x_6; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux(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; -x_8 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_combinators_3__sepBy_viewAux___rarg___boxed), 5, 0); -return x_8; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___boxed(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; -x_8 = l___private_init_lean_parser_combinators_3__sepBy_viewAux(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -lean::dec(x_4); -lean::dec(x_3); -x_6 = lean::box(0); -return x_6; -} -else -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::cnstr_get(x_5, 0); -x_9 = lean::cnstr_get(x_5, 1); -lean::inc(x_4); -lean::inc(x_3); -x_10 = l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg(x_1, x_2, x_3, x_4, x_9); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -lean::dec(x_4); -x_12 = lean::cnstr_get(x_8, 0); -lean::inc(x_12); -lean::dec(x_8); -x_13 = lean::cnstr_get(x_3, 1); -lean::inc(x_13); -lean::dec(x_3); -x_14 = lean::apply_1(x_13, x_12); -x_15 = lean::box(0); -lean::cnstr_set(x_5, 1, x_15); -lean::cnstr_set(x_5, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_10); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_17 = lean::cnstr_get(x_8, 0); -lean::inc(x_17); -lean::dec(x_8); -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -x_19 = lean::cnstr_get(x_3, 1); -lean::inc(x_19); -lean::dec(x_3); -x_20 = lean::apply_1(x_19, x_17); -x_21 = lean::cnstr_get(x_4, 1); -lean::inc(x_21); -lean::dec(x_4); -x_22 = lean::apply_1(x_21, x_18); -x_23 = lean::box(0); -lean::cnstr_set(x_5, 1, x_23); -lean::cnstr_set(x_5, 0, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_20); -lean::cnstr_set(x_24, 1, x_5); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_10); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_5, 0); -x_27 = lean::cnstr_get(x_5, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_28 = l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg(x_1, x_2, x_3, x_4, x_27); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -lean::dec(x_4); -x_30 = lean::cnstr_get(x_26, 0); -lean::inc(x_30); -lean::dec(x_26); -x_31 = lean::cnstr_get(x_3, 1); -lean::inc(x_31); -lean::dec(x_3); -x_32 = lean::apply_1(x_31, x_30); -x_33 = lean::box(0); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_28); -return x_35; -} -else -{ -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; -x_36 = lean::cnstr_get(x_26, 0); -lean::inc(x_36); -lean::dec(x_26); -x_37 = lean::cnstr_get(x_29, 0); -lean::inc(x_37); -lean::dec(x_29); -x_38 = lean::cnstr_get(x_3, 1); -lean::inc(x_38); -lean::dec(x_3); -x_39 = lean::apply_1(x_38, x_36); -x_40 = lean::cnstr_get(x_4, 1); -lean::inc(x_40); -lean::dec(x_4); -x_41 = lean::apply_1(x_40, x_37); -x_42 = lean::box(0); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_39); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_28); -return x_45; -} -} -} -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg___boxed), 5, 0); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -lean::dec(x_4); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::box(3); -x_9 = lean::apply_1(x_7, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_6, 0); -lean::inc(x_14); -lean::dec(x_6); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___rarg(x_2, x_3, x_1, x_4, x_15); -return x_16; -} -} -} -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__2(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; -x_6 = l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg(x_1, x_2, x_3, x_4, x_5); -x_7 = l_List_join___main___rarg(x_6); -x_8 = l_Lean_Parser_noKind; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_sepBy_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8, uint8 x_9, obj* x_10, obj* x_11) { -_start: -{ -obj* x_12; obj* x_13; obj* x_14; -lean::inc(x_11); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_7); -lean::closure_set(x_12, 2, x_8); -lean::closure_set(x_12, 3, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__2___boxed), 5, 4); -lean::closure_set(x_13, 0, x_7); -lean::closure_set(x_13, 1, x_8); -lean::closure_set(x_13, 2, x_10); -lean::closure_set(x_13, 3, x_11); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -obj* l_Lean_Parser_Combinators_sepBy_view(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy_view___rarg___boxed), 11, 0); -return x_2; -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_List_map___main___at_Lean_Parser_Combinators_sepBy_view___spec__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_sepBy_view___rarg___boxed(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) { -_start: -{ -uint8 x_12; obj* x_13; -x_12 = lean::unbox(x_9); -lean::dec(x_9); -x_13 = l_Lean_Parser_Combinators_sepBy_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12, x_10, x_11); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_13; -} -} -obj* l_Lean_Parser_Combinators_sepBy_view___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_sepBy_view(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_tokens___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_Lean_Parser_Combinators_sepBy_tokens___rarg(x_1, x_2); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, uint8 x_8) { -_start: -{ -obj* x_9; -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1_tokens___rarg___boxed), 2, 0); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_tokens___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_sepBy1_tokens___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_tokens___boxed(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: -{ -uint8 x_9; obj* x_10; -x_9 = lean::unbox(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_Combinators_sepBy1_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_9); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_10; -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -lean::dec(x_4); -lean::dec(x_3); -x_6 = lean::box(0); -return x_6; -} -else -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::cnstr_get(x_5, 0); -x_9 = lean::cnstr_get(x_5, 1); -lean::inc(x_4); -lean::inc(x_3); -x_10 = l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg(x_1, x_2, x_3, x_4, x_9); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -lean::dec(x_4); -x_12 = lean::cnstr_get(x_8, 0); -lean::inc(x_12); -lean::dec(x_8); -x_13 = lean::cnstr_get(x_3, 1); -lean::inc(x_13); -lean::dec(x_3); -x_14 = lean::apply_1(x_13, x_12); -x_15 = lean::box(0); -lean::cnstr_set(x_5, 1, x_15); -lean::cnstr_set(x_5, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_10); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_17 = lean::cnstr_get(x_8, 0); -lean::inc(x_17); -lean::dec(x_8); -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -x_19 = lean::cnstr_get(x_3, 1); -lean::inc(x_19); -lean::dec(x_3); -x_20 = lean::apply_1(x_19, x_17); -x_21 = lean::cnstr_get(x_4, 1); -lean::inc(x_21); -lean::dec(x_4); -x_22 = lean::apply_1(x_21, x_18); -x_23 = lean::box(0); -lean::cnstr_set(x_5, 1, x_23); -lean::cnstr_set(x_5, 0, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_20); -lean::cnstr_set(x_24, 1, x_5); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_10); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_5, 0); -x_27 = lean::cnstr_get(x_5, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_28 = l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg(x_1, x_2, x_3, x_4, x_27); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -lean::dec(x_4); -x_30 = lean::cnstr_get(x_26, 0); -lean::inc(x_30); -lean::dec(x_26); -x_31 = lean::cnstr_get(x_3, 1); -lean::inc(x_31); -lean::dec(x_3); -x_32 = lean::apply_1(x_31, x_30); -x_33 = lean::box(0); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_28); -return x_35; -} -else -{ -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; -x_36 = lean::cnstr_get(x_26, 0); -lean::inc(x_36); -lean::dec(x_26); -x_37 = lean::cnstr_get(x_29, 0); -lean::inc(x_37); -lean::dec(x_29); -x_38 = lean::cnstr_get(x_3, 1); -lean::inc(x_38); -lean::dec(x_3); -x_39 = lean::apply_1(x_38, x_36); -x_40 = lean::cnstr_get(x_4, 1); -lean::inc(x_40); -lean::dec(x_4); -x_41 = lean::apply_1(x_40, x_37); -x_42 = lean::box(0); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_39); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_28); -return x_45; -} -} -} -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg___boxed), 5, 0); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_View___rarg___lambda__1(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; -x_6 = l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg(x_1, x_2, x_3, x_4, x_5); -x_7 = l_List_join___main___rarg(x_6); -x_8 = l_Lean_Parser_noKind; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_View___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8, uint8 x_9, obj* x_10, obj* x_11) { -_start: -{ -obj* x_12; obj* x_13; obj* x_14; -lean::inc(x_11); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy_view___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_7); -lean::closure_set(x_12, 2, x_8); -lean::closure_set(x_12, 3, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1_View___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_13, 0, x_7); -lean::closure_set(x_13, 1, x_8); -lean::closure_set(x_13, 2, x_10); -lean::closure_set(x_13, 3, x_11); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_View(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1_View___rarg___boxed), 11, 0); -return x_2; -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_List_map___main___at_Lean_Parser_Combinators_sepBy1_View___spec__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_View___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_sepBy1_View___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_View___rarg___boxed(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) { -_start: -{ -uint8 x_12; obj* x_13; -x_12 = lean::unbox(x_9); -lean::dec(x_9); -x_13 = l_Lean_Parser_Combinators_sepBy1_View___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12, x_10, x_11); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_13; -} -} -obj* l_Lean_Parser_Combinators_sepBy1_View___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_sepBy1_View(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_noKind; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_optional___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::cnstr_get(x_2, 3); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; uint8 x_5; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = !lean::is_exclusive(x_2); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::cnstr_get(x_2, 3); -lean::dec(x_6); -x_7 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -lean::cnstr_set(x_2, 3, x_7); -x_8 = lean::apply_2(x_4, lean::box(0), x_2); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_2, 0); -x_10 = lean::cnstr_get(x_2, 1); -x_11 = lean::cnstr_get(x_2, 2); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_2); -x_12 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_11); -lean::cnstr_set(x_13, 3, x_12); -x_14 = lean::apply_2(x_4, lean::box(0), x_13); -return x_14; -} -} -else -{ -obj* x_15; uint8 x_16; -x_15 = lean::cnstr_get(x_1, 0); -lean::inc(x_15); -lean::dec(x_1); -x_16 = !lean::is_exclusive(x_2); -if (x_16 == 0) -{ -obj* x_17; uint8 x_18; -x_17 = lean::cnstr_get(x_2, 3); -lean::dec(x_17); -x_18 = !lean::is_exclusive(x_3); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_19 = lean::cnstr_get(x_3, 0); -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_noKind; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -lean::cnstr_set(x_3, 0, x_23); -x_24 = lean::apply_2(x_15, lean::box(0), x_2); -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_3, 0); -lean::inc(x_25); -lean::dec(x_3); -x_26 = lean::box(0); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_noKind; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_2, 3, x_30); -x_31 = lean::apply_2(x_15, lean::box(0), x_2); -return x_31; -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_32 = lean::cnstr_get(x_2, 0); -x_33 = lean::cnstr_get(x_2, 1); -x_34 = lean::cnstr_get(x_2, 2); -lean::inc(x_34); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_2); -x_35 = lean::cnstr_get(x_3, 0); -lean::inc(x_35); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - x_36 = x_3; -} else { - lean::dec_ref(x_3); - x_36 = lean::box(0); -} -x_37 = lean::box(0); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_35); -lean::cnstr_set(x_38, 1, x_37); -x_39 = l_Lean_Parser_noKind; -x_40 = l_Lean_Parser_Syntax_mkNode(x_39, x_38); -if (lean::is_scalar(x_36)) { - x_41 = lean::alloc_cnstr(1, 1, 0); -} else { - x_41 = x_36; -} -lean::cnstr_set(x_41, 0, x_40); -x_42 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_42, 0, x_32); -lean::cnstr_set(x_42, 1, x_33); -lean::cnstr_set(x_42, 2, x_34); -lean::cnstr_set(x_42, 3, x_41); -x_43 = lean::apply_2(x_15, lean::box(0), x_42); -return x_43; -} -} -} -} -obj* l_Lean_Parser_Combinators_optional___rarg___lambda__2(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; -x_3 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_4 = lean::apply_2(x_1, lean::box(0), x_3); -return x_4; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::box(0); -lean::inc(x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = l_Lean_Parser_noKind; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::apply_2(x_1, lean::box(0), x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_Combinators_optional___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, uint8 x_6) { -_start: -{ -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_2, 1); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___rarg___lambda__1), 2, 1); -lean::closure_set(x_9, 0, x_2); -x_10 = lean::apply_3(x_8, lean::box(0), x_5, x_9); -x_11 = lean::cnstr_get(x_4, 2); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_4, 0); -lean::inc(x_12); -lean::dec(x_4); -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -lean::dec(x_13); -x_15 = l_optional___rarg___closed__1; -x_16 = lean::apply_4(x_14, lean::box(0), lean::box(0), x_15, x_10); -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -lean::dec(x_12); -x_18 = lean::box(0); -lean::inc(x_17); -x_19 = lean::apply_2(x_17, lean::box(0), x_18); -x_20 = lean::apply_3(x_11, lean::box(0), x_16, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___rarg___lambda__2___boxed), 2, 1); -lean::closure_set(x_21, 0, x_17); -x_22 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_20, x_21); -return x_22; -} -else -{ -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -} -obj* l_Lean_Parser_Combinators_optional(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_optional___rarg___lambda__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_optional___rarg___lambda__2(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_optional___rarg___boxed(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_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_Combinators_optional___rarg(x_1, x_2, x_3, x_4, x_5, x_7); -lean::dec(x_3); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_optional___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_optional(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_optional_tokens___rarg(obj* x_1, uint8 x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_tokens___rarg(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_optional_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional_tokens___rarg___boxed), 2, 0); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_optional_tokens___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = lean::unbox(x_2); -lean::dec(x_2); -x_4 = l_Lean_Parser_Combinators_optional_tokens___rarg(x_1, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_optional_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_optional_tokens(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_optional_view___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::box(3); -x_6 = lean::apply_1(x_4, x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_3); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_3, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -lean::free_heap_obj(x_3); -lean::dec(x_1); -x_11 = lean::box(0); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_10, 1); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_10, 0); -lean::inc(x_13); -lean::dec(x_10); -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = lean::apply_1(x_14, x_13); -lean::cnstr_set(x_3, 0, x_15); -return x_3; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_12); -lean::dec(x_10); -x_16 = lean::cnstr_get(x_1, 0); -lean::inc(x_16); -lean::dec(x_1); -x_17 = lean::box(3); -x_18 = lean::apply_1(x_16, x_17); -lean::cnstr_set(x_3, 0, x_18); -return x_3; -} -} -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_3, 0); -lean::inc(x_19); -lean::dec(x_3); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; -lean::dec(x_1); -x_21 = lean::box(0); -return x_21; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_23 = lean::cnstr_get(x_20, 0); -lean::inc(x_23); -lean::dec(x_20); -x_24 = lean::cnstr_get(x_1, 0); -lean::inc(x_24); -lean::dec(x_1); -x_25 = lean::apply_1(x_24, x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_22); -lean::dec(x_20); -x_27 = lean::cnstr_get(x_1, 0); -lean::inc(x_27); -lean::dec(x_1); -x_28 = lean::box(3); -x_29 = lean::apply_1(x_27, x_28); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -return x_30; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_optional_view___rarg___lambda__2(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = l_Lean_Parser_Combinators_many___rarg___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::apply_1(x_5, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = l_Lean_Parser_noKind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -} -obj* l_Lean_Parser_Combinators_optional_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7) { -_start: -{ -obj* x_8; obj* x_9; obj* x_10; -lean::inc(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional_view___rarg___lambda__1), 2, 1); -lean::closure_set(x_8, 0, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional_view___rarg___lambda__2), 2, 1); -lean::closure_set(x_9, 0, x_6); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* l_Lean_Parser_Combinators_optional_view(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional_view___rarg___boxed), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_optional_view___rarg___boxed(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_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_Combinators_optional_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_8); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_optional_view___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_optional_view(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_optional_viewDefault___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7) { -_start: -{ -obj* x_8; -x_8 = lean::box(0); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_optional_viewDefault(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional_viewDefault___rarg___boxed), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_optional_viewDefault___rarg___boxed(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_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_Combinators_optional_viewDefault___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_optional_viewDefault___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_optional_viewDefault(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Combinators_anyOf___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("anyOf"); -return x_1; -} -} -obj* l_Lean_Parser_Combinators_anyOf___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_2); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -x_6 = l_mjoin___rarg___closed__1; -x_7 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_5, x_6, x_4, x_4); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_1); -x_8 = lean::cnstr_get(x_3, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_3, 1); -lean::inc(x_9); -lean::dec(x_3); -x_10 = lean::cnstr_get(x_2, 2); -lean::inc(x_10); -lean::dec(x_2); -x_11 = lean::apply_1(x_10, lean::box(0)); -x_12 = l_List_foldl___main___rarg(x_11, x_8, x_9); -return x_12; -} -} -} -obj* l_Lean_Parser_Combinators_anyOf(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_anyOf___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Combinators_anyOf(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_anyOf_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_anyOf_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf_tokens___rarg___boxed), 1, 0); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_anyOf_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_anyOf_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_anyOf_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_anyOf_tokens(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_anyOf_view___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = l_mjoin___rarg___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_anyOf_view(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf_view___rarg___boxed), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_anyOf_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Combinators_anyOf_view___rarg(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_anyOf_view___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Combinators_anyOf_view(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_longestMatch___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_10; -x_10 = lean::box(0); -x_3 = x_10; -goto block_9; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_2, 0); -lean::inc(x_12); -lean::dec(x_2); -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -lean::dec(x_13); -x_15 = lean::apply_2(x_14, lean::box(0), x_12); -return x_15; -} -else -{ -obj* x_16; -lean::dec(x_11); -x_16 = lean::box(0); -x_3 = x_16; -goto block_9; -} -} -block_9: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Parser_choice; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_2); -x_8 = lean::apply_2(x_5, lean::box(0), x_7); -return x_8; -} -} -} -obj* l_Lean_Parser_Combinators_longestMatch___rarg(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; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = l_Lean_Parser_MonadParsec_longestMatch___rarg(x_1, x_3, lean::box(0), x_2, x_5); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestMatch___rarg___lambda__1), 2, 1); -lean::closure_set(x_8, 0, x_4); -x_9 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_longestMatch(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestMatch___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestMatch___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_longestMatch(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestMatch_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestMatch_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestMatch_tokens___rarg___boxed), 1, 0); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_longestMatch_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_longestMatch_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestMatch_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_longestMatch_tokens(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_longestMatch_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = l_mjoin___rarg___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_longestMatch_view(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestMatch_view___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestMatch_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_longestMatch_view___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_longestMatch_view___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_longestMatch_view(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = lean_name_mk_numeral(x_6, x_2); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_3); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_Syntax_mkNode(x_7, x_9); -x_11 = lean::apply_2(x_5, lean::box(0), x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("choice: Empty List"); -return x_1; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___rarg(x_2, lean::box(0), x_7, x_8, x_6, x_6); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_10 = lean::cnstr_get(x_4, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_4, 1); -lean::inc(x_11); -lean::dec(x_4); -x_12 = lean::cnstr_get(x_3, 2); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_1, 1); -lean::inc(x_13); -lean::inc(x_5); -lean::inc(x_3); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___rarg___lambda__1), 3, 2); -lean::closure_set(x_14, 0, x_3); -lean::closure_set(x_14, 1, x_5); -x_15 = lean::apply_4(x_13, lean::box(0), lean::box(0), x_10, x_14); -x_16 = lean::mk_nat_obj(1u); -x_17 = lean::nat_add(x_5, x_16); -lean::dec(x_5); -x_18 = l_Lean_Parser_Combinators_choiceAux___main___rarg(x_1, x_2, x_3, x_11, x_17); -x_19 = lean::apply_3(x_12, lean::box(0), x_15, x_18); -return x_19; -} -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_choiceAux___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_choiceAux___main___rarg(x_1, x_3, x_4, x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_choiceAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_choiceAux___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_choiceAux(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choice___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = l_Lean_Parser_Combinators_choiceAux___main___rarg(x_1, x_3, x_4, x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_choice(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choice___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choice___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_choice___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_choice___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_choice(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choice_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choice_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choice_tokens___rarg___boxed), 1, 0); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_choice_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_choice_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choice_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_choice_tokens(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(0); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -lean::inc(x_2); -lean::inc(x_1); -x_8 = l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1___rarg(x_1, x_2, x_7); -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_6, 1); -lean::inc(x_10); -lean::dec(x_6); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___rarg___lambda__1), 3, 2); -lean::closure_set(x_11, 0, x_1); -lean::closure_set(x_11, 1, x_9); -x_12 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_10, x_11); -lean::cnstr_set(x_3, 1, x_8); -lean::cnstr_set(x_3, 0, x_12); -return x_3; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = lean::cnstr_get(x_3, 0); -x_14 = lean::cnstr_get(x_3, 1); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_15 = l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1___rarg(x_1, x_2, x_14); -x_16 = lean::cnstr_get(x_13, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_13, 1); -lean::inc(x_17); -lean::dec(x_13); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___rarg___lambda__1), 3, 2); -lean::closure_set(x_18, 0, x_1); -lean::closure_set(x_18, 1, x_16); -x_19 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_17, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_15); -return x_20; -} -} -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestChoice___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_2); -x_4 = lean::box(0); -x_5 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_6 = l_mjoin___rarg___closed__1; -x_7 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_5, x_6, x_4, x_4); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_1); -x_8 = lean::cnstr_get(x_3, 0); -lean::inc(x_8); -lean::dec(x_3); -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::apply_2(x_10, lean::box(0), x_8); -return x_11; -} -} -} -obj* l_Lean_Parser_Combinators_longestChoice___rarg(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_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::mk_nat_obj(0u); -x_8 = l_List_enumFrom___main___rarg(x_7, x_5); -lean::inc(x_6); -lean::inc(x_4); -x_9 = l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1___rarg(x_4, x_6, x_8); -lean::inc(x_3); -x_10 = l_Lean_Parser_MonadParsec_longestMatch___rarg(x_1, x_3, lean::box(0), x_2, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestChoice___rarg___lambda__1), 3, 2); -lean::closure_set(x_11, 0, x_3); -lean::closure_set(x_11, 1, x_4); -x_12 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_10, x_11); -return x_12; -} -} -obj* l_Lean_Parser_Combinators_longestChoice(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestChoice___rarg), 5, 0); -return x_2; -} -} -obj* l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_List_map___main___at_Lean_Parser_Combinators_longestChoice___spec__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestChoice___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_longestChoice(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestChoice_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestChoice_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestChoice_tokens___rarg___boxed), 1, 0); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_longestChoice_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_longestChoice_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_longestChoice_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_longestChoice_tokens(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_try_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_try_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_try_tokens___rarg___boxed), 1, 0); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_try_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_try_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_try_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_try_tokens(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_try_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -return x_4; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::cnstr_get(x_4, 0); -x_7 = lean::cnstr_get(x_4, 1); -lean::inc(x_7); -lean::inc(x_6); -lean::dec(x_4); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -} -obj* l_Lean_Parser_Combinators_try_view(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_try_view___rarg___boxed), 4, 0); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_try_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_Combinators_try_view___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_try_view___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_Combinators_try_view(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_label_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_label_tokens(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; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_label_tokens___rarg___boxed), 1, 0); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_label_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_label_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_label_tokens___boxed(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; -x_8 = l_Lean_Parser_Combinators_label_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_label_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -return x_5; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_5, 0); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -lean::inc(x_7); -lean::dec(x_5); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -} -obj* l_Lean_Parser_Combinators_label_view(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_label_view___rarg___boxed), 5, 0); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_label_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_label_view___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_label_view___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_Combinators_label_view(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_recurse_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::box(0); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_recurse_tokens___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_recurse_tokens(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_recurse_view___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_mjoin___rarg___closed__1; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_recurse_view(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_recurse_view___rarg___boxed), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_recurse_view___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_recurse_view___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_recurse_view___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Combinators_recurse_view(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_monadLift_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_monadLift_tokens(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_9; -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_monadLift_tokens___rarg___boxed), 1, 0); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_monadLift_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_monadLift_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_monadLift_tokens___boxed(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_9; -x_9 = l_Lean_Parser_Combinators_monadLift_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_monadLift_view___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -return x_3; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_3, 0); -x_6 = lean::cnstr_get(x_3, 1); -lean::inc(x_6); -lean::inc(x_5); -lean::dec(x_3); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -} -obj* l_Lean_Parser_Combinators_monadLift_view(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; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_monadLift_view___rarg___boxed), 3, 0); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_monadLift_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Combinators_monadLift_view___rarg(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_monadLift_view___boxed(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; -x_8 = l_Lean_Parser_Combinators_monadLift_view(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_seqLeft_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_seqLeft_tokens(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_9; -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_seqLeft_tokens___rarg___boxed), 1, 0); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_seqLeft_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_seqLeft_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_seqLeft_tokens___boxed(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_9; -x_9 = l_Lean_Parser_Combinators_seqLeft_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_seqLeft_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -return x_6; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_6); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_Combinators_seqLeft_view(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_seqLeft_view___rarg___boxed), 6, 0); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_seqLeft_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_seqLeft_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_seqLeft_view___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_Combinators_seqLeft_view(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_seqRight_tokens___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_seqRight_tokens(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_9; -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_seqRight_tokens___rarg___boxed), 1, 0); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_seqRight_tokens___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Combinators_seqRight_tokens___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_seqRight_tokens___boxed(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_9; -x_9 = l_Lean_Parser_Combinators_seqRight_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* l_Lean_Parser_Combinators_seqRight_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -return x_6; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_6); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_Combinators_seqRight_view(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_seqRight_view___rarg___boxed), 6, 0); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_seqRight_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Combinators_seqRight_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_seqRight_view___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_Combinators_seqRight_view(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_Combinators_coe_tokens___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_tokens___rarg(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_coe_tokens(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; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_coe_tokens___rarg___boxed), 2, 0); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_coe_tokens___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Combinators_coe_tokens___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_coe_tokens___boxed(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; -x_8 = l_Lean_Parser_Combinators_coe_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_coe_view___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -return x_2; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_6); -lean::inc(x_5); -lean::dec(x_2); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -} -obj* l_Lean_Parser_Combinators_coe_view(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; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_coe_view___rarg___boxed), 3, 0); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_coe_view___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Combinators_coe_view___rarg(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Combinators_coe_view___boxed(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; -x_8 = l_Lean_Parser_Combinators_coe_view(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_coe_viewDefault___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::box(0); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_coe_viewDefault(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; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_coe_viewDefault___rarg___boxed), 5, 0); -return x_8; -} -} -obj* l_Lean_Parser_Combinators_coe_viewDefault___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Combinators_coe_viewDefault___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_Combinators_coe_viewDefault___boxed(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; -x_8 = l_Lean_Parser_Combinators_coe_viewDefault(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_8; -} -} -obj* initialize_init_lean_parser_basic(obj*); -obj* initialize_init_data_list_instances(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_combinators(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_basic(w); -if (io_result_is_error(w)) return w; -w = initialize_init_data_list_instances(w); -if (io_result_is_error(w)) return w; -l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1 = _init_l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1); -l_Lean_Parser_Combinators_many___rarg___closed__1 = _init_l_Lean_Parser_Combinators_many___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_Combinators_many___rarg___closed__1); -l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1); -l_Lean_Parser_Combinators_anyOf___rarg___closed__1 = _init_l_Lean_Parser_Combinators_anyOf___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_Combinators_anyOf___rarg___closed__1); -l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1 = _init_l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/command.cpp b/src/stage0/init/lean/parser/command.cpp deleted file mode 100644 index 3071d808a4..0000000000 --- a/src/stage0/init/lean/parser/command.cpp +++ /dev/null @@ -1,15204 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.command -// Imports: init.lean.parser.declaration -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_command_namespace_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_open_HasView_x27___elambda__1___closed__1; -extern obj* l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_Parser___rarg___closed__1; -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_stringLit; -obj* l_fixCore___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_command_universes_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_universe_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_check_HasView_x27; -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_Lean_Parser_command_export_HasView_x27; -obj* l_Lean_Parser_command_export_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1(obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_include_Parser(obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_command_attribute_HasView_x27___elambda__1___spec__1(obj*, obj*); -obj* l_Lean_Parser_command_omit; -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_reserveNotation_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_commandParser_run(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_check_HasView_x27___elambda__2(obj*); -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_command_openSpec_renaming; -extern obj* l_Lean_Parser_command_notation_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_initQuot_HasView_x27; -extern obj* l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_command_attribute_Parser___closed__1; -obj* l_Lean_Parser_command_variable_Parser___closed__1; -obj* l_Lean_Parser_Combinators_sepBy1_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_command_end_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_openSpec_as_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_namespace; -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(obj*); -obj* l_Lean_Parser_command_setOption_HasView_x27; -extern obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_command_openSpec_only_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_namespace_HasView_x27; -extern obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -obj* l_Lean_Parser_command_omit_HasView; -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3(obj*); -obj* l_Lean_Parser_command_export_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_check_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1(obj*); -extern obj* l_Lean_Parser_finishCommentBlock___closed__2; -extern obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_termParser_run(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_namespace_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_universe_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_Parser(obj*); -obj* l_Lean_Parser_command_builtinCommandParsers; -obj* l_Lean_Parser_command_optionValue_HasView_x27___lambda__1(obj*); -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_command_check_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_attribute; -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_end_HasView_x27___lambda__1(obj*); -obj* l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(obj*); -obj* l_Lean_Parser_command_boolOptionValue; -extern obj* l_Lean_Parser_indexed___rarg___lambda__1___closed__1; -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6___rarg(obj*, obj*); -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l_Lean_Parser_command_variables; -obj* l_Lean_Parser_command_openSpec_hiding; -obj* l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_universes_HasView_x27; -extern obj* l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_variable_HasView_x27___lambda__1(obj*); -obj* l_List_map___main___rarg(obj*, obj*); -obj* l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_commandParser_run___closed__1; -obj* l_Lean_Parser_command_include_Parser___closed__1; -obj* l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_universe_Parser___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_number_HasView; -obj* l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_variable_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_openSpec_only; -obj* l_Lean_Parser_Substring_toString(obj*); -obj* l_Lean_Parser_command_export_Parser___closed__1; -obj* l_Lean_Parser_command_section; -obj* l_Lean_Parser_command_setOption_Parser___closed__1; -obj* l_Lean_Parser_command_omit_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_include_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_attribute_HasView; -obj* l_Lean_Parser_command_Parser___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_universe_HasView_x27___elambda__1(obj*); -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5(obj*); -extern obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_command_export_HasView; -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_command_section_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_openSpec_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_variables_HasView; -extern obj* l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_commandParser_run___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_initQuot_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_command_universe_Parser___closed__1; -obj* l_Lean_Parser_command_export_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_openSpec; -obj* l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_section_Parser(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -extern obj* l_Lean_Parser_command_attrInstance_HasView; -obj* l_Lean_Parser_command_end_HasView; -obj* l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_universes_HasView; -obj* l_Lean_Parser_command_end_HasView_x27; -obj* l_Lean_Parser_command_open_HasView_x27; -obj* l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__1; -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3___rarg(obj*, obj*); -obj* l_Lean_Parser_command_end; -obj* l_Lean_Parser_command_variable_HasView; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_universe_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Combinators_recurse_view___rarg(obj*, obj*); -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_check_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_export; -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_optionValue_HasView_x27; -obj* l_Lean_Parser_Term_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_check_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_openSpec_HasView_x27___elambda__1(obj*); -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4___rarg(obj*, obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27; -obj* l_Lean_Parser_command_variables_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_initQuot_Parser___closed__1; -obj* l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(obj*, obj*, obj*, obj*); -obj* l_List_join___main___rarg(obj*); -obj* l_Lean_Parser_RecT_recurse___at_Lean_Parser_command_Parser_Lean_Parser_HasView___spec__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_omit_Parser___closed__1; -obj* l_Lean_Parser_command_setOption_HasView; -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5___rarg(obj*, obj*); -extern obj* l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Parser_number; -obj* l_Lean_Parser_command_omit_HasView_x27; -obj* l_Lean_Parser_command_open_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_openSpec_as_HasView_x27; -obj* l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(obj*, obj*); -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_initQuot; -obj* l_Lean_Parser_command_attrInstance_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_initQuot_Parser(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_binder_HasView; -obj* l_Lean_Parser_command_open_HasView; -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec(obj*); -extern obj* l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -extern obj* l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -obj* l_Lean_Parser_command_universes; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -extern obj* l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_section_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_check; -obj* l_Lean_Parser_command_section_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_openSpec_hiding_HasView; -obj* l_Lean_Parser_command_include_HasView; -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_variables_HasView_x27___lambda__1(obj*); -extern obj* l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_noKind; -obj* l_Lean_Parser_command_setOption_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_namespace_Parser_Lean_Parser_HasTokens; -obj* l_List_append___rarg(obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_Lean_Parser_command_omit_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_setOption; -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_section_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView; -obj* l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_openSpec_hiding_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_universe_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_tokens___rarg(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_command_openSpec_HasView; -obj* l_Lean_Parser_command_universes_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_command_open_HasView_x27___lambda__1(obj*); -extern obj* l_Lean_Parser_peekToken___closed__1; -obj* l_Lean_Parser_command_builtinCommandParsers_Lean_Parser_HasTokens; -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj*); -obj* l_Lean_Parser_command_check_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_universe_HasView_x27; -obj* l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2(obj*); -obj* l_Lean_Parser_command_openSpec_as_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1___closed__1; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_command_openSpec_as_HasView; -obj* l_Lean_Parser_command_attribute_HasView_x27; -obj* l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_open_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_omit_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_include_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_variable; -obj* l_Lean_Parser_command_openSpec_HasView_x27; -obj* l_Lean_Parser_command_openSpec_Parser___closed__1; -obj* l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_attribute_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_end_Parser___closed__1; -namespace lean { -uint8 string_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_command_variable_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_label_view___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_open; -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_section_HasView; -obj* l_Lean_Parser_command_namespace_Parser___closed__1; -obj* l_Lean_Parser_command_end_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_namespace_HasView_x27___elambda__1___boxed(obj*); -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinders_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_optionValue; -obj* l_Lean_Parser_command_end_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_reserveMixfix_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(obj*); -obj* l_Lean_Parser_command_openSpec_as; -obj* l_Lean_Parser_command_variables_HasView_x27; -obj* l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_variables_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView_x27; -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_openSpec_renaming_item; -obj* l_Lean_Parser_command_section_HasView_x27___elambda__1___boxed(obj*); -obj* l_String_trim(obj*); -obj* l_Lean_Parser_command_universe; -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_commandParser_run___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_command_namespace_HasView; -obj* l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_openSpec_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_check_Parser___closed__1; -obj* l_Lean_Parser_command_variables_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_section_Parser___closed__1; -uint8 l_Lean_Name_quickLt(obj*, obj*); -obj* l_Lean_Parser_command_openSpec_only_HasView_x27; -obj* l_ReaderT_orelse___at_Lean_Parser_command_universe_Parser___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_namespace_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_Term_bracketedBinders_HasView; -obj* l_Lean_Parser_command_open_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_universe_HasView; -obj* l_Lean_Parser_token(obj*, obj*, obj*); -obj* l_Lean_Parser_command_mixfix_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_Parser___boxed(obj*); -obj* l_Lean_Parser_command_omit_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_List_cons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_setOption_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_variables_Parser___closed__1; -obj* l_Lean_Parser_Combinators_many1_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_variable_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_openSpec_only_HasView; -obj* l_Lean_Parser_command_open_Parser___closed__1; -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -obj* l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_tokenMapCons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_command_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_universe_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_commandParser_run___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_section_HasView_x27; -extern obj* l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27; -obj* l_Lean_Parser_command_check_HasView; -obj* l_Lean_Parser_command_export_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_end_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_end_HasView_x27___elambda__1(obj*); -obj* l_ReaderT_orelse___at_Lean_Parser_command_universe_Parser___spec__2(obj*); -obj* l_Lean_Parser_command_optionValue_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_section_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3; -obj* l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_optionValue_HasView; -obj* l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(obj*); -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6(obj*); -obj* l_Lean_Parser_Term_binder_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_CommandParserM_Alternative(obj*); -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_commandParser_run___lambda__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_command_variable_HasView_x27; -obj* l_Lean_Parser_command_declaration_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_notation_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_setOption_Parser(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_stringLit_HasView; -obj* l_Lean_Parser_CommandParserM_Monad(obj*); -obj* l_Lean_Parser_command_attribute_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___closed__1; -obj* l_String_quote(obj*); -obj* l_Lean_Parser_command_initQuot_HasView; -obj* l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_universes_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_attribute_HasView_x27___lambda__1(obj*); -extern obj* l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasTokens; -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4(obj*); -obj* l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_omit_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_end_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_boolOptionValue_HasView; -extern obj* l_Lean_Parser_Combinators_many___rarg___closed__1; -obj* l_Lean_Parser_command_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_TokenMap_ofList___main___rarg(obj*); -obj* l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_CommandParserM_MonadExcept(obj*); -obj* l_Lean_Parser_command_include_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_namespace_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_openSpec_hiding_HasView_x27; -extern obj* l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_command_openSpec_renaming_HasView; -obj* l_Lean_Parser_command_include_HasView_x27___lambda__1(obj*); -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Parser_command_initQuot_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_include_HasView_x27; -extern obj* l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_include; -obj* l_List_foldl___main___at_Lean_Parser_command_universe_Parser___spec__3(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_recurse___at_Lean_Parser_command_Parser_Lean_Parser_HasView___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::apply_3(x_2, x_1, x_3, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadRec(lean::box(0)); -x_4 = lean::box(0); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___at_Lean_Parser_command_Parser_Lean_Parser_HasView___spec__1), 4, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg___boxed), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = l_Lean_Parser_Combinators_recurse_view___rarg(x_4, x_3); -lean::dec(x_3); -x_8 = lean::mk_string("command"); -x_9 = l_Lean_Parser_Combinators_label_view___rarg(x_1, x_2, x_6, x_8, x_7); -lean::dec(x_8); -lean::dec(x_6); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_Parser___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("command"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_command_Parser___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; uint8 x_6; -x_4 = lean::box(0); -x_5 = lean::apply_3(x_1, x_4, x_2, x_3); -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_5, 0); -x_8 = l_Lean_Parser_command_Parser___rarg___closed__1; -x_9 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_7, x_8); -lean::cnstr_set(x_5, 0, x_9); -return x_5; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_5, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_5); -x_12 = l_Lean_Parser_command_Parser___rarg___closed__1; -x_13 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_10, x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_11); -return x_14; -} -} -} -obj* l_Lean_Parser_command_Parser(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_Parser___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_command_Parser___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_Parser(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_openSpec_as() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("openSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("as"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_openSpec_as_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_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); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::box(3); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -x_9 = l_Lean_Parser_command_openSpec_as; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_6); -x_14 = l_Lean_Parser_command_openSpec_as; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_17; -x_17 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1___closed__1; -return x_18; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; -x_21 = lean::box(3); -x_2 = x_20; -x_3 = x_21; -goto block_16; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_20, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_20, 1); -lean::inc(x_23); -lean::dec(x_20); -x_2 = x_23; -x_3 = x_22; -goto block_16; -} -} -block_16: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -lean::dec(x_3); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_4 = x_14; -goto block_12; -} -else -{ -obj* x_15; -lean::dec(x_3); -x_15 = lean::box(0); -x_4 = x_15; -goto block_12; -} -block_12: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -lean::dec(x_2); -if (lean::obj_tag(x_7) == 1) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; -lean::dec(x_7); -x_10 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_as_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_as_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_openSpec_as_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_openSpec_as_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_openSpec_as_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_openSpec_as_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_openSpec_only() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("openSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("only"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_openSpec_only_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_3); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_4); -x_10 = l_Lean_Parser_noKind; -x_11 = l_Lean_Parser_Syntax_mkNode(x_10, x_9); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::box(3); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_8); -x_14 = l_Lean_Parser_Syntax_mkNode(x_10, x_13); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_11); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_14); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_command_openSpec_only; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_20 = lean::cnstr_get(x_5, 0); -lean::inc(x_20); -lean::dec(x_5); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_7); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_11); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_14); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_command_openSpec_only; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_2, 0); -lean::inc(x_27); -lean::dec(x_2); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_8); -x_30 = l_Lean_Parser_Syntax_mkNode(x_10, x_29); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_11); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_30); -lean::cnstr_set(x_33, 1, x_32); -x_34 = l_Lean_Parser_command_openSpec_only; -x_35 = l_Lean_Parser_Syntax_mkNode(x_34, x_33); -return x_35; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_36 = lean::cnstr_get(x_5, 0); -lean::inc(x_36); -lean::dec(x_5); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_7); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_11); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_30); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_Lean_Parser_command_openSpec_only; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_5 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 2, x_5); -lean::cnstr_set(x_6, 3, x_1); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_3, 0); -lean::inc(x_7); -lean::dec(x_3); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_8); -x_10 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_11 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -lean::cnstr_set(x_11, 2, x_9); -lean::cnstr_set(x_11, 3, x_1); -return x_11; -} -} -} -obj* l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_59; -x_59 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; -x_60 = l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1___closed__1; -return x_60; -} -else -{ -obj* x_61; obj* x_62; -x_61 = lean::cnstr_get(x_59, 0); -lean::inc(x_61); -lean::dec(x_59); -x_62 = lean::cnstr_get(x_61, 1); -lean::inc(x_62); -lean::dec(x_61); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; -x_63 = lean::box(3); -x_2 = x_62; -x_3 = x_63; -goto block_58; -} -else -{ -obj* x_64; obj* x_65; obj* x_66; -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_62, 1); -lean::inc(x_65); -lean::dec(x_62); -x_66 = l_Lean_Parser_Syntax_asNode___main(x_64); -if (lean::obj_tag(x_66) == 0) -{ -if (lean::obj_tag(x_65) == 0) -{ -obj* x_67; -x_67 = lean::box(3); -x_2 = x_65; -x_3 = x_67; -goto block_58; -} -else -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_65, 0); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_65, 1); -lean::inc(x_69); -lean::dec(x_65); -x_2 = x_69; -x_3 = x_68; -goto block_58; -} -} -else -{ -obj* x_70; obj* x_71; obj* x_72; -x_70 = lean::cnstr_get(x_66, 0); -lean::inc(x_70); -lean::dec(x_66); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -lean::dec(x_70); -x_72 = l_List_append___rarg(x_71, x_65); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; -x_73 = lean::box(3); -x_2 = x_72; -x_3 = x_73; -goto block_58; -} -else -{ -obj* x_74; obj* x_75; -x_74 = lean::cnstr_get(x_72, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_72, 1); -lean::inc(x_75); -lean::dec(x_72); -x_2 = x_75; -x_3 = x_74; -goto block_58; -} -} -} -} -block_58: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_3, 0); -lean::inc(x_55); -lean::dec(x_3); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -x_4 = x_56; -goto block_54; -} -else -{ -obj* x_57; -lean::dec(x_3); -x_57 = lean::box(0); -x_4 = x_57; -goto block_54; -} -block_54: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_51; -x_51 = lean::box(3); -x_5 = x_2; -x_6 = x_51; -goto block_50; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_2, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_2, 1); -lean::inc(x_53); -lean::dec(x_2); -x_5 = x_53; -x_6 = x_52; -goto block_50; -} -block_50: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -obj* x_48; -x_48 = lean::cnstr_get(x_6, 0); -lean::inc(x_48); -lean::dec(x_6); -x_7 = x_48; -goto block_47; -} -else -{ -obj* x_49; -lean::dec(x_6); -x_49 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = x_49; -goto block_47; -} -block_47: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_44; -x_44 = lean::box(3); -x_8 = x_5; -x_9 = x_44; -goto block_43; -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_5, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_5, 1); -lean::inc(x_46); -lean::dec(x_5); -x_8 = x_46; -x_9 = x_45; -goto block_43; -} -block_43: -{ -obj* x_10; -x_10 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -x_11 = lean::box(0); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_12; obj* x_13; -x_12 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_12); -lean::cnstr_set(x_13, 3, x_11); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_8, 0); -lean::inc(x_14); -lean::dec(x_8); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_7); -lean::cnstr_set(x_18, 2, x_17); -lean::cnstr_set(x_18, 3, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_14); -x_19 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_7); -lean::cnstr_set(x_20, 2, x_19); -lean::cnstr_set(x_20, 3, x_11); -return x_20; -} -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_10); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_10, 0); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -x_24 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_23); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_25; obj* x_26; -lean::free_heap_obj(x_10); -x_25 = lean::box(0); -x_26 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_24); -lean::cnstr_set(x_26, 3, x_25); -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_8, 0); -lean::inc(x_27); -lean::dec(x_8); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -lean::dec(x_27); -lean::cnstr_set(x_10, 0, x_28); -x_29 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_24); -lean::cnstr_set(x_29, 3, x_10); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -lean::dec(x_27); -lean::free_heap_obj(x_10); -x_30 = lean::box(0); -x_31 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_24); -lean::cnstr_set(x_31, 3, x_30); -return x_31; -} -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; -x_32 = lean::cnstr_get(x_10, 0); -lean::inc(x_32); -lean::dec(x_10); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -x_34 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_33); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::box(0); -x_36 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_36, 0, x_4); -lean::cnstr_set(x_36, 1, x_7); -lean::cnstr_set(x_36, 2, x_34); -lean::cnstr_set(x_36, 3, x_35); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_8, 0); -lean::inc(x_37); -lean::dec(x_8); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -lean::dec(x_37); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_40, 0, x_4); -lean::cnstr_set(x_40, 1, x_7); -lean::cnstr_set(x_40, 2, x_34); -lean::cnstr_set(x_40, 3, x_39); -return x_40; -} -else -{ -obj* x_41; obj* x_42; -lean::dec(x_37); -x_41 = lean::box(0); -x_42 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_42, 0, x_4); -lean::cnstr_set(x_42, 1, x_7); -lean::cnstr_set(x_42, 2, x_34); -lean::cnstr_set(x_42, 3, x_41); -return x_42; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_only_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_only_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_openSpec_only_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_openSpec_only_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_item() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("openSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("renaming"); -x_11 = lean_name_mk_string(x_9, x_10); -x_12 = lean::mk_string("item"); -x_13 = lean_name_mk_string(x_11, x_12); -return x_13; -} -} -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_2); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::inc(x_4); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::box(3); -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_5); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_command_openSpec_renaming_item; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_3, 0); -lean::inc(x_14); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_8); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_5); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_command_openSpec_renaming_item; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -lean::cnstr_set(x_3, 2, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_27; -x_27 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; -x_28 = l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1___closed__1; -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_27, 0); -lean::inc(x_29); -lean::dec(x_27); -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; -x_31 = lean::box(3); -x_2 = x_30; -x_3 = x_31; -goto block_26; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_30, 1); -lean::inc(x_33); -lean::dec(x_30); -x_2 = x_33; -x_3 = x_32; -goto block_26; -} -} -block_26: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -obj* x_24; -x_24 = lean::cnstr_get(x_3, 0); -lean::inc(x_24); -lean::dec(x_3); -x_4 = x_24; -goto block_23; -} -else -{ -obj* x_25; -lean::dec(x_3); -x_25 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_4 = x_25; -goto block_23; -} -block_23: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_20; -x_20 = lean::box(3); -x_5 = x_2; -x_6 = x_20; -goto block_19; -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_2, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_2, 1); -lean::inc(x_22); -lean::dec(x_2); -x_5 = x_22; -x_6 = x_21; -goto block_19; -} -block_19: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_6, 0); -lean::inc(x_16); -lean::dec(x_6); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_7 = x_17; -goto block_15; -} -else -{ -obj* x_18; -lean::dec(x_6); -x_18 = lean::box(0); -x_7 = x_18; -goto block_15; -} -block_15: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_8; obj* x_9; -x_8 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_5, 0); -lean::inc(x_10); -lean::dec(x_5); -if (lean::obj_tag(x_10) == 1) -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_7); -lean::cnstr_set(x_12, 2, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -lean::dec(x_10); -x_13 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_4); -lean::cnstr_set(x_14, 1, x_7); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_item_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_item_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_openSpec_renaming_item_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("openSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("renaming"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_openSpec_renaming_item_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1___closed__1; -x_8 = l_List_map___main___rarg(x_7, x_4); -x_9 = l_Lean_Parser_noKind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1; -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = l_Lean_Parser_command_openSpec_renaming; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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_17 = lean::cnstr_get(x_5, 0); -lean::inc(x_17); -lean::dec(x_5); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_6); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_10); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1; -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_Lean_Parser_command_openSpec_renaming; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_3, 0); -lean::inc(x_25); -lean::dec(x_3); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_6); -x_28 = lean::box(3); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -x_30 = l_Lean_Parser_Syntax_mkNode(x_9, x_29); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_10); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_30); -lean::cnstr_set(x_33, 1, x_32); -x_34 = l_Lean_Parser_command_openSpec_renaming; -x_35 = l_Lean_Parser_Syntax_mkNode(x_34, x_33); -return x_35; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_36 = lean::cnstr_get(x_5, 0); -lean::inc(x_36); -lean::dec(x_5); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_6); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_10); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_30); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_Lean_Parser_command_openSpec_renaming; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -} -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_2, 0); -lean::inc(x_43); -lean::dec(x_2); -x_44 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -x_45 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_44); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_Lean_Parser_Syntax_mkNode(x_9, x_46); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_10); -lean::cnstr_set(x_48, 1, x_45); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_48); -x_50 = l_Lean_Parser_command_openSpec_renaming; -x_51 = l_Lean_Parser_Syntax_mkNode(x_50, x_49); -return x_51; -} -else -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_52 = lean::cnstr_get(x_5, 0); -lean::inc(x_52); -lean::dec(x_5); -x_53 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_6); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_10); -lean::cnstr_set(x_55, 1, x_54); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_47); -lean::cnstr_set(x_56, 1, x_55); -x_57 = l_Lean_Parser_command_openSpec_renaming; -x_58 = l_Lean_Parser_Syntax_mkNode(x_57, x_56); -return x_58; -} -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_59 = lean::cnstr_get(x_3, 0); -lean::inc(x_59); -lean::dec(x_3); -x_60 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_6); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_44); -lean::cnstr_set(x_62, 1, x_61); -x_63 = l_Lean_Parser_Syntax_mkNode(x_9, x_62); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_64 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_10); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_63); -lean::cnstr_set(x_66, 1, x_65); -x_67 = l_Lean_Parser_command_openSpec_renaming; -x_68 = l_Lean_Parser_Syntax_mkNode(x_67, x_66); -return x_68; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = lean::cnstr_get(x_5, 0); -lean::inc(x_69); -lean::dec(x_5); -x_70 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_70, 0, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_6); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_10); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_63); -lean::cnstr_set(x_73, 1, x_72); -x_74 = l_Lean_Parser_command_openSpec_renaming; -x_75 = l_Lean_Parser_Syntax_mkNode(x_74, x_73); -return x_75; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_command_openSpec_renaming_item_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_openSpec_renaming_item_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_1); -lean::cnstr_set(x_5, 2, x_4); -lean::cnstr_set(x_5, 3, x_1); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__2; -x_9 = l_List_map___main___rarg(x_8, x_7); -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_1); -lean::cnstr_set(x_10, 2, x_9); -lean::cnstr_set(x_10, 3, x_1); -return x_10; -} -} -} -obj* l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_63; -x_63 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; -x_64 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__3; -return x_64; -} -else -{ -obj* x_65; obj* x_66; -x_65 = lean::cnstr_get(x_63, 0); -lean::inc(x_65); -lean::dec(x_63); -x_66 = lean::cnstr_get(x_65, 1); -lean::inc(x_66); -lean::dec(x_65); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; -x_67 = lean::box(3); -x_2 = x_66; -x_3 = x_67; -goto block_62; -} -else -{ -obj* x_68; obj* x_69; obj* x_70; -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_66, 1); -lean::inc(x_69); -lean::dec(x_66); -x_70 = l_Lean_Parser_Syntax_asNode___main(x_68); -if (lean::obj_tag(x_70) == 0) -{ -if (lean::obj_tag(x_69) == 0) -{ -obj* x_71; -x_71 = lean::box(3); -x_2 = x_69; -x_3 = x_71; -goto block_62; -} -else -{ -obj* x_72; obj* x_73; -x_72 = lean::cnstr_get(x_69, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_69, 1); -lean::inc(x_73); -lean::dec(x_69); -x_2 = x_73; -x_3 = x_72; -goto block_62; -} -} -else -{ -obj* x_74; obj* x_75; obj* x_76; -x_74 = lean::cnstr_get(x_70, 0); -lean::inc(x_74); -lean::dec(x_70); -x_75 = lean::cnstr_get(x_74, 1); -lean::inc(x_75); -lean::dec(x_74); -x_76 = l_List_append___rarg(x_75, x_69); -if (lean::obj_tag(x_76) == 0) -{ -obj* x_77; -x_77 = lean::box(3); -x_2 = x_76; -x_3 = x_77; -goto block_62; -} -else -{ -obj* x_78; obj* x_79; -x_78 = lean::cnstr_get(x_76, 0); -lean::inc(x_78); -x_79 = lean::cnstr_get(x_76, 1); -lean::inc(x_79); -lean::dec(x_76); -x_2 = x_79; -x_3 = x_78; -goto block_62; -} -} -} -} -block_62: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_59; obj* x_60; -x_59 = lean::cnstr_get(x_3, 0); -lean::inc(x_59); -lean::dec(x_3); -x_60 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -x_4 = x_60; -goto block_58; -} -else -{ -obj* x_61; -lean::dec(x_3); -x_61 = lean::box(0); -x_4 = x_61; -goto block_58; -} -block_58: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_55; -x_55 = lean::box(3); -x_5 = x_2; -x_6 = x_55; -goto block_54; -} -else -{ -obj* x_56; obj* x_57; -x_56 = lean::cnstr_get(x_2, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_2, 1); -lean::inc(x_57); -lean::dec(x_2); -x_5 = x_57; -x_6 = x_56; -goto block_54; -} -block_54: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 0) -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_6, 0); -lean::inc(x_51); -lean::dec(x_6); -x_52 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_52, 0, x_51); -x_7 = x_52; -goto block_50; -} -else -{ -obj* x_53; -lean::dec(x_6); -x_53 = lean::box(0); -x_7 = x_53; -goto block_50; -} -block_50: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_47; -x_47 = lean::box(3); -x_8 = x_5; -x_9 = x_47; -goto block_46; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_5, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_5, 1); -lean::inc(x_49); -lean::dec(x_5); -x_8 = x_49; -x_9 = x_48; -goto block_46; -} -block_46: -{ -obj* x_10; -x_10 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_10) == 0) -{ -if (lean::obj_tag(x_8) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::box(0); -x_12 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1; -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_12); -lean::cnstr_set(x_13, 3, x_11); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_8, 0); -lean::inc(x_14); -lean::dec(x_8); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_7); -lean::cnstr_set(x_18, 2, x_17); -lean::cnstr_set(x_18, 3, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_14); -x_19 = lean::box(0); -x_20 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1; -x_21 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_7); -lean::cnstr_set(x_21, 2, x_20); -lean::cnstr_set(x_21, 3, x_19); -return x_21; -} -} -} -else -{ -uint8 x_22; -x_22 = !lean::is_exclusive(x_10); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_23 = lean::cnstr_get(x_10, 0); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -x_25 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__2; -x_26 = l_List_map___main___rarg(x_25, x_24); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_27; obj* x_28; -lean::free_heap_obj(x_10); -x_27 = lean::box(0); -x_28 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_7); -lean::cnstr_set(x_28, 2, x_26); -lean::cnstr_set(x_28, 3, x_27); -return x_28; -} -else -{ -obj* x_29; -x_29 = lean::cnstr_get(x_8, 0); -lean::inc(x_29); -lean::dec(x_8); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -lean::dec(x_29); -lean::cnstr_set(x_10, 0, x_30); -x_31 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_26); -lean::cnstr_set(x_31, 3, x_10); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -lean::dec(x_29); -lean::free_heap_obj(x_10); -x_32 = lean::box(0); -x_33 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_7); -lean::cnstr_set(x_33, 2, x_26); -lean::cnstr_set(x_33, 3, x_32); -return x_33; -} -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = lean::cnstr_get(x_10, 0); -lean::inc(x_34); -lean::dec(x_10); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -x_36 = l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__2; -x_37 = l_List_map___main___rarg(x_36, x_35); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_38; obj* x_39; -x_38 = lean::box(0); -x_39 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_39, 0, x_4); -lean::cnstr_set(x_39, 1, x_7); -lean::cnstr_set(x_39, 2, x_37); -lean::cnstr_set(x_39, 3, x_38); -return x_39; -} -else -{ -obj* x_40; -x_40 = lean::cnstr_get(x_8, 0); -lean::inc(x_40); -lean::dec(x_8); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_41; obj* x_42; obj* x_43; -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -lean::dec(x_40); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -x_43 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_7); -lean::cnstr_set(x_43, 2, x_37); -lean::cnstr_set(x_43, 3, x_42); -return x_43; -} -else -{ -obj* x_44; obj* x_45; -lean::dec(x_40); -x_44 = lean::box(0); -x_45 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_45, 0, x_4); -lean::cnstr_set(x_45, 1, x_7); -lean::cnstr_set(x_45, 2, x_37); -lean::cnstr_set(x_45, 3, x_44); -return x_45; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_openSpec_renaming_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_openSpec_renaming_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_openSpec_hiding() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("openSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("hiding"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_openSpec_hiding_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_4); -x_7 = l_Lean_Parser_noKind; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_10 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::box(3); -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_12); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_command_openSpec_hiding; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_17 = lean::cnstr_get(x_5, 0); -lean::inc(x_17); -lean::dec(x_5); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_9); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_8); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_Lean_Parser_command_openSpec_hiding; -x_25 = l_Lean_Parser_Syntax_mkNode(x_24, x_23); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_3, 0); -lean::inc(x_26); -lean::dec(x_3); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_28 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_8); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::box(3); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_30); -x_33 = l_Lean_Parser_command_openSpec_hiding; -x_34 = l_Lean_Parser_Syntax_mkNode(x_33, x_32); -return x_34; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_35 = lean::cnstr_get(x_5, 0); -lean::inc(x_35); -lean::dec(x_5); -x_36 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_9); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_8); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_27); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::box(3); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_39); -x_42 = l_Lean_Parser_command_openSpec_hiding; -x_43 = l_Lean_Parser_Syntax_mkNode(x_42, x_41); -return x_43; -} -} -} -else -{ -obj* x_44; obj* x_45; -x_44 = lean::cnstr_get(x_2, 0); -lean::inc(x_44); -lean::dec(x_2); -x_45 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_46 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_8); -lean::cnstr_set(x_47, 1, x_46); -x_48 = lean::box(3); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_47); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_45); -lean::cnstr_set(x_50, 1, x_49); -x_51 = l_Lean_Parser_command_openSpec_hiding; -x_52 = l_Lean_Parser_Syntax_mkNode(x_51, x_50); -return x_52; -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_53 = lean::cnstr_get(x_5, 0); -lean::inc(x_53); -lean::dec(x_5); -x_54 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_9); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_8); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::box(3); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_56); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_45); -lean::cnstr_set(x_59, 1, x_58); -x_60 = l_Lean_Parser_command_openSpec_hiding; -x_61 = l_Lean_Parser_Syntax_mkNode(x_60, x_59); -return x_61; -} -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_3, 0); -lean::inc(x_62); -lean::dec(x_3); -x_63 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_63, 0, x_62); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_64 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_8); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_63); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_45); -lean::cnstr_set(x_67, 1, x_66); -x_68 = l_Lean_Parser_command_openSpec_hiding; -x_69 = l_Lean_Parser_Syntax_mkNode(x_68, x_67); -return x_69; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_70 = lean::cnstr_get(x_5, 0); -lean::inc(x_70); -lean::dec(x_5); -x_71 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_71, 0, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_9); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_8); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_63); -lean::cnstr_set(x_74, 1, x_73); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_45); -lean::cnstr_set(x_75, 1, x_74); -x_76 = l_Lean_Parser_command_openSpec_hiding; -x_77 = l_Lean_Parser_Syntax_mkNode(x_76, x_75); -return x_77; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_1); -lean::cnstr_set(x_5, 2, x_4); -lean::cnstr_set(x_5, 3, x_1); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_7); -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_8); -lean::cnstr_set(x_9, 3, x_1); -return x_9; -} -} -} -obj* l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_60; -x_60 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; -x_61 = l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1___closed__1; -return x_61; -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_60, 0); -lean::inc(x_62); -lean::dec(x_60); -x_63 = lean::cnstr_get(x_62, 1); -lean::inc(x_63); -lean::dec(x_62); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; -x_64 = lean::box(3); -x_2 = x_63; -x_3 = x_64; -goto block_59; -} -else -{ -obj* x_65; obj* x_66; -x_65 = lean::cnstr_get(x_63, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_63, 1); -lean::inc(x_66); -lean::dec(x_63); -x_2 = x_66; -x_3 = x_65; -goto block_59; -} -} -block_59: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_56; obj* x_57; -x_56 = lean::cnstr_get(x_3, 0); -lean::inc(x_56); -lean::dec(x_3); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_4 = x_57; -goto block_55; -} -else -{ -obj* x_58; -lean::dec(x_3); -x_58 = lean::box(0); -x_4 = x_58; -goto block_55; -} -block_55: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_52; -x_52 = lean::box(3); -x_5 = x_2; -x_6 = x_52; -goto block_51; -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_2, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_2, 1); -lean::inc(x_54); -lean::dec(x_2); -x_5 = x_54; -x_6 = x_53; -goto block_51; -} -block_51: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 0) -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_6, 0); -lean::inc(x_48); -lean::dec(x_6); -x_49 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -x_7 = x_49; -goto block_47; -} -else -{ -obj* x_50; -lean::dec(x_6); -x_50 = lean::box(0); -x_7 = x_50; -goto block_47; -} -block_47: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_44; -x_44 = lean::box(3); -x_8 = x_5; -x_9 = x_44; -goto block_43; -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_5, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_5, 1); -lean::inc(x_46); -lean::dec(x_5); -x_8 = x_46; -x_9 = x_45; -goto block_43; -} -block_43: -{ -obj* x_10; -x_10 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -x_11 = lean::box(0); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_12; obj* x_13; -x_12 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_12); -lean::cnstr_set(x_13, 3, x_11); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_8, 0); -lean::inc(x_14); -lean::dec(x_8); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_7); -lean::cnstr_set(x_18, 2, x_17); -lean::cnstr_set(x_18, 3, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_14); -x_19 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_7); -lean::cnstr_set(x_20, 2, x_19); -lean::cnstr_set(x_20, 3, x_11); -return x_20; -} -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_10); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_10, 0); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -x_24 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_23); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_25; obj* x_26; -lean::free_heap_obj(x_10); -x_25 = lean::box(0); -x_26 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_24); -lean::cnstr_set(x_26, 3, x_25); -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_8, 0); -lean::inc(x_27); -lean::dec(x_8); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -lean::dec(x_27); -lean::cnstr_set(x_10, 0, x_28); -x_29 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_24); -lean::cnstr_set(x_29, 3, x_10); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -lean::dec(x_27); -lean::free_heap_obj(x_10); -x_30 = lean::box(0); -x_31 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_24); -lean::cnstr_set(x_31, 3, x_30); -return x_31; -} -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; -x_32 = lean::cnstr_get(x_10, 0); -lean::inc(x_32); -lean::dec(x_10); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -x_34 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_33); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::box(0); -x_36 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_36, 0, x_4); -lean::cnstr_set(x_36, 1, x_7); -lean::cnstr_set(x_36, 2, x_34); -lean::cnstr_set(x_36, 3, x_35); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_8, 0); -lean::inc(x_37); -lean::dec(x_8); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -lean::dec(x_37); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_40, 0, x_4); -lean::cnstr_set(x_40, 1, x_7); -lean::cnstr_set(x_40, 2, x_34); -lean::cnstr_set(x_40, 3, x_39); -return x_40; -} -else -{ -obj* x_41; obj* x_42; -lean::dec(x_37); -x_41 = lean::box(0); -x_42 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_42, 0, x_4); -lean::cnstr_set(x_42, 1, x_7); -lean::cnstr_set(x_42, 2, x_34); -lean::cnstr_set(x_42, 3, x_41); -return x_42; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_hiding_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_hiding_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_openSpec_hiding_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_openSpec_hiding_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_openSpec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("openSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_openSpec_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_2); -x_8 = lean::box(0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_74; -x_74 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_9 = x_74; -goto block_73; -} -else -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_75 = lean::cnstr_get(x_3, 0); -lean::inc(x_75); -lean::dec(x_3); -x_76 = l_Lean_Parser_command_openSpec_as_HasView; -x_77 = lean::cnstr_get(x_76, 1); -lean::inc(x_77); -x_78 = lean::apply_1(x_77, x_75); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_8); -x_80 = l_Lean_Parser_noKind; -x_81 = l_Lean_Parser_Syntax_mkNode(x_80, x_79); -x_9 = x_81; -goto block_73; -} -block_73: -{ -obj* x_10; obj* x_33; obj* x_34; -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_62; -x_62 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_10 = x_62; -goto block_32; -} -else -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_5, 0); -lean::inc(x_63); -lean::dec(x_5); -x_64 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_33 = x_64; -x_34 = x_63; -goto block_61; -} -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_65 = lean::cnstr_get(x_4, 0); -lean::inc(x_65); -lean::dec(x_4); -x_66 = l_Lean_Parser_command_openSpec_only_HasView; -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -x_68 = lean::apply_1(x_67, x_65); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_8); -x_70 = l_Lean_Parser_noKind; -x_71 = l_Lean_Parser_Syntax_mkNode(x_70, x_69); -if (lean::obj_tag(x_5) == 0) -{ -x_10 = x_71; -goto block_32; -} -else -{ -obj* x_72; -x_72 = lean::cnstr_get(x_5, 0); -lean::inc(x_72); -lean::dec(x_5); -x_33 = x_71; -x_34 = x_72; -goto block_61; -} -} -block_32: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2; -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_command_openSpec; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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_31; -x_17 = lean::cnstr_get(x_6, 0); -lean::inc(x_17); -lean::dec(x_6); -x_18 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -x_20 = lean::apply_1(x_19, x_17); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_8); -x_22 = l_Lean_Parser_noKind; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_8); -x_25 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_10); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_9); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_7); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_Lean_Parser_command_openSpec; -x_31 = l_Lean_Parser_Syntax_mkNode(x_30, x_29); -return x_31; -} -} -block_61: -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_35 = l_Lean_Parser_command_openSpec_renaming_HasView; -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -x_37 = lean::apply_1(x_36, x_34); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_8); -x_39 = l_Lean_Parser_noKind; -x_40 = l_Lean_Parser_Syntax_mkNode(x_39, x_38); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_41 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_33); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_9); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_7); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_command_openSpec; -x_47 = l_Lean_Parser_Syntax_mkNode(x_46, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_48 = lean::cnstr_get(x_6, 0); -lean::inc(x_48); -lean::dec(x_6); -x_49 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -x_51 = lean::apply_1(x_50, x_48); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_8); -x_53 = l_Lean_Parser_Syntax_mkNode(x_39, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_8); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_33); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_9); -lean::cnstr_set(x_57, 1, x_56); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_7); -lean::cnstr_set(x_58, 1, x_57); -x_59 = l_Lean_Parser_command_openSpec; -x_60 = l_Lean_Parser_Syntax_mkNode(x_59, x_58); -return x_60; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_openSpec_renaming_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_openSpec_only_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_openSpec_as_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_90; obj* x_91; -x_90 = lean::box(3); -x_91 = l_Lean_Parser_Syntax_asNode___main(x_90); -if (lean::obj_tag(x_91) == 0) -{ -obj* x_92; -x_92 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4; -x_1 = x_92; -goto block_89; -} -else -{ -uint8 x_93; -x_93 = !lean::is_exclusive(x_91); -if (x_93 == 0) -{ -obj* x_94; obj* x_95; -x_94 = lean::cnstr_get(x_91, 0); -x_95 = lean::cnstr_get(x_94, 1); -lean::inc(x_95); -lean::dec(x_94); -if (lean::obj_tag(x_95) == 0) -{ -obj* x_96; -lean::free_heap_obj(x_91); -x_96 = lean::box(0); -x_1 = x_96; -goto block_89; -} -else -{ -obj* x_97; -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -if (lean::obj_tag(x_97) == 0) -{ -obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_98 = lean::cnstr_get(x_95, 0); -lean::inc(x_98); -lean::dec(x_95); -x_99 = l_Lean_Parser_command_openSpec_as_HasView; -x_100 = lean::cnstr_get(x_99, 0); -lean::inc(x_100); -x_101 = lean::apply_1(x_100, x_98); -lean::cnstr_set(x_91, 0, x_101); -x_1 = x_91; -goto block_89; -} -else -{ -obj* x_102; -lean::dec(x_97); -lean::dec(x_95); -lean::free_heap_obj(x_91); -x_102 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4; -x_1 = x_102; -goto block_89; -} -} -} -else -{ -obj* x_103; obj* x_104; -x_103 = lean::cnstr_get(x_91, 0); -lean::inc(x_103); -lean::dec(x_91); -x_104 = lean::cnstr_get(x_103, 1); -lean::inc(x_104); -lean::dec(x_103); -if (lean::obj_tag(x_104) == 0) -{ -obj* x_105; -x_105 = lean::box(0); -x_1 = x_105; -goto block_89; -} -else -{ -obj* x_106; -x_106 = lean::cnstr_get(x_104, 1); -lean::inc(x_106); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_107 = lean::cnstr_get(x_104, 0); -lean::inc(x_107); -lean::dec(x_104); -x_108 = l_Lean_Parser_command_openSpec_as_HasView; -x_109 = lean::cnstr_get(x_108, 0); -lean::inc(x_109); -x_110 = lean::apply_1(x_109, x_107); -x_111 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_111, 0, x_110); -x_1 = x_111; -goto block_89; -} -else -{ -obj* x_112; -lean::dec(x_106); -lean::dec(x_104); -x_112 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4; -x_1 = x_112; -goto block_89; -} -} -} -} -block_89: -{ -obj* x_2; obj* x_66; obj* x_67; -x_66 = lean::box(3); -x_67 = l_Lean_Parser_Syntax_asNode___main(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; -x_68 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3; -x_2 = x_68; -goto block_65; -} -else -{ -uint8 x_69; -x_69 = !lean::is_exclusive(x_67); -if (x_69 == 0) -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_67, 0); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -lean::dec(x_70); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -lean::free_heap_obj(x_67); -x_72 = lean::box(0); -x_2 = x_72; -goto block_65; -} -else -{ -obj* x_73; -x_73 = lean::cnstr_get(x_71, 1); -lean::inc(x_73); -if (lean::obj_tag(x_73) == 0) -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_74 = lean::cnstr_get(x_71, 0); -lean::inc(x_74); -lean::dec(x_71); -x_75 = l_Lean_Parser_command_openSpec_only_HasView; -x_76 = lean::cnstr_get(x_75, 0); -lean::inc(x_76); -x_77 = lean::apply_1(x_76, x_74); -lean::cnstr_set(x_67, 0, x_77); -x_2 = x_67; -goto block_65; -} -else -{ -obj* x_78; -lean::dec(x_73); -lean::dec(x_71); -lean::free_heap_obj(x_67); -x_78 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3; -x_2 = x_78; -goto block_65; -} -} -} -else -{ -obj* x_79; obj* x_80; -x_79 = lean::cnstr_get(x_67, 0); -lean::inc(x_79); -lean::dec(x_67); -x_80 = lean::cnstr_get(x_79, 1); -lean::inc(x_80); -lean::dec(x_79); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; -x_81 = lean::box(0); -x_2 = x_81; -goto block_65; -} -else -{ -obj* x_82; -x_82 = lean::cnstr_get(x_80, 1); -lean::inc(x_82); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; -x_83 = lean::cnstr_get(x_80, 0); -lean::inc(x_83); -lean::dec(x_80); -x_84 = l_Lean_Parser_command_openSpec_only_HasView; -x_85 = lean::cnstr_get(x_84, 0); -lean::inc(x_85); -x_86 = lean::apply_1(x_85, x_83); -x_87 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -x_2 = x_87; -goto block_65; -} -else -{ -obj* x_88; -lean::dec(x_82); -lean::dec(x_80); -x_88 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3; -x_2 = x_88; -goto block_65; -} -} -} -} -block_65: -{ -obj* x_3; obj* x_42; obj* x_43; -x_42 = lean::box(3); -x_43 = l_Lean_Parser_Syntax_asNode___main(x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_3 = x_44; -goto block_41; -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_43); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_43, 0); -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -lean::dec(x_46); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -lean::free_heap_obj(x_43); -x_48 = lean::box(0); -x_3 = x_48; -goto block_41; -} -else -{ -obj* x_49; -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_50 = lean::cnstr_get(x_47, 0); -lean::inc(x_50); -lean::dec(x_47); -x_51 = l_Lean_Parser_command_openSpec_renaming_HasView; -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_53 = lean::apply_1(x_52, x_50); -lean::cnstr_set(x_43, 0, x_53); -x_3 = x_43; -goto block_41; -} -else -{ -obj* x_54; -lean::dec(x_49); -lean::dec(x_47); -lean::free_heap_obj(x_43); -x_54 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_3 = x_54; -goto block_41; -} -} -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_43, 0); -lean::inc(x_55); -lean::dec(x_43); -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -lean::dec(x_55); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -x_57 = lean::box(0); -x_3 = x_57; -goto block_41; -} -else -{ -obj* x_58; -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_59 = lean::cnstr_get(x_56, 0); -lean::inc(x_59); -lean::dec(x_56); -x_60 = l_Lean_Parser_command_openSpec_renaming_HasView; -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -x_62 = lean::apply_1(x_61, x_59); -x_63 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_63, 0, x_62); -x_3 = x_63; -goto block_41; -} -else -{ -obj* x_64; -lean::dec(x_58); -lean::dec(x_56); -x_64 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_3 = x_64; -goto block_41; -} -} -} -} -block_41: -{ -obj* x_4; obj* x_5; -x_4 = lean::box(3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_1); -lean::cnstr_set(x_8, 2, x_2); -lean::cnstr_set(x_8, 3, x_3); -lean::cnstr_set(x_8, 4, x_7); -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -lean::free_heap_obj(x_5); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_14 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_3); -lean::cnstr_set(x_14, 4, x_12); -return x_14; -} -else -{ -obj* x_15; -x_15 = lean::cnstr_get(x_11, 1); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_11, 0); -lean::inc(x_16); -lean::dec(x_11); -x_17 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -x_19 = lean::apply_1(x_18, x_16); -lean::cnstr_set(x_5, 0, x_19); -x_20 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_21 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_1); -lean::cnstr_set(x_21, 2, x_2); -lean::cnstr_set(x_21, 3, x_3); -lean::cnstr_set(x_21, 4, x_5); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -lean::dec(x_15); -lean::dec(x_11); -lean::free_heap_obj(x_5); -x_22 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_23 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_24 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_1); -lean::cnstr_set(x_24, 2, x_2); -lean::cnstr_set(x_24, 3, x_3); -lean::cnstr_set(x_24, 4, x_23); -return x_24; -} -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_5, 0); -lean::inc(x_25); -lean::dec(x_5); -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -lean::dec(x_25); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::box(0); -x_28 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_29 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_1); -lean::cnstr_set(x_29, 2, x_2); -lean::cnstr_set(x_29, 3, x_3); -lean::cnstr_set(x_29, 4, x_27); -return x_29; -} -else -{ -obj* x_30; -x_30 = lean::cnstr_get(x_26, 1); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_31 = lean::cnstr_get(x_26, 0); -lean::inc(x_31); -lean::dec(x_26); -x_32 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -x_34 = lean::apply_1(x_33, x_31); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -x_36 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_1); -lean::cnstr_set(x_37, 2, x_2); -lean::cnstr_set(x_37, 3, x_3); -lean::cnstr_set(x_37, 4, x_35); -return x_37; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_30); -lean::dec(x_26); -x_38 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_39 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_40 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_1); -lean::cnstr_set(x_40, 2, x_2); -lean::cnstr_set(x_40, 3, x_3); -lean::cnstr_set(x_40, 4, x_39); -return x_40; -} -} -} -} -} -} -} -} -} -obj* l_Lean_Parser_command_openSpec_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_171; -x_171 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_171) == 0) -{ -obj* x_172; -x_172 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__5; -return x_172; -} -else -{ -obj* x_173; obj* x_174; -x_173 = lean::cnstr_get(x_171, 0); -lean::inc(x_173); -lean::dec(x_171); -x_174 = lean::cnstr_get(x_173, 1); -lean::inc(x_174); -lean::dec(x_173); -if (lean::obj_tag(x_174) == 0) -{ -obj* x_175; -x_175 = lean::box(3); -x_2 = x_174; -x_3 = x_175; -goto block_170; -} -else -{ -obj* x_176; obj* x_177; -x_176 = lean::cnstr_get(x_174, 0); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_174, 1); -lean::inc(x_177); -lean::dec(x_174); -x_2 = x_177; -x_3 = x_176; -goto block_170; -} -} -block_170: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -obj* x_168; -x_168 = lean::cnstr_get(x_3, 0); -lean::inc(x_168); -lean::dec(x_3); -x_4 = x_168; -goto block_167; -} -else -{ -obj* x_169; -lean::dec(x_3); -x_169 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_4 = x_169; -goto block_167; -} -block_167: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_164; -x_164 = lean::box(3); -x_5 = x_2; -x_6 = x_164; -goto block_163; -} -else -{ -obj* x_165; obj* x_166; -x_165 = lean::cnstr_get(x_2, 0); -lean::inc(x_165); -x_166 = lean::cnstr_get(x_2, 1); -lean::inc(x_166); -lean::dec(x_2); -x_5 = x_166; -x_6 = x_165; -goto block_163; -} -block_163: -{ -obj* x_7; obj* x_141; -x_141 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_141) == 0) -{ -obj* x_142; -x_142 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4; -x_7 = x_142; -goto block_140; -} -else -{ -uint8 x_143; -x_143 = !lean::is_exclusive(x_141); -if (x_143 == 0) -{ -obj* x_144; obj* x_145; -x_144 = lean::cnstr_get(x_141, 0); -x_145 = lean::cnstr_get(x_144, 1); -lean::inc(x_145); -lean::dec(x_144); -if (lean::obj_tag(x_145) == 0) -{ -obj* x_146; -lean::free_heap_obj(x_141); -x_146 = lean::box(0); -x_7 = x_146; -goto block_140; -} -else -{ -obj* x_147; -x_147 = lean::cnstr_get(x_145, 1); -lean::inc(x_147); -if (lean::obj_tag(x_147) == 0) -{ -obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_148 = lean::cnstr_get(x_145, 0); -lean::inc(x_148); -lean::dec(x_145); -x_149 = l_Lean_Parser_command_openSpec_as_HasView; -x_150 = lean::cnstr_get(x_149, 0); -lean::inc(x_150); -x_151 = lean::apply_1(x_150, x_148); -lean::cnstr_set(x_141, 0, x_151); -x_7 = x_141; -goto block_140; -} -else -{ -obj* x_152; -lean::dec(x_147); -lean::dec(x_145); -lean::free_heap_obj(x_141); -x_152 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4; -x_7 = x_152; -goto block_140; -} -} -} -else -{ -obj* x_153; obj* x_154; -x_153 = lean::cnstr_get(x_141, 0); -lean::inc(x_153); -lean::dec(x_141); -x_154 = lean::cnstr_get(x_153, 1); -lean::inc(x_154); -lean::dec(x_153); -if (lean::obj_tag(x_154) == 0) -{ -obj* x_155; -x_155 = lean::box(0); -x_7 = x_155; -goto block_140; -} -else -{ -obj* x_156; -x_156 = lean::cnstr_get(x_154, 1); -lean::inc(x_156); -if (lean::obj_tag(x_156) == 0) -{ -obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; -x_157 = lean::cnstr_get(x_154, 0); -lean::inc(x_157); -lean::dec(x_154); -x_158 = l_Lean_Parser_command_openSpec_as_HasView; -x_159 = lean::cnstr_get(x_158, 0); -lean::inc(x_159); -x_160 = lean::apply_1(x_159, x_157); -x_161 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_161, 0, x_160); -x_7 = x_161; -goto block_140; -} -else -{ -obj* x_162; -lean::dec(x_156); -lean::dec(x_154); -x_162 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4; -x_7 = x_162; -goto block_140; -} -} -} -} -block_140: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_137; -x_137 = lean::box(3); -x_8 = x_5; -x_9 = x_137; -goto block_136; -} -else -{ -obj* x_138; obj* x_139; -x_138 = lean::cnstr_get(x_5, 0); -lean::inc(x_138); -x_139 = lean::cnstr_get(x_5, 1); -lean::inc(x_139); -lean::dec(x_5); -x_8 = x_139; -x_9 = x_138; -goto block_136; -} -block_136: -{ -obj* x_10; obj* x_114; -x_114 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_114) == 0) -{ -obj* x_115; -x_115 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3; -x_10 = x_115; -goto block_113; -} -else -{ -uint8 x_116; -x_116 = !lean::is_exclusive(x_114); -if (x_116 == 0) -{ -obj* x_117; obj* x_118; -x_117 = lean::cnstr_get(x_114, 0); -x_118 = lean::cnstr_get(x_117, 1); -lean::inc(x_118); -lean::dec(x_117); -if (lean::obj_tag(x_118) == 0) -{ -obj* x_119; -lean::free_heap_obj(x_114); -x_119 = lean::box(0); -x_10 = x_119; -goto block_113; -} -else -{ -obj* x_120; -x_120 = lean::cnstr_get(x_118, 1); -lean::inc(x_120); -if (lean::obj_tag(x_120) == 0) -{ -obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_121 = lean::cnstr_get(x_118, 0); -lean::inc(x_121); -lean::dec(x_118); -x_122 = l_Lean_Parser_command_openSpec_only_HasView; -x_123 = lean::cnstr_get(x_122, 0); -lean::inc(x_123); -x_124 = lean::apply_1(x_123, x_121); -lean::cnstr_set(x_114, 0, x_124); -x_10 = x_114; -goto block_113; -} -else -{ -obj* x_125; -lean::dec(x_120); -lean::dec(x_118); -lean::free_heap_obj(x_114); -x_125 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3; -x_10 = x_125; -goto block_113; -} -} -} -else -{ -obj* x_126; obj* x_127; -x_126 = lean::cnstr_get(x_114, 0); -lean::inc(x_126); -lean::dec(x_114); -x_127 = lean::cnstr_get(x_126, 1); -lean::inc(x_127); -lean::dec(x_126); -if (lean::obj_tag(x_127) == 0) -{ -obj* x_128; -x_128 = lean::box(0); -x_10 = x_128; -goto block_113; -} -else -{ -obj* x_129; -x_129 = lean::cnstr_get(x_127, 1); -lean::inc(x_129); -if (lean::obj_tag(x_129) == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; -x_130 = lean::cnstr_get(x_127, 0); -lean::inc(x_130); -lean::dec(x_127); -x_131 = l_Lean_Parser_command_openSpec_only_HasView; -x_132 = lean::cnstr_get(x_131, 0); -lean::inc(x_132); -x_133 = lean::apply_1(x_132, x_130); -x_134 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_134, 0, x_133); -x_10 = x_134; -goto block_113; -} -else -{ -obj* x_135; -lean::dec(x_129); -lean::dec(x_127); -x_135 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3; -x_10 = x_135; -goto block_113; -} -} -} -} -block_113: -{ -obj* x_11; obj* x_43; obj* x_44; obj* x_75; obj* x_76; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_110; -x_110 = lean::box(3); -x_75 = x_8; -x_76 = x_110; -goto block_109; -} -else -{ -obj* x_111; obj* x_112; -x_111 = lean::cnstr_get(x_8, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_8, 1); -lean::inc(x_112); -lean::dec(x_8); -x_75 = x_112; -x_76 = x_111; -goto block_109; -} -block_42: -{ -obj* x_12; obj* x_13; -x_12 = lean::box(3); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; -x_14 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_15 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_10); -lean::cnstr_set(x_15, 3, x_11); -lean::cnstr_set(x_15, 4, x_14); -return x_15; -} -else -{ -uint8 x_16; -x_16 = !lean::is_exclusive(x_13); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_13, 0); -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -lean::dec(x_17); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -lean::free_heap_obj(x_13); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_7); -lean::cnstr_set(x_20, 2, x_10); -lean::cnstr_set(x_20, 3, x_11); -lean::cnstr_set(x_20, 4, x_19); -return x_20; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_18, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = lean::cnstr_get(x_18, 0); -lean::inc(x_22); -lean::dec(x_18); -x_23 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::apply_1(x_24, x_22); -lean::cnstr_set(x_13, 0, x_25); -x_26 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_10); -lean::cnstr_set(x_26, 3, x_11); -lean::cnstr_set(x_26, 4, x_13); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -lean::dec(x_21); -lean::dec(x_18); -lean::free_heap_obj(x_13); -x_27 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_28 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_7); -lean::cnstr_set(x_28, 2, x_10); -lean::cnstr_set(x_28, 3, x_11); -lean::cnstr_set(x_28, 4, x_27); -return x_28; -} -} -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_13, 0); -lean::inc(x_29); -lean::dec(x_13); -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::box(0); -x_32 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_32, 0, x_4); -lean::cnstr_set(x_32, 1, x_7); -lean::cnstr_set(x_32, 2, x_10); -lean::cnstr_set(x_32, 3, x_11); -lean::cnstr_set(x_32, 4, x_31); -return x_32; -} -else -{ -obj* x_33; -x_33 = lean::cnstr_get(x_30, 1); -lean::inc(x_33); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_30, 0); -lean::inc(x_34); -lean::dec(x_30); -x_35 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -x_37 = lean::apply_1(x_36, x_34); -x_38 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -x_39 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_39, 0, x_4); -lean::cnstr_set(x_39, 1, x_7); -lean::cnstr_set(x_39, 2, x_10); -lean::cnstr_set(x_39, 3, x_11); -lean::cnstr_set(x_39, 4, x_38); -return x_39; -} -else -{ -obj* x_40; obj* x_41; -lean::dec(x_33); -lean::dec(x_30); -x_40 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_41 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_41, 0, x_4); -lean::cnstr_set(x_41, 1, x_7); -lean::cnstr_set(x_41, 2, x_10); -lean::cnstr_set(x_41, 3, x_11); -lean::cnstr_set(x_41, 4, x_40); -return x_41; -} -} -} -} -} -block_74: -{ -obj* x_45; -x_45 = l_Lean_Parser_Syntax_asNode___main(x_44); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; obj* x_47; -x_46 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_47 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_47, 0, x_4); -lean::cnstr_set(x_47, 1, x_7); -lean::cnstr_set(x_47, 2, x_10); -lean::cnstr_set(x_47, 3, x_43); -lean::cnstr_set(x_47, 4, x_46); -return x_47; -} -else -{ -uint8 x_48; -x_48 = !lean::is_exclusive(x_45); -if (x_48 == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_45, 0); -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -lean::dec(x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; -lean::free_heap_obj(x_45); -x_51 = lean::box(0); -x_52 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_52, 0, x_4); -lean::cnstr_set(x_52, 1, x_7); -lean::cnstr_set(x_52, 2, x_10); -lean::cnstr_set(x_52, 3, x_43); -lean::cnstr_set(x_52, 4, x_51); -return x_52; -} -else -{ -obj* x_53; -x_53 = lean::cnstr_get(x_50, 1); -lean::inc(x_53); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_54 = lean::cnstr_get(x_50, 0); -lean::inc(x_54); -lean::dec(x_50); -x_55 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_57 = lean::apply_1(x_56, x_54); -lean::cnstr_set(x_45, 0, x_57); -x_58 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_58, 0, x_4); -lean::cnstr_set(x_58, 1, x_7); -lean::cnstr_set(x_58, 2, x_10); -lean::cnstr_set(x_58, 3, x_43); -lean::cnstr_set(x_58, 4, x_45); -return x_58; -} -else -{ -obj* x_59; obj* x_60; -lean::dec(x_53); -lean::dec(x_50); -lean::free_heap_obj(x_45); -x_59 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_60 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_60, 0, x_4); -lean::cnstr_set(x_60, 1, x_7); -lean::cnstr_set(x_60, 2, x_10); -lean::cnstr_set(x_60, 3, x_43); -lean::cnstr_set(x_60, 4, x_59); -return x_60; -} -} -} -else -{ -obj* x_61; obj* x_62; -x_61 = lean::cnstr_get(x_45, 0); -lean::inc(x_61); -lean::dec(x_45); -x_62 = lean::cnstr_get(x_61, 1); -lean::inc(x_62); -lean::dec(x_61); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; -x_63 = lean::box(0); -x_64 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_64, 0, x_4); -lean::cnstr_set(x_64, 1, x_7); -lean::cnstr_set(x_64, 2, x_10); -lean::cnstr_set(x_64, 3, x_43); -lean::cnstr_set(x_64, 4, x_63); -return x_64; -} -else -{ -obj* x_65; -x_65 = lean::cnstr_get(x_62, 1); -lean::inc(x_65); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_66 = lean::cnstr_get(x_62, 0); -lean::inc(x_66); -lean::dec(x_62); -x_67 = l_Lean_Parser_command_openSpec_hiding_HasView; -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -x_69 = lean::apply_1(x_68, x_66); -x_70 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_70, 0, x_69); -x_71 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_71, 0, x_4); -lean::cnstr_set(x_71, 1, x_7); -lean::cnstr_set(x_71, 2, x_10); -lean::cnstr_set(x_71, 3, x_43); -lean::cnstr_set(x_71, 4, x_70); -return x_71; -} -else -{ -obj* x_72; obj* x_73; -lean::dec(x_65); -lean::dec(x_62); -x_72 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1; -x_73 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_73, 0, x_4); -lean::cnstr_set(x_73, 1, x_7); -lean::cnstr_set(x_73, 2, x_10); -lean::cnstr_set(x_73, 3, x_43); -lean::cnstr_set(x_73, 4, x_72); -return x_73; -} -} -} -} -} -block_109: -{ -obj* x_77; -x_77 = l_Lean_Parser_Syntax_asNode___main(x_76); -if (lean::obj_tag(x_77) == 0) -{ -if (lean::obj_tag(x_75) == 0) -{ -obj* x_78; -x_78 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_11 = x_78; -goto block_42; -} -else -{ -obj* x_79; obj* x_80; -x_79 = lean::cnstr_get(x_75, 0); -lean::inc(x_79); -lean::dec(x_75); -x_80 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_43 = x_80; -x_44 = x_79; -goto block_74; -} -} -else -{ -uint8 x_81; -x_81 = !lean::is_exclusive(x_77); -if (x_81 == 0) -{ -obj* x_82; obj* x_83; -x_82 = lean::cnstr_get(x_77, 0); -x_83 = lean::cnstr_get(x_82, 1); -lean::inc(x_83); -lean::dec(x_82); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; -lean::free_heap_obj(x_77); -x_84 = lean::box(0); -if (lean::obj_tag(x_75) == 0) -{ -x_11 = x_84; -goto block_42; -} -else -{ -obj* x_85; -x_85 = lean::cnstr_get(x_75, 0); -lean::inc(x_85); -lean::dec(x_75); -x_43 = x_84; -x_44 = x_85; -goto block_74; -} -} -else -{ -obj* x_86; -x_86 = lean::cnstr_get(x_83, 1); -lean::inc(x_86); -if (lean::obj_tag(x_86) == 0) -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_87 = lean::cnstr_get(x_83, 0); -lean::inc(x_87); -lean::dec(x_83); -x_88 = l_Lean_Parser_command_openSpec_renaming_HasView; -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -x_90 = lean::apply_1(x_89, x_87); -lean::cnstr_set(x_77, 0, x_90); -if (lean::obj_tag(x_75) == 0) -{ -x_11 = x_77; -goto block_42; -} -else -{ -obj* x_91; -x_91 = lean::cnstr_get(x_75, 0); -lean::inc(x_91); -lean::dec(x_75); -x_43 = x_77; -x_44 = x_91; -goto block_74; -} -} -else -{ -lean::dec(x_86); -lean::dec(x_83); -lean::free_heap_obj(x_77); -if (lean::obj_tag(x_75) == 0) -{ -obj* x_92; -x_92 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_11 = x_92; -goto block_42; -} -else -{ -obj* x_93; obj* x_94; -x_93 = lean::cnstr_get(x_75, 0); -lean::inc(x_93); -lean::dec(x_75); -x_94 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_43 = x_94; -x_44 = x_93; -goto block_74; -} -} -} -} -else -{ -obj* x_95; obj* x_96; -x_95 = lean::cnstr_get(x_77, 0); -lean::inc(x_95); -lean::dec(x_77); -x_96 = lean::cnstr_get(x_95, 1); -lean::inc(x_96); -lean::dec(x_95); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; -x_97 = lean::box(0); -if (lean::obj_tag(x_75) == 0) -{ -x_11 = x_97; -goto block_42; -} -else -{ -obj* x_98; -x_98 = lean::cnstr_get(x_75, 0); -lean::inc(x_98); -lean::dec(x_75); -x_43 = x_97; -x_44 = x_98; -goto block_74; -} -} -else -{ -obj* x_99; -x_99 = lean::cnstr_get(x_96, 1); -lean::inc(x_99); -if (lean::obj_tag(x_99) == 0) -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_100 = lean::cnstr_get(x_96, 0); -lean::inc(x_100); -lean::dec(x_96); -x_101 = l_Lean_Parser_command_openSpec_renaming_HasView; -x_102 = lean::cnstr_get(x_101, 0); -lean::inc(x_102); -x_103 = lean::apply_1(x_102, x_100); -x_104 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_104, 0, x_103); -if (lean::obj_tag(x_75) == 0) -{ -x_11 = x_104; -goto block_42; -} -else -{ -obj* x_105; -x_105 = lean::cnstr_get(x_75, 0); -lean::inc(x_105); -lean::dec(x_75); -x_43 = x_104; -x_44 = x_105; -goto block_74; -} -} -else -{ -lean::dec(x_99); -lean::dec(x_96); -if (lean::obj_tag(x_75) == 0) -{ -obj* x_106; -x_106 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_11 = x_106; -goto block_42; -} -else -{ -obj* x_107; obj* x_108; -x_107 = lean::cnstr_get(x_75, 0); -lean::inc(x_107); -lean::dec(x_75); -x_108 = l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2; -x_43 = x_108; -x_44 = x_107; -goto block_74; -} -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_openSpec_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_openSpec_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_openSpec_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 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_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("as"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::box(0); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Parser_command_openSpec_as; -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_15, 0, x_14); -lean::closure_set(x_15, 1, x_13); -x_16 = 0; -x_17 = lean::box(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_18, 0, x_15); -lean::closure_set(x_18, 1, x_17); -x_19 = lean::mk_string("("); -x_20 = l_String_trim(x_19); -lean::dec(x_19); -lean::inc(x_20); -x_21 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_21, 0, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_8); -lean::closure_set(x_22, 2, x_21); -lean::inc(x_12); -lean::inc(x_22); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_12); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_24, 0, x_23); -lean::inc(x_11); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_25, 0, x_11); -x_26 = lean::mk_string(")"); -x_27 = l_String_trim(x_26); -lean::dec(x_26); -lean::inc(x_27); -x_28 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_28, 0, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_8); -lean::closure_set(x_29, 2, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_10); -lean::inc(x_30); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_25); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_24); -lean::cnstr_set(x_32, 1, x_31); -x_33 = l_Lean_Parser_command_openSpec_only; -x_34 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_34, 0, x_33); -lean::closure_set(x_34, 1, x_32); -x_35 = lean::box(x_16); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_36, 0, x_34); -lean::closure_set(x_36, 1, x_35); -x_37 = lean::mk_string("renaming"); -x_38 = l_String_trim(x_37); -lean::dec(x_37); -lean::inc(x_38); -x_39 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_39, 0, x_38); -x_40 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_40, 0, x_38); -lean::closure_set(x_40, 1, x_8); -lean::closure_set(x_40, 2, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_10); -lean::inc(x_22); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_22); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_43, 0, x_42); -x_44 = lean::mk_string("->"); -x_45 = l_String_trim(x_44); -lean::dec(x_44); -lean::inc(x_45); -x_46 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_46, 0, x_45); -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_47, 0, x_45); -lean::closure_set(x_47, 1, x_8); -lean::closure_set(x_47, 2, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_12); -lean::inc(x_11); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_11); -lean::cnstr_set(x_49, 1, x_48); -x_50 = l_Lean_Parser_command_openSpec_renaming_item; -x_51 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_51, 0, x_50); -lean::closure_set(x_51, 1, x_49); -x_52 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_52, 0, x_51); -lean::inc(x_30); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_30); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_43); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_command_openSpec_renaming; -x_56 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_56, 0, x_55); -lean::closure_set(x_56, 1, x_54); -x_57 = lean::box(x_16); -x_58 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_58, 0, x_56); -lean::closure_set(x_58, 1, x_57); -x_59 = lean::mk_string("hiding"); -x_60 = l_String_trim(x_59); -lean::dec(x_59); -lean::inc(x_60); -x_61 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_61, 0, x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_62, 0, x_60); -lean::closure_set(x_62, 1, x_8); -lean::closure_set(x_62, 2, x_61); -lean::inc(x_11); -x_63 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_63, 0, x_11); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_30); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_62); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_22); -lean::cnstr_set(x_66, 1, x_65); -x_67 = l_Lean_Parser_command_openSpec_hiding; -x_68 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_68, 0, x_67); -lean::closure_set(x_68, 1, x_66); -x_69 = lean::box(x_16); -x_70 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_70, 0, x_68); -lean::closure_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_10); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_58); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_36); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_18); -lean::cnstr_set(x_74, 1, x_73); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_11); -lean::cnstr_set(x_75, 1, x_74); -x_76 = l_Lean_Parser_command_openSpec; -lean::inc(x_75); -x_77 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_77, 0, x_76); -lean::closure_set(x_77, 1, x_75); -x_78 = l_Lean_Parser_command_openSpec_HasView; -x_79 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_76, x_75, x_78); -lean::dec(x_75); -x_80 = l_Lean_Parser_Combinators_many1_view___rarg(x_1, x_2, x_3, x_4, x_77, x_79); -lean::dec(x_77); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_80; -} -} -obj* _init_l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_1 = lean::box(0); -x_2 = lean::mk_string("as"); -x_3 = lean::mk_nat_obj(0u); -x_4 = l_Lean_Parser_symbol_tokens___rarg(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_1); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_4); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -x_9 = lean::mk_string("("); -x_10 = l_Lean_Parser_symbol_tokens___rarg(x_9, x_3); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_5); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -x_14 = l_Lean_Parser_tokens___rarg(x_1); -x_15 = lean::mk_string(")"); -x_16 = l_Lean_Parser_symbol_tokens___rarg(x_15, x_3); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_16, x_1); -lean::dec(x_16); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_17); -lean::dec(x_14); -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_18); -lean::dec(x_13); -x_20 = l_Lean_Parser_tokens___rarg(x_19); -lean::dec(x_19); -x_21 = l_Lean_Parser_tokens___rarg(x_20); -lean::dec(x_20); -x_22 = lean::mk_string("renaming"); -x_23 = l_Lean_Parser_symbol_tokens___rarg(x_22, x_3); -lean::dec(x_22); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_23, x_1); -lean::dec(x_23); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_24); -lean::dec(x_24); -x_26 = l_Lean_Parser_tokens___rarg(x_25); -lean::dec(x_25); -x_27 = l_Lean_Parser_tokens___rarg(x_26); -lean::dec(x_26); -x_28 = lean::mk_string("->"); -x_29 = l_Lean_Parser_symbol_tokens___rarg(x_28, x_3); -lean::dec(x_28); -x_30 = l_Lean_Parser_List_cons_tokens___rarg(x_29, x_5); -lean::dec(x_5); -lean::dec(x_29); -x_31 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_30); -lean::dec(x_30); -x_32 = l_Lean_Parser_tokens___rarg(x_31); -lean::dec(x_31); -x_33 = l_Lean_Parser_tokens___rarg(x_32); -lean::dec(x_32); -x_34 = l_Lean_Parser_List_cons_tokens___rarg(x_33, x_17); -lean::dec(x_17); -lean::dec(x_33); -x_35 = l_Lean_Parser_List_cons_tokens___rarg(x_27, x_34); -lean::dec(x_34); -lean::dec(x_27); -x_36 = l_Lean_Parser_tokens___rarg(x_35); -lean::dec(x_35); -x_37 = l_Lean_Parser_tokens___rarg(x_36); -lean::dec(x_36); -x_38 = lean::mk_string("hiding"); -x_39 = l_Lean_Parser_symbol_tokens___rarg(x_38, x_3); -lean::dec(x_38); -x_40 = l_Lean_Parser_List_cons_tokens___rarg(x_39, x_18); -lean::dec(x_18); -lean::dec(x_39); -x_41 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_40); -lean::dec(x_40); -lean::dec(x_10); -x_42 = l_Lean_Parser_tokens___rarg(x_41); -lean::dec(x_41); -x_43 = l_Lean_Parser_tokens___rarg(x_42); -lean::dec(x_42); -x_44 = l_Lean_Parser_List_cons_tokens___rarg(x_43, x_1); -lean::dec(x_43); -x_45 = l_Lean_Parser_List_cons_tokens___rarg(x_37, x_44); -lean::dec(x_44); -lean::dec(x_37); -x_46 = l_Lean_Parser_List_cons_tokens___rarg(x_21, x_45); -lean::dec(x_45); -lean::dec(x_21); -x_47 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_46); -lean::dec(x_46); -lean::dec(x_8); -x_48 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_47); -lean::dec(x_47); -x_49 = l_Lean_Parser_tokens___rarg(x_48); -lean::dec(x_48); -x_50 = l_Lean_Parser_tokens___rarg(x_49); -lean::dec(x_49); -return x_50; -} -} -obj* _init_l_Lean_Parser_command_openSpec_Parser___closed__1() { -_start: -{ -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; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_1 = lean::mk_string("as"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -lean::inc(x_7); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -lean::inc(x_8); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_command_openSpec_as; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_11, 0, x_10); -lean::closure_set(x_11, 1, x_9); -x_12 = 0; -x_13 = lean::box(x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_14, 0, x_11); -lean::closure_set(x_14, 1, x_13); -x_15 = lean::mk_string("("); -x_16 = l_String_trim(x_15); -lean::dec(x_15); -lean::inc(x_16); -x_17 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_4); -lean::closure_set(x_18, 2, x_17); -lean::inc(x_8); -lean::inc(x_18); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_8); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_20, 0, x_19); -lean::inc(x_7); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_21, 0, x_7); -x_22 = lean::mk_string(")"); -x_23 = l_String_trim(x_22); -lean::dec(x_22); -lean::inc(x_23); -x_24 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_24, 0, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_4); -lean::closure_set(x_25, 2, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_6); -lean::inc(x_26); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_21); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_20); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_command_openSpec_only; -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_30, 0, x_29); -lean::closure_set(x_30, 1, x_28); -x_31 = lean::box(x_12); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::mk_string("renaming"); -x_34 = l_String_trim(x_33); -lean::dec(x_33); -lean::inc(x_34); -x_35 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_35, 0, x_34); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_36, 0, x_34); -lean::closure_set(x_36, 1, x_4); -lean::closure_set(x_36, 2, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_6); -lean::inc(x_18); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_18); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_39, 0, x_38); -x_40 = lean::mk_string("->"); -x_41 = l_String_trim(x_40); -lean::dec(x_40); -lean::inc(x_41); -x_42 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_42, 0, x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_43, 0, x_41); -lean::closure_set(x_43, 1, x_4); -lean::closure_set(x_43, 2, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_8); -lean::inc(x_7); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_7); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_command_openSpec_renaming_item; -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_47, 0, x_46); -lean::closure_set(x_47, 1, x_45); -x_48 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_48, 0, x_47); -lean::inc(x_26); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_26); -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_command_openSpec_renaming; -x_52 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_52, 0, x_51); -lean::closure_set(x_52, 1, x_50); -x_53 = lean::box(x_12); -x_54 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_54, 0, x_52); -lean::closure_set(x_54, 1, x_53); -x_55 = lean::mk_string("hiding"); -x_56 = l_String_trim(x_55); -lean::dec(x_55); -lean::inc(x_56); -x_57 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_57, 0, x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_58, 0, x_56); -lean::closure_set(x_58, 1, x_4); -lean::closure_set(x_58, 2, x_57); -lean::inc(x_7); -x_59 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_59, 0, x_7); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_26); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_58); -lean::cnstr_set(x_61, 1, x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_18); -lean::cnstr_set(x_62, 1, x_61); -x_63 = l_Lean_Parser_command_openSpec_hiding; -x_64 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_64, 0, x_63); -lean::closure_set(x_64, 1, x_62); -x_65 = lean::box(x_12); -x_66 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_66, 0, x_64); -lean::closure_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_6); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_54); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_32); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_14); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_7); -lean::cnstr_set(x_71, 1, x_70); -x_72 = l_Lean_Parser_command_openSpec; -x_73 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_73, 0, x_72); -lean::closure_set(x_73, 1, x_71); -return x_73; -} -} -obj* l_Lean_Parser_command_openSpec_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_command_openSpec_Parser___closed__1; -x_6 = l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3(x_5, x_1, x_2, x_3, x_4); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_open() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("open"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_open_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_openSpec_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_command_open_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_open_HasView_x27___elambda__1___closed__1; -x_5 = l_List_map___main___rarg(x_4, x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_command_open; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_9); -x_17 = l_Lean_Parser_command_open; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -} -} -obj* _init_l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_command_openSpec_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_openSpec_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -x_9 = l_List_map___main___rarg(x_8, x_7); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_command_open_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_13; -x_13 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -lean::free_heap_obj(x_13); -x_18 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3; -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_17, 1); -lean::inc(x_20); -lean::dec(x_17); -x_21 = lean::cnstr_get(x_19, 0); -lean::inc(x_21); -lean::dec(x_19); -lean::cnstr_set(x_13, 0, x_21); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = l_Lean_Parser_Syntax_asNode___main(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -lean::dec(x_23); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -x_28 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -x_29 = l_List_map___main___rarg(x_28, x_27); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_13); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -x_31 = lean::cnstr_get(x_20, 0); -lean::inc(x_31); -lean::dec(x_20); -x_2 = x_13; -x_3 = x_31; -goto block_12; -} -} -else -{ -obj* x_32; -lean::dec(x_19); -lean::free_heap_obj(x_13); -x_32 = lean::cnstr_get(x_17, 1); -lean::inc(x_32); -lean::dec(x_17); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -x_33 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3; -return x_33; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::box(0); -x_2 = x_35; -x_3 = x_34; -goto block_12; -} -} -} -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_13, 0); -lean::inc(x_36); -lean::dec(x_13); -x_37 = lean::cnstr_get(x_36, 1); -lean::inc(x_37); -lean::dec(x_36); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3; -return x_38; -} -else -{ -obj* x_39; -x_39 = lean::cnstr_get(x_37, 0); -lean::inc(x_39); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; obj* x_42; -x_40 = lean::cnstr_get(x_37, 1); -lean::inc(x_40); -lean::dec(x_37); -x_41 = lean::cnstr_get(x_39, 0); -lean::inc(x_41); -lean::dec(x_39); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_43; obj* x_44; -x_43 = lean::box(3); -x_44 = l_Lean_Parser_Syntax_asNode___main(x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; -x_45 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_42); -lean::cnstr_set(x_46, 1, x_45); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = lean::cnstr_get(x_44, 0); -lean::inc(x_47); -lean::dec(x_44); -x_48 = lean::cnstr_get(x_47, 1); -lean::inc(x_48); -lean::dec(x_47); -x_49 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -x_50 = l_List_map___main___rarg(x_49, x_48); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_42); -lean::cnstr_set(x_51, 1, x_50); -return x_51; -} -} -else -{ -obj* x_52; -x_52 = lean::cnstr_get(x_40, 0); -lean::inc(x_52); -lean::dec(x_40); -x_2 = x_42; -x_3 = x_52; -goto block_12; -} -} -else -{ -obj* x_53; -lean::dec(x_39); -x_53 = lean::cnstr_get(x_37, 1); -lean::inc(x_53); -lean::dec(x_37); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3; -return x_54; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::box(0); -x_2 = x_56; -x_3 = x_55; -goto block_12; -} -} -} -} -} -block_12: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -x_10 = l_List_map___main___rarg(x_9, x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_2); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -} -obj* _init_l_Lean_Parser_command_open_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_open_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_open_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_open_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_open_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_open_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("open"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_open_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("open"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::box(0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_Parser), 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); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_open_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_open; -x_6 = l_Lean_Parser_command_open_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_export() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("export"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_export_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_open_HasView_x27___elambda__1___closed__1; -x_5 = l_List_map___main___rarg(x_4, x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_command_export; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_9); -x_17 = l_Lean_Parser_command_export; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -} -} -obj* _init_l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -x_9 = l_List_map___main___rarg(x_8, x_7); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_command_export_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_13; -x_13 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -lean::free_heap_obj(x_13); -x_18 = l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1; -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_17, 1); -lean::inc(x_20); -lean::dec(x_17); -x_21 = lean::cnstr_get(x_19, 0); -lean::inc(x_21); -lean::dec(x_19); -lean::cnstr_set(x_13, 0, x_21); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = l_Lean_Parser_Syntax_asNode___main(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -lean::dec(x_23); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -x_28 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -x_29 = l_List_map___main___rarg(x_28, x_27); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_13); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -x_31 = lean::cnstr_get(x_20, 0); -lean::inc(x_31); -lean::dec(x_20); -x_2 = x_13; -x_3 = x_31; -goto block_12; -} -} -else -{ -obj* x_32; -lean::dec(x_19); -lean::free_heap_obj(x_13); -x_32 = lean::cnstr_get(x_17, 1); -lean::inc(x_32); -lean::dec(x_17); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -x_33 = l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1; -return x_33; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::box(0); -x_2 = x_35; -x_3 = x_34; -goto block_12; -} -} -} -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_13, 0); -lean::inc(x_36); -lean::dec(x_13); -x_37 = lean::cnstr_get(x_36, 1); -lean::inc(x_37); -lean::dec(x_36); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1; -return x_38; -} -else -{ -obj* x_39; -x_39 = lean::cnstr_get(x_37, 0); -lean::inc(x_39); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; obj* x_42; -x_40 = lean::cnstr_get(x_37, 1); -lean::inc(x_40); -lean::dec(x_37); -x_41 = lean::cnstr_get(x_39, 0); -lean::inc(x_41); -lean::dec(x_39); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_43; obj* x_44; -x_43 = lean::box(3); -x_44 = l_Lean_Parser_Syntax_asNode___main(x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; -x_45 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_42); -lean::cnstr_set(x_46, 1, x_45); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = lean::cnstr_get(x_44, 0); -lean::inc(x_47); -lean::dec(x_44); -x_48 = lean::cnstr_get(x_47, 1); -lean::inc(x_48); -lean::dec(x_47); -x_49 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -x_50 = l_List_map___main___rarg(x_49, x_48); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_42); -lean::cnstr_set(x_51, 1, x_50); -return x_51; -} -} -else -{ -obj* x_52; -x_52 = lean::cnstr_get(x_40, 0); -lean::inc(x_52); -lean::dec(x_40); -x_2 = x_42; -x_3 = x_52; -goto block_12; -} -} -else -{ -obj* x_53; -lean::dec(x_39); -x_53 = lean::cnstr_get(x_37, 1); -lean::inc(x_53); -lean::dec(x_37); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1; -return x_54; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::box(0); -x_2 = x_56; -x_3 = x_55; -goto block_12; -} -} -} -} -} -block_12: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2; -x_10 = l_List_map___main___rarg(x_9, x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_2); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -} -obj* _init_l_Lean_Parser_command_export_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_export_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_export_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_export_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_export_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_export_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("export"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_export_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("export"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::box(0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_openSpec_Parser), 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); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_export_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_export; -x_6 = l_Lean_Parser_command_export_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_section() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("section"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_section_HasView_x27___elambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::box(3); -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 = l_Lean_Parser_command_section; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -obj* l_Lean_Parser_command_section_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_command_section_HasView_x27___elambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_4); -x_9 = l_Lean_Parser_noKind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_4); -x_12 = lean::box(3); -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 = l_Lean_Parser_command_section; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_18 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_command_section; -x_21 = l_Lean_Parser_Syntax_mkNode(x_20, x_19); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_3, 0); -lean::inc(x_22); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_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_4); -x_25 = l_Lean_Parser_noKind; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_17); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_command_section; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -} -} -} -obj* _init_l_Lean_Parser_command_section_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -lean::free_heap_obj(x_3); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_1); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -lean::dec(x_8); -if (lean::obj_tag(x_11) == 1) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -lean::cnstr_set(x_3, 0, x_12); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_3); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -lean::dec(x_11); -lean::free_heap_obj(x_3); -x_14 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_8); -lean::free_heap_obj(x_3); -x_16 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_3, 0); -lean::inc(x_18); -lean::dec(x_3); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_1); -return x_20; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -if (lean::obj_tag(x_22) == 1) -{ -obj* x_23; obj* x_24; obj* x_25; -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -lean::dec(x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_1); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; obj* x_27; -lean::dec(x_22); -x_26 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_1); -lean::cnstr_set(x_27, 1, x_26); -return x_27; -} -} -else -{ -obj* x_28; obj* x_29; -lean::dec(x_21); -lean::dec(x_19); -x_28 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_1); -lean::cnstr_set(x_29, 1, x_28); -return x_29; -} -} -} -} -} -} -obj* l_Lean_Parser_command_section_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_43; -x_43 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_command_section_HasView_x27___lambda__1___closed__1; -return x_44; -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -lean::dec(x_43); -x_46 = lean::cnstr_get(x_45, 1); -lean::inc(x_46); -lean::dec(x_45); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; -x_47 = lean::box(3); -x_2 = x_46; -x_3 = x_47; -goto block_42; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_46, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_46, 1); -lean::inc(x_49); -lean::dec(x_46); -x_2 = x_49; -x_3 = x_48; -goto block_42; -} -} -block_42: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_3, 0); -lean::inc(x_39); -lean::dec(x_3); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_4 = x_40; -goto block_38; -} -else -{ -obj* x_41; -lean::dec(x_3); -x_41 = lean::box(0); -x_4 = x_41; -goto block_38; -} -block_38: -{ -obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_36; -x_36 = lean::box(3); -x_5 = x_36; -goto block_35; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_2, 0); -lean::inc(x_37); -lean::dec(x_2); -x_5 = x_37; -goto block_35; -} -block_35: -{ -obj* x_6; -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_6, 0); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -lean::free_heap_obj(x_6); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -if (lean::obj_tag(x_15) == 1) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -lean::dec(x_15); -lean::cnstr_set(x_6, 0, x_16); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_6); -return x_17; -} -else -{ -obj* x_18; obj* x_19; -lean::dec(x_15); -lean::free_heap_obj(x_6); -x_18 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_4); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; -lean::dec(x_14); -lean::dec(x_11); -lean::free_heap_obj(x_6); -x_20 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -} -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_6, 0); -lean::inc(x_22); -lean::dec(x_6); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = lean::box(0); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_23, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; -x_27 = lean::cnstr_get(x_23, 0); -lean::inc(x_27); -lean::dec(x_23); -if (lean::obj_tag(x_27) == 1) -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -lean::dec(x_27); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_4); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -else -{ -obj* x_31; obj* x_32; -lean::dec(x_27); -x_31 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_4); -lean::cnstr_set(x_32, 1, x_31); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; -lean::dec(x_26); -lean::dec(x_23); -x_33 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_4); -lean::cnstr_set(x_34, 1, x_33); -return x_34; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_section_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_section_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_section_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_section_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_section_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_section_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_section_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_section_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("section"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_section_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_1 = lean::mk_string("section"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_7 = 0; -x_8 = lean::box(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -obj* l_Lean_Parser_command_section_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_section; -x_6 = l_Lean_Parser_command_section_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_namespace() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("namespace"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_namespace_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_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); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::box(3); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -x_9 = l_Lean_Parser_command_namespace; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_6); -x_14 = l_Lean_Parser_command_namespace; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_command_namespace_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_namespace_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_17; -x_17 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_command_namespace_HasView_x27___lambda__1___closed__1; -return x_18; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; -x_21 = lean::box(3); -x_2 = x_20; -x_3 = x_21; -goto block_16; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_20, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_20, 1); -lean::inc(x_23); -lean::dec(x_20); -x_2 = x_23; -x_3 = x_22; -goto block_16; -} -} -block_16: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -lean::dec(x_3); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_4 = x_14; -goto block_12; -} -else -{ -obj* x_15; -lean::dec(x_3); -x_15 = lean::box(0); -x_4 = x_15; -goto block_12; -} -block_12: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -lean::dec(x_2); -if (lean::obj_tag(x_7) == 1) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; -lean::dec(x_7); -x_10 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_namespace_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_namespace_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_namespace_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_namespace_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_namespace_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_namespace_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_namespace_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_namespace_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::mk_string("namespace"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_5); -lean::dec(x_5); -lean::dec(x_3); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_namespace_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("namespace"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 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); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_namespace_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_namespace; -x_6 = l_Lean_Parser_command_namespace_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_variable() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("variable"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_variable_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_binder_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::box(3); -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 = l_Lean_Parser_command_variable; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -x_16 = l_Lean_Parser_command_variable; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Term_binder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_binder_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_variable_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__3; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_2 = x_24; -x_3 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_2 = x_27; -x_3 = x_26; -goto block_20; -} -} -block_20: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l_Lean_Parser_Term_binder_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -else -{ -lean::dec(x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_13; -x_13 = l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__2; -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::box(0); -x_16 = l_Lean_Parser_Term_binder_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_15); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_variable_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_variable_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_variable_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_variable_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_variable_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_variable_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("variable"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasTokens; -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); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_variable_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("variable"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_binder_Parser), 5, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* l_Lean_Parser_command_variable_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_variable; -x_6 = l_Lean_Parser_command_variable_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_variables() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("variables"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_variables_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::box(3); -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 = l_Lean_Parser_command_variables; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -x_16 = l_Lean_Parser_command_variables; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_variables_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__3; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_2 = x_24; -x_3 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_2 = x_27; -x_3 = x_26; -goto block_20; -} -} -block_20: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -else -{ -lean::dec(x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_13; -x_13 = l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__2; -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::box(0); -x_16 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_15); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_variables_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_variables_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_variables_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_variables_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_variables_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_variables_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("variables"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens; -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); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_variables_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("variables"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_bracketedBinders_Parser), 5, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* l_Lean_Parser_command_variables_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_variables; -x_6 = l_Lean_Parser_command_variables_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_include() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("include"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_include_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_3); -x_5 = l_Lean_Parser_noKind; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::box(3); -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 = l_Lean_Parser_command_include; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -x_16 = l_Lean_Parser_command_include; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_command_include_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -} -obj* l_Lean_Parser_command_include_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_include_HasView_x27___lambda__1___closed__1; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_2 = x_24; -x_3 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_2 = x_27; -x_3 = x_26; -goto block_20; -} -} -block_20: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_4 = x_18; -goto block_16; -} -else -{ -obj* x_19; -lean::dec(x_3); -x_19 = lean::box(0); -x_4 = x_19; -goto block_16; -} -block_16: -{ -obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_14; -x_14 = lean::box(3); -x_5 = x_14; -goto block_13; -} -else -{ -obj* x_15; -x_15 = lean::cnstr_get(x_2, 0); -lean::inc(x_15); -lean::dec(x_2); -x_5 = x_15; -goto block_13; -} -block_13: -{ -obj* x_6; -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_include_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_include_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_include_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_include_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_include_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_include_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("include "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_include_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("include "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___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); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* l_Lean_Parser_command_include_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_include; -x_6 = l_Lean_Parser_command_include_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_omit() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("omit"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_omit_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_3); -x_5 = l_Lean_Parser_noKind; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::box(3); -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 = l_Lean_Parser_command_omit; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -x_16 = l_Lean_Parser_command_omit; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_command_omit_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -} -obj* l_Lean_Parser_command_omit_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_omit_HasView_x27___lambda__1___closed__1; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_2 = x_24; -x_3 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_2 = x_27; -x_3 = x_26; -goto block_20; -} -} -block_20: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_4 = x_18; -goto block_16; -} -else -{ -obj* x_19; -lean::dec(x_3); -x_19 = lean::box(0); -x_4 = x_19; -goto block_16; -} -block_16: -{ -obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_14; -x_14 = lean::box(3); -x_5 = x_14; -goto block_13; -} -else -{ -obj* x_15; -x_15 = lean::cnstr_get(x_2, 0); -lean::inc(x_15); -lean::dec(x_2); -x_5 = x_15; -goto block_13; -} -block_13: -{ -obj* x_6; -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_omit_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_omit_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_omit_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_omit_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_omit_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_omit_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("omit "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_omit_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("omit "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___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); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* l_Lean_Parser_command_omit_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_omit; -x_6 = l_Lean_Parser_command_omit_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_end() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("end"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_end_HasView_x27___elambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::box(3); -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 = l_Lean_Parser_command_end; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -obj* l_Lean_Parser_command_end_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_command_end_HasView_x27___elambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_4); -x_9 = l_Lean_Parser_noKind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_4); -x_12 = lean::box(3); -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 = l_Lean_Parser_command_end; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_18 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_command_end; -x_21 = l_Lean_Parser_Syntax_mkNode(x_20, x_19); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_3, 0); -lean::inc(x_22); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_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_4); -x_25 = l_Lean_Parser_noKind; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_17); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_command_end; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -} -} -} -obj* _init_l_Lean_Parser_command_end_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -lean::free_heap_obj(x_3); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_1); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -lean::dec(x_8); -if (lean::obj_tag(x_11) == 1) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -lean::cnstr_set(x_3, 0, x_12); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_3); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -lean::dec(x_11); -lean::free_heap_obj(x_3); -x_14 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_8); -lean::free_heap_obj(x_3); -x_16 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_3, 0); -lean::inc(x_18); -lean::dec(x_3); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_1); -return x_20; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -if (lean::obj_tag(x_22) == 1) -{ -obj* x_23; obj* x_24; obj* x_25; -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -lean::dec(x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_1); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; obj* x_27; -lean::dec(x_22); -x_26 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_1); -lean::cnstr_set(x_27, 1, x_26); -return x_27; -} -} -else -{ -obj* x_28; obj* x_29; -lean::dec(x_21); -lean::dec(x_19); -x_28 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_1); -lean::cnstr_set(x_29, 1, x_28); -return x_29; -} -} -} -} -} -} -obj* l_Lean_Parser_command_end_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_43; -x_43 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_command_end_HasView_x27___lambda__1___closed__1; -return x_44; -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -lean::dec(x_43); -x_46 = lean::cnstr_get(x_45, 1); -lean::inc(x_46); -lean::dec(x_45); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; -x_47 = lean::box(3); -x_2 = x_46; -x_3 = x_47; -goto block_42; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_46, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_46, 1); -lean::inc(x_49); -lean::dec(x_46); -x_2 = x_49; -x_3 = x_48; -goto block_42; -} -} -block_42: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_3, 0); -lean::inc(x_39); -lean::dec(x_3); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_4 = x_40; -goto block_38; -} -else -{ -obj* x_41; -lean::dec(x_3); -x_41 = lean::box(0); -x_4 = x_41; -goto block_38; -} -block_38: -{ -obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_36; -x_36 = lean::box(3); -x_5 = x_36; -goto block_35; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_2, 0); -lean::inc(x_37); -lean::dec(x_2); -x_5 = x_37; -goto block_35; -} -block_35: -{ -obj* x_6; -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_6, 0); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -lean::free_heap_obj(x_6); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -if (lean::obj_tag(x_15) == 1) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -lean::dec(x_15); -lean::cnstr_set(x_6, 0, x_16); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_6); -return x_17; -} -else -{ -obj* x_18; obj* x_19; -lean::dec(x_15); -lean::free_heap_obj(x_6); -x_18 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_4); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; -lean::dec(x_14); -lean::dec(x_11); -lean::free_heap_obj(x_6); -x_20 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -} -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_6, 0); -lean::inc(x_22); -lean::dec(x_6); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = lean::box(0); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_23, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; -x_27 = lean::cnstr_get(x_23, 0); -lean::inc(x_27); -lean::dec(x_23); -if (lean::obj_tag(x_27) == 1) -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -lean::dec(x_27); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_4); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -else -{ -obj* x_31; obj* x_32; -lean::dec(x_27); -x_31 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_4); -lean::cnstr_set(x_32, 1, x_31); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; -lean::dec(x_26); -lean::dec(x_23); -x_33 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_4); -lean::cnstr_set(x_34, 1, x_33); -return x_34; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_end_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_end_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_end_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_end_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_end_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_end_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_end_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_end_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("end"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_end_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_1 = lean::mk_string("end"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_7 = 0; -x_8 = lean::box(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -obj* l_Lean_Parser_command_end_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_end; -x_6 = l_Lean_Parser_command_end_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_universes() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("universes"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_universes_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_3); -x_5 = l_Lean_Parser_noKind; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::box(3); -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 = l_Lean_Parser_command_universes; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -x_16 = l_Lean_Parser_command_universes; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_command_universes_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -} -obj* l_Lean_Parser_command_universes_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_universes_HasView_x27___lambda__1___closed__1; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_2 = x_24; -x_3 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_2 = x_27; -x_3 = x_26; -goto block_20; -} -} -block_20: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_4 = x_18; -goto block_16; -} -else -{ -obj* x_19; -lean::dec(x_3); -x_19 = lean::box(0); -x_4 = x_19; -goto block_16; -} -block_16: -{ -obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_14; -x_14 = lean::box(3); -x_5 = x_14; -goto block_13; -} -else -{ -obj* x_15; -x_15 = lean::cnstr_get(x_2, 0); -lean::inc(x_15); -lean::dec(x_2); -x_5 = x_15; -goto block_13; -} -block_13: -{ -obj* x_6; -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_universes_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_universes_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_universes_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_universes_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_universes_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_universe() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("universe"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_universe_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_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); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::box(3); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -x_9 = l_Lean_Parser_command_universe; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_6); -x_14 = l_Lean_Parser_command_universe; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_command_universe_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_universe_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_17; -x_17 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_command_universe_HasView_x27___lambda__1___closed__1; -return x_18; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; -x_21 = lean::box(3); -x_2 = x_20; -x_3 = x_21; -goto block_16; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_20, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_20, 1); -lean::inc(x_23); -lean::dec(x_20); -x_2 = x_23; -x_3 = x_22; -goto block_16; -} -} -block_16: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -lean::dec(x_3); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_4 = x_14; -goto block_12; -} -else -{ -obj* x_15; -lean::dec(x_3); -x_15 = lean::box(0); -x_4 = x_15; -goto block_12; -} -block_12: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -lean::dec(x_2); -if (lean::obj_tag(x_7) == 1) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; -lean::dec(x_7); -x_10 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_universe_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_universe_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_universe_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_universe_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_universe_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_universe_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_universe_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_universe_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("universes"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -x_9 = lean::mk_string("universe"); -x_10 = l_Lean_Parser_symbol_tokens___rarg(x_9, x_2); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_4); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_11); -lean::dec(x_11); -lean::dec(x_10); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_4); -lean::dec(x_13); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_14); -lean::dec(x_14); -lean::dec(x_8); -x_16 = l_Lean_Parser_tokens___rarg(x_15); -lean::dec(x_15); -return x_16; -} -} -obj* l_ReaderT_orelse___at_Lean_Parser_command_universe_Parser___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_7 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -return x_7; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_7, 1); -lean::inc(x_11); -lean::dec(x_7); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -else -{ -uint8 x_13; -x_13 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; uint8 x_17; -x_14 = lean::cnstr_get(x_7, 1); -lean::inc(x_14); -lean::dec(x_7); -x_15 = lean::cnstr_get(x_8, 0); -lean::inc(x_15); -lean::dec(x_8); -x_16 = lean::apply_4(x_2, x_3, x_4, x_5, x_14); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_16, 0); -x_19 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_18); -lean::cnstr_set(x_16, 0, x_19); -return x_16; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_16, 0); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_16); -x_22 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_20); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_21); -return x_23; -} -} -else -{ -uint8 x_24; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_24 = !lean::is_exclusive(x_7); -if (x_24 == 0) -{ -obj* x_25; -x_25 = lean::cnstr_get(x_7, 0); -lean::dec(x_25); -return x_7; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_7, 1); -lean::inc(x_26); -lean::dec(x_7); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_8); -lean::cnstr_set(x_27, 1, x_26); -return x_27; -} -} -} -} -} -obj* l_ReaderT_orelse___at_Lean_Parser_command_universe_Parser___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at_Lean_Parser_command_universe_Parser___spec__2___rarg), 6, 0); -return x_2; -} -} -obj* l_List_foldl___main___at_Lean_Parser_command_universe_Parser___spec__3(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) -{ -obj* x_7; -x_7 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_2, 1); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at_Lean_Parser_command_universe_Parser___spec__2___rarg), 6, 2); -lean::closure_set(x_10, 0, x_1); -lean::closure_set(x_10, 1, x_8); -x_1 = x_10; -x_2 = x_9; -goto _start; -} -} -} -obj* l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_universe_Parser___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(0); -x_7 = l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_7, x_8, x_6, x_6, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_1, 1); -lean::inc(x_11); -lean::dec(x_1); -x_12 = l_List_foldl___main___at_Lean_Parser_command_universe_Parser___spec__3(x_10, x_11, x_2, x_3, x_4, x_5); -return x_12; -} -} -} -obj* _init_l_Lean_Parser_command_universe_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string("universes"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___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); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_command_universes; -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_12, 0, x_11); -lean::closure_set(x_12, 1, x_10); -x_13 = lean::mk_string("universe"); -x_14 = l_String_trim(x_13); -lean::dec(x_13); -lean::inc(x_14); -x_15 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_4); -lean::closure_set(x_16, 2, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_6); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_command_universe; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_8); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_12); -lean::cnstr_set(x_22, 1, x_21); -return x_22; -} -} -obj* l_Lean_Parser_command_universe_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_command_universe_Parser___closed__1; -x_6 = l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_universe_Parser___spec__1(x_5, x_1, x_2, x_3, x_4); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_check() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("check"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_check_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_command_check; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_command_check; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_check_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_check_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_check_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_check_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_check_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_check_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_check_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_check_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_check_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("#check"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_check_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("#check"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_9); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_command_check; -x_16 = l_Lean_Parser_command_check_HasView; -x_17 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_15, x_14, x_16); -lean::dec(x_14); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_17; -} -} -obj* _init_l_Lean_Parser_command_check_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("#check"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* l_Lean_Parser_command_check_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_check; -x_6 = l_Lean_Parser_command_check_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_attribute() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("attribute"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_List_map___main___at_Lean_Parser_command_attribute_HasView_x27___elambda__1___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_1); -x_7 = l_List_map___main___at_Lean_Parser_command_attribute_HasView_x27___elambda__1___spec__1(x_1, x_6); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_5, 0); -lean::inc(x_9); -lean::dec(x_5); -x_10 = l_Lean_Parser_command_attrInstance_HasView; -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_9); -lean::cnstr_set(x_2, 1, x_1); -lean::cnstr_set(x_2, 0, x_12); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_2); -lean::cnstr_set(x_13, 1, x_7); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_5, 0); -lean::inc(x_14); -lean::dec(x_5); -x_15 = lean::cnstr_get(x_8, 0); -lean::inc(x_15); -lean::dec(x_8); -x_16 = l_Lean_Parser_command_attrInstance_HasView; -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::box(3); -lean::cnstr_set(x_2, 1, x_1); -lean::cnstr_set(x_2, 0, x_19); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_2); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_7); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_15, 0); -lean::inc(x_22); -lean::dec(x_15); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_2, 1, x_1); -lean::cnstr_set(x_2, 0, x_23); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); -lean::cnstr_set(x_24, 1, x_2); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_7); -return x_25; -} -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_2, 0); -x_27 = lean::cnstr_get(x_2, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_2); -lean::inc(x_1); -x_28 = l_List_map___main___at_Lean_Parser_command_attribute_HasView_x27___elambda__1___spec__1(x_1, x_27); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_30 = lean::cnstr_get(x_26, 0); -lean::inc(x_30); -lean::dec(x_26); -x_31 = l_Lean_Parser_command_attrInstance_HasView; -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_30); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_1); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_28); -return x_35; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_36 = lean::cnstr_get(x_26, 0); -lean::inc(x_36); -lean::dec(x_26); -x_37 = lean::cnstr_get(x_29, 0); -lean::inc(x_37); -lean::dec(x_29); -x_38 = l_Lean_Parser_command_attrInstance_HasView; -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -x_40 = lean::apply_1(x_39, x_36); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::box(3); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_1); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_28); -return x_44; -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_45 = lean::cnstr_get(x_37, 0); -lean::inc(x_45); -lean::dec(x_37); -x_46 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_1); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_40); -lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_28); -return x_49; -} -} -} -} -} -} -obj* l_Lean_Parser_command_attribute_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::box(0); -x_9 = l_List_map___main___at_Lean_Parser_command_attribute_HasView_x27___elambda__1___spec__1(x_8, x_5); -x_10 = l_List_join___main___rarg(x_9); -x_11 = l_Lean_Parser_noKind; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -x_13 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_7); -x_14 = l_Lean_Parser_Syntax_mkNode(x_11, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_59; -x_59 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_16 = x_59; -goto block_58; -} -else -{ -obj* x_60; -x_60 = lean::cnstr_get(x_2, 0); -lean::inc(x_60); -lean::dec(x_2); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; -x_61 = l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -x_16 = x_61; -goto block_58; -} -else -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_62 = lean::cnstr_get(x_60, 0); -lean::inc(x_62); -lean::dec(x_60); -x_63 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_63, 0, 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_8); -x_65 = l_Lean_Parser_Syntax_mkNode(x_11, x_64); -x_16 = x_65; -goto block_58; -} -} -block_58: -{ -obj* x_17; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_55; -x_55 = lean::box(3); -x_17 = x_55; -goto block_54; -} -else -{ -obj* x_56; obj* x_57; -x_56 = lean::cnstr_get(x_3, 0); -lean::inc(x_56); -lean::dec(x_3); -x_57 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_17 = x_57; -goto block_54; -} -block_54: -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_8); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_Syntax_mkNode(x_11, x_19); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_15); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_12); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_20); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_command_attribute; -x_27 = l_Lean_Parser_Syntax_mkNode(x_26, x_25); -return x_27; -} -else -{ -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; -x_28 = lean::cnstr_get(x_6, 0); -lean::inc(x_28); -lean::dec(x_6); -x_29 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_15); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_12); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::box(3); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_20); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_command_attribute; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_4, 0); -lean::inc(x_37); -lean::dec(x_4); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_39 = lean::box(3); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_15); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_12); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_20); -lean::cnstr_set(x_43, 1, x_42); -x_44 = l_Lean_Parser_command_attribute; -x_45 = l_Lean_Parser_Syntax_mkNode(x_44, x_43); -return x_45; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_46 = lean::cnstr_get(x_6, 0); -lean::inc(x_46); -lean::dec(x_6); -x_47 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_15); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_12); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_38); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_20); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_Lean_Parser_command_attribute; -x_53 = l_Lean_Parser_Syntax_mkNode(x_52, x_51); -return x_53; -} -} -} -} -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -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_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -lean::dec(x_8); -x_9 = l_Lean_Parser_command_attrInstance_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_7); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::box(0); -lean::cnstr_set(x_3, 1, x_14); -lean::cnstr_set(x_3, 0, x_13); -return x_3; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = l_Lean_Parser_command_attrInstance_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_15); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::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); -return x_22; -} -} -else -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_3, 0); -lean::inc(x_23); -lean::dec(x_3); -x_24 = !lean::is_exclusive(x_5); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_5, 0); -x_26 = lean::cnstr_get(x_5, 1); -x_27 = l_Lean_Parser_command_attrInstance_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_23); -x_30 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1(x_1, x_2, x_26); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_25, 0); -lean::inc(x_31); -lean::dec(x_25); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_29); -lean::cnstr_set(x_34, 1, x_33); -lean::cnstr_set(x_5, 1, x_30); -lean::cnstr_set(x_5, 0, x_34); -return x_5; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_25); -x_35 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_29); -lean::cnstr_set(x_36, 1, x_35); -lean::cnstr_set(x_5, 1, x_30); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 0); -x_38 = lean::cnstr_get(x_5, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_5); -x_39 = l_Lean_Parser_command_attrInstance_HasView; -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_23); -x_42 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1(x_1, x_2, x_38); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_43 = lean::cnstr_get(x_37, 0); -lean::inc(x_43); -lean::dec(x_37); -x_44 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_41); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_42); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; -lean::dec(x_37); -x_48 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_41); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_42); -return x_50; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::mk_string(", "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = l_Lean_Parser_Syntax_asNode___main(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -x_24 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_24; -goto block_21; -} -else -{ -uint8 x_25; -x_25 = !lean::is_exclusive(x_23); -if (x_25 == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_23, 0); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; -lean::free_heap_obj(x_23); -x_28 = lean::box(0); -x_1 = x_28; -goto block_21; -} -else -{ -obj* x_29; -x_29 = lean::cnstr_get(x_27, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; -x_30 = lean::cnstr_get(x_27, 0); -lean::inc(x_30); -lean::dec(x_27); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -lean::dec(x_30); -lean::cnstr_set(x_23, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_23); -x_1 = x_32; -goto block_21; -} -else -{ -obj* x_33; -lean::dec(x_30); -lean::free_heap_obj(x_23); -x_33 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_33; -goto block_21; -} -} -else -{ -obj* x_34; -lean::dec(x_29); -lean::dec(x_27); -lean::free_heap_obj(x_23); -x_34 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_34; -goto block_21; -} -} -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_23, 0); -lean::inc(x_35); -lean::dec(x_23); -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -lean::dec(x_35); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; -x_37 = lean::box(0); -x_1 = x_37; -goto block_21; -} -else -{ -obj* x_38; -x_38 = lean::cnstr_get(x_36, 1); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; -x_39 = lean::cnstr_get(x_36, 0); -lean::inc(x_39); -lean::dec(x_36); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; obj* x_42; -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -lean::dec(x_39); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -x_1 = x_42; -goto block_21; -} -else -{ -obj* x_43; -lean::dec(x_39); -x_43 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_43; -goto block_21; -} -} -else -{ -obj* x_44; -lean::dec(x_38); -lean::dec(x_36); -x_44 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_44; -goto block_21; -} -} -} -} -block_21: -{ -obj* x_2; obj* x_3; obj* x_13; obj* x_14; -x_2 = lean::box(0); -x_13 = lean::box(3); -x_14 = l_Lean_Parser_Syntax_asNode___main(x_13); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; -x_15 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1; -x_3 = x_15; -goto block_12; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = lean::cnstr_get(x_14, 0); -lean::inc(x_16); -lean::dec(x_14); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2; -x_19 = l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__1; -x_20 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1(x_18, x_19, x_17); -x_3 = x_20; -goto block_12; -} -block_12: -{ -obj* x_4; obj* x_5; -x_4 = lean::box(3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_2); -lean::cnstr_set(x_7, 2, x_2); -lean::cnstr_set(x_7, 3, x_3); -lean::cnstr_set(x_7, 4, x_2); -lean::cnstr_set(x_7, 5, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -lean::dec(x_5); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_9); -x_11 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_2); -lean::cnstr_set(x_11, 2, x_2); -lean::cnstr_set(x_11, 3, x_3); -lean::cnstr_set(x_11, 4, x_2); -lean::cnstr_set(x_11, 5, x_10); -return x_11; -} -} -} -} -} -obj* l_Lean_Parser_command_attribute_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_88; -x_88 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; -x_89 = l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__2; -return x_89; -} -else -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_88, 0); -lean::inc(x_90); -lean::dec(x_88); -x_91 = lean::cnstr_get(x_90, 1); -lean::inc(x_91); -lean::dec(x_90); -if (lean::obj_tag(x_91) == 0) -{ -obj* x_92; -x_92 = lean::box(3); -x_2 = x_91; -x_3 = x_92; -goto block_87; -} -else -{ -obj* x_93; obj* x_94; obj* x_95; -x_93 = lean::cnstr_get(x_91, 0); -lean::inc(x_93); -x_94 = lean::cnstr_get(x_91, 1); -lean::inc(x_94); -lean::dec(x_91); -x_95 = l_Lean_Parser_Syntax_asNode___main(x_93); -if (lean::obj_tag(x_95) == 0) -{ -if (lean::obj_tag(x_94) == 0) -{ -obj* x_96; -x_96 = lean::box(3); -x_2 = x_94; -x_3 = x_96; -goto block_87; -} -else -{ -obj* x_97; obj* x_98; -x_97 = lean::cnstr_get(x_94, 0); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_94, 1); -lean::inc(x_98); -lean::dec(x_94); -x_2 = x_98; -x_3 = x_97; -goto block_87; -} -} -else -{ -obj* x_99; obj* x_100; obj* x_101; -x_99 = lean::cnstr_get(x_95, 0); -lean::inc(x_99); -lean::dec(x_95); -x_100 = lean::cnstr_get(x_99, 1); -lean::inc(x_100); -lean::dec(x_99); -x_101 = l_List_append___rarg(x_100, x_94); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; -x_102 = lean::box(3); -x_2 = x_101; -x_3 = x_102; -goto block_87; -} -else -{ -obj* x_103; obj* x_104; -x_103 = lean::cnstr_get(x_101, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_101, 1); -lean::inc(x_104); -lean::dec(x_101); -x_2 = x_104; -x_3 = x_103; -goto block_87; -} -} -} -} -block_87: -{ -obj* x_4; obj* x_65; -x_65 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; -x_66 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_66; -goto block_64; -} -else -{ -uint8 x_67; -x_67 = !lean::is_exclusive(x_65); -if (x_67 == 0) -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_65, 0); -x_69 = lean::cnstr_get(x_68, 1); -lean::inc(x_69); -lean::dec(x_68); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -lean::free_heap_obj(x_65); -x_70 = lean::box(0); -x_4 = x_70; -goto block_64; -} -else -{ -obj* x_71; -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -x_72 = lean::cnstr_get(x_69, 0); -lean::inc(x_72); -lean::dec(x_69); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_72, 0); -lean::inc(x_73); -lean::dec(x_72); -lean::cnstr_set(x_65, 0, x_73); -x_74 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_74, 0, x_65); -x_4 = x_74; -goto block_64; -} -else -{ -obj* x_75; -lean::dec(x_72); -lean::free_heap_obj(x_65); -x_75 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_75; -goto block_64; -} -} -else -{ -obj* x_76; -lean::dec(x_71); -lean::dec(x_69); -lean::free_heap_obj(x_65); -x_76 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_76; -goto block_64; -} -} -} -else -{ -obj* x_77; obj* x_78; -x_77 = lean::cnstr_get(x_65, 0); -lean::inc(x_77); -lean::dec(x_65); -x_78 = lean::cnstr_get(x_77, 1); -lean::inc(x_78); -lean::dec(x_77); -if (lean::obj_tag(x_78) == 0) -{ -obj* x_79; -x_79 = lean::box(0); -x_4 = x_79; -goto block_64; -} -else -{ -obj* x_80; -x_80 = lean::cnstr_get(x_78, 1); -lean::inc(x_80); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; -x_81 = lean::cnstr_get(x_78, 0); -lean::inc(x_81); -lean::dec(x_78); -if (lean::obj_tag(x_81) == 0) -{ -obj* x_82; obj* x_83; obj* x_84; -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -lean::dec(x_81); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -x_4 = x_84; -goto block_64; -} -else -{ -obj* x_85; -lean::dec(x_81); -x_85 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_85; -goto block_64; -} -} -else -{ -obj* x_86; -lean::dec(x_80); -lean::dec(x_78); -x_86 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_86; -goto block_64; -} -} -} -} -block_64: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_61; -x_61 = lean::box(3); -x_5 = x_2; -x_6 = x_61; -goto block_60; -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_2, 0); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_2, 1); -lean::inc(x_63); -lean::dec(x_2); -x_5 = x_63; -x_6 = x_62; -goto block_60; -} -block_60: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 0) -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_6, 0); -lean::inc(x_57); -lean::dec(x_6); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_7 = x_58; -goto block_56; -} -else -{ -obj* x_59; -lean::dec(x_6); -x_59 = lean::box(0); -x_7 = x_59; -goto block_56; -} -block_56: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_53; -x_53 = lean::box(3); -x_8 = x_5; -x_9 = x_53; -goto block_52; -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_5, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_5, 1); -lean::inc(x_55); -lean::dec(x_5); -x_8 = x_55; -x_9 = x_54; -goto block_52; -} -block_52: -{ -obj* x_10; -if (lean::obj_tag(x_9) == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_9, 0); -lean::inc(x_49); -lean::dec(x_9); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_49); -x_10 = x_50; -goto block_48; -} -else -{ -obj* x_51; -lean::dec(x_9); -x_51 = lean::box(0); -x_10 = x_51; -goto block_48; -} -block_48: -{ -obj* x_11; obj* x_12; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_45; -x_45 = lean::box(3); -x_11 = x_8; -x_12 = x_45; -goto block_44; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_8, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_8, 1); -lean::inc(x_47); -lean::dec(x_8); -x_11 = x_47; -x_12 = x_46; -goto block_44; -} -block_44: -{ -obj* x_13; obj* x_37; -x_37 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1; -x_13 = x_38; -goto block_36; -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_39 = lean::cnstr_get(x_37, 0); -lean::inc(x_39); -lean::dec(x_37); -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -lean::dec(x_39); -x_41 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2; -x_42 = l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__1; -x_43 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1(x_41, x_42, x_40); -x_13 = x_43; -goto block_36; -} -block_36: -{ -obj* x_14; obj* x_15; -if (lean::obj_tag(x_11) == 0) -{ -obj* x_33; -x_33 = lean::box(3); -x_14 = x_11; -x_15 = x_33; -goto block_32; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_11, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_11, 1); -lean::inc(x_35); -lean::dec(x_11); -x_14 = x_35; -x_15 = x_34; -goto block_32; -} -block_32: -{ -obj* x_16; -if (lean::obj_tag(x_15) == 0) -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_15, 0); -lean::inc(x_29); -lean::dec(x_15); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_16 = x_30; -goto block_28; -} -else -{ -obj* x_31; -lean::dec(x_15); -x_31 = lean::box(0); -x_16 = x_31; -goto block_28; -} -block_28: -{ -obj* x_17; -if (lean::obj_tag(x_14) == 0) -{ -obj* x_26; -x_26 = lean::box(3); -x_17 = x_26; -goto block_25; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_14, 0); -lean::inc(x_27); -lean::dec(x_14); -x_17 = x_27; -goto block_25; -} -block_25: -{ -obj* x_18; -x_18 = l_Lean_Parser_Syntax_asNode___main(x_17); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -x_19 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_7); -lean::cnstr_set(x_20, 2, x_10); -lean::cnstr_set(x_20, 3, x_13); -lean::cnstr_set(x_20, 4, x_16); -lean::cnstr_set(x_20, 5, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_18, 0); -lean::inc(x_21); -lean::dec(x_18); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -x_23 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_22); -x_24 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_24, 0, x_4); -lean::cnstr_set(x_24, 1, x_7); -lean::cnstr_set(x_24, 2, x_10); -lean::cnstr_set(x_24, 3, x_13); -lean::cnstr_set(x_24, 4, x_16); -lean::cnstr_set(x_24, 5, x_23); -return x_24; -} -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_attribute_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attribute_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attribute_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_attribute_HasView_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_attribute_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_attribute_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_1 = lean::mk_string("local "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = lean::mk_string("attribute "); -x_6 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_2); -lean::dec(x_5); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_7); -lean::dec(x_6); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_8); -lean::dec(x_8); -lean::dec(x_4); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = lean::mk_string("["); -x_13 = l_Lean_Parser_symbol_tokens___rarg(x_12, x_2); -lean::dec(x_12); -x_14 = lean::mk_string(", "); -x_15 = l_Lean_Parser_symbol_tokens___rarg(x_14, x_2); -lean::dec(x_14); -x_16 = l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens; -x_17 = l_Lean_Parser_Combinators_sepBy1_tokens___rarg(x_16, x_15); -lean::dec(x_15); -x_18 = lean::mk_string("] "); -x_19 = l_Lean_Parser_symbol_tokens___rarg(x_18, x_2); -lean::dec(x_18); -x_20 = l_Lean_Parser_tokens___rarg(x_7); -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_7); -lean::dec(x_20); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_21); -lean::dec(x_21); -lean::dec(x_19); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_17, x_22); -lean::dec(x_22); -lean::dec(x_17); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_23); -lean::dec(x_23); -lean::dec(x_13); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_24); -lean::dec(x_24); -lean::dec(x_11); -x_26 = l_Lean_Parser_tokens___rarg(x_25); -lean::dec(x_25); -return x_26; -} -} -obj* _init_l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; uint8 x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("local "); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = 0; -x_11 = lean::box(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_12, 0, x_9); -lean::closure_set(x_12, 1, x_11); -x_13 = lean::mk_string("attribute "); -x_14 = l_String_trim(x_13); -lean::dec(x_13); -lean::inc(x_14); -x_15 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_8); -lean::closure_set(x_16, 2, x_15); -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_12); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::mk_string("["); -x_22 = l_String_trim(x_21); -lean::dec(x_21); -lean::inc(x_22); -x_23 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_23, 0, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_8); -lean::closure_set(x_24, 2, x_23); -x_25 = lean::mk_string(", "); -x_26 = l_String_trim(x_25); -lean::dec(x_25); -lean::inc(x_26); -x_27 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_27, 0, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_28, 0, x_26); -lean::closure_set(x_28, 1, x_8); -lean::closure_set(x_28, 2, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attrInstance_Parser), 4, 0); -x_30 = 1; -x_31 = lean::box(x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_32, 0, x_29); -lean::closure_set(x_32, 1, x_28); -lean::closure_set(x_32, 2, x_31); -x_33 = lean::mk_string("] "); -x_34 = l_String_trim(x_33); -lean::dec(x_33); -lean::inc(x_34); -x_35 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_35, 0, x_34); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_36, 0, x_34); -lean::closure_set(x_36, 1, x_8); -lean::closure_set(x_36, 2, x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_38 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_38, 0, 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_17); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_36); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_32); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_24); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_20); -lean::cnstr_set(x_43, 1, x_42); -x_44 = l_Lean_Parser_command_attribute; -x_45 = l_Lean_Parser_command_attribute_HasView; -x_46 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_44, x_43, x_45); -lean::dec(x_43); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_46; -} -} -obj* _init_l_Lean_Parser_command_attribute_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; uint8 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_37; obj* x_38; obj* x_39; -x_1 = lean::mk_string("local "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::mk_string("attribute "); -x_10 = l_String_trim(x_9); -lean::dec(x_9); -lean::inc(x_10); -x_11 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_4); -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_command_declaration_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::mk_string("["); -x_18 = l_String_trim(x_17); -lean::dec(x_17); -lean::inc(x_18); -x_19 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_19, 0, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_4); -lean::closure_set(x_20, 2, x_19); -x_21 = lean::mk_string(", "); -x_22 = l_String_trim(x_21); -lean::dec(x_21); -lean::inc(x_22); -x_23 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_23, 0, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_4); -lean::closure_set(x_24, 2, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attrInstance_Parser), 4, 0); -x_26 = 1; -x_27 = lean::box(x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_28, 0, x_25); -lean::closure_set(x_28, 1, x_24); -lean::closure_set(x_28, 2, x_27); -x_29 = lean::mk_string("] "); -x_30 = l_String_trim(x_29); -lean::dec(x_29); -lean::inc(x_30); -x_31 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_31, 0, x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_4); -lean::closure_set(x_32, 2, x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_34 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_34, 0, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_13); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_32); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_28); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_20); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_16); -lean::cnstr_set(x_39, 1, x_38); -return x_39; -} -} -obj* l_Lean_Parser_command_attribute_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_attribute; -x_6 = l_Lean_Parser_command_attribute_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_initQuot() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("initQuot"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_command_initQuot; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_command_initQuot_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = l_Lean_Parser_command_initQuot; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -} -obj* l_Lean_Parser_command_initQuot_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_10; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -return x_10; -} -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; -x_13 = lean::box(0); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -else -{ -obj* x_17; -lean::dec(x_14); -x_17 = lean::box(0); -return x_17; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_initQuot_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_initQuot_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_initQuot_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_initQuot_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_initQuot_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::mk_string("initQuot"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("initQuot"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_command_initQuot; -x_13 = l_Lean_Parser_command_initQuot_HasView; -x_14 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_12, x_11, x_13); -lean::dec(x_11); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_14; -} -} -obj* _init_l_Lean_Parser_command_initQuot_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::mk_string("initQuot"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_command_initQuot_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_initQuot; -x_6 = l_Lean_Parser_command_initQuot_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_boolOptionValue() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("boolOptionValue"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_2); -x_5 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_command_boolOptionValue; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_2); -x_12 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -x_15 = l_Lean_Parser_command_boolOptionValue; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -} -} -obj* _init_l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("boolOptionValue"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_27); -return x_30; -} -else -{ -obj* x_31; -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_27); -return x_31; -} -} -else -{ -obj* x_32; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_32 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_32; -} -} -} -} -} -} -} -else -{ -obj* x_33; -lean::dec(x_11); -lean::dec(x_6); -x_33 = l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1; -return x_33; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_boolOptionValue_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_boolOptionValue_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_boolOptionValue_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_boolOptionValue_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_boolOptionValue_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_boolOptionValue_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_optionValue() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("optionValue"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_optionValue_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_boolOptionValue_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_optionValue; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -case 1: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_stringLit_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_optionValue; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -default: -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -lean::dec(x_1); -x_24 = l_Lean_Parser_number_HasView; -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_2); -x_31 = l_Lean_Parser_command_optionValue; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -} -} -obj* _init_l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_boolOptionValue_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("optionValue"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_optionValue_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_dec_eq(x_21, x_30); -lean::dec(x_21); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_32 = l_Lean_Parser_number_HasView; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -x_34 = lean::apply_1(x_33, x_27); -x_35 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = l_Lean_Parser_stringLit_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_27); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -lean::dec(x_21); -x_40 = l_Lean_Parser_command_boolOptionValue_HasView; -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::apply_1(x_41, x_27); -x_43 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -else -{ -obj* x_44; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_44 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_44; -} -} -} -} -} -} -} -else -{ -obj* x_45; -lean::dec(x_11); -lean::dec(x_6); -x_45 = l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1; -return x_45; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_optionValue_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optionValue_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optionValue_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_optionValue_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_optionValue_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_setOption() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("setOption"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_setOption_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = l_Lean_Parser_command_optionValue_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_4); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_5); -lean::cnstr_set(x_11, 1, x_10); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::box(3); -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 = l_Lean_Parser_command_setOption; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_11); -x_19 = l_Lean_Parser_command_setOption; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_optionValue_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__1; -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_command_setOption_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_37; -x_37 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__2; -return x_38; -} -else -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_37, 0); -lean::inc(x_39); -lean::dec(x_37); -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -lean::dec(x_39); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_41; -x_41 = lean::box(3); -x_2 = x_40; -x_3 = x_41; -goto block_36; -} -else -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_40, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_40, 1); -lean::inc(x_43); -lean::dec(x_40); -x_2 = x_43; -x_3 = x_42; -goto block_36; -} -} -block_36: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_3, 0); -lean::inc(x_33); -lean::dec(x_3); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_4 = x_34; -goto block_32; -} -else -{ -obj* x_35; -lean::dec(x_3); -x_35 = lean::box(0); -x_4 = x_35; -goto block_32; -} -block_32: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_29; -x_29 = lean::box(3); -x_5 = x_2; -x_6 = x_29; -goto block_28; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_2, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_2, 1); -lean::inc(x_31); -lean::dec(x_2); -x_5 = x_31; -x_6 = x_30; -goto block_28; -} -block_28: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_6, 0); -lean::inc(x_18); -lean::dec(x_6); -x_19 = l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_18); -lean::cnstr_set(x_20, 2, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_6, 0); -lean::inc(x_21); -lean::dec(x_6); -x_22 = lean::cnstr_get(x_5, 0); -lean::inc(x_22); -lean::dec(x_5); -x_23 = l_Lean_Parser_command_optionValue_HasView; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::apply_1(x_24, x_22); -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_21); -lean::cnstr_set(x_26, 2, x_25); -return x_26; -} -} -else -{ -obj* x_27; -lean::dec(x_6); -x_27 = lean::box(0); -x_7 = x_27; -goto block_17; -} -block_17: -{ -lean::dec(x_7); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_9 = l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_8); -lean::cnstr_set(x_10, 2, x_9); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -x_12 = l_Lean_Parser_command_optionValue_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -x_15 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_16 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_15); -lean::cnstr_set(x_16, 2, x_14); -return x_16; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_setOption_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_setOption_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_setOption_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_setOption_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_setOption_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1(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; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -lean::inc(x_4); -lean::inc(x_6); -x_7 = l_Lean_Parser_token(x_6, x_4, x_5); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - x_10 = x_7; -} else { - lean::dec_ref(x_7); - x_10 = lean::box(0); -} -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_8, 2); -lean::inc(x_13); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_14 = x_8; -} else { - lean::dec_ref(x_8); - x_14 = lean::box(0); -} -switch (lean::obj_tag(x_11)) { -case 0: -{ -obj* x_91; obj* x_92; obj* x_93; -x_91 = lean::cnstr_get(x_11, 0); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_91, 1); -lean::inc(x_92); -lean::dec(x_91); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_92); -x_15 = x_93; -goto block_90; -} -case 1: -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_94 = lean::cnstr_get(x_11, 0); -lean::inc(x_94); -x_95 = lean::cnstr_get(x_94, 1); -lean::inc(x_95); -lean::dec(x_94); -x_96 = l_Lean_Parser_Substring_toString(x_95); -lean::dec(x_95); -x_97 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_97, 0, x_96); -x_15 = x_97; -goto block_90; -} -default: -{ -obj* x_98; -x_98 = lean::box(0); -x_15 = x_98; -goto block_90; -} -} -block_90: -{ -uint8 x_16; -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_85; -x_85 = 1; -x_16 = x_85; -goto block_84; -} -else -{ -obj* x_86; uint8 x_87; -x_86 = lean::cnstr_get(x_15, 0); -lean::inc(x_86); -lean::dec(x_15); -x_87 = lean::string_dec_eq(x_86, x_1); -lean::dec(x_86); -if (x_87 == 0) -{ -uint8 x_88; -x_88 = 1; -x_16 = x_88; -goto block_84; -} -else -{ -uint8 x_89; -x_89 = 0; -x_16 = x_89; -goto block_84; -} -} -block_84: -{ -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_1); -x_17 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_14)) { - x_18 = lean::alloc_cnstr(0, 3, 0); -} else { - x_18 = x_14; -} -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_12); -lean::cnstr_set(x_18, 2, x_17); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_18); -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_19); -x_22 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_21); -if (lean::is_scalar(x_10)) { - x_23 = lean::alloc_cnstr(0, 2, 0); -} else { - x_23 = x_10; -} -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_9); -return x_23; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_14); -lean::dec(x_10); -x_24 = l_String_quote(x_1); -x_25 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_25, 0, x_24); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_4); -x_27 = lean::box(0); -x_28 = l_String_splitAux___main___closed__1; -x_29 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_28, x_25, x_26, x_27, x_6, x_12, x_9); -lean::dec(x_6); -lean::dec(x_26); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -uint8 x_31; -x_31 = !lean::is_exclusive(x_29); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_29, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_30); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_34 = lean::cnstr_get(x_30, 2); -x_35 = lean::cnstr_get(x_30, 0); -lean::dec(x_35); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_30, 2, x_36); -lean::cnstr_set(x_30, 0, x_11); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_30); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_37); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_38); -x_40 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_39); -lean::cnstr_set(x_29, 0, x_40); -return x_29; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_41 = lean::cnstr_get(x_30, 1); -x_42 = lean::cnstr_get(x_30, 2); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_30); -x_43 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_11); -lean::cnstr_set(x_44, 1, x_41); -lean::cnstr_set(x_44, 2, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_45); -x_47 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_46); -x_48 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_47); -lean::cnstr_set(x_29, 0, x_48); -return x_29; -} -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_49 = lean::cnstr_get(x_29, 1); -lean::inc(x_49); -lean::dec(x_29); -x_50 = lean::cnstr_get(x_30, 1); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_30, 2); -lean::inc(x_51); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - lean::cnstr_release(x_30, 1); - lean::cnstr_release(x_30, 2); - x_52 = x_30; -} else { - lean::dec_ref(x_30); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 3, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_11); -lean::cnstr_set(x_54, 1, x_50); -lean::cnstr_set(x_54, 2, x_53); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_54); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_55); -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_53, x_56); -x_58 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_57); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_49); -return x_59; -} -} -else -{ -uint8 x_60; -lean::dec(x_11); -x_60 = !lean::is_exclusive(x_29); -if (x_60 == 0) -{ -obj* x_61; uint8 x_62; -x_61 = lean::cnstr_get(x_29, 0); -lean::dec(x_61); -x_62 = !lean::is_exclusive(x_30); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_30); -x_64 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_63); -x_66 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_65); -lean::cnstr_set(x_29, 0, x_66); -return x_29; -} -else -{ -obj* x_67; uint8 x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_67 = lean::cnstr_get(x_30, 0); -x_68 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); -lean::inc(x_67); -lean::dec(x_30); -x_69 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_69, 0, x_67); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_68); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_69); -x_71 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_70); -x_73 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_72); -lean::cnstr_set(x_29, 0, x_73); -return x_29; -} -} -else -{ -obj* x_74; obj* x_75; uint8 x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_74 = lean::cnstr_get(x_29, 1); -lean::inc(x_74); -lean::dec(x_29); -x_75 = lean::cnstr_get(x_30, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - x_77 = x_30; -} else { - lean::dec_ref(x_30); - x_77 = lean::box(0); -} -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_75); -lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_78); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_79); -x_82 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_81); -x_83 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_74); -return x_83; -} -} -} -} -} -} -else -{ -uint8 x_99; -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_1); -x_99 = !lean::is_exclusive(x_7); -if (x_99 == 0) -{ -obj* x_100; uint8 x_101; -x_100 = lean::cnstr_get(x_7, 0); -lean::dec(x_100); -x_101 = !lean::is_exclusive(x_8); -if (x_101 == 0) -{ -obj* x_102; obj* x_103; obj* x_104; -x_102 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_102, x_8); -x_104 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_103); -lean::cnstr_set(x_7, 0, x_104); -return x_7; -} -else -{ -obj* x_105; uint8 x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -x_105 = lean::cnstr_get(x_8, 0); -x_106 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_105); -lean::dec(x_8); -x_107 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_107, 0, x_105); -lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_106); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_108, x_107); -x_110 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_109); -lean::cnstr_set(x_7, 0, x_110); -return x_7; -} -} -else -{ -obj* x_111; obj* x_112; uint8 x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_111 = lean::cnstr_get(x_7, 1); -lean::inc(x_111); -lean::dec(x_7); -x_112 = lean::cnstr_get(x_8, 0); -lean::inc(x_112); -x_113 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_114 = x_8; -} else { - lean::dec_ref(x_8); - x_114 = lean::box(0); -} -if (lean::is_scalar(x_114)) { - x_115 = lean::alloc_cnstr(1, 1, 1); -} else { - x_115 = x_114; -} -lean::cnstr_set(x_115, 0, x_112); -lean::cnstr_set_scalar(x_115, sizeof(void*)*1, x_113); -x_116 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_117 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_115); -x_118 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_117); -x_119 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_119, 1, x_111); -return x_119; -} -} -} -} -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -lean::inc(x_3); -lean::inc(x_5); -x_6 = l_Lean_Parser_token(x_5, x_3, x_4); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; -x_9 = lean::cnstr_get(x_6, 1); -x_10 = lean::cnstr_get(x_6, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_7); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_7, 0); -x_13 = lean::cnstr_get(x_7, 1); -x_14 = lean::cnstr_get(x_7, 2); -x_15 = l_Lean_Parser_stringLit; -lean::inc(x_12); -x_16 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_15, x_12); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 x_22; -lean::free_heap_obj(x_7); -lean::dec(x_12); -lean::free_heap_obj(x_6); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_3); -x_18 = lean::box(0); -x_19 = l_String_splitAux___main___closed__1; -x_20 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_21 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_19, x_20, x_17, x_18, x_5, x_13, x_9); -lean::dec(x_5); -lean::dec(x_17); -x_22 = !lean::is_exclusive(x_21); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_23 = lean::cnstr_get(x_21, 0); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_23); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_25); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_26); -x_28 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_27, x_20); -x_29 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_28); -lean::cnstr_set(x_21, 0, x_29); -return x_21; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_30 = lean::cnstr_get(x_21, 0); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::inc(x_30); -lean::dec(x_21); -x_32 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_30); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_33); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_34); -x_36 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_35, x_20); -x_37 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_31); -return x_38; -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -lean::dec(x_16); -lean::dec(x_5); -lean::dec(x_3); -x_39 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_7, 2, x_39); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_7); -x_41 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_42 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_40); -x_43 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_44 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_42, x_43); -x_45 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_44); -lean::cnstr_set(x_6, 0, x_45); -return x_6; -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_46 = lean::cnstr_get(x_7, 0); -x_47 = lean::cnstr_get(x_7, 1); -x_48 = lean::cnstr_get(x_7, 2); -lean::inc(x_48); -lean::inc(x_47); -lean::inc(x_46); -lean::dec(x_7); -x_49 = l_Lean_Parser_stringLit; -lean::inc(x_46); -x_50 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_49, x_46); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -lean::dec(x_46); -lean::free_heap_obj(x_6); -x_51 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_51, 0, x_3); -x_52 = lean::box(0); -x_53 = l_String_splitAux___main___closed__1; -x_54 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_55 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_53, x_54, x_51, x_52, x_5, x_47, x_9); -lean::dec(x_5); -lean::dec(x_51); -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 1); -lean::inc(x_57); -if (lean::is_exclusive(x_55)) { - lean::cnstr_release(x_55, 0); - lean::cnstr_release(x_55, 1); - x_58 = x_55; -} else { - lean::dec_ref(x_55); - x_58 = lean::box(0); -} -x_59 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_56); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_61); -x_63 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_62, x_54); -x_64 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_63); -if (lean::is_scalar(x_58)) { - x_65 = lean::alloc_cnstr(0, 2, 0); -} else { - x_65 = x_58; -} -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_57); -return x_65; -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -lean::dec(x_50); -lean::dec(x_5); -lean::dec(x_3); -x_66 = l_Lean_Parser_finishCommentBlock___closed__2; -x_67 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_67, 0, x_46); -lean::cnstr_set(x_67, 1, x_47); -lean::cnstr_set(x_67, 2, x_66); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_67); -x_69 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_68); -x_71 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_72 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_70, x_71); -x_73 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_72); -lean::cnstr_set(x_6, 0, x_73); -return x_6; -} -} -} -else -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_74 = lean::cnstr_get(x_6, 1); -lean::inc(x_74); -lean::dec(x_6); -x_75 = lean::cnstr_get(x_7, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_7, 1); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_7, 2); -lean::inc(x_77); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_78 = x_7; -} else { - lean::dec_ref(x_7); - x_78 = lean::box(0); -} -x_79 = l_Lean_Parser_stringLit; -lean::inc(x_75); -x_80 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_79, x_75); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -lean::dec(x_78); -lean::dec(x_75); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_3); -x_82 = lean::box(0); -x_83 = l_String_splitAux___main___closed__1; -x_84 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_85 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_83, x_84, x_81, x_82, x_5, x_76, x_74); -lean::dec(x_5); -lean::dec(x_81); -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_87 = lean::cnstr_get(x_85, 1); -lean::inc(x_87); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - lean::cnstr_release(x_85, 1); - x_88 = x_85; -} else { - lean::dec_ref(x_85); - x_88 = lean::box(0); -} -x_89 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_89, x_86); -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_90); -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_89, x_91); -x_93 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_92, x_84); -x_94 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_93); -if (lean::is_scalar(x_88)) { - x_95 = lean::alloc_cnstr(0, 2, 0); -} else { - x_95 = x_88; -} -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_87); -return x_95; -} -else -{ -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; -lean::dec(x_80); -lean::dec(x_5); -lean::dec(x_3); -x_96 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_78)) { - x_97 = lean::alloc_cnstr(0, 3, 0); -} else { - x_97 = x_78; -} -lean::cnstr_set(x_97, 0, x_75); -lean::cnstr_set(x_97, 1, x_76); -lean::cnstr_set(x_97, 2, x_96); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_97); -x_99 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_99, x_98); -x_101 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_102 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_100, x_101); -x_103 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_102); -x_104 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_74); -return x_104; -} -} -} -else -{ -uint8 x_105; -lean::dec(x_5); -lean::dec(x_3); -x_105 = !lean::is_exclusive(x_6); -if (x_105 == 0) -{ -obj* x_106; uint8 x_107; -x_106 = lean::cnstr_get(x_6, 0); -lean::dec(x_106); -x_107 = !lean::is_exclusive(x_7); -if (x_107 == 0) -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_108, x_7); -x_110 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_111 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_109, x_110); -x_112 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_111); -lean::cnstr_set(x_6, 0, x_112); -return x_6; -} -else -{ -obj* x_113; uint8 x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; -x_113 = lean::cnstr_get(x_7, 0); -x_114 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_113); -lean::dec(x_7); -x_115 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_115, 0, x_113); -lean::cnstr_set_scalar(x_115, sizeof(void*)*1, x_114); -x_116 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_117 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_115); -x_118 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_119 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_117, x_118); -x_120 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_119); -lean::cnstr_set(x_6, 0, x_120); -return x_6; -} -} -else -{ -obj* x_121; obj* x_122; uint8 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; -x_121 = lean::cnstr_get(x_6, 1); -lean::inc(x_121); -lean::dec(x_6); -x_122 = lean::cnstr_get(x_7, 0); -lean::inc(x_122); -x_123 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_124 = x_7; -} else { - lean::dec_ref(x_7); - x_124 = lean::box(0); -} -if (lean::is_scalar(x_124)) { - x_125 = lean::alloc_cnstr(1, 1, 1); -} else { - x_125 = x_124; -} -lean::cnstr_set(x_125, 0, x_122); -lean::cnstr_set_scalar(x_125, sizeof(void*)*1, x_123); -x_126 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_127 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_126, x_125); -x_128 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_129 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_127, x_128); -x_130 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_129); -x_131 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_121); -return x_131; -} -} -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -lean::inc(x_3); -lean::inc(x_5); -x_6 = l_Lean_Parser_token(x_5, x_3, x_4); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; -x_9 = lean::cnstr_get(x_6, 1); -x_10 = lean::cnstr_get(x_6, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_7); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint8 x_16; -x_12 = lean::cnstr_get(x_7, 0); -x_13 = lean::cnstr_get(x_7, 1); -x_14 = lean::cnstr_get(x_7, 2); -x_15 = l_Lean_Parser_number; -x_16 = l_Lean_Parser_Syntax_isOfKind___main(x_15, x_12); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 x_22; -lean::free_heap_obj(x_7); -lean::dec(x_12); -lean::free_heap_obj(x_6); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_3); -x_18 = lean::box(0); -x_19 = l_String_splitAux___main___closed__1; -x_20 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_21 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_19, x_20, x_17, x_18, x_5, x_13, x_9); -lean::dec(x_5); -lean::dec(x_17); -x_22 = !lean::is_exclusive(x_21); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_23 = lean::cnstr_get(x_21, 0); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_23); -x_25 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_24); -x_27 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_26); -lean::cnstr_set(x_21, 0, x_27); -return x_21; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_28 = lean::cnstr_get(x_21, 0); -x_29 = lean::cnstr_get(x_21, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_21); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_28); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_30); -x_33 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_29); -return x_34; -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -lean::dec(x_5); -lean::dec(x_3); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_35); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_7); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_36); -x_38 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_37); -lean::cnstr_set(x_6, 0, x_38); -return x_6; -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; uint8 x_43; -x_39 = lean::cnstr_get(x_7, 0); -x_40 = lean::cnstr_get(x_7, 1); -x_41 = lean::cnstr_get(x_7, 2); -lean::inc(x_41); -lean::inc(x_40); -lean::inc(x_39); -lean::dec(x_7); -x_42 = l_Lean_Parser_number; -x_43 = l_Lean_Parser_Syntax_isOfKind___main(x_42, x_39); -if (x_43 == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -lean::dec(x_39); -lean::free_heap_obj(x_6); -x_44 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_44, 0, x_3); -x_45 = lean::box(0); -x_46 = l_String_splitAux___main___closed__1; -x_47 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_48 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_46, x_47, x_44, x_45, x_5, x_40, x_9); -lean::dec(x_5); -lean::dec(x_44); -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_48, 1); -lean::inc(x_50); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_51 = x_48; -} else { - lean::dec_ref(x_48); - x_51 = lean::box(0); -} -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_49); -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_53, x_52); -x_55 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_54); -if (lean::is_scalar(x_51)) { - x_56 = lean::alloc_cnstr(0, 2, 0); -} else { - x_56 = x_51; -} -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_50); -return x_56; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -lean::dec(x_5); -lean::dec(x_3); -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_58, 0, x_39); -lean::cnstr_set(x_58, 1, x_40); -lean::cnstr_set(x_58, 2, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_58); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_59); -x_61 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_60); -lean::cnstr_set(x_6, 0, x_61); -return x_6; -} -} -} -else -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; uint8 x_68; -x_62 = lean::cnstr_get(x_6, 1); -lean::inc(x_62); -lean::dec(x_6); -x_63 = lean::cnstr_get(x_7, 0); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_7, 1); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_7, 2); -lean::inc(x_65); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_66 = x_7; -} else { - lean::dec_ref(x_7); - x_66 = lean::box(0); -} -x_67 = l_Lean_Parser_number; -x_68 = l_Lean_Parser_Syntax_isOfKind___main(x_67, x_63); -if (x_68 == 0) -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -lean::dec(x_66); -lean::dec(x_63); -x_69 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_69, 0, x_3); -x_70 = lean::box(0); -x_71 = l_String_splitAux___main___closed__1; -x_72 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_73 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_71, x_72, x_69, x_70, x_5, x_64, x_62); -lean::dec(x_5); -lean::dec(x_69); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -if (lean::is_exclusive(x_73)) { - lean::cnstr_release(x_73, 0); - lean::cnstr_release(x_73, 1); - x_76 = x_73; -} else { - lean::dec_ref(x_73); - x_76 = lean::box(0); -} -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_74); -x_78 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_78, x_77); -x_80 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_79); -if (lean::is_scalar(x_76)) { - x_81 = lean::alloc_cnstr(0, 2, 0); -} else { - x_81 = x_76; -} -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_75); -return x_81; -} -else -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; -lean::dec(x_5); -lean::dec(x_3); -x_82 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_66)) { - x_83 = lean::alloc_cnstr(0, 3, 0); -} else { - x_83 = x_66; -} -lean::cnstr_set(x_83, 0, x_63); -lean::cnstr_set(x_83, 1, x_64); -lean::cnstr_set(x_83, 2, x_82); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_83); -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_82, x_84); -x_86 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_85); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_62); -return x_87; -} -} -} -else -{ -uint8 x_88; -lean::dec(x_5); -lean::dec(x_3); -x_88 = !lean::is_exclusive(x_6); -if (x_88 == 0) -{ -obj* x_89; uint8 x_90; -x_89 = lean::cnstr_get(x_6, 0); -lean::dec(x_89); -x_90 = !lean::is_exclusive(x_7); -if (x_90 == 0) -{ -obj* x_91; obj* x_92; obj* x_93; -x_91 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_7); -x_93 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_92); -lean::cnstr_set(x_6, 0, x_93); -return x_6; -} -else -{ -obj* x_94; uint8 x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -x_94 = lean::cnstr_get(x_7, 0); -x_95 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_94); -lean::dec(x_7); -x_96 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_96, 0, x_94); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_95); -x_97 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_97, x_96); -x_99 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_98); -lean::cnstr_set(x_6, 0, x_99); -return x_6; -} -} -else -{ -obj* x_100; obj* x_101; uint8 x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_100 = lean::cnstr_get(x_6, 1); -lean::inc(x_100); -lean::dec(x_6); -x_101 = lean::cnstr_get(x_7, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_103 = x_7; -} else { - lean::dec_ref(x_7); - x_103 = lean::box(0); -} -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(1, 1, 1); -} else { - x_104 = x_103; -} -lean::cnstr_set(x_104, 0, x_101); -lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); -x_105 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_105, x_104); -x_107 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_106); -x_108 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_108, 0, x_107); -lean::cnstr_set(x_108, 1, x_100); -return x_108; -} -} -} -} -obj* _init_l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("setOption"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_4); -lean::dec(x_7); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_6); -lean::dec(x_6); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_4); -lean::dec(x_11); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_4); -lean::dec(x_13); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_14); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_15); -lean::dec(x_15); -lean::dec(x_3); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -return x_17; -} -} -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_number_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__3(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("setOption"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::mk_string("true"); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1___boxed), 5, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::mk_string("false"); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1___boxed), 5, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_11); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_14); -x_19 = l_Lean_Parser_command_boolOptionValue; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_18); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__3___boxed), 4, 0); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_14); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__2___boxed), 4, 0); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_20); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_26, 0, x_25); -lean::closure_set(x_26, 1, x_8); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_14); -x_28 = l_Lean_Parser_command_optionValue; -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_29, 0, x_28); -lean::closure_set(x_29, 1, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_14); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_30); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_9); -lean::cnstr_set(x_33, 1, x_32); -x_34 = l_Lean_Parser_command_setOption; -x_35 = l_Lean_Parser_command_setOption_HasView; -x_36 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_34, x_33, x_35); -lean::dec(x_33); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_36; -} -} -obj* _init_l_Lean_Parser_command_setOption_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_1 = lean::mk_string("setOption"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("true"); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1___boxed), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string("false"); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__1___boxed), 5, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_13, 0, x_12); -lean::closure_set(x_13, 1, x_4); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -x_15 = l_Lean_Parser_command_boolOptionValue; -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_16, 0, x_15); -lean::closure_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__3___boxed), 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_10); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_Parser___at_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens___spec__2___boxed), 4, 0); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_16); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_22, 0, x_21); -lean::closure_set(x_22, 1, x_4); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_10); -x_24 = l_Lean_Parser_command_optionValue; -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_25, 0, x_24); -lean::closure_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_10); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 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_5); -lean::cnstr_set(x_29, 1, x_28); -return x_29; -} -} -obj* l_Lean_Parser_command_setOption_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_setOption; -x_6 = l_Lean_Parser_command_setOption_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_builtinCommandParsers_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_1 = l_Lean_Parser_command_notation_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_tokens___rarg(x_5); -x_7 = l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasTokens; -x_8 = l_Lean_Parser_tokens___rarg(x_7); -x_9 = lean::box(0); -x_10 = l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens; -x_11 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_10, x_9); -x_12 = l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasTokens; -x_13 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_12, x_11); -lean::dec(x_11); -x_14 = l_Lean_Parser_command_omit_Parser_Lean_Parser_HasTokens; -x_15 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_14, x_13); -lean::dec(x_13); -x_16 = l_Lean_Parser_command_include_Parser_Lean_Parser_HasTokens; -x_17 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_16, x_15); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_export_Parser_Lean_Parser_HasTokens; -x_19 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_18, x_17); -lean::dec(x_17); -x_20 = l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasTokens; -x_21 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_20, x_19); -lean::dec(x_19); -x_22 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_20, x_21); -lean::dec(x_21); -x_23 = l_Lean_Parser_command_check_Parser_Lean_Parser_HasTokens; -x_24 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_23, x_22); -lean::dec(x_22); -x_25 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_8, x_24); -lean::dec(x_24); -lean::dec(x_8); -x_26 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_6, x_25); -lean::dec(x_25); -x_27 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_6, x_26); -lean::dec(x_26); -x_28 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_6, x_27); -lean::dec(x_27); -x_29 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_6, x_28); -lean::dec(x_28); -x_30 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_6, x_29); -lean::dec(x_29); -x_31 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_6, x_30); -lean::dec(x_30); -lean::dec(x_6); -x_32 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_4, x_31); -lean::dec(x_31); -lean::dec(x_4); -x_33 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_2, x_32); -lean::dec(x_32); -x_34 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_2, x_33); -lean::dec(x_33); -lean::dec(x_2); -x_35 = l_Lean_Parser_command_universe_Parser_Lean_Parser_HasTokens; -x_36 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_35, x_34); -lean::dec(x_34); -x_37 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_35, x_36); -lean::dec(x_36); -x_38 = l_Lean_Parser_command_section_Parser_Lean_Parser_HasTokens; -x_39 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_38, x_37); -lean::dec(x_37); -x_40 = l_Lean_Parser_command_open_Parser_Lean_Parser_HasTokens; -x_41 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_40, x_39); -lean::dec(x_39); -x_42 = l_Lean_Parser_command_end_Parser_Lean_Parser_HasTokens; -x_43 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_42, x_41); -lean::dec(x_41); -x_44 = l_Lean_Parser_command_namespace_Parser_Lean_Parser_HasTokens; -x_45 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_44, x_43); -lean::dec(x_43); -x_46 = l_Lean_Parser_command_variables_Parser_Lean_Parser_HasTokens; -x_47 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_46, x_45); -lean::dec(x_45); -x_48 = l_Lean_Parser_command_variable_Parser_Lean_Parser_HasTokens; -x_49 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_48, x_47); -lean::dec(x_47); -x_50 = l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasTokens; -x_51 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_49); -lean::dec(x_49); -x_52 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_51); -lean::dec(x_51); -x_53 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_52); -lean::dec(x_52); -x_54 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_53); -lean::dec(x_53); -x_55 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_54); -lean::dec(x_54); -x_56 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_55); -lean::dec(x_55); -x_57 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_56); -lean::dec(x_56); -x_58 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_57); -lean::dec(x_57); -x_59 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_58); -lean::dec(x_58); -x_60 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_59); -lean::dec(x_59); -x_61 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_60); -lean::dec(x_60); -x_62 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_61); -lean::dec(x_61); -x_63 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_62); -lean::dec(x_62); -x_64 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_63); -lean::dec(x_63); -x_65 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_64); -lean::dec(x_64); -x_66 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_50, x_65); -lean::dec(x_65); -return x_66; -} -} -obj* _init_l_Lean_Parser_command_builtinCommandParsers() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; -x_1 = lean::box(0); -x_2 = lean::mk_string("/--"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_Parser), 4, 0); -lean::inc(x_4); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = lean::mk_string("@["); -x_7 = lean_name_mk_string(x_1, x_6); -lean::inc(x_4); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_4); -x_9 = lean::mk_string("private"); -x_10 = lean_name_mk_string(x_1, x_9); -lean::inc(x_4); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_4); -x_12 = lean::mk_string("protected"); -x_13 = lean_name_mk_string(x_1, x_12); -lean::inc(x_4); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_4); -x_15 = lean::mk_string("noncomputable"); -x_16 = lean_name_mk_string(x_1, x_15); -lean::inc(x_4); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_4); -x_18 = lean::mk_string("unsafe"); -x_19 = lean_name_mk_string(x_1, x_18); -lean::inc(x_4); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_4); -x_21 = lean::mk_string("def"); -x_22 = lean_name_mk_string(x_1, x_21); -lean::inc(x_4); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_4); -x_24 = lean::mk_string("abbreviation"); -x_25 = lean_name_mk_string(x_1, x_24); -lean::inc(x_4); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_4); -x_27 = lean::mk_string("abbrev"); -x_28 = lean_name_mk_string(x_1, x_27); -lean::inc(x_4); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_4); -x_30 = lean::mk_string("theorem"); -x_31 = lean_name_mk_string(x_1, x_30); -lean::inc(x_4); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_4); -x_33 = lean::mk_string("instance"); -x_34 = lean_name_mk_string(x_1, x_33); -lean::inc(x_4); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_4); -x_36 = lean::mk_string("axiom"); -x_37 = lean_name_mk_string(x_1, x_36); -lean::inc(x_4); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_4); -x_39 = lean::mk_string("constant"); -x_40 = lean_name_mk_string(x_1, x_39); -lean::inc(x_4); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_4); -x_42 = lean::mk_string("class"); -x_43 = lean_name_mk_string(x_1, x_42); -lean::inc(x_4); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_4); -x_45 = lean::mk_string("inductive"); -x_46 = lean_name_mk_string(x_1, x_45); -lean::inc(x_4); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_4); -x_48 = lean::mk_string("structure"); -x_49 = lean_name_mk_string(x_1, x_48); -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_4); -x_51 = lean::mk_string("variable"); -x_52 = lean_name_mk_string(x_1, x_51); -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_variable_Parser), 4, 0); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::mk_string("variables"); -x_56 = lean_name_mk_string(x_1, x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_variables_Parser), 4, 0); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_56); -lean::cnstr_set(x_58, 1, x_57); -x_59 = lean::mk_string("namespace"); -x_60 = lean_name_mk_string(x_1, x_59); -x_61 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_namespace_Parser), 4, 0); -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_60); -lean::cnstr_set(x_62, 1, x_61); -x_63 = lean::mk_string("end"); -x_64 = lean_name_mk_string(x_1, x_63); -x_65 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_end_Parser), 4, 0); -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_64); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::mk_string("open"); -x_68 = lean_name_mk_string(x_1, x_67); -x_69 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_open_Parser), 4, 0); -x_70 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_70, 0, x_68); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::mk_string("section"); -x_72 = lean_name_mk_string(x_1, x_71); -x_73 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_section_Parser), 4, 0); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set(x_74, 1, x_73); -x_75 = lean::mk_string("universe"); -x_76 = lean_name_mk_string(x_1, x_75); -x_77 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_universe_Parser), 4, 0); -lean::inc(x_77); -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_76); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::mk_string("universes"); -x_80 = lean_name_mk_string(x_1, x_79); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_77); -x_82 = lean::mk_string("local"); -x_83 = lean_name_mk_string(x_1, x_82); -x_84 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notation_Parser), 5, 0); -x_85 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_85, 0, x_84); -lean::inc(x_85); -lean::inc(x_83); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_83); -lean::cnstr_set(x_86, 1, x_85); -x_87 = lean::mk_string("notation"); -x_88 = lean_name_mk_string(x_1, x_87); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_85); -x_90 = lean::mk_string("reserve"); -x_91 = lean_name_mk_string(x_1, x_90); -x_92 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_reserveNotation_Parser), 5, 0); -x_93 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_93, 0, x_92); -lean::inc(x_91); -x_94 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_94, 0, x_91); -lean::cnstr_set(x_94, 1, x_93); -x_95 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_Parser), 5, 0); -x_96 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_96, 0, x_95); -lean::inc(x_96); -lean::inc(x_83); -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_83); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::mk_string("prefix"); -x_99 = lean_name_mk_string(x_1, x_98); -lean::inc(x_96); -x_100 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_96); -x_101 = lean::mk_string("infix"); -x_102 = lean_name_mk_string(x_1, x_101); -lean::inc(x_96); -x_103 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_96); -x_104 = lean::mk_string("infixl"); -x_105 = lean_name_mk_string(x_1, x_104); -lean::inc(x_96); -x_106 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_106, 0, x_105); -lean::cnstr_set(x_106, 1, x_96); -x_107 = lean::mk_string("infixr"); -x_108 = lean_name_mk_string(x_1, x_107); -lean::inc(x_96); -x_109 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_109, 0, x_108); -lean::cnstr_set(x_109, 1, x_96); -x_110 = lean::mk_string("postfix"); -x_111 = lean_name_mk_string(x_1, x_110); -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_96); -x_113 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_reserveMixfix_Parser), 5, 0); -x_114 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_114, 0, x_113); -x_115 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_115, 0, x_91); -lean::cnstr_set(x_115, 1, x_114); -x_116 = lean::mk_string("#check"); -x_117 = lean_name_mk_string(x_1, x_116); -x_118 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_check_Parser), 4, 0); -x_119 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_119, 0, x_117); -lean::cnstr_set(x_119, 1, x_118); -x_120 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attribute_Parser), 4, 0); -lean::inc(x_120); -x_121 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_121, 0, x_83); -lean::cnstr_set(x_121, 1, x_120); -x_122 = lean::mk_string("attribute"); -x_123 = lean_name_mk_string(x_1, x_122); -x_124 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_124, 0, x_123); -lean::cnstr_set(x_124, 1, x_120); -x_125 = lean::mk_string("export"); -x_126 = lean_name_mk_string(x_1, x_125); -x_127 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_export_Parser), 4, 0); -x_128 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_128, 0, x_126); -lean::cnstr_set(x_128, 1, x_127); -x_129 = lean::mk_string("include"); -x_130 = lean_name_mk_string(x_1, x_129); -x_131 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_include_Parser), 4, 0); -x_132 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_132, 0, x_130); -lean::cnstr_set(x_132, 1, x_131); -x_133 = lean::mk_string("omit"); -x_134 = lean_name_mk_string(x_1, x_133); -x_135 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_omit_Parser), 4, 0); -x_136 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_136, 0, x_134); -lean::cnstr_set(x_136, 1, x_135); -x_137 = lean::mk_string("initQuot"); -x_138 = lean_name_mk_string(x_1, x_137); -x_139 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_initQuot_Parser), 4, 0); -x_140 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_140, 0, x_138); -lean::cnstr_set(x_140, 1, x_139); -x_141 = lean::mk_string("setOption"); -x_142 = lean_name_mk_string(x_1, x_141); -x_143 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_setOption_Parser), 4, 0); -x_144 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_144, 0, x_142); -lean::cnstr_set(x_144, 1, x_143); -x_145 = lean::box(0); -x_146 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_146, 0, x_144); -lean::cnstr_set(x_146, 1, x_145); -x_147 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_147, 0, x_140); -lean::cnstr_set(x_147, 1, x_146); -x_148 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_148, 0, x_136); -lean::cnstr_set(x_148, 1, x_147); -x_149 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_149, 0, x_132); -lean::cnstr_set(x_149, 1, x_148); -x_150 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_150, 0, x_128); -lean::cnstr_set(x_150, 1, x_149); -x_151 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_151, 0, x_124); -lean::cnstr_set(x_151, 1, x_150); -x_152 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_152, 0, x_121); -lean::cnstr_set(x_152, 1, x_151); -x_153 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_153, 0, x_119); -lean::cnstr_set(x_153, 1, x_152); -x_154 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_154, 0, x_115); -lean::cnstr_set(x_154, 1, x_153); -x_155 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_155, 0, x_112); -lean::cnstr_set(x_155, 1, x_154); -x_156 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_156, 0, x_109); -lean::cnstr_set(x_156, 1, x_155); -x_157 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_157, 0, x_106); -lean::cnstr_set(x_157, 1, x_156); -x_158 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_158, 0, x_103); -lean::cnstr_set(x_158, 1, x_157); -x_159 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_159, 0, x_100); -lean::cnstr_set(x_159, 1, x_158); -x_160 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_160, 0, x_97); -lean::cnstr_set(x_160, 1, x_159); -x_161 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_161, 0, x_94); -lean::cnstr_set(x_161, 1, x_160); -x_162 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_162, 0, x_89); -lean::cnstr_set(x_162, 1, x_161); -x_163 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_163, 0, x_86); -lean::cnstr_set(x_163, 1, x_162); -x_164 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_164, 0, x_81); -lean::cnstr_set(x_164, 1, x_163); -x_165 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_165, 0, x_78); -lean::cnstr_set(x_165, 1, x_164); -x_166 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_166, 0, x_74); -lean::cnstr_set(x_166, 1, x_165); -x_167 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_167, 0, x_70); -lean::cnstr_set(x_167, 1, x_166); -x_168 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_168, 0, x_66); -lean::cnstr_set(x_168, 1, x_167); -x_169 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_169, 0, x_62); -lean::cnstr_set(x_169, 1, x_168); -x_170 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_170, 0, x_58); -lean::cnstr_set(x_170, 1, x_169); -x_171 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_171, 0, x_54); -lean::cnstr_set(x_171, 1, x_170); -x_172 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_172, 0, x_50); -lean::cnstr_set(x_172, 1, x_171); -x_173 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_173, 0, x_47); -lean::cnstr_set(x_173, 1, x_172); -x_174 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_174, 0, x_44); -lean::cnstr_set(x_174, 1, x_173); -x_175 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_175, 0, x_41); -lean::cnstr_set(x_175, 1, x_174); -x_176 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_176, 0, x_38); -lean::cnstr_set(x_176, 1, x_175); -x_177 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_177, 0, x_35); -lean::cnstr_set(x_177, 1, x_176); -x_178 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_178, 0, x_32); -lean::cnstr_set(x_178, 1, x_177); -x_179 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_179, 0, x_29); -lean::cnstr_set(x_179, 1, x_178); -x_180 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_180, 0, x_26); -lean::cnstr_set(x_180, 1, x_179); -x_181 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_181, 0, x_23); -lean::cnstr_set(x_181, 1, x_180); -x_182 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_182, 0, x_20); -lean::cnstr_set(x_182, 1, x_181); -x_183 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_183, 0, x_17); -lean::cnstr_set(x_183, 1, x_182); -x_184 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_184, 0, x_14); -lean::cnstr_set(x_184, 1, x_183); -x_185 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_185, 0, x_11); -lean::cnstr_set(x_185, 1, x_184); -x_186 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_186, 0, x_8); -lean::cnstr_set(x_186, 1, x_185); -x_187 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_187, 0, x_5); -lean::cnstr_set(x_187, 1, x_186); -x_188 = l_Lean_Parser_TokenMap_ofList___main___rarg(x_187); -return x_188; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_7; uint8 x_8; obj* x_9; obj* x_10; -x_7 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_1); -lean::cnstr_set(x_7, 2, x_2); -lean::cnstr_set(x_7, 3, x_4); -x_8 = 0; -x_9 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set_scalar(x_9, sizeof(void*)*1, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_6); -return x_10; -} -else -{ -obj* x_11; obj* x_12; uint8 x_13; obj* x_14; obj* x_15; -lean::dec(x_5); -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_1); -lean::cnstr_set(x_12, 2, x_2); -lean::cnstr_set(x_12, 3, x_4); -x_13 = 0; -x_14 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set_scalar(x_14, sizeof(void*)*1, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_6); -return x_15; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2___rarg(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; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_peekToken___closed__1; -lean::inc(x_6); -x_8 = l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(x_7, x_6, x_4, x_5); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; -lean::dec(x_10); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -lean::dec(x_8); -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_9, 2); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::box(0); -x_15 = l_String_splitAux___main___closed__1; -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_15, x_16, x_14, x_14, x_6, x_12, x_11); -lean::dec(x_6); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_19); -lean::cnstr_set(x_17, 0, x_20); -return x_17; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_17, 0); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_17); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_21); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -return x_24; -} -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_10, 0); -lean::inc(x_25); -lean::dec(x_10); -switch (lean::obj_tag(x_25)) { -case 0: -{ -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; uint8 x_35; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::dec(x_25); -x_27 = lean::cnstr_get(x_8, 1); -lean::inc(x_27); -lean::dec(x_8); -x_28 = lean::cnstr_get(x_9, 1); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_9, 2); -lean::inc(x_29); -lean::dec(x_9); -x_30 = lean::cnstr_get(x_26, 1); -lean::inc(x_30); -lean::dec(x_26); -x_31 = lean::box(0); -x_32 = lean_name_mk_string(x_31, x_30); -x_33 = l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3___rarg(x_1, x_32); -lean::dec(x_32); -x_34 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_33, x_6, x_28, x_27); -lean::dec(x_6); -lean::dec(x_33); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_34, 0); -x_37 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_36); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_38); -lean::cnstr_set(x_34, 0, x_39); -return x_34; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_34, 0); -x_41 = lean::cnstr_get(x_34, 1); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_34); -x_42 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_40); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_43); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_41); -return x_45; -} -} -case 1: -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; uint8 x_52; -lean::dec(x_25); -x_46 = lean::cnstr_get(x_8, 1); -lean::inc(x_46); -lean::dec(x_8); -x_47 = lean::cnstr_get(x_9, 1); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_9, 2); -lean::inc(x_48); -lean::dec(x_9); -x_49 = l_Lean_Parser_indexed___rarg___lambda__1___closed__1; -x_50 = l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4___rarg(x_1, x_49); -x_51 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_50, x_6, x_47, x_46); -lean::dec(x_6); -lean::dec(x_50); -x_52 = !lean::is_exclusive(x_51); -if (x_52 == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_53 = lean::cnstr_get(x_51, 0); -x_54 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_54, x_53); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_55); -lean::cnstr_set(x_51, 0, x_56); -return x_51; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_57 = lean::cnstr_get(x_51, 0); -x_58 = lean::cnstr_get(x_51, 1); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_51); -x_59 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_57); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_60); -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_58); -return x_62; -} -} -case 2: -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; uint8 x_70; -x_63 = lean::cnstr_get(x_8, 1); -lean::inc(x_63); -lean::dec(x_8); -x_64 = lean::cnstr_get(x_9, 1); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_9, 2); -lean::inc(x_65); -lean::dec(x_9); -x_66 = lean::cnstr_get(x_25, 0); -lean::inc(x_66); -lean::dec(x_25); -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -lean::dec(x_66); -x_68 = l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5___rarg(x_1, x_67); -lean::dec(x_67); -x_69 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_68, x_6, x_64, x_63); -lean::dec(x_6); -lean::dec(x_68); -x_70 = !lean::is_exclusive(x_69); -if (x_70 == 0) -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_71 = lean::cnstr_get(x_69, 0); -x_72 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_71); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_73); -lean::cnstr_set(x_69, 0, x_74); -return x_69; -} -else -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_75 = lean::cnstr_get(x_69, 0); -x_76 = lean::cnstr_get(x_69, 1); -lean::inc(x_76); -lean::inc(x_75); -lean::dec(x_69); -x_77 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_78 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_75); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_78); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_76); -return x_80; -} -} -default: -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_81 = lean::cnstr_get(x_8, 1); -lean::inc(x_81); -lean::dec(x_8); -x_82 = lean::cnstr_get(x_9, 1); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_9, 2); -lean::inc(x_83); -lean::dec(x_9); -x_84 = lean::box(0); -x_85 = l_String_splitAux___main___closed__1; -x_86 = l_mjoin___rarg___closed__1; -x_87 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_85, x_86, x_84, x_84, x_6, x_82, x_81); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; uint8 x_95; -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -lean::dec(x_87); -x_90 = lean::cnstr_get(x_88, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_88, 1); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_88, 2); -lean::inc(x_92); -lean::dec(x_88); -x_93 = l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6___rarg(x_1, x_90); -lean::dec(x_90); -x_94 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_93, x_6, x_91, x_89); -lean::dec(x_6); -lean::dec(x_93); -x_95 = !lean::is_exclusive(x_94); -if (x_95 == 0) -{ -obj* x_96; obj* x_97; obj* x_98; -x_96 = lean::cnstr_get(x_94, 0); -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_96); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_97); -lean::cnstr_set(x_94, 0, x_98); -return x_94; -} -else -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_99 = lean::cnstr_get(x_94, 0); -x_100 = lean::cnstr_get(x_94, 1); -lean::inc(x_100); -lean::inc(x_99); -lean::dec(x_94); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_99); -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_101); -x_103 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_100); -return x_103; -} -} -else -{ -uint8 x_104; -lean::dec(x_6); -x_104 = !lean::is_exclusive(x_87); -if (x_104 == 0) -{ -obj* x_105; uint8 x_106; -x_105 = lean::cnstr_get(x_87, 0); -lean::dec(x_105); -x_106 = !lean::is_exclusive(x_88); -if (x_106 == 0) -{ -obj* x_107; -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_88); -lean::cnstr_set(x_87, 0, x_107); -return x_87; -} -else -{ -obj* x_108; uint8 x_109; obj* x_110; obj* x_111; -x_108 = lean::cnstr_get(x_88, 0); -x_109 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -lean::inc(x_108); -lean::dec(x_88); -x_110 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_110, 0, x_108); -lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_109); -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_110); -lean::cnstr_set(x_87, 0, x_111); -return x_87; -} -} -else -{ -obj* x_112; obj* x_113; uint8 x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_112 = lean::cnstr_get(x_87, 1); -lean::inc(x_112); -lean::dec(x_87); -x_113 = lean::cnstr_get(x_88, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -if (lean::is_exclusive(x_88)) { - lean::cnstr_release(x_88, 0); - x_115 = x_88; -} else { - lean::dec_ref(x_88); - x_115 = lean::box(0); -} -if (lean::is_scalar(x_115)) { - x_116 = lean::alloc_cnstr(1, 1, 1); -} else { - x_116 = x_115; -} -lean::cnstr_set(x_116, 0, x_113); -lean::cnstr_set_scalar(x_116, sizeof(void*)*1, x_114); -x_117 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_116); -x_118 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_118, 0, x_117); -lean::cnstr_set(x_118, 1, x_112); -return x_118; -} -} -} -} -} -} -else -{ -uint8 x_119; -lean::dec(x_6); -x_119 = !lean::is_exclusive(x_8); -if (x_119 == 0) -{ -obj* x_120; uint8 x_121; -x_120 = lean::cnstr_get(x_8, 0); -lean::dec(x_120); -x_121 = !lean::is_exclusive(x_9); -if (x_121 == 0) -{ -return x_8; -} -else -{ -obj* x_122; uint8 x_123; obj* x_124; -x_122 = lean::cnstr_get(x_9, 0); -x_123 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_122); -lean::dec(x_9); -x_124 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_124, 0, x_122); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_123); -lean::cnstr_set(x_8, 0, x_124); -return x_8; -} -} -else -{ -obj* x_125; obj* x_126; uint8 x_127; obj* x_128; obj* x_129; obj* x_130; -x_125 = lean::cnstr_get(x_8, 1); -lean::inc(x_125); -lean::dec(x_8); -x_126 = lean::cnstr_get(x_9, 0); -lean::inc(x_126); -x_127 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_128 = x_9; -} else { - lean::dec_ref(x_9); - x_128 = lean::box(0); -} -if (lean::is_scalar(x_128)) { - x_129 = lean::alloc_cnstr(1, 1, 1); -} else { - x_129 = x_128; -} -lean::cnstr_set(x_129, 0, x_126); -lean::cnstr_set_scalar(x_129, sizeof(void*)*1, x_127); -x_130 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_125); -return x_130; -} -} -} -} -obj* l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_commandParser_run___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::box(0); -x_5 = l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1; -x_6 = l_mjoin___rarg___closed__1; -x_7 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1___rarg(x_5, x_6, x_4, x_4, x_2, x_3); -return x_7; -} -} -obj* l_Lean_Parser_commandParser_run___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_2); -x_7 = l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2___rarg(x_1, x_2, x_3, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; uint8 x_14; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 2); -lean::inc(x_12); -lean::dec(x_8); -x_13 = l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_universe_Parser___spec__1(x_10, x_2, x_3, x_11, x_9); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_15); -lean::cnstr_set(x_13, 0, x_16); -return x_13; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_13, 0); -x_18 = lean::cnstr_get(x_13, 1); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_13); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_17); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -return x_20; -} -} -else -{ -uint8 x_21; -lean::dec(x_3); -lean::dec(x_2); -x_21 = !lean::is_exclusive(x_7); -if (x_21 == 0) -{ -obj* x_22; uint8 x_23; -x_22 = lean::cnstr_get(x_7, 0); -lean::dec(x_22); -x_23 = !lean::is_exclusive(x_8); -if (x_23 == 0) -{ -return x_7; -} -else -{ -obj* x_24; uint8 x_25; obj* x_26; -x_24 = lean::cnstr_get(x_8, 0); -x_25 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_24); -lean::dec(x_8); -x_26 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_25); -lean::cnstr_set(x_7, 0, x_26); -return x_7; -} -} -else -{ -obj* x_27; obj* x_28; uint8 x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::cnstr_get(x_7, 1); -lean::inc(x_27); -lean::dec(x_7); -x_28 = lean::cnstr_get(x_8, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_30 = x_8; -} else { - lean::dec_ref(x_8); - x_30 = lean::box(0); -} -if (lean::is_scalar(x_30)) { - x_31 = lean::alloc_cnstr(1, 1, 1); -} else { - x_31 = x_30; -} -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set_scalar(x_31, sizeof(void*)*1, x_29); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_27); -return x_32; -} -} -} -} -obj* _init_l_Lean_Parser_commandParser_run___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_commandParser_run___lambda__1___boxed), 3, 0); -return x_1; -} -} -obj* l_Lean_Parser_commandParser_run(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; -lean::inc(x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_commandParser_run___lambda__2___boxed), 6, 2); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_3); -x_7 = l_Lean_Parser_commandParser_run___closed__1; -x_8 = lean::alloc_closure(reinterpret_cast(l_fixCore___rarg___boxed), 3, 2); -lean::closure_set(x_8, 0, x_7); -lean::closure_set(x_8, 1, x_6); -x_9 = lean::apply_4(x_2, x_3, x_8, x_4, x_5); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_commandParser_run___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_3); -return x_7; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__3___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__4___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__5___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_commandParser_run___spec__6___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_indexed___at_Lean_Parser_commandParser_run___spec__2___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_commandParser_run___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_commandParser_run___lambda__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_commandParser_run___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_commandParser_run___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_1); -return x_7; -} -} -obj* initialize_init_lean_parser_declaration(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_command(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_declaration(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_command_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_Parser___rarg___closed__1 = _init_l_Lean_Parser_command_Parser___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_Parser___rarg___closed__1); -l_Lean_Parser_command_openSpec_as = _init_l_Lean_Parser_command_openSpec_as(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_as); -l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_as_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_openSpec_as_HasView_x27 = _init_l_Lean_Parser_command_openSpec_as_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_as_HasView_x27); -l_Lean_Parser_command_openSpec_as_HasView = _init_l_Lean_Parser_command_openSpec_as_HasView(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_as_HasView); -l_Lean_Parser_command_openSpec_only = _init_l_Lean_Parser_command_openSpec_only(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_only); -l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_only_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_openSpec_only_HasView_x27 = _init_l_Lean_Parser_command_openSpec_only_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_only_HasView_x27); -l_Lean_Parser_command_openSpec_only_HasView = _init_l_Lean_Parser_command_openSpec_only_HasView(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_only_HasView); -l_Lean_Parser_command_openSpec_renaming_item = _init_l_Lean_Parser_command_openSpec_renaming_item(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_item); -l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_item_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_openSpec_renaming_item_HasView_x27 = _init_l_Lean_Parser_command_openSpec_renaming_item_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_item_HasView_x27); -l_Lean_Parser_command_openSpec_renaming_item_HasView = _init_l_Lean_Parser_command_openSpec_renaming_item_HasView(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_item_HasView); -l_Lean_Parser_command_openSpec_renaming = _init_l_Lean_Parser_command_openSpec_renaming(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming); -l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_openSpec_renaming_HasView_x27 = _init_l_Lean_Parser_command_openSpec_renaming_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_HasView_x27); -l_Lean_Parser_command_openSpec_renaming_HasView = _init_l_Lean_Parser_command_openSpec_renaming_HasView(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_renaming_HasView); -l_Lean_Parser_command_openSpec_hiding = _init_l_Lean_Parser_command_openSpec_hiding(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_hiding); -l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_hiding_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_openSpec_hiding_HasView_x27 = _init_l_Lean_Parser_command_openSpec_hiding_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_hiding_HasView_x27); -l_Lean_Parser_command_openSpec_hiding_HasView = _init_l_Lean_Parser_command_openSpec_hiding_HasView(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_hiding_HasView); -l_Lean_Parser_command_openSpec = _init_l_Lean_Parser_command_openSpec(); -lean::mark_persistent(l_Lean_Parser_command_openSpec); -l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_command_openSpec_HasView_x27 = _init_l_Lean_Parser_command_openSpec_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_HasView_x27); -l_Lean_Parser_command_openSpec_HasView = _init_l_Lean_Parser_command_openSpec_HasView(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_HasView); -l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_openSpec_Parser___closed__1 = _init_l_Lean_Parser_command_openSpec_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_openSpec_Parser___closed__1); -l_Lean_Parser_command_open = _init_l_Lean_Parser_command_open(); -lean::mark_persistent(l_Lean_Parser_command_open); -l_Lean_Parser_command_open_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_open_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_open_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_open_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_open_HasView_x27 = _init_l_Lean_Parser_command_open_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_open_HasView_x27); -l_Lean_Parser_command_open_HasView = _init_l_Lean_Parser_command_open_HasView(); -lean::mark_persistent(l_Lean_Parser_command_open_HasView); -l_Lean_Parser_command_open_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_open_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_open_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_open_Parser___closed__1 = _init_l_Lean_Parser_command_open_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_open_Parser___closed__1); -l_Lean_Parser_command_export = _init_l_Lean_Parser_command_export(); -lean::mark_persistent(l_Lean_Parser_command_export); -l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_export_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_export_HasView_x27 = _init_l_Lean_Parser_command_export_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_export_HasView_x27); -l_Lean_Parser_command_export_HasView = _init_l_Lean_Parser_command_export_HasView(); -lean::mark_persistent(l_Lean_Parser_command_export_HasView); -l_Lean_Parser_command_export_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_export_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_export_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_export_Parser___closed__1 = _init_l_Lean_Parser_command_export_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_export_Parser___closed__1); -l_Lean_Parser_command_section = _init_l_Lean_Parser_command_section(); -lean::mark_persistent(l_Lean_Parser_command_section); -l_Lean_Parser_command_section_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_section_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_section_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_section_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_section_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_section_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_section_HasView_x27 = _init_l_Lean_Parser_command_section_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_section_HasView_x27); -l_Lean_Parser_command_section_HasView = _init_l_Lean_Parser_command_section_HasView(); -lean::mark_persistent(l_Lean_Parser_command_section_HasView); -l_Lean_Parser_command_section_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_section_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_section_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_section_Parser___closed__1 = _init_l_Lean_Parser_command_section_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_section_Parser___closed__1); -l_Lean_Parser_command_namespace = _init_l_Lean_Parser_command_namespace(); -lean::mark_persistent(l_Lean_Parser_command_namespace); -l_Lean_Parser_command_namespace_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_namespace_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_namespace_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_namespace_HasView_x27 = _init_l_Lean_Parser_command_namespace_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_namespace_HasView_x27); -l_Lean_Parser_command_namespace_HasView = _init_l_Lean_Parser_command_namespace_HasView(); -lean::mark_persistent(l_Lean_Parser_command_namespace_HasView); -l_Lean_Parser_command_namespace_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_namespace_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_namespace_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_namespace_Parser___closed__1 = _init_l_Lean_Parser_command_namespace_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_namespace_Parser___closed__1); -l_Lean_Parser_command_variable = _init_l_Lean_Parser_command_variable(); -lean::mark_persistent(l_Lean_Parser_command_variable); -l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_variable_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_variable_HasView_x27 = _init_l_Lean_Parser_command_variable_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_variable_HasView_x27); -l_Lean_Parser_command_variable_HasView = _init_l_Lean_Parser_command_variable_HasView(); -lean::mark_persistent(l_Lean_Parser_command_variable_HasView); -l_Lean_Parser_command_variable_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_variable_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_variable_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_variable_Parser___closed__1 = _init_l_Lean_Parser_command_variable_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_variable_Parser___closed__1); -l_Lean_Parser_command_variables = _init_l_Lean_Parser_command_variables(); -lean::mark_persistent(l_Lean_Parser_command_variables); -l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_variables_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_variables_HasView_x27 = _init_l_Lean_Parser_command_variables_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_variables_HasView_x27); -l_Lean_Parser_command_variables_HasView = _init_l_Lean_Parser_command_variables_HasView(); -lean::mark_persistent(l_Lean_Parser_command_variables_HasView); -l_Lean_Parser_command_variables_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_variables_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_variables_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_variables_Parser___closed__1 = _init_l_Lean_Parser_command_variables_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_variables_Parser___closed__1); -l_Lean_Parser_command_include = _init_l_Lean_Parser_command_include(); -lean::mark_persistent(l_Lean_Parser_command_include); -l_Lean_Parser_command_include_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_include_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_include_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_include_HasView_x27 = _init_l_Lean_Parser_command_include_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_include_HasView_x27); -l_Lean_Parser_command_include_HasView = _init_l_Lean_Parser_command_include_HasView(); -lean::mark_persistent(l_Lean_Parser_command_include_HasView); -l_Lean_Parser_command_include_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_include_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_include_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_include_Parser___closed__1 = _init_l_Lean_Parser_command_include_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_include_Parser___closed__1); -l_Lean_Parser_command_omit = _init_l_Lean_Parser_command_omit(); -lean::mark_persistent(l_Lean_Parser_command_omit); -l_Lean_Parser_command_omit_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_omit_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_omit_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_omit_HasView_x27 = _init_l_Lean_Parser_command_omit_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_omit_HasView_x27); -l_Lean_Parser_command_omit_HasView = _init_l_Lean_Parser_command_omit_HasView(); -lean::mark_persistent(l_Lean_Parser_command_omit_HasView); -l_Lean_Parser_command_omit_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_omit_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_omit_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_omit_Parser___closed__1 = _init_l_Lean_Parser_command_omit_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_omit_Parser___closed__1); -l_Lean_Parser_command_end = _init_l_Lean_Parser_command_end(); -lean::mark_persistent(l_Lean_Parser_command_end); -l_Lean_Parser_command_end_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_end_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_end_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_end_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_end_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_end_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_end_HasView_x27 = _init_l_Lean_Parser_command_end_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_end_HasView_x27); -l_Lean_Parser_command_end_HasView = _init_l_Lean_Parser_command_end_HasView(); -lean::mark_persistent(l_Lean_Parser_command_end_HasView); -l_Lean_Parser_command_end_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_end_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_end_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_end_Parser___closed__1 = _init_l_Lean_Parser_command_end_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_end_Parser___closed__1); -l_Lean_Parser_command_universes = _init_l_Lean_Parser_command_universes(); -lean::mark_persistent(l_Lean_Parser_command_universes); -l_Lean_Parser_command_universes_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_universes_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_universes_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_universes_HasView_x27 = _init_l_Lean_Parser_command_universes_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_universes_HasView_x27); -l_Lean_Parser_command_universes_HasView = _init_l_Lean_Parser_command_universes_HasView(); -lean::mark_persistent(l_Lean_Parser_command_universes_HasView); -l_Lean_Parser_command_universe = _init_l_Lean_Parser_command_universe(); -lean::mark_persistent(l_Lean_Parser_command_universe); -l_Lean_Parser_command_universe_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_universe_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_universe_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_universe_HasView_x27 = _init_l_Lean_Parser_command_universe_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_universe_HasView_x27); -l_Lean_Parser_command_universe_HasView = _init_l_Lean_Parser_command_universe_HasView(); -lean::mark_persistent(l_Lean_Parser_command_universe_HasView); -l_Lean_Parser_command_universe_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_universe_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_universe_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_universe_Parser___closed__1 = _init_l_Lean_Parser_command_universe_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_universe_Parser___closed__1); -l_Lean_Parser_command_check = _init_l_Lean_Parser_command_check(); -lean::mark_persistent(l_Lean_Parser_command_check); -l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_check_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_command_check_HasView_x27 = _init_l_Lean_Parser_command_check_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_check_HasView_x27); -l_Lean_Parser_command_check_HasView = _init_l_Lean_Parser_command_check_HasView(); -lean::mark_persistent(l_Lean_Parser_command_check_HasView); -l_Lean_Parser_command_check_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_check_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_check_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_check_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_check_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_check_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_check_Parser___closed__1 = _init_l_Lean_Parser_command_check_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_check_Parser___closed__1); -l_Lean_Parser_command_attribute = _init_l_Lean_Parser_command_attribute(); -lean::mark_persistent(l_Lean_Parser_command_attribute); -l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_attribute_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_attribute_HasView_x27 = _init_l_Lean_Parser_command_attribute_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_attribute_HasView_x27); -l_Lean_Parser_command_attribute_HasView = _init_l_Lean_Parser_command_attribute_HasView(); -lean::mark_persistent(l_Lean_Parser_command_attribute_HasView); -l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_attribute_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_attribute_Parser___closed__1 = _init_l_Lean_Parser_command_attribute_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_attribute_Parser___closed__1); -l_Lean_Parser_command_initQuot = _init_l_Lean_Parser_command_initQuot(); -lean::mark_persistent(l_Lean_Parser_command_initQuot); -l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_initQuot_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_initQuot_HasView_x27 = _init_l_Lean_Parser_command_initQuot_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_initQuot_HasView_x27); -l_Lean_Parser_command_initQuot_HasView = _init_l_Lean_Parser_command_initQuot_HasView(); -lean::mark_persistent(l_Lean_Parser_command_initQuot_HasView); -l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_initQuot_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_initQuot_Parser___closed__1 = _init_l_Lean_Parser_command_initQuot_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_initQuot_Parser___closed__1); -l_Lean_Parser_command_boolOptionValue = _init_l_Lean_Parser_command_boolOptionValue(); -lean::mark_persistent(l_Lean_Parser_command_boolOptionValue); -l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_boolOptionValue_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_boolOptionValue_HasView_x27 = _init_l_Lean_Parser_command_boolOptionValue_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_boolOptionValue_HasView_x27); -l_Lean_Parser_command_boolOptionValue_HasView = _init_l_Lean_Parser_command_boolOptionValue_HasView(); -lean::mark_persistent(l_Lean_Parser_command_boolOptionValue_HasView); -l_Lean_Parser_command_optionValue = _init_l_Lean_Parser_command_optionValue(); -lean::mark_persistent(l_Lean_Parser_command_optionValue); -l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_optionValue_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_optionValue_HasView_x27 = _init_l_Lean_Parser_command_optionValue_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_optionValue_HasView_x27); -l_Lean_Parser_command_optionValue_HasView = _init_l_Lean_Parser_command_optionValue_HasView(); -lean::mark_persistent(l_Lean_Parser_command_optionValue_HasView); -l_Lean_Parser_command_setOption = _init_l_Lean_Parser_command_setOption(); -lean::mark_persistent(l_Lean_Parser_command_setOption); -l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_setOption_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_setOption_HasView_x27 = _init_l_Lean_Parser_command_setOption_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_setOption_HasView_x27); -l_Lean_Parser_command_setOption_HasView = _init_l_Lean_Parser_command_setOption_HasView(); -lean::mark_persistent(l_Lean_Parser_command_setOption_HasView); -l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_setOption_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_setOption_Parser___closed__1 = _init_l_Lean_Parser_command_setOption_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_setOption_Parser___closed__1); -l_Lean_Parser_command_builtinCommandParsers_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_builtinCommandParsers_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_builtinCommandParsers_Lean_Parser_HasTokens); -l_Lean_Parser_command_builtinCommandParsers = _init_l_Lean_Parser_command_builtinCommandParsers(); -lean::mark_persistent(l_Lean_Parser_command_builtinCommandParsers); -l_Lean_Parser_commandParser_run___closed__1 = _init_l_Lean_Parser_commandParser_run___closed__1(); -lean::mark_persistent(l_Lean_Parser_commandParser_run___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/declaration.cpp b/src/stage0/init/lean/parser/declaration.cpp deleted file mode 100644 index 33eb72eb1b..0000000000 --- a/src/stage0/init/lean/parser/declaration.cpp +++ /dev/null @@ -1,34992 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.declaration -// Imports: init.lean.parser.term -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_command_univParams_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_defLike_HasView; -obj* l_Lean_Parser_withTrailing___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_equation_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__7(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_relaxedInferModifier; -obj* l_Lean_Parser_command_equation_Parser___closed__1; -extern obj* l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_docComment_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_defLike_kind_HasView_x27; -obj* l_Lean_Parser_command_structExplicitBinder_HasView; -obj* l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_declAttributes_HasView_x27; -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_oldUnivParams_HasView; -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_rawIdent_Parser___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_notationLike_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1(obj*, uint8, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structBinderContent; -obj* l_Lean_Parser_symbol_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_command_univParams; -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_command_defLike_kind_HasView; -obj* l_Lean_Parser_command_equation_HasView; -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__1; -obj* l___private_init_lean_parser_token_4__ident_x27(obj*, obj*, obj*); -extern obj* l_Lean_Parser_Term_binderDefault_HasView; -obj* l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_command_example_HasView_x27; -obj* l_Lean_Parser_command_declVal_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -uint8 l_String_isEmpty(obj*); -obj* l_Lean_Parser_command_defLike_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_rawIdent_Parser___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_extends_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_univParams_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -obj* l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_axiom_HasView_x27; -obj* l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2; -extern obj* l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_simpleDeclVal; -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Combinators_sepBy1_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_command_declVal_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(obj*); -obj* l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1(obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__4___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declAttributes; -obj* l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView; -extern obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -obj* l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Parser_finishCommentBlock___closed__2; -obj* l_Lean_Parser_termParser_run(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_defLike_HasView_x27; -obj* l_Lean_Parser_command_structureFieldBlock_Parser___closed__1; -obj* l_Lean_Parser_command_structure_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_structureKw; -obj* l_Lean_Parser_command_inferModifier_Parser___closed__1; -obj* l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_structureCtor; -obj* l_Lean_Parser_command_optDeclSig_HasView_x27; -obj* l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_docComment_HasView_x27; -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_visibility_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -obj* l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Function_comp___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj*, obj*); -uint32 l_String_OldIterator_curr___main(obj*); -obj* l_List_reverse___rarg(obj*); -obj* l_Lean_Parser_command_declSig_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_relaxedInferModifier_HasView; -obj* l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_extends; -obj* l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(obj*); -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_oldUnivParams_Parser___closed__1; -obj* l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structureFieldBlock_HasView_x27___elambda__1(obj*); -obj* l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27; -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -obj* l_Lean_Parser_command_declaration_inner_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_constantKeyword; -obj* l_Lean_Parser_command_defLike; -obj* l_Lean_Parser_command_structExplicitBinderContent_HasView; -obj* l_Lean_Parser_command_docComment_Parser___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_declSig; -obj* l_Lean_Parser_command_attrInstance_HasView_x27; -obj* l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_declSig_Parser(obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_remaining___main(obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1(obj*, obj*, obj*); -extern obj* l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_declVal_HasView; -obj* l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_ReaderT_bind___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__9(obj*, obj*); -obj* l_List_map___main___rarg(obj*, obj*); -obj* l_Lean_Parser_command_inductive_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structImplicitBinder; -obj* l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_attrInstance_Parser___closed__1; -obj* l_Lean_Parser_command_oldUnivParams_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_oldUnivParams; -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_declaration_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_command_axiom_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_command_structBinderContent_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structExplicitBinderContent_HasView_x27; -obj* l_Lean_Parser_command_declModifiers_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_command_structureCtor_HasView; -obj* l_Lean_Parser_command_visibility_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_visibility_HasView_x27; -obj* l_Lean_Parser_command_declAttributes_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_instance_HasView_x27; -obj* l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_axiom_HasView; -obj* l_Lean_Parser_command_declaration_HasView; -obj* l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__3; -extern obj* l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_declVal_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_identUnivParams_HasView_x27; -obj* l_Lean_Parser_MonadParsec_many_x27___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__6(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_structImplicitBinder_HasView; -obj* l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Parser_command_inferModifier_HasView; -obj* l_Lean_Parser_command_inductive_HasView; -obj* l_Lean_Parser_command_declaration_HasView_x27; -extern obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_attrInstance_HasView; -obj* l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_introRule_HasView; -obj* l_Lean_Parser_mkRawRes(obj*, obj*); -obj* l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasView; -obj* l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8(obj*); -obj* l_List_map___main___at_Lean_Parser_command_declAttributes_HasView_x27___elambda__1___spec__1(obj*); -extern obj* l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -extern obj* l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_declSig_HasView; -obj* l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens; -obj* l___private_init_lean_parser_parsec_2__strAux___main(obj*, obj*, obj*); -obj* l_Lean_Parser_command_equation_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_optDeclSig_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_declaration_inner_HasView; -obj* l_Lean_Parser_command_declVal_HasView_x27; -extern obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_structureKw_HasView; -obj* l_Lean_Parser_command_structureFieldBlock; -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_identUnivParams; -obj* l_Lean_Parser_command_structure_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_instImplicitBinder_HasView_x27; -obj* l_Lean_Parser_command_strictImplicitBinder_HasView; -obj* l_Lean_Parser_command_optDeclSig_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_command_notationLike_HasView; -obj* l_List_join___main___rarg(obj*); -obj* l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_structure; -obj* l_Lean_Parser_command_structure_HasView_x27; -obj* l_Lean_Parser_command_declAttributes_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_axiom; -obj* l_Lean_Parser_Term_binderDefault_Parser(obj*, obj*, obj*, obj*, obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_Lean_Parser_command_instImplicitBinder; -obj* l_String_OldIterator_next___main(obj*); -obj* l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_declaration_inner; -obj* l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_attrInstance_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__3; -extern obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1; -obj* l_Lean_Parser_command_inferModifier; -obj* l_Lean_Parser_command_extends_HasView_x27; -obj* l_Lean_Parser_command_declaration_inner_HasView_x27; -obj* l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_declModifiers_HasView; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_introRule_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_strictImplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_command_structImplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_strictInferModifier_HasView; -extern obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -extern obj* l_Char_HasRepr___closed__1; -obj* l_List_mfoldl___main___at_Lean_Parser_command_docComment_Parser___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_declModifiers_Parser___closed__1; -extern obj* l_Lean_Parser_noKind; -obj* l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_structExplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_univParams_HasView_x27; -obj* l_Lean_Parser_command_instImplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_List_append___rarg(obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_Lean_Parser_command_visibility_HasView; -obj* l_Lean_Parser_command_univParams_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_inductive_HasView_x27___elambda__1___closed__1; -extern obj* l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_command_extends_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_introRule_HasView_x27; -obj* l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasView; -obj* l_Char_quoteCore(uint32); -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj*, obj*); -uint8 l_String_OldIterator_hasNext___main(obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___closed__1; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_command_structureKw_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_tokens___rarg(obj*); -obj* l_Lean_Parser_command_structure_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___closed__1; -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1(obj*); -extern obj* l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__4; -extern obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj*); -obj* l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__2; -obj* l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_oldUnivParams_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_instance_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__5; -obj* l_Lean_Parser_Term_optType_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_optDeclSig; -obj* l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__4; -extern obj* l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_attrInstance; -obj* l_Lean_Parser_command_docComment_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_structureFieldBlock_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_instance_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_example_HasView; -obj* l_Lean_Parser_command_introRule_Parser___closed__1; -extern obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__3; -namespace lean { -uint8 string_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_command_declSig_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_command_declSig_HasView_x27; -obj* l_Lean_Parser_command_docComment_HasView; -obj* l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_instImplicitBinder_HasView; -obj* l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_example_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_structBinderContent_HasView; -obj* l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_declAttributes_Parser___closed__1; -obj* l_Lean_Parser_command_structure_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_structBinderContent_HasView_x27; -obj* l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_bracketedBinders_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_identUnivParams_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_structure_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_inferModifier_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(obj*); -obj* l_Lean_Parser_command_declVal_Parser___closed__1; -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_maxPrec; -obj* l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_example_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_equation_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__4; -obj* l_Lean_Parser_command_declaration_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_docComment_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declVal; -obj* l_ReaderT_bind___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__9___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structImplicitBinder_HasView_x27; -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_structBinderContent_Parser___closed__1; -obj* l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1; -obj* l_String_trim(obj*); -obj* l_Lean_Parser_command_axiom_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_command_declModifiers; -obj* l_Lean_Parser_command_structure_HasView; -obj* l_Lean_Parser_command_declModifiers_HasView_x27; -extern obj* l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_structureFieldBlock_HasView; -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -obj* l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_declaration; -obj* l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, uint8, uint8, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_instance; -obj* l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_extends_HasView; -obj* l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Parser_Term_bracketedBinders_HasView; -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__7; -extern "C" obj* lean_name_mk_numeral(obj*, obj*); -obj* l_Lean_Parser_command_inferModifier_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_identUnivParams_Parser___closed__1; -obj* l_Lean_Parser_command_strictImplicitBinder_HasView_x27; -obj* l_Lean_Parser_command_structure_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_token(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2; -obj* l_Lean_Parser_command_identUnivParams_HasView; -obj* l_Lean_Parser_command_simpleDeclVal_HasView; -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1(obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_List_cons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_equation_HasView_x27; -obj* l_Lean_Parser_command_inductive; -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_constantKeyword_HasView; -obj* l_Lean_Parser_command_docComment; -obj* l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, uint8, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_structureFieldBlock_HasView_x27; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4(obj*); -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_command_visibility_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_defLike_kind; -obj* l_Lean_Parser_command_attrInstance_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_equation; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_termParserCommandParserCoe(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_introRule_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_docComment_Parser___closed__1; -obj* l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__5; -extern obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_strictInferModifier; -obj* l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_constantKeyword_HasView_x27; -extern uint8 l_True_Decidable; -obj* l_Lean_Parser_command_declaration_Parser___closed__1; -obj* l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__2; -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declAttributes_HasView; -obj* l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_univParams_HasView; -obj* l_Lean_Parser_command_structure_Parser___closed__1; -obj* l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_inductive_HasView_x27___lambda__1(obj*); -extern obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6; -obj* l_Lean_Parser_command_docComment_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_oldUnivParams_HasView_x27; -obj* l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_Term_typeSpec_HasView; -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1(obj*); -obj* l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_simpleDeclVal_HasView_x27; -obj* l_Lean_Parser_command_docComment_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_CommandParserM_Alternative(obj*); -obj* l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_equation_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_defLike_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_declaration_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_CommandParserM_Monad(obj*); -obj* l_Lean_Parser_command_structureCtor_HasView_x27; -obj* l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_command_optDeclSig_Parser___closed__1; -obj* l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_structExplicitBinder_HasView_x27; -obj* l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_strictImplicitBinder; -obj* l_String_quote(obj*); -obj* l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_structExplicitBinderContent; -obj* l_Lean_Parser_Term_typeSpec_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Substring_ofString(obj*); -obj* l_Lean_Parser_command_instance_HasView; -obj* l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(obj*); -obj* l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_optDeclSig_HasView; -obj* l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(obj*); -obj* l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_docComment_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_visibility; -obj* l_Lean_Parser_command_structureKw_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_inductive_HasView_x27; -extern obj* l_Lean_Parser_Combinators_many___rarg___closed__1; -obj* l_Lean_Parser_command_example; -obj* l_Lean_Parser_command_docComment_Parser___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_equation_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27; -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_structureKw_HasView_x27; -obj* l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_command_axiom_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_CommandParserM_MonadExcept(obj*); -obj* l_Lean_Parser_command_declSig_Parser___closed__1; -obj* l_Lean_Parser_command_introRule_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_command_equation_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_introRule; -obj* l_Lean_Parser_command_inferModifier_HasView_x27; -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_command_structureCtor_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_structExplicitBinder; -extern obj* l_String_splitAux___main___closed__1; -namespace lean { -obj* string_length(obj*); -} -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_termParserCommandParserCoe(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_termParser_run(x_1, x_2, x_3, x_4, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_docComment() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("docComment"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_docComment_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_Lean_Parser_command_docComment; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -return x_7; -} -} -obj* l_Lean_Parser_command_docComment_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_command_docComment_HasView_x27___elambda__1___closed__1; -return x_6; -} -else -{ -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_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_5); -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_command_docComment; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_command_docComment; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_23 = lean::cnstr_get(x_4, 0); -lean::inc(x_23); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_5); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_16); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::box(3); -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 = l_Lean_Parser_command_docComment; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -} -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_2, 0); -lean::inc(x_31); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_33 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__3; -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_command_docComment; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_37 = lean::cnstr_get(x_4, 0); -lean::inc(x_37); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, 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_5); -x_40 = lean::box(3); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_39); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_32); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_command_docComment; -x_44 = l_Lean_Parser_Syntax_mkNode(x_43, x_42); -return x_44; -} -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_3, 0); -lean::inc(x_45); -x_46 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_32); -lean::cnstr_set(x_49, 1, x_48); -x_50 = l_Lean_Parser_command_docComment; -x_51 = l_Lean_Parser_Syntax_mkNode(x_50, x_49); -return x_51; -} -else -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_52 = lean::cnstr_get(x_4, 0); -lean::inc(x_52); -x_53 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_5); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_46); -lean::cnstr_set(x_55, 1, x_54); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_32); -lean::cnstr_set(x_56, 1, x_55); -x_57 = l_Lean_Parser_command_docComment; -x_58 = l_Lean_Parser_Syntax_mkNode(x_57, x_56); -return x_58; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_docComment_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -lean::cnstr_set(x_2, 2, x_1); -return x_2; -} -} -obj* l_Lean_Parser_command_docComment_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_32; -x_32 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -x_33 = l_Lean_Parser_command_docComment_HasView_x27___lambda__1___closed__1; -return x_33; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -x_36 = lean::box(3); -x_2 = x_35; -x_3 = x_36; -goto block_31; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_35, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 1); -lean::inc(x_38); -lean::dec(x_35); -x_2 = x_38; -x_3 = x_37; -goto block_31; -} -} -block_31: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_3, 0); -lean::inc(x_28); -lean::dec(x_3); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_4 = x_29; -goto block_27; -} -else -{ -obj* x_30; -lean::dec(x_3); -x_30 = lean::box(0); -x_4 = x_30; -goto block_27; -} -block_27: -{ -obj* x_5; obj* x_6; obj* x_13; obj* x_14; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_24; -x_24 = lean::box(3); -x_13 = x_2; -x_14 = x_24; -goto block_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_2, 1); -lean::inc(x_26); -lean::dec(x_2); -x_13 = x_26; -x_14 = x_25; -goto block_23; -} -block_12: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_5); -lean::cnstr_set(x_11, 2, x_10); -return x_11; -} -} -block_23: -{ -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_16); -lean::cnstr_set(x_18, 2, x_17); -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_13, 0); -lean::inc(x_19); -lean::dec(x_13); -x_5 = x_16; -x_6 = x_19; -goto block_12; -} -} -else -{ -obj* x_20; -lean::dec(x_14); -x_20 = lean::box(0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_21; -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_20); -lean::cnstr_set(x_21, 2, x_20); -return x_21; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_13, 0); -lean::inc(x_22); -lean::dec(x_13); -x_5 = x_20; -x_6 = x_22; -goto block_12; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_docComment_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_docComment_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_docComment_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_docComment_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_docComment_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_docComment_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_docComment_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1(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_10; obj* x_11; -lean::inc(x_1); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_1); -x_9 = lean::cnstr_get(x_4, 0); -lean::inc(x_9); -lean::dec(x_4); -lean::inc(x_6); -lean::inc(x_9); -x_10 = l_Lean_Parser_token(x_9, x_6, x_7); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; uint8 x_15; -x_13 = lean::cnstr_get(x_10, 1); -x_14 = lean::cnstr_get(x_10, 0); -lean::dec(x_14); -x_15 = !lean::is_exclusive(x_11); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_11, 0); -x_17 = lean::cnstr_get(x_11, 1); -x_18 = lean::cnstr_get(x_11, 2); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; -x_40 = lean::cnstr_get(x_16, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -x_42 = lean::string_dec_eq(x_1, x_41); -lean::dec(x_1); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -lean::free_heap_obj(x_11); -lean::free_heap_obj(x_10); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_6); -x_44 = lean::box(0); -x_45 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_41, x_3, x_43, x_44, x_9, x_17, x_13); -lean::dec(x_9); -lean::dec(x_43); -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_45); -if (x_47 == 0) -{ -obj* x_48; uint8 x_49; -x_48 = lean::cnstr_get(x_45, 0); -lean::dec(x_48); -x_49 = !lean::is_exclusive(x_46); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_50 = lean::cnstr_get(x_46, 2); -x_51 = lean::cnstr_get(x_46, 0); -lean::dec(x_51); -x_52 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_46, 2, x_52); -lean::cnstr_set(x_46, 0, x_16); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_46); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_53); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_54); -x_56 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_55, x_8); -x_57 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_56); -lean::cnstr_set(x_45, 0, x_57); -return x_45; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_58 = lean::cnstr_get(x_46, 1); -x_59 = lean::cnstr_get(x_46, 2); -lean::inc(x_59); -lean::inc(x_58); -lean::dec(x_46); -x_60 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_61 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_61, 0, x_16); -lean::cnstr_set(x_61, 1, x_58); -lean::cnstr_set(x_61, 2, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_60, x_63); -x_65 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_64, x_8); -x_66 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_65); -lean::cnstr_set(x_45, 0, x_66); -return x_45; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_67 = lean::cnstr_get(x_45, 1); -lean::inc(x_67); -lean::dec(x_45); -x_68 = lean::cnstr_get(x_46, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_46, 2); -lean::inc(x_69); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - lean::cnstr_release(x_46, 2); - x_70 = x_46; -} else { - lean::dec_ref(x_46); - x_70 = lean::box(0); -} -x_71 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_70)) { - x_72 = lean::alloc_cnstr(0, 3, 0); -} else { - x_72 = x_70; -} -lean::cnstr_set(x_72, 0, x_16); -lean::cnstr_set(x_72, 1, x_68); -lean::cnstr_set(x_72, 2, x_71); -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_72); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_73); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_74); -x_76 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_75, x_8); -x_77 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_76); -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_67); -return x_78; -} -} -else -{ -uint8 x_79; -lean::dec(x_16); -x_79 = !lean::is_exclusive(x_45); -if (x_79 == 0) -{ -obj* x_80; uint8 x_81; -x_80 = lean::cnstr_get(x_45, 0); -lean::dec(x_80); -x_81 = !lean::is_exclusive(x_46); -if (x_81 == 0) -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_46); -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_82); -x_85 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_84, x_8); -x_86 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_85); -lean::cnstr_set(x_45, 0, x_86); -return x_45; -} -else -{ -obj* x_87; uint8 x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_87 = lean::cnstr_get(x_46, 0); -x_88 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -lean::inc(x_87); -lean::dec(x_46); -x_89 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_89, 0, x_87); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_88); -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_89); -x_91 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_90); -x_93 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_92, x_8); -x_94 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_93); -lean::cnstr_set(x_45, 0, x_94); -return x_45; -} -} -else -{ -obj* x_95; obj* x_96; uint8 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; -x_95 = lean::cnstr_get(x_45, 1); -lean::inc(x_95); -lean::dec(x_45); -x_96 = lean::cnstr_get(x_46, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_98 = x_46; -} else { - lean::dec_ref(x_46); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(1, 1, 1); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_96); -lean::cnstr_set_scalar(x_99, sizeof(void*)*1, x_97); -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_99); -x_101 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_101, x_100); -x_103 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_102, x_8); -x_104 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_103); -x_105 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_95); -return x_105; -} -} -} -else -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -lean::dec(x_41); -lean::dec(x_9); -lean::dec(x_6); -lean::dec(x_3); -x_106 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_11, 2, x_106); -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_11); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_108, x_107); -x_110 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_109, x_8); -x_111 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_110); -lean::cnstr_set(x_10, 0, x_111); -return x_10; -} -} -else -{ -obj* x_112; -lean::free_heap_obj(x_11); -lean::dec(x_16); -lean::free_heap_obj(x_10); -lean::dec(x_1); -x_112 = lean::box(0); -x_19 = x_112; -goto block_39; -} -block_39: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -lean::dec(x_19); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_6); -x_21 = lean::box(0); -x_22 = l_String_splitAux___main___closed__1; -x_23 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_22, x_3, x_20, x_21, x_9, x_17, x_13); -lean::dec(x_9); -lean::dec(x_20); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_23, 0); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_25); -x_27 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_27, x_26); -x_29 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_28, x_8); -x_30 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_29); -lean::cnstr_set(x_23, 0, x_30); -return x_23; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_31 = lean::cnstr_get(x_23, 0); -x_32 = lean::cnstr_get(x_23, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_23); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_31); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_33); -x_36 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_35, x_8); -x_37 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_32); -return x_38; -} -} -} -else -{ -obj* x_113; obj* x_114; obj* x_115; obj* x_116; -x_113 = lean::cnstr_get(x_11, 0); -x_114 = lean::cnstr_get(x_11, 1); -x_115 = lean::cnstr_get(x_11, 2); -lean::inc(x_115); -lean::inc(x_114); -lean::inc(x_113); -lean::dec(x_11); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_131; obj* x_132; uint8 x_133; -x_131 = lean::cnstr_get(x_113, 0); -lean::inc(x_131); -x_132 = lean::cnstr_get(x_131, 1); -lean::inc(x_132); -lean::dec(x_131); -x_133 = lean::string_dec_eq(x_1, x_132); -lean::dec(x_1); -if (x_133 == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; -lean::free_heap_obj(x_10); -x_134 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_134, 0, x_6); -x_135 = lean::box(0); -x_136 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_132, x_3, x_134, x_135, x_9, x_114, x_13); -lean::dec(x_9); -lean::dec(x_134); -x_137 = lean::cnstr_get(x_136, 0); -lean::inc(x_137); -if (lean::obj_tag(x_137) == 0) -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; -x_138 = lean::cnstr_get(x_136, 1); -lean::inc(x_138); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_139 = x_136; -} else { - lean::dec_ref(x_136); - x_139 = lean::box(0); -} -x_140 = lean::cnstr_get(x_137, 1); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_137, 2); -lean::inc(x_141); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - lean::cnstr_release(x_137, 2); - x_142 = x_137; -} else { - lean::dec_ref(x_137); - x_142 = lean::box(0); -} -x_143 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_142)) { - x_144 = lean::alloc_cnstr(0, 3, 0); -} else { - x_144 = x_142; -} -lean::cnstr_set(x_144, 0, x_113); -lean::cnstr_set(x_144, 1, x_140); -lean::cnstr_set(x_144, 2, x_143); -x_145 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_141, x_144); -x_146 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_145); -x_147 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_143, x_146); -x_148 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_147, x_8); -x_149 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_148); -if (lean::is_scalar(x_139)) { - x_150 = lean::alloc_cnstr(0, 2, 0); -} else { - x_150 = x_139; -} -lean::cnstr_set(x_150, 0, x_149); -lean::cnstr_set(x_150, 1, x_138); -return x_150; -} -else -{ -obj* x_151; obj* x_152; obj* x_153; uint8 x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -lean::dec(x_113); -x_151 = lean::cnstr_get(x_136, 1); -lean::inc(x_151); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_152 = x_136; -} else { - lean::dec_ref(x_136); - x_152 = lean::box(0); -} -x_153 = lean::cnstr_get(x_137, 0); -lean::inc(x_153); -x_154 = lean::cnstr_get_scalar(x_137, sizeof(void*)*1); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - x_155 = x_137; -} else { - lean::dec_ref(x_137); - x_155 = lean::box(0); -} -if (lean::is_scalar(x_155)) { - x_156 = lean::alloc_cnstr(1, 1, 1); -} else { - x_156 = x_155; -} -lean::cnstr_set(x_156, 0, x_153); -lean::cnstr_set_scalar(x_156, sizeof(void*)*1, x_154); -x_157 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_156); -x_158 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_159 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_158, x_157); -x_160 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_159, x_8); -x_161 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_160); -if (lean::is_scalar(x_152)) { - x_162 = lean::alloc_cnstr(0, 2, 0); -} else { - x_162 = x_152; -} -lean::cnstr_set(x_162, 0, x_161); -lean::cnstr_set(x_162, 1, x_151); -return x_162; -} -} -else -{ -obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; -lean::dec(x_132); -lean::dec(x_9); -lean::dec(x_6); -lean::dec(x_3); -x_163 = l_Lean_Parser_finishCommentBlock___closed__2; -x_164 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_164, 0, x_113); -lean::cnstr_set(x_164, 1, x_114); -lean::cnstr_set(x_164, 2, x_163); -x_165 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_164); -x_166 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_167 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_166, x_165); -x_168 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_167, x_8); -x_169 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_168); -lean::cnstr_set(x_10, 0, x_169); -return x_10; -} -} -else -{ -obj* x_170; -lean::dec(x_113); -lean::free_heap_obj(x_10); -lean::dec(x_1); -x_170 = lean::box(0); -x_116 = x_170; -goto block_130; -} -block_130: -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; -lean::dec(x_116); -x_117 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_117, 0, x_6); -x_118 = lean::box(0); -x_119 = l_String_splitAux___main___closed__1; -x_120 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_119, x_3, x_117, x_118, x_9, x_114, x_13); -lean::dec(x_9); -lean::dec(x_117); -x_121 = lean::cnstr_get(x_120, 0); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_120, 1); -lean::inc(x_122); -if (lean::is_exclusive(x_120)) { - lean::cnstr_release(x_120, 0); - lean::cnstr_release(x_120, 1); - x_123 = x_120; -} else { - lean::dec_ref(x_120); - x_123 = lean::box(0); -} -x_124 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_121); -x_125 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_126 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_125, x_124); -x_127 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_126, x_8); -x_128 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_127); -if (lean::is_scalar(x_123)) { - x_129 = lean::alloc_cnstr(0, 2, 0); -} else { - x_129 = x_123; -} -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_122); -return x_129; -} -} -} -else -{ -obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; -x_171 = lean::cnstr_get(x_10, 1); -lean::inc(x_171); -lean::dec(x_10); -x_172 = lean::cnstr_get(x_11, 0); -lean::inc(x_172); -x_173 = lean::cnstr_get(x_11, 1); -lean::inc(x_173); -x_174 = lean::cnstr_get(x_11, 2); -lean::inc(x_174); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - lean::cnstr_release(x_11, 2); - x_175 = x_11; -} else { - lean::dec_ref(x_11); - x_175 = lean::box(0); -} -if (lean::obj_tag(x_172) == 0) -{ -obj* x_191; obj* x_192; uint8 x_193; -x_191 = lean::cnstr_get(x_172, 0); -lean::inc(x_191); -x_192 = lean::cnstr_get(x_191, 1); -lean::inc(x_192); -lean::dec(x_191); -x_193 = lean::string_dec_eq(x_1, x_192); -lean::dec(x_1); -if (x_193 == 0) -{ -obj* x_194; obj* x_195; obj* x_196; obj* x_197; -lean::dec(x_175); -x_194 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_194, 0, x_6); -x_195 = lean::box(0); -x_196 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_192, x_3, x_194, x_195, x_9, x_173, x_171); -lean::dec(x_9); -lean::dec(x_194); -x_197 = lean::cnstr_get(x_196, 0); -lean::inc(x_197); -if (lean::obj_tag(x_197) == 0) -{ -obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; -x_198 = lean::cnstr_get(x_196, 1); -lean::inc(x_198); -if (lean::is_exclusive(x_196)) { - lean::cnstr_release(x_196, 0); - lean::cnstr_release(x_196, 1); - x_199 = x_196; -} else { - lean::dec_ref(x_196); - x_199 = lean::box(0); -} -x_200 = lean::cnstr_get(x_197, 1); -lean::inc(x_200); -x_201 = lean::cnstr_get(x_197, 2); -lean::inc(x_201); -if (lean::is_exclusive(x_197)) { - lean::cnstr_release(x_197, 0); - lean::cnstr_release(x_197, 1); - lean::cnstr_release(x_197, 2); - x_202 = x_197; -} else { - lean::dec_ref(x_197); - x_202 = lean::box(0); -} -x_203 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_202)) { - x_204 = lean::alloc_cnstr(0, 3, 0); -} else { - x_204 = x_202; -} -lean::cnstr_set(x_204, 0, x_172); -lean::cnstr_set(x_204, 1, x_200); -lean::cnstr_set(x_204, 2, x_203); -x_205 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_201, x_204); -x_206 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_205); -x_207 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_203, x_206); -x_208 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_207, x_8); -x_209 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_208); -if (lean::is_scalar(x_199)) { - x_210 = lean::alloc_cnstr(0, 2, 0); -} else { - x_210 = x_199; -} -lean::cnstr_set(x_210, 0, x_209); -lean::cnstr_set(x_210, 1, x_198); -return x_210; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; -lean::dec(x_172); -x_211 = lean::cnstr_get(x_196, 1); -lean::inc(x_211); -if (lean::is_exclusive(x_196)) { - lean::cnstr_release(x_196, 0); - lean::cnstr_release(x_196, 1); - x_212 = x_196; -} else { - lean::dec_ref(x_196); - x_212 = lean::box(0); -} -x_213 = lean::cnstr_get(x_197, 0); -lean::inc(x_213); -x_214 = lean::cnstr_get_scalar(x_197, sizeof(void*)*1); -if (lean::is_exclusive(x_197)) { - lean::cnstr_release(x_197, 0); - x_215 = x_197; -} else { - lean::dec_ref(x_197); - x_215 = lean::box(0); -} -if (lean::is_scalar(x_215)) { - x_216 = lean::alloc_cnstr(1, 1, 1); -} else { - x_216 = x_215; -} -lean::cnstr_set(x_216, 0, x_213); -lean::cnstr_set_scalar(x_216, sizeof(void*)*1, x_214); -x_217 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_216); -x_218 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_219 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_218, x_217); -x_220 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_219, x_8); -x_221 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_220); -if (lean::is_scalar(x_212)) { - x_222 = lean::alloc_cnstr(0, 2, 0); -} else { - x_222 = x_212; -} -lean::cnstr_set(x_222, 0, x_221); -lean::cnstr_set(x_222, 1, x_211); -return x_222; -} -} -else -{ -obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; -lean::dec(x_192); -lean::dec(x_9); -lean::dec(x_6); -lean::dec(x_3); -x_223 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_175)) { - x_224 = lean::alloc_cnstr(0, 3, 0); -} else { - x_224 = x_175; -} -lean::cnstr_set(x_224, 0, x_172); -lean::cnstr_set(x_224, 1, x_173); -lean::cnstr_set(x_224, 2, x_223); -x_225 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_224); -x_226 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_227 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_226, x_225); -x_228 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_227, x_8); -x_229 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_228); -x_230 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_230, 0, x_229); -lean::cnstr_set(x_230, 1, x_171); -return x_230; -} -} -else -{ -obj* x_231; -lean::dec(x_175); -lean::dec(x_172); -lean::dec(x_1); -x_231 = lean::box(0); -x_176 = x_231; -goto block_190; -} -block_190: -{ -obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; -lean::dec(x_176); -x_177 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_177, 0, x_6); -x_178 = lean::box(0); -x_179 = l_String_splitAux___main___closed__1; -x_180 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_179, x_3, x_177, x_178, x_9, x_173, x_171); -lean::dec(x_9); -lean::dec(x_177); -x_181 = lean::cnstr_get(x_180, 0); -lean::inc(x_181); -x_182 = lean::cnstr_get(x_180, 1); -lean::inc(x_182); -if (lean::is_exclusive(x_180)) { - lean::cnstr_release(x_180, 0); - lean::cnstr_release(x_180, 1); - x_183 = x_180; -} else { - lean::dec_ref(x_180); - x_183 = lean::box(0); -} -x_184 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_181); -x_185 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_186 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_185, x_184); -x_187 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_186, x_8); -x_188 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_187); -if (lean::is_scalar(x_183)) { - x_189 = lean::alloc_cnstr(0, 2, 0); -} else { - x_189 = x_183; -} -lean::cnstr_set(x_189, 0, x_188); -lean::cnstr_set(x_189, 1, x_182); -return x_189; -} -} -} -else -{ -uint8 x_232; -lean::dec(x_9); -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_1); -x_232 = !lean::is_exclusive(x_10); -if (x_232 == 0) -{ -obj* x_233; uint8 x_234; -x_233 = lean::cnstr_get(x_10, 0); -lean::dec(x_233); -x_234 = !lean::is_exclusive(x_11); -if (x_234 == 0) -{ -obj* x_235; obj* x_236; obj* x_237; obj* x_238; -x_235 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_236 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_235, x_11); -x_237 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_236, x_8); -x_238 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_237); -lean::cnstr_set(x_10, 0, x_238); -return x_10; -} -else -{ -obj* x_239; uint8 x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; -x_239 = lean::cnstr_get(x_11, 0); -x_240 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_239); -lean::dec(x_11); -x_241 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_241, 0, x_239); -lean::cnstr_set_scalar(x_241, sizeof(void*)*1, x_240); -x_242 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_243 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_242, x_241); -x_244 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_243, x_8); -x_245 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_244); -lean::cnstr_set(x_10, 0, x_245); -return x_10; -} -} -else -{ -obj* x_246; obj* x_247; uint8 x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; -x_246 = lean::cnstr_get(x_10, 1); -lean::inc(x_246); -lean::dec(x_10); -x_247 = lean::cnstr_get(x_11, 0); -lean::inc(x_247); -x_248 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_249 = x_11; -} else { - lean::dec_ref(x_11); - x_249 = lean::box(0); -} -if (lean::is_scalar(x_249)) { - x_250 = lean::alloc_cnstr(1, 1, 1); -} else { - x_250 = x_249; -} -lean::cnstr_set(x_250, 0, x_247); -lean::cnstr_set_scalar(x_250, sizeof(void*)*1, x_248); -x_251 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_252 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_251, x_250); -x_253 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_252, x_8); -x_254 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_253); -x_255 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_255, 0, x_254); -lean::cnstr_set(x_255, 1, x_246); -return x_255; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -uint8 x_7; -x_7 = l_String_isEmpty(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::string_length(x_1); -x_9 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_9); -lean::inc(x_5); -x_11 = l___private_init_lean_parser_parsec_2__strAux___main(x_8, x_10, x_5); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -lean::dec(x_1); -x_12 = lean::box(0); -x_13 = l_String_splitAux___main___closed__1; -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_5); -lean::cnstr_set(x_14, 1, x_13); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_12); -x_15 = 0; -x_16 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set_scalar(x_16, sizeof(void*)*1, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_6); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_5); -lean::dec(x_2); -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_18); -lean::cnstr_set(x_20, 2, x_19); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_6); -return x_21; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_2); -lean::dec(x_1); -x_22 = l_String_splitAux___main___closed__1; -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_5); -lean::cnstr_set(x_24, 2, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_6); -return x_25; -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1; -lean::inc(x_5); -x_8 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__2(x_7, x_1, x_2, x_3, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_8, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_9, 2); -x_14 = lean::cnstr_get(x_9, 0); -lean::dec(x_14); -x_15 = 0; -x_16 = lean::box(x_15); -lean::cnstr_set(x_9, 2, x_4); -lean::cnstr_set(x_9, 0, x_16); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_9); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_17, 2); -lean::dec(x_19); -x_20 = lean::cnstr_get(x_17, 1); -lean::dec(x_20); -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_17, 2, x_21); -lean::cnstr_set(x_17, 1, x_5); -lean::cnstr_set(x_8, 0, x_17); -return x_8; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_17, 0); -lean::inc(x_22); -lean::dec(x_17); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_5); -lean::cnstr_set(x_24, 2, x_23); -lean::cnstr_set(x_8, 0, x_24); -return x_8; -} -} -else -{ -uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -lean::dec(x_17); -x_25 = 1; -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_27 = lean::box(x_25); -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_5); -lean::cnstr_set(x_28, 2, x_26); -lean::cnstr_set(x_8, 0, x_28); -return x_8; -} -} -else -{ -obj* x_29; obj* x_30; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_9, 1); -x_30 = lean::cnstr_get(x_9, 2); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_9); -x_31 = 0; -x_32 = lean::box(x_31); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_29); -lean::cnstr_set(x_33, 2, x_4); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - lean::cnstr_release(x_34, 2); - x_36 = x_34; -} else { - lean::dec_ref(x_34); - x_36 = lean::box(0); -} -x_37 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_36)) { - x_38 = lean::alloc_cnstr(0, 3, 0); -} else { - x_38 = x_36; -} -lean::cnstr_set(x_38, 0, x_35); -lean::cnstr_set(x_38, 1, x_5); -lean::cnstr_set(x_38, 2, x_37); -lean::cnstr_set(x_8, 0, x_38); -return x_8; -} -else -{ -uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_34); -x_39 = 1; -x_40 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_41 = lean::box(x_39); -x_42 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_5); -lean::cnstr_set(x_42, 2, x_40); -lean::cnstr_set(x_8, 0, x_42); -return x_8; -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; uint8 x_47; obj* x_48; obj* x_49; obj* x_50; -x_43 = lean::cnstr_get(x_8, 1); -lean::inc(x_43); -lean::dec(x_8); -x_44 = lean::cnstr_get(x_9, 1); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_9, 2); -lean::inc(x_45); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_46 = x_9; -} else { - lean::dec_ref(x_9); - x_46 = lean::box(0); -} -x_47 = 0; -x_48 = lean::box(x_47); -if (lean::is_scalar(x_46)) { - x_49 = lean::alloc_cnstr(0, 3, 0); -} else { - x_49 = x_46; -} -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_44); -lean::cnstr_set(x_49, 2, x_4); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - lean::cnstr_release(x_50, 2); - x_52 = x_50; -} else { - lean::dec_ref(x_50); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 3, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_51); -lean::cnstr_set(x_54, 1, x_5); -lean::cnstr_set(x_54, 2, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_43); -return x_55; -} -else -{ -uint8 x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_50); -x_56 = 1; -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = lean::box(x_56); -x_59 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_5); -lean::cnstr_set(x_59, 2, x_57); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_43); -return x_60; -} -} -} -else -{ -uint8 x_61; -lean::dec(x_9); -lean::dec(x_4); -x_61 = !lean::is_exclusive(x_8); -if (x_61 == 0) -{ -obj* x_62; uint8 x_63; obj* x_64; obj* x_65; obj* x_66; -x_62 = lean::cnstr_get(x_8, 0); -lean::dec(x_62); -x_63 = 1; -x_64 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_65 = lean::box(x_63); -x_66 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_5); -lean::cnstr_set(x_66, 2, x_64); -lean::cnstr_set(x_8, 0, x_66); -return x_8; -} -else -{ -obj* x_67; uint8 x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_67 = lean::cnstr_get(x_8, 1); -lean::inc(x_67); -lean::dec(x_8); -x_68 = 1; -x_69 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_70 = lean::box(x_68); -x_71 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_5); -lean::cnstr_set(x_71, 2, x_69); -x_72 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_67); -return x_72; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(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_3) == 0) -{ -obj* x_9; uint8 x_10; obj* x_11; obj* x_12; -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_2); -lean::cnstr_set(x_9, 3, x_4); -x_10 = 0; -x_11 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set_scalar(x_11, sizeof(void*)*1, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_8); -return x_12; -} -else -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -lean::dec(x_7); -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_4); -x_15 = 0; -x_16 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set_scalar(x_16, sizeof(void*)*1, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -return x_17; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed), 8, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = l_String_OldIterator_hasNext___main(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; uint8 x_10; -x_6 = lean::box(0); -x_7 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_11); -lean::cnstr_set(x_9, 0, x_13); -return x_9; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_9); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_15); -return x_18; -} -} -else -{ -uint32 x_19; uint8 x_20; -x_19 = l_String_OldIterator_curr___main(x_3); -x_20 = l_True_Decidable; -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; uint8 x_28; -x_21 = l_Char_quoteCore(x_19); -x_22 = l_Char_HasRepr___closed__1; -x_23 = lean::string_append(x_22, x_21); -lean::dec(x_21); -x_24 = lean::string_append(x_23, x_22); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; -x_27 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_24, x_26, x_25, x_25, x_1, x_2, x_3, x_4); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::cnstr_get(x_27, 0); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_29); -lean::cnstr_set(x_27, 0, x_31); -return x_27; -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = lean::cnstr_get(x_27, 0); -x_33 = lean::cnstr_get(x_27, 1); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_27); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_32); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_33); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = l_String_OldIterator_next___main(x_3); -x_38 = lean::box(0); -x_39 = lean::box_uint32(x_19); -x_40 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_37); -lean::cnstr_set(x_40, 2, x_38); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_4); -return x_41; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__7(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; -x_7 = lean::mk_nat_obj(0u); -x_8 = lean::nat_dec_eq(x_2, x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::mk_nat_obj(1u); -x_10 = lean::nat_sub(x_2, x_9); -lean::inc(x_1); -lean::inc(x_4); -lean::inc(x_3); -x_11 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; uint8 x_14; -x_13 = lean::cnstr_get(x_11, 1); -lean::inc(x_13); -lean::dec(x_11); -x_14 = !lean::is_exclusive(x_12); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_12, 1); -x_16 = lean::cnstr_get(x_12, 2); -x_17 = lean::cnstr_get(x_12, 0); -lean::dec(x_17); -lean::inc(x_15); -x_18 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__7(x_1, x_10, x_3, x_4, x_15, x_13); -lean::dec(x_10); -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -uint8 x_20; -lean::free_heap_obj(x_12); -lean::dec(x_15); -x_20 = !lean::is_exclusive(x_18); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_18, 0); -lean::dec(x_21); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_19); -lean::cnstr_set(x_18, 0, x_22); -return x_18; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; -x_23 = lean::cnstr_get(x_18, 1); -lean::inc(x_23); -lean::dec(x_18); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_19); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -return x_25; -} -} -else -{ -uint8 x_26; -x_26 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (x_26 == 0) -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_18); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_28 = lean::cnstr_get(x_18, 0); -lean::dec(x_28); -x_29 = lean::cnstr_get(x_19, 0); -lean::inc(x_29); -lean::dec(x_19); -x_30 = lean::cnstr_get(x_29, 2); -lean::inc(x_30); -lean::dec(x_29); -x_31 = l_mjoin___rarg___closed__1; -x_32 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::box(0); -lean::cnstr_set(x_12, 2, x_33); -lean::cnstr_set(x_12, 0, x_34); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_12); -lean::cnstr_set(x_18, 0, x_35); -return x_18; -} -else -{ -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; -x_36 = lean::cnstr_get(x_18, 1); -lean::inc(x_36); -lean::dec(x_18); -x_37 = lean::cnstr_get(x_19, 0); -lean::inc(x_37); -lean::dec(x_19); -x_38 = lean::cnstr_get(x_37, 2); -lean::inc(x_38); -lean::dec(x_37); -x_39 = l_mjoin___rarg___closed__1; -x_40 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_40, 0, x_38); -lean::closure_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -x_42 = lean::box(0); -lean::cnstr_set(x_12, 2, x_41); -lean::cnstr_set(x_12, 0, x_42); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_12); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_36); -return x_44; -} -} -else -{ -uint8 x_45; -lean::free_heap_obj(x_12); -lean::dec(x_15); -x_45 = !lean::is_exclusive(x_18); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_18, 0); -lean::dec(x_46); -x_47 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_19); -lean::cnstr_set(x_18, 0, x_47); -return x_18; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; -x_48 = lean::cnstr_get(x_18, 1); -lean::inc(x_48); -lean::dec(x_18); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_19); -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_48); -return x_50; -} -} -} -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_51 = lean::cnstr_get(x_12, 1); -x_52 = lean::cnstr_get(x_12, 2); -lean::inc(x_52); -lean::inc(x_51); -lean::dec(x_12); -lean::inc(x_51); -x_53 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__7(x_1, x_10, x_3, x_4, x_51, x_13); -lean::dec(x_10); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; -lean::dec(x_51); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -if (lean::is_exclusive(x_53)) { - lean::cnstr_release(x_53, 0); - lean::cnstr_release(x_53, 1); - x_56 = x_53; -} else { - lean::dec_ref(x_53); - x_56 = lean::box(0); -} -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_54); -if (lean::is_scalar(x_56)) { - x_58 = lean::alloc_cnstr(0, 2, 0); -} else { - x_58 = x_56; -} -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_55); -return x_58; -} -else -{ -uint8 x_59; -x_59 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); -if (x_59 == 0) -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_60 = lean::cnstr_get(x_53, 1); -lean::inc(x_60); -if (lean::is_exclusive(x_53)) { - lean::cnstr_release(x_53, 0); - lean::cnstr_release(x_53, 1); - x_61 = x_53; -} else { - lean::dec_ref(x_53); - x_61 = lean::box(0); -} -x_62 = lean::cnstr_get(x_54, 0); -lean::inc(x_62); -lean::dec(x_54); -x_63 = lean::cnstr_get(x_62, 2); -lean::inc(x_63); -lean::dec(x_62); -x_64 = l_mjoin___rarg___closed__1; -x_65 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_65, 0, x_63); -lean::closure_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_66, 0, x_65); -x_67 = lean::box(0); -x_68 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_51); -lean::cnstr_set(x_68, 2, x_66); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_68); -if (lean::is_scalar(x_61)) { - x_70 = lean::alloc_cnstr(0, 2, 0); -} else { - x_70 = x_61; -} -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_60); -return x_70; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; -lean::dec(x_51); -x_71 = lean::cnstr_get(x_53, 1); -lean::inc(x_71); -if (lean::is_exclusive(x_53)) { - lean::cnstr_release(x_53, 0); - lean::cnstr_release(x_53, 1); - x_72 = x_53; -} else { - lean::dec_ref(x_53); - x_72 = lean::box(0); -} -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_54); -if (lean::is_scalar(x_72)) { - x_74 = lean::alloc_cnstr(0, 2, 0); -} else { - x_74 = x_72; -} -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_71); -return x_74; -} -} -} -} -else -{ -uint8 x_75; -lean::dec(x_10); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_75 = !lean::is_exclusive(x_11); -if (x_75 == 0) -{ -obj* x_76; uint8 x_77; -x_76 = lean::cnstr_get(x_11, 0); -lean::dec(x_76); -x_77 = !lean::is_exclusive(x_12); -if (x_77 == 0) -{ -return x_11; -} -else -{ -obj* x_78; uint8 x_79; obj* x_80; -x_78 = lean::cnstr_get(x_12, 0); -x_79 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -lean::inc(x_78); -lean::dec(x_12); -x_80 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_80, 0, x_78); -lean::cnstr_set_scalar(x_80, sizeof(void*)*1, x_79); -lean::cnstr_set(x_11, 0, x_80); -return x_11; -} -} -else -{ -obj* x_81; obj* x_82; uint8 x_83; obj* x_84; obj* x_85; obj* x_86; -x_81 = lean::cnstr_get(x_11, 1); -lean::inc(x_81); -lean::dec(x_11); -x_82 = lean::cnstr_get(x_12, 0); -lean::inc(x_82); -x_83 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -if (lean::is_exclusive(x_12)) { - lean::cnstr_release(x_12, 0); - x_84 = x_12; -} else { - lean::dec_ref(x_12); - x_84 = lean::box(0); -} -if (lean::is_scalar(x_84)) { - x_85 = lean::alloc_cnstr(1, 1, 1); -} else { - x_85 = x_84; -} -lean::cnstr_set(x_85, 0, x_82); -lean::cnstr_set_scalar(x_85, sizeof(void*)*1, x_83); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_81); -return x_86; -} -} -} -else -{ -obj* x_87; obj* x_88; -x_87 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -if (lean::obj_tag(x_88) == 0) -{ -uint8 x_89; -x_89 = !lean::is_exclusive(x_87); -if (x_89 == 0) -{ -obj* x_90; uint8 x_91; -x_90 = lean::cnstr_get(x_87, 0); -lean::dec(x_90); -x_91 = !lean::is_exclusive(x_88); -if (x_91 == 0) -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_92 = lean::cnstr_get(x_88, 2); -x_93 = lean::cnstr_get(x_88, 0); -lean::dec(x_93); -x_94 = lean::box(0); -x_95 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_88, 2, x_95); -lean::cnstr_set(x_88, 0, x_94); -x_96 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_88); -lean::cnstr_set(x_87, 0, x_96); -return x_87; -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_97 = lean::cnstr_get(x_88, 1); -x_98 = lean::cnstr_get(x_88, 2); -lean::inc(x_98); -lean::inc(x_97); -lean::dec(x_88); -x_99 = lean::box(0); -x_100 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_101 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_101, 0, x_99); -lean::cnstr_set(x_101, 1, x_97); -lean::cnstr_set(x_101, 2, x_100); -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_101); -lean::cnstr_set(x_87, 0, x_102); -return x_87; -} -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_103 = lean::cnstr_get(x_87, 1); -lean::inc(x_103); -lean::dec(x_87); -x_104 = lean::cnstr_get(x_88, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_88, 2); -lean::inc(x_105); -if (lean::is_exclusive(x_88)) { - lean::cnstr_release(x_88, 0); - lean::cnstr_release(x_88, 1); - lean::cnstr_release(x_88, 2); - x_106 = x_88; -} else { - lean::dec_ref(x_88); - x_106 = lean::box(0); -} -x_107 = lean::box(0); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_106)) { - x_109 = lean::alloc_cnstr(0, 3, 0); -} else { - x_109 = x_106; -} -lean::cnstr_set(x_109, 0, x_107); -lean::cnstr_set(x_109, 1, x_104); -lean::cnstr_set(x_109, 2, x_108); -x_110 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_105, x_109); -x_111 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_103); -return x_111; -} -} -else -{ -uint8 x_112; -x_112 = !lean::is_exclusive(x_87); -if (x_112 == 0) -{ -obj* x_113; uint8 x_114; -x_113 = lean::cnstr_get(x_87, 0); -lean::dec(x_113); -x_114 = !lean::is_exclusive(x_88); -if (x_114 == 0) -{ -return x_87; -} -else -{ -obj* x_115; uint8 x_116; obj* x_117; -x_115 = lean::cnstr_get(x_88, 0); -x_116 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -lean::inc(x_115); -lean::dec(x_88); -x_117 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_117, 0, x_115); -lean::cnstr_set_scalar(x_117, sizeof(void*)*1, x_116); -lean::cnstr_set(x_87, 0, x_117); -return x_87; -} -} -else -{ -obj* x_118; obj* x_119; uint8 x_120; obj* x_121; obj* x_122; obj* x_123; -x_118 = lean::cnstr_get(x_87, 1); -lean::inc(x_118); -lean::dec(x_87); -x_119 = lean::cnstr_get(x_88, 0); -lean::inc(x_119); -x_120 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -if (lean::is_exclusive(x_88)) { - lean::cnstr_release(x_88, 0); - x_121 = x_88; -} else { - lean::dec_ref(x_88); - x_121 = lean::box(0); -} -if (lean::is_scalar(x_121)) { - x_122 = lean::alloc_cnstr(1, 1, 1); -} else { - x_122 = x_121; -} -lean::cnstr_set(x_122, 0, x_119); -lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_120); -x_123 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_118); -return x_123; -} -} -} -} -} -obj* l_Lean_Parser_MonadParsec_many_x27___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__6(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = l_String_OldIterator_remaining___main(x_4); -lean::inc(x_4); -x_7 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__7(x_1, x_6, x_2, x_3, x_4, x_5); -lean::dec(x_6); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = l_Lean_Parser_finishCommentBlock___closed__2; -x_11 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_10, x_9); -if (lean::obj_tag(x_11) == 0) -{ -lean::dec(x_4); -lean::cnstr_set(x_7, 0, x_11); -return x_7; -} -else -{ -uint8 x_12; -x_12 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -lean::dec(x_11); -x_14 = lean::cnstr_get(x_13, 2); -lean::inc(x_14); -lean::dec(x_13); -x_15 = l_mjoin___rarg___closed__1; -x_16 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_4); -lean::cnstr_set(x_19, 2, x_17); -lean::cnstr_set(x_7, 0, x_19); -return x_7; -} -else -{ -lean::dec(x_4); -lean::cnstr_set(x_7, 0, x_11); -return x_7; -} -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_7, 0); -x_21 = lean::cnstr_get(x_7, 1); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_7); -x_22 = l_Lean_Parser_finishCommentBlock___closed__2; -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_20); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -lean::dec(x_4); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_21); -return x_24; -} -else -{ -uint8 x_25; -x_25 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -if (x_25 == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -lean::dec(x_23); -x_27 = lean::cnstr_get(x_26, 2); -lean::inc(x_27); -lean::dec(x_26); -x_28 = l_mjoin___rarg___closed__1; -x_29 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::box(0); -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_4); -lean::cnstr_set(x_32, 2, x_30); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_21); -return x_33; -} -else -{ -obj* x_34; -lean::dec(x_4); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_23); -lean::cnstr_set(x_34, 1, x_21); -return x_34; -} -} -} -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::apply_3(x_1, x_3, x_4, x_5); -return x_6; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_ReaderT_bind___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__9___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_4); -lean::inc(x_3); -x_7 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; uint8 x_14; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 2); -lean::inc(x_12); -lean::dec(x_8); -x_13 = lean::apply_5(x_2, x_10, x_3, x_4, x_11, x_9); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_15); -lean::cnstr_set(x_13, 0, x_16); -return x_13; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_13, 0); -x_18 = lean::cnstr_get(x_13, 1); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_13); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_17); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -return x_20; -} -} -else -{ -uint8 x_21; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_21 = !lean::is_exclusive(x_7); -if (x_21 == 0) -{ -obj* x_22; uint8 x_23; -x_22 = lean::cnstr_get(x_7, 0); -lean::dec(x_22); -x_23 = !lean::is_exclusive(x_8); -if (x_23 == 0) -{ -return x_7; -} -else -{ -obj* x_24; uint8 x_25; obj* x_26; -x_24 = lean::cnstr_get(x_8, 0); -x_25 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_24); -lean::dec(x_8); -x_26 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_25); -lean::cnstr_set(x_7, 0, x_26); -return x_7; -} -} -else -{ -obj* x_27; obj* x_28; uint8 x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::cnstr_get(x_7, 1); -lean::inc(x_27); -lean::dec(x_7); -x_28 = lean::cnstr_get(x_8, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_30 = x_8; -} else { - lean::dec_ref(x_8); - x_30 = lean::box(0); -} -if (lean::is_scalar(x_30)) { - x_31 = lean::alloc_cnstr(1, 1, 1); -} else { - x_31 = x_30; -} -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set_scalar(x_31, sizeof(void*)*1, x_29); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_27); -return x_32; -} -} -} -} -obj* l_ReaderT_bind___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__9(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__9___rarg), 6, 0); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -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::dec(x_1); -x_4 = lean::box(0); -x_5 = lean::mk_string("-/"); -x_6 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_2); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_4); -lean::dec(x_6); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_8); -lean::dec(x_8); -lean::dec(x_3); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -return x_10; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed(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; -x_8 = l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_2); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__3(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(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_9; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_1, x_2, x_3, x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__7___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__7(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_2); -return x_7; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1; -lean::inc(x_5); -x_8 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__2(x_7, x_1, x_2, x_3, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_8, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_9, 2); -x_14 = lean::cnstr_get(x_9, 0); -lean::dec(x_14); -x_15 = 0; -x_16 = lean::box(x_15); -lean::cnstr_set(x_9, 2, x_4); -lean::cnstr_set(x_9, 0, x_16); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_9); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_17, 2); -lean::dec(x_19); -x_20 = lean::cnstr_get(x_17, 1); -lean::dec(x_20); -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_17, 2, x_21); -lean::cnstr_set(x_17, 1, x_5); -lean::cnstr_set(x_8, 0, x_17); -return x_8; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_17, 0); -lean::inc(x_22); -lean::dec(x_17); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_5); -lean::cnstr_set(x_24, 2, x_23); -lean::cnstr_set(x_8, 0, x_24); -return x_8; -} -} -else -{ -uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -lean::dec(x_17); -x_25 = 1; -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_27 = lean::box(x_25); -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_5); -lean::cnstr_set(x_28, 2, x_26); -lean::cnstr_set(x_8, 0, x_28); -return x_8; -} -} -else -{ -obj* x_29; obj* x_30; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_9, 1); -x_30 = lean::cnstr_get(x_9, 2); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_9); -x_31 = 0; -x_32 = lean::box(x_31); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_29); -lean::cnstr_set(x_33, 2, x_4); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - lean::cnstr_release(x_34, 2); - x_36 = x_34; -} else { - lean::dec_ref(x_34); - x_36 = lean::box(0); -} -x_37 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_36)) { - x_38 = lean::alloc_cnstr(0, 3, 0); -} else { - x_38 = x_36; -} -lean::cnstr_set(x_38, 0, x_35); -lean::cnstr_set(x_38, 1, x_5); -lean::cnstr_set(x_38, 2, x_37); -lean::cnstr_set(x_8, 0, x_38); -return x_8; -} -else -{ -uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_34); -x_39 = 1; -x_40 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_41 = lean::box(x_39); -x_42 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_5); -lean::cnstr_set(x_42, 2, x_40); -lean::cnstr_set(x_8, 0, x_42); -return x_8; -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; uint8 x_47; obj* x_48; obj* x_49; obj* x_50; -x_43 = lean::cnstr_get(x_8, 1); -lean::inc(x_43); -lean::dec(x_8); -x_44 = lean::cnstr_get(x_9, 1); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_9, 2); -lean::inc(x_45); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_46 = x_9; -} else { - lean::dec_ref(x_9); - x_46 = lean::box(0); -} -x_47 = 0; -x_48 = lean::box(x_47); -if (lean::is_scalar(x_46)) { - x_49 = lean::alloc_cnstr(0, 3, 0); -} else { - x_49 = x_46; -} -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_44); -lean::cnstr_set(x_49, 2, x_4); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - lean::cnstr_release(x_50, 2); - x_52 = x_50; -} else { - lean::dec_ref(x_50); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 3, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_51); -lean::cnstr_set(x_54, 1, x_5); -lean::cnstr_set(x_54, 2, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_43); -return x_55; -} -else -{ -uint8 x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_50); -x_56 = 1; -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = lean::box(x_56); -x_59 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_5); -lean::cnstr_set(x_59, 2, x_57); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_43); -return x_60; -} -} -} -else -{ -uint8 x_61; -lean::dec(x_9); -lean::dec(x_4); -x_61 = !lean::is_exclusive(x_8); -if (x_61 == 0) -{ -obj* x_62; uint8 x_63; obj* x_64; obj* x_65; obj* x_66; -x_62 = lean::cnstr_get(x_8, 0); -lean::dec(x_62); -x_63 = 1; -x_64 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_65 = lean::box(x_63); -x_66 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_5); -lean::cnstr_set(x_66, 2, x_64); -lean::cnstr_set(x_8, 0, x_66); -return x_8; -} -else -{ -obj* x_67; uint8 x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_67 = lean::cnstr_get(x_8, 1); -lean::inc(x_67); -lean::dec(x_8); -x_68 = 1; -x_69 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_70 = lean::box(x_68); -x_71 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_5); -lean::cnstr_set(x_71, 2, x_69); -x_72 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_67); -return x_72; -} -} -} -} -obj* l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__1(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; -x_6 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_4); -x_7 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___spec__1(x_1, x_2, x_3, x_6, x_4, x_5); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; uint8 x_10; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::unbox(x_9); -lean::dec(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -x_11 = lean::cnstr_get(x_7, 1); -lean::inc(x_11); -lean::dec(x_7); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_8, 2); -lean::inc(x_13); -lean::dec(x_8); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_4); -x_15 = lean::box(0); -x_16 = l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2; -x_17 = l_mjoin___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_16, x_17, x_14, x_15, x_2, x_3, x_12, x_11); -lean::dec(x_14); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = lean::cnstr_get(x_18, 1); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_20); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; uint8 x_27; -lean::free_heap_obj(x_18); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_23, 2); -lean::inc(x_25); -lean::dec(x_23); -x_26 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_24, x_21); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_26, 0); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_28); -lean::cnstr_set(x_26, 0, x_29); -return x_26; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = lean::cnstr_get(x_26, 0); -x_31 = lean::cnstr_get(x_26, 1); -lean::inc(x_31); -lean::inc(x_30); -lean::dec(x_26); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_30); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_31); -return x_33; -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_23); -if (x_34 == 0) -{ -lean::cnstr_set(x_18, 0, x_23); -return x_18; -} -else -{ -obj* x_35; uint8 x_36; obj* x_37; -x_35 = lean::cnstr_get(x_23, 0); -x_36 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -lean::inc(x_35); -lean::dec(x_23); -x_37 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_36); -lean::cnstr_set(x_18, 0, x_37); -return x_18; -} -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = lean::cnstr_get(x_18, 0); -x_39 = lean::cnstr_get(x_18, 1); -lean::inc(x_39); -lean::inc(x_38); -lean::dec(x_18); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_38); -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_40); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 2); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_42, x_39); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_44, 1); -lean::inc(x_46); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - lean::cnstr_release(x_44, 1); - x_47 = x_44; -} else { - lean::dec_ref(x_44); - x_47 = lean::box(0); -} -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_45); -if (lean::is_scalar(x_47)) { - x_49 = lean::alloc_cnstr(0, 2, 0); -} else { - x_49 = x_47; -} -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_46); -return x_49; -} -else -{ -obj* x_50; uint8 x_51; obj* x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_41, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get_scalar(x_41, sizeof(void*)*1); -if (lean::is_exclusive(x_41)) { - lean::cnstr_release(x_41, 0); - x_52 = x_41; -} else { - lean::dec_ref(x_41); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(1, 1, 1); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_50); -lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_51); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_39); -return x_54; -} -} -} -else -{ -uint8 x_55; -lean::dec(x_4); -x_55 = !lean::is_exclusive(x_7); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; uint8 x_58; -x_56 = lean::cnstr_get(x_7, 1); -x_57 = lean::cnstr_get(x_7, 0); -lean::dec(x_57); -x_58 = !lean::is_exclusive(x_8); -if (x_58 == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_59 = lean::cnstr_get(x_8, 2); -x_60 = lean::cnstr_get(x_8, 0); -lean::dec(x_60); -x_61 = lean::box(0); -lean::cnstr_set(x_8, 2, x_6); -lean::cnstr_set(x_8, 0, x_61); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_8); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_62); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; obj* x_65; obj* x_66; uint8 x_67; -lean::free_heap_obj(x_7); -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_63, 2); -lean::inc(x_65); -lean::dec(x_63); -x_66 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_64, x_56); -x_67 = !lean::is_exclusive(x_66); -if (x_67 == 0) -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_66, 0); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_68); -lean::cnstr_set(x_66, 0, x_69); -return x_66; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_70 = lean::cnstr_get(x_66, 0); -x_71 = lean::cnstr_get(x_66, 1); -lean::inc(x_71); -lean::inc(x_70); -lean::dec(x_66); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_70); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_71); -return x_73; -} -} -else -{ -uint8 x_74; -x_74 = !lean::is_exclusive(x_63); -if (x_74 == 0) -{ -lean::cnstr_set(x_7, 0, x_63); -return x_7; -} -else -{ -obj* x_75; uint8 x_76; obj* x_77; -x_75 = lean::cnstr_get(x_63, 0); -x_76 = lean::cnstr_get_scalar(x_63, sizeof(void*)*1); -lean::inc(x_75); -lean::dec(x_63); -x_77 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_77, 0, x_75); -lean::cnstr_set_scalar(x_77, sizeof(void*)*1, x_76); -lean::cnstr_set(x_7, 0, x_77); -return x_7; -} -} -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_78 = lean::cnstr_get(x_8, 1); -x_79 = lean::cnstr_get(x_8, 2); -lean::inc(x_79); -lean::inc(x_78); -lean::dec(x_8); -x_80 = lean::box(0); -x_81 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_78); -lean::cnstr_set(x_81, 2, x_6); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_79, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_82); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -lean::free_heap_obj(x_7); -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_83, 2); -lean::inc(x_85); -lean::dec(x_83); -x_86 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_84, x_56); -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_86, 1); -lean::inc(x_88); -if (lean::is_exclusive(x_86)) { - lean::cnstr_release(x_86, 0); - lean::cnstr_release(x_86, 1); - x_89 = x_86; -} else { - lean::dec_ref(x_86); - x_89 = lean::box(0); -} -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_85, x_87); -if (lean::is_scalar(x_89)) { - x_91 = lean::alloc_cnstr(0, 2, 0); -} else { - x_91 = x_89; -} -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_88); -return x_91; -} -else -{ -obj* x_92; uint8 x_93; obj* x_94; obj* x_95; -x_92 = lean::cnstr_get(x_83, 0); -lean::inc(x_92); -x_93 = lean::cnstr_get_scalar(x_83, sizeof(void*)*1); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - x_94 = x_83; -} else { - lean::dec_ref(x_83); - x_94 = lean::box(0); -} -if (lean::is_scalar(x_94)) { - x_95 = lean::alloc_cnstr(1, 1, 1); -} else { - x_95 = x_94; -} -lean::cnstr_set(x_95, 0, x_92); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_93); -lean::cnstr_set(x_7, 0, x_95); -return x_7; -} -} -} -else -{ -obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_96 = lean::cnstr_get(x_7, 1); -lean::inc(x_96); -lean::dec(x_7); -x_97 = lean::cnstr_get(x_8, 1); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_8, 2); -lean::inc(x_98); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_99 = x_8; -} else { - lean::dec_ref(x_8); - x_99 = lean::box(0); -} -x_100 = lean::box(0); -if (lean::is_scalar(x_99)) { - x_101 = lean::alloc_cnstr(0, 3, 0); -} else { - x_101 = x_99; -} -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_97); -lean::cnstr_set(x_101, 2, x_6); -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_101); -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_102); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_104 = lean::cnstr_get(x_103, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_103, 2); -lean::inc(x_105); -lean::dec(x_103); -x_106 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_104, x_96); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -x_108 = lean::cnstr_get(x_106, 1); -lean::inc(x_108); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - x_109 = x_106; -} else { - lean::dec_ref(x_106); - x_109 = lean::box(0); -} -x_110 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_105, x_107); -if (lean::is_scalar(x_109)) { - x_111 = lean::alloc_cnstr(0, 2, 0); -} else { - x_111 = x_109; -} -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_108); -return x_111; -} -else -{ -obj* x_112; uint8 x_113; obj* x_114; obj* x_115; obj* x_116; -x_112 = lean::cnstr_get(x_103, 0); -lean::inc(x_112); -x_113 = lean::cnstr_get_scalar(x_103, sizeof(void*)*1); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_114 = x_103; -} else { - lean::dec_ref(x_103); - x_114 = lean::box(0); -} -if (lean::is_scalar(x_114)) { - x_115 = lean::alloc_cnstr(1, 1, 1); -} else { - x_115 = x_114; -} -lean::cnstr_set(x_115, 0, x_112); -lean::cnstr_set_scalar(x_115, sizeof(void*)*1, x_113); -x_116 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_116, 0, x_115); -lean::cnstr_set(x_116, 1, x_96); -return x_116; -} -} -} -} -else -{ -uint8 x_117; -lean::dec(x_4); -x_117 = !lean::is_exclusive(x_7); -if (x_117 == 0) -{ -obj* x_118; obj* x_119; uint8 x_120; -x_118 = lean::cnstr_get(x_7, 1); -x_119 = lean::cnstr_get(x_7, 0); -lean::dec(x_119); -x_120 = !lean::is_exclusive(x_8); -if (x_120 == 0) -{ -obj* x_121; -x_121 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_8); -if (lean::obj_tag(x_121) == 0) -{ -obj* x_122; obj* x_123; obj* x_124; uint8 x_125; -lean::free_heap_obj(x_7); -x_122 = lean::cnstr_get(x_121, 1); -lean::inc(x_122); -x_123 = lean::cnstr_get(x_121, 2); -lean::inc(x_123); -lean::dec(x_121); -x_124 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_122, x_118); -x_125 = !lean::is_exclusive(x_124); -if (x_125 == 0) -{ -obj* x_126; obj* x_127; -x_126 = lean::cnstr_get(x_124, 0); -x_127 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_123, x_126); -lean::cnstr_set(x_124, 0, x_127); -return x_124; -} -else -{ -obj* x_128; obj* x_129; obj* x_130; obj* x_131; -x_128 = lean::cnstr_get(x_124, 0); -x_129 = lean::cnstr_get(x_124, 1); -lean::inc(x_129); -lean::inc(x_128); -lean::dec(x_124); -x_130 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_123, x_128); -x_131 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_129); -return x_131; -} -} -else -{ -uint8 x_132; -x_132 = !lean::is_exclusive(x_121); -if (x_132 == 0) -{ -lean::cnstr_set(x_7, 0, x_121); -return x_7; -} -else -{ -obj* x_133; uint8 x_134; obj* x_135; -x_133 = lean::cnstr_get(x_121, 0); -x_134 = lean::cnstr_get_scalar(x_121, sizeof(void*)*1); -lean::inc(x_133); -lean::dec(x_121); -x_135 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_135, 0, x_133); -lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_134); -lean::cnstr_set(x_7, 0, x_135); -return x_7; -} -} -} -else -{ -obj* x_136; uint8 x_137; obj* x_138; obj* x_139; -x_136 = lean::cnstr_get(x_8, 0); -x_137 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_136); -lean::dec(x_8); -x_138 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_138, 0, x_136); -lean::cnstr_set_scalar(x_138, sizeof(void*)*1, x_137); -x_139 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_138); -if (lean::obj_tag(x_139) == 0) -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; -lean::free_heap_obj(x_7); -x_140 = lean::cnstr_get(x_139, 1); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_139, 2); -lean::inc(x_141); -lean::dec(x_139); -x_142 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_140, x_118); -x_143 = lean::cnstr_get(x_142, 0); -lean::inc(x_143); -x_144 = lean::cnstr_get(x_142, 1); -lean::inc(x_144); -if (lean::is_exclusive(x_142)) { - lean::cnstr_release(x_142, 0); - lean::cnstr_release(x_142, 1); - x_145 = x_142; -} else { - lean::dec_ref(x_142); - x_145 = lean::box(0); -} -x_146 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_141, x_143); -if (lean::is_scalar(x_145)) { - x_147 = lean::alloc_cnstr(0, 2, 0); -} else { - x_147 = x_145; -} -lean::cnstr_set(x_147, 0, x_146); -lean::cnstr_set(x_147, 1, x_144); -return x_147; -} -else -{ -obj* x_148; uint8 x_149; obj* x_150; obj* x_151; -x_148 = lean::cnstr_get(x_139, 0); -lean::inc(x_148); -x_149 = lean::cnstr_get_scalar(x_139, sizeof(void*)*1); -if (lean::is_exclusive(x_139)) { - lean::cnstr_release(x_139, 0); - x_150 = x_139; -} else { - lean::dec_ref(x_139); - x_150 = lean::box(0); -} -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 1, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_148); -lean::cnstr_set_scalar(x_151, sizeof(void*)*1, x_149); -lean::cnstr_set(x_7, 0, x_151); -return x_7; -} -} -} -else -{ -obj* x_152; obj* x_153; uint8 x_154; obj* x_155; obj* x_156; obj* x_157; -x_152 = lean::cnstr_get(x_7, 1); -lean::inc(x_152); -lean::dec(x_7); -x_153 = lean::cnstr_get(x_8, 0); -lean::inc(x_153); -x_154 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_155 = x_8; -} else { - lean::dec_ref(x_8); - x_155 = lean::box(0); -} -if (lean::is_scalar(x_155)) { - x_156 = lean::alloc_cnstr(1, 1, 1); -} else { - x_156 = x_155; -} -lean::cnstr_set(x_156, 0, x_153); -lean::cnstr_set_scalar(x_156, sizeof(void*)*1, x_154); -x_157 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_156); -if (lean::obj_tag(x_157) == 0) -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; -x_158 = lean::cnstr_get(x_157, 1); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_157, 2); -lean::inc(x_159); -lean::dec(x_157); -x_160 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_158, x_152); -x_161 = lean::cnstr_get(x_160, 0); -lean::inc(x_161); -x_162 = lean::cnstr_get(x_160, 1); -lean::inc(x_162); -if (lean::is_exclusive(x_160)) { - lean::cnstr_release(x_160, 0); - lean::cnstr_release(x_160, 1); - x_163 = x_160; -} else { - lean::dec_ref(x_160); - x_163 = lean::box(0); -} -x_164 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_159, x_161); -if (lean::is_scalar(x_163)) { - x_165 = lean::alloc_cnstr(0, 2, 0); -} else { - x_165 = x_163; -} -lean::cnstr_set(x_165, 0, x_164); -lean::cnstr_set(x_165, 1, x_162); -return x_165; -} -else -{ -obj* x_166; uint8 x_167; obj* x_168; obj* x_169; obj* x_170; -x_166 = lean::cnstr_get(x_157, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get_scalar(x_157, sizeof(void*)*1); -if (lean::is_exclusive(x_157)) { - lean::cnstr_release(x_157, 0); - x_168 = x_157; -} else { - lean::dec_ref(x_157); - x_168 = lean::box(0); -} -if (lean::is_scalar(x_168)) { - x_169 = lean::alloc_cnstr(1, 1, 1); -} else { - x_169 = x_168; -} -lean::cnstr_set(x_169, 0, x_166); -lean::cnstr_set_scalar(x_169, sizeof(void*)*1, x_167); -x_170 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_170, 0, x_169); -lean::cnstr_set(x_170, 1, x_152); -return x_170; -} -} -} -} -} -obj* l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_MonadParsec_many_x27___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__6(x_1, x_3, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::cnstr_get(x_8, 1); -x_13 = lean::cnstr_get(x_8, 2); -x_14 = lean::cnstr_get(x_8, 0); -lean::dec(x_14); -lean::inc(x_12); -x_15 = l_Lean_Parser_mkRawRes(x_2, x_12); -x_16 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_8, 2, x_16); -lean::cnstr_set(x_8, 0, x_15); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_8); -lean::cnstr_set(x_7, 0, x_17); -return x_7; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::cnstr_get(x_8, 1); -x_19 = lean::cnstr_get(x_8, 2); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_8); -lean::inc(x_18); -x_20 = l_Lean_Parser_mkRawRes(x_2, x_18); -x_21 = l_Lean_Parser_finishCommentBlock___closed__2; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_18); -lean::cnstr_set(x_22, 2, x_21); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_22); -lean::cnstr_set(x_7, 0, x_23); -return x_7; -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_24 = lean::cnstr_get(x_7, 1); -lean::inc(x_24); -lean::dec(x_7); -x_25 = lean::cnstr_get(x_8, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_8, 2); -lean::inc(x_26); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_27 = x_8; -} else { - lean::dec_ref(x_8); - x_27 = lean::box(0); -} -lean::inc(x_25); -x_28 = l_Lean_Parser_mkRawRes(x_2, x_25); -x_29 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_27)) { - x_30 = lean::alloc_cnstr(0, 3, 0); -} else { - x_30 = x_27; -} -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_25); -lean::cnstr_set(x_30, 2, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_24); -return x_32; -} -} -else -{ -uint8 x_33; -lean::dec(x_2); -x_33 = !lean::is_exclusive(x_7); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::cnstr_get(x_7, 0); -lean::dec(x_34); -x_35 = !lean::is_exclusive(x_8); -if (x_35 == 0) -{ -return x_7; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; -x_36 = lean::cnstr_get(x_8, 0); -x_37 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_8); -x_38 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_37); -lean::cnstr_set(x_7, 0, x_38); -return x_7; -} -} -else -{ -obj* x_39; obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_44; -x_39 = lean::cnstr_get(x_7, 1); -lean::inc(x_39); -lean::dec(x_7); -x_40 = lean::cnstr_get(x_8, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_42 = x_8; -} else { - lean::dec_ref(x_8); - x_42 = lean::box(0); -} -if (lean::is_scalar(x_42)) { - x_43 = lean::alloc_cnstr(1, 1, 1); -} else { - x_43 = x_42; -} -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_41); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_39); -return x_44; -} -} -} -} -obj* _init_l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("/--"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::mk_string("-/"); -lean::inc(x_10); -x_11 = l_String_quote(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__1___boxed), 5, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_15 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg___boxed), 5, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_17, 0, x_13); -x_18 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__9___rarg), 6, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_17); -x_19 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_8); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_9); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_command_docComment; -x_27 = l_Lean_Parser_command_docComment_HasView; -x_28 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_26, x_25, x_27); -lean::dec(x_25); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_28; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1; -lean::inc(x_5); -x_8 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__2(x_7, x_1, x_2, x_3, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_8, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_9, 2); -x_14 = lean::cnstr_get(x_9, 0); -lean::dec(x_14); -x_15 = 0; -x_16 = lean::box(x_15); -lean::cnstr_set(x_9, 2, x_4); -lean::cnstr_set(x_9, 0, x_16); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_9); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_17, 2); -lean::dec(x_19); -x_20 = lean::cnstr_get(x_17, 1); -lean::dec(x_20); -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_17, 2, x_21); -lean::cnstr_set(x_17, 1, x_5); -lean::cnstr_set(x_8, 0, x_17); -return x_8; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_17, 0); -lean::inc(x_22); -lean::dec(x_17); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_5); -lean::cnstr_set(x_24, 2, x_23); -lean::cnstr_set(x_8, 0, x_24); -return x_8; -} -} -else -{ -uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -lean::dec(x_17); -x_25 = 1; -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_27 = lean::box(x_25); -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_5); -lean::cnstr_set(x_28, 2, x_26); -lean::cnstr_set(x_8, 0, x_28); -return x_8; -} -} -else -{ -obj* x_29; obj* x_30; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_9, 1); -x_30 = lean::cnstr_get(x_9, 2); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_9); -x_31 = 0; -x_32 = lean::box(x_31); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_29); -lean::cnstr_set(x_33, 2, x_4); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - lean::cnstr_release(x_34, 2); - x_36 = x_34; -} else { - lean::dec_ref(x_34); - x_36 = lean::box(0); -} -x_37 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_36)) { - x_38 = lean::alloc_cnstr(0, 3, 0); -} else { - x_38 = x_36; -} -lean::cnstr_set(x_38, 0, x_35); -lean::cnstr_set(x_38, 1, x_5); -lean::cnstr_set(x_38, 2, x_37); -lean::cnstr_set(x_8, 0, x_38); -return x_8; -} -else -{ -uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_34); -x_39 = 1; -x_40 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_41 = lean::box(x_39); -x_42 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_5); -lean::cnstr_set(x_42, 2, x_40); -lean::cnstr_set(x_8, 0, x_42); -return x_8; -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; uint8 x_47; obj* x_48; obj* x_49; obj* x_50; -x_43 = lean::cnstr_get(x_8, 1); -lean::inc(x_43); -lean::dec(x_8); -x_44 = lean::cnstr_get(x_9, 1); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_9, 2); -lean::inc(x_45); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_46 = x_9; -} else { - lean::dec_ref(x_9); - x_46 = lean::box(0); -} -x_47 = 0; -x_48 = lean::box(x_47); -if (lean::is_scalar(x_46)) { - x_49 = lean::alloc_cnstr(0, 3, 0); -} else { - x_49 = x_46; -} -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_44); -lean::cnstr_set(x_49, 2, x_4); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - lean::cnstr_release(x_50, 2); - x_52 = x_50; -} else { - lean::dec_ref(x_50); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 3, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_51); -lean::cnstr_set(x_54, 1, x_5); -lean::cnstr_set(x_54, 2, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_43); -return x_55; -} -else -{ -uint8 x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_50); -x_56 = 1; -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = lean::box(x_56); -x_59 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_5); -lean::cnstr_set(x_59, 2, x_57); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_43); -return x_60; -} -} -} -else -{ -uint8 x_61; -lean::dec(x_9); -lean::dec(x_4); -x_61 = !lean::is_exclusive(x_8); -if (x_61 == 0) -{ -obj* x_62; uint8 x_63; obj* x_64; obj* x_65; obj* x_66; -x_62 = lean::cnstr_get(x_8, 0); -lean::dec(x_62); -x_63 = 1; -x_64 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_65 = lean::box(x_63); -x_66 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_5); -lean::cnstr_set(x_66, 2, x_64); -lean::cnstr_set(x_8, 0, x_66); -return x_8; -} -else -{ -obj* x_67; uint8 x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_67 = lean::cnstr_get(x_8, 1); -lean::inc(x_67); -lean::dec(x_8); -x_68 = 1; -x_69 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_70 = lean::box(x_68); -x_71 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_5); -lean::cnstr_set(x_71, 2, x_69); -x_72 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_67); -return x_72; -} -} -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_command_docComment_Parser___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_8 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_6); -lean::cnstr_set(x_9, 2, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_7); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_67; obj* x_68; -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_13 = x_3; -} else { - lean::dec_ref(x_3); - x_13 = lean::box(0); -} -lean::inc(x_5); -lean::inc(x_4); -x_67 = lean::apply_4(x_11, x_4, x_5, x_6, x_7); -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = lean::cnstr_get(x_67, 1); -lean::inc(x_69); -lean::dec(x_67); -x_14 = x_68; -x_15 = x_69; -goto block_66; -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_70; -x_70 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -if (x_70 == 0) -{ -obj* x_71; uint8 x_72; -x_71 = lean::cnstr_get(x_67, 1); -lean::inc(x_71); -lean::dec(x_67); -x_72 = !lean::is_exclusive(x_68); -if (x_72 == 0) -{ -uint8 x_73; -x_73 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_73); -x_14 = x_68; -x_15 = x_71; -goto block_66; -} -else -{ -obj* x_74; uint8 x_75; obj* x_76; -x_74 = lean::cnstr_get(x_68, 0); -lean::inc(x_74); -lean::dec(x_68); -x_75 = 0; -x_76 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_76, 0, x_74); -lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_75); -x_14 = x_76; -x_15 = x_71; -goto block_66; -} -} -else -{ -obj* x_77; uint8 x_78; -x_77 = lean::cnstr_get(x_67, 1); -lean::inc(x_77); -lean::dec(x_67); -x_78 = !lean::is_exclusive(x_68); -if (x_78 == 0) -{ -uint8 x_79; -x_79 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_79); -x_14 = x_68; -x_15 = x_77; -goto block_66; -} -else -{ -obj* x_80; uint8 x_81; obj* x_82; -x_80 = lean::cnstr_get(x_68, 0); -lean::inc(x_80); -lean::dec(x_68); -x_81 = 1; -x_82 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_82, 0, x_80); -lean::cnstr_set_scalar(x_82, sizeof(void*)*1, x_81); -x_14 = x_82; -x_15 = x_77; -goto block_66; -} -} -} -else -{ -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_68, 0); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_83, 3); -lean::inc(x_84); -if (lean::obj_tag(x_84) == 0) -{ -obj* x_85; uint8 x_86; -x_85 = lean::cnstr_get(x_67, 1); -lean::inc(x_85); -lean::dec(x_67); -x_86 = !lean::is_exclusive(x_68); -if (x_86 == 0) -{ -uint8 x_87; obj* x_88; uint8 x_89; -x_87 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -x_88 = lean::cnstr_get(x_68, 0); -lean::dec(x_88); -x_89 = !lean::is_exclusive(x_83); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -x_90 = lean::cnstr_get(x_83, 3); -lean::dec(x_90); -x_91 = lean::box(3); -lean::inc(x_2); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_2); -x_93 = l_List_reverse___rarg(x_92); -lean::inc(x_1); -x_94 = l_Lean_Parser_Syntax_mkNode(x_1, x_93); -x_95 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_83, 3, x_95); -if (x_87 == 0) -{ -uint8 x_96; -x_96 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_96); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_97; -x_97 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_97); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -} -else -{ -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; -x_98 = lean::cnstr_get(x_83, 0); -x_99 = lean::cnstr_get(x_83, 1); -x_100 = lean::cnstr_get(x_83, 2); -lean::inc(x_100); -lean::inc(x_99); -lean::inc(x_98); -lean::dec(x_83); -x_101 = lean::box(3); -lean::inc(x_2); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_2); -x_103 = l_List_reverse___rarg(x_102); -lean::inc(x_1); -x_104 = l_Lean_Parser_Syntax_mkNode(x_1, x_103); -x_105 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_105, 0, x_104); -x_106 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_106, 0, x_98); -lean::cnstr_set(x_106, 1, x_99); -lean::cnstr_set(x_106, 2, x_100); -lean::cnstr_set(x_106, 3, x_105); -if (x_87 == 0) -{ -uint8 x_107; -x_107 = 0; -lean::cnstr_set(x_68, 0, x_106); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_107); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_108; -x_108 = 1; -lean::cnstr_set(x_68, 0, x_106); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_108); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -} -} -else -{ -uint8 x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_109 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -lean::dec(x_68); -x_110 = lean::cnstr_get(x_83, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_83, 1); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_83, 2); -lean::inc(x_112); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - lean::cnstr_release(x_83, 2); - lean::cnstr_release(x_83, 3); - x_113 = x_83; -} else { - lean::dec_ref(x_83); - x_113 = lean::box(0); -} -x_114 = lean::box(3); -lean::inc(x_2); -x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_114); -lean::cnstr_set(x_115, 1, x_2); -x_116 = l_List_reverse___rarg(x_115); -lean::inc(x_1); -x_117 = l_Lean_Parser_Syntax_mkNode(x_1, x_116); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -if (lean::is_scalar(x_113)) { - x_119 = lean::alloc_cnstr(0, 4, 0); -} else { - x_119 = x_113; -} -lean::cnstr_set(x_119, 0, x_110); -lean::cnstr_set(x_119, 1, x_111); -lean::cnstr_set(x_119, 2, x_112); -lean::cnstr_set(x_119, 3, x_118); -if (x_109 == 0) -{ -uint8 x_120; obj* x_121; -x_120 = 0; -x_121 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_121, 0, x_119); -lean::cnstr_set_scalar(x_121, sizeof(void*)*1, x_120); -x_14 = x_121; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_122; obj* x_123; -x_122 = 1; -x_123 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_123, 0, x_119); -lean::cnstr_set_scalar(x_123, sizeof(void*)*1, x_122); -x_14 = x_123; -x_15 = x_85; -goto block_66; -} -} -} -else -{ -obj* x_124; uint8 x_125; -x_124 = lean::cnstr_get(x_67, 1); -lean::inc(x_124); -lean::dec(x_67); -x_125 = !lean::is_exclusive(x_68); -if (x_125 == 0) -{ -uint8 x_126; obj* x_127; uint8 x_128; -x_126 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -x_127 = lean::cnstr_get(x_68, 0); -lean::dec(x_127); -x_128 = !lean::is_exclusive(x_83); -if (x_128 == 0) -{ -obj* x_129; uint8 x_130; -x_129 = lean::cnstr_get(x_83, 3); -lean::dec(x_129); -x_130 = !lean::is_exclusive(x_84); -if (x_130 == 0) -{ -obj* x_131; obj* x_132; obj* x_133; obj* x_134; -x_131 = lean::cnstr_get(x_84, 0); -lean::inc(x_2); -x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_131); -lean::cnstr_set(x_132, 1, x_2); -x_133 = l_List_reverse___rarg(x_132); -lean::inc(x_1); -x_134 = l_Lean_Parser_Syntax_mkNode(x_1, x_133); -lean::cnstr_set(x_84, 0, x_134); -if (x_126 == 0) -{ -uint8 x_135; -x_135 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_135); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_136; -x_136 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_136); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_137 = lean::cnstr_get(x_84, 0); -lean::inc(x_137); -lean::dec(x_84); -lean::inc(x_2); -x_138 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_138, 0, x_137); -lean::cnstr_set(x_138, 1, x_2); -x_139 = l_List_reverse___rarg(x_138); -lean::inc(x_1); -x_140 = l_Lean_Parser_Syntax_mkNode(x_1, x_139); -x_141 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_141, 0, x_140); -lean::cnstr_set(x_83, 3, x_141); -if (x_126 == 0) -{ -uint8 x_142; -x_142 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_142); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_143; -x_143 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_143); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -} -else -{ -obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; -x_144 = lean::cnstr_get(x_83, 0); -x_145 = lean::cnstr_get(x_83, 1); -x_146 = lean::cnstr_get(x_83, 2); -lean::inc(x_146); -lean::inc(x_145); -lean::inc(x_144); -lean::dec(x_83); -x_147 = lean::cnstr_get(x_84, 0); -lean::inc(x_147); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - x_148 = x_84; -} else { - lean::dec_ref(x_84); - x_148 = lean::box(0); -} -lean::inc(x_2); -x_149 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_149, 0, x_147); -lean::cnstr_set(x_149, 1, x_2); -x_150 = l_List_reverse___rarg(x_149); -lean::inc(x_1); -x_151 = l_Lean_Parser_Syntax_mkNode(x_1, x_150); -if (lean::is_scalar(x_148)) { - x_152 = lean::alloc_cnstr(1, 1, 0); -} else { - x_152 = x_148; -} -lean::cnstr_set(x_152, 0, x_151); -x_153 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_153, 0, x_144); -lean::cnstr_set(x_153, 1, x_145); -lean::cnstr_set(x_153, 2, x_146); -lean::cnstr_set(x_153, 3, x_152); -if (x_126 == 0) -{ -uint8 x_154; -x_154 = 0; -lean::cnstr_set(x_68, 0, x_153); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_154); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_155; -x_155 = 1; -lean::cnstr_set(x_68, 0, x_153); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_155); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -} -else -{ -uint8 x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; -x_156 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -lean::dec(x_68); -x_157 = lean::cnstr_get(x_83, 0); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_83, 1); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_83, 2); -lean::inc(x_159); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - lean::cnstr_release(x_83, 2); - lean::cnstr_release(x_83, 3); - x_160 = x_83; -} else { - lean::dec_ref(x_83); - x_160 = lean::box(0); -} -x_161 = lean::cnstr_get(x_84, 0); -lean::inc(x_161); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - x_162 = x_84; -} else { - lean::dec_ref(x_84); - x_162 = lean::box(0); -} -lean::inc(x_2); -x_163 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_163, 0, x_161); -lean::cnstr_set(x_163, 1, x_2); -x_164 = l_List_reverse___rarg(x_163); -lean::inc(x_1); -x_165 = l_Lean_Parser_Syntax_mkNode(x_1, x_164); -if (lean::is_scalar(x_162)) { - x_166 = lean::alloc_cnstr(1, 1, 0); -} else { - x_166 = x_162; -} -lean::cnstr_set(x_166, 0, x_165); -if (lean::is_scalar(x_160)) { - x_167 = lean::alloc_cnstr(0, 4, 0); -} else { - x_167 = x_160; -} -lean::cnstr_set(x_167, 0, x_157); -lean::cnstr_set(x_167, 1, x_158); -lean::cnstr_set(x_167, 2, x_159); -lean::cnstr_set(x_167, 3, x_166); -if (x_156 == 0) -{ -uint8 x_168; obj* x_169; -x_168 = 0; -x_169 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_169, 0, x_167); -lean::cnstr_set_scalar(x_169, sizeof(void*)*1, x_168); -x_14 = x_169; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_170; obj* x_171; -x_170 = 1; -x_171 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_171, 0, x_167); -lean::cnstr_set_scalar(x_171, sizeof(void*)*1, x_170); -x_14 = x_171; -x_15 = x_124; -goto block_66; -} -} -} -} -} -block_66: -{ -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_16; -x_16 = !lean::is_exclusive(x_14); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_14, 0); -x_18 = lean::cnstr_get(x_14, 2); -if (lean::is_scalar(x_13)) { - x_19 = lean::alloc_cnstr(1, 2, 0); -} else { - x_19 = x_13; -} -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_2); -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_14, 2, x_20); -lean::cnstr_set(x_14, 0, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_14); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; uint8 x_26; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_21, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_21, 2); -lean::inc(x_24); -lean::dec(x_21); -x_25 = l_List_mfoldl___main___at_Lean_Parser_command_docComment_Parser___spec__3(x_1, x_22, x_12, x_4, x_5, x_23, x_15); -x_26 = !lean::is_exclusive(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_25, 0); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_27); -lean::cnstr_set(x_25, 0, x_28); -return x_25; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::cnstr_get(x_25, 0); -x_30 = lean::cnstr_get(x_25, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_25); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_29); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_30); -return x_32; -} -} -else -{ -uint8 x_33; -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_33 = !lean::is_exclusive(x_21); -if (x_33 == 0) -{ -obj* x_34; -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_21); -lean::cnstr_set(x_34, 1, x_15); -return x_34; -} -else -{ -obj* x_35; uint8 x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_21, 0); -x_36 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); -lean::inc(x_35); -lean::dec(x_21); -x_37 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_15); -return x_38; -} -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_39 = lean::cnstr_get(x_14, 0); -x_40 = lean::cnstr_get(x_14, 1); -x_41 = lean::cnstr_get(x_14, 2); -lean::inc(x_41); -lean::inc(x_40); -lean::inc(x_39); -lean::dec(x_14); -if (lean::is_scalar(x_13)) { - x_42 = lean::alloc_cnstr(1, 2, 0); -} else { - x_42 = x_13; -} -lean::cnstr_set(x_42, 0, x_39); -lean::cnstr_set(x_42, 1, x_2); -x_43 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set(x_44, 1, x_40); -lean::cnstr_set(x_44, 2, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_44); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_45, 1); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_45, 2); -lean::inc(x_48); -lean::dec(x_45); -x_49 = l_List_mfoldl___main___at_Lean_Parser_command_docComment_Parser___spec__3(x_1, x_46, x_12, x_4, x_5, x_47, x_15); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_49, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_52 = x_49; -} else { - lean::dec_ref(x_49); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -return x_54; -} -else -{ -obj* x_55; uint8 x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_55 = lean::cnstr_get(x_45, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); -if (lean::is_exclusive(x_45)) { - lean::cnstr_release(x_45, 0); - x_57 = x_45; -} else { - lean::dec_ref(x_45); - x_57 = lean::box(0); -} -if (lean::is_scalar(x_57)) { - x_58 = lean::alloc_cnstr(1, 1, 1); -} else { - x_58 = x_57; -} -lean::cnstr_set(x_58, 0, x_55); -lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_15); -return x_59; -} -} -} -else -{ -uint8 x_60; -lean::dec(x_13); -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_60 = !lean::is_exclusive(x_14); -if (x_60 == 0) -{ -obj* x_61; -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_14); -lean::cnstr_set(x_61, 1, x_15); -return x_61; -} -else -{ -obj* x_62; uint8 x_63; obj* x_64; obj* x_65; -x_62 = lean::cnstr_get(x_14, 0); -x_63 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -lean::inc(x_62); -lean::dec(x_14); -x_64 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set_scalar(x_64, sizeof(void*)*1, x_63); -x_65 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_15); -return x_65; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::box(0); -lean::inc(x_1); -x_8 = l_List_mfoldl___main___at_Lean_Parser_command_docComment_Parser___spec__3(x_1, x_7, x_2, x_3, x_4, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_8, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_9, 0); -x_14 = lean::cnstr_get(x_9, 2); -x_15 = l_List_reverse___rarg(x_13); -x_16 = l_Lean_Parser_Syntax_mkNode(x_1, x_15); -x_17 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_9, 2, x_17); -lean::cnstr_set(x_9, 0, x_16); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_9); -lean::cnstr_set(x_8, 0, x_18); -return x_8; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_19 = lean::cnstr_get(x_9, 0); -x_20 = lean::cnstr_get(x_9, 1); -x_21 = lean::cnstr_get(x_9, 2); -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_9); -x_22 = l_List_reverse___rarg(x_19); -x_23 = l_Lean_Parser_Syntax_mkNode(x_1, x_22); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_20); -lean::cnstr_set(x_25, 2, x_24); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_25); -lean::cnstr_set(x_8, 0, x_26); -return x_8; -} -} -else -{ -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_37; -x_27 = lean::cnstr_get(x_8, 1); -lean::inc(x_27); -lean::dec(x_8); -x_28 = lean::cnstr_get(x_9, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_9, 1); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_9, 2); -lean::inc(x_30); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_31 = x_9; -} else { - lean::dec_ref(x_9); - x_31 = lean::box(0); -} -x_32 = l_List_reverse___rarg(x_28); -x_33 = l_Lean_Parser_Syntax_mkNode(x_1, x_32); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_31)) { - x_35 = lean::alloc_cnstr(0, 3, 0); -} else { - x_35 = x_31; -} -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_29); -lean::cnstr_set(x_35, 2, x_34); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_35); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_27); -return x_37; -} -} -else -{ -uint8 x_38; -lean::dec(x_1); -x_38 = !lean::is_exclusive(x_8); -if (x_38 == 0) -{ -obj* x_39; uint8 x_40; -x_39 = lean::cnstr_get(x_8, 0); -lean::dec(x_39); -x_40 = !lean::is_exclusive(x_9); -if (x_40 == 0) -{ -return x_8; -} -else -{ -obj* x_41; uint8 x_42; obj* x_43; -x_41 = lean::cnstr_get(x_9, 0); -x_42 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_41); -lean::dec(x_9); -x_43 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_42); -lean::cnstr_set(x_8, 0, x_43); -return x_8; -} -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; obj* x_48; obj* x_49; -x_44 = lean::cnstr_get(x_8, 1); -lean::inc(x_44); -lean::dec(x_8); -x_45 = lean::cnstr_get(x_9, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_47 = x_9; -} else { - lean::dec_ref(x_9); - x_47 = lean::box(0); -} -if (lean::is_scalar(x_47)) { - x_48 = lean::alloc_cnstr(1, 1, 1); -} else { - x_48 = x_47; -} -lean::cnstr_set(x_48, 0, x_45); -lean::cnstr_set_scalar(x_48, sizeof(void*)*1, x_46); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_44); -return x_49; -} -} -} -} -obj* l_Lean_Parser_command_docComment_Parser___lambda__1(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; -x_6 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_4); -x_7 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser___spec__1(x_1, x_2, x_3, x_6, x_4, x_5); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; uint8 x_10; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::unbox(x_9); -lean::dec(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -x_11 = lean::cnstr_get(x_7, 1); -lean::inc(x_11); -lean::dec(x_7); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_8, 2); -lean::inc(x_13); -lean::dec(x_8); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_4); -x_15 = lean::box(0); -x_16 = l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2; -x_17 = l_mjoin___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_16, x_17, x_14, x_15, x_2, x_3, x_12, x_11); -lean::dec(x_14); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = lean::cnstr_get(x_18, 1); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_20); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; uint8 x_27; -lean::free_heap_obj(x_18); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_23, 2); -lean::inc(x_25); -lean::dec(x_23); -x_26 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_24, x_21); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_26, 0); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_28); -lean::cnstr_set(x_26, 0, x_29); -return x_26; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = lean::cnstr_get(x_26, 0); -x_31 = lean::cnstr_get(x_26, 1); -lean::inc(x_31); -lean::inc(x_30); -lean::dec(x_26); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_30); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_31); -return x_33; -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_23); -if (x_34 == 0) -{ -lean::cnstr_set(x_18, 0, x_23); -return x_18; -} -else -{ -obj* x_35; uint8 x_36; obj* x_37; -x_35 = lean::cnstr_get(x_23, 0); -x_36 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -lean::inc(x_35); -lean::dec(x_23); -x_37 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_36); -lean::cnstr_set(x_18, 0, x_37); -return x_18; -} -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = lean::cnstr_get(x_18, 0); -x_39 = lean::cnstr_get(x_18, 1); -lean::inc(x_39); -lean::inc(x_38); -lean::dec(x_18); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_38); -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_40); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 2); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_42, x_39); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_44, 1); -lean::inc(x_46); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - lean::cnstr_release(x_44, 1); - x_47 = x_44; -} else { - lean::dec_ref(x_44); - x_47 = lean::box(0); -} -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_45); -if (lean::is_scalar(x_47)) { - x_49 = lean::alloc_cnstr(0, 2, 0); -} else { - x_49 = x_47; -} -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_46); -return x_49; -} -else -{ -obj* x_50; uint8 x_51; obj* x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_41, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get_scalar(x_41, sizeof(void*)*1); -if (lean::is_exclusive(x_41)) { - lean::cnstr_release(x_41, 0); - x_52 = x_41; -} else { - lean::dec_ref(x_41); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(1, 1, 1); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_50); -lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_51); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_39); -return x_54; -} -} -} -else -{ -uint8 x_55; -lean::dec(x_4); -x_55 = !lean::is_exclusive(x_7); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; uint8 x_58; -x_56 = lean::cnstr_get(x_7, 1); -x_57 = lean::cnstr_get(x_7, 0); -lean::dec(x_57); -x_58 = !lean::is_exclusive(x_8); -if (x_58 == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_59 = lean::cnstr_get(x_8, 2); -x_60 = lean::cnstr_get(x_8, 0); -lean::dec(x_60); -x_61 = lean::box(0); -lean::cnstr_set(x_8, 2, x_6); -lean::cnstr_set(x_8, 0, x_61); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_8); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_62); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; obj* x_65; obj* x_66; uint8 x_67; -lean::free_heap_obj(x_7); -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_63, 2); -lean::inc(x_65); -lean::dec(x_63); -x_66 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_64, x_56); -x_67 = !lean::is_exclusive(x_66); -if (x_67 == 0) -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_66, 0); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_68); -lean::cnstr_set(x_66, 0, x_69); -return x_66; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_70 = lean::cnstr_get(x_66, 0); -x_71 = lean::cnstr_get(x_66, 1); -lean::inc(x_71); -lean::inc(x_70); -lean::dec(x_66); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_70); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_71); -return x_73; -} -} -else -{ -uint8 x_74; -x_74 = !lean::is_exclusive(x_63); -if (x_74 == 0) -{ -lean::cnstr_set(x_7, 0, x_63); -return x_7; -} -else -{ -obj* x_75; uint8 x_76; obj* x_77; -x_75 = lean::cnstr_get(x_63, 0); -x_76 = lean::cnstr_get_scalar(x_63, sizeof(void*)*1); -lean::inc(x_75); -lean::dec(x_63); -x_77 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_77, 0, x_75); -lean::cnstr_set_scalar(x_77, sizeof(void*)*1, x_76); -lean::cnstr_set(x_7, 0, x_77); -return x_7; -} -} -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_78 = lean::cnstr_get(x_8, 1); -x_79 = lean::cnstr_get(x_8, 2); -lean::inc(x_79); -lean::inc(x_78); -lean::dec(x_8); -x_80 = lean::box(0); -x_81 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_78); -lean::cnstr_set(x_81, 2, x_6); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_79, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_82); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -lean::free_heap_obj(x_7); -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_83, 2); -lean::inc(x_85); -lean::dec(x_83); -x_86 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_84, x_56); -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_86, 1); -lean::inc(x_88); -if (lean::is_exclusive(x_86)) { - lean::cnstr_release(x_86, 0); - lean::cnstr_release(x_86, 1); - x_89 = x_86; -} else { - lean::dec_ref(x_86); - x_89 = lean::box(0); -} -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_85, x_87); -if (lean::is_scalar(x_89)) { - x_91 = lean::alloc_cnstr(0, 2, 0); -} else { - x_91 = x_89; -} -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_88); -return x_91; -} -else -{ -obj* x_92; uint8 x_93; obj* x_94; obj* x_95; -x_92 = lean::cnstr_get(x_83, 0); -lean::inc(x_92); -x_93 = lean::cnstr_get_scalar(x_83, sizeof(void*)*1); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - x_94 = x_83; -} else { - lean::dec_ref(x_83); - x_94 = lean::box(0); -} -if (lean::is_scalar(x_94)) { - x_95 = lean::alloc_cnstr(1, 1, 1); -} else { - x_95 = x_94; -} -lean::cnstr_set(x_95, 0, x_92); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_93); -lean::cnstr_set(x_7, 0, x_95); -return x_7; -} -} -} -else -{ -obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_96 = lean::cnstr_get(x_7, 1); -lean::inc(x_96); -lean::dec(x_7); -x_97 = lean::cnstr_get(x_8, 1); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_8, 2); -lean::inc(x_98); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_99 = x_8; -} else { - lean::dec_ref(x_8); - x_99 = lean::box(0); -} -x_100 = lean::box(0); -if (lean::is_scalar(x_99)) { - x_101 = lean::alloc_cnstr(0, 3, 0); -} else { - x_101 = x_99; -} -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_97); -lean::cnstr_set(x_101, 2, x_6); -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_101); -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_102); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_104 = lean::cnstr_get(x_103, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_103, 2); -lean::inc(x_105); -lean::dec(x_103); -x_106 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_104, x_96); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -x_108 = lean::cnstr_get(x_106, 1); -lean::inc(x_108); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - x_109 = x_106; -} else { - lean::dec_ref(x_106); - x_109 = lean::box(0); -} -x_110 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_105, x_107); -if (lean::is_scalar(x_109)) { - x_111 = lean::alloc_cnstr(0, 2, 0); -} else { - x_111 = x_109; -} -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_108); -return x_111; -} -else -{ -obj* x_112; uint8 x_113; obj* x_114; obj* x_115; obj* x_116; -x_112 = lean::cnstr_get(x_103, 0); -lean::inc(x_112); -x_113 = lean::cnstr_get_scalar(x_103, sizeof(void*)*1); -if (lean::is_exclusive(x_103)) { - lean::cnstr_release(x_103, 0); - x_114 = x_103; -} else { - lean::dec_ref(x_103); - x_114 = lean::box(0); -} -if (lean::is_scalar(x_114)) { - x_115 = lean::alloc_cnstr(1, 1, 1); -} else { - x_115 = x_114; -} -lean::cnstr_set(x_115, 0, x_112); -lean::cnstr_set_scalar(x_115, sizeof(void*)*1, x_113); -x_116 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_116, 0, x_115); -lean::cnstr_set(x_116, 1, x_96); -return x_116; -} -} -} -} -else -{ -uint8 x_117; -lean::dec(x_4); -x_117 = !lean::is_exclusive(x_7); -if (x_117 == 0) -{ -obj* x_118; obj* x_119; uint8 x_120; -x_118 = lean::cnstr_get(x_7, 1); -x_119 = lean::cnstr_get(x_7, 0); -lean::dec(x_119); -x_120 = !lean::is_exclusive(x_8); -if (x_120 == 0) -{ -obj* x_121; -x_121 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_8); -if (lean::obj_tag(x_121) == 0) -{ -obj* x_122; obj* x_123; obj* x_124; uint8 x_125; -lean::free_heap_obj(x_7); -x_122 = lean::cnstr_get(x_121, 1); -lean::inc(x_122); -x_123 = lean::cnstr_get(x_121, 2); -lean::inc(x_123); -lean::dec(x_121); -x_124 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_122, x_118); -x_125 = !lean::is_exclusive(x_124); -if (x_125 == 0) -{ -obj* x_126; obj* x_127; -x_126 = lean::cnstr_get(x_124, 0); -x_127 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_123, x_126); -lean::cnstr_set(x_124, 0, x_127); -return x_124; -} -else -{ -obj* x_128; obj* x_129; obj* x_130; obj* x_131; -x_128 = lean::cnstr_get(x_124, 0); -x_129 = lean::cnstr_get(x_124, 1); -lean::inc(x_129); -lean::inc(x_128); -lean::dec(x_124); -x_130 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_123, x_128); -x_131 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_129); -return x_131; -} -} -else -{ -uint8 x_132; -x_132 = !lean::is_exclusive(x_121); -if (x_132 == 0) -{ -lean::cnstr_set(x_7, 0, x_121); -return x_7; -} -else -{ -obj* x_133; uint8 x_134; obj* x_135; -x_133 = lean::cnstr_get(x_121, 0); -x_134 = lean::cnstr_get_scalar(x_121, sizeof(void*)*1); -lean::inc(x_133); -lean::dec(x_121); -x_135 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_135, 0, x_133); -lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_134); -lean::cnstr_set(x_7, 0, x_135); -return x_7; -} -} -} -else -{ -obj* x_136; uint8 x_137; obj* x_138; obj* x_139; -x_136 = lean::cnstr_get(x_8, 0); -x_137 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_136); -lean::dec(x_8); -x_138 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_138, 0, x_136); -lean::cnstr_set_scalar(x_138, sizeof(void*)*1, x_137); -x_139 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_138); -if (lean::obj_tag(x_139) == 0) -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; -lean::free_heap_obj(x_7); -x_140 = lean::cnstr_get(x_139, 1); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_139, 2); -lean::inc(x_141); -lean::dec(x_139); -x_142 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_140, x_118); -x_143 = lean::cnstr_get(x_142, 0); -lean::inc(x_143); -x_144 = lean::cnstr_get(x_142, 1); -lean::inc(x_144); -if (lean::is_exclusive(x_142)) { - lean::cnstr_release(x_142, 0); - lean::cnstr_release(x_142, 1); - x_145 = x_142; -} else { - lean::dec_ref(x_142); - x_145 = lean::box(0); -} -x_146 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_141, x_143); -if (lean::is_scalar(x_145)) { - x_147 = lean::alloc_cnstr(0, 2, 0); -} else { - x_147 = x_145; -} -lean::cnstr_set(x_147, 0, x_146); -lean::cnstr_set(x_147, 1, x_144); -return x_147; -} -else -{ -obj* x_148; uint8 x_149; obj* x_150; obj* x_151; -x_148 = lean::cnstr_get(x_139, 0); -lean::inc(x_148); -x_149 = lean::cnstr_get_scalar(x_139, sizeof(void*)*1); -if (lean::is_exclusive(x_139)) { - lean::cnstr_release(x_139, 0); - x_150 = x_139; -} else { - lean::dec_ref(x_139); - x_150 = lean::box(0); -} -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 1, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_148); -lean::cnstr_set_scalar(x_151, sizeof(void*)*1, x_149); -lean::cnstr_set(x_7, 0, x_151); -return x_7; -} -} -} -else -{ -obj* x_152; obj* x_153; uint8 x_154; obj* x_155; obj* x_156; obj* x_157; -x_152 = lean::cnstr_get(x_7, 1); -lean::inc(x_152); -lean::dec(x_7); -x_153 = lean::cnstr_get(x_8, 0); -lean::inc(x_153); -x_154 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_155 = x_8; -} else { - lean::dec_ref(x_8); - x_155 = lean::box(0); -} -if (lean::is_scalar(x_155)) { - x_156 = lean::alloc_cnstr(1, 1, 1); -} else { - x_156 = x_155; -} -lean::cnstr_set(x_156, 0, x_153); -lean::cnstr_set_scalar(x_156, sizeof(void*)*1, x_154); -x_157 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_156); -if (lean::obj_tag(x_157) == 0) -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; -x_158 = lean::cnstr_get(x_157, 1); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_157, 2); -lean::inc(x_159); -lean::dec(x_157); -x_160 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__5(x_2, x_3, x_158, x_152); -x_161 = lean::cnstr_get(x_160, 0); -lean::inc(x_161); -x_162 = lean::cnstr_get(x_160, 1); -lean::inc(x_162); -if (lean::is_exclusive(x_160)) { - lean::cnstr_release(x_160, 0); - lean::cnstr_release(x_160, 1); - x_163 = x_160; -} else { - lean::dec_ref(x_160); - x_163 = lean::box(0); -} -x_164 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_159, x_161); -if (lean::is_scalar(x_163)) { - x_165 = lean::alloc_cnstr(0, 2, 0); -} else { - x_165 = x_163; -} -lean::cnstr_set(x_165, 0, x_164); -lean::cnstr_set(x_165, 1, x_162); -return x_165; -} -else -{ -obj* x_166; uint8 x_167; obj* x_168; obj* x_169; obj* x_170; -x_166 = lean::cnstr_get(x_157, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get_scalar(x_157, sizeof(void*)*1); -if (lean::is_exclusive(x_157)) { - lean::cnstr_release(x_157, 0); - x_168 = x_157; -} else { - lean::dec_ref(x_157); - x_168 = lean::box(0); -} -if (lean::is_scalar(x_168)) { - x_169 = lean::alloc_cnstr(1, 1, 1); -} else { - x_169 = x_168; -} -lean::cnstr_set(x_169, 0, x_166); -lean::cnstr_set_scalar(x_169, sizeof(void*)*1, x_167); -x_170 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_170, 0, x_169); -lean::cnstr_set(x_170, 1, x_152); -return x_170; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_docComment_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_1 = lean::mk_string("/--"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("-/"); -lean::inc(x_6); -x_7 = l_String_quote(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_docComment_Parser___lambda__1___boxed), 5, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_11 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__8___rarg___boxed), 5, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_13, 0, x_9); -x_14 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__9___rarg), 6, 2); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_13); -x_15 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_14); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_5); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -} -obj* l_Lean_Parser_command_docComment_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_docComment; -x_6 = l_Lean_Parser_command_docComment_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_command_docComment_Parser___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_command_docComment_Parser___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_command_docComment_Parser___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_attrInstance() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("attrInstance"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_attrInstance_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_2); -x_5 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_command_attrInstance; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -obj* _init_l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::box(3); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_6); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_5); -x_7 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -return x_8; -} -} -} -obj* _init_l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_35; -x_35 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -x_36 = l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__3; -return x_36; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_35, 0); -lean::inc(x_37); -lean::dec(x_35); -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -lean::dec(x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; -x_39 = lean::box(3); -x_2 = x_38; -x_3 = x_39; -goto block_34; -} -else -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_38, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_38, 1); -lean::inc(x_41); -lean::dec(x_38); -x_2 = x_41; -x_3 = x_40; -goto block_34; -} -} -block_34: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = lean::box(3); -x_17 = l_Lean_Parser_Syntax_asNode___main(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; -x_18 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_15); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_17, 0); -lean::inc(x_20); -lean::dec(x_17); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -x_22 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_21); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_15); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_3, 0); -lean::inc(x_24); -lean::dec(x_3); -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -lean::dec(x_2); -x_26 = l_Lean_Parser_Syntax_asNode___main(x_25); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; -x_27 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_24); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::cnstr_get(x_26, 0); -lean::inc(x_29); -lean::dec(x_26); -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -x_31 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_24); -lean::cnstr_set(x_32, 1, x_31); -return x_32; -} -} -} -else -{ -obj* x_33; -lean::dec(x_3); -x_33 = lean::box(0); -x_4 = x_33; -goto block_14; -} -block_14: -{ -lean::dec(x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__2; -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__1; -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_10); -x_12 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -return x_13; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_attrInstance_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attrInstance_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_attrInstance_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_attrInstance_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_rawIdent_Parser___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -lean::inc(x_5); -x_6 = l___private_init_lean_parser_token_4__ident_x27(x_5, x_3, x_4); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint8 x_13; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -lean::dec(x_6); -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_7, 2); -lean::inc(x_11); -lean::dec(x_7); -x_12 = l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3(x_9, x_5, x_10, x_8); -lean::dec(x_5); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_14); -lean::cnstr_set(x_12, 0, x_15); -return x_12; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_12, 0); -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_12); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_16); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -else -{ -uint8 x_20; -lean::dec(x_5); -x_20 = !lean::is_exclusive(x_6); -if (x_20 == 0) -{ -obj* x_21; uint8 x_22; -x_21 = lean::cnstr_get(x_6, 0); -lean::dec(x_21); -x_22 = !lean::is_exclusive(x_7); -if (x_22 == 0) -{ -return x_6; -} -else -{ -obj* x_23; uint8 x_24; obj* x_25; -x_23 = lean::cnstr_get(x_7, 0); -x_24 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_23); -lean::dec(x_7); -x_25 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set_scalar(x_25, sizeof(void*)*1, x_24); -lean::cnstr_set(x_6, 0, x_25); -return x_6; -} -} -else -{ -obj* x_26; obj* x_27; uint8 x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_6, 1); -lean::inc(x_26); -lean::dec(x_6); -x_27 = lean::cnstr_get(x_7, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_29 = x_7; -} else { - lean::dec_ref(x_7); - x_29 = lean::box(0); -} -if (lean::is_scalar(x_29)) { - x_30 = lean::alloc_cnstr(1, 1, 1); -} else { - x_30 = x_29; -} -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set_scalar(x_30, sizeof(void*)*1, x_28); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_26); -return x_31; -} -} -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__4(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; -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::nat_dec_eq(x_3, x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_88; obj* x_89; -x_10 = lean::mk_nat_obj(1u); -x_11 = lean::nat_sub(x_3, x_10); -lean::inc(x_1); -lean::inc(x_5); -lean::inc(x_4); -x_88 = lean::apply_4(x_1, x_4, x_5, x_6, x_7); -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -if (lean::obj_tag(x_89) == 0) -{ -obj* x_90; -x_90 = lean::cnstr_get(x_88, 1); -lean::inc(x_90); -lean::dec(x_88); -x_12 = x_89; -x_13 = x_90; -goto block_87; -} -else -{ -obj* x_91; obj* x_92; -x_91 = lean::cnstr_get(x_89, 0); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_91, 3); -lean::inc(x_92); -if (lean::obj_tag(x_92) == 0) -{ -obj* x_93; uint8 x_94; -x_93 = lean::cnstr_get(x_88, 1); -lean::inc(x_93); -lean::dec(x_88); -x_94 = !lean::is_exclusive(x_89); -if (x_94 == 0) -{ -uint8 x_95; obj* x_96; uint8 x_97; -x_95 = lean::cnstr_get_scalar(x_89, sizeof(void*)*1); -x_96 = lean::cnstr_get(x_89, 0); -lean::dec(x_96); -x_97 = !lean::is_exclusive(x_91); -if (x_97 == 0) -{ -obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; -x_98 = lean::cnstr_get(x_91, 3); -lean::dec(x_98); -x_99 = lean::box(3); -lean::inc(x_2); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_2); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_99); -lean::cnstr_set(x_101, 1, x_100); -x_102 = l_List_reverse___rarg(x_101); -x_103 = l_Lean_Parser_noKind; -x_104 = l_Lean_Parser_Syntax_mkNode(x_103, x_102); -x_105 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_91, 3, x_105); -if (x_95 == 0) -{ -uint8 x_106; -x_106 = 0; -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_106); -x_12 = x_89; -x_13 = x_93; -goto block_87; -} -else -{ -uint8 x_107; -x_107 = 1; -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_107); -x_12 = x_89; -x_13 = x_93; -goto block_87; -} -} -else -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_108 = lean::cnstr_get(x_91, 0); -x_109 = lean::cnstr_get(x_91, 1); -x_110 = lean::cnstr_get(x_91, 2); -lean::inc(x_110); -lean::inc(x_109); -lean::inc(x_108); -lean::dec(x_91); -x_111 = lean::box(3); -lean::inc(x_2); -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_2); -x_113 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set(x_113, 1, x_112); -x_114 = l_List_reverse___rarg(x_113); -x_115 = l_Lean_Parser_noKind; -x_116 = l_Lean_Parser_Syntax_mkNode(x_115, x_114); -x_117 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_117, 0, x_116); -x_118 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_118, 0, x_108); -lean::cnstr_set(x_118, 1, x_109); -lean::cnstr_set(x_118, 2, x_110); -lean::cnstr_set(x_118, 3, x_117); -if (x_95 == 0) -{ -uint8 x_119; -x_119 = 0; -lean::cnstr_set(x_89, 0, x_118); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_119); -x_12 = x_89; -x_13 = x_93; -goto block_87; -} -else -{ -uint8 x_120; -x_120 = 1; -lean::cnstr_set(x_89, 0, x_118); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_120); -x_12 = x_89; -x_13 = x_93; -goto block_87; -} -} -} -else -{ -uint8 x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_121 = lean::cnstr_get_scalar(x_89, sizeof(void*)*1); -lean::dec(x_89); -x_122 = lean::cnstr_get(x_91, 0); -lean::inc(x_122); -x_123 = lean::cnstr_get(x_91, 1); -lean::inc(x_123); -x_124 = lean::cnstr_get(x_91, 2); -lean::inc(x_124); -if (lean::is_exclusive(x_91)) { - lean::cnstr_release(x_91, 0); - lean::cnstr_release(x_91, 1); - lean::cnstr_release(x_91, 2); - lean::cnstr_release(x_91, 3); - x_125 = x_91; -} else { - lean::dec_ref(x_91); - x_125 = lean::box(0); -} -x_126 = lean::box(3); -lean::inc(x_2); -x_127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_2); -x_128 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_128, 0, x_126); -lean::cnstr_set(x_128, 1, x_127); -x_129 = l_List_reverse___rarg(x_128); -x_130 = l_Lean_Parser_noKind; -x_131 = l_Lean_Parser_Syntax_mkNode(x_130, x_129); -x_132 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_132, 0, x_131); -if (lean::is_scalar(x_125)) { - x_133 = lean::alloc_cnstr(0, 4, 0); -} else { - x_133 = x_125; -} -lean::cnstr_set(x_133, 0, x_122); -lean::cnstr_set(x_133, 1, x_123); -lean::cnstr_set(x_133, 2, x_124); -lean::cnstr_set(x_133, 3, x_132); -if (x_121 == 0) -{ -uint8 x_134; obj* x_135; -x_134 = 0; -x_135 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_135, 0, x_133); -lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_134); -x_12 = x_135; -x_13 = x_93; -goto block_87; -} -else -{ -uint8 x_136; obj* x_137; -x_136 = 1; -x_137 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_137, 0, x_133); -lean::cnstr_set_scalar(x_137, sizeof(void*)*1, x_136); -x_12 = x_137; -x_13 = x_93; -goto block_87; -} -} -} -else -{ -obj* x_138; uint8 x_139; -x_138 = lean::cnstr_get(x_88, 1); -lean::inc(x_138); -lean::dec(x_88); -x_139 = !lean::is_exclusive(x_89); -if (x_139 == 0) -{ -uint8 x_140; obj* x_141; uint8 x_142; -x_140 = lean::cnstr_get_scalar(x_89, sizeof(void*)*1); -x_141 = lean::cnstr_get(x_89, 0); -lean::dec(x_141); -x_142 = !lean::is_exclusive(x_91); -if (x_142 == 0) -{ -obj* x_143; uint8 x_144; -x_143 = lean::cnstr_get(x_91, 3); -lean::dec(x_143); -x_144 = !lean::is_exclusive(x_92); -if (x_144 == 0) -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_145 = lean::cnstr_get(x_92, 0); -lean::inc(x_2); -x_146 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_146, 0, x_145); -lean::cnstr_set(x_146, 1, x_2); -x_147 = lean::box(3); -x_148 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_148, 0, x_147); -lean::cnstr_set(x_148, 1, x_146); -x_149 = l_List_reverse___rarg(x_148); -x_150 = l_Lean_Parser_noKind; -x_151 = l_Lean_Parser_Syntax_mkNode(x_150, x_149); -lean::cnstr_set(x_92, 0, x_151); -if (x_140 == 0) -{ -uint8 x_152; -x_152 = 0; -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_152); -x_12 = x_89; -x_13 = x_138; -goto block_87; -} -else -{ -uint8 x_153; -x_153 = 1; -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_153); -x_12 = x_89; -x_13 = x_138; -goto block_87; -} -} -else -{ -obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; -x_154 = lean::cnstr_get(x_92, 0); -lean::inc(x_154); -lean::dec(x_92); -lean::inc(x_2); -x_155 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_155, 0, x_154); -lean::cnstr_set(x_155, 1, x_2); -x_156 = lean::box(3); -x_157 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_157, 0, x_156); -lean::cnstr_set(x_157, 1, x_155); -x_158 = l_List_reverse___rarg(x_157); -x_159 = l_Lean_Parser_noKind; -x_160 = l_Lean_Parser_Syntax_mkNode(x_159, x_158); -x_161 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_161, 0, x_160); -lean::cnstr_set(x_91, 3, x_161); -if (x_140 == 0) -{ -uint8 x_162; -x_162 = 0; -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_162); -x_12 = x_89; -x_13 = x_138; -goto block_87; -} -else -{ -uint8 x_163; -x_163 = 1; -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_163); -x_12 = x_89; -x_13 = x_138; -goto block_87; -} -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; -x_164 = lean::cnstr_get(x_91, 0); -x_165 = lean::cnstr_get(x_91, 1); -x_166 = lean::cnstr_get(x_91, 2); -lean::inc(x_166); -lean::inc(x_165); -lean::inc(x_164); -lean::dec(x_91); -x_167 = lean::cnstr_get(x_92, 0); -lean::inc(x_167); -if (lean::is_exclusive(x_92)) { - lean::cnstr_release(x_92, 0); - x_168 = x_92; -} else { - lean::dec_ref(x_92); - x_168 = lean::box(0); -} -lean::inc(x_2); -x_169 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_169, 0, x_167); -lean::cnstr_set(x_169, 1, x_2); -x_170 = lean::box(3); -x_171 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_171, 0, x_170); -lean::cnstr_set(x_171, 1, x_169); -x_172 = l_List_reverse___rarg(x_171); -x_173 = l_Lean_Parser_noKind; -x_174 = l_Lean_Parser_Syntax_mkNode(x_173, x_172); -if (lean::is_scalar(x_168)) { - x_175 = lean::alloc_cnstr(1, 1, 0); -} else { - x_175 = x_168; -} -lean::cnstr_set(x_175, 0, x_174); -x_176 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_176, 0, x_164); -lean::cnstr_set(x_176, 1, x_165); -lean::cnstr_set(x_176, 2, x_166); -lean::cnstr_set(x_176, 3, x_175); -if (x_140 == 0) -{ -uint8 x_177; -x_177 = 0; -lean::cnstr_set(x_89, 0, x_176); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_177); -x_12 = x_89; -x_13 = x_138; -goto block_87; -} -else -{ -uint8 x_178; -x_178 = 1; -lean::cnstr_set(x_89, 0, x_176); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_178); -x_12 = x_89; -x_13 = x_138; -goto block_87; -} -} -} -else -{ -uint8 x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; -x_179 = lean::cnstr_get_scalar(x_89, sizeof(void*)*1); -lean::dec(x_89); -x_180 = lean::cnstr_get(x_91, 0); -lean::inc(x_180); -x_181 = lean::cnstr_get(x_91, 1); -lean::inc(x_181); -x_182 = lean::cnstr_get(x_91, 2); -lean::inc(x_182); -if (lean::is_exclusive(x_91)) { - lean::cnstr_release(x_91, 0); - lean::cnstr_release(x_91, 1); - lean::cnstr_release(x_91, 2); - lean::cnstr_release(x_91, 3); - x_183 = x_91; -} else { - lean::dec_ref(x_91); - x_183 = lean::box(0); -} -x_184 = lean::cnstr_get(x_92, 0); -lean::inc(x_184); -if (lean::is_exclusive(x_92)) { - lean::cnstr_release(x_92, 0); - x_185 = x_92; -} else { - lean::dec_ref(x_92); - x_185 = lean::box(0); -} -lean::inc(x_2); -x_186 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_186, 0, x_184); -lean::cnstr_set(x_186, 1, x_2); -x_187 = lean::box(3); -x_188 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set(x_188, 1, x_186); -x_189 = l_List_reverse___rarg(x_188); -x_190 = l_Lean_Parser_noKind; -x_191 = l_Lean_Parser_Syntax_mkNode(x_190, x_189); -if (lean::is_scalar(x_185)) { - x_192 = lean::alloc_cnstr(1, 1, 0); -} else { - x_192 = x_185; -} -lean::cnstr_set(x_192, 0, x_191); -if (lean::is_scalar(x_183)) { - x_193 = lean::alloc_cnstr(0, 4, 0); -} else { - x_193 = x_183; -} -lean::cnstr_set(x_193, 0, x_180); -lean::cnstr_set(x_193, 1, x_181); -lean::cnstr_set(x_193, 2, x_182); -lean::cnstr_set(x_193, 3, x_192); -if (x_179 == 0) -{ -uint8 x_194; obj* x_195; -x_194 = 0; -x_195 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_195, 0, x_193); -lean::cnstr_set_scalar(x_195, sizeof(void*)*1, x_194); -x_12 = x_195; -x_13 = x_138; -goto block_87; -} -else -{ -uint8 x_196; obj* x_197; -x_196 = 1; -x_197 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_197, 0, x_193); -lean::cnstr_set_scalar(x_197, sizeof(void*)*1, x_196); -x_12 = x_197; -x_13 = x_138; -goto block_87; -} -} -} -} -block_87: -{ -if (lean::obj_tag(x_12) == 0) -{ -uint8 x_14; -x_14 = !lean::is_exclusive(x_12); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_15 = lean::cnstr_get(x_12, 0); -x_16 = lean::cnstr_get(x_12, 1); -x_17 = lean::cnstr_get(x_12, 2); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_15); -lean::cnstr_set(x_18, 1, x_2); -lean::inc(x_18); -x_19 = l_List_reverse___rarg(x_18); -x_20 = l_Lean_Parser_noKind; -x_21 = l_Lean_Parser_Syntax_mkNode(x_20, x_19); -lean::inc(x_16); -x_22 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__4(x_1, x_18, x_11, x_4, x_5, x_16, x_13); -lean::dec(x_11); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -uint8 x_24; -lean::dec(x_21); -lean::free_heap_obj(x_12); -lean::dec(x_16); -x_24 = !lean::is_exclusive(x_22); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_22, 0); -lean::dec(x_25); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_23); -lean::cnstr_set(x_22, 0, x_26); -return x_22; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_22, 1); -lean::inc(x_27); -lean::dec(x_22); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_23); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -return x_29; -} -} -else -{ -uint8 x_30; -x_30 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -if (x_30 == 0) -{ -uint8 x_31; -x_31 = !lean::is_exclusive(x_22); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_32 = lean::cnstr_get(x_22, 0); -lean::dec(x_32); -x_33 = lean::cnstr_get(x_23, 0); -lean::inc(x_33); -lean::dec(x_23); -x_34 = lean::cnstr_get(x_33, 2); -lean::inc(x_34); -lean::dec(x_33); -x_35 = l_mjoin___rarg___closed__1; -x_36 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_36, 0, x_34); -lean::closure_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_12, 2, x_37); -lean::cnstr_set(x_12, 0, x_21); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_12); -lean::cnstr_set(x_22, 0, x_38); -return x_22; -} -else -{ -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_39 = lean::cnstr_get(x_22, 1); -lean::inc(x_39); -lean::dec(x_22); -x_40 = lean::cnstr_get(x_23, 0); -lean::inc(x_40); -lean::dec(x_23); -x_41 = lean::cnstr_get(x_40, 2); -lean::inc(x_41); -lean::dec(x_40); -x_42 = l_mjoin___rarg___closed__1; -x_43 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_43, 0, x_41); -lean::closure_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_12, 2, x_44); -lean::cnstr_set(x_12, 0, x_21); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_12); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_39); -return x_46; -} -} -else -{ -uint8 x_47; -lean::dec(x_21); -lean::free_heap_obj(x_12); -lean::dec(x_16); -x_47 = !lean::is_exclusive(x_22); -if (x_47 == 0) -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_22, 0); -lean::dec(x_48); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_23); -lean::cnstr_set(x_22, 0, x_49); -return x_22; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; -x_50 = lean::cnstr_get(x_22, 1); -lean::inc(x_50); -lean::dec(x_22); -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_23); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_50); -return x_52; -} -} -} -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_53 = lean::cnstr_get(x_12, 0); -x_54 = lean::cnstr_get(x_12, 1); -x_55 = lean::cnstr_get(x_12, 2); -lean::inc(x_55); -lean::inc(x_54); -lean::inc(x_53); -lean::dec(x_12); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_53); -lean::cnstr_set(x_56, 1, x_2); -lean::inc(x_56); -x_57 = l_List_reverse___rarg(x_56); -x_58 = l_Lean_Parser_noKind; -x_59 = l_Lean_Parser_Syntax_mkNode(x_58, x_57); -lean::inc(x_54); -x_60 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__4(x_1, x_56, x_11, x_4, x_5, x_54, x_13); -lean::dec(x_11); -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -if (lean::obj_tag(x_61) == 0) -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; -lean::dec(x_59); -lean::dec(x_54); -x_62 = lean::cnstr_get(x_60, 1); -lean::inc(x_62); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - lean::cnstr_release(x_60, 1); - x_63 = x_60; -} else { - lean::dec_ref(x_60); - x_63 = lean::box(0); -} -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_61); -if (lean::is_scalar(x_63)) { - x_65 = lean::alloc_cnstr(0, 2, 0); -} else { - x_65 = x_63; -} -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_62); -return x_65; -} -else -{ -uint8 x_66; -x_66 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); -if (x_66 == 0) -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_67 = lean::cnstr_get(x_60, 1); -lean::inc(x_67); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - lean::cnstr_release(x_60, 1); - x_68 = x_60; -} else { - lean::dec_ref(x_60); - x_68 = lean::box(0); -} -x_69 = lean::cnstr_get(x_61, 0); -lean::inc(x_69); -lean::dec(x_61); -x_70 = lean::cnstr_get(x_69, 2); -lean::inc(x_70); -lean::dec(x_69); -x_71 = l_mjoin___rarg___closed__1; -x_72 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_72, 0, x_70); -lean::closure_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_73, 0, x_72); -x_74 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_74, 0, x_59); -lean::cnstr_set(x_74, 1, x_54); -lean::cnstr_set(x_74, 2, x_73); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_74); -if (lean::is_scalar(x_68)) { - x_76 = lean::alloc_cnstr(0, 2, 0); -} else { - x_76 = x_68; -} -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_67); -return x_76; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; -lean::dec(x_59); -lean::dec(x_54); -x_77 = lean::cnstr_get(x_60, 1); -lean::inc(x_77); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - lean::cnstr_release(x_60, 1); - x_78 = x_60; -} else { - lean::dec_ref(x_60); - x_78 = lean::box(0); -} -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_61); -if (lean::is_scalar(x_78)) { - x_80 = lean::alloc_cnstr(0, 2, 0); -} else { - x_80 = x_78; -} -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_77); -return x_80; -} -} -} -} -else -{ -uint8 x_81; -lean::dec(x_11); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_81 = !lean::is_exclusive(x_12); -if (x_81 == 0) -{ -obj* x_82; -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_12); -lean::cnstr_set(x_82, 1, x_13); -return x_82; -} -else -{ -obj* x_83; uint8 x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_12, 0); -x_84 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -lean::inc(x_83); -lean::dec(x_12); -x_85 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_85, 0, x_83); -lean::cnstr_set_scalar(x_85, sizeof(void*)*1, x_84); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_13); -return x_86; -} -} -} -} -else -{ -obj* x_198; obj* x_199; obj* x_200; obj* x_201; -lean::dec(x_2); -lean::dec(x_1); -x_198 = lean::box(0); -x_199 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_200 = l_mjoin___rarg___closed__1; -x_201 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_199, x_200, x_198, x_198, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -return x_201; -} -} -} -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3(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_10; uint8 x_11; -x_6 = l_String_OldIterator_remaining___main(x_4); -x_7 = lean::box(0); -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_add(x_6, x_8); -lean::dec(x_6); -x_10 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__4(x_1, x_7, x_9, x_2, x_3, x_4, x_5); -lean::dec(x_9); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_10, 0); -x_13 = l_Lean_Parser_finishCommentBlock___closed__2; -x_14 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_12); -lean::cnstr_set(x_10, 0, x_14); -return x_10; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_10, 0); -x_16 = lean::cnstr_get(x_10, 1); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_10); -x_17 = l_Lean_Parser_finishCommentBlock___closed__2; -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_15); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_16); -return x_19; -} -} -} -obj* l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_4); -x_6 = l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3(x_1, x_2, x_3, x_4, x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -lean::dec(x_4); -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_6, 0); -lean::dec(x_9); -return x_6; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_6, 1); -lean::inc(x_10); -lean::dec(x_6); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_7); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -else -{ -uint8 x_12; -x_12 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_6); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_14 = lean::cnstr_get(x_6, 0); -lean::dec(x_14); -x_15 = lean::cnstr_get(x_7, 0); -lean::inc(x_15); -lean::dec(x_7); -x_16 = lean::cnstr_get(x_15, 2); -lean::inc(x_16); -lean::dec(x_15); -x_17 = l_mjoin___rarg___closed__1; -x_18 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_4); -lean::cnstr_set(x_21, 2, x_19); -lean::cnstr_set(x_6, 0, x_21); -return x_6; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_6, 1); -lean::inc(x_22); -lean::dec(x_6); -x_23 = lean::cnstr_get(x_7, 0); -lean::inc(x_23); -lean::dec(x_7); -x_24 = lean::cnstr_get(x_23, 2); -lean::inc(x_24); -lean::dec(x_23); -x_25 = l_mjoin___rarg___closed__1; -x_26 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_26, 0, x_24); -lean::closure_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_4); -lean::cnstr_set(x_29, 2, x_27); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_22); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_4); -x_31 = !lean::is_exclusive(x_6); -if (x_31 == 0) -{ -obj* x_32; -x_32 = lean::cnstr_get(x_6, 0); -lean::dec(x_32); -return x_6; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_6, 1); -lean::inc(x_33); -lean::dec(x_6); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_7); -lean::cnstr_set(x_34, 1, x_33); -return x_34; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -lean::dec(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_1); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_rawIdent_Parser___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_rawIdent_Parser___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__4___boxed(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; -x_8 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_3); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = l_Lean_Parser_maxPrec; -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_rawIdent_Parser___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_command_attrInstance; -x_14 = l_Lean_Parser_command_attrInstance_HasView; -x_15 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_13, x_12, x_14); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_15; -} -} -obj* _init_l_Lean_Parser_command_attrInstance_Parser___closed__1() { -_start: -{ -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_1 = l_Lean_Parser_maxPrec; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_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_attrInstance_Parser_Lean_Parser_HasTokens___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_rawIdent_Parser___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__1___boxed), 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); -return x_8; -} -} -obj* l_Lean_Parser_command_attrInstance_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_attrInstance; -x_6 = l_Lean_Parser_command_attrInstance_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_declAttributes() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("declAttributes"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_List_map___main___at_Lean_Parser_command_declAttributes_HasView_x27___elambda__1___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_List_map___main___at_Lean_Parser_command_declAttributes_HasView_x27___elambda__1___spec__1(x_5); -x_7 = lean::cnstr_get(x_4, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = l_Lean_Parser_command_attrInstance_HasView; -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -x_12 = lean::box(0); -lean::cnstr_set(x_1, 1, x_12); -lean::cnstr_set(x_1, 0, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_6); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_4, 0); -lean::inc(x_14); -lean::dec(x_4); -x_15 = lean::cnstr_get(x_7, 0); -lean::inc(x_15); -lean::dec(x_7); -x_16 = l_Lean_Parser_command_attrInstance_HasView; -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_19; obj* x_20; -x_19 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::cnstr_set(x_1, 1, x_19); -lean::cnstr_set(x_1, 0, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_6); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_15, 0); -lean::inc(x_21); -lean::dec(x_15); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_1, 1, x_22); -lean::cnstr_set(x_1, 0, x_23); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); -lean::cnstr_set(x_24, 1, x_1); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_6); -return x_25; -} -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_1, 0); -x_27 = lean::cnstr_get(x_1, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_1); -x_28 = l_List_map___main___at_Lean_Parser_command_declAttributes_HasView_x27___elambda__1___spec__1(x_27); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_26, 0); -lean::inc(x_30); -lean::dec(x_26); -x_31 = l_Lean_Parser_command_attrInstance_HasView; -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_30); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_28); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = lean::cnstr_get(x_26, 0); -lean::inc(x_37); -lean::dec(x_26); -x_38 = lean::cnstr_get(x_29, 0); -lean::inc(x_38); -lean::dec(x_29); -x_39 = l_Lean_Parser_command_attrInstance_HasView; -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; -x_42 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_28); -return x_44; -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_45 = lean::cnstr_get(x_38, 0); -lean::inc(x_45); -lean::dec(x_38); -x_46 = lean::box(0); -x_47 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_47, 0, x_45); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_46); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_41); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_28); -return x_50; -} -} -} -} -} -} -obj* l_Lean_Parser_command_declAttributes_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Parser_command_declAttributes_HasView_x27___elambda__1___spec__1(x_3); -x_6 = l_List_join___main___rarg(x_5); -x_7 = l_Lean_Parser_noKind; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::box(3); -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 = l_Lean_Parser_command_declAttributes; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_16 = lean::cnstr_get(x_4, 0); -lean::inc(x_16); -lean::dec(x_4); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_8); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::box(3); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -x_22 = l_Lean_Parser_command_declAttributes; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_2, 0); -lean::inc(x_24); -lean::dec(x_2); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_8); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_25); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_command_declAttributes; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_31 = lean::cnstr_get(x_4, 0); -lean::inc(x_31); -lean::dec(x_4); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, 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_9); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_8); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_25); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_command_declAttributes; -x_37 = l_Lean_Parser_Syntax_mkNode(x_36, x_35); -return x_37; -} -} -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -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_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -lean::dec(x_8); -x_9 = l_Lean_Parser_command_attrInstance_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_7); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::box(0); -lean::cnstr_set(x_3, 1, x_14); -lean::cnstr_set(x_3, 0, x_13); -return x_3; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = l_Lean_Parser_command_attrInstance_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_15); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::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); -return x_22; -} -} -else -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_3, 0); -lean::inc(x_23); -lean::dec(x_3); -x_24 = !lean::is_exclusive(x_5); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_5, 0); -x_26 = lean::cnstr_get(x_5, 1); -x_27 = l_Lean_Parser_command_attrInstance_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_23); -x_30 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1(x_1, x_2, x_26); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_25, 0); -lean::inc(x_31); -lean::dec(x_25); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_29); -lean::cnstr_set(x_34, 1, x_33); -lean::cnstr_set(x_5, 1, x_30); -lean::cnstr_set(x_5, 0, x_34); -return x_5; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_25); -x_35 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_29); -lean::cnstr_set(x_36, 1, x_35); -lean::cnstr_set(x_5, 1, x_30); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 0); -x_38 = lean::cnstr_get(x_5, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_5); -x_39 = l_Lean_Parser_command_attrInstance_HasView; -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_23); -x_42 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1(x_1, x_2, x_38); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_43 = lean::cnstr_get(x_37, 0); -lean::inc(x_43); -lean::dec(x_37); -x_44 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_41); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_42); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; -lean::dec(x_37); -x_48 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_41); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_42); -return x_50; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = l_Lean_Parser_command_attrInstance_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attrInstance_Parser), 4, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::mk_string(","); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_1); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2; -x_9 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3; -x_10 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1(x_8, x_9, x_7); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -lean::cnstr_set(x_11, 2, x_1); -return x_11; -} -} -} -obj* l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_53; -x_53 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__4; -return x_54; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -lean::dec(x_55); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -x_57 = lean::box(3); -x_2 = x_56; -x_3 = x_57; -goto block_52; -} -else -{ -obj* x_58; obj* x_59; -x_58 = lean::cnstr_get(x_56, 0); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_56, 1); -lean::inc(x_59); -lean::dec(x_56); -x_2 = x_59; -x_3 = x_58; -goto block_52; -} -} -block_52: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_3, 0); -lean::inc(x_49); -lean::dec(x_3); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_49); -x_4 = x_50; -goto block_48; -} -else -{ -obj* x_51; -lean::dec(x_3); -x_51 = lean::box(0); -x_4 = x_51; -goto block_48; -} -block_48: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_45; -x_45 = lean::box(3); -x_5 = x_2; -x_6 = x_45; -goto block_44; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_2, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_2, 1); -lean::inc(x_47); -lean::dec(x_2); -x_5 = x_47; -x_6 = x_46; -goto block_44; -} -block_44: -{ -obj* x_7; -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = lean::box(0); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_8); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_14); -lean::cnstr_set(x_15, 2, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_11); -x_16 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_16); -lean::cnstr_set(x_17, 2, x_8); -return x_17; -} -} -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_7); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = lean::cnstr_get(x_7, 0); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -x_21 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2; -x_22 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3; -x_23 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1(x_21, x_22, x_20); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_24; obj* x_25; -lean::free_heap_obj(x_7); -x_24 = lean::box(0); -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_23); -lean::cnstr_set(x_25, 2, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_5, 0); -lean::inc(x_26); -lean::dec(x_5); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -lean::dec(x_26); -lean::cnstr_set(x_7, 0, x_27); -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_7); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -lean::dec(x_26); -lean::free_heap_obj(x_7); -x_29 = lean::box(0); -x_30 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_30, 0, x_4); -lean::cnstr_set(x_30, 1, x_23); -lean::cnstr_set(x_30, 2, x_29); -return x_30; -} -} -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_7, 0); -lean::inc(x_31); -lean::dec(x_7); -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -lean::dec(x_31); -x_33 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2; -x_34 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3; -x_35 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1(x_33, x_34, x_32); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_36; obj* x_37; -x_36 = lean::box(0); -x_37 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_35); -lean::cnstr_set(x_37, 2, x_36); -return x_37; -} -else -{ -obj* x_38; -x_38 = lean::cnstr_get(x_5, 0); -lean::inc(x_38); -lean::dec(x_5); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; obj* x_41; -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -lean::dec(x_38); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_4); -lean::cnstr_set(x_41, 1, x_35); -lean::cnstr_set(x_41, 2, x_40); -return x_41; -} -else -{ -obj* x_42; obj* x_43; -lean::dec(x_38); -x_42 = lean::box(0); -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_35); -lean::cnstr_set(x_43, 2, x_42); -return x_43; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declAttributes_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declAttributes_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_declAttributes_HasView_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_declAttributes_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_declAttributes_HasView_x27; -return x_1; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, uint8 x_3, uint8 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; -x_11 = lean::mk_nat_obj(0u); -x_12 = lean::nat_dec_eq(x_6, x_11); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_265; obj* x_266; -x_13 = lean::mk_nat_obj(1u); -x_14 = lean::nat_sub(x_6, x_13); -if (x_4 == 0) -{ -obj* x_373; obj* x_374; -lean::inc(x_1); -lean::inc(x_8); -lean::inc(x_7); -x_373 = lean::apply_4(x_1, x_7, x_8, x_9, x_10); -x_374 = lean::cnstr_get(x_373, 0); -lean::inc(x_374); -if (lean::obj_tag(x_374) == 0) -{ -obj* x_375; uint8 x_376; -x_375 = lean::cnstr_get(x_373, 1); -lean::inc(x_375); -lean::dec(x_373); -x_376 = !lean::is_exclusive(x_374); -if (x_376 == 0) -{ -obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; -x_377 = lean::cnstr_get(x_374, 0); -x_378 = lean::cnstr_get(x_374, 2); -x_379 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_379, 0, x_377); -x_380 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_374, 2, x_380); -lean::cnstr_set(x_374, 0, x_379); -x_381 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_378, x_374); -x_265 = x_381; -x_266 = x_375; -goto block_372; -} -else -{ -obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; obj* x_388; -x_382 = lean::cnstr_get(x_374, 0); -x_383 = lean::cnstr_get(x_374, 1); -x_384 = lean::cnstr_get(x_374, 2); -lean::inc(x_384); -lean::inc(x_383); -lean::inc(x_382); -lean::dec(x_374); -x_385 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_385, 0, x_382); -x_386 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_387 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_387, 0, x_385); -lean::cnstr_set(x_387, 1, x_383); -lean::cnstr_set(x_387, 2, x_386); -x_388 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_384, x_387); -x_265 = x_388; -x_266 = x_375; -goto block_372; -} -} -else -{ -obj* x_389; uint8 x_390; -x_389 = lean::cnstr_get(x_373, 1); -lean::inc(x_389); -lean::dec(x_373); -x_390 = !lean::is_exclusive(x_374); -if (x_390 == 0) -{ -x_265 = x_374; -x_266 = x_389; -goto block_372; -} -else -{ -obj* x_391; uint8 x_392; obj* x_393; -x_391 = lean::cnstr_get(x_374, 0); -x_392 = lean::cnstr_get_scalar(x_374, sizeof(void*)*1); -lean::inc(x_391); -lean::dec(x_374); -x_393 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_393, 0, x_391); -lean::cnstr_set_scalar(x_393, sizeof(void*)*1, x_392); -x_265 = x_393; -x_266 = x_389; -goto block_372; -} -} -} -else -{ -obj* x_394; obj* x_395; obj* x_396; -x_394 = lean::box(0); -lean::inc(x_1); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -x_395 = lean::apply_4(x_1, x_7, x_8, x_9, x_10); -x_396 = lean::cnstr_get(x_395, 0); -lean::inc(x_396); -if (lean::obj_tag(x_396) == 0) -{ -obj* x_397; uint8 x_398; -x_397 = lean::cnstr_get(x_395, 1); -lean::inc(x_397); -lean::dec(x_395); -x_398 = !lean::is_exclusive(x_396); -if (x_398 == 0) -{ -obj* x_399; obj* x_400; obj* x_401; obj* x_402; obj* x_403; -x_399 = lean::cnstr_get(x_396, 0); -x_400 = lean::cnstr_get(x_396, 2); -x_401 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_401, 0, x_399); -x_402 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_396, 2, x_402); -lean::cnstr_set(x_396, 0, x_401); -x_403 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_400, x_396); -if (lean::obj_tag(x_403) == 0) -{ -lean::dec(x_9); -x_265 = x_403; -x_266 = x_397; -goto block_372; -} -else -{ -uint8 x_404; -x_404 = lean::cnstr_get_scalar(x_403, sizeof(void*)*1); -if (x_404 == 0) -{ -obj* x_405; obj* x_406; obj* x_407; obj* x_408; obj* x_409; obj* x_410; -x_405 = lean::cnstr_get(x_403, 0); -lean::inc(x_405); -lean::dec(x_403); -x_406 = lean::cnstr_get(x_405, 2); -lean::inc(x_406); -lean::dec(x_405); -x_407 = l_mjoin___rarg___closed__1; -x_408 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_408, 0, x_406); -lean::closure_set(x_408, 1, x_407); -x_409 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_409, 0, x_408); -x_410 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_410, 0, x_394); -lean::cnstr_set(x_410, 1, x_9); -lean::cnstr_set(x_410, 2, x_409); -x_265 = x_410; -x_266 = x_397; -goto block_372; -} -else -{ -lean::dec(x_9); -x_265 = x_403; -x_266 = x_397; -goto block_372; -} -} -} -else -{ -obj* x_411; obj* x_412; obj* x_413; obj* x_414; obj* x_415; obj* x_416; obj* x_417; -x_411 = lean::cnstr_get(x_396, 0); -x_412 = lean::cnstr_get(x_396, 1); -x_413 = lean::cnstr_get(x_396, 2); -lean::inc(x_413); -lean::inc(x_412); -lean::inc(x_411); -lean::dec(x_396); -x_414 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_414, 0, x_411); -x_415 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_416 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_416, 0, x_414); -lean::cnstr_set(x_416, 1, x_412); -lean::cnstr_set(x_416, 2, x_415); -x_417 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_413, x_416); -if (lean::obj_tag(x_417) == 0) -{ -lean::dec(x_9); -x_265 = x_417; -x_266 = x_397; -goto block_372; -} -else -{ -uint8 x_418; -x_418 = lean::cnstr_get_scalar(x_417, sizeof(void*)*1); -if (x_418 == 0) -{ -obj* x_419; obj* x_420; obj* x_421; obj* x_422; obj* x_423; obj* x_424; -x_419 = lean::cnstr_get(x_417, 0); -lean::inc(x_419); -lean::dec(x_417); -x_420 = lean::cnstr_get(x_419, 2); -lean::inc(x_420); -lean::dec(x_419); -x_421 = l_mjoin___rarg___closed__1; -x_422 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_422, 0, x_420); -lean::closure_set(x_422, 1, x_421); -x_423 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_423, 0, x_422); -x_424 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_424, 0, x_394); -lean::cnstr_set(x_424, 1, x_9); -lean::cnstr_set(x_424, 2, x_423); -x_265 = x_424; -x_266 = x_397; -goto block_372; -} -else -{ -lean::dec(x_9); -x_265 = x_417; -x_266 = x_397; -goto block_372; -} -} -} -} -else -{ -uint8 x_425; -x_425 = lean::cnstr_get_scalar(x_396, sizeof(void*)*1); -if (x_425 == 0) -{ -obj* x_426; obj* x_427; obj* x_428; obj* x_429; obj* x_430; obj* x_431; obj* x_432; -x_426 = lean::cnstr_get(x_395, 1); -lean::inc(x_426); -lean::dec(x_395); -x_427 = lean::cnstr_get(x_396, 0); -lean::inc(x_427); -lean::dec(x_396); -x_428 = lean::cnstr_get(x_427, 2); -lean::inc(x_428); -lean::dec(x_427); -x_429 = l_mjoin___rarg___closed__1; -x_430 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_430, 0, x_428); -lean::closure_set(x_430, 1, x_429); -x_431 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_431, 0, x_430); -x_432 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_432, 0, x_394); -lean::cnstr_set(x_432, 1, x_9); -lean::cnstr_set(x_432, 2, x_431); -x_265 = x_432; -x_266 = x_426; -goto block_372; -} -else -{ -obj* x_433; uint8 x_434; -lean::dec(x_9); -x_433 = lean::cnstr_get(x_395, 1); -lean::inc(x_433); -lean::dec(x_395); -x_434 = !lean::is_exclusive(x_396); -if (x_434 == 0) -{ -x_265 = x_396; -x_266 = x_433; -goto block_372; -} -else -{ -obj* x_435; obj* x_436; -x_435 = lean::cnstr_get(x_396, 0); -lean::inc(x_435); -lean::dec(x_396); -x_436 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_436, 0, x_435); -lean::cnstr_set_scalar(x_436, sizeof(void*)*1, x_425); -x_265 = x_436; -x_266 = x_433; -goto block_372; -} -} -} -} -block_264: -{ -if (lean::obj_tag(x_15) == 0) -{ -obj* x_17; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -lean::dec(x_1); -x_18 = !lean::is_exclusive(x_15); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_19 = lean::cnstr_get(x_15, 2); -x_20 = lean::cnstr_get(x_15, 0); -lean::dec(x_20); -x_21 = l_List_reverse___rarg(x_5); -x_22 = l_Lean_Parser_noKind; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_15, 2, x_24); -lean::cnstr_set(x_15, 0, x_23); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_15); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_16); -return x_26; -} -else -{ -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; -x_27 = lean::cnstr_get(x_15, 1); -x_28 = lean::cnstr_get(x_15, 2); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_15); -x_29 = l_List_reverse___rarg(x_5); -x_30 = l_Lean_Parser_noKind; -x_31 = l_Lean_Parser_Syntax_mkNode(x_30, x_29); -x_32 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_27); -lean::cnstr_set(x_33, 2, x_32); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_28, x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_16); -return x_35; -} -} -else -{ -uint8 x_36; -x_36 = !lean::is_exclusive(x_15); -if (x_36 == 0) -{ -obj* x_37; obj* x_38; obj* x_39; uint8 x_40; -x_37 = lean::cnstr_get(x_15, 1); -x_38 = lean::cnstr_get(x_15, 2); -x_39 = lean::cnstr_get(x_15, 0); -lean::dec(x_39); -x_40 = !lean::is_exclusive(x_17); -if (x_40 == 0) -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -x_41 = lean::cnstr_get(x_17, 0); -x_91 = lean::box(0); -lean::inc(x_2); -lean::inc(x_37); -lean::inc(x_8); -lean::inc(x_7); -x_92 = lean::apply_4(x_2, x_7, x_8, x_37, x_16); -x_93 = lean::cnstr_get(x_92, 0); -lean::inc(x_93); -x_94 = lean::cnstr_get(x_92, 1); -lean::inc(x_94); -lean::dec(x_92); -x_95 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_93); -if (lean::obj_tag(x_95) == 0) -{ -uint8 x_96; -x_96 = !lean::is_exclusive(x_95); -if (x_96 == 0) -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_97 = lean::cnstr_get(x_95, 0); -x_98 = lean::cnstr_get(x_95, 2); -lean::cnstr_set(x_17, 0, x_97); -x_99 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_95, 2, x_99); -lean::cnstr_set(x_95, 0, x_17); -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_95); -if (lean::obj_tag(x_100) == 0) -{ -lean::free_heap_obj(x_15); -lean::dec(x_37); -x_42 = x_100; -x_43 = x_94; -goto block_90; -} -else -{ -uint8 x_101; -x_101 = lean::cnstr_get_scalar(x_100, sizeof(void*)*1); -if (x_101 == 0) -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_102 = lean::cnstr_get(x_100, 0); -lean::inc(x_102); -lean::dec(x_100); -x_103 = lean::cnstr_get(x_102, 2); -lean::inc(x_103); -lean::dec(x_102); -x_104 = l_mjoin___rarg___closed__1; -x_105 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_105, 0, x_103); -lean::closure_set(x_105, 1, x_104); -x_106 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_106, 0, x_105); -lean::cnstr_set(x_15, 2, x_106); -lean::cnstr_set(x_15, 0, x_91); -x_42 = x_15; -x_43 = x_94; -goto block_90; -} -else -{ -lean::free_heap_obj(x_15); -lean::dec(x_37); -x_42 = x_100; -x_43 = x_94; -goto block_90; -} -} -} -else -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_107 = lean::cnstr_get(x_95, 0); -x_108 = lean::cnstr_get(x_95, 1); -x_109 = lean::cnstr_get(x_95, 2); -lean::inc(x_109); -lean::inc(x_108); -lean::inc(x_107); -lean::dec(x_95); -lean::cnstr_set(x_17, 0, x_107); -x_110 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_111 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_111, 0, x_17); -lean::cnstr_set(x_111, 1, x_108); -lean::cnstr_set(x_111, 2, x_110); -x_112 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_109, x_111); -if (lean::obj_tag(x_112) == 0) -{ -lean::free_heap_obj(x_15); -lean::dec(x_37); -x_42 = x_112; -x_43 = x_94; -goto block_90; -} -else -{ -uint8 x_113; -x_113 = lean::cnstr_get_scalar(x_112, sizeof(void*)*1); -if (x_113 == 0) -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_114 = lean::cnstr_get(x_112, 0); -lean::inc(x_114); -lean::dec(x_112); -x_115 = lean::cnstr_get(x_114, 2); -lean::inc(x_115); -lean::dec(x_114); -x_116 = l_mjoin___rarg___closed__1; -x_117 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_117, 0, x_115); -lean::closure_set(x_117, 1, x_116); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -lean::cnstr_set(x_15, 2, x_118); -lean::cnstr_set(x_15, 0, x_91); -x_42 = x_15; -x_43 = x_94; -goto block_90; -} -else -{ -lean::free_heap_obj(x_15); -lean::dec(x_37); -x_42 = x_112; -x_43 = x_94; -goto block_90; -} -} -} -} -else -{ -uint8 x_119; -x_119 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -if (x_119 == 0) -{ -obj* x_120; obj* x_121; obj* x_122; obj* x_123; -x_120 = lean::cnstr_get(x_95, 0); -lean::inc(x_120); -lean::dec(x_95); -x_121 = lean::cnstr_get(x_120, 2); -lean::inc(x_121); -lean::dec(x_120); -x_122 = l_mjoin___rarg___closed__1; -x_123 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_123, 0, x_121); -lean::closure_set(x_123, 1, x_122); -lean::cnstr_set(x_17, 0, x_123); -lean::cnstr_set(x_15, 2, x_17); -lean::cnstr_set(x_15, 0, x_91); -x_42 = x_15; -x_43 = x_94; -goto block_90; -} -else -{ -uint8 x_124; -lean::free_heap_obj(x_17); -lean::free_heap_obj(x_15); -lean::dec(x_37); -x_124 = !lean::is_exclusive(x_95); -if (x_124 == 0) -{ -x_42 = x_95; -x_43 = x_94; -goto block_90; -} -else -{ -obj* x_125; obj* x_126; -x_125 = lean::cnstr_get(x_95, 0); -lean::inc(x_125); -lean::dec(x_95); -x_126 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_126, 0, x_125); -lean::cnstr_set_scalar(x_126, sizeof(void*)*1, x_119); -x_42 = x_126; -x_43 = x_94; -goto block_90; -} -} -} -block_90: -{ -if (lean::obj_tag(x_42) == 0) -{ -obj* x_44; -x_44 = lean::cnstr_get(x_42, 0); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -uint8 x_45; -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -lean::dec(x_1); -x_45 = !lean::is_exclusive(x_42); -if (x_45 == 0) -{ -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; -x_46 = lean::cnstr_get(x_42, 2); -x_47 = lean::cnstr_get(x_42, 0); -lean::dec(x_47); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_41); -lean::cnstr_set(x_48, 1, x_5); -x_49 = l_List_reverse___rarg(x_48); -x_50 = l_Lean_Parser_noKind; -x_51 = l_Lean_Parser_Syntax_mkNode(x_50, x_49); -x_52 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_42, 2, x_52); -lean::cnstr_set(x_42, 0, x_51); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_46, x_42); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_43); -return x_55; -} -else -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_56 = lean::cnstr_get(x_42, 1); -x_57 = lean::cnstr_get(x_42, 2); -lean::inc(x_57); -lean::inc(x_56); -lean::dec(x_42); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_41); -lean::cnstr_set(x_58, 1, x_5); -x_59 = l_List_reverse___rarg(x_58); -x_60 = l_Lean_Parser_noKind; -x_61 = l_Lean_Parser_Syntax_mkNode(x_60, x_59); -x_62 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_63 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_63, 0, x_61); -lean::cnstr_set(x_63, 1, x_56); -lean::cnstr_set(x_63, 2, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_63); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_64); -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_43); -return x_66; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; uint8 x_73; -x_67 = lean::cnstr_get(x_42, 1); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_42, 2); -lean::inc(x_68); -lean::dec(x_42); -x_69 = lean::cnstr_get(x_44, 0); -lean::inc(x_69); -lean::dec(x_44); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_41); -lean::cnstr_set(x_70, 1, x_5); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_69); -lean::cnstr_set(x_71, 1, x_70); -x_72 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_3, x_71, x_14, x_7, x_8, x_67, x_43); -lean::dec(x_14); -x_73 = !lean::is_exclusive(x_72); -if (x_73 == 0) -{ -obj* x_74; obj* x_75; obj* x_76; -x_74 = lean::cnstr_get(x_72, 0); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_68, x_74); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_75); -lean::cnstr_set(x_72, 0, x_76); -return x_72; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_77 = lean::cnstr_get(x_72, 0); -x_78 = lean::cnstr_get(x_72, 1); -lean::inc(x_78); -lean::inc(x_77); -lean::dec(x_72); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_68, x_77); -x_80 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_79); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_78); -return x_81; -} -} -} -else -{ -uint8 x_82; -lean::dec(x_41); -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_82 = !lean::is_exclusive(x_42); -if (x_82 == 0) -{ -obj* x_83; obj* x_84; -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_42); -x_84 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_43); -return x_84; -} -else -{ -obj* x_85; uint8 x_86; obj* x_87; obj* x_88; obj* x_89; -x_85 = lean::cnstr_get(x_42, 0); -x_86 = lean::cnstr_get_scalar(x_42, sizeof(void*)*1); -lean::inc(x_85); -lean::dec(x_42); -x_87 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_87, 0, x_85); -lean::cnstr_set_scalar(x_87, sizeof(void*)*1, x_86); -x_88 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_87); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_43); -return x_89; -} -} -} -} -else -{ -obj* x_127; obj* x_128; obj* x_129; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; -x_127 = lean::cnstr_get(x_17, 0); -lean::inc(x_127); -lean::dec(x_17); -x_162 = lean::box(0); -lean::inc(x_2); -lean::inc(x_37); -lean::inc(x_8); -lean::inc(x_7); -x_163 = lean::apply_4(x_2, x_7, x_8, x_37, x_16); -x_164 = lean::cnstr_get(x_163, 0); -lean::inc(x_164); -x_165 = lean::cnstr_get(x_163, 1); -lean::inc(x_165); -lean::dec(x_163); -x_166 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_164); -if (lean::obj_tag(x_166) == 0) -{ -obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; -x_167 = lean::cnstr_get(x_166, 0); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_166, 1); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_166, 2); -lean::inc(x_169); -if (lean::is_exclusive(x_166)) { - lean::cnstr_release(x_166, 0); - lean::cnstr_release(x_166, 1); - lean::cnstr_release(x_166, 2); - x_170 = x_166; -} else { - lean::dec_ref(x_166); - x_170 = lean::box(0); -} -x_171 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_171, 0, x_167); -x_172 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_170)) { - x_173 = lean::alloc_cnstr(0, 3, 0); -} else { - x_173 = x_170; -} -lean::cnstr_set(x_173, 0, x_171); -lean::cnstr_set(x_173, 1, x_168); -lean::cnstr_set(x_173, 2, x_172); -x_174 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_169, x_173); -if (lean::obj_tag(x_174) == 0) -{ -lean::free_heap_obj(x_15); -lean::dec(x_37); -x_128 = x_174; -x_129 = x_165; -goto block_161; -} -else -{ -uint8 x_175; -x_175 = lean::cnstr_get_scalar(x_174, sizeof(void*)*1); -if (x_175 == 0) -{ -obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; -x_176 = lean::cnstr_get(x_174, 0); -lean::inc(x_176); -lean::dec(x_174); -x_177 = lean::cnstr_get(x_176, 2); -lean::inc(x_177); -lean::dec(x_176); -x_178 = l_mjoin___rarg___closed__1; -x_179 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_179, 0, x_177); -lean::closure_set(x_179, 1, x_178); -x_180 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_180, 0, x_179); -lean::cnstr_set(x_15, 2, x_180); -lean::cnstr_set(x_15, 0, x_162); -x_128 = x_15; -x_129 = x_165; -goto block_161; -} -else -{ -lean::free_heap_obj(x_15); -lean::dec(x_37); -x_128 = x_174; -x_129 = x_165; -goto block_161; -} -} -} -else -{ -uint8 x_181; -x_181 = lean::cnstr_get_scalar(x_166, sizeof(void*)*1); -if (x_181 == 0) -{ -obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; -x_182 = lean::cnstr_get(x_166, 0); -lean::inc(x_182); -lean::dec(x_166); -x_183 = lean::cnstr_get(x_182, 2); -lean::inc(x_183); -lean::dec(x_182); -x_184 = l_mjoin___rarg___closed__1; -x_185 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_185, 0, x_183); -lean::closure_set(x_185, 1, x_184); -x_186 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_186, 0, x_185); -lean::cnstr_set(x_15, 2, x_186); -lean::cnstr_set(x_15, 0, x_162); -x_128 = x_15; -x_129 = x_165; -goto block_161; -} -else -{ -obj* x_187; obj* x_188; obj* x_189; -lean::free_heap_obj(x_15); -lean::dec(x_37); -x_187 = lean::cnstr_get(x_166, 0); -lean::inc(x_187); -if (lean::is_exclusive(x_166)) { - lean::cnstr_release(x_166, 0); - x_188 = x_166; -} else { - lean::dec_ref(x_166); - x_188 = lean::box(0); -} -if (lean::is_scalar(x_188)) { - x_189 = lean::alloc_cnstr(1, 1, 1); -} else { - x_189 = x_188; -} -lean::cnstr_set(x_189, 0, x_187); -lean::cnstr_set_scalar(x_189, sizeof(void*)*1, x_181); -x_128 = x_189; -x_129 = x_165; -goto block_161; -} -} -block_161: -{ -if (lean::obj_tag(x_128) == 0) -{ -obj* x_130; -x_130 = lean::cnstr_get(x_128, 0); -lean::inc(x_130); -if (lean::obj_tag(x_130) == 0) -{ -obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -lean::dec(x_1); -x_131 = lean::cnstr_get(x_128, 1); -lean::inc(x_131); -x_132 = lean::cnstr_get(x_128, 2); -lean::inc(x_132); -if (lean::is_exclusive(x_128)) { - lean::cnstr_release(x_128, 0); - lean::cnstr_release(x_128, 1); - lean::cnstr_release(x_128, 2); - x_133 = x_128; -} else { - lean::dec_ref(x_128); - x_133 = lean::box(0); -} -x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_127); -lean::cnstr_set(x_134, 1, x_5); -x_135 = l_List_reverse___rarg(x_134); -x_136 = l_Lean_Parser_noKind; -x_137 = l_Lean_Parser_Syntax_mkNode(x_136, x_135); -x_138 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_133)) { - x_139 = lean::alloc_cnstr(0, 3, 0); -} else { - x_139 = x_133; -} -lean::cnstr_set(x_139, 0, x_137); -lean::cnstr_set(x_139, 1, x_131); -lean::cnstr_set(x_139, 2, x_138); -x_140 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_132, x_139); -x_141 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_140); -x_142 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_142, 0, x_141); -lean::cnstr_set(x_142, 1, x_129); -return x_142; -} -else -{ -obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; -x_143 = lean::cnstr_get(x_128, 1); -lean::inc(x_143); -x_144 = lean::cnstr_get(x_128, 2); -lean::inc(x_144); -lean::dec(x_128); -x_145 = lean::cnstr_get(x_130, 0); -lean::inc(x_145); -lean::dec(x_130); -x_146 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_146, 0, x_127); -lean::cnstr_set(x_146, 1, x_5); -x_147 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_147, 0, x_145); -lean::cnstr_set(x_147, 1, x_146); -x_148 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_3, x_147, x_14, x_7, x_8, x_143, x_129); -lean::dec(x_14); -x_149 = lean::cnstr_get(x_148, 0); -lean::inc(x_149); -x_150 = lean::cnstr_get(x_148, 1); -lean::inc(x_150); -if (lean::is_exclusive(x_148)) { - lean::cnstr_release(x_148, 0); - lean::cnstr_release(x_148, 1); - x_151 = x_148; -} else { - lean::dec_ref(x_148); - x_151 = lean::box(0); -} -x_152 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_144, x_149); -x_153 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_152); -if (lean::is_scalar(x_151)) { - x_154 = lean::alloc_cnstr(0, 2, 0); -} else { - x_154 = x_151; -} -lean::cnstr_set(x_154, 0, x_153); -lean::cnstr_set(x_154, 1, x_150); -return x_154; -} -} -else -{ -obj* x_155; uint8 x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; -lean::dec(x_127); -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_155 = lean::cnstr_get(x_128, 0); -lean::inc(x_155); -x_156 = lean::cnstr_get_scalar(x_128, sizeof(void*)*1); -if (lean::is_exclusive(x_128)) { - lean::cnstr_release(x_128, 0); - x_157 = x_128; -} else { - lean::dec_ref(x_128); - x_157 = lean::box(0); -} -if (lean::is_scalar(x_157)) { - x_158 = lean::alloc_cnstr(1, 1, 1); -} else { - x_158 = x_157; -} -lean::cnstr_set(x_158, 0, x_155); -lean::cnstr_set_scalar(x_158, sizeof(void*)*1, x_156); -x_159 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_158); -x_160 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_160, 0, x_159); -lean::cnstr_set(x_160, 1, x_129); -return x_160; -} -} -} -} -else -{ -obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; -x_190 = lean::cnstr_get(x_15, 1); -x_191 = lean::cnstr_get(x_15, 2); -lean::inc(x_191); -lean::inc(x_190); -lean::dec(x_15); -x_192 = lean::cnstr_get(x_17, 0); -lean::inc(x_192); -if (lean::is_exclusive(x_17)) { - lean::cnstr_release(x_17, 0); - x_193 = x_17; -} else { - lean::dec_ref(x_17); - x_193 = lean::box(0); -} -x_228 = lean::box(0); -lean::inc(x_2); -lean::inc(x_190); -lean::inc(x_8); -lean::inc(x_7); -x_229 = lean::apply_4(x_2, x_7, x_8, x_190, x_16); -x_230 = lean::cnstr_get(x_229, 0); -lean::inc(x_230); -x_231 = lean::cnstr_get(x_229, 1); -lean::inc(x_231); -lean::dec(x_229); -x_232 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_230); -if (lean::obj_tag(x_232) == 0) -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; -x_233 = lean::cnstr_get(x_232, 0); -lean::inc(x_233); -x_234 = lean::cnstr_get(x_232, 1); -lean::inc(x_234); -x_235 = lean::cnstr_get(x_232, 2); -lean::inc(x_235); -if (lean::is_exclusive(x_232)) { - lean::cnstr_release(x_232, 0); - lean::cnstr_release(x_232, 1); - lean::cnstr_release(x_232, 2); - x_236 = x_232; -} else { - lean::dec_ref(x_232); - x_236 = lean::box(0); -} -if (lean::is_scalar(x_193)) { - x_237 = lean::alloc_cnstr(1, 1, 0); -} else { - x_237 = x_193; -} -lean::cnstr_set(x_237, 0, x_233); -x_238 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_236)) { - x_239 = lean::alloc_cnstr(0, 3, 0); -} else { - x_239 = x_236; -} -lean::cnstr_set(x_239, 0, x_237); -lean::cnstr_set(x_239, 1, x_234); -lean::cnstr_set(x_239, 2, x_238); -x_240 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_235, x_239); -if (lean::obj_tag(x_240) == 0) -{ -lean::dec(x_190); -x_194 = x_240; -x_195 = x_231; -goto block_227; -} -else -{ -uint8 x_241; -x_241 = lean::cnstr_get_scalar(x_240, sizeof(void*)*1); -if (x_241 == 0) -{ -obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; obj* x_247; -x_242 = lean::cnstr_get(x_240, 0); -lean::inc(x_242); -lean::dec(x_240); -x_243 = lean::cnstr_get(x_242, 2); -lean::inc(x_243); -lean::dec(x_242); -x_244 = l_mjoin___rarg___closed__1; -x_245 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_245, 0, x_243); -lean::closure_set(x_245, 1, x_244); -x_246 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_246, 0, x_245); -x_247 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_247, 0, x_228); -lean::cnstr_set(x_247, 1, x_190); -lean::cnstr_set(x_247, 2, x_246); -x_194 = x_247; -x_195 = x_231; -goto block_227; -} -else -{ -lean::dec(x_190); -x_194 = x_240; -x_195 = x_231; -goto block_227; -} -} -} -else -{ -uint8 x_248; -x_248 = lean::cnstr_get_scalar(x_232, sizeof(void*)*1); -if (x_248 == 0) -{ -obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; -x_249 = lean::cnstr_get(x_232, 0); -lean::inc(x_249); -lean::dec(x_232); -x_250 = lean::cnstr_get(x_249, 2); -lean::inc(x_250); -lean::dec(x_249); -x_251 = l_mjoin___rarg___closed__1; -x_252 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_252, 0, x_250); -lean::closure_set(x_252, 1, x_251); -if (lean::is_scalar(x_193)) { - x_253 = lean::alloc_cnstr(1, 1, 0); -} else { - x_253 = x_193; -} -lean::cnstr_set(x_253, 0, x_252); -x_254 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_254, 0, x_228); -lean::cnstr_set(x_254, 1, x_190); -lean::cnstr_set(x_254, 2, x_253); -x_194 = x_254; -x_195 = x_231; -goto block_227; -} -else -{ -obj* x_255; obj* x_256; obj* x_257; -lean::dec(x_193); -lean::dec(x_190); -x_255 = lean::cnstr_get(x_232, 0); -lean::inc(x_255); -if (lean::is_exclusive(x_232)) { - lean::cnstr_release(x_232, 0); - x_256 = x_232; -} else { - lean::dec_ref(x_232); - x_256 = lean::box(0); -} -if (lean::is_scalar(x_256)) { - x_257 = lean::alloc_cnstr(1, 1, 1); -} else { - x_257 = x_256; -} -lean::cnstr_set(x_257, 0, x_255); -lean::cnstr_set_scalar(x_257, sizeof(void*)*1, x_248); -x_194 = x_257; -x_195 = x_231; -goto block_227; -} -} -block_227: -{ -if (lean::obj_tag(x_194) == 0) -{ -obj* x_196; -x_196 = lean::cnstr_get(x_194, 0); -lean::inc(x_196); -if (lean::obj_tag(x_196) == 0) -{ -obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -lean::dec(x_1); -x_197 = lean::cnstr_get(x_194, 1); -lean::inc(x_197); -x_198 = lean::cnstr_get(x_194, 2); -lean::inc(x_198); -if (lean::is_exclusive(x_194)) { - lean::cnstr_release(x_194, 0); - lean::cnstr_release(x_194, 1); - lean::cnstr_release(x_194, 2); - x_199 = x_194; -} else { - lean::dec_ref(x_194); - x_199 = lean::box(0); -} -x_200 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_200, 0, x_192); -lean::cnstr_set(x_200, 1, x_5); -x_201 = l_List_reverse___rarg(x_200); -x_202 = l_Lean_Parser_noKind; -x_203 = l_Lean_Parser_Syntax_mkNode(x_202, x_201); -x_204 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_199)) { - x_205 = lean::alloc_cnstr(0, 3, 0); -} else { - x_205 = x_199; -} -lean::cnstr_set(x_205, 0, x_203); -lean::cnstr_set(x_205, 1, x_197); -lean::cnstr_set(x_205, 2, x_204); -x_206 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_198, x_205); -x_207 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_191, x_206); -x_208 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_208, 0, x_207); -lean::cnstr_set(x_208, 1, x_195); -return x_208; -} -else -{ -obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; -x_209 = lean::cnstr_get(x_194, 1); -lean::inc(x_209); -x_210 = lean::cnstr_get(x_194, 2); -lean::inc(x_210); -lean::dec(x_194); -x_211 = lean::cnstr_get(x_196, 0); -lean::inc(x_211); -lean::dec(x_196); -x_212 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_212, 0, x_192); -lean::cnstr_set(x_212, 1, x_5); -x_213 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_213, 0, x_211); -lean::cnstr_set(x_213, 1, x_212); -x_214 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_3, x_213, x_14, x_7, x_8, x_209, x_195); -lean::dec(x_14); -x_215 = lean::cnstr_get(x_214, 0); -lean::inc(x_215); -x_216 = lean::cnstr_get(x_214, 1); -lean::inc(x_216); -if (lean::is_exclusive(x_214)) { - lean::cnstr_release(x_214, 0); - lean::cnstr_release(x_214, 1); - x_217 = x_214; -} else { - lean::dec_ref(x_214); - x_217 = lean::box(0); -} -x_218 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_210, x_215); -x_219 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_191, x_218); -if (lean::is_scalar(x_217)) { - x_220 = lean::alloc_cnstr(0, 2, 0); -} else { - x_220 = x_217; -} -lean::cnstr_set(x_220, 0, x_219); -lean::cnstr_set(x_220, 1, x_216); -return x_220; -} -} -else -{ -obj* x_221; uint8 x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; -lean::dec(x_192); -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_221 = lean::cnstr_get(x_194, 0); -lean::inc(x_221); -x_222 = lean::cnstr_get_scalar(x_194, sizeof(void*)*1); -if (lean::is_exclusive(x_194)) { - lean::cnstr_release(x_194, 0); - x_223 = x_194; -} else { - lean::dec_ref(x_194); - x_223 = lean::box(0); -} -if (lean::is_scalar(x_223)) { - x_224 = lean::alloc_cnstr(1, 1, 1); -} else { - x_224 = x_223; -} -lean::cnstr_set(x_224, 0, x_221); -lean::cnstr_set_scalar(x_224, sizeof(void*)*1, x_222); -x_225 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_191, x_224); -x_226 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_226, 0, x_225); -lean::cnstr_set(x_226, 1, x_195); -return x_226; -} -} -} -} -} -else -{ -uint8 x_258; -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_258 = !lean::is_exclusive(x_15); -if (x_258 == 0) -{ -obj* x_259; -x_259 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_259, 0, x_15); -lean::cnstr_set(x_259, 1, x_16); -return x_259; -} -else -{ -obj* x_260; uint8 x_261; obj* x_262; obj* x_263; -x_260 = lean::cnstr_get(x_15, 0); -x_261 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -lean::inc(x_260); -lean::dec(x_15); -x_262 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_262, 0, x_260); -lean::cnstr_set_scalar(x_262, sizeof(void*)*1, x_261); -x_263 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_263, 0, x_262); -lean::cnstr_set(x_263, 1, x_16); -return x_263; -} -} -} -block_372: -{ -if (lean::obj_tag(x_265) == 0) -{ -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -else -{ -obj* x_267; obj* x_268; -x_267 = lean::cnstr_get(x_265, 0); -lean::inc(x_267); -x_268 = lean::cnstr_get(x_267, 3); -lean::inc(x_268); -if (lean::obj_tag(x_268) == 0) -{ -uint8 x_269; -x_269 = !lean::is_exclusive(x_265); -if (x_269 == 0) -{ -uint8 x_270; obj* x_271; uint8 x_272; -x_270 = lean::cnstr_get_scalar(x_265, sizeof(void*)*1); -x_271 = lean::cnstr_get(x_265, 0); -lean::dec(x_271); -x_272 = !lean::is_exclusive(x_267); -if (x_272 == 0) -{ -obj* x_273; obj* x_274; obj* x_275; obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; -x_273 = lean::cnstr_get(x_267, 3); -lean::dec(x_273); -x_274 = lean::box(3); -lean::inc(x_5); -x_275 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_275, 0, x_274); -lean::cnstr_set(x_275, 1, x_5); -x_276 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_276, 0, x_274); -lean::cnstr_set(x_276, 1, x_275); -x_277 = l_List_reverse___rarg(x_276); -x_278 = l_Lean_Parser_noKind; -x_279 = l_Lean_Parser_Syntax_mkNode(x_278, x_277); -x_280 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_280, 0, x_279); -lean::cnstr_set(x_267, 3, x_280); -if (x_270 == 0) -{ -uint8 x_281; -x_281 = 0; -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_281); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -else -{ -uint8 x_282; -x_282 = 1; -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_282); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_283 = lean::cnstr_get(x_267, 0); -x_284 = lean::cnstr_get(x_267, 1); -x_285 = lean::cnstr_get(x_267, 2); -lean::inc(x_285); -lean::inc(x_284); -lean::inc(x_283); -lean::dec(x_267); -x_286 = lean::box(3); -lean::inc(x_5); -x_287 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_287, 0, x_286); -lean::cnstr_set(x_287, 1, x_5); -x_288 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_288, 0, x_286); -lean::cnstr_set(x_288, 1, x_287); -x_289 = l_List_reverse___rarg(x_288); -x_290 = l_Lean_Parser_noKind; -x_291 = l_Lean_Parser_Syntax_mkNode(x_290, x_289); -x_292 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_292, 0, x_291); -x_293 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_293, 0, x_283); -lean::cnstr_set(x_293, 1, x_284); -lean::cnstr_set(x_293, 2, x_285); -lean::cnstr_set(x_293, 3, x_292); -if (x_270 == 0) -{ -uint8 x_294; -x_294 = 0; -lean::cnstr_set(x_265, 0, x_293); -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_294); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -else -{ -uint8 x_295; -x_295 = 1; -lean::cnstr_set(x_265, 0, x_293); -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_295); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -} -} -else -{ -uint8 x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; obj* x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; -x_296 = lean::cnstr_get_scalar(x_265, sizeof(void*)*1); -lean::dec(x_265); -x_297 = lean::cnstr_get(x_267, 0); -lean::inc(x_297); -x_298 = lean::cnstr_get(x_267, 1); -lean::inc(x_298); -x_299 = lean::cnstr_get(x_267, 2); -lean::inc(x_299); -if (lean::is_exclusive(x_267)) { - lean::cnstr_release(x_267, 0); - lean::cnstr_release(x_267, 1); - lean::cnstr_release(x_267, 2); - lean::cnstr_release(x_267, 3); - x_300 = x_267; -} else { - lean::dec_ref(x_267); - x_300 = lean::box(0); -} -x_301 = lean::box(3); -lean::inc(x_5); -x_302 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_302, 0, x_301); -lean::cnstr_set(x_302, 1, x_5); -x_303 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_303, 0, x_301); -lean::cnstr_set(x_303, 1, x_302); -x_304 = l_List_reverse___rarg(x_303); -x_305 = l_Lean_Parser_noKind; -x_306 = l_Lean_Parser_Syntax_mkNode(x_305, x_304); -x_307 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_307, 0, x_306); -if (lean::is_scalar(x_300)) { - x_308 = lean::alloc_cnstr(0, 4, 0); -} else { - x_308 = x_300; -} -lean::cnstr_set(x_308, 0, x_297); -lean::cnstr_set(x_308, 1, x_298); -lean::cnstr_set(x_308, 2, x_299); -lean::cnstr_set(x_308, 3, x_307); -if (x_296 == 0) -{ -uint8 x_309; obj* x_310; -x_309 = 0; -x_310 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_310, 0, x_308); -lean::cnstr_set_scalar(x_310, sizeof(void*)*1, x_309); -x_15 = x_310; -x_16 = x_266; -goto block_264; -} -else -{ -uint8 x_311; obj* x_312; -x_311 = 1; -x_312 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_312, 0, x_308); -lean::cnstr_set_scalar(x_312, sizeof(void*)*1, x_311); -x_15 = x_312; -x_16 = x_266; -goto block_264; -} -} -} -else -{ -uint8 x_313; -x_313 = !lean::is_exclusive(x_265); -if (x_313 == 0) -{ -uint8 x_314; obj* x_315; uint8 x_316; -x_314 = lean::cnstr_get_scalar(x_265, sizeof(void*)*1); -x_315 = lean::cnstr_get(x_265, 0); -lean::dec(x_315); -x_316 = !lean::is_exclusive(x_267); -if (x_316 == 0) -{ -obj* x_317; uint8 x_318; -x_317 = lean::cnstr_get(x_267, 3); -lean::dec(x_317); -x_318 = !lean::is_exclusive(x_268); -if (x_318 == 0) -{ -obj* x_319; obj* x_320; obj* x_321; obj* x_322; obj* x_323; obj* x_324; obj* x_325; -x_319 = lean::cnstr_get(x_268, 0); -lean::inc(x_5); -x_320 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_320, 0, x_319); -lean::cnstr_set(x_320, 1, x_5); -x_321 = lean::box(3); -x_322 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_322, 0, x_321); -lean::cnstr_set(x_322, 1, x_320); -x_323 = l_List_reverse___rarg(x_322); -x_324 = l_Lean_Parser_noKind; -x_325 = l_Lean_Parser_Syntax_mkNode(x_324, x_323); -lean::cnstr_set(x_268, 0, x_325); -if (x_314 == 0) -{ -uint8 x_326; -x_326 = 0; -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_326); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -else -{ -uint8 x_327; -x_327 = 1; -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_327); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -} -else -{ -obj* x_328; obj* x_329; obj* x_330; obj* x_331; obj* x_332; obj* x_333; obj* x_334; obj* x_335; -x_328 = lean::cnstr_get(x_268, 0); -lean::inc(x_328); -lean::dec(x_268); -lean::inc(x_5); -x_329 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_329, 0, x_328); -lean::cnstr_set(x_329, 1, x_5); -x_330 = lean::box(3); -x_331 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_331, 0, x_330); -lean::cnstr_set(x_331, 1, x_329); -x_332 = l_List_reverse___rarg(x_331); -x_333 = l_Lean_Parser_noKind; -x_334 = l_Lean_Parser_Syntax_mkNode(x_333, x_332); -x_335 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_335, 0, x_334); -lean::cnstr_set(x_267, 3, x_335); -if (x_314 == 0) -{ -uint8 x_336; -x_336 = 0; -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_336); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -else -{ -uint8 x_337; -x_337 = 1; -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_337); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -} -} -else -{ -obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; obj* x_344; obj* x_345; obj* x_346; obj* x_347; obj* x_348; obj* x_349; obj* x_350; -x_338 = lean::cnstr_get(x_267, 0); -x_339 = lean::cnstr_get(x_267, 1); -x_340 = lean::cnstr_get(x_267, 2); -lean::inc(x_340); -lean::inc(x_339); -lean::inc(x_338); -lean::dec(x_267); -x_341 = lean::cnstr_get(x_268, 0); -lean::inc(x_341); -if (lean::is_exclusive(x_268)) { - lean::cnstr_release(x_268, 0); - x_342 = x_268; -} else { - lean::dec_ref(x_268); - x_342 = lean::box(0); -} -lean::inc(x_5); -x_343 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_343, 0, x_341); -lean::cnstr_set(x_343, 1, x_5); -x_344 = lean::box(3); -x_345 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_345, 0, x_344); -lean::cnstr_set(x_345, 1, x_343); -x_346 = l_List_reverse___rarg(x_345); -x_347 = l_Lean_Parser_noKind; -x_348 = l_Lean_Parser_Syntax_mkNode(x_347, x_346); -if (lean::is_scalar(x_342)) { - x_349 = lean::alloc_cnstr(1, 1, 0); -} else { - x_349 = x_342; -} -lean::cnstr_set(x_349, 0, x_348); -x_350 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_350, 0, x_338); -lean::cnstr_set(x_350, 1, x_339); -lean::cnstr_set(x_350, 2, x_340); -lean::cnstr_set(x_350, 3, x_349); -if (x_314 == 0) -{ -uint8 x_351; -x_351 = 0; -lean::cnstr_set(x_265, 0, x_350); -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_351); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -else -{ -uint8 x_352; -x_352 = 1; -lean::cnstr_set(x_265, 0, x_350); -lean::cnstr_set_scalar(x_265, sizeof(void*)*1, x_352); -x_15 = x_265; -x_16 = x_266; -goto block_264; -} -} -} -else -{ -uint8 x_353; obj* x_354; obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; obj* x_364; obj* x_365; obj* x_366; obj* x_367; -x_353 = lean::cnstr_get_scalar(x_265, sizeof(void*)*1); -lean::dec(x_265); -x_354 = lean::cnstr_get(x_267, 0); -lean::inc(x_354); -x_355 = lean::cnstr_get(x_267, 1); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_267, 2); -lean::inc(x_356); -if (lean::is_exclusive(x_267)) { - lean::cnstr_release(x_267, 0); - lean::cnstr_release(x_267, 1); - lean::cnstr_release(x_267, 2); - lean::cnstr_release(x_267, 3); - x_357 = x_267; -} else { - lean::dec_ref(x_267); - x_357 = lean::box(0); -} -x_358 = lean::cnstr_get(x_268, 0); -lean::inc(x_358); -if (lean::is_exclusive(x_268)) { - lean::cnstr_release(x_268, 0); - x_359 = x_268; -} else { - lean::dec_ref(x_268); - x_359 = lean::box(0); -} -lean::inc(x_5); -x_360 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_360, 0, x_358); -lean::cnstr_set(x_360, 1, x_5); -x_361 = lean::box(3); -x_362 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_362, 0, x_361); -lean::cnstr_set(x_362, 1, x_360); -x_363 = l_List_reverse___rarg(x_362); -x_364 = l_Lean_Parser_noKind; -x_365 = l_Lean_Parser_Syntax_mkNode(x_364, x_363); -if (lean::is_scalar(x_359)) { - x_366 = lean::alloc_cnstr(1, 1, 0); -} else { - x_366 = x_359; -} -lean::cnstr_set(x_366, 0, x_365); -if (lean::is_scalar(x_357)) { - x_367 = lean::alloc_cnstr(0, 4, 0); -} else { - x_367 = x_357; -} -lean::cnstr_set(x_367, 0, x_354); -lean::cnstr_set(x_367, 1, x_355); -lean::cnstr_set(x_367, 2, x_356); -lean::cnstr_set(x_367, 3, x_366); -if (x_353 == 0) -{ -uint8 x_368; obj* x_369; -x_368 = 0; -x_369 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_369, 0, x_367); -lean::cnstr_set_scalar(x_369, sizeof(void*)*1, x_368); -x_15 = x_369; -x_16 = x_266; -goto block_264; -} -else -{ -uint8 x_370; obj* x_371; -x_370 = 1; -x_371 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_371, 0, x_367); -lean::cnstr_set_scalar(x_371, sizeof(void*)*1, x_370); -x_15 = x_371; -x_16 = x_266; -goto block_264; -} -} -} -} -} -} -else -{ -obj* x_437; obj* x_438; obj* x_439; obj* x_440; -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_437 = lean::box(0); -x_438 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_439 = l_mjoin___rarg___closed__1; -x_440 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_438, x_439, x_437, x_437, x_7, x_8, x_9, x_10); -lean::dec(x_8); -lean::dec(x_7); -return x_440; -} -} -} -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, uint8 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_12; obj* x_13; uint8 x_14; -x_8 = l_String_OldIterator_remaining___main(x_6); -x_9 = lean::box(0); -x_10 = lean::mk_nat_obj(1u); -x_11 = lean::nat_add(x_8, x_10); -lean::dec(x_8); -x_12 = 0; -x_13 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_12, x_9, x_11, x_4, x_5, x_6, x_7); -lean::dec(x_11); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_13, 0); -x_16 = l_Lean_Parser_finishCommentBlock___closed__2; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_15); -lean::cnstr_set(x_13, 0, x_17); -return x_13; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = lean::cnstr_get(x_13, 0); -x_19 = lean::cnstr_get(x_13, 1); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_13); -x_20 = l_Lean_Parser_finishCommentBlock___closed__2; -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_18); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_19); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::mk_string("@["); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_string(","); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens; -x_7 = l_Lean_Parser_Combinators_sepBy1_tokens___rarg(x_6, x_5); -lean::dec(x_5); -x_8 = lean::mk_string("]"); -x_9 = l_Lean_Parser_symbol_tokens___rarg(x_8, x_2); -lean::dec(x_8); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_10); -lean::dec(x_9); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_11); -lean::dec(x_11); -lean::dec(x_7); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_12); -lean::dec(x_12); -lean::dec(x_3); -x_14 = l_Lean_Parser_tokens___rarg(x_13); -lean::dec(x_13); -return x_14; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2___boxed(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_3); -lean::dec(x_3); -x_12 = lean::unbox(x_4); -lean::dec(x_4); -x_13 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); -lean::dec(x_6); -return x_13; -} -} -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed(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_3); -lean::dec(x_3); -x_9 = l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_8, x_4, x_5, x_6, x_7); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 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; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("@["); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::mk_string(","); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_8); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attrInstance_Parser), 4, 0); -x_15 = 1; -x_16 = lean::box(x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_17, 0, x_14); -lean::closure_set(x_17, 1, x_13); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::mk_string("]"); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_8); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_17); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_9); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_command_declAttributes; -x_27 = l_Lean_Parser_command_declAttributes_HasView; -x_28 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_26, x_25, x_27); -lean::dec(x_25); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_28; -} -} -obj* _init_l_Lean_Parser_command_declAttributes_Parser___closed__1() { -_start: -{ -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; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_1 = lean::mk_string("@["); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(","); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_attrInstance_Parser), 4, 0); -x_11 = 1; -x_12 = lean::box(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_13, 0, x_10); -lean::closure_set(x_13, 1, x_9); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::mk_string("]"); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_13); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_5); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -} -obj* l_Lean_Parser_command_declAttributes_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_declAttributes; -x_6 = l_Lean_Parser_command_declAttributes_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_visibility() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("visibility"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_visibility; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_visibility; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_command_visibility_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__1; -return x_4; -} -else -{ -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_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_visibility; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_visibility; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -} -obj* _init_l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("visibility"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_visibility_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__4; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -lean::dec(x_22); -if (x_30 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_13); -return x_32; -} -else -{ -obj* x_33; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_33 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__1; -return x_33; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_28, 0); -lean::inc(x_34); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_34); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_13); -return x_35; -} -else -{ -obj* x_36; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_36 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__2; -return x_36; -} -} -} -else -{ -obj* x_37; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_37 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_37; -} -} -} -} -} -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_13, 0); -lean::inc(x_38); -lean::dec(x_13); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -switch (lean::obj_tag(x_39)) { -case 0: -{ -obj* x_40; -lean::dec(x_38); -x_40 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_40; -} -case 1: -{ -obj* x_41; -lean::dec(x_39); -lean::dec(x_38); -x_41 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_41; -} -default: -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; uint8 x_46; -x_42 = lean::cnstr_get(x_38, 1); -lean::inc(x_42); -lean::dec(x_38); -x_43 = lean::cnstr_get(x_39, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_39, 1); -lean::inc(x_44); -lean::dec(x_39); -x_45 = lean::box(0); -x_46 = lean_name_dec_eq(x_43, x_45); -lean::dec(x_43); -if (x_46 == 0) -{ -obj* x_47; -lean::dec(x_44); -lean::dec(x_42); -x_47 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_47; -} -else -{ -if (lean::obj_tag(x_42) == 0) -{ -obj* x_48; -lean::dec(x_44); -x_48 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_48; -} -else -{ -obj* x_49; -x_49 = lean::cnstr_get(x_42, 1); -lean::inc(x_49); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; -x_50 = lean::cnstr_get(x_42, 0); -lean::inc(x_50); -lean::dec(x_42); -x_51 = lean::mk_nat_obj(0u); -x_52 = lean::nat_dec_eq(x_44, x_51); -lean::dec(x_44); -if (x_52 == 0) -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::cnstr_get(x_50, 0); -lean::inc(x_53); -lean::dec(x_50); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -else -{ -obj* x_56; -lean::dec(x_50); -x_56 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__1; -return x_56; -} -} -else -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; -x_57 = lean::cnstr_get(x_50, 0); -lean::inc(x_57); -lean::dec(x_50); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -return x_59; -} -else -{ -obj* x_60; -lean::dec(x_50); -x_60 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__2; -return x_60; -} -} -} -else -{ -obj* x_61; -lean::dec(x_49); -lean::dec(x_44); -lean::dec(x_42); -x_61 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_61; -} -} -} -} -} -} -} -} -else -{ -obj* x_62; -lean::dec(x_11); -lean::dec(x_6); -x_62 = l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3; -return x_62; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_visibility_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_visibility_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_visibility_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_visibility_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_visibility_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_visibility_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_visibility_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_declModifiers() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("declModifiers"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_noKind; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__2() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_noKind; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -x_6 = l_Lean_Parser_Syntax_mkNode(x_4, x_1); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_1); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_5); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -obj* l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_82; -x_82 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_8 = x_82; -goto block_81; -} -else -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; -x_83 = lean::cnstr_get(x_2, 0); -lean::inc(x_83); -lean::dec(x_2); -x_84 = l_Lean_Parser_command_docComment_HasView; -x_85 = lean::cnstr_get(x_84, 1); -lean::inc(x_85); -x_86 = lean::apply_1(x_85, x_83); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_7); -x_88 = l_Lean_Parser_noKind; -x_89 = l_Lean_Parser_Syntax_mkNode(x_88, x_87); -x_8 = x_89; -goto block_81; -} -block_81: -{ -obj* x_9; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_73; -x_73 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_9 = x_73; -goto block_72; -} -else -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_74 = lean::cnstr_get(x_3, 0); -lean::inc(x_74); -lean::dec(x_3); -x_75 = l_Lean_Parser_command_declAttributes_HasView; -x_76 = lean::cnstr_get(x_75, 1); -lean::inc(x_76); -x_77 = lean::apply_1(x_76, x_74); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_7); -x_79 = l_Lean_Parser_noKind; -x_80 = l_Lean_Parser_Syntax_mkNode(x_79, x_78); -x_9 = x_80; -goto block_72; -} -block_72: -{ -obj* x_10; -if (lean::obj_tag(x_4) == 0) -{ -obj* x_64; -x_64 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_10 = x_64; -goto block_63; -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_65 = lean::cnstr_get(x_4, 0); -lean::inc(x_65); -lean::dec(x_4); -x_66 = l_Lean_Parser_command_visibility_HasView; -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -x_68 = lean::apply_1(x_67, x_65); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_7); -x_70 = l_Lean_Parser_noKind; -x_71 = l_Lean_Parser_Syntax_mkNode(x_70, x_69); -x_10 = x_71; -goto block_63; -} -block_63: -{ -obj* x_11; obj* x_12; -if (lean::obj_tag(x_5) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_33 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2; -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_10); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_9); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_8); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Parser_command_declModifiers; -x_38 = l_Lean_Parser_Syntax_mkNode(x_37, x_36); -return x_38; -} -else -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_6, 0); -lean::inc(x_39); -lean::dec(x_6); -x_40 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_11 = x_40; -x_12 = x_39; -goto block_32; -} -} -else -{ -obj* x_41; -x_41 = lean::cnstr_get(x_5, 0); -lean::inc(x_41); -lean::dec(x_5); -if (lean::obj_tag(x_41) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_42 = l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__2; -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_10); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_9); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_8); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_command_declModifiers; -x_47 = l_Lean_Parser_Syntax_mkNode(x_46, x_45); -return x_47; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_6, 0); -lean::inc(x_48); -lean::dec(x_6); -x_49 = l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -x_11 = x_49; -x_12 = x_48; -goto block_32; -} -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_41, 0); -lean::inc(x_50); -lean::dec(x_41); -x_51 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_51, 0, x_50); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_7); -x_53 = l_Lean_Parser_noKind; -x_54 = l_Lean_Parser_Syntax_mkNode(x_53, x_52); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_55 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_54); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_10); -lean::cnstr_set(x_57, 1, x_56); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_9); -lean::cnstr_set(x_58, 1, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_8); -lean::cnstr_set(x_59, 1, x_58); -x_60 = l_Lean_Parser_command_declModifiers; -x_61 = l_Lean_Parser_Syntax_mkNode(x_60, x_59); -return x_61; -} -else -{ -obj* x_62; -x_62 = lean::cnstr_get(x_6, 0); -lean::inc(x_62); -lean::dec(x_6); -x_11 = x_54; -x_12 = x_62; -goto block_32; -} -} -} -block_32: -{ -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__1; -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_10); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_9); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_8); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_command_declModifiers; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -else -{ -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; -x_20 = lean::cnstr_get(x_12, 0); -lean::inc(x_20); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_7); -x_23 = l_Lean_Parser_noKind; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_7); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_11); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_10); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_9); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_8); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_Lean_Parser_command_declModifiers; -x_31 = l_Lean_Parser_Syntax_mkNode(x_30, x_29); -return x_31; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_visibility_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_declAttributes_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_docComment_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_110; obj* x_111; -x_110 = lean::box(3); -x_111 = l_Lean_Parser_Syntax_asNode___main(x_110); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_112; -x_112 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3; -x_1 = x_112; -goto block_109; -} -else -{ -uint8 x_113; -x_113 = !lean::is_exclusive(x_111); -if (x_113 == 0) -{ -obj* x_114; obj* x_115; -x_114 = lean::cnstr_get(x_111, 0); -x_115 = lean::cnstr_get(x_114, 1); -lean::inc(x_115); -lean::dec(x_114); -if (lean::obj_tag(x_115) == 0) -{ -obj* x_116; -lean::free_heap_obj(x_111); -x_116 = lean::box(0); -x_1 = x_116; -goto block_109; -} -else -{ -obj* x_117; -x_117 = lean::cnstr_get(x_115, 1); -lean::inc(x_117); -if (lean::obj_tag(x_117) == 0) -{ -obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_118 = lean::cnstr_get(x_115, 0); -lean::inc(x_118); -lean::dec(x_115); -x_119 = l_Lean_Parser_command_docComment_HasView; -x_120 = lean::cnstr_get(x_119, 0); -lean::inc(x_120); -x_121 = lean::apply_1(x_120, x_118); -lean::cnstr_set(x_111, 0, x_121); -x_1 = x_111; -goto block_109; -} -else -{ -obj* x_122; -lean::dec(x_117); -lean::dec(x_115); -lean::free_heap_obj(x_111); -x_122 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3; -x_1 = x_122; -goto block_109; -} -} -} -else -{ -obj* x_123; obj* x_124; -x_123 = lean::cnstr_get(x_111, 0); -lean::inc(x_123); -lean::dec(x_111); -x_124 = lean::cnstr_get(x_123, 1); -lean::inc(x_124); -lean::dec(x_123); -if (lean::obj_tag(x_124) == 0) -{ -obj* x_125; -x_125 = lean::box(0); -x_1 = x_125; -goto block_109; -} -else -{ -obj* x_126; -x_126 = lean::cnstr_get(x_124, 1); -lean::inc(x_126); -if (lean::obj_tag(x_126) == 0) -{ -obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; -x_127 = lean::cnstr_get(x_124, 0); -lean::inc(x_127); -lean::dec(x_124); -x_128 = l_Lean_Parser_command_docComment_HasView; -x_129 = lean::cnstr_get(x_128, 0); -lean::inc(x_129); -x_130 = lean::apply_1(x_129, x_127); -x_131 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_131, 0, x_130); -x_1 = x_131; -goto block_109; -} -else -{ -obj* x_132; -lean::dec(x_126); -lean::dec(x_124); -x_132 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3; -x_1 = x_132; -goto block_109; -} -} -} -} -block_109: -{ -obj* x_2; obj* x_86; obj* x_87; -x_86 = lean::box(3); -x_87 = l_Lean_Parser_Syntax_asNode___main(x_86); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_88; -x_88 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2; -x_2 = x_88; -goto block_85; -} -else -{ -uint8 x_89; -x_89 = !lean::is_exclusive(x_87); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_87, 0); -x_91 = lean::cnstr_get(x_90, 1); -lean::inc(x_91); -lean::dec(x_90); -if (lean::obj_tag(x_91) == 0) -{ -obj* x_92; -lean::free_heap_obj(x_87); -x_92 = lean::box(0); -x_2 = x_92; -goto block_85; -} -else -{ -obj* x_93; -x_93 = lean::cnstr_get(x_91, 1); -lean::inc(x_93); -if (lean::obj_tag(x_93) == 0) -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_94 = lean::cnstr_get(x_91, 0); -lean::inc(x_94); -lean::dec(x_91); -x_95 = l_Lean_Parser_command_declAttributes_HasView; -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::apply_1(x_96, x_94); -lean::cnstr_set(x_87, 0, x_97); -x_2 = x_87; -goto block_85; -} -else -{ -obj* x_98; -lean::dec(x_93); -lean::dec(x_91); -lean::free_heap_obj(x_87); -x_98 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2; -x_2 = x_98; -goto block_85; -} -} -} -else -{ -obj* x_99; obj* x_100; -x_99 = lean::cnstr_get(x_87, 0); -lean::inc(x_99); -lean::dec(x_87); -x_100 = lean::cnstr_get(x_99, 1); -lean::inc(x_100); -lean::dec(x_99); -if (lean::obj_tag(x_100) == 0) -{ -obj* x_101; -x_101 = lean::box(0); -x_2 = x_101; -goto block_85; -} -else -{ -obj* x_102; -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -if (lean::obj_tag(x_102) == 0) -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_103 = lean::cnstr_get(x_100, 0); -lean::inc(x_103); -lean::dec(x_100); -x_104 = l_Lean_Parser_command_declAttributes_HasView; -x_105 = lean::cnstr_get(x_104, 0); -lean::inc(x_105); -x_106 = lean::apply_1(x_105, x_103); -x_107 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_107, 0, x_106); -x_2 = x_107; -goto block_85; -} -else -{ -obj* x_108; -lean::dec(x_102); -lean::dec(x_100); -x_108 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2; -x_2 = x_108; -goto block_85; -} -} -} -} -block_85: -{ -obj* x_3; obj* x_62; obj* x_63; -x_62 = lean::box(3); -x_63 = l_Lean_Parser_Syntax_asNode___main(x_62); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; -x_64 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1; -x_3 = x_64; -goto block_61; -} -else -{ -uint8 x_65; -x_65 = !lean::is_exclusive(x_63); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; -x_66 = lean::cnstr_get(x_63, 0); -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -lean::dec(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; -lean::free_heap_obj(x_63); -x_68 = lean::box(0); -x_3 = x_68; -goto block_61; -} -else -{ -obj* x_69; -x_69 = lean::cnstr_get(x_67, 1); -lean::inc(x_69); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_70 = lean::cnstr_get(x_67, 0); -lean::inc(x_70); -lean::dec(x_67); -x_71 = l_Lean_Parser_command_visibility_HasView; -x_72 = lean::cnstr_get(x_71, 0); -lean::inc(x_72); -x_73 = lean::apply_1(x_72, x_70); -lean::cnstr_set(x_63, 0, x_73); -x_3 = x_63; -goto block_61; -} -else -{ -obj* x_74; -lean::dec(x_69); -lean::dec(x_67); -lean::free_heap_obj(x_63); -x_74 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1; -x_3 = x_74; -goto block_61; -} -} -} -else -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_63, 0); -lean::inc(x_75); -lean::dec(x_63); -x_76 = lean::cnstr_get(x_75, 1); -lean::inc(x_76); -lean::dec(x_75); -if (lean::obj_tag(x_76) == 0) -{ -obj* x_77; -x_77 = lean::box(0); -x_3 = x_77; -goto block_61; -} -else -{ -obj* x_78; -x_78 = lean::cnstr_get(x_76, 1); -lean::inc(x_78); -if (lean::obj_tag(x_78) == 0) -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_79 = lean::cnstr_get(x_76, 0); -lean::inc(x_79); -lean::dec(x_76); -x_80 = l_Lean_Parser_command_visibility_HasView; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_82 = lean::apply_1(x_81, x_79); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -x_3 = x_83; -goto block_61; -} -else -{ -obj* x_84; -lean::dec(x_78); -lean::dec(x_76); -x_84 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1; -x_3 = x_84; -goto block_61; -} -} -} -} -block_61: -{ -obj* x_4; obj* x_38; obj* x_39; -x_38 = lean::box(3); -x_39 = l_Lean_Parser_Syntax_asNode___main(x_38); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; -x_40 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_40; -goto block_37; -} -else -{ -uint8 x_41; -x_41 = !lean::is_exclusive(x_39); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_39, 0); -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -lean::dec(x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -lean::free_heap_obj(x_39); -x_44 = lean::box(0); -x_4 = x_44; -goto block_37; -} -else -{ -obj* x_45; -x_45 = lean::cnstr_get(x_43, 1); -lean::inc(x_45); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; -x_46 = lean::cnstr_get(x_43, 0); -lean::inc(x_46); -lean::dec(x_43); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -lean::dec(x_46); -lean::cnstr_set(x_39, 0, x_47); -x_48 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_48, 0, x_39); -x_4 = x_48; -goto block_37; -} -else -{ -obj* x_49; -lean::dec(x_46); -lean::free_heap_obj(x_39); -x_49 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_49; -goto block_37; -} -} -else -{ -obj* x_50; -lean::dec(x_45); -lean::dec(x_43); -lean::free_heap_obj(x_39); -x_50 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_50; -goto block_37; -} -} -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_39, 0); -lean::inc(x_51); -lean::dec(x_39); -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -lean::dec(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; -x_53 = lean::box(0); -x_4 = x_53; -goto block_37; -} -else -{ -obj* x_54; -x_54 = lean::cnstr_get(x_52, 1); -lean::inc(x_54); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; -x_55 = lean::cnstr_get(x_52, 0); -lean::inc(x_55); -lean::dec(x_52); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; obj* x_58; -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -lean::dec(x_55); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_4 = x_58; -goto block_37; -} -else -{ -obj* x_59; -lean::dec(x_55); -x_59 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_59; -goto block_37; -} -} -else -{ -obj* x_60; -lean::dec(x_54); -lean::dec(x_52); -x_60 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_60; -goto block_37; -} -} -} -} -block_37: -{ -obj* x_5; obj* x_6; -x_5 = lean::box(3); -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_1); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set(x_8, 2, x_3); -lean::cnstr_set(x_8, 3, x_4); -lean::cnstr_set(x_8, 4, x_7); -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_6, 0); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -lean::free_heap_obj(x_6); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_2); -lean::cnstr_set(x_13, 2, x_3); -lean::cnstr_set(x_13, 3, x_4); -lean::cnstr_set(x_13, 4, x_12); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; -x_15 = lean::cnstr_get(x_11, 0); -lean::inc(x_15); -lean::dec(x_11); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -lean::dec(x_15); -lean::cnstr_set(x_6, 0, x_16); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_6); -x_18 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_18, 0, x_1); -lean::cnstr_set(x_18, 1, x_2); -lean::cnstr_set(x_18, 2, x_3); -lean::cnstr_set(x_18, 3, x_4); -lean::cnstr_set(x_18, 4, x_17); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_15); -lean::free_heap_obj(x_6); -x_19 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_2); -lean::cnstr_set(x_20, 2, x_3); -lean::cnstr_set(x_20, 3, x_4); -lean::cnstr_set(x_20, 4, x_19); -return x_20; -} -} -else -{ -obj* x_21; obj* x_22; -lean::dec(x_14); -lean::dec(x_11); -lean::free_heap_obj(x_6); -x_21 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_22 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_22, 0, x_1); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_3); -lean::cnstr_set(x_22, 3, x_4); -lean::cnstr_set(x_22, 4, x_21); -return x_22; -} -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_6, 0); -lean::inc(x_23); -lean::dec(x_6); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::box(0); -x_26 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_26, 0, x_1); -lean::cnstr_set(x_26, 1, x_2); -lean::cnstr_set(x_26, 2, x_3); -lean::cnstr_set(x_26, 3, x_4); -lean::cnstr_set(x_26, 4, x_25); -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; -x_28 = lean::cnstr_get(x_24, 0); -lean::inc(x_28); -lean::dec(x_24); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -lean::dec(x_28); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_32, 0, x_1); -lean::cnstr_set(x_32, 1, x_2); -lean::cnstr_set(x_32, 2, x_3); -lean::cnstr_set(x_32, 3, x_4); -lean::cnstr_set(x_32, 4, x_31); -return x_32; -} -else -{ -obj* x_33; obj* x_34; -lean::dec(x_28); -x_33 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_34 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_34, 0, x_1); -lean::cnstr_set(x_34, 1, x_2); -lean::cnstr_set(x_34, 2, x_3); -lean::cnstr_set(x_34, 3, x_4); -lean::cnstr_set(x_34, 4, x_33); -return x_34; -} -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_27); -lean::dec(x_24); -x_35 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_36, 0, x_1); -lean::cnstr_set(x_36, 1, x_2); -lean::cnstr_set(x_36, 2, x_3); -lean::cnstr_set(x_36, 3, x_4); -lean::cnstr_set(x_36, 4, x_35); -return x_36; -} -} -} -} -} -} -} -} -} -} -obj* l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_154; -x_154 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_154) == 0) -{ -obj* x_155; -x_155 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__4; -return x_155; -} -else -{ -obj* x_156; obj* x_157; -x_156 = lean::cnstr_get(x_154, 0); -lean::inc(x_156); -lean::dec(x_154); -x_157 = lean::cnstr_get(x_156, 1); -lean::inc(x_157); -lean::dec(x_156); -if (lean::obj_tag(x_157) == 0) -{ -obj* x_158; -x_158 = lean::box(3); -x_2 = x_157; -x_3 = x_158; -goto block_153; -} -else -{ -obj* x_159; obj* x_160; -x_159 = lean::cnstr_get(x_157, 0); -lean::inc(x_159); -x_160 = lean::cnstr_get(x_157, 1); -lean::inc(x_160); -lean::dec(x_157); -x_2 = x_160; -x_3 = x_159; -goto block_153; -} -} -block_153: -{ -obj* x_4; obj* x_131; -x_131 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_131) == 0) -{ -obj* x_132; -x_132 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3; -x_4 = x_132; -goto block_130; -} -else -{ -uint8 x_133; -x_133 = !lean::is_exclusive(x_131); -if (x_133 == 0) -{ -obj* x_134; obj* x_135; -x_134 = lean::cnstr_get(x_131, 0); -x_135 = lean::cnstr_get(x_134, 1); -lean::inc(x_135); -lean::dec(x_134); -if (lean::obj_tag(x_135) == 0) -{ -obj* x_136; -lean::free_heap_obj(x_131); -x_136 = lean::box(0); -x_4 = x_136; -goto block_130; -} -else -{ -obj* x_137; -x_137 = lean::cnstr_get(x_135, 1); -lean::inc(x_137); -if (lean::obj_tag(x_137) == 0) -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_138 = lean::cnstr_get(x_135, 0); -lean::inc(x_138); -lean::dec(x_135); -x_139 = l_Lean_Parser_command_docComment_HasView; -x_140 = lean::cnstr_get(x_139, 0); -lean::inc(x_140); -x_141 = lean::apply_1(x_140, x_138); -lean::cnstr_set(x_131, 0, x_141); -x_4 = x_131; -goto block_130; -} -else -{ -obj* x_142; -lean::dec(x_137); -lean::dec(x_135); -lean::free_heap_obj(x_131); -x_142 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3; -x_4 = x_142; -goto block_130; -} -} -} -else -{ -obj* x_143; obj* x_144; -x_143 = lean::cnstr_get(x_131, 0); -lean::inc(x_143); -lean::dec(x_131); -x_144 = lean::cnstr_get(x_143, 1); -lean::inc(x_144); -lean::dec(x_143); -if (lean::obj_tag(x_144) == 0) -{ -obj* x_145; -x_145 = lean::box(0); -x_4 = x_145; -goto block_130; -} -else -{ -obj* x_146; -x_146 = lean::cnstr_get(x_144, 1); -lean::inc(x_146); -if (lean::obj_tag(x_146) == 0) -{ -obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_147 = lean::cnstr_get(x_144, 0); -lean::inc(x_147); -lean::dec(x_144); -x_148 = l_Lean_Parser_command_docComment_HasView; -x_149 = lean::cnstr_get(x_148, 0); -lean::inc(x_149); -x_150 = lean::apply_1(x_149, x_147); -x_151 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_151, 0, x_150); -x_4 = x_151; -goto block_130; -} -else -{ -obj* x_152; -lean::dec(x_146); -lean::dec(x_144); -x_152 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3; -x_4 = x_152; -goto block_130; -} -} -} -} -block_130: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_127; -x_127 = lean::box(3); -x_5 = x_2; -x_6 = x_127; -goto block_126; -} -else -{ -obj* x_128; obj* x_129; -x_128 = lean::cnstr_get(x_2, 0); -lean::inc(x_128); -x_129 = lean::cnstr_get(x_2, 1); -lean::inc(x_129); -lean::dec(x_2); -x_5 = x_129; -x_6 = x_128; -goto block_126; -} -block_126: -{ -obj* x_7; obj* x_104; -x_104 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_104) == 0) -{ -obj* x_105; -x_105 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2; -x_7 = x_105; -goto block_103; -} -else -{ -uint8 x_106; -x_106 = !lean::is_exclusive(x_104); -if (x_106 == 0) -{ -obj* x_107; obj* x_108; -x_107 = lean::cnstr_get(x_104, 0); -x_108 = lean::cnstr_get(x_107, 1); -lean::inc(x_108); -lean::dec(x_107); -if (lean::obj_tag(x_108) == 0) -{ -obj* x_109; -lean::free_heap_obj(x_104); -x_109 = lean::box(0); -x_7 = x_109; -goto block_103; -} -else -{ -obj* x_110; -x_110 = lean::cnstr_get(x_108, 1); -lean::inc(x_110); -if (lean::obj_tag(x_110) == 0) -{ -obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_111 = lean::cnstr_get(x_108, 0); -lean::inc(x_111); -lean::dec(x_108); -x_112 = l_Lean_Parser_command_declAttributes_HasView; -x_113 = lean::cnstr_get(x_112, 0); -lean::inc(x_113); -x_114 = lean::apply_1(x_113, x_111); -lean::cnstr_set(x_104, 0, x_114); -x_7 = x_104; -goto block_103; -} -else -{ -obj* x_115; -lean::dec(x_110); -lean::dec(x_108); -lean::free_heap_obj(x_104); -x_115 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2; -x_7 = x_115; -goto block_103; -} -} -} -else -{ -obj* x_116; obj* x_117; -x_116 = lean::cnstr_get(x_104, 0); -lean::inc(x_116); -lean::dec(x_104); -x_117 = lean::cnstr_get(x_116, 1); -lean::inc(x_117); -lean::dec(x_116); -if (lean::obj_tag(x_117) == 0) -{ -obj* x_118; -x_118 = lean::box(0); -x_7 = x_118; -goto block_103; -} -else -{ -obj* x_119; -x_119 = lean::cnstr_get(x_117, 1); -lean::inc(x_119); -if (lean::obj_tag(x_119) == 0) -{ -obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_120 = lean::cnstr_get(x_117, 0); -lean::inc(x_120); -lean::dec(x_117); -x_121 = l_Lean_Parser_command_declAttributes_HasView; -x_122 = lean::cnstr_get(x_121, 0); -lean::inc(x_122); -x_123 = lean::apply_1(x_122, x_120); -x_124 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_124, 0, x_123); -x_7 = x_124; -goto block_103; -} -else -{ -obj* x_125; -lean::dec(x_119); -lean::dec(x_117); -x_125 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2; -x_7 = x_125; -goto block_103; -} -} -} -} -block_103: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_100; -x_100 = lean::box(3); -x_8 = x_5; -x_9 = x_100; -goto block_99; -} -else -{ -obj* x_101; obj* x_102; -x_101 = lean::cnstr_get(x_5, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_5, 1); -lean::inc(x_102); -lean::dec(x_5); -x_8 = x_102; -x_9 = x_101; -goto block_99; -} -block_99: -{ -obj* x_10; obj* x_77; -x_77 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_77) == 0) -{ -obj* x_78; -x_78 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1; -x_10 = x_78; -goto block_76; -} -else -{ -uint8 x_79; -x_79 = !lean::is_exclusive(x_77); -if (x_79 == 0) -{ -obj* x_80; obj* x_81; -x_80 = lean::cnstr_get(x_77, 0); -x_81 = lean::cnstr_get(x_80, 1); -lean::inc(x_81); -lean::dec(x_80); -if (lean::obj_tag(x_81) == 0) -{ -obj* x_82; -lean::free_heap_obj(x_77); -x_82 = lean::box(0); -x_10 = x_82; -goto block_76; -} -else -{ -obj* x_83; -x_83 = lean::cnstr_get(x_81, 1); -lean::inc(x_83); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; -x_84 = lean::cnstr_get(x_81, 0); -lean::inc(x_84); -lean::dec(x_81); -x_85 = l_Lean_Parser_command_visibility_HasView; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_87 = lean::apply_1(x_86, x_84); -lean::cnstr_set(x_77, 0, x_87); -x_10 = x_77; -goto block_76; -} -else -{ -obj* x_88; -lean::dec(x_83); -lean::dec(x_81); -lean::free_heap_obj(x_77); -x_88 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1; -x_10 = x_88; -goto block_76; -} -} -} -else -{ -obj* x_89; obj* x_90; -x_89 = lean::cnstr_get(x_77, 0); -lean::inc(x_89); -lean::dec(x_77); -x_90 = lean::cnstr_get(x_89, 1); -lean::inc(x_90); -lean::dec(x_89); -if (lean::obj_tag(x_90) == 0) -{ -obj* x_91; -x_91 = lean::box(0); -x_10 = x_91; -goto block_76; -} -else -{ -obj* x_92; -x_92 = lean::cnstr_get(x_90, 1); -lean::inc(x_92); -if (lean::obj_tag(x_92) == 0) -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_93 = lean::cnstr_get(x_90, 0); -lean::inc(x_93); -lean::dec(x_90); -x_94 = l_Lean_Parser_command_visibility_HasView; -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -x_96 = lean::apply_1(x_95, x_93); -x_97 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_97, 0, x_96); -x_10 = x_97; -goto block_76; -} -else -{ -obj* x_98; -lean::dec(x_92); -lean::dec(x_90); -x_98 = l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1; -x_10 = x_98; -goto block_76; -} -} -} -} -block_76: -{ -obj* x_11; obj* x_12; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_73; -x_73 = lean::box(3); -x_11 = x_8; -x_12 = x_73; -goto block_72; -} -else -{ -obj* x_74; obj* x_75; -x_74 = lean::cnstr_get(x_8, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_8, 1); -lean::inc(x_75); -lean::dec(x_8); -x_11 = x_75; -x_12 = x_74; -goto block_72; -} -block_72: -{ -obj* x_13; obj* x_50; -x_50 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; -x_51 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_13 = x_51; -goto block_49; -} -else -{ -uint8 x_52; -x_52 = !lean::is_exclusive(x_50); -if (x_52 == 0) -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_50, 0); -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -lean::dec(x_53); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; -lean::free_heap_obj(x_50); -x_55 = lean::box(0); -x_13 = x_55; -goto block_49; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_54, 1); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -x_57 = lean::cnstr_get(x_54, 0); -lean::inc(x_57); -lean::dec(x_54); -if (lean::obj_tag(x_57) == 0) -{ -obj* x_58; obj* x_59; -x_58 = lean::cnstr_get(x_57, 0); -lean::inc(x_58); -lean::dec(x_57); -lean::cnstr_set(x_50, 0, x_58); -x_59 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_59, 0, x_50); -x_13 = x_59; -goto block_49; -} -else -{ -obj* x_60; -lean::dec(x_57); -lean::free_heap_obj(x_50); -x_60 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_13 = x_60; -goto block_49; -} -} -else -{ -obj* x_61; -lean::dec(x_56); -lean::dec(x_54); -lean::free_heap_obj(x_50); -x_61 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_13 = x_61; -goto block_49; -} -} -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_50, 0); -lean::inc(x_62); -lean::dec(x_50); -x_63 = lean::cnstr_get(x_62, 1); -lean::inc(x_63); -lean::dec(x_62); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; -x_64 = lean::box(0); -x_13 = x_64; -goto block_49; -} -else -{ -obj* x_65; -x_65 = lean::cnstr_get(x_63, 1); -lean::inc(x_65); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; -x_66 = lean::cnstr_get(x_63, 0); -lean::inc(x_66); -lean::dec(x_63); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; obj* x_68; obj* x_69; -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -lean::dec(x_66); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -x_69 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_69, 0, x_68); -x_13 = x_69; -goto block_49; -} -else -{ -obj* x_70; -lean::dec(x_66); -x_70 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_13 = x_70; -goto block_49; -} -} -else -{ -obj* x_71; -lean::dec(x_65); -lean::dec(x_63); -x_71 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_13 = x_71; -goto block_49; -} -} -} -} -block_49: -{ -obj* x_14; -if (lean::obj_tag(x_11) == 0) -{ -obj* x_47; -x_47 = lean::box(3); -x_14 = x_47; -goto block_46; -} -else -{ -obj* x_48; -x_48 = lean::cnstr_get(x_11, 0); -lean::inc(x_48); -lean::dec(x_11); -x_14 = x_48; -goto block_46; -} -block_46: -{ -obj* x_15; -x_15 = l_Lean_Parser_Syntax_asNode___main(x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; -x_16 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_7); -lean::cnstr_set(x_17, 2, x_10); -lean::cnstr_set(x_17, 3, x_13); -lean::cnstr_set(x_17, 4, x_16); -return x_17; -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_15); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_15, 0); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; obj* x_22; -lean::free_heap_obj(x_15); -x_21 = lean::box(0); -x_22 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_22, 0, x_4); -lean::cnstr_set(x_22, 1, x_7); -lean::cnstr_set(x_22, 2, x_10); -lean::cnstr_set(x_22, 3, x_13); -lean::cnstr_set(x_22, 4, x_21); -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_20, 1); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -x_24 = lean::cnstr_get(x_20, 0); -lean::inc(x_24); -lean::dec(x_20); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -lean::dec(x_24); -lean::cnstr_set(x_15, 0, x_25); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_15); -x_27 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_27, 0, x_4); -lean::cnstr_set(x_27, 1, x_7); -lean::cnstr_set(x_27, 2, x_10); -lean::cnstr_set(x_27, 3, x_13); -lean::cnstr_set(x_27, 4, x_26); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -lean::dec(x_24); -lean::free_heap_obj(x_15); -x_28 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_29 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_10); -lean::cnstr_set(x_29, 3, x_13); -lean::cnstr_set(x_29, 4, x_28); -return x_29; -} -} -else -{ -obj* x_30; obj* x_31; -lean::dec(x_23); -lean::dec(x_20); -lean::free_heap_obj(x_15); -x_30 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_31 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_10); -lean::cnstr_set(x_31, 3, x_13); -lean::cnstr_set(x_31, 4, x_30); -return x_31; -} -} -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_15, 0); -lean::inc(x_32); -lean::dec(x_15); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_35, 0, x_4); -lean::cnstr_set(x_35, 1, x_7); -lean::cnstr_set(x_35, 2, x_10); -lean::cnstr_set(x_35, 3, x_13); -lean::cnstr_set(x_35, 4, x_34); -return x_35; -} -else -{ -obj* x_36; -x_36 = lean::cnstr_get(x_33, 1); -lean::inc(x_36); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; -x_37 = lean::cnstr_get(x_33, 0); -lean::inc(x_37); -lean::dec(x_33); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -lean::dec(x_37); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_41, 0, x_4); -lean::cnstr_set(x_41, 1, x_7); -lean::cnstr_set(x_41, 2, x_10); -lean::cnstr_set(x_41, 3, x_13); -lean::cnstr_set(x_41, 4, x_40); -return x_41; -} -else -{ -obj* x_42; obj* x_43; -lean::dec(x_37); -x_42 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_43 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_7); -lean::cnstr_set(x_43, 2, x_10); -lean::cnstr_set(x_43, 3, x_13); -lean::cnstr_set(x_43, 4, x_42); -return x_43; -} -} -else -{ -obj* x_44; obj* x_45; -lean::dec(x_36); -lean::dec(x_33); -x_44 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_45 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_45, 0, x_4); -lean::cnstr_set(x_45, 1, x_7); -lean::cnstr_set(x_45, 2, x_10); -lean::cnstr_set(x_45, 3, x_13); -lean::cnstr_set(x_45, 4, x_44); -return x_45; -} -} -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declModifiers_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_declModifiers_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_declModifiers_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1(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; -if (x_2 == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_94; obj* x_95; -x_53 = lean::box(0); -lean::inc(x_5); -x_94 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -if (lean::obj_tag(x_95) == 0) -{ -obj* x_96; -x_96 = lean::cnstr_get(x_94, 1); -lean::inc(x_96); -lean::dec(x_94); -x_54 = x_95; -x_55 = x_96; -goto block_93; -} -else -{ -obj* x_97; obj* x_98; -x_97 = lean::cnstr_get(x_95, 0); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_97, 3); -lean::inc(x_98); -if (lean::obj_tag(x_98) == 0) -{ -obj* x_99; uint8 x_100; -x_99 = lean::cnstr_get(x_94, 1); -lean::inc(x_99); -lean::dec(x_94); -x_100 = !lean::is_exclusive(x_95); -if (x_100 == 0) -{ -uint8 x_101; obj* x_102; uint8 x_103; -x_101 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -x_102 = lean::cnstr_get(x_95, 0); -lean::dec(x_102); -x_103 = !lean::is_exclusive(x_97); -if (x_103 == 0) -{ -obj* x_104; obj* x_105; -x_104 = lean::cnstr_get(x_97, 3); -lean::dec(x_104); -x_105 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -lean::cnstr_set(x_97, 3, x_105); -if (x_101 == 0) -{ -uint8 x_106; -x_106 = 0; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_106); -x_54 = x_95; -x_55 = x_99; -goto block_93; -} -else -{ -uint8 x_107; -x_107 = 1; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_107); -x_54 = x_95; -x_55 = x_99; -goto block_93; -} -} -else -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_108 = lean::cnstr_get(x_97, 0); -x_109 = lean::cnstr_get(x_97, 1); -x_110 = lean::cnstr_get(x_97, 2); -lean::inc(x_110); -lean::inc(x_109); -lean::inc(x_108); -lean::dec(x_97); -x_111 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -x_112 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_112, 0, x_108); -lean::cnstr_set(x_112, 1, x_109); -lean::cnstr_set(x_112, 2, x_110); -lean::cnstr_set(x_112, 3, x_111); -if (x_101 == 0) -{ -uint8 x_113; -x_113 = 0; -lean::cnstr_set(x_95, 0, x_112); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_113); -x_54 = x_95; -x_55 = x_99; -goto block_93; -} -else -{ -uint8 x_114; -x_114 = 1; -lean::cnstr_set(x_95, 0, x_112); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_114); -x_54 = x_95; -x_55 = x_99; -goto block_93; -} -} -} -else -{ -uint8 x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_115 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -lean::dec(x_95); -x_116 = lean::cnstr_get(x_97, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_97, 1); -lean::inc(x_117); -x_118 = lean::cnstr_get(x_97, 2); -lean::inc(x_118); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - lean::cnstr_release(x_97, 2); - lean::cnstr_release(x_97, 3); - x_119 = x_97; -} else { - lean::dec_ref(x_97); - x_119 = lean::box(0); -} -x_120 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -if (lean::is_scalar(x_119)) { - x_121 = lean::alloc_cnstr(0, 4, 0); -} else { - x_121 = x_119; -} -lean::cnstr_set(x_121, 0, x_116); -lean::cnstr_set(x_121, 1, x_117); -lean::cnstr_set(x_121, 2, x_118); -lean::cnstr_set(x_121, 3, x_120); -if (x_115 == 0) -{ -uint8 x_122; obj* x_123; -x_122 = 0; -x_123 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_123, 0, x_121); -lean::cnstr_set_scalar(x_123, sizeof(void*)*1, x_122); -x_54 = x_123; -x_55 = x_99; -goto block_93; -} -else -{ -uint8 x_124; obj* x_125; -x_124 = 1; -x_125 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_125, 0, x_121); -lean::cnstr_set_scalar(x_125, sizeof(void*)*1, x_124); -x_54 = x_125; -x_55 = x_99; -goto block_93; -} -} -} -else -{ -obj* x_126; uint8 x_127; -x_126 = lean::cnstr_get(x_94, 1); -lean::inc(x_126); -lean::dec(x_94); -x_127 = !lean::is_exclusive(x_95); -if (x_127 == 0) -{ -uint8 x_128; obj* x_129; uint8 x_130; -x_128 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -x_129 = lean::cnstr_get(x_95, 0); -lean::dec(x_129); -x_130 = !lean::is_exclusive(x_97); -if (x_130 == 0) -{ -obj* x_131; uint8 x_132; -x_131 = lean::cnstr_get(x_97, 3); -lean::dec(x_131); -x_132 = !lean::is_exclusive(x_98); -if (x_132 == 0) -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; -x_133 = lean::cnstr_get(x_98, 0); -x_134 = lean::box(0); -x_135 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_135, 0, x_133); -lean::cnstr_set(x_135, 1, x_134); -x_136 = l_Lean_Parser_noKind; -x_137 = l_Lean_Parser_Syntax_mkNode(x_136, x_135); -lean::cnstr_set(x_98, 0, x_137); -if (x_128 == 0) -{ -uint8 x_138; -x_138 = 0; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_138); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -else -{ -uint8 x_139; -x_139 = 1; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_139); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -} -else -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; -x_140 = lean::cnstr_get(x_98, 0); -lean::inc(x_140); -lean::dec(x_98); -x_141 = lean::box(0); -x_142 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_142, 0, x_140); -lean::cnstr_set(x_142, 1, x_141); -x_143 = l_Lean_Parser_noKind; -x_144 = l_Lean_Parser_Syntax_mkNode(x_143, x_142); -x_145 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_145, 0, x_144); -lean::cnstr_set(x_97, 3, x_145); -if (x_128 == 0) -{ -uint8 x_146; -x_146 = 0; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_146); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -else -{ -uint8 x_147; -x_147 = 1; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_147); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -} -} -else -{ -obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; -x_148 = lean::cnstr_get(x_97, 0); -x_149 = lean::cnstr_get(x_97, 1); -x_150 = lean::cnstr_get(x_97, 2); -lean::inc(x_150); -lean::inc(x_149); -lean::inc(x_148); -lean::dec(x_97); -x_151 = lean::cnstr_get(x_98, 0); -lean::inc(x_151); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - x_152 = x_98; -} else { - lean::dec_ref(x_98); - x_152 = lean::box(0); -} -x_153 = lean::box(0); -x_154 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_154, 0, x_151); -lean::cnstr_set(x_154, 1, x_153); -x_155 = l_Lean_Parser_noKind; -x_156 = l_Lean_Parser_Syntax_mkNode(x_155, x_154); -if (lean::is_scalar(x_152)) { - x_157 = lean::alloc_cnstr(1, 1, 0); -} else { - x_157 = x_152; -} -lean::cnstr_set(x_157, 0, x_156); -x_158 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_158, 0, x_148); -lean::cnstr_set(x_158, 1, x_149); -lean::cnstr_set(x_158, 2, x_150); -lean::cnstr_set(x_158, 3, x_157); -if (x_128 == 0) -{ -uint8 x_159; -x_159 = 0; -lean::cnstr_set(x_95, 0, x_158); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_159); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -else -{ -uint8 x_160; -x_160 = 1; -lean::cnstr_set(x_95, 0, x_158); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_160); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -} -} -else -{ -uint8 x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; -x_161 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -lean::dec(x_95); -x_162 = lean::cnstr_get(x_97, 0); -lean::inc(x_162); -x_163 = lean::cnstr_get(x_97, 1); -lean::inc(x_163); -x_164 = lean::cnstr_get(x_97, 2); -lean::inc(x_164); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - lean::cnstr_release(x_97, 2); - lean::cnstr_release(x_97, 3); - x_165 = x_97; -} else { - lean::dec_ref(x_97); - x_165 = lean::box(0); -} -x_166 = lean::cnstr_get(x_98, 0); -lean::inc(x_166); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - x_167 = x_98; -} else { - lean::dec_ref(x_98); - x_167 = lean::box(0); -} -x_168 = lean::box(0); -x_169 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_169, 0, x_166); -lean::cnstr_set(x_169, 1, x_168); -x_170 = l_Lean_Parser_noKind; -x_171 = l_Lean_Parser_Syntax_mkNode(x_170, x_169); -if (lean::is_scalar(x_167)) { - x_172 = lean::alloc_cnstr(1, 1, 0); -} else { - x_172 = x_167; -} -lean::cnstr_set(x_172, 0, x_171); -if (lean::is_scalar(x_165)) { - x_173 = lean::alloc_cnstr(0, 4, 0); -} else { - x_173 = x_165; -} -lean::cnstr_set(x_173, 0, x_162); -lean::cnstr_set(x_173, 1, x_163); -lean::cnstr_set(x_173, 2, x_164); -lean::cnstr_set(x_173, 3, x_172); -if (x_161 == 0) -{ -uint8 x_174; obj* x_175; -x_174 = 0; -x_175 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_175, 0, x_173); -lean::cnstr_set_scalar(x_175, sizeof(void*)*1, x_174); -x_54 = x_175; -x_55 = x_126; -goto block_93; -} -else -{ -uint8 x_176; obj* x_177; -x_176 = 1; -x_177 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_177, 0, x_173); -lean::cnstr_set_scalar(x_177, sizeof(void*)*1, x_176); -x_54 = x_177; -x_55 = x_126; -goto block_93; -} -} -} -} -block_93: -{ -if (lean::obj_tag(x_54) == 0) -{ -uint8 x_56; -x_56 = !lean::is_exclusive(x_54); -if (x_56 == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_57 = lean::cnstr_get(x_54, 0); -x_58 = lean::cnstr_get(x_54, 2); -x_59 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_59, 0, x_57); -x_60 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_54, 2, x_60); -lean::cnstr_set(x_54, 0, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_54); -if (lean::obj_tag(x_61) == 0) -{ -lean::dec(x_5); -x_7 = x_61; -x_8 = x_55; -goto block_52; -} -else -{ -uint8 x_62; -x_62 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_63 = lean::cnstr_get(x_61, 0); -lean::inc(x_63); -lean::dec(x_61); -x_64 = lean::cnstr_get(x_63, 2); -lean::inc(x_64); -lean::dec(x_63); -x_65 = l_mjoin___rarg___closed__1; -x_66 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_66, 0, x_64); -lean::closure_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -x_68 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_68, 0, x_53); -lean::cnstr_set(x_68, 1, x_5); -lean::cnstr_set(x_68, 2, x_67); -x_7 = x_68; -x_8 = x_55; -goto block_52; -} -else -{ -lean::dec(x_5); -x_7 = x_61; -x_8 = x_55; -goto block_52; -} -} -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = lean::cnstr_get(x_54, 0); -x_70 = lean::cnstr_get(x_54, 1); -x_71 = lean::cnstr_get(x_54, 2); -lean::inc(x_71); -lean::inc(x_70); -lean::inc(x_69); -lean::dec(x_54); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_69); -x_73 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_74 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set(x_74, 1, x_70); -lean::cnstr_set(x_74, 2, x_73); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_74); -if (lean::obj_tag(x_75) == 0) -{ -lean::dec(x_5); -x_7 = x_75; -x_8 = x_55; -goto block_52; -} -else -{ -uint8 x_76; -x_76 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); -if (x_76 == 0) -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_77 = lean::cnstr_get(x_75, 0); -lean::inc(x_77); -lean::dec(x_75); -x_78 = lean::cnstr_get(x_77, 2); -lean::inc(x_78); -lean::dec(x_77); -x_79 = l_mjoin___rarg___closed__1; -x_80 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_80, 0, x_78); -lean::closure_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -x_82 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_82, 0, x_53); -lean::cnstr_set(x_82, 1, x_5); -lean::cnstr_set(x_82, 2, x_81); -x_7 = x_82; -x_8 = x_55; -goto block_52; -} -else -{ -lean::dec(x_5); -x_7 = x_75; -x_8 = x_55; -goto block_52; -} -} -} -} -else -{ -uint8 x_83; -x_83 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; -x_84 = lean::cnstr_get(x_54, 0); -lean::inc(x_84); -lean::dec(x_54); -x_85 = lean::cnstr_get(x_84, 2); -lean::inc(x_85); -lean::dec(x_84); -x_86 = l_mjoin___rarg___closed__1; -x_87 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_87, 0, x_85); -lean::closure_set(x_87, 1, x_86); -x_88 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_88, 0, x_87); -x_89 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_89, 0, x_53); -lean::cnstr_set(x_89, 1, x_5); -lean::cnstr_set(x_89, 2, x_88); -x_7 = x_89; -x_8 = x_55; -goto block_52; -} -else -{ -uint8 x_90; -lean::dec(x_5); -x_90 = !lean::is_exclusive(x_54); -if (x_90 == 0) -{ -x_7 = x_54; -x_8 = x_55; -goto block_52; -} -else -{ -obj* x_91; obj* x_92; -x_91 = lean::cnstr_get(x_54, 0); -lean::inc(x_91); -lean::dec(x_54); -x_92 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set_scalar(x_92, sizeof(void*)*1, x_83); -x_7 = x_92; -x_8 = x_55; -goto block_52; -} -} -} -} -} -else -{ -obj* x_178; -x_178 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -return x_178; -} -block_52: -{ -if (lean::obj_tag(x_7) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_7); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_7, 2); -x_12 = lean::cnstr_get(x_7, 0); -lean::dec(x_12); -x_13 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_14); -lean::cnstr_set(x_7, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_7); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_8); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_17 = lean::cnstr_get(x_7, 1); -x_18 = lean::cnstr_get(x_7, 2); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_7); -x_19 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_17); -lean::cnstr_set(x_21, 2, x_20); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_21); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_8); -return x_23; -} -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_7); -if (x_24 == 0) -{ -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; -x_25 = lean::cnstr_get(x_7, 2); -x_26 = lean::cnstr_get(x_7, 0); -lean::dec(x_26); -x_27 = lean::cnstr_get(x_9, 0); -lean::inc(x_27); -lean::dec(x_9); -x_28 = lean::box(0); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_Lean_Parser_noKind; -x_31 = l_Lean_Parser_Syntax_mkNode(x_30, x_29); -x_32 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_32); -lean::cnstr_set(x_7, 0, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_7); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_8); -return x_34; -} -else -{ -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; -x_35 = lean::cnstr_get(x_7, 1); -x_36 = lean::cnstr_get(x_7, 2); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_7); -x_37 = lean::cnstr_get(x_9, 0); -lean::inc(x_37); -lean::dec(x_9); -x_38 = lean::box(0); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_38); -x_40 = l_Lean_Parser_noKind; -x_41 = l_Lean_Parser_Syntax_mkNode(x_40, x_39); -x_42 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_35); -lean::cnstr_set(x_43, 2, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_43); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_8); -return x_45; -} -} -} -else -{ -uint8 x_46; -x_46 = !lean::is_exclusive(x_7); -if (x_46 == 0) -{ -obj* x_47; -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_7); -lean::cnstr_set(x_47, 1, x_8); -return x_47; -} -else -{ -obj* x_48; uint8 x_49; obj* x_50; obj* x_51; -x_48 = lean::cnstr_get(x_7, 0); -x_49 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_48); -lean::dec(x_7); -x_50 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_50, 0, x_48); -lean::cnstr_set_scalar(x_50, sizeof(void*)*1, x_49); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_8); -return x_51; -} -} -} -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(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) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_2); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -x_9 = l_mjoin___rarg___closed__1; -x_10 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_8, x_9, x_7, x_7, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_1); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::cnstr_get(x_1, 0); -x_13 = lean::cnstr_get(x_1, 1); -x_14 = lean::mk_nat_obj(1u); -x_15 = lean::nat_add(x_2, x_14); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_16 = lean::apply_4(x_12, x_3, x_4, x_5, x_6); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_16); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; uint8 x_21; -x_19 = lean::cnstr_get(x_16, 1); -x_20 = lean::cnstr_get(x_16, 0); -lean::dec(x_20); -x_21 = !lean::is_exclusive(x_17); -if (x_21 == 0) -{ -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_22 = lean::cnstr_get(x_17, 0); -x_23 = lean::cnstr_get(x_17, 2); -x_24 = lean::box(0); -x_25 = lean_name_mk_numeral(x_24, x_2); -x_26 = lean::box(0); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_22); -x_27 = l_Lean_Parser_Syntax_mkNode(x_25, x_1); -x_28 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_17, 2, x_28); -lean::cnstr_set(x_17, 0, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_17); -if (lean::obj_tag(x_29) == 0) -{ -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_16, 0, x_29); -return x_16; -} -else -{ -uint8 x_30; -x_30 = lean::cnstr_get_scalar(x_29, sizeof(void*)*1); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; uint8 x_33; -lean::free_heap_obj(x_16); -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(x_13, x_15, x_3, x_4, x_5, x_19); -x_33 = !lean::is_exclusive(x_32); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -x_35 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_31, x_34); -lean::cnstr_set(x_32, 0, x_35); -return x_32; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_32, 0); -x_37 = lean::cnstr_get(x_32, 1); -lean::inc(x_37); -lean::inc(x_36); -lean::dec(x_32); -x_38 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_31, x_36); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_37); -return x_39; -} -} -else -{ -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_16, 0, x_29); -return x_16; -} -} -} -else -{ -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; -x_40 = lean::cnstr_get(x_17, 0); -x_41 = lean::cnstr_get(x_17, 1); -x_42 = lean::cnstr_get(x_17, 2); -lean::inc(x_42); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_17); -x_43 = lean::box(0); -x_44 = lean_name_mk_numeral(x_43, x_2); -x_45 = lean::box(0); -lean::cnstr_set(x_1, 1, x_45); -lean::cnstr_set(x_1, 0, x_40); -x_46 = l_Lean_Parser_Syntax_mkNode(x_44, x_1); -x_47 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_48 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_41); -lean::cnstr_set(x_48, 2, x_47); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_48); -if (lean::obj_tag(x_49) == 0) -{ -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_16, 0, x_49); -return x_16; -} -else -{ -uint8 x_50; -x_50 = lean::cnstr_get_scalar(x_49, sizeof(void*)*1); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -lean::free_heap_obj(x_16); -x_51 = lean::cnstr_get(x_49, 0); -lean::inc(x_51); -lean::dec(x_49); -x_52 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(x_13, x_15, x_3, x_4, x_5, x_19); -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_52, 1); -lean::inc(x_54); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - lean::cnstr_release(x_52, 1); - x_55 = x_52; -} else { - lean::dec_ref(x_52); - x_55 = lean::box(0); -} -x_56 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_51, x_53); -if (lean::is_scalar(x_55)) { - x_57 = lean::alloc_cnstr(0, 2, 0); -} else { - x_57 = x_55; -} -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_54); -return x_57; -} -else -{ -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_16, 0, x_49); -return x_16; -} -} -} -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_58 = lean::cnstr_get(x_16, 1); -lean::inc(x_58); -lean::dec(x_16); -x_59 = lean::cnstr_get(x_17, 0); -lean::inc(x_59); -x_60 = lean::cnstr_get(x_17, 1); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_17, 2); -lean::inc(x_61); -if (lean::is_exclusive(x_17)) { - lean::cnstr_release(x_17, 0); - lean::cnstr_release(x_17, 1); - lean::cnstr_release(x_17, 2); - x_62 = x_17; -} else { - lean::dec_ref(x_17); - x_62 = lean::box(0); -} -x_63 = lean::box(0); -x_64 = lean_name_mk_numeral(x_63, x_2); -x_65 = lean::box(0); -lean::cnstr_set(x_1, 1, x_65); -lean::cnstr_set(x_1, 0, x_59); -x_66 = l_Lean_Parser_Syntax_mkNode(x_64, x_1); -x_67 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_62)) { - x_68 = lean::alloc_cnstr(0, 3, 0); -} else { - x_68 = x_62; -} -lean::cnstr_set(x_68, 0, x_66); -lean::cnstr_set(x_68, 1, x_60); -lean::cnstr_set(x_68, 2, x_67); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_61, x_68); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_70 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_58); -return x_70; -} -else -{ -uint8 x_71; -x_71 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -if (x_71 == 0) -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_72 = lean::cnstr_get(x_69, 0); -lean::inc(x_72); -lean::dec(x_69); -x_73 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(x_13, x_15, x_3, x_4, x_5, x_58); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -if (lean::is_exclusive(x_73)) { - lean::cnstr_release(x_73, 0); - lean::cnstr_release(x_73, 1); - x_76 = x_73; -} else { - lean::dec_ref(x_73); - x_76 = lean::box(0); -} -x_77 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_72, x_74); -if (lean::is_scalar(x_76)) { - x_78 = lean::alloc_cnstr(0, 2, 0); -} else { - x_78 = x_76; -} -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_75); -return x_78; -} -else -{ -obj* x_79; -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_79 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_79, 0, x_69); -lean::cnstr_set(x_79, 1, x_58); -return x_79; -} -} -} -} -else -{ -uint8 x_80; -lean::free_heap_obj(x_1); -lean::dec(x_2); -x_80 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; obj* x_83; uint8 x_84; -x_81 = lean::cnstr_get(x_16, 1); -lean::inc(x_81); -lean::dec(x_16); -x_82 = lean::cnstr_get(x_17, 0); -lean::inc(x_82); -lean::dec(x_17); -x_83 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(x_13, x_15, x_3, x_4, x_5, x_81); -x_84 = !lean::is_exclusive(x_83); -if (x_84 == 0) -{ -obj* x_85; obj* x_86; -x_85 = lean::cnstr_get(x_83, 0); -x_86 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_82, x_85); -lean::cnstr_set(x_83, 0, x_86); -return x_83; -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_87 = lean::cnstr_get(x_83, 0); -x_88 = lean::cnstr_get(x_83, 1); -lean::inc(x_88); -lean::inc(x_87); -lean::dec(x_83); -x_89 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_82, x_87); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_88); -return x_90; -} -} -else -{ -uint8 x_91; -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_91 = !lean::is_exclusive(x_16); -if (x_91 == 0) -{ -obj* x_92; uint8 x_93; -x_92 = lean::cnstr_get(x_16, 0); -lean::dec(x_92); -x_93 = !lean::is_exclusive(x_17); -if (x_93 == 0) -{ -return x_16; -} -else -{ -obj* x_94; obj* x_95; -x_94 = lean::cnstr_get(x_17, 0); -lean::inc(x_94); -lean::dec(x_17); -x_95 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_80); -lean::cnstr_set(x_16, 0, x_95); -return x_16; -} -} -else -{ -obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_96 = lean::cnstr_get(x_16, 1); -lean::inc(x_96); -lean::dec(x_16); -x_97 = lean::cnstr_get(x_17, 0); -lean::inc(x_97); -if (lean::is_exclusive(x_17)) { - lean::cnstr_release(x_17, 0); - x_98 = x_17; -} else { - lean::dec_ref(x_17); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(1, 1, 1); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_97); -lean::cnstr_set_scalar(x_99, sizeof(void*)*1, x_80); -x_100 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_96); -return x_100; -} -} -} -} -else -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_101 = lean::cnstr_get(x_1, 0); -x_102 = lean::cnstr_get(x_1, 1); -lean::inc(x_102); -lean::inc(x_101); -lean::dec(x_1); -x_103 = lean::mk_nat_obj(1u); -x_104 = lean::nat_add(x_2, x_103); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_105 = lean::apply_4(x_101, x_3, x_4, x_5, x_6); -x_106 = lean::cnstr_get(x_105, 0); -lean::inc(x_106); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; -x_107 = lean::cnstr_get(x_105, 1); -lean::inc(x_107); -if (lean::is_exclusive(x_105)) { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - x_108 = x_105; -} else { - lean::dec_ref(x_105); - x_108 = lean::box(0); -} -x_109 = lean::cnstr_get(x_106, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_106, 1); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_106, 2); -lean::inc(x_111); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - lean::cnstr_release(x_106, 2); - x_112 = x_106; -} else { - lean::dec_ref(x_106); - x_112 = lean::box(0); -} -x_113 = lean::box(0); -x_114 = lean_name_mk_numeral(x_113, x_2); -x_115 = lean::box(0); -x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_109); -lean::cnstr_set(x_116, 1, x_115); -x_117 = l_Lean_Parser_Syntax_mkNode(x_114, x_116); -x_118 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_112)) { - x_119 = lean::alloc_cnstr(0, 3, 0); -} else { - x_119 = x_112; -} -lean::cnstr_set(x_119, 0, x_117); -lean::cnstr_set(x_119, 1, x_110); -lean::cnstr_set(x_119, 2, x_118); -x_120 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_111, x_119); -if (lean::obj_tag(x_120) == 0) -{ -obj* x_121; -lean::dec(x_104); -lean::dec(x_102); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_108)) { - x_121 = lean::alloc_cnstr(0, 2, 0); -} else { - x_121 = x_108; -} -lean::cnstr_set(x_121, 0, x_120); -lean::cnstr_set(x_121, 1, x_107); -return x_121; -} -else -{ -uint8 x_122; -x_122 = lean::cnstr_get_scalar(x_120, sizeof(void*)*1); -if (x_122 == 0) -{ -obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; -lean::dec(x_108); -x_123 = lean::cnstr_get(x_120, 0); -lean::inc(x_123); -lean::dec(x_120); -x_124 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(x_102, x_104, x_3, x_4, x_5, x_107); -x_125 = lean::cnstr_get(x_124, 0); -lean::inc(x_125); -x_126 = lean::cnstr_get(x_124, 1); -lean::inc(x_126); -if (lean::is_exclusive(x_124)) { - lean::cnstr_release(x_124, 0); - lean::cnstr_release(x_124, 1); - x_127 = x_124; -} else { - lean::dec_ref(x_124); - x_127 = lean::box(0); -} -x_128 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_123, x_125); -if (lean::is_scalar(x_127)) { - x_129 = lean::alloc_cnstr(0, 2, 0); -} else { - x_129 = x_127; -} -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_126); -return x_129; -} -else -{ -obj* x_130; -lean::dec(x_104); -lean::dec(x_102); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_108)) { - x_130 = lean::alloc_cnstr(0, 2, 0); -} else { - x_130 = x_108; -} -lean::cnstr_set(x_130, 0, x_120); -lean::cnstr_set(x_130, 1, x_107); -return x_130; -} -} -} -else -{ -uint8 x_131; -lean::dec(x_2); -x_131 = lean::cnstr_get_scalar(x_106, sizeof(void*)*1); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; -x_132 = lean::cnstr_get(x_105, 1); -lean::inc(x_132); -lean::dec(x_105); -x_133 = lean::cnstr_get(x_106, 0); -lean::inc(x_133); -lean::dec(x_106); -x_134 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2(x_102, x_104, x_3, x_4, x_5, x_132); -x_135 = lean::cnstr_get(x_134, 0); -lean::inc(x_135); -x_136 = lean::cnstr_get(x_134, 1); -lean::inc(x_136); -if (lean::is_exclusive(x_134)) { - lean::cnstr_release(x_134, 0); - lean::cnstr_release(x_134, 1); - x_137 = x_134; -} else { - lean::dec_ref(x_134); - x_137 = lean::box(0); -} -x_138 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_133, x_135); -if (lean::is_scalar(x_137)) { - x_139 = lean::alloc_cnstr(0, 2, 0); -} else { - x_139 = x_137; -} -lean::cnstr_set(x_139, 0, x_138); -lean::cnstr_set(x_139, 1, x_136); -return x_139; -} -else -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; -lean::dec(x_104); -lean::dec(x_102); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_140 = lean::cnstr_get(x_105, 1); -lean::inc(x_140); -if (lean::is_exclusive(x_105)) { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - x_141 = x_105; -} else { - lean::dec_ref(x_105); - x_141 = lean::box(0); -} -x_142 = lean::cnstr_get(x_106, 0); -lean::inc(x_142); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - x_143 = x_106; -} else { - lean::dec_ref(x_106); - x_143 = lean::box(0); -} -if (lean::is_scalar(x_143)) { - x_144 = lean::alloc_cnstr(1, 1, 1); -} else { - x_144 = x_143; -} -lean::cnstr_set(x_144, 0, x_142); -lean::cnstr_set_scalar(x_144, sizeof(void*)*1, x_131); -if (lean::is_scalar(x_141)) { - x_145 = lean::alloc_cnstr(0, 2, 0); -} else { - x_145 = x_141; -} -lean::cnstr_set(x_145, 0, x_144); -lean::cnstr_set(x_145, 1, x_140); -return x_145; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_1 = l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = lean::mk_string("private"); -x_6 = lean::mk_nat_obj(0u); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = lean::mk_string("protected"); -x_9 = l_Lean_Parser_symbol_tokens___rarg(x_8, x_6); -lean::dec(x_8); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_10); -lean::dec(x_9); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_11); -lean::dec(x_11); -lean::dec(x_7); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_10); -lean::dec(x_13); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -x_16 = l_Lean_Parser_tokens___rarg(x_15); -lean::dec(x_15); -x_17 = lean::mk_string("noncomputable"); -x_18 = l_Lean_Parser_symbol_tokens___rarg(x_17, x_6); -lean::dec(x_17); -x_19 = l_Lean_Parser_tokens___rarg(x_18); -lean::dec(x_18); -x_20 = lean::mk_string("unsafe"); -x_21 = l_Lean_Parser_symbol_tokens___rarg(x_20, x_6); -lean::dec(x_20); -x_22 = l_Lean_Parser_tokens___rarg(x_21); -lean::dec(x_21); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_22, x_10); -lean::dec(x_22); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_23); -lean::dec(x_23); -lean::dec(x_19); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_16, x_24); -lean::dec(x_24); -lean::dec(x_16); -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_25); -lean::dec(x_25); -lean::dec(x_4); -x_27 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_26); -lean::dec(x_26); -lean::dec(x_2); -x_28 = l_Lean_Parser_tokens___rarg(x_27); -lean::dec(x_27); -return x_28; -} -} -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed(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); -lean::dec(x_2); -x_8 = l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_7, x_3, x_4, x_5, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_docComment_Parser), 4, 0); -x_6 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declAttributes_Parser), 4, 0); -x_10 = lean::box(x_6); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_10); -x_12 = lean::mk_string("private"); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::mk_nat_obj(0u); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_16, 0, x_13); -lean::closure_set(x_16, 1, x_15); -lean::closure_set(x_16, 2, x_14); -x_17 = lean::mk_string("protected"); -x_18 = l_String_trim(x_17); -lean::dec(x_17); -lean::inc(x_18); -x_19 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_19, 0, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_15); -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_16); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_15); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_21); -x_26 = l_Lean_Parser_command_visibility; -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_25); -x_28 = lean::box(x_6); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_28); -x_30 = lean::mk_string("noncomputable"); -x_31 = l_String_trim(x_30); -lean::dec(x_30); -lean::inc(x_31); -x_32 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_32, 0, x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_33, 0, x_31); -lean::closure_set(x_33, 1, x_15); -lean::closure_set(x_33, 2, x_32); -x_34 = lean::box(x_6); -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_35, 0, x_33); -lean::closure_set(x_35, 1, x_34); -x_36 = lean::mk_string("unsafe"); -x_37 = l_String_trim(x_36); -lean::dec(x_36); -lean::inc(x_37); -x_38 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_38, 0, x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_39, 0, x_37); -lean::closure_set(x_39, 1, x_15); -lean::closure_set(x_39, 2, x_38); -x_40 = lean::box(x_6); -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_41, 0, x_39); -lean::closure_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_21); -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_29); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_11); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_8); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_Lean_Parser_command_declModifiers; -x_48 = l_Lean_Parser_command_declModifiers_HasView; -x_49 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_47, x_46, x_48); -lean::dec(x_46); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_49; -} -} -obj* _init_l_Lean_Parser_command_declModifiers_Parser___closed__1() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_docComment_Parser), 4, 0); -x_2 = 0; -x_3 = lean::box(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declAttributes_Parser), 4, 0); -x_6 = lean::box(x_2); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::mk_string("private"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::mk_nat_obj(0u); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_12, 0, x_9); -lean::closure_set(x_12, 1, x_11); -lean::closure_set(x_12, 2, x_10); -x_13 = lean::mk_string("protected"); -x_14 = l_String_trim(x_13); -lean::dec(x_13); -lean::inc(x_14); -x_15 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_11); -lean::closure_set(x_16, 2, x_15); -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_12); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_11); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_17); -x_22 = l_Lean_Parser_command_visibility; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_23, 0, x_22); -lean::closure_set(x_23, 1, x_21); -x_24 = lean::box(x_2); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_24); -x_26 = lean::mk_string("noncomputable"); -x_27 = l_String_trim(x_26); -lean::dec(x_26); -lean::inc(x_27); -x_28 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_28, 0, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_11); -lean::closure_set(x_29, 2, x_28); -x_30 = lean::box(x_2); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_31, 0, x_29); -lean::closure_set(x_31, 1, x_30); -x_32 = lean::mk_string("unsafe"); -x_33 = l_String_trim(x_32); -lean::dec(x_32); -lean::inc(x_33); -x_34 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_34, 0, x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_35, 0, x_33); -lean::closure_set(x_35, 1, x_11); -lean::closure_set(x_35, 2, x_34); -x_36 = lean::box(x_2); -x_37 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_37, 0, x_35); -lean::closure_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_17); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_31); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_25); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_7); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_4); -lean::cnstr_set(x_42, 1, x_41); -return x_42; -} -} -obj* l_Lean_Parser_command_declModifiers_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_declModifiers; -x_6 = l_Lean_Parser_command_declModifiers_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_declSig() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("declSig"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_declSig_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_2); -x_7 = l_Lean_Parser_Term_typeSpec_HasView; -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_3); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_command_declSig; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -obj* _init_l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__1() { -_start: -{ -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_1 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = l_Lean_Parser_Term_typeSpec_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Term_typeSpec_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_command_declSig_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -lean::dec(x_5); -x_9 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_12; obj* x_13; -x_12 = l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__2; -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_8, 0); -lean::inc(x_14); -lean::dec(x_8); -x_15 = l_Lean_Parser_Term_typeSpec_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -return x_18; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declSig_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declSig_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declSig_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_declSig_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_declSig_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_6); -lean::dec(x_6); -lean::dec(x_2); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinders_Parser), 5, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_typeSpec_Parser), 5, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_6); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_command_declSig; -x_13 = l_Lean_Parser_command_declSig_HasView; -x_14 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_12, x_11, x_13); -lean::dec(x_11); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_14; -} -} -obj* _init_l_Lean_Parser_command_declSig_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinders_Parser), 5, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_typeSpec_Parser), 5, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_2); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_command_declSig_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_declSig; -x_6 = l_Lean_Parser_command_declSig_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_optDeclSig() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("optDeclSig"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_optDeclSig_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = l_Lean_Parser_command_optDeclSig; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -lean::dec(x_3); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_Term_typeSpec_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_11); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_12); -x_17 = l_Lean_Parser_noKind; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_12); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_6); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_command_optDeclSig; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_5, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -lean::free_heap_obj(x_5); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = l_Lean_Parser_Term_typeSpec_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_5, 0, x_17); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_5); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_10); -lean::free_heap_obj(x_5); -x_19 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_5, 0); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_4); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = l_Lean_Parser_Term_typeSpec_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_30); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -lean::dec(x_25); -lean::dec(x_22); -x_32 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -} -obj* l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_68; -x_68 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1___closed__1; -return x_69; -} -else -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -lean::inc(x_70); -lean::dec(x_68); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -lean::dec(x_70); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -x_72 = lean::box(3); -x_2 = x_71; -x_3 = x_72; -goto block_67; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_71, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_71, 1); -lean::inc(x_74); -lean::dec(x_71); -x_2 = x_74; -x_3 = x_73; -goto block_67; -} -} -block_67: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::box(3); -x_8 = l_Lean_Parser_Syntax_asNode___main(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_6); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; -lean::free_heap_obj(x_8); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_13, 1); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_13, 0); -lean::inc(x_17); -lean::dec(x_13); -x_18 = l_Lean_Parser_Term_typeSpec_HasView; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::apply_1(x_19, x_17); -lean::cnstr_set(x_8, 0, x_20); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_6); -lean::cnstr_set(x_21, 1, x_8); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -lean::dec(x_16); -lean::dec(x_13); -lean::free_heap_obj(x_8); -x_22 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_6); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_8, 0); -lean::inc(x_24); -lean::dec(x_8); -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -lean::dec(x_24); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::box(0); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_26); -return x_27; -} -else -{ -obj* x_28; -x_28 = lean::cnstr_get(x_25, 1); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_25, 0); -lean::inc(x_29); -lean::dec(x_25); -x_30 = l_Lean_Parser_Term_typeSpec_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_29); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_6); -lean::cnstr_set(x_34, 1, x_33); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_28); -lean::dec(x_25); -x_35 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_6); -lean::cnstr_set(x_36, 1, x_35); -return x_36; -} -} -} -} -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_2, 0); -lean::inc(x_37); -lean::dec(x_2); -x_38 = l_Lean_Parser_Syntax_asNode___main(x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; -x_39 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_6); -lean::cnstr_set(x_40, 1, x_39); -return x_40; -} -else -{ -uint8 x_41; -x_41 = !lean::is_exclusive(x_38); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_38, 0); -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -lean::dec(x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; -lean::free_heap_obj(x_38); -x_44 = lean::box(0); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_6); -lean::cnstr_set(x_45, 1, x_44); -return x_45; -} -else -{ -obj* x_46; -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = l_Lean_Parser_Term_typeSpec_HasView; -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::apply_1(x_49, x_47); -lean::cnstr_set(x_38, 0, x_50); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_6); -lean::cnstr_set(x_51, 1, x_38); -return x_51; -} -else -{ -obj* x_52; obj* x_53; -lean::dec(x_46); -lean::dec(x_43); -lean::free_heap_obj(x_38); -x_52 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_6); -lean::cnstr_set(x_53, 1, x_52); -return x_53; -} -} -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_38, 0); -lean::inc(x_54); -lean::dec(x_38); -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -lean::dec(x_54); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; -x_56 = lean::box(0); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_6); -lean::cnstr_set(x_57, 1, x_56); -return x_57; -} -else -{ -obj* x_58; -x_58 = lean::cnstr_get(x_55, 1); -lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_59 = lean::cnstr_get(x_55, 0); -lean::inc(x_59); -lean::dec(x_55); -x_60 = l_Lean_Parser_Term_typeSpec_HasView; -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -x_62 = lean::apply_1(x_61, x_59); -x_63 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_63, 0, x_62); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_6); -lean::cnstr_set(x_64, 1, x_63); -return x_64; -} -else -{ -obj* x_65; obj* x_66; -lean::dec(x_58); -lean::dec(x_55); -x_65 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_6); -lean::cnstr_set(x_66, 1, x_65); -return x_66; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_optDeclSig_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_optDeclSig_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_optDeclSig_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_6); -lean::dec(x_6); -lean::dec(x_2); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinders_Parser), 5, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optType_Parser), 5, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_6); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_command_optDeclSig; -x_13 = l_Lean_Parser_command_optDeclSig_HasView; -x_14 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_12, x_11, x_13); -lean::dec(x_11); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_14; -} -} -obj* _init_l_Lean_Parser_command_optDeclSig_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinders_Parser), 5, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optType_Parser), 5, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_2); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_command_optDeclSig_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_optDeclSig; -x_6 = l_Lean_Parser_command_optDeclSig_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_equation() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("equation"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_equation_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_3); -x_7 = l_Lean_Parser_noKind; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_command_equation; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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_17 = lean::cnstr_get(x_4, 0); -lean::inc(x_17); -lean::dec(x_4); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_8); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_Lean_Parser_command_equation; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -lean::dec(x_2); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_10); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_8); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_command_equation; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_33 = lean::cnstr_get(x_4, 0); -lean::inc(x_33); -lean::dec(x_4); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_10); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_8); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_26); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_command_equation; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -return x_39; -} -} -} -} -obj* _init_l_Lean_Parser_command_equation_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_5 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_1); -lean::cnstr_set(x_5, 3, x_2); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_7); -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_1); -lean::cnstr_set(x_9, 3, x_2); -return x_9; -} -} -} -obj* l_Lean_Parser_command_equation_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_79; -x_79 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_79) == 0) -{ -obj* x_80; -x_80 = l_Lean_Parser_command_equation_HasView_x27___lambda__1___closed__1; -return x_80; -} -else -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_79, 0); -lean::inc(x_81); -lean::dec(x_79); -x_82 = lean::cnstr_get(x_81, 1); -lean::inc(x_82); -lean::dec(x_81); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; -x_83 = lean::box(3); -x_2 = x_82; -x_3 = x_83; -goto block_78; -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_82, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_82, 1); -lean::inc(x_85); -lean::dec(x_82); -x_2 = x_85; -x_3 = x_84; -goto block_78; -} -} -block_78: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_3, 0); -lean::inc(x_75); -lean::dec(x_3); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -x_4 = x_76; -goto block_74; -} -else -{ -obj* x_77; -lean::dec(x_3); -x_77 = lean::box(0); -x_4 = x_77; -goto block_74; -} -block_74: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_71; -x_71 = lean::box(3); -x_5 = x_2; -x_6 = x_71; -goto block_70; -} -else -{ -obj* x_72; obj* x_73; -x_72 = lean::cnstr_get(x_2, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_2, 1); -lean::inc(x_73); -lean::dec(x_2); -x_5 = x_73; -x_6 = x_72; -goto block_70; -} -block_70: -{ -obj* x_7; -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::box(0); -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_9); -lean::cnstr_set(x_11, 2, x_8); -lean::cnstr_set(x_11, 3, x_10); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_5, 0); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_5, 1); -lean::inc(x_13); -lean::dec(x_5); -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_17 = lean::box(3); -x_18 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_16); -lean::cnstr_set(x_18, 2, x_15); -lean::cnstr_set(x_18, 3, x_17); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_13, 0); -lean::inc(x_19); -lean::dec(x_13); -x_20 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_21 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_20); -lean::cnstr_set(x_21, 2, x_15); -lean::cnstr_set(x_21, 3, x_19); -return x_21; -} -} -else -{ -obj* x_22; obj* x_23; -lean::dec(x_12); -x_22 = lean::cnstr_get(x_5, 1); -lean::inc(x_22); -lean::dec(x_5); -x_23 = lean::box(0); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_25 = lean::box(3); -x_26 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_24); -lean::cnstr_set(x_26, 2, x_23); -lean::cnstr_set(x_26, 3, x_25); -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_22, 0); -lean::inc(x_27); -lean::dec(x_22); -x_28 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_29 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_29, 2, x_23); -lean::cnstr_set(x_29, 3, x_27); -return x_29; -} -} -} -} -else -{ -uint8 x_30; -x_30 = !lean::is_exclusive(x_7); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::cnstr_get(x_7, 0); -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -lean::dec(x_31); -x_33 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_32); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; -lean::free_heap_obj(x_7); -x_34 = lean::box(0); -x_35 = lean::box(3); -x_36 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_36, 0, x_4); -lean::cnstr_set(x_36, 1, x_33); -lean::cnstr_set(x_36, 2, x_34); -lean::cnstr_set(x_36, 3, x_35); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_5, 0); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_5, 1); -lean::inc(x_38); -lean::dec(x_5); -x_39 = lean::cnstr_get(x_37, 0); -lean::inc(x_39); -lean::dec(x_37); -lean::cnstr_set(x_7, 0, x_39); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_40; obj* x_41; -x_40 = lean::box(3); -x_41 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_41, 0, x_4); -lean::cnstr_set(x_41, 1, x_33); -lean::cnstr_set(x_41, 2, x_7); -lean::cnstr_set(x_41, 3, x_40); -return x_41; -} -else -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_38, 0); -lean::inc(x_42); -lean::dec(x_38); -x_43 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_33); -lean::cnstr_set(x_43, 2, x_7); -lean::cnstr_set(x_43, 3, x_42); -return x_43; -} -} -else -{ -obj* x_44; obj* x_45; -lean::dec(x_37); -lean::free_heap_obj(x_7); -x_44 = lean::cnstr_get(x_5, 1); -lean::inc(x_44); -lean::dec(x_5); -x_45 = lean::box(0); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::box(3); -x_47 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_47, 0, x_4); -lean::cnstr_set(x_47, 1, x_33); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_46); -return x_47; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -lean::dec(x_44); -x_49 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_49, 0, x_4); -lean::cnstr_set(x_49, 1, x_33); -lean::cnstr_set(x_49, 2, x_45); -lean::cnstr_set(x_49, 3, x_48); -return x_49; -} -} -} -} -else -{ -obj* x_50; obj* x_51; obj* x_52; -x_50 = lean::cnstr_get(x_7, 0); -lean::inc(x_50); -lean::dec(x_7); -x_51 = lean::cnstr_get(x_50, 1); -lean::inc(x_51); -lean::dec(x_50); -x_52 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_51); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::box(0); -x_54 = lean::box(3); -x_55 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_55, 0, x_4); -lean::cnstr_set(x_55, 1, x_52); -lean::cnstr_set(x_55, 2, x_53); -lean::cnstr_set(x_55, 3, x_54); -return x_55; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_5, 0); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; -x_57 = lean::cnstr_get(x_5, 1); -lean::inc(x_57); -lean::dec(x_5); -x_58 = lean::cnstr_get(x_56, 0); -lean::inc(x_58); -lean::dec(x_56); -x_59 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -if (lean::obj_tag(x_57) == 0) -{ -obj* x_60; obj* x_61; -x_60 = lean::box(3); -x_61 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_61, 0, x_4); -lean::cnstr_set(x_61, 1, x_52); -lean::cnstr_set(x_61, 2, x_59); -lean::cnstr_set(x_61, 3, x_60); -return x_61; -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_57, 0); -lean::inc(x_62); -lean::dec(x_57); -x_63 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_63, 0, x_4); -lean::cnstr_set(x_63, 1, x_52); -lean::cnstr_set(x_63, 2, x_59); -lean::cnstr_set(x_63, 3, x_62); -return x_63; -} -} -else -{ -obj* x_64; obj* x_65; -lean::dec(x_56); -x_64 = lean::cnstr_get(x_5, 1); -lean::inc(x_64); -lean::dec(x_5); -x_65 = lean::box(0); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_66; obj* x_67; -x_66 = lean::box(3); -x_67 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_67, 0, x_4); -lean::cnstr_set(x_67, 1, x_52); -lean::cnstr_set(x_67, 2, x_65); -lean::cnstr_set(x_67, 3, x_66); -return x_67; -} -else -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_64, 0); -lean::inc(x_68); -lean::dec(x_64); -x_69 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_69, 0, x_4); -lean::cnstr_set(x_69, 1, x_52); -lean::cnstr_set(x_69, 2, x_65); -lean::cnstr_set(x_69, 3, x_68); -return x_69; -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_equation_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_equation_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_equation_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_equation_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_equation_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_equation_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -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::dec(x_1); -x_4 = l_Lean_Parser_maxPrec; -x_5 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_4); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = lean::mk_string(":="); -x_9 = l_Lean_Parser_symbol_tokens___rarg(x_8, x_2); -lean::dec(x_8); -x_10 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_12); -lean::dec(x_11); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_13); -lean::dec(x_13); -lean::dec(x_9); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_14); -lean::dec(x_14); -lean::dec(x_7); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_15); -lean::dec(x_15); -lean::dec(x_3); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -return x_17; -} -} -obj* _init_l_Lean_Parser_command_equation_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("|"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = l_Lean_Parser_maxPrec; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(":="); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_8); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_18, 0, x_8); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_19, 0, x_18); -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_17); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_13); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_9); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_command_equation; -x_26 = l_Lean_Parser_command_equation_HasView; -x_27 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_25, x_24, x_26); -lean::dec(x_24); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_27; -} -} -obj* _init_l_Lean_Parser_command_equation_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_1 = lean::mk_string("|"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = l_Lean_Parser_maxPrec; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::mk_string(":="); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_4); -lean::closure_set(x_13, 2, x_12); -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::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_13); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_9); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_5); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -obj* l_Lean_Parser_command_equation_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_equation; -x_6 = l_Lean_Parser_command_equation_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_simpleDeclVal() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("simpleDeclVal"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_command_simpleDeclVal; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_command_simpleDeclVal; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_simpleDeclVal_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_simpleDeclVal_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_simpleDeclVal_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_declVal() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("declVal"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_declVal; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_equation_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_command_declVal_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_simpleDeclVal_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_declVal; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -case 1: -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_declVal; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -default: -{ -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; -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -lean::dec(x_1); -x_24 = l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__2; -x_25 = l_List_map___main___rarg(x_24, x_23); -x_26 = l_Lean_Parser_noKind; -x_27 = l_Lean_Parser_Syntax_mkNode(x_26, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_2); -x_29 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_2); -x_32 = l_Lean_Parser_command_declVal; -x_33 = l_Lean_Parser_Syntax_mkNode(x_32, x_31); -return x_33; -} -} -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = l_Lean_Parser_command_equation_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_equation_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_simpleDeclVal_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("declVal"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_declVal_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__5; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::mk_nat_obj(1u); -x_32 = lean::nat_dec_eq(x_22, x_31); -lean::dec(x_22); -if (x_32 == 0) -{ -obj* x_33; -lean::free_heap_obj(x_13); -x_33 = l_Lean_Parser_Syntax_asNode___main(x_28); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__1; -return x_34; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -lean::dec(x_33); -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -lean::dec(x_35); -x_37 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__2; -x_38 = l_List_map___main___rarg(x_37, x_36); -x_39 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_28, 0); -lean::inc(x_40); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_40); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_13); -return x_41; -} -else -{ -obj* x_42; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_42 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__3; -return x_42; -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_43 = l_Lean_Parser_command_simpleDeclVal_HasView; -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -x_45 = lean::apply_1(x_44, x_28); -x_46 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -return x_46; -} -} -else -{ -obj* x_47; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_47 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_47; -} -} -} -} -} -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_13, 0); -lean::inc(x_48); -lean::dec(x_13); -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -switch (lean::obj_tag(x_49)) { -case 0: -{ -obj* x_50; -lean::dec(x_48); -x_50 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_50; -} -case 1: -{ -obj* x_51; -lean::dec(x_49); -lean::dec(x_48); -x_51 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_51; -} -default: -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; uint8 x_56; -x_52 = lean::cnstr_get(x_48, 1); -lean::inc(x_52); -lean::dec(x_48); -x_53 = lean::cnstr_get(x_49, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_49, 1); -lean::inc(x_54); -lean::dec(x_49); -x_55 = lean::box(0); -x_56 = lean_name_dec_eq(x_53, x_55); -lean::dec(x_53); -if (x_56 == 0) -{ -obj* x_57; -lean::dec(x_54); -lean::dec(x_52); -x_57 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_57; -} -else -{ -if (lean::obj_tag(x_52) == 0) -{ -obj* x_58; -lean::dec(x_54); -x_58 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_58; -} -else -{ -obj* x_59; -x_59 = lean::cnstr_get(x_52, 1); -lean::inc(x_59); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; obj* x_61; uint8 x_62; -x_60 = lean::cnstr_get(x_52, 0); -lean::inc(x_60); -lean::dec(x_52); -x_61 = lean::mk_nat_obj(0u); -x_62 = lean::nat_dec_eq(x_54, x_61); -if (x_62 == 0) -{ -obj* x_63; uint8 x_64; -x_63 = lean::mk_nat_obj(1u); -x_64 = lean::nat_dec_eq(x_54, x_63); -lean::dec(x_54); -if (x_64 == 0) -{ -obj* x_65; -x_65 = l_Lean_Parser_Syntax_asNode___main(x_60); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; -x_66 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__1; -return x_66; -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_67 = lean::cnstr_get(x_65, 0); -lean::inc(x_67); -lean::dec(x_65); -x_68 = lean::cnstr_get(x_67, 1); -lean::inc(x_68); -lean::dec(x_67); -x_69 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__2; -x_70 = l_List_map___main___rarg(x_69, x_68); -x_71 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_71, 0, x_70); -return x_71; -} -} -else -{ -if (lean::obj_tag(x_60) == 0) -{ -obj* x_72; obj* x_73; obj* x_74; -x_72 = lean::cnstr_get(x_60, 0); -lean::inc(x_72); -lean::dec(x_60); -x_73 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_73, 0, x_72); -x_74 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_74, 0, x_73); -return x_74; -} -else -{ -obj* x_75; -lean::dec(x_60); -x_75 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__3; -return x_75; -} -} -} -else -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; -lean::dec(x_54); -x_76 = l_Lean_Parser_command_simpleDeclVal_HasView; -x_77 = lean::cnstr_get(x_76, 0); -lean::inc(x_77); -x_78 = lean::apply_1(x_77, x_60); -x_79 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -return x_79; -} -} -else -{ -obj* x_80; -lean::dec(x_59); -lean::dec(x_54); -lean::dec(x_52); -x_80 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_80; -} -} -} -} -} -} -} -} -else -{ -obj* x_81; -lean::dec(x_11); -lean::dec(x_6); -x_81 = l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4; -return x_81; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declVal_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declVal_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_declVal_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_declVal_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -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::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = lean::mk_string("."); -x_11 = l_Lean_Parser_symbol_tokens___rarg(x_10, x_2); -lean::dec(x_10); -x_12 = l_Lean_Parser_command_equation_Parser_Lean_Parser_HasTokens; -x_13 = l_Lean_Parser_tokens___rarg(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_6); -lean::dec(x_13); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_14); -lean::dec(x_14); -lean::dec(x_11); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_15); -lean::dec(x_15); -lean::dec(x_9); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_17, x_6); -lean::dec(x_17); -x_19 = l_Lean_Parser_tokens___rarg(x_18); -lean::dec(x_18); -return x_19; -} -} -obj* _init_l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string(":="); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_9); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_command_simpleDeclVal; -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_16, 0, x_15); -lean::closure_set(x_16, 1, x_14); -x_17 = lean::mk_string("."); -x_18 = l_String_trim(x_17); -lean::dec(x_17); -lean::inc(x_18); -x_19 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_19, 0, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_8); -lean::closure_set(x_20, 2, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_equation_Parser), 4, 0); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_22, 0, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_12); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_20); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_16); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_26, 0, x_25); -lean::closure_set(x_26, 1, x_8); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_12); -x_28 = l_Lean_Parser_command_declVal; -x_29 = l_Lean_Parser_command_declVal_HasView; -x_30 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_28, x_27, x_29); -lean::dec(x_27); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_30; -} -} -obj* _init_l_Lean_Parser_command_declVal_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::mk_string(":="); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_command_simpleDeclVal; -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_12, 0, x_11); -lean::closure_set(x_12, 1, x_10); -x_13 = lean::mk_string("."); -x_14 = l_String_trim(x_13); -lean::dec(x_13); -lean::inc(x_14); -x_15 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_4); -lean::closure_set(x_16, 2, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_equation_Parser), 4, 0); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_8); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_16); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_12); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_22, 0, x_21); -lean::closure_set(x_22, 1, x_4); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_8); -return x_23; -} -} -obj* l_Lean_Parser_command_declVal_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_declVal; -x_6 = l_Lean_Parser_command_declVal_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_relaxedInferModifier() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("relaxedInferModifier"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -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 = l_Lean_Parser_command_relaxedInferModifier; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -return x_6; -} -} -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -x_7 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_4); -x_9 = lean::box(3); -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 = l_Lean_Parser_command_relaxedInferModifier; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_command_relaxedInferModifier; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_19 = lean::cnstr_get(x_3, 0); -lean::inc(x_19); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_4); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_14); -lean::cnstr_set(x_22, 1, x_21); -x_23 = l_Lean_Parser_command_relaxedInferModifier; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -return x_24; -} -} -} -} -obj* _init_l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_10; obj* x_11; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__2; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_10 = x_24; -x_11 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_10 = x_27; -x_11 = x_26; -goto block_20; -} -} -block_9: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_2); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -block_20: -{ -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_10, 0); -lean::inc(x_16); -lean::dec(x_10); -x_2 = x_13; -x_3 = x_16; -goto block_9; -} -} -else -{ -lean::dec(x_11); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_17; -x_17 = l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__1; -return x_17; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_10, 0); -lean::inc(x_18); -lean::dec(x_10); -x_19 = lean::box(0); -x_2 = x_19; -x_3 = x_18; -goto block_9; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_relaxedInferModifier_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_relaxedInferModifier_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_relaxedInferModifier_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_strictInferModifier() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("strictInferModifier"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -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 = l_Lean_Parser_command_strictInferModifier; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -return x_6; -} -} -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -x_7 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_4); -x_9 = lean::box(3); -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 = l_Lean_Parser_command_strictInferModifier; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_command_strictInferModifier; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_19 = lean::cnstr_get(x_3, 0); -lean::inc(x_19); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_4); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_14); -lean::cnstr_set(x_22, 1, x_21); -x_23 = l_Lean_Parser_command_strictInferModifier; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -return x_24; -} -} -} -} -obj* _init_l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_10; obj* x_11; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__2; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_10 = x_24; -x_11 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_10 = x_27; -x_11 = x_26; -goto block_20; -} -} -block_9: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_2); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -block_20: -{ -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_10, 0); -lean::inc(x_16); -lean::dec(x_10); -x_2 = x_13; -x_3 = x_16; -goto block_9; -} -} -else -{ -lean::dec(x_11); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_17; -x_17 = l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__1; -return x_17; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_10, 0); -lean::inc(x_18); -lean::dec(x_10); -x_19 = lean::box(0); -x_2 = x_19; -x_3 = x_18; -goto block_9; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_strictInferModifier_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_strictInferModifier_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_strictInferModifier_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_inferModifier() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("inferModifier"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_inferModifier_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_relaxedInferModifier_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_inferModifier; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_command_strictInferModifier_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_inferModifier; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_relaxedInferModifier_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("inferModifier"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_command_strictInferModifier_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_command_relaxedInferModifier_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_inferModifier_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_inferModifier_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_inferModifier_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -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::dec(x_1); -x_4 = lean::mk_string("}"); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = lean::mk_string("("); -x_12 = l_Lean_Parser_symbol_tokens___rarg(x_11, x_2); -lean::dec(x_11); -x_13 = lean::mk_string(")"); -x_14 = l_Lean_Parser_symbol_tokens___rarg(x_13, x_2); -lean::dec(x_13); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_6); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_15); -lean::dec(x_15); -lean::dec(x_12); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_18, x_6); -lean::dec(x_18); -x_20 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_19); -lean::dec(x_19); -lean::dec(x_10); -x_21 = l_Lean_Parser_tokens___rarg(x_20); -lean::dec(x_20); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_21, x_6); -lean::dec(x_21); -x_23 = l_Lean_Parser_tokens___rarg(x_22); -lean::dec(x_22); -return x_23; -} -} -obj* l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = l_Lean_Parser_command_relaxedInferModifier; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_6, x_1, x_2, x_3, x_4, x_5); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_9); -lean::cnstr_set(x_7, 0, x_10); -return x_7; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_7, 0); -x_12 = lean::cnstr_get(x_7, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_7); -x_13 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_11); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -return x_14; -} -} -} -obj* l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = l_Lean_Parser_command_strictInferModifier; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_6, x_1, x_2, x_3, x_4, x_5); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_9); -lean::cnstr_set(x_7, 0, x_10); -return x_7; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_7, 0); -x_12 = lean::cnstr_get(x_7, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_7); -x_13 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_11); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("{"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::mk_string("}"); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_8); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_9); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::mk_string("("); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_8); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::mk_string(")"); -x_23 = l_String_trim(x_22); -lean::dec(x_22); -lean::inc(x_23); -x_24 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_24, 0, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_8); -lean::closure_set(x_25, 2, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_14); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_21); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView___lambda__2), 5, 1); -lean::closure_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_14); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_17); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_31, 0, x_30); -lean::closure_set(x_31, 1, x_8); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_14); -x_33 = l_Lean_Parser_command_inferModifier; -x_34 = l_Lean_Parser_command_inferModifier_HasView; -x_35 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_33, x_32, x_34); -lean::dec(x_32); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_35; -} -} -obj* _init_l_Lean_Parser_command_inferModifier_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_1 = lean::mk_string("{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("}"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string("("); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::mk_string(")"); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_10); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView___lambda__2), 5, 1); -lean::closure_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_10); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_13); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_10); -return x_28; -} -} -obj* l_Lean_Parser_command_inferModifier_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_inferModifier; -x_6 = l_Lean_Parser_command_inferModifier_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_introRule() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("introRule"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_introRule_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_3); -x_7 = l_Lean_Parser_command_optDeclSig_HasView; -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_5); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_12 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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_6); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::box(3); -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 = l_Lean_Parser_command_introRule; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -else -{ -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; -x_19 = lean::cnstr_get(x_4, 0); -lean::inc(x_19); -lean::dec(x_4); -x_20 = l_Lean_Parser_command_inferModifier_HasView; -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -x_22 = lean::apply_1(x_21, x_19); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_10); -x_24 = l_Lean_Parser_noKind; -x_25 = l_Lean_Parser_Syntax_mkNode(x_24, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_11); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::box(3); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -x_30 = l_Lean_Parser_command_introRule; -x_31 = l_Lean_Parser_Syntax_mkNode(x_30, x_29); -return x_31; -} -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_2, 0); -lean::inc(x_32); -lean::dec(x_2); -x_33 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_11); -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 = 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_command_introRule; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -return x_39; -} -else -{ -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; -x_40 = lean::cnstr_get(x_4, 0); -lean::inc(x_40); -lean::dec(x_4); -x_41 = l_Lean_Parser_command_inferModifier_HasView; -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -x_43 = lean::apply_1(x_42, x_40); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_10); -x_45 = l_Lean_Parser_noKind; -x_46 = l_Lean_Parser_Syntax_mkNode(x_45, x_44); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_11); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_6); -lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_33); -lean::cnstr_set(x_49, 1, x_48); -x_50 = l_Lean_Parser_command_introRule; -x_51 = l_Lean_Parser_Syntax_mkNode(x_50, x_49); -return x_51; -} -} -} -} -obj* _init_l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_inferModifier_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_optDeclSig_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_5 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_6 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_7 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_4); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_3); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_3, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -lean::free_heap_obj(x_3); -x_11 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_12 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_11); -lean::cnstr_set(x_13, 2, x_1); -lean::cnstr_set(x_13, 3, x_12); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_10, 1); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_15 = lean::cnstr_get(x_10, 0); -lean::inc(x_15); -lean::dec(x_10); -x_16 = l_Lean_Parser_command_inferModifier_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_15); -lean::cnstr_set(x_3, 0, x_18); -x_19 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_20 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_21 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_19); -lean::cnstr_set(x_21, 2, x_3); -lean::cnstr_set(x_21, 3, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_14); -lean::dec(x_10); -lean::free_heap_obj(x_3); -x_22 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_23 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_24 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_25 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_25, 0, x_1); -lean::cnstr_set(x_25, 1, x_22); -lean::cnstr_set(x_25, 2, x_23); -lean::cnstr_set(x_25, 3, x_24); -return x_25; -} -} -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_3, 0); -lean::inc(x_26); -lean::dec(x_3); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_29 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_30 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_30, 0, x_1); -lean::cnstr_set(x_30, 1, x_28); -lean::cnstr_set(x_30, 2, x_1); -lean::cnstr_set(x_30, 3, x_29); -return x_30; -} -else -{ -obj* x_31; -x_31 = lean::cnstr_get(x_27, 1); -lean::inc(x_31); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_32 = lean::cnstr_get(x_27, 0); -lean::inc(x_32); -lean::dec(x_27); -x_33 = l_Lean_Parser_command_inferModifier_HasView; -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -x_35 = lean::apply_1(x_34, x_32); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_37 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_38 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_39 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_39, 0, x_1); -lean::cnstr_set(x_39, 1, x_37); -lean::cnstr_set(x_39, 2, x_36); -lean::cnstr_set(x_39, 3, x_38); -return x_39; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -lean::dec(x_31); -lean::dec(x_27); -x_40 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_41 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_42 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_43 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_43, 0, x_1); -lean::cnstr_set(x_43, 1, x_40); -lean::cnstr_set(x_43, 2, x_41); -lean::cnstr_set(x_43, 3, x_42); -return x_43; -} -} -} -} -} -} -obj* l_Lean_Parser_command_introRule_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_100; -x_100 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_100) == 0) -{ -obj* x_101; -x_101 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__3; -return x_101; -} -else -{ -obj* x_102; obj* x_103; -x_102 = lean::cnstr_get(x_100, 0); -lean::inc(x_102); -lean::dec(x_100); -x_103 = lean::cnstr_get(x_102, 1); -lean::inc(x_103); -lean::dec(x_102); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; -x_104 = lean::box(3); -x_2 = x_103; -x_3 = x_104; -goto block_99; -} -else -{ -obj* x_105; obj* x_106; -x_105 = lean::cnstr_get(x_103, 0); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_103, 1); -lean::inc(x_106); -lean::dec(x_103); -x_2 = x_106; -x_3 = x_105; -goto block_99; -} -} -block_99: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_96; obj* x_97; -x_96 = lean::cnstr_get(x_3, 0); -lean::inc(x_96); -lean::dec(x_3); -x_97 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_97, 0, x_96); -x_4 = x_97; -goto block_95; -} -else -{ -obj* x_98; -lean::dec(x_3); -x_98 = lean::box(0); -x_4 = x_98; -goto block_95; -} -block_95: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_92; -x_92 = lean::box(3); -x_5 = x_2; -x_6 = x_92; -goto block_91; -} -else -{ -obj* x_93; obj* x_94; -x_93 = lean::cnstr_get(x_2, 0); -lean::inc(x_93); -x_94 = lean::cnstr_get(x_2, 1); -lean::inc(x_94); -lean::dec(x_2); -x_5 = x_94; -x_6 = x_93; -goto block_91; -} -block_91: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -obj* x_89; -x_89 = lean::cnstr_get(x_6, 0); -lean::inc(x_89); -lean::dec(x_6); -x_7 = x_89; -goto block_88; -} -else -{ -obj* x_90; -lean::dec(x_6); -x_90 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = x_90; -goto block_88; -} -block_88: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_85; -x_85 = lean::box(3); -x_8 = x_5; -x_9 = x_85; -goto block_84; -} -else -{ -obj* x_86; obj* x_87; -x_86 = lean::cnstr_get(x_5, 0); -lean::inc(x_86); -x_87 = lean::cnstr_get(x_5, 1); -lean::inc(x_87); -lean::dec(x_5); -x_8 = x_87; -x_9 = x_86; -goto block_84; -} -block_84: -{ -obj* x_10; -x_10 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_10) == 0) -{ -if (lean::obj_tag(x_8) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_12 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_11); -lean::cnstr_set(x_13, 3, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_8, 0); -lean::inc(x_14); -lean::dec(x_8); -x_15 = l_Lean_Parser_command_optDeclSig_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -x_18 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_19 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_19, 0, x_4); -lean::cnstr_set(x_19, 1, x_7); -lean::cnstr_set(x_19, 2, x_18); -lean::cnstr_set(x_19, 3, x_17); -return x_19; -} -} -else -{ -uint8 x_20; -x_20 = !lean::is_exclusive(x_10); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_10, 0); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; -lean::free_heap_obj(x_10); -x_23 = lean::box(0); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_24; obj* x_25; -x_24 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_25 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_7); -lean::cnstr_set(x_25, 2, x_23); -lean::cnstr_set(x_25, 3, x_24); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = lean::cnstr_get(x_8, 0); -lean::inc(x_26); -lean::dec(x_8); -x_27 = l_Lean_Parser_command_optDeclSig_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -x_30 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_30, 0, x_4); -lean::cnstr_set(x_30, 1, x_7); -lean::cnstr_set(x_30, 2, x_23); -lean::cnstr_set(x_30, 3, x_29); -return x_30; -} -} -else -{ -obj* x_31; -x_31 = lean::cnstr_get(x_22, 1); -lean::inc(x_31); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_32 = lean::cnstr_get(x_22, 0); -lean::inc(x_32); -lean::dec(x_22); -x_33 = l_Lean_Parser_command_inferModifier_HasView; -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -x_35 = lean::apply_1(x_34, x_32); -lean::cnstr_set(x_10, 0, x_35); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_36; obj* x_37; -x_36 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_37 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_7); -lean::cnstr_set(x_37, 2, x_10); -lean::cnstr_set(x_37, 3, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_38 = lean::cnstr_get(x_8, 0); -lean::inc(x_38); -lean::dec(x_8); -x_39 = l_Lean_Parser_command_optDeclSig_HasView; -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_38); -x_42 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_42, 0, x_4); -lean::cnstr_set(x_42, 1, x_7); -lean::cnstr_set(x_42, 2, x_10); -lean::cnstr_set(x_42, 3, x_41); -return x_42; -} -} -else -{ -lean::dec(x_31); -lean::dec(x_22); -lean::free_heap_obj(x_10); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; -x_43 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_44 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_45 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_45, 0, x_4); -lean::cnstr_set(x_45, 1, x_7); -lean::cnstr_set(x_45, 2, x_43); -lean::cnstr_set(x_45, 3, x_44); -return x_45; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_46 = lean::cnstr_get(x_8, 0); -lean::inc(x_46); -lean::dec(x_8); -x_47 = l_Lean_Parser_command_optDeclSig_HasView; -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::apply_1(x_48, x_46); -x_50 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_51 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_51, 0, x_4); -lean::cnstr_set(x_51, 1, x_7); -lean::cnstr_set(x_51, 2, x_50); -lean::cnstr_set(x_51, 3, x_49); -return x_51; -} -} -} -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_10, 0); -lean::inc(x_52); -lean::dec(x_10); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = lean::box(0); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_55; obj* x_56; -x_55 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_56 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_56, 0, x_4); -lean::cnstr_set(x_56, 1, x_7); -lean::cnstr_set(x_56, 2, x_54); -lean::cnstr_set(x_56, 3, x_55); -return x_56; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_57 = lean::cnstr_get(x_8, 0); -lean::inc(x_57); -lean::dec(x_8); -x_58 = l_Lean_Parser_command_optDeclSig_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -x_61 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_61, 0, x_4); -lean::cnstr_set(x_61, 1, x_7); -lean::cnstr_set(x_61, 2, x_54); -lean::cnstr_set(x_61, 3, x_60); -return x_61; -} -} -else -{ -obj* x_62; -x_62 = lean::cnstr_get(x_53, 1); -lean::inc(x_62); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_63 = lean::cnstr_get(x_53, 0); -lean::inc(x_63); -lean::dec(x_53); -x_64 = l_Lean_Parser_command_inferModifier_HasView; -x_65 = lean::cnstr_get(x_64, 0); -lean::inc(x_65); -x_66 = lean::apply_1(x_65, x_63); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_68; obj* x_69; -x_68 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_69 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_69, 0, x_4); -lean::cnstr_set(x_69, 1, x_7); -lean::cnstr_set(x_69, 2, x_67); -lean::cnstr_set(x_69, 3, x_68); -return x_69; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_70 = lean::cnstr_get(x_8, 0); -lean::inc(x_70); -lean::dec(x_8); -x_71 = l_Lean_Parser_command_optDeclSig_HasView; -x_72 = lean::cnstr_get(x_71, 0); -lean::inc(x_72); -x_73 = lean::apply_1(x_72, x_70); -x_74 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_74, 0, x_4); -lean::cnstr_set(x_74, 1, x_7); -lean::cnstr_set(x_74, 2, x_67); -lean::cnstr_set(x_74, 3, x_73); -return x_74; -} -} -else -{ -lean::dec(x_62); -lean::dec(x_53); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_75; obj* x_76; obj* x_77; -x_75 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_76 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_77 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_77, 0, x_4); -lean::cnstr_set(x_77, 1, x_7); -lean::cnstr_set(x_77, 2, x_75); -lean::cnstr_set(x_77, 3, x_76); -return x_77; -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_78 = lean::cnstr_get(x_8, 0); -lean::inc(x_78); -lean::dec(x_8); -x_79 = l_Lean_Parser_command_optDeclSig_HasView; -x_80 = lean::cnstr_get(x_79, 0); -lean::inc(x_80); -x_81 = lean::apply_1(x_80, x_78); -x_82 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_83 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_83, 0, x_4); -lean::cnstr_set(x_83, 1, x_7); -lean::cnstr_set(x_83, 2, x_82); -lean::cnstr_set(x_83, 3, x_81); -return x_83; -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_introRule_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_introRule_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_introRule_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_introRule_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_introRule_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -lean::inc(x_3); -lean::inc(x_5); -x_6 = l_Lean_Parser_token(x_5, x_3, x_4); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; -x_9 = lean::cnstr_get(x_6, 1); -x_10 = lean::cnstr_get(x_6, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_7); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_7, 0); -x_13 = lean::cnstr_get(x_7, 1); -x_14 = lean::cnstr_get(x_7, 2); -if (lean::obj_tag(x_12) == 1) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_5); -lean::dec(x_3); -x_37 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_37); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_7); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_38); -x_40 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_41 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_39, x_40); -x_42 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_41); -lean::cnstr_set(x_6, 0, x_42); -return x_6; -} -else -{ -obj* x_43; -lean::free_heap_obj(x_7); -lean::dec(x_12); -lean::free_heap_obj(x_6); -x_43 = lean::box(0); -x_15 = x_43; -goto block_36; -} -block_36: -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::dec(x_15); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_3); -x_17 = lean::box(0); -x_18 = l_String_splitAux___main___closed__1; -x_19 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_20 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_18, x_19, x_16, x_17, x_5, x_13, x_9); -lean::dec(x_5); -lean::dec(x_16); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_22); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_23); -x_26 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_25, x_19); -x_27 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_26); -lean::cnstr_set(x_20, 0, x_27); -return x_20; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_28 = lean::cnstr_get(x_20, 0); -x_29 = lean::cnstr_get(x_20, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_20); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_28); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_30); -x_33 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_32, x_19); -x_34 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_29); -return x_35; -} -} -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_44 = lean::cnstr_get(x_7, 0); -x_45 = lean::cnstr_get(x_7, 1); -x_46 = lean::cnstr_get(x_7, 2); -lean::inc(x_46); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_7); -if (lean::obj_tag(x_44) == 1) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -lean::dec(x_5); -lean::dec(x_3); -x_63 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_64 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_64, 0, x_44); -lean::cnstr_set(x_64, 1, x_45); -lean::cnstr_set(x_64, 2, x_63); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_46, x_64); -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_65); -x_67 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_68 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_66, x_67); -x_69 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_68); -lean::cnstr_set(x_6, 0, x_69); -return x_6; -} -else -{ -obj* x_70; -lean::dec(x_44); -lean::free_heap_obj(x_6); -x_70 = lean::box(0); -x_47 = x_70; -goto block_62; -} -block_62: -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -lean::dec(x_47); -x_48 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_48, 0, x_3); -x_49 = lean::box(0); -x_50 = l_String_splitAux___main___closed__1; -x_51 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_52 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_50, x_51, x_48, x_49, x_5, x_45, x_9); -lean::dec(x_5); -lean::dec(x_48); -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_52, 1); -lean::inc(x_54); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - lean::cnstr_release(x_52, 1); - x_55 = x_52; -} else { - lean::dec_ref(x_52); - x_55 = lean::box(0); -} -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_46, x_53); -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_56); -x_59 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_58, x_51); -x_60 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_59); -if (lean::is_scalar(x_55)) { - x_61 = lean::alloc_cnstr(0, 2, 0); -} else { - x_61 = x_55; -} -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_54); -return x_61; -} -} -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_71 = lean::cnstr_get(x_6, 1); -lean::inc(x_71); -lean::dec(x_6); -x_72 = lean::cnstr_get(x_7, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_7, 1); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_7, 2); -lean::inc(x_74); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_75 = x_7; -} else { - lean::dec_ref(x_7); - x_75 = lean::box(0); -} -if (lean::obj_tag(x_72) == 1) -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -lean::dec(x_5); -lean::dec(x_3); -x_92 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_75)) { - x_93 = lean::alloc_cnstr(0, 3, 0); -} else { - x_93 = x_75; -} -lean::cnstr_set(x_93, 0, x_72); -lean::cnstr_set(x_93, 1, x_73); -lean::cnstr_set(x_93, 2, x_92); -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_74, x_93); -x_95 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_94); -x_96 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_97 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_95, x_96); -x_98 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_97); -x_99 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_71); -return x_99; -} -else -{ -obj* x_100; -lean::dec(x_75); -lean::dec(x_72); -x_100 = lean::box(0); -x_76 = x_100; -goto block_91; -} -block_91: -{ -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; -lean::dec(x_76); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_3); -x_78 = lean::box(0); -x_79 = l_String_splitAux___main___closed__1; -x_80 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_81 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_79, x_80, x_77, x_78, x_5, x_73, x_71); -lean::dec(x_5); -lean::dec(x_77); -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_81, 1); -lean::inc(x_83); -if (lean::is_exclusive(x_81)) { - lean::cnstr_release(x_81, 0); - lean::cnstr_release(x_81, 1); - x_84 = x_81; -} else { - lean::dec_ref(x_81); - x_84 = lean::box(0); -} -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_74, x_82); -x_86 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_87 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_86, x_85); -x_88 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_87, x_80); -x_89 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_88); -if (lean::is_scalar(x_84)) { - x_90 = lean::alloc_cnstr(0, 2, 0); -} else { - x_90 = x_84; -} -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_83); -return x_90; -} -} -} -else -{ -uint8 x_101; -lean::dec(x_5); -lean::dec(x_3); -x_101 = !lean::is_exclusive(x_6); -if (x_101 == 0) -{ -obj* x_102; uint8 x_103; -x_102 = lean::cnstr_get(x_6, 0); -lean::dec(x_102); -x_103 = !lean::is_exclusive(x_7); -if (x_103 == 0) -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_104 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_104, x_7); -x_106 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_107 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_105, x_106); -x_108 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_107); -lean::cnstr_set(x_6, 0, x_108); -return x_6; -} -else -{ -obj* x_109; uint8 x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; -x_109 = lean::cnstr_get(x_7, 0); -x_110 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_109); -lean::dec(x_7); -x_111 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_111, 0, x_109); -lean::cnstr_set_scalar(x_111, sizeof(void*)*1, x_110); -x_112 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_112, x_111); -x_114 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_115 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_113, x_114); -x_116 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_115); -lean::cnstr_set(x_6, 0, x_116); -return x_6; -} -} -else -{ -obj* x_117; obj* x_118; uint8 x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; -x_117 = lean::cnstr_get(x_6, 1); -lean::inc(x_117); -lean::dec(x_6); -x_118 = lean::cnstr_get(x_7, 0); -lean::inc(x_118); -x_119 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_120 = x_7; -} else { - lean::dec_ref(x_7); - x_120 = lean::box(0); -} -if (lean::is_scalar(x_120)) { - x_121 = lean::alloc_cnstr(1, 1, 1); -} else { - x_121 = x_120; -} -lean::cnstr_set(x_121, 0, x_118); -lean::cnstr_set_scalar(x_121, sizeof(void*)*1, x_119); -x_122 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_123 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_122, x_121); -x_124 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_125 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_123, x_124); -x_126 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_125); -x_127 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_117); -return x_127; -} -} -} -} -obj* _init_l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("|"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_tokens___rarg(x_5); -x_7 = l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens; -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_4); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_8); -lean::dec(x_8); -lean::dec(x_6); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_10); -lean::dec(x_10); -lean::dec(x_3); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -return x_12; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("|"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser), 4, 0); -x_11 = 0; -x_12 = lean::box(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_13, 0, x_10); -lean::closure_set(x_13, 1, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_Parser), 4, 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_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_13); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_9); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_command_introRule; -x_22 = l_Lean_Parser_command_introRule_HasView; -x_23 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_21, x_20, x_22); -lean::dec(x_20); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_23; -} -} -obj* _init_l_Lean_Parser_command_introRule_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_1 = lean::mk_string("|"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_inferModifier_Parser), 4, 0); -x_7 = 0; -x_8 = lean::box(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_Parser), 4, 0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -obj* l_Lean_Parser_command_introRule_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_introRule; -x_6 = l_Lean_Parser_command_introRule_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_structBinderContent() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structBinderContent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_4); -x_7 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_8); -x_11 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -} -} -obj* l_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_2); -x_7 = l_Lean_Parser_noKind; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = l_Lean_Parser_command_optDeclSig_HasView; -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_4); -x_12 = lean::box(0); -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_8); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_command_structBinderContent; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -else -{ -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; -x_20 = lean::cnstr_get(x_5, 0); -lean::inc(x_20); -lean::dec(x_5); -x_21 = l_Lean_Parser_Term_binderDefault_HasView; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_12); -x_25 = l_Lean_Parser_Syntax_mkNode(x_7, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_12); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_11); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_8); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_command_structBinderContent; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_33 = lean::cnstr_get(x_3, 0); -lean::inc(x_33); -lean::dec(x_3); -x_34 = l_Lean_Parser_command_inferModifier_HasView; -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_33); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_12); -x_38 = l_Lean_Parser_Syntax_mkNode(x_7, x_37); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_39 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_11); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_8); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_command_structBinderContent; -x_44 = l_Lean_Parser_Syntax_mkNode(x_43, x_42); -return x_44; -} -else -{ -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; -x_45 = lean::cnstr_get(x_5, 0); -lean::inc(x_45); -lean::dec(x_5); -x_46 = l_Lean_Parser_Term_binderDefault_HasView; -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_45); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_12); -x_50 = l_Lean_Parser_Syntax_mkNode(x_7, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_12); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_11); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_38); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_8); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_command_structBinderContent; -x_56 = l_Lean_Parser_Syntax_mkNode(x_55, x_54); -return x_56; -} -} -} -} -obj* l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_5); -if (lean::obj_tag(x_4) == 1) -{ -obj* x_7; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -lean::cnstr_set(x_1, 1, x_6); -lean::cnstr_set(x_1, 0, x_7); -return x_1; -} -else -{ -obj* x_8; -lean::dec(x_4); -x_8 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -lean::cnstr_set(x_1, 1, x_6); -lean::cnstr_set(x_1, 0, x_8); -return x_1; -} -} -else -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_1); -x_11 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_10); -if (lean::obj_tag(x_9) == 1) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_9, 0); -lean::inc(x_12); -lean::dec(x_9); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -lean::dec(x_9); -x_14 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_11); -return x_15; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_61; obj* x_62; -x_61 = lean::box(3); -x_62 = l_Lean_Parser_Syntax_asNode___main(x_61); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; -x_63 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_1 = x_63; -goto block_60; -} -else -{ -obj* x_64; obj* x_65; obj* x_66; -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -lean::dec(x_62); -x_65 = lean::cnstr_get(x_64, 1); -lean::inc(x_65); -lean::dec(x_64); -x_66 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_65); -x_1 = x_66; -goto block_60; -} -block_60: -{ -obj* x_2; obj* x_37; obj* x_38; -x_37 = lean::box(3); -x_38 = l_Lean_Parser_Syntax_asNode___main(x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; -x_39 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_2 = x_39; -goto block_36; -} -else -{ -uint8 x_40; -x_40 = !lean::is_exclusive(x_38); -if (x_40 == 0) -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_38, 0); -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -lean::dec(x_41); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; -lean::free_heap_obj(x_38); -x_43 = lean::box(0); -x_2 = x_43; -goto block_36; -} -else -{ -obj* x_44; -x_44 = lean::cnstr_get(x_42, 1); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_45 = lean::cnstr_get(x_42, 0); -lean::inc(x_45); -lean::dec(x_42); -x_46 = l_Lean_Parser_command_inferModifier_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_45); -lean::cnstr_set(x_38, 0, x_48); -x_2 = x_38; -goto block_36; -} -else -{ -obj* x_49; -lean::dec(x_44); -lean::dec(x_42); -lean::free_heap_obj(x_38); -x_49 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_2 = x_49; -goto block_36; -} -} -} -else -{ -obj* x_50; obj* x_51; -x_50 = lean::cnstr_get(x_38, 0); -lean::inc(x_50); -lean::dec(x_38); -x_51 = lean::cnstr_get(x_50, 1); -lean::inc(x_51); -lean::dec(x_50); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; -x_52 = lean::box(0); -x_2 = x_52; -goto block_36; -} -else -{ -obj* x_53; -x_53 = lean::cnstr_get(x_51, 1); -lean::inc(x_53); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_54 = lean::cnstr_get(x_51, 0); -lean::inc(x_54); -lean::dec(x_51); -x_55 = l_Lean_Parser_command_inferModifier_HasView; -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_57 = lean::apply_1(x_56, x_54); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_2 = x_58; -goto block_36; -} -else -{ -obj* x_59; -lean::dec(x_53); -lean::dec(x_51); -x_59 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_2 = x_59; -goto block_36; -} -} -} -} -block_36: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = l_Lean_Parser_command_optDeclSig_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::box(3); -x_6 = lean::apply_1(x_4, x_5); -x_7 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; -x_8 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_2); -lean::cnstr_set(x_9, 2, x_6); -lean::cnstr_set(x_9, 3, x_8); -return x_9; -} -else -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_7); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_7, 0); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; -lean::free_heap_obj(x_7); -x_13 = lean::box(0); -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_1); -lean::cnstr_set(x_14, 1, x_2); -lean::cnstr_set(x_14, 2, x_6); -lean::cnstr_set(x_14, 3, x_13); -return x_14; -} -else -{ -obj* x_15; -x_15 = lean::cnstr_get(x_12, 1); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = lean::cnstr_get(x_12, 0); -lean::inc(x_16); -lean::dec(x_12); -x_17 = l_Lean_Parser_Term_binderDefault_HasView; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -x_19 = lean::apply_1(x_18, x_16); -lean::cnstr_set(x_7, 0, x_19); -x_20 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_2); -lean::cnstr_set(x_20, 2, x_6); -lean::cnstr_set(x_20, 3, x_7); -return x_20; -} -else -{ -obj* x_21; obj* x_22; -lean::dec(x_15); -lean::dec(x_12); -lean::free_heap_obj(x_7); -x_21 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_22 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_22, 0, x_1); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_6); -lean::cnstr_set(x_22, 3, x_21); -return x_22; -} -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_7, 0); -lean::inc(x_23); -lean::dec(x_7); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::box(0); -x_26 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_26, 0, x_1); -lean::cnstr_set(x_26, 1, x_2); -lean::cnstr_set(x_26, 2, x_6); -lean::cnstr_set(x_26, 3, x_25); -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_28 = lean::cnstr_get(x_24, 0); -lean::inc(x_28); -lean::dec(x_24); -x_29 = l_Lean_Parser_Term_binderDefault_HasView; -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::apply_1(x_30, x_28); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_2); -lean::cnstr_set(x_33, 2, x_6); -lean::cnstr_set(x_33, 3, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; -lean::dec(x_27); -lean::dec(x_24); -x_34 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_35 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_35, 0, x_1); -lean::cnstr_set(x_35, 1, x_2); -lean::cnstr_set(x_35, 2, x_6); -lean::cnstr_set(x_35, 3, x_34); -return x_35; -} -} -} -} -} -} -} -} -obj* l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_111; -x_111 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_112; -x_112 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__2; -return x_112; -} -else -{ -obj* x_113; obj* x_114; -x_113 = lean::cnstr_get(x_111, 0); -lean::inc(x_113); -lean::dec(x_111); -x_114 = lean::cnstr_get(x_113, 1); -lean::inc(x_114); -lean::dec(x_113); -if (lean::obj_tag(x_114) == 0) -{ -obj* x_115; -x_115 = lean::box(3); -x_2 = x_114; -x_3 = x_115; -goto block_110; -} -else -{ -obj* x_116; obj* x_117; -x_116 = lean::cnstr_get(x_114, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_114, 1); -lean::inc(x_117); -lean::dec(x_114); -x_2 = x_117; -x_3 = x_116; -goto block_110; -} -} -block_110: -{ -obj* x_4; obj* x_105; -x_105 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_105) == 0) -{ -obj* x_106; -x_106 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_4 = x_106; -goto block_104; -} -else -{ -obj* x_107; obj* x_108; obj* x_109; -x_107 = lean::cnstr_get(x_105, 0); -lean::inc(x_107); -lean::dec(x_105); -x_108 = lean::cnstr_get(x_107, 1); -lean::inc(x_108); -lean::dec(x_107); -x_109 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_108); -x_4 = x_109; -goto block_104; -} -block_104: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_101; -x_101 = lean::box(3); -x_5 = x_2; -x_6 = x_101; -goto block_100; -} -else -{ -obj* x_102; obj* x_103; -x_102 = lean::cnstr_get(x_2, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_2, 1); -lean::inc(x_103); -lean::dec(x_2); -x_5 = x_103; -x_6 = x_102; -goto block_100; -} -block_100: -{ -obj* x_7; obj* x_78; -x_78 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_78) == 0) -{ -obj* x_79; -x_79 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_7 = x_79; -goto block_77; -} -else -{ -uint8 x_80; -x_80 = !lean::is_exclusive(x_78); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_78, 0); -x_82 = lean::cnstr_get(x_81, 1); -lean::inc(x_82); -lean::dec(x_81); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; -lean::free_heap_obj(x_78); -x_83 = lean::box(0); -x_7 = x_83; -goto block_77; -} -else -{ -obj* x_84; -x_84 = lean::cnstr_get(x_82, 1); -lean::inc(x_84); -if (lean::obj_tag(x_84) == 0) -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_85 = lean::cnstr_get(x_82, 0); -lean::inc(x_85); -lean::dec(x_82); -x_86 = l_Lean_Parser_command_inferModifier_HasView; -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -x_88 = lean::apply_1(x_87, x_85); -lean::cnstr_set(x_78, 0, x_88); -x_7 = x_78; -goto block_77; -} -else -{ -obj* x_89; -lean::dec(x_84); -lean::dec(x_82); -lean::free_heap_obj(x_78); -x_89 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_7 = x_89; -goto block_77; -} -} -} -else -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_78, 0); -lean::inc(x_90); -lean::dec(x_78); -x_91 = lean::cnstr_get(x_90, 1); -lean::inc(x_91); -lean::dec(x_90); -if (lean::obj_tag(x_91) == 0) -{ -obj* x_92; -x_92 = lean::box(0); -x_7 = x_92; -goto block_77; -} -else -{ -obj* x_93; -x_93 = lean::cnstr_get(x_91, 1); -lean::inc(x_93); -if (lean::obj_tag(x_93) == 0) -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_94 = lean::cnstr_get(x_91, 0); -lean::inc(x_94); -lean::dec(x_91); -x_95 = l_Lean_Parser_command_inferModifier_HasView; -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::apply_1(x_96, x_94); -x_98 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -x_7 = x_98; -goto block_77; -} -else -{ -obj* x_99; -lean::dec(x_93); -lean::dec(x_91); -x_99 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_7 = x_99; -goto block_77; -} -} -} -} -block_77: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_74; -x_74 = lean::box(3); -x_8 = x_5; -x_9 = x_74; -goto block_73; -} -else -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_5, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_5, 1); -lean::inc(x_76); -lean::dec(x_5); -x_8 = x_76; -x_9 = x_75; -goto block_73; -} -block_73: -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = l_Lean_Parser_command_optDeclSig_HasView; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_9); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::box(3); -x_14 = l_Lean_Parser_Syntax_asNode___main(x_13); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_16 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_7); -lean::cnstr_set(x_16, 2, x_12); -lean::cnstr_set(x_16, 3, x_15); -return x_16; -} -else -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_14); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_14, 0); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -lean::free_heap_obj(x_14); -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_7); -lean::cnstr_set(x_21, 2, x_12); -lean::cnstr_set(x_21, 3, x_20); -return x_21; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_23 = lean::cnstr_get(x_19, 0); -lean::inc(x_23); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_binderDefault_HasView; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -lean::cnstr_set(x_14, 0, x_26); -x_27 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_27, 0, x_4); -lean::cnstr_set(x_27, 1, x_7); -lean::cnstr_set(x_27, 2, x_12); -lean::cnstr_set(x_27, 3, x_14); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -lean::dec(x_22); -lean::dec(x_19); -lean::free_heap_obj(x_14); -x_28 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_29 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_12); -lean::cnstr_set(x_29, 3, x_28); -return x_29; -} -} -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_14, 0); -lean::inc(x_30); -lean::dec(x_14); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; obj* x_33; -x_32 = lean::box(0); -x_33 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_7); -lean::cnstr_set(x_33, 2, x_12); -lean::cnstr_set(x_33, 3, x_32); -return x_33; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_35 = lean::cnstr_get(x_31, 0); -lean::inc(x_35); -lean::dec(x_31); -x_36 = l_Lean_Parser_Term_binderDefault_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_35); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_40, 0, x_4); -lean::cnstr_set(x_40, 1, x_7); -lean::cnstr_set(x_40, 2, x_12); -lean::cnstr_set(x_40, 3, x_39); -return x_40; -} -else -{ -obj* x_41; obj* x_42; -lean::dec(x_34); -lean::dec(x_31); -x_41 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_42 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_42, 0, x_4); -lean::cnstr_set(x_42, 1, x_7); -lean::cnstr_set(x_42, 2, x_12); -lean::cnstr_set(x_42, 3, x_41); -return x_42; -} -} -} -} -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_8, 0); -lean::inc(x_43); -lean::dec(x_8); -x_44 = l_Lean_Parser_Syntax_asNode___main(x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; -x_45 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_46 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_46, 0, x_4); -lean::cnstr_set(x_46, 1, x_7); -lean::cnstr_set(x_46, 2, x_12); -lean::cnstr_set(x_46, 3, x_45); -return x_46; -} -else -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_44); -if (x_47 == 0) -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_44, 0); -x_49 = lean::cnstr_get(x_48, 1); -lean::inc(x_49); -lean::dec(x_48); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; -lean::free_heap_obj(x_44); -x_50 = lean::box(0); -x_51 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_51, 0, x_4); -lean::cnstr_set(x_51, 1, x_7); -lean::cnstr_set(x_51, 2, x_12); -lean::cnstr_set(x_51, 3, x_50); -return x_51; -} -else -{ -obj* x_52; -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_53 = lean::cnstr_get(x_49, 0); -lean::inc(x_53); -lean::dec(x_49); -x_54 = l_Lean_Parser_Term_binderDefault_HasView; -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -x_56 = lean::apply_1(x_55, x_53); -lean::cnstr_set(x_44, 0, x_56); -x_57 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_57, 0, x_4); -lean::cnstr_set(x_57, 1, x_7); -lean::cnstr_set(x_57, 2, x_12); -lean::cnstr_set(x_57, 3, x_44); -return x_57; -} -else -{ -obj* x_58; obj* x_59; -lean::dec(x_52); -lean::dec(x_49); -lean::free_heap_obj(x_44); -x_58 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_59 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_59, 0, x_4); -lean::cnstr_set(x_59, 1, x_7); -lean::cnstr_set(x_59, 2, x_12); -lean::cnstr_set(x_59, 3, x_58); -return x_59; -} -} -} -else -{ -obj* x_60; obj* x_61; -x_60 = lean::cnstr_get(x_44, 0); -lean::inc(x_60); -lean::dec(x_44); -x_61 = lean::cnstr_get(x_60, 1); -lean::inc(x_61); -lean::dec(x_60); -if (lean::obj_tag(x_61) == 0) -{ -obj* x_62; obj* x_63; -x_62 = lean::box(0); -x_63 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_63, 0, x_4); -lean::cnstr_set(x_63, 1, x_7); -lean::cnstr_set(x_63, 2, x_12); -lean::cnstr_set(x_63, 3, x_62); -return x_63; -} -else -{ -obj* x_64; -x_64 = lean::cnstr_get(x_61, 1); -lean::inc(x_64); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_65 = lean::cnstr_get(x_61, 0); -lean::inc(x_65); -lean::dec(x_61); -x_66 = l_Lean_Parser_Term_binderDefault_HasView; -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -x_68 = lean::apply_1(x_67, x_65); -x_69 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_69, 0, x_68); -x_70 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_70, 0, x_4); -lean::cnstr_set(x_70, 1, x_7); -lean::cnstr_set(x_70, 2, x_12); -lean::cnstr_set(x_70, 3, x_69); -return x_70; -} -else -{ -obj* x_71; obj* x_72; -lean::dec(x_64); -lean::dec(x_61); -x_71 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_72 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_72, 0, x_4); -lean::cnstr_set(x_72, 1, x_7); -lean::cnstr_set(x_72, 2, x_12); -lean::cnstr_set(x_72, 3, x_71); -return x_72; -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structBinderContent_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_structBinderContent_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structBinderContent_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_tokens___rarg(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_1); -lean::dec(x_7); -x_9 = l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens; -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_8); -lean::dec(x_8); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_10); -lean::dec(x_10); -lean::dec(x_4); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_11); -lean::dec(x_11); -lean::dec(x_2); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -return x_13; -} -} -obj* _init_l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser), 4, 0); -x_8 = 0; -x_9 = lean::box(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_10, 0, x_7); -lean::closure_set(x_10, 1, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefault_Parser), 5, 0); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::box(x_8); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_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_6); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_command_structBinderContent; -x_22 = l_Lean_Parser_command_structBinderContent_HasView; -x_23 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_21, x_20, x_22); -lean::dec(x_20); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_23; -} -} -obj* _init_l_Lean_Parser_command_structBinderContent_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; uint8 x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser), 4, 0); -x_4 = 0; -x_5 = lean::box(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_6, 0, x_3); -lean::closure_set(x_6, 1, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefault_Parser), 5, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::box(x_4); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_Parser), 4, 0); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_2); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -obj* l_Lean_Parser_command_structBinderContent_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_structBinderContent; -x_6 = l_Lean_Parser_command_structBinderContent_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinderContent() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structExplicitBinderContent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_notationLike_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_structExplicitBinderContent; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_command_structBinderContent_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_structExplicitBinderContent; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_notationLike_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structExplicitBinderContent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_command_structBinderContent_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_command_notationLike_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinderContent_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinderContent_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structExplicitBinderContent_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structExplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_structExplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_command_structExplicitBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_command_structExplicitBinder; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_command_structExplicitBinder; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_2, 0); -lean::inc(x_23); -lean::dec(x_2); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_command_structExplicitBinder; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_4, 0); -lean::inc(x_30); -lean::dec(x_4); -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_7); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_command_structExplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_structExplicitBinderContent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_structExplicitBinderContent_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_17; obj* x_18; obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__3; -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_17 = x_34; -x_18 = x_35; -goto block_30; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -lean::dec(x_34); -x_17 = x_37; -x_18 = x_36; -goto block_30; -} -} -block_16: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_structExplicitBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_2); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -block_30: -{ -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::box(0); -x_22 = l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -lean::cnstr_set(x_23, 2, x_21); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_17, 1); -lean::inc(x_25); -lean::dec(x_17); -x_2 = x_20; -x_3 = x_24; -x_4 = x_25; -goto block_16; -} -} -else -{ -lean::dec(x_18); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_26; -x_26 = l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__2; -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_17, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_17, 1); -lean::inc(x_28); -lean::dec(x_17); -x_29 = lean::box(0); -x_2 = x_29; -x_3 = x_27; -x_4 = x_28; -goto block_16; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structExplicitBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_structExplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structExplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structImplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structImplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_structImplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_command_structBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_command_structImplicitBinder; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_command_structImplicitBinder; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_2, 0); -lean::inc(x_23); -lean::dec(x_2); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_command_structImplicitBinder; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_4, 0); -lean::inc(x_30); -lean::dec(x_4); -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_7); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_command_structImplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -} -obj* _init_l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_structBinderContent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_structBinderContent_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_17; obj* x_18; obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__3; -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_17 = x_34; -x_18 = x_35; -goto block_30; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -lean::dec(x_34); -x_17 = x_37; -x_18 = x_36; -goto block_30; -} -} -block_16: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_structBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_2); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -block_30: -{ -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::box(0); -x_22 = l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -lean::cnstr_set(x_23, 2, x_21); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_17, 1); -lean::inc(x_25); -lean::dec(x_17); -x_2 = x_20; -x_3 = x_24; -x_4 = x_25; -goto block_16; -} -} -else -{ -lean::dec(x_18); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_26; -x_26 = l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__2; -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_17, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_17, 1); -lean::inc(x_28); -lean::dec(x_17); -x_29 = lean::box(0); -x_2 = x_29; -x_3 = x_27; -x_4 = x_28; -goto block_16; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structImplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structImplicitBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_structImplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structImplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_strictImplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("strictImplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_strictImplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_command_structBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_command_strictImplicitBinder; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_command_strictImplicitBinder; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_2, 0); -lean::inc(x_23); -lean::dec(x_2); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_command_strictImplicitBinder; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_4, 0); -lean::inc(x_30); -lean::dec(x_4); -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_7); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_command_strictImplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -} -obj* _init_l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_structBinderContent_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_17; obj* x_18; obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__2; -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_17 = x_34; -x_18 = x_35; -goto block_30; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -lean::dec(x_34); -x_17 = x_37; -x_18 = x_36; -goto block_30; -} -} -block_16: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_structBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_2); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -block_30: -{ -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::box(0); -x_22 = l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -lean::cnstr_set(x_23, 2, x_21); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_17, 1); -lean::inc(x_25); -lean::dec(x_17); -x_2 = x_20; -x_3 = x_24; -x_4 = x_25; -goto block_16; -} -} -else -{ -lean::dec(x_18); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_26; -x_26 = l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_17, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_17, 1); -lean::inc(x_28); -lean::dec(x_17); -x_29 = lean::box(0); -x_2 = x_29; -x_3 = x_27; -x_4 = x_28; -goto block_16; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_strictImplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_strictImplicitBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_strictImplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_strictImplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_instImplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("instImplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_instImplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_command_structBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_command_instImplicitBinder; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_command_instImplicitBinder; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_2, 0); -lean::inc(x_23); -lean::dec(x_2); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_command_instImplicitBinder; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_4, 0); -lean::inc(x_30); -lean::dec(x_4); -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_7); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_command_instImplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -} -obj* _init_l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_structBinderContent_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_17; obj* x_18; obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__2; -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_17 = x_34; -x_18 = x_35; -goto block_30; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -lean::dec(x_34); -x_17 = x_37; -x_18 = x_36; -goto block_30; -} -} -block_16: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_structBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_2); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -block_30: -{ -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::box(0); -x_22 = l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -lean::cnstr_set(x_23, 2, x_21); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_17, 1); -lean::inc(x_25); -lean::dec(x_17); -x_2 = x_20; -x_3 = x_24; -x_4 = x_25; -goto block_16; -} -} -else -{ -lean::dec(x_18); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_26; -x_26 = l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_17, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_17, 1); -lean::inc(x_28); -lean::dec(x_17); -x_29 = lean::box(0); -x_2 = x_29; -x_3 = x_27; -x_4 = x_28; -goto block_16; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_instImplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_instImplicitBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_instImplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_instImplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structureFieldBlock() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structureFieldBlock"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_structureFieldBlock_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_structExplicitBinder_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_structureFieldBlock; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -case 1: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_command_structImplicitBinder_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_structureFieldBlock; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -case 2: -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -lean::dec(x_1); -x_24 = l_Lean_Parser_command_strictImplicitBinder_HasView; -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_2); -x_31 = l_Lean_Parser_command_structureFieldBlock; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -default: -{ -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; -x_33 = lean::cnstr_get(x_1, 0); -lean::inc(x_33); -lean::dec(x_1); -x_34 = l_Lean_Parser_command_instImplicitBinder_HasView; -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_33); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_2); -x_38 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_2); -x_41 = l_Lean_Parser_command_structureFieldBlock; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -} -} -} -obj* _init_l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_structExplicitBinder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structureFieldBlock"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_dec_eq(x_21, x_30); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::mk_nat_obj(2u); -x_33 = lean::nat_dec_eq(x_21, x_32); -lean::dec(x_21); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_command_instImplicitBinder_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = l_Lean_Parser_command_strictImplicitBinder_HasView; -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::apply_1(x_39, x_27); -x_41 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -return x_41; -} -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -lean::dec(x_21); -x_42 = l_Lean_Parser_command_structImplicitBinder_HasView; -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::apply_1(x_43, x_27); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -lean::dec(x_21); -x_46 = l_Lean_Parser_command_structExplicitBinder_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_27); -x_49 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -return x_49; -} -} -else -{ -obj* x_50; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_50 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_50; -} -} -} -} -} -} -} -else -{ -obj* x_51; -lean::dec(x_11); -lean::dec(x_6); -x_51 = l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1; -return x_51; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structureFieldBlock_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structureFieldBlock_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_structureFieldBlock_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structureFieldBlock_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -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::dec(x_1); -x_4 = l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens; -x_5 = l_Lean_Parser_tokens___rarg(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasTokens; -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_6); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_8); -lean::dec(x_8); -lean::dec(x_5); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_6); -lean::dec(x_10); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = lean::mk_string(")"); -x_14 = l_Lean_Parser_symbol_tokens___rarg(x_13, x_2); -lean::dec(x_13); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_6); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_15); -lean::dec(x_15); -lean::dec(x_12); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_16); -lean::dec(x_16); -lean::dec(x_3); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -x_19 = lean::mk_string("{"); -x_20 = l_Lean_Parser_symbol_tokens___rarg(x_19, x_2); -lean::dec(x_19); -x_21 = lean::mk_string("}"); -x_22 = l_Lean_Parser_symbol_tokens___rarg(x_21, x_2); -lean::dec(x_21); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_22, x_6); -lean::dec(x_22); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_23); -lean::dec(x_23); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_24); -lean::dec(x_24); -lean::dec(x_20); -x_26 = l_Lean_Parser_tokens___rarg(x_25); -lean::dec(x_25); -x_27 = lean::mk_string("⦃"); -x_28 = l_Lean_Parser_symbol_tokens___rarg(x_27, x_2); -lean::dec(x_27); -x_29 = lean::mk_string("⦄"); -x_30 = l_Lean_Parser_symbol_tokens___rarg(x_29, x_2); -lean::dec(x_29); -x_31 = l_Lean_Parser_List_cons_tokens___rarg(x_30, x_6); -lean::dec(x_30); -x_32 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_31); -lean::dec(x_31); -x_33 = l_Lean_Parser_List_cons_tokens___rarg(x_28, x_32); -lean::dec(x_32); -lean::dec(x_28); -x_34 = l_Lean_Parser_tokens___rarg(x_33); -lean::dec(x_33); -x_35 = lean::mk_string("["); -x_36 = l_Lean_Parser_symbol_tokens___rarg(x_35, x_2); -lean::dec(x_35); -x_37 = lean::mk_string("]"); -x_38 = l_Lean_Parser_symbol_tokens___rarg(x_37, x_2); -lean::dec(x_37); -x_39 = l_Lean_Parser_List_cons_tokens___rarg(x_38, x_6); -lean::dec(x_38); -x_40 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_39); -lean::dec(x_39); -x_41 = l_Lean_Parser_List_cons_tokens___rarg(x_36, x_40); -lean::dec(x_40); -lean::dec(x_36); -x_42 = l_Lean_Parser_tokens___rarg(x_41); -lean::dec(x_41); -x_43 = l_Lean_Parser_List_cons_tokens___rarg(x_42, x_6); -lean::dec(x_42); -x_44 = l_Lean_Parser_List_cons_tokens___rarg(x_34, x_43); -lean::dec(x_43); -lean::dec(x_34); -x_45 = l_Lean_Parser_List_cons_tokens___rarg(x_26, x_44); -lean::dec(x_44); -lean::dec(x_26); -x_46 = l_Lean_Parser_List_cons_tokens___rarg(x_18, x_45); -lean::dec(x_45); -lean::dec(x_18); -x_47 = l_Lean_Parser_tokens___rarg(x_46); -lean::dec(x_46); -x_48 = l_Lean_Parser_List_cons_tokens___rarg(x_47, x_6); -lean::dec(x_47); -x_49 = l_Lean_Parser_tokens___rarg(x_48); -lean::dec(x_48); -return x_49; -} -} -obj* _init_l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("("); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notationLike_Parser), 5, 0); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structBinderContent_Parser), 4, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_11); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_16, 0, x_15); -lean::closure_set(x_16, 1, x_8); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_12); -x_18 = l_Lean_Parser_command_structExplicitBinderContent; -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_19, 0, x_18); -lean::closure_set(x_19, 1, x_17); -x_20 = lean::mk_string(")"); -x_21 = l_String_trim(x_20); -lean::dec(x_20); -lean::inc(x_21); -x_22 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_22, 0, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_8); -lean::closure_set(x_23, 2, 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_12); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_19); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_9); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_Lean_Parser_command_structExplicitBinder; -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_28, 0, x_27); -lean::closure_set(x_28, 1, x_26); -x_29 = lean::mk_string("{"); -x_30 = l_String_trim(x_29); -lean::dec(x_29); -lean::inc(x_30); -x_31 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_31, 0, x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_8); -lean::closure_set(x_32, 2, x_31); -x_33 = lean::mk_string("}"); -x_34 = l_String_trim(x_33); -lean::dec(x_33); -lean::inc(x_34); -x_35 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_35, 0, x_34); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_36, 0, x_34); -lean::closure_set(x_36, 1, x_8); -lean::closure_set(x_36, 2, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_12); -lean::inc(x_13); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_13); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_32); -lean::cnstr_set(x_39, 1, x_38); -x_40 = l_Lean_Parser_command_structImplicitBinder; -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_41, 0, x_40); -lean::closure_set(x_41, 1, x_39); -x_42 = lean::mk_string("⦃"); -x_43 = l_String_trim(x_42); -lean::dec(x_42); -lean::inc(x_43); -x_44 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_44, 0, x_43); -x_45 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_45, 0, x_43); -lean::closure_set(x_45, 1, x_8); -lean::closure_set(x_45, 2, x_44); -x_46 = lean::mk_string("⦄"); -x_47 = l_String_trim(x_46); -lean::dec(x_46); -lean::inc(x_47); -x_48 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_48, 0, x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_49, 0, x_47); -lean::closure_set(x_49, 1, x_8); -lean::closure_set(x_49, 2, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_12); -lean::inc(x_13); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_13); -lean::cnstr_set(x_51, 1, x_50); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_45); -lean::cnstr_set(x_52, 1, x_51); -x_53 = l_Lean_Parser_command_strictImplicitBinder; -x_54 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_54, 0, x_53); -lean::closure_set(x_54, 1, x_52); -x_55 = lean::mk_string("["); -x_56 = l_String_trim(x_55); -lean::dec(x_55); -lean::inc(x_56); -x_57 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_57, 0, x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_58, 0, x_56); -lean::closure_set(x_58, 1, x_8); -lean::closure_set(x_58, 2, x_57); -x_59 = lean::mk_string("]"); -x_60 = l_String_trim(x_59); -lean::dec(x_59); -lean::inc(x_60); -x_61 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_61, 0, x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_62, 0, x_60); -lean::closure_set(x_62, 1, x_8); -lean::closure_set(x_62, 2, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_12); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_13); -lean::cnstr_set(x_64, 1, x_63); -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 = l_Lean_Parser_command_instImplicitBinder; -x_67 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_67, 0, x_66); -lean::closure_set(x_67, 1, x_65); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_12); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_54); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_41); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_28); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_72, 0, x_71); -lean::closure_set(x_72, 1, x_8); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_12); -x_74 = l_Lean_Parser_command_structureFieldBlock; -x_75 = l_Lean_Parser_command_structureFieldBlock_HasView; -x_76 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_74, x_73, x_75); -lean::dec(x_73); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_76; -} -} -obj* _init_l_Lean_Parser_command_structureFieldBlock_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_notationLike_Parser), 5, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 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_structBinderContent_Parser), 4, 0); -lean::inc(x_9); -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_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_12, 0, x_11); -lean::closure_set(x_12, 1, x_4); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_8); -x_14 = l_Lean_Parser_command_structExplicitBinderContent; -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_15, 0, x_14); -lean::closure_set(x_15, 1, x_13); -x_16 = lean::mk_string(")"); -x_17 = l_String_trim(x_16); -lean::dec(x_16); -lean::inc(x_17); -x_18 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_18, 0, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_19, 0, x_17); -lean::closure_set(x_19, 1, x_4); -lean::closure_set(x_19, 2, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_8); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_15); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_5); -lean::cnstr_set(x_22, 1, x_21); -x_23 = l_Lean_Parser_command_structExplicitBinder; -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::mk_string("{"); -x_26 = l_String_trim(x_25); -lean::dec(x_25); -lean::inc(x_26); -x_27 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_27, 0, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_28, 0, x_26); -lean::closure_set(x_28, 1, x_4); -lean::closure_set(x_28, 2, x_27); -x_29 = lean::mk_string("}"); -x_30 = l_String_trim(x_29); -lean::dec(x_29); -lean::inc(x_30); -x_31 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_31, 0, x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_4); -lean::closure_set(x_32, 2, 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_8); -lean::inc(x_9); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_9); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_28); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_command_structImplicitBinder; -x_37 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_37, 0, x_36); -lean::closure_set(x_37, 1, x_35); -x_38 = lean::mk_string("⦃"); -x_39 = l_String_trim(x_38); -lean::dec(x_38); -lean::inc(x_39); -x_40 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_40, 0, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_41, 0, x_39); -lean::closure_set(x_41, 1, x_4); -lean::closure_set(x_41, 2, x_40); -x_42 = lean::mk_string("⦄"); -x_43 = l_String_trim(x_42); -lean::dec(x_42); -lean::inc(x_43); -x_44 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_44, 0, x_43); -x_45 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_45, 0, x_43); -lean::closure_set(x_45, 1, x_4); -lean::closure_set(x_45, 2, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_8); -lean::inc(x_9); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_9); -lean::cnstr_set(x_47, 1, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_41); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_Lean_Parser_command_strictImplicitBinder; -x_50 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_50, 0, x_49); -lean::closure_set(x_50, 1, x_48); -x_51 = lean::mk_string("["); -x_52 = l_String_trim(x_51); -lean::dec(x_51); -lean::inc(x_52); -x_53 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_53, 0, x_52); -x_54 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_54, 0, x_52); -lean::closure_set(x_54, 1, x_4); -lean::closure_set(x_54, 2, x_53); -x_55 = lean::mk_string("]"); -x_56 = l_String_trim(x_55); -lean::dec(x_55); -lean::inc(x_56); -x_57 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_57, 0, x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_58, 0, x_56); -lean::closure_set(x_58, 1, x_4); -lean::closure_set(x_58, 2, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_8); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_9); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_54); -lean::cnstr_set(x_61, 1, x_60); -x_62 = l_Lean_Parser_command_instImplicitBinder; -x_63 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_63, 0, x_62); -lean::closure_set(x_63, 1, x_61); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_8); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_50); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_37); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_24); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_68, 0, x_67); -lean::closure_set(x_68, 1, x_4); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_8); -return x_69; -} -} -obj* l_Lean_Parser_command_structureFieldBlock_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_structureFieldBlock; -x_6 = l_Lean_Parser_command_structureFieldBlock_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_oldUnivParams() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("oldUnivParams"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_oldUnivParams_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_command_oldUnivParams; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_command_oldUnivParams; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_2, 0); -lean::inc(x_23); -lean::dec(x_2); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_command_oldUnivParams; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_4, 0); -lean::inc(x_30); -lean::dec(x_4); -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_7); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_command_oldUnivParams; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -} -obj* _init_l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_1); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_7); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_1); -return x_9; -} -} -} -obj* l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_49; -x_49 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; -x_50 = l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1___closed__1; -return x_50; -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_49, 0); -lean::inc(x_51); -lean::dec(x_49); -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -lean::dec(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; -x_53 = lean::box(3); -x_2 = x_52; -x_3 = x_53; -goto block_48; -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_52, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_52, 1); -lean::inc(x_55); -lean::dec(x_52); -x_2 = x_55; -x_3 = x_54; -goto block_48; -} -} -block_48: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_3, 0); -lean::inc(x_45); -lean::dec(x_3); -x_46 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_4 = x_46; -goto block_44; -} -else -{ -obj* x_47; -lean::dec(x_3); -x_47 = lean::box(0); -x_4 = x_47; -goto block_44; -} -block_44: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_41; -x_41 = lean::box(3); -x_5 = x_2; -x_6 = x_41; -goto block_40; -} -else -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_2, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_2, 1); -lean::inc(x_43); -lean::dec(x_2); -x_5 = x_43; -x_6 = x_42; -goto block_40; -} -block_40: -{ -obj* x_7; -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = lean::box(0); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_8); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_14); -lean::cnstr_set(x_15, 2, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_11); -x_16 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_16); -lean::cnstr_set(x_17, 2, x_8); -return x_17; -} -} -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_7); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_7, 0); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -x_21 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_20); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_22; obj* x_23; -lean::free_heap_obj(x_7); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_21); -lean::cnstr_set(x_23, 2, x_22); -return x_23; -} -else -{ -obj* x_24; -x_24 = lean::cnstr_get(x_5, 0); -lean::inc(x_24); -lean::dec(x_5); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -lean::dec(x_24); -lean::cnstr_set(x_7, 0, x_25); -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_21); -lean::cnstr_set(x_26, 2, x_7); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -lean::dec(x_24); -lean::free_heap_obj(x_7); -x_27 = lean::box(0); -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_21); -lean::cnstr_set(x_28, 2, x_27); -return x_28; -} -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::cnstr_get(x_7, 0); -lean::inc(x_29); -lean::dec(x_7); -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -x_31 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_30); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_32; obj* x_33; -x_32 = lean::box(0); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_31); -lean::cnstr_set(x_33, 2, x_32); -return x_33; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_5, 0); -lean::inc(x_34); -lean::dec(x_5); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -lean::dec(x_34); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_37 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_31); -lean::cnstr_set(x_37, 2, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; -lean::dec(x_34); -x_38 = lean::box(0); -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_4); -lean::cnstr_set(x_39, 1, x_31); -lean::cnstr_set(x_39, 2, x_38); -return x_39; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_oldUnivParams_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_oldUnivParams_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_oldUnivParams_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_oldUnivParams_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::mk_string("{"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -x_6 = lean::mk_string("}"); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_2); -lean::dec(x_6); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_4); -lean::dec(x_7); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_8); -lean::dec(x_8); -lean::dec(x_5); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_9); -lean::dec(x_9); -lean::dec(x_3); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("{"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::mk_string("}"); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_8); -lean::closure_set(x_15, 2, x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_9); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_command_oldUnivParams; -x_21 = l_Lean_Parser_command_oldUnivParams_HasView; -x_22 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_20, x_19, x_21); -lean::dec(x_19); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_22; -} -} -obj* _init_l_Lean_Parser_command_oldUnivParams_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string("}"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_4); -lean::closure_set(x_11, 2, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_5); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -} -obj* l_Lean_Parser_command_oldUnivParams_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_oldUnivParams; -x_6 = l_Lean_Parser_command_oldUnivParams_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_univParams() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("univParams"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_univParams_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___elambda__1___spec__1(x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_command_univParams; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_command_univParams; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_2, 0); -lean::inc(x_23); -lean::dec(x_2); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_command_univParams; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_4, 0); -lean::inc(x_30); -lean::dec(x_4); -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_7); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_command_univParams; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -} -obj* _init_l_Lean_Parser_command_univParams_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_1); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_7); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_1); -return x_9; -} -} -} -obj* l_Lean_Parser_command_univParams_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_49; -x_49 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; -x_50 = l_Lean_Parser_command_univParams_HasView_x27___lambda__1___closed__1; -return x_50; -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_49, 0); -lean::inc(x_51); -lean::dec(x_49); -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -lean::dec(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; -x_53 = lean::box(3); -x_2 = x_52; -x_3 = x_53; -goto block_48; -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_52, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_52, 1); -lean::inc(x_55); -lean::dec(x_52); -x_2 = x_55; -x_3 = x_54; -goto block_48; -} -} -block_48: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_3, 0); -lean::inc(x_45); -lean::dec(x_3); -x_46 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_4 = x_46; -goto block_44; -} -else -{ -obj* x_47; -lean::dec(x_3); -x_47 = lean::box(0); -x_4 = x_47; -goto block_44; -} -block_44: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_41; -x_41 = lean::box(3); -x_5 = x_2; -x_6 = x_41; -goto block_40; -} -else -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_2, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_2, 1); -lean::inc(x_43); -lean::dec(x_2); -x_5 = x_43; -x_6 = x_42; -goto block_40; -} -block_40: -{ -obj* x_7; -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = lean::box(0); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_8); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_14); -lean::cnstr_set(x_15, 2, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_11); -x_16 = l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_16); -lean::cnstr_set(x_17, 2, x_8); -return x_17; -} -} -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_7); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_7, 0); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -x_21 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_20); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_22; obj* x_23; -lean::free_heap_obj(x_7); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_21); -lean::cnstr_set(x_23, 2, x_22); -return x_23; -} -else -{ -obj* x_24; -x_24 = lean::cnstr_get(x_5, 0); -lean::inc(x_24); -lean::dec(x_5); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -lean::dec(x_24); -lean::cnstr_set(x_7, 0, x_25); -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_21); -lean::cnstr_set(x_26, 2, x_7); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -lean::dec(x_24); -lean::free_heap_obj(x_7); -x_27 = lean::box(0); -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_21); -lean::cnstr_set(x_28, 2, x_27); -return x_28; -} -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::cnstr_get(x_7, 0); -lean::inc(x_29); -lean::dec(x_7); -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -x_31 = l_List_map___main___at_Lean_Parser_command_structBinderContent_HasView_x27___spec__1(x_30); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_32; obj* x_33; -x_32 = lean::box(0); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_31); -lean::cnstr_set(x_33, 2, x_32); -return x_33; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_5, 0); -lean::inc(x_34); -lean::dec(x_5); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -lean::dec(x_34); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_37 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_31); -lean::cnstr_set(x_37, 2, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; -lean::dec(x_34); -x_38 = lean::box(0); -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_4); -lean::cnstr_set(x_39, 1, x_31); -lean::cnstr_set(x_39, 2, x_38); -return x_39; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_univParams_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_univParams_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_univParams_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_univParams_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_univParams_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_identUnivParams() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("identUnivParams"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_command_identUnivParams; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -else -{ -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; -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -lean::dec(x_3); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_command_univParams_HasView; -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_9); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_10); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_command_identUnivParams; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = l_Lean_Parser_command_univParams_HasView; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::box(3); -x_11 = lean::apply_1(x_9, x_10); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = l_Lean_Parser_command_univParams_HasView; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_9); -lean::cnstr_set(x_2, 0, x_12); -x_13 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -return x_14; -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::dec(x_6); -lean::free_heap_obj(x_2); -x_15 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1; -return x_15; -} -} -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2; -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 1); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_20 = lean::cnstr_get(x_17, 0); -lean::inc(x_20); -lean::dec(x_17); -x_21 = l_Lean_Parser_command_univParams_HasView; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -return x_26; -} -else -{ -obj* x_27; -lean::dec(x_19); -lean::dec(x_17); -x_27 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1; -return x_27; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_univParams_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__3; -return x_1; -} -} -obj* l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_98; -x_98 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_98) == 0) -{ -obj* x_99; -x_99 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__5; -return x_99; -} -else -{ -obj* x_100; obj* x_101; -x_100 = lean::cnstr_get(x_98, 0); -lean::inc(x_100); -lean::dec(x_98); -x_101 = lean::cnstr_get(x_100, 1); -lean::inc(x_101); -lean::dec(x_100); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; -x_102 = lean::box(3); -x_2 = x_101; -x_3 = x_102; -goto block_97; -} -else -{ -obj* x_103; obj* x_104; -x_103 = lean::cnstr_get(x_101, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_101, 1); -lean::inc(x_104); -lean::dec(x_101); -x_2 = x_104; -x_3 = x_103; -goto block_97; -} -} -block_97: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; -x_34 = lean::cnstr_get(x_3, 0); -lean::inc(x_34); -lean::dec(x_3); -x_35 = lean::box(3); -x_36 = l_Lean_Parser_Syntax_asNode___main(x_35); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; obj* x_38; -x_37 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4; -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_34); -lean::cnstr_set(x_38, 1, x_37); -return x_38; -} -else -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_36, 0); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; -lean::free_heap_obj(x_36); -x_42 = lean::box(0); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_34); -lean::cnstr_set(x_43, 1, x_42); -return x_43; -} -else -{ -obj* x_44; -x_44 = lean::cnstr_get(x_41, 1); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_45 = lean::cnstr_get(x_41, 0); -lean::inc(x_45); -lean::dec(x_41); -x_46 = l_Lean_Parser_command_univParams_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_45); -lean::cnstr_set(x_36, 0, x_48); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_34); -lean::cnstr_set(x_49, 1, x_36); -return x_49; -} -else -{ -obj* x_50; obj* x_51; -lean::dec(x_44); -lean::dec(x_41); -lean::free_heap_obj(x_36); -x_50 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4; -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_34); -lean::cnstr_set(x_51, 1, x_50); -return x_51; -} -} -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_36, 0); -lean::inc(x_52); -lean::dec(x_36); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; obj* x_55; -x_54 = lean::box(0); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_34); -lean::cnstr_set(x_55, 1, x_54); -return x_55; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_57 = lean::cnstr_get(x_53, 0); -lean::inc(x_57); -lean::dec(x_53); -x_58 = l_Lean_Parser_command_univParams_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_34); -lean::cnstr_set(x_62, 1, x_61); -return x_62; -} -else -{ -obj* x_63; obj* x_64; -lean::dec(x_56); -lean::dec(x_53); -x_63 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4; -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_34); -lean::cnstr_set(x_64, 1, x_63); -return x_64; -} -} -} -} -} -else -{ -obj* x_65; obj* x_66; obj* x_67; -x_65 = lean::cnstr_get(x_3, 0); -lean::inc(x_65); -lean::dec(x_3); -x_66 = lean::cnstr_get(x_2, 0); -lean::inc(x_66); -lean::dec(x_2); -x_67 = l_Lean_Parser_Syntax_asNode___main(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; -x_68 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4; -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_65); -lean::cnstr_set(x_69, 1, x_68); -return x_69; -} -else -{ -uint8 x_70; -x_70 = !lean::is_exclusive(x_67); -if (x_70 == 0) -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_67, 0); -x_72 = lean::cnstr_get(x_71, 1); -lean::inc(x_72); -lean::dec(x_71); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; obj* x_74; -lean::free_heap_obj(x_67); -x_73 = lean::box(0); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_65); -lean::cnstr_set(x_74, 1, x_73); -return x_74; -} -else -{ -obj* x_75; -x_75 = lean::cnstr_get(x_72, 1); -lean::inc(x_75); -if (lean::obj_tag(x_75) == 0) -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_76 = lean::cnstr_get(x_72, 0); -lean::inc(x_76); -lean::dec(x_72); -x_77 = l_Lean_Parser_command_univParams_HasView; -x_78 = lean::cnstr_get(x_77, 0); -lean::inc(x_78); -x_79 = lean::apply_1(x_78, x_76); -lean::cnstr_set(x_67, 0, x_79); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_65); -lean::cnstr_set(x_80, 1, x_67); -return x_80; -} -else -{ -obj* x_81; obj* x_82; -lean::dec(x_75); -lean::dec(x_72); -lean::free_heap_obj(x_67); -x_81 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4; -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_65); -lean::cnstr_set(x_82, 1, x_81); -return x_82; -} -} -} -else -{ -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_67, 0); -lean::inc(x_83); -lean::dec(x_67); -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -lean::dec(x_83); -if (lean::obj_tag(x_84) == 0) -{ -obj* x_85; obj* x_86; -x_85 = lean::box(0); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_65); -lean::cnstr_set(x_86, 1, x_85); -return x_86; -} -else -{ -obj* x_87; -x_87 = lean::cnstr_get(x_84, 1); -lean::inc(x_87); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_88 = lean::cnstr_get(x_84, 0); -lean::inc(x_88); -lean::dec(x_84); -x_89 = l_Lean_Parser_command_univParams_HasView; -x_90 = lean::cnstr_get(x_89, 0); -lean::inc(x_90); -x_91 = lean::apply_1(x_90, x_88); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_65); -lean::cnstr_set(x_93, 1, x_92); -return x_93; -} -else -{ -obj* x_94; obj* x_95; -lean::dec(x_87); -lean::dec(x_84); -x_94 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4; -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_65); -lean::cnstr_set(x_95, 1, x_94); -return x_95; -} -} -} -} -} -} -else -{ -obj* x_96; -lean::dec(x_3); -x_96 = lean::box(0); -x_4 = x_96; -goto block_33; -} -block_33: -{ -lean::dec(x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__3; -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1; -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_7, 0); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; -lean::free_heap_obj(x_7); -x_12 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2; -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_11, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_11, 0); -lean::inc(x_14); -lean::dec(x_11); -x_15 = l_Lean_Parser_command_univParams_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_7, 0, x_17); -x_18 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_7); -return x_19; -} -else -{ -obj* x_20; -lean::dec(x_13); -lean::dec(x_11); -lean::free_heap_obj(x_7); -x_20 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1; -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_7, 0); -lean::inc(x_21); -lean::dec(x_7); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; -x_23 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2; -return x_23; -} -else -{ -obj* x_24; -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_22, 0); -lean::inc(x_25); -lean::dec(x_22); -x_26 = l_Lean_Parser_command_univParams_HasView; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::apply_1(x_27, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -return x_31; -} -else -{ -obj* x_32; -lean::dec(x_24); -lean::dec(x_22); -x_32 = l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1; -return x_32; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_identUnivParams_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_identUnivParams_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string(".{"); -x_3 = lean::mk_nat_obj(0u); -x_4 = l_Lean_Parser_symbol_tokens___rarg(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_tokens___rarg(x_1); -x_6 = lean::mk_string("}"); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_3); -lean::dec(x_6); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_1); -lean::dec(x_7); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_8); -lean::dec(x_8); -lean::dec(x_5); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_9); -lean::dec(x_9); -lean::dec(x_4); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_1); -lean::dec(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_13); -lean::dec(x_13); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -return x_15; -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string(".{"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -lean::inc(x_10); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::mk_string("}"); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_8); -lean::closure_set(x_15, 2, x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_9); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_command_univParams; -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_21, 0, x_20); -lean::closure_set(x_21, 1, x_19); -x_22 = 0; -x_23 = lean::box(x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_24, 0, x_21); -lean::closure_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_16); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_10); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_Lean_Parser_command_identUnivParams; -x_28 = l_Lean_Parser_command_identUnivParams_HasView; -x_29 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_27, x_26, x_28); -lean::dec(x_26); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_29; -} -} -obj* _init_l_Lean_Parser_command_identUnivParams_Parser___closed__1() { -_start: -{ -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; uint8 x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string(".{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -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_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__3), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string("}"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_4); -lean::closure_set(x_11, 2, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_5); -lean::cnstr_set(x_15, 1, x_14); -x_16 = l_Lean_Parser_command_univParams; -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_15); -x_18 = 0; -x_19 = lean::box(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_20, 0, x_17); -lean::closure_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_12); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_6); -lean::cnstr_set(x_22, 1, x_21); -return x_22; -} -} -obj* l_Lean_Parser_command_identUnivParams_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_identUnivParams; -x_6 = l_Lean_Parser_command_identUnivParams_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_structureKw() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structureKw"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_structureKw; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_structureKw; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_command_structureKw_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__1; -return x_4; -} -else -{ -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_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_structureKw; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_structureKw; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -} -obj* _init_l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structureKw"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_structureKw_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__4; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -lean::dec(x_22); -if (x_30 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_13); -return x_32; -} -else -{ -obj* x_33; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_33 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__1; -return x_33; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_28, 0); -lean::inc(x_34); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_34); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_13); -return x_35; -} -else -{ -obj* x_36; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_36 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__2; -return x_36; -} -} -} -else -{ -obj* x_37; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_37 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_37; -} -} -} -} -} -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_13, 0); -lean::inc(x_38); -lean::dec(x_13); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -switch (lean::obj_tag(x_39)) { -case 0: -{ -obj* x_40; -lean::dec(x_38); -x_40 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_40; -} -case 1: -{ -obj* x_41; -lean::dec(x_39); -lean::dec(x_38); -x_41 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_41; -} -default: -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; uint8 x_46; -x_42 = lean::cnstr_get(x_38, 1); -lean::inc(x_42); -lean::dec(x_38); -x_43 = lean::cnstr_get(x_39, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_39, 1); -lean::inc(x_44); -lean::dec(x_39); -x_45 = lean::box(0); -x_46 = lean_name_dec_eq(x_43, x_45); -lean::dec(x_43); -if (x_46 == 0) -{ -obj* x_47; -lean::dec(x_44); -lean::dec(x_42); -x_47 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_47; -} -else -{ -if (lean::obj_tag(x_42) == 0) -{ -obj* x_48; -lean::dec(x_44); -x_48 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_48; -} -else -{ -obj* x_49; -x_49 = lean::cnstr_get(x_42, 1); -lean::inc(x_49); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; -x_50 = lean::cnstr_get(x_42, 0); -lean::inc(x_50); -lean::dec(x_42); -x_51 = lean::mk_nat_obj(0u); -x_52 = lean::nat_dec_eq(x_44, x_51); -lean::dec(x_44); -if (x_52 == 0) -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::cnstr_get(x_50, 0); -lean::inc(x_53); -lean::dec(x_50); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -else -{ -obj* x_56; -lean::dec(x_50); -x_56 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__1; -return x_56; -} -} -else -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; -x_57 = lean::cnstr_get(x_50, 0); -lean::inc(x_57); -lean::dec(x_50); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -return x_59; -} -else -{ -obj* x_60; -lean::dec(x_50); -x_60 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__2; -return x_60; -} -} -} -else -{ -obj* x_61; -lean::dec(x_49); -lean::dec(x_44); -lean::dec(x_42); -x_61 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_61; -} -} -} -} -} -} -} -} -else -{ -obj* x_62; -lean::dec(x_11); -lean::dec(x_6); -x_62 = l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3; -return x_62; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structureKw_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structureKw_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_structureKw_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_structureKw_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structureKw_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_extends() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("extends"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_extends_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(x_3); -x_5 = l_List_join___main___rarg(x_4); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_command_extends; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_9); -x_17 = l_Lean_Parser_command_extends; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -lean::dec(x_8); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(0); -lean::cnstr_set(x_3, 1, x_11); -lean::cnstr_set(x_3, 0, x_10); -return x_3; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -lean::dec(x_3); -x_13 = lean::box(0); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -else -{ -obj* x_17; uint8 x_18; -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = !lean::is_exclusive(x_5); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_5, 0); -x_20 = lean::cnstr_get(x_5, 1); -x_21 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1(x_1, x_2, x_20); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_17); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_5, 1, x_21); -lean::cnstr_set(x_5, 0, x_25); -return x_5; -} -else -{ -obj* x_26; obj* x_27; -lean::dec(x_19); -x_26 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_17); -lean::cnstr_set(x_27, 1, x_26); -lean::cnstr_set(x_5, 1, x_21); -lean::cnstr_set(x_5, 0, x_27); -return x_5; -} -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_5, 0); -x_29 = lean::cnstr_get(x_5, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_5); -x_30 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1(x_1, x_2, x_29); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_17); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_30); -return x_35; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; -lean::dec(x_28); -x_36 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_17); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_30); -return x_38; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_nat_obj(0u); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__1; -x_9 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3; -x_10 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1(x_8, x_9, x_7); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -obj* _init_l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_extends_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_33; -x_33 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__3; -return x_34; -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -lean::dec(x_33); -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -lean::dec(x_35); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; -x_37 = lean::box(3); -x_2 = x_36; -x_3 = x_37; -goto block_32; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_36, 1); -lean::inc(x_39); -lean::dec(x_36); -x_2 = x_39; -x_3 = x_38; -goto block_32; -} -} -block_32: -{ -obj* x_4; obj* x_5; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_3, 0); -lean::inc(x_16); -lean::dec(x_3); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_18; obj* x_19; -x_18 = lean::box(3); -x_19 = l_Lean_Parser_Syntax_asNode___main(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_17); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -x_24 = l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__1; -x_25 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3; -x_26 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1(x_24, x_25, x_23); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_17); -lean::cnstr_set(x_27, 1, x_26); -return x_27; -} -} -else -{ -obj* x_28; -x_28 = lean::cnstr_get(x_2, 0); -lean::inc(x_28); -lean::dec(x_2); -x_4 = x_17; -x_5 = x_28; -goto block_15; -} -} -else -{ -lean::dec(x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_29; -x_29 = l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__2; -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_2, 0); -lean::inc(x_30); -lean::dec(x_2); -x_31 = lean::box(0); -x_4 = x_31; -x_5 = x_30; -goto block_15; -} -} -block_15: -{ -obj* x_6; -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__1; -x_12 = l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3; -x_13 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1(x_11, x_12, x_10); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_4); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_extends_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_extends_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_extends_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_command_extends_HasView_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_extends_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_extends_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structureCtor() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structureCtor"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_structureCtor_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_2); -x_6 = lean::box(0); -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__2; -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_5); -lean::cnstr_set(x_8, 1, x_7); -x_9 = l_Lean_Parser_command_structureCtor; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_11 = lean::cnstr_get(x_4, 0); -lean::inc(x_11); -lean::dec(x_4); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_6); -x_14 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_command_structureCtor; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_19 = lean::cnstr_get(x_3, 0); -lean::inc(x_19); -lean::dec(x_3); -x_20 = l_Lean_Parser_command_inferModifier_HasView; -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -x_22 = lean::apply_1(x_21, x_19); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_6); -x_24 = l_Lean_Parser_noKind; -x_25 = l_Lean_Parser_Syntax_mkNode(x_24, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_5); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_command_structureCtor; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_31 = lean::cnstr_get(x_4, 0); -lean::inc(x_31); -lean::dec(x_4); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, 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_6); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_25); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_5); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_command_structureCtor; -x_37 = l_Lean_Parser_Syntax_mkNode(x_36, x_35); -return x_37; -} -} -} -} -obj* _init_l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::box(0); -x_4 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_5 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_3); -return x_6; -} -else -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_2); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_2, 0); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_12 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -lean::cnstr_set(x_12, 2, x_10); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_9, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_14 = lean::cnstr_get(x_9, 0); -lean::inc(x_14); -lean::dec(x_9); -x_15 = l_Lean_Parser_command_inferModifier_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_2, 0, x_17); -x_18 = lean::box(0); -x_19 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -lean::cnstr_set(x_20, 2, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -lean::dec(x_13); -lean::dec(x_9); -lean::free_heap_obj(x_2); -x_21 = lean::box(0); -x_22 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_23 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -lean::cnstr_set(x_24, 2, x_21); -return x_24; -} -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -lean::dec(x_2); -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -lean::dec(x_25); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::box(0); -x_28 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -lean::cnstr_set(x_29, 2, x_27); -return x_29; -} -else -{ -obj* x_30; -x_30 = lean::cnstr_get(x_26, 1); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_31 = lean::cnstr_get(x_26, 0); -lean::inc(x_31); -lean::dec(x_26); -x_32 = l_Lean_Parser_command_inferModifier_HasView; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -x_34 = lean::apply_1(x_33, x_31); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -x_36 = lean::box(0); -x_37 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_38 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_35); -lean::cnstr_set(x_38, 2, x_36); -return x_38; -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_30); -lean::dec(x_26); -x_39 = lean::box(0); -x_40 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_41 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_42 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_41); -lean::cnstr_set(x_42, 2, x_39); -return x_42; -} -} -} -} -} -} -obj* l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_67; -x_67 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; -x_68 = l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1___closed__1; -return x_68; -} -else -{ -obj* x_69; obj* x_70; -x_69 = lean::cnstr_get(x_67, 0); -lean::inc(x_69); -lean::dec(x_67); -x_70 = lean::cnstr_get(x_69, 1); -lean::inc(x_70); -lean::dec(x_69); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; -x_71 = lean::box(3); -x_2 = x_70; -x_3 = x_71; -goto block_66; -} -else -{ -obj* x_72; obj* x_73; -x_72 = lean::cnstr_get(x_70, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_70, 1); -lean::inc(x_73); -lean::dec(x_70); -x_2 = x_73; -x_3 = x_72; -goto block_66; -} -} -block_66: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -obj* x_64; -x_64 = lean::cnstr_get(x_3, 0); -lean::inc(x_64); -lean::dec(x_3); -x_4 = x_64; -goto block_63; -} -else -{ -obj* x_65; -lean::dec(x_3); -x_65 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_4 = x_65; -goto block_63; -} -block_63: -{ -obj* x_5; obj* x_6; obj* x_13; obj* x_14; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_60; -x_60 = lean::box(3); -x_13 = x_2; -x_14 = x_60; -goto block_59; -} -else -{ -obj* x_61; obj* x_62; -x_61 = lean::cnstr_get(x_2, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_2, 1); -lean::inc(x_62); -lean::dec(x_2); -x_13 = x_62; -x_14 = x_61; -goto block_59; -} -block_12: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_5); -lean::cnstr_set(x_11, 2, x_10); -return x_11; -} -} -block_59: -{ -obj* x_15; -x_15 = l_Lean_Parser_Syntax_asNode___main(x_14); -if (lean::obj_tag(x_15) == 0) -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = lean::box(0); -x_17 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_18, 2, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_13, 0); -lean::inc(x_19); -lean::dec(x_13); -x_20 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_5 = x_20; -x_6 = x_19; -goto block_12; -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_15); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_15, 0); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -lean::free_heap_obj(x_15); -x_24 = lean::box(0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_25; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_25, 2, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_13, 0); -lean::inc(x_26); -lean::dec(x_13); -x_5 = x_24; -x_6 = x_26; -goto block_12; -} -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::cnstr_get(x_23, 0); -lean::inc(x_28); -lean::dec(x_23); -x_29 = l_Lean_Parser_command_inferModifier_HasView; -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::apply_1(x_30, x_28); -lean::cnstr_set(x_15, 0, x_31); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_32; obj* x_33; -x_32 = lean::box(0); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_15); -lean::cnstr_set(x_33, 2, x_32); -return x_33; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_13, 0); -lean::inc(x_34); -lean::dec(x_13); -x_5 = x_15; -x_6 = x_34; -goto block_12; -} -} -else -{ -lean::dec(x_27); -lean::dec(x_23); -lean::free_heap_obj(x_15); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::box(0); -x_36 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_36); -lean::cnstr_set(x_37, 2, x_35); -return x_37; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_13, 0); -lean::inc(x_38); -lean::dec(x_13); -x_39 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_5 = x_39; -x_6 = x_38; -goto block_12; -} -} -} -} -else -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_15, 0); -lean::inc(x_40); -lean::dec(x_15); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; -x_42 = lean::box(0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_43; -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_42); -lean::cnstr_set(x_43, 2, x_42); -return x_43; -} -else -{ -obj* x_44; -x_44 = lean::cnstr_get(x_13, 0); -lean::inc(x_44); -lean::dec(x_13); -x_5 = x_42; -x_6 = x_44; -goto block_12; -} -} -else -{ -obj* x_45; -x_45 = lean::cnstr_get(x_41, 1); -lean::inc(x_45); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_46 = lean::cnstr_get(x_41, 0); -lean::inc(x_46); -lean::dec(x_41); -x_47 = l_Lean_Parser_command_inferModifier_HasView; -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::apply_1(x_48, x_46); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_49); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_51; obj* x_52; -x_51 = lean::box(0); -x_52 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_52, 0, x_4); -lean::cnstr_set(x_52, 1, x_50); -lean::cnstr_set(x_52, 2, x_51); -return x_52; -} -else -{ -obj* x_53; -x_53 = lean::cnstr_get(x_13, 0); -lean::inc(x_53); -lean::dec(x_13); -x_5 = x_50; -x_6 = x_53; -goto block_12; -} -} -else -{ -lean::dec(x_45); -lean::dec(x_41); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; -x_54 = lean::box(0); -x_55 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_56 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_56, 0, x_4); -lean::cnstr_set(x_56, 1, x_55); -lean::cnstr_set(x_56, 2, x_54); -return x_56; -} -else -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_13, 0); -lean::inc(x_57); -lean::dec(x_13); -x_58 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1; -x_5 = x_58; -x_6 = x_57; -goto block_12; -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structureCtor_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structureCtor_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_structureCtor_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structureCtor_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structure() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structure"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_structure_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_structureFieldBlock_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_command_structure_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 6); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_1, 7); -lean::inc(x_9); -lean::dec(x_1); -x_10 = l_Lean_Parser_command_structureKw_HasView; -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_2); -x_13 = l_Lean_Parser_command_identUnivParams_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_4); -x_16 = l_Lean_Parser_command_optDeclSig_HasView; -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_5); -x_19 = l_Lean_Parser_command_structure_HasView_x27___elambda__1___closed__1; -x_20 = l_List_map___main___rarg(x_19, x_9); -x_21 = l_Lean_Parser_noKind; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_95; -x_95 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_25 = x_95; -goto block_94; -} -else -{ -obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_96 = lean::cnstr_get(x_3, 0); -lean::inc(x_96); -lean::dec(x_3); -x_97 = l_Lean_Parser_command_oldUnivParams_HasView; -x_98 = lean::cnstr_get(x_97, 1); -lean::inc(x_98); -x_99 = lean::apply_1(x_98, x_96); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_23); -x_101 = l_Lean_Parser_Syntax_mkNode(x_21, x_100); -x_25 = x_101; -goto block_94; -} -block_94: -{ -obj* x_26; obj* x_55; obj* x_56; -if (lean::obj_tag(x_6) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -obj* x_84; -x_84 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_26 = x_84; -goto block_54; -} -else -{ -obj* x_85; obj* x_86; -x_85 = lean::cnstr_get(x_7, 0); -lean::inc(x_85); -lean::dec(x_7); -x_86 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_55 = x_86; -x_56 = x_85; -goto block_83; -} -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_87 = lean::cnstr_get(x_6, 0); -lean::inc(x_87); -lean::dec(x_6); -x_88 = l_Lean_Parser_command_extends_HasView; -x_89 = lean::cnstr_get(x_88, 1); -lean::inc(x_89); -x_90 = lean::apply_1(x_89, x_87); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_23); -x_92 = l_Lean_Parser_Syntax_mkNode(x_21, x_91); -if (lean::obj_tag(x_7) == 0) -{ -x_26 = x_92; -goto block_54; -} -else -{ -obj* x_93; -x_93 = lean::cnstr_get(x_7, 0); -lean::inc(x_93); -lean::dec(x_7); -x_55 = x_92; -x_56 = x_93; -goto block_83; -} -} -block_54: -{ -if (lean::obj_tag(x_8) == 0) -{ -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_37; -x_27 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_24); -x_29 = lean::box(3); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_26); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_18); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_15); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_25); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_12); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_command_structure; -x_37 = l_Lean_Parser_Syntax_mkNode(x_36, x_35); -return x_37; -} -else -{ -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_53; -x_38 = lean::cnstr_get(x_8, 0); -lean::inc(x_38); -lean::dec(x_8); -x_39 = l_Lean_Parser_command_structureCtor_HasView; -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_38); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_23); -x_43 = l_Lean_Parser_Syntax_mkNode(x_21, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_24); -x_45 = lean::box(3); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_44); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_26); -lean::cnstr_set(x_47, 1, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_18); -lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_15); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_25); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_12); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_Lean_Parser_command_structure; -x_53 = l_Lean_Parser_Syntax_mkNode(x_52, x_51); -return x_53; -} -} -block_83: -{ -obj* x_57; -x_57 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_58 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_24); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_57); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_55); -lean::cnstr_set(x_61, 1, x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_18); -lean::cnstr_set(x_62, 1, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_15); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_25); -lean::cnstr_set(x_64, 1, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_12); -lean::cnstr_set(x_65, 1, x_64); -x_66 = l_Lean_Parser_command_structure; -x_67 = l_Lean_Parser_Syntax_mkNode(x_66, x_65); -return x_67; -} -else -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_68 = lean::cnstr_get(x_8, 0); -lean::inc(x_68); -lean::dec(x_8); -x_69 = l_Lean_Parser_command_structureCtor_HasView; -x_70 = lean::cnstr_get(x_69, 1); -lean::inc(x_70); -x_71 = lean::apply_1(x_70, x_68); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_23); -x_73 = l_Lean_Parser_Syntax_mkNode(x_21, x_72); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_24); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_57); -lean::cnstr_set(x_75, 1, x_74); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_55); -lean::cnstr_set(x_76, 1, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_18); -lean::cnstr_set(x_77, 1, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_15); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_25); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_12); -lean::cnstr_set(x_80, 1, x_79); -x_81 = l_Lean_Parser_command_structure; -x_82 = l_Lean_Parser_Syntax_mkNode(x_81, x_80); -return x_82; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_command_structureFieldBlock_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_structureFieldBlock_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_structureCtor_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_extends_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_oldUnivParams_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_68; -x_1 = l_Lean_Parser_command_structureKw_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_68 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_5 = x_69; -goto block_67; -} -else -{ -uint8 x_70; -x_70 = !lean::is_exclusive(x_68); -if (x_70 == 0) -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_68, 0); -x_72 = lean::cnstr_get(x_71, 1); -lean::inc(x_72); -lean::dec(x_71); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; -lean::free_heap_obj(x_68); -x_73 = lean::box(0); -x_5 = x_73; -goto block_67; -} -else -{ -obj* x_74; -x_74 = lean::cnstr_get(x_72, 1); -lean::inc(x_74); -if (lean::obj_tag(x_74) == 0) -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_75 = lean::cnstr_get(x_72, 0); -lean::inc(x_75); -lean::dec(x_72); -x_76 = l_Lean_Parser_command_oldUnivParams_HasView; -x_77 = lean::cnstr_get(x_76, 0); -lean::inc(x_77); -x_78 = lean::apply_1(x_77, x_75); -lean::cnstr_set(x_68, 0, x_78); -x_5 = x_68; -goto block_67; -} -else -{ -obj* x_79; -lean::dec(x_74); -lean::dec(x_72); -lean::free_heap_obj(x_68); -x_79 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_5 = x_79; -goto block_67; -} -} -} -else -{ -obj* x_80; obj* x_81; -x_80 = lean::cnstr_get(x_68, 0); -lean::inc(x_80); -lean::dec(x_68); -x_81 = lean::cnstr_get(x_80, 1); -lean::inc(x_81); -lean::dec(x_80); -if (lean::obj_tag(x_81) == 0) -{ -obj* x_82; -x_82 = lean::box(0); -x_5 = x_82; -goto block_67; -} -else -{ -obj* x_83; -x_83 = lean::cnstr_get(x_81, 1); -lean::inc(x_83); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_84 = lean::cnstr_get(x_81, 0); -lean::inc(x_84); -lean::dec(x_81); -x_85 = l_Lean_Parser_command_oldUnivParams_HasView; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_87 = lean::apply_1(x_86, x_84); -x_88 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_88, 0, x_87); -x_5 = x_88; -goto block_67; -} -else -{ -obj* x_89; -lean::dec(x_83); -lean::dec(x_81); -x_89 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_5 = x_89; -goto block_67; -} -} -} -} -block_67: -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_45; -x_6 = l_Lean_Parser_command_identUnivParams_HasView; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_3); -x_9 = l_Lean_Parser_command_optDeclSig_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_3); -x_45 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; -x_46 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4; -x_12 = x_46; -goto block_44; -} -else -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_45); -if (x_47 == 0) -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_45, 0); -x_49 = lean::cnstr_get(x_48, 1); -lean::inc(x_49); -lean::dec(x_48); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; -lean::free_heap_obj(x_45); -x_50 = lean::box(0); -x_12 = x_50; -goto block_44; -} -else -{ -obj* x_51; -x_51 = lean::cnstr_get(x_49, 1); -lean::inc(x_51); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_52 = lean::cnstr_get(x_49, 0); -lean::inc(x_52); -lean::dec(x_49); -x_53 = l_Lean_Parser_command_extends_HasView; -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::apply_1(x_54, x_52); -lean::cnstr_set(x_45, 0, x_55); -x_12 = x_45; -goto block_44; -} -else -{ -obj* x_56; -lean::dec(x_51); -lean::dec(x_49); -lean::free_heap_obj(x_45); -x_56 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4; -x_12 = x_56; -goto block_44; -} -} -} -else -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_45, 0); -lean::inc(x_57); -lean::dec(x_45); -x_58 = lean::cnstr_get(x_57, 1); -lean::inc(x_58); -lean::dec(x_57); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; -x_59 = lean::box(0); -x_12 = x_59; -goto block_44; -} -else -{ -obj* x_60; -x_60 = lean::cnstr_get(x_58, 1); -lean::inc(x_60); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_61 = lean::cnstr_get(x_58, 0); -lean::inc(x_61); -lean::dec(x_58); -x_62 = l_Lean_Parser_command_extends_HasView; -x_63 = lean::cnstr_get(x_62, 0); -lean::inc(x_63); -x_64 = lean::apply_1(x_63, x_61); -x_65 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_65, 0, x_64); -x_12 = x_65; -goto block_44; -} -else -{ -obj* x_66; -lean::dec(x_60); -lean::dec(x_58); -x_66 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4; -x_12 = x_66; -goto block_44; -} -} -} -} -block_44: -{ -obj* x_13; obj* x_14; obj* x_24; -x_13 = lean::box(0); -x_24 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_14 = x_25; -goto block_23; -} -else -{ -uint8 x_26; -x_26 = !lean::is_exclusive(x_24); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_24, 0); -x_28 = lean::cnstr_get(x_27, 1); -lean::inc(x_28); -lean::dec(x_27); -if (lean::obj_tag(x_28) == 0) -{ -lean::free_heap_obj(x_24); -x_14 = x_13; -goto block_23; -} -else -{ -obj* x_29; -x_29 = lean::cnstr_get(x_28, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -lean::dec(x_28); -x_31 = l_Lean_Parser_command_structureCtor_HasView; -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_30); -lean::cnstr_set(x_24, 0, x_33); -x_14 = x_24; -goto block_23; -} -else -{ -obj* x_34; -lean::dec(x_29); -lean::dec(x_28); -lean::free_heap_obj(x_24); -x_34 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_14 = x_34; -goto block_23; -} -} -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_24, 0); -lean::inc(x_35); -lean::dec(x_24); -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -lean::dec(x_35); -if (lean::obj_tag(x_36) == 0) -{ -x_14 = x_13; -goto block_23; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_36, 1); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -lean::dec(x_36); -x_39 = l_Lean_Parser_command_structureCtor_HasView; -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_38); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -x_14 = x_42; -goto block_23; -} -else -{ -obj* x_43; -lean::dec(x_37); -lean::dec(x_36); -x_43 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_14 = x_43; -goto block_23; -} -} -} -} -block_23: -{ -obj* x_15; -x_15 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; -x_16 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_5); -lean::cnstr_set(x_17, 2, x_8); -lean::cnstr_set(x_17, 3, x_11); -lean::cnstr_set(x_17, 4, x_12); -lean::cnstr_set(x_17, 5, x_13); -lean::cnstr_set(x_17, 6, x_14); -lean::cnstr_set(x_17, 7, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = lean::cnstr_get(x_15, 0); -lean::inc(x_18); -lean::dec(x_15); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -x_20 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__2; -x_21 = l_List_map___main___rarg(x_20, x_19); -x_22 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_22, 0, x_4); -lean::cnstr_set(x_22, 1, x_5); -lean::cnstr_set(x_22, 2, x_8); -lean::cnstr_set(x_22, 3, x_11); -lean::cnstr_set(x_22, 4, x_12); -lean::cnstr_set(x_22, 5, x_13); -lean::cnstr_set(x_22, 6, x_14); -lean::cnstr_set(x_22, 7, x_21); -return x_22; -} -} -} -} -} -} -obj* l_Lean_Parser_command_structure_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_157; -x_157 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_157) == 0) -{ -obj* x_158; -x_158 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__6; -return x_158; -} -else -{ -obj* x_159; obj* x_160; -x_159 = lean::cnstr_get(x_157, 0); -lean::inc(x_159); -lean::dec(x_157); -x_160 = lean::cnstr_get(x_159, 1); -lean::inc(x_160); -lean::dec(x_159); -if (lean::obj_tag(x_160) == 0) -{ -obj* x_161; -x_161 = lean::box(3); -x_2 = x_160; -x_3 = x_161; -goto block_156; -} -else -{ -obj* x_162; obj* x_163; -x_162 = lean::cnstr_get(x_160, 0); -lean::inc(x_162); -x_163 = lean::cnstr_get(x_160, 1); -lean::inc(x_163); -lean::dec(x_160); -x_2 = x_163; -x_3 = x_162; -goto block_156; -} -} -block_156: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = l_Lean_Parser_command_structureKw_HasView; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_153; -x_153 = lean::box(3); -x_7 = x_2; -x_8 = x_153; -goto block_152; -} -else -{ -obj* x_154; obj* x_155; -x_154 = lean::cnstr_get(x_2, 0); -lean::inc(x_154); -x_155 = lean::cnstr_get(x_2, 1); -lean::inc(x_155); -lean::dec(x_2); -x_7 = x_155; -x_8 = x_154; -goto block_152; -} -block_152: -{ -obj* x_9; obj* x_130; -x_130 = l_Lean_Parser_Syntax_asNode___main(x_8); -if (lean::obj_tag(x_130) == 0) -{ -obj* x_131; -x_131 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_9 = x_131; -goto block_129; -} -else -{ -uint8 x_132; -x_132 = !lean::is_exclusive(x_130); -if (x_132 == 0) -{ -obj* x_133; obj* x_134; -x_133 = lean::cnstr_get(x_130, 0); -x_134 = lean::cnstr_get(x_133, 1); -lean::inc(x_134); -lean::dec(x_133); -if (lean::obj_tag(x_134) == 0) -{ -obj* x_135; -lean::free_heap_obj(x_130); -x_135 = lean::box(0); -x_9 = x_135; -goto block_129; -} -else -{ -obj* x_136; -x_136 = lean::cnstr_get(x_134, 1); -lean::inc(x_136); -if (lean::obj_tag(x_136) == 0) -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; -x_137 = lean::cnstr_get(x_134, 0); -lean::inc(x_137); -lean::dec(x_134); -x_138 = l_Lean_Parser_command_oldUnivParams_HasView; -x_139 = lean::cnstr_get(x_138, 0); -lean::inc(x_139); -x_140 = lean::apply_1(x_139, x_137); -lean::cnstr_set(x_130, 0, x_140); -x_9 = x_130; -goto block_129; -} -else -{ -obj* x_141; -lean::dec(x_136); -lean::dec(x_134); -lean::free_heap_obj(x_130); -x_141 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_9 = x_141; -goto block_129; -} -} -} -else -{ -obj* x_142; obj* x_143; -x_142 = lean::cnstr_get(x_130, 0); -lean::inc(x_142); -lean::dec(x_130); -x_143 = lean::cnstr_get(x_142, 1); -lean::inc(x_143); -lean::dec(x_142); -if (lean::obj_tag(x_143) == 0) -{ -obj* x_144; -x_144 = lean::box(0); -x_9 = x_144; -goto block_129; -} -else -{ -obj* x_145; -x_145 = lean::cnstr_get(x_143, 1); -lean::inc(x_145); -if (lean::obj_tag(x_145) == 0) -{ -obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; -x_146 = lean::cnstr_get(x_143, 0); -lean::inc(x_146); -lean::dec(x_143); -x_147 = l_Lean_Parser_command_oldUnivParams_HasView; -x_148 = lean::cnstr_get(x_147, 0); -lean::inc(x_148); -x_149 = lean::apply_1(x_148, x_146); -x_150 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_150, 0, x_149); -x_9 = x_150; -goto block_129; -} -else -{ -obj* x_151; -lean::dec(x_145); -lean::dec(x_143); -x_151 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_9 = x_151; -goto block_129; -} -} -} -} -block_129: -{ -obj* x_10; obj* x_11; -if (lean::obj_tag(x_7) == 0) -{ -obj* x_126; -x_126 = lean::box(3); -x_10 = x_7; -x_11 = x_126; -goto block_125; -} -else -{ -obj* x_127; obj* x_128; -x_127 = lean::cnstr_get(x_7, 0); -lean::inc(x_127); -x_128 = lean::cnstr_get(x_7, 1); -lean::inc(x_128); -lean::dec(x_7); -x_10 = x_128; -x_11 = x_127; -goto block_125; -} -block_125: -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = l_Lean_Parser_command_identUnivParams_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_122; -x_122 = lean::box(3); -x_15 = x_10; -x_16 = x_122; -goto block_121; -} -else -{ -obj* x_123; obj* x_124; -x_123 = lean::cnstr_get(x_10, 0); -lean::inc(x_123); -x_124 = lean::cnstr_get(x_10, 1); -lean::inc(x_124); -lean::dec(x_10); -x_15 = x_124; -x_16 = x_123; -goto block_121; -} -block_121: -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = l_Lean_Parser_command_optDeclSig_HasView; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -x_19 = lean::apply_1(x_18, x_16); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_118; -x_118 = lean::box(3); -x_20 = x_15; -x_21 = x_118; -goto block_117; -} -else -{ -obj* x_119; obj* x_120; -x_119 = lean::cnstr_get(x_15, 0); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_15, 1); -lean::inc(x_120); -lean::dec(x_15); -x_20 = x_120; -x_21 = x_119; -goto block_117; -} -block_117: -{ -obj* x_22; obj* x_95; -x_95 = l_Lean_Parser_Syntax_asNode___main(x_21); -if (lean::obj_tag(x_95) == 0) -{ -obj* x_96; -x_96 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4; -x_22 = x_96; -goto block_94; -} -else -{ -uint8 x_97; -x_97 = !lean::is_exclusive(x_95); -if (x_97 == 0) -{ -obj* x_98; obj* x_99; -x_98 = lean::cnstr_get(x_95, 0); -x_99 = lean::cnstr_get(x_98, 1); -lean::inc(x_99); -lean::dec(x_98); -if (lean::obj_tag(x_99) == 0) -{ -obj* x_100; -lean::free_heap_obj(x_95); -x_100 = lean::box(0); -x_22 = x_100; -goto block_94; -} -else -{ -obj* x_101; -x_101 = lean::cnstr_get(x_99, 1); -lean::inc(x_101); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; -x_102 = lean::cnstr_get(x_99, 0); -lean::inc(x_102); -lean::dec(x_99); -x_103 = l_Lean_Parser_command_extends_HasView; -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -x_105 = lean::apply_1(x_104, x_102); -lean::cnstr_set(x_95, 0, x_105); -x_22 = x_95; -goto block_94; -} -else -{ -obj* x_106; -lean::dec(x_101); -lean::dec(x_99); -lean::free_heap_obj(x_95); -x_106 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4; -x_22 = x_106; -goto block_94; -} -} -} -else -{ -obj* x_107; obj* x_108; -x_107 = lean::cnstr_get(x_95, 0); -lean::inc(x_107); -lean::dec(x_95); -x_108 = lean::cnstr_get(x_107, 1); -lean::inc(x_108); -lean::dec(x_107); -if (lean::obj_tag(x_108) == 0) -{ -obj* x_109; -x_109 = lean::box(0); -x_22 = x_109; -goto block_94; -} -else -{ -obj* x_110; -x_110 = lean::cnstr_get(x_108, 1); -lean::inc(x_110); -if (lean::obj_tag(x_110) == 0) -{ -obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; -x_111 = lean::cnstr_get(x_108, 0); -lean::inc(x_111); -lean::dec(x_108); -x_112 = l_Lean_Parser_command_extends_HasView; -x_113 = lean::cnstr_get(x_112, 0); -lean::inc(x_113); -x_114 = lean::apply_1(x_113, x_111); -x_115 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_115, 0, x_114); -x_22 = x_115; -goto block_94; -} -else -{ -obj* x_116; -lean::dec(x_110); -lean::dec(x_108); -x_116 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4; -x_22 = x_116; -goto block_94; -} -} -} -} -block_94: -{ -obj* x_23; obj* x_24; -if (lean::obj_tag(x_20) == 0) -{ -obj* x_91; -x_91 = lean::box(3); -x_23 = x_20; -x_24 = x_91; -goto block_90; -} -else -{ -obj* x_92; obj* x_93; -x_92 = lean::cnstr_get(x_20, 0); -lean::inc(x_92); -x_93 = lean::cnstr_get(x_20, 1); -lean::inc(x_93); -lean::dec(x_20); -x_23 = x_93; -x_24 = x_92; -goto block_90; -} -block_90: -{ -obj* x_25; -if (lean::obj_tag(x_24) == 0) -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_24, 0); -lean::inc(x_87); -lean::dec(x_24); -x_88 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_88, 0, x_87); -x_25 = x_88; -goto block_86; -} -else -{ -obj* x_89; -lean::dec(x_24); -x_89 = lean::box(0); -x_25 = x_89; -goto block_86; -} -block_86: -{ -obj* x_26; obj* x_37; obj* x_38; obj* x_48; obj* x_49; -if (lean::obj_tag(x_23) == 0) -{ -obj* x_83; -x_83 = lean::box(3); -x_48 = x_23; -x_49 = x_83; -goto block_82; -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_23, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_23, 1); -lean::inc(x_85); -lean::dec(x_23); -x_48 = x_85; -x_49 = x_84; -goto block_82; -} -block_36: -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = l_Lean_Parser_Syntax_asNode___main(x_27); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; -x_29 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__1; -x_30 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_30, 0, x_6); -lean::cnstr_set(x_30, 1, x_9); -lean::cnstr_set(x_30, 2, x_14); -lean::cnstr_set(x_30, 3, x_19); -lean::cnstr_set(x_30, 4, x_22); -lean::cnstr_set(x_30, 5, x_25); -lean::cnstr_set(x_30, 6, x_26); -lean::cnstr_set(x_30, 7, x_29); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -lean::dec(x_31); -x_33 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__2; -x_34 = l_List_map___main___rarg(x_33, x_32); -x_35 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_35, 0, x_6); -lean::cnstr_set(x_35, 1, x_9); -lean::cnstr_set(x_35, 2, x_14); -lean::cnstr_set(x_35, 3, x_19); -lean::cnstr_set(x_35, 4, x_22); -lean::cnstr_set(x_35, 5, x_25); -lean::cnstr_set(x_35, 6, x_26); -lean::cnstr_set(x_35, 7, x_34); -return x_35; -} -} -block_47: -{ -obj* x_39; -x_39 = l_Lean_Parser_Syntax_asNode___main(x_38); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; -x_40 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__1; -x_41 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_41, 0, x_6); -lean::cnstr_set(x_41, 1, x_9); -lean::cnstr_set(x_41, 2, x_14); -lean::cnstr_set(x_41, 3, x_19); -lean::cnstr_set(x_41, 4, x_22); -lean::cnstr_set(x_41, 5, x_25); -lean::cnstr_set(x_41, 6, x_37); -lean::cnstr_set(x_41, 7, x_40); -return x_41; -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_42 = lean::cnstr_get(x_39, 0); -lean::inc(x_42); -lean::dec(x_39); -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -lean::dec(x_42); -x_44 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__2; -x_45 = l_List_map___main___rarg(x_44, x_43); -x_46 = lean::alloc_cnstr(0, 8, 0); -lean::cnstr_set(x_46, 0, x_6); -lean::cnstr_set(x_46, 1, x_9); -lean::cnstr_set(x_46, 2, x_14); -lean::cnstr_set(x_46, 3, x_19); -lean::cnstr_set(x_46, 4, x_22); -lean::cnstr_set(x_46, 5, x_25); -lean::cnstr_set(x_46, 6, x_37); -lean::cnstr_set(x_46, 7, x_45); -return x_46; -} -} -block_82: -{ -obj* x_50; -x_50 = l_Lean_Parser_Syntax_asNode___main(x_49); -if (lean::obj_tag(x_50) == 0) -{ -if (lean::obj_tag(x_48) == 0) -{ -obj* x_51; -x_51 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_26 = x_51; -goto block_36; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_48, 0); -lean::inc(x_52); -lean::dec(x_48); -x_53 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_37 = x_53; -x_38 = x_52; -goto block_47; -} -} -else -{ -uint8 x_54; -x_54 = !lean::is_exclusive(x_50); -if (x_54 == 0) -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_50, 0); -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -lean::dec(x_55); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -lean::free_heap_obj(x_50); -x_57 = lean::box(0); -if (lean::obj_tag(x_48) == 0) -{ -x_26 = x_57; -goto block_36; -} -else -{ -obj* x_58; -x_58 = lean::cnstr_get(x_48, 0); -lean::inc(x_58); -lean::dec(x_48); -x_37 = x_57; -x_38 = x_58; -goto block_47; -} -} -else -{ -obj* x_59; -x_59 = lean::cnstr_get(x_56, 1); -lean::inc(x_59); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_60 = lean::cnstr_get(x_56, 0); -lean::inc(x_60); -lean::dec(x_56); -x_61 = l_Lean_Parser_command_structureCtor_HasView; -x_62 = lean::cnstr_get(x_61, 0); -lean::inc(x_62); -x_63 = lean::apply_1(x_62, x_60); -lean::cnstr_set(x_50, 0, x_63); -if (lean::obj_tag(x_48) == 0) -{ -x_26 = x_50; -goto block_36; -} -else -{ -obj* x_64; -x_64 = lean::cnstr_get(x_48, 0); -lean::inc(x_64); -lean::dec(x_48); -x_37 = x_50; -x_38 = x_64; -goto block_47; -} -} -else -{ -lean::dec(x_59); -lean::dec(x_56); -lean::free_heap_obj(x_50); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_65; -x_65 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_26 = x_65; -goto block_36; -} -else -{ -obj* x_66; obj* x_67; -x_66 = lean::cnstr_get(x_48, 0); -lean::inc(x_66); -lean::dec(x_48); -x_67 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_37 = x_67; -x_38 = x_66; -goto block_47; -} -} -} -} -else -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_50, 0); -lean::inc(x_68); -lean::dec(x_50); -x_69 = lean::cnstr_get(x_68, 1); -lean::inc(x_69); -lean::dec(x_68); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -x_70 = lean::box(0); -if (lean::obj_tag(x_48) == 0) -{ -x_26 = x_70; -goto block_36; -} -else -{ -obj* x_71; -x_71 = lean::cnstr_get(x_48, 0); -lean::inc(x_71); -lean::dec(x_48); -x_37 = x_70; -x_38 = x_71; -goto block_47; -} -} -else -{ -obj* x_72; -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_73 = lean::cnstr_get(x_69, 0); -lean::inc(x_73); -lean::dec(x_69); -x_74 = l_Lean_Parser_command_structureCtor_HasView; -x_75 = lean::cnstr_get(x_74, 0); -lean::inc(x_75); -x_76 = lean::apply_1(x_75, x_73); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_76); -if (lean::obj_tag(x_48) == 0) -{ -x_26 = x_77; -goto block_36; -} -else -{ -obj* x_78; -x_78 = lean::cnstr_get(x_48, 0); -lean::inc(x_78); -lean::dec(x_48); -x_37 = x_77; -x_38 = x_78; -goto block_47; -} -} -else -{ -lean::dec(x_72); -lean::dec(x_69); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_79; -x_79 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_26 = x_79; -goto block_36; -} -else -{ -obj* x_80; obj* x_81; -x_80 = lean::cnstr_get(x_48, 0); -lean::inc(x_80); -lean::dec(x_48); -x_81 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3; -x_37 = x_81; -x_38 = x_80; -goto block_47; -} -} -} -} -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_structure_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structure_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structure_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_structure_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_structure_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_structure_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_1 = lean::mk_string("structure"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_string("class"); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_6); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasTokens; -x_13 = l_Lean_Parser_tokens___rarg(x_12); -x_14 = lean::mk_string("extends"); -x_15 = l_Lean_Parser_symbol_tokens___rarg(x_14, x_2); -lean::dec(x_14); -x_16 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -x_18 = lean::mk_string(","); -x_19 = l_Lean_Parser_symbol_tokens___rarg(x_18, x_2); -lean::dec(x_18); -x_20 = l_Lean_Parser_Combinators_sepBy1_tokens___rarg(x_17, x_19); -lean::dec(x_19); -lean::dec(x_17); -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_6); -lean::dec(x_20); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_21); -lean::dec(x_21); -lean::dec(x_15); -x_23 = l_Lean_Parser_tokens___rarg(x_22); -lean::dec(x_22); -x_24 = l_Lean_Parser_tokens___rarg(x_23); -lean::dec(x_23); -x_25 = lean::mk_string(":="); -x_26 = l_Lean_Parser_symbol_tokens___rarg(x_25, x_2); -lean::dec(x_25); -x_27 = l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasTokens; -x_28 = l_Lean_Parser_tokens___rarg(x_27); -x_29 = lean::mk_string("::"); -x_30 = l_Lean_Parser_symbol_tokens___rarg(x_29, x_2); -lean::dec(x_29); -x_31 = l_Lean_Parser_List_cons_tokens___rarg(x_30, x_6); -lean::dec(x_30); -x_32 = l_Lean_Parser_List_cons_tokens___rarg(x_28, x_31); -lean::dec(x_31); -lean::dec(x_28); -x_33 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_32); -lean::dec(x_32); -x_34 = l_Lean_Parser_tokens___rarg(x_33); -lean::dec(x_33); -x_35 = l_Lean_Parser_tokens___rarg(x_34); -lean::dec(x_34); -x_36 = l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasTokens; -x_37 = l_Lean_Parser_tokens___rarg(x_36); -x_38 = l_Lean_Parser_List_cons_tokens___rarg(x_37, x_6); -lean::dec(x_37); -x_39 = l_Lean_Parser_List_cons_tokens___rarg(x_35, x_38); -lean::dec(x_38); -lean::dec(x_35); -x_40 = l_Lean_Parser_List_cons_tokens___rarg(x_26, x_39); -lean::dec(x_39); -lean::dec(x_26); -x_41 = l_Lean_Parser_List_cons_tokens___rarg(x_24, x_40); -lean::dec(x_40); -lean::dec(x_24); -x_42 = l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens; -x_43 = l_Lean_Parser_List_cons_tokens___rarg(x_42, x_41); -lean::dec(x_41); -x_44 = l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasTokens; -x_45 = l_Lean_Parser_List_cons_tokens___rarg(x_44, x_43); -lean::dec(x_43); -x_46 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_45); -lean::dec(x_45); -lean::dec(x_13); -x_47 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_46); -lean::dec(x_46); -lean::dec(x_11); -x_48 = l_Lean_Parser_tokens___rarg(x_47); -lean::dec(x_47); -return x_48; -} -} -obj* _init_l_Lean_Parser_command_structure_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 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; uint8 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_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("structure"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::mk_string("class"); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_8); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_9); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_14); -x_19 = l_Lean_Parser_command_structureKw; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_18); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_oldUnivParams_Parser), 4, 0); -x_22 = 0; -x_23 = lean::box(x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_24, 0, x_21); -lean::closure_set(x_24, 1, x_23); -x_25 = lean::mk_string("extends"); -x_26 = l_String_trim(x_25); -lean::dec(x_25); -lean::inc(x_26); -x_27 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_27, 0, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_28, 0, x_26); -lean::closure_set(x_28, 1, x_8); -lean::closure_set(x_28, 2, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_29, 0, x_8); -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_30, 0, x_29); -x_31 = lean::mk_string(","); -x_32 = l_String_trim(x_31); -lean::dec(x_31); -lean::inc(x_32); -x_33 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_33, 0, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_34, 0, x_32); -lean::closure_set(x_34, 1, x_8); -lean::closure_set(x_34, 2, x_33); -x_35 = 1; -x_36 = lean::box(x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_37, 0, x_30); -lean::closure_set(x_37, 1, x_34); -lean::closure_set(x_37, 2, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_14); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_28); -lean::cnstr_set(x_39, 1, x_38); -x_40 = l_Lean_Parser_command_extends; -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_41, 0, x_40); -lean::closure_set(x_41, 1, x_39); -x_42 = lean::box(x_22); -x_43 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_43, 0, x_41); -lean::closure_set(x_43, 1, x_42); -x_44 = lean::mk_string(":="); -x_45 = l_String_trim(x_44); -lean::dec(x_44); -lean::inc(x_45); -x_46 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_46, 0, x_45); -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_47, 0, x_45); -lean::closure_set(x_47, 1, x_8); -lean::closure_set(x_47, 2, x_46); -x_48 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser), 4, 0); -x_49 = lean::box(x_22); -x_50 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_50, 0, x_48); -lean::closure_set(x_50, 1, x_49); -x_51 = lean::mk_string("::"); -x_52 = l_String_trim(x_51); -lean::dec(x_51); -lean::inc(x_52); -x_53 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_53, 0, x_52); -x_54 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_54, 0, x_52); -lean::closure_set(x_54, 1, x_8); -lean::closure_set(x_54, 2, x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_14); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_50); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_56); -x_59 = l_Lean_Parser_command_structureCtor; -x_60 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_60, 0, x_59); -lean::closure_set(x_60, 1, x_58); -x_61 = lean::box(x_22); -x_62 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_62, 0, x_60); -lean::closure_set(x_62, 1, x_61); -x_63 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structureFieldBlock_Parser), 4, 0); -x_64 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_64, 0, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_14); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_62); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_47); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_43); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_Parser), 4, 0); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_68); -x_71 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_identUnivParams_Parser), 4, 0); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_70); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_24); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_20); -lean::cnstr_set(x_74, 1, x_73); -x_75 = l_Lean_Parser_command_structure; -x_76 = l_Lean_Parser_command_structure_HasView; -x_77 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_75, x_74, x_76); -lean::dec(x_74); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_77; -} -} -obj* _init_l_Lean_Parser_command_structure_Parser___closed__1() { -_start: -{ -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; uint8 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; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_1 = lean::mk_string("structure"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("class"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_13, 0, x_12); -lean::closure_set(x_13, 1, x_4); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -x_15 = l_Lean_Parser_command_structureKw; -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_16, 0, x_15); -lean::closure_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_oldUnivParams_Parser), 4, 0); -x_18 = 0; -x_19 = lean::box(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_20, 0, x_17); -lean::closure_set(x_20, 1, x_19); -x_21 = lean::mk_string("extends"); -x_22 = l_String_trim(x_21); -lean::dec(x_21); -lean::inc(x_22); -x_23 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_23, 0, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_4); -lean::closure_set(x_24, 2, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_25, 0, x_4); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::mk_string(","); -x_28 = l_String_trim(x_27); -lean::dec(x_27); -lean::inc(x_28); -x_29 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_29, 0, x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_30, 0, x_28); -lean::closure_set(x_30, 1, x_4); -lean::closure_set(x_30, 2, x_29); -x_31 = 1; -x_32 = lean::box(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_33, 0, x_26); -lean::closure_set(x_33, 1, x_30); -lean::closure_set(x_33, 2, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_10); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_24); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_command_extends; -x_37 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_37, 0, x_36); -lean::closure_set(x_37, 1, x_35); -x_38 = lean::box(x_18); -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_39, 0, x_37); -lean::closure_set(x_39, 1, x_38); -x_40 = lean::mk_string(":="); -x_41 = l_String_trim(x_40); -lean::dec(x_40); -lean::inc(x_41); -x_42 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_42, 0, x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_43, 0, x_41); -lean::closure_set(x_43, 1, x_4); -lean::closure_set(x_43, 2, x_42); -x_44 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inferModifier_Parser), 4, 0); -x_45 = lean::box(x_18); -x_46 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_46, 0, x_44); -lean::closure_set(x_46, 1, x_45); -x_47 = lean::mk_string("::"); -x_48 = l_String_trim(x_47); -lean::dec(x_47); -lean::inc(x_48); -x_49 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_49, 0, x_48); -x_50 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_50, 0, x_48); -lean::closure_set(x_50, 1, x_4); -lean::closure_set(x_50, 2, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_10); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_46); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens___spec__1___boxed), 4, 0); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_52); -x_55 = l_Lean_Parser_command_structureCtor; -x_56 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_56, 0, x_55); -lean::closure_set(x_56, 1, x_54); -x_57 = lean::box(x_18); -x_58 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_58, 0, x_56); -lean::closure_set(x_58, 1, x_57); -x_59 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structureFieldBlock_Parser), 4, 0); -x_60 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_60, 0, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_10); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_58); -lean::cnstr_set(x_62, 1, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_43); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_39); -lean::cnstr_set(x_64, 1, x_63); -x_65 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_Parser), 4, 0); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_64); -x_67 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_identUnivParams_Parser), 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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_20); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_16); -lean::cnstr_set(x_70, 1, x_69); -return x_70; -} -} -obj* l_Lean_Parser_command_structure_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_structure; -x_6 = l_Lean_Parser_command_structure_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("defLike"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("kind"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_defLike_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_defLike_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__3() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(2u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_defLike_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__4() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(3u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_defLike_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__5() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(4u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_defLike_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__1; -return x_4; -} -else -{ -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_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_defLike_kind; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -case 1: -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_defLike_kind; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -case 2: -{ -obj* x_23; -x_23 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -x_24 = l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__3; -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_2); -x_31 = l_Lean_Parser_command_defLike_kind; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -case 3: -{ -obj* x_33; -x_33 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__4; -return x_34; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -x_36 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_2); -x_38 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_2); -x_41 = l_Lean_Parser_command_defLike_kind; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -} -default: -{ -obj* x_43; -x_43 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__5; -return x_44; -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -x_46 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_2); -x_48 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6; -x_49 = l_Lean_Parser_Syntax_mkNode(x_48, x_47); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_2); -x_51 = l_Lean_Parser_command_defLike_kind; -x_52 = l_Lean_Parser_Syntax_mkNode(x_51, x_50); -return x_52; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__5; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__7() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("defLike"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("kind"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__7; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::mk_nat_obj(1u); -x_32 = lean::nat_dec_eq(x_22, x_31); -if (x_32 == 0) -{ -obj* x_33; uint8 x_34; -x_33 = lean::mk_nat_obj(2u); -x_34 = lean::nat_dec_eq(x_22, x_33); -if (x_34 == 0) -{ -obj* x_35; uint8 x_36; -x_35 = lean::mk_nat_obj(3u); -x_36 = lean::nat_dec_eq(x_22, x_35); -lean::dec(x_22); -if (x_36 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_28, 0); -lean::inc(x_37); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_37); -x_38 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_38, 0, x_13); -return x_38; -} -else -{ -obj* x_39; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_39 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_28, 0); -lean::inc(x_40); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_40); -x_41 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_41, 0, x_13); -return x_41; -} -else -{ -obj* x_42; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_42 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__2; -return x_42; -} -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_28, 0); -lean::inc(x_43); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_43); -x_44 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_44, 0, x_13); -return x_44; -} -else -{ -obj* x_45; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_45 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__3; -return x_45; -} -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_28, 0); -lean::inc(x_46); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_46); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_13); -return x_47; -} -else -{ -obj* x_48; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_48 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__4; -return x_48; -} -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_28, 0); -lean::inc(x_49); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_49); -x_50 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_50, 0, x_13); -return x_50; -} -else -{ -obj* x_51; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_51 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__5; -return x_51; -} -} -} -else -{ -obj* x_52; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_52 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_52; -} -} -} -} -} -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_13, 0); -lean::inc(x_53); -lean::dec(x_13); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -switch (lean::obj_tag(x_54)) { -case 0: -{ -obj* x_55; -lean::dec(x_53); -x_55 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_55; -} -case 1: -{ -obj* x_56; -lean::dec(x_54); -lean::dec(x_53); -x_56 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_56; -} -default: -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; uint8 x_61; -x_57 = lean::cnstr_get(x_53, 1); -lean::inc(x_57); -lean::dec(x_53); -x_58 = lean::cnstr_get(x_54, 0); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_54, 1); -lean::inc(x_59); -lean::dec(x_54); -x_60 = lean::box(0); -x_61 = lean_name_dec_eq(x_58, x_60); -lean::dec(x_58); -if (x_61 == 0) -{ -obj* x_62; -lean::dec(x_59); -lean::dec(x_57); -x_62 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_62; -} -else -{ -if (lean::obj_tag(x_57) == 0) -{ -obj* x_63; -lean::dec(x_59); -x_63 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_63; -} -else -{ -obj* x_64; -x_64 = lean::cnstr_get(x_57, 1); -lean::inc(x_64); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; obj* x_66; uint8 x_67; -x_65 = lean::cnstr_get(x_57, 0); -lean::inc(x_65); -lean::dec(x_57); -x_66 = lean::mk_nat_obj(0u); -x_67 = lean::nat_dec_eq(x_59, x_66); -if (x_67 == 0) -{ -obj* x_68; uint8 x_69; -x_68 = lean::mk_nat_obj(1u); -x_69 = lean::nat_dec_eq(x_59, x_68); -if (x_69 == 0) -{ -obj* x_70; uint8 x_71; -x_70 = lean::mk_nat_obj(2u); -x_71 = lean::nat_dec_eq(x_59, x_70); -if (x_71 == 0) -{ -obj* x_72; uint8 x_73; -x_72 = lean::mk_nat_obj(3u); -x_73 = lean::nat_dec_eq(x_59, x_72); -lean::dec(x_59); -if (x_73 == 0) -{ -if (lean::obj_tag(x_65) == 0) -{ -obj* x_74; obj* x_75; obj* x_76; -x_74 = lean::cnstr_get(x_65, 0); -lean::inc(x_74); -lean::dec(x_65); -x_75 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_75, 0, x_74); -x_76 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -return x_76; -} -else -{ -obj* x_77; -lean::dec(x_65); -x_77 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__1; -return x_77; -} -} -else -{ -if (lean::obj_tag(x_65) == 0) -{ -obj* x_78; obj* x_79; obj* x_80; -x_78 = lean::cnstr_get(x_65, 0); -lean::inc(x_78); -lean::dec(x_65); -x_79 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -x_80 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_80, 0, x_79); -return x_80; -} -else -{ -obj* x_81; -lean::dec(x_65); -x_81 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__2; -return x_81; -} -} -} -else -{ -lean::dec(x_59); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_82; obj* x_83; obj* x_84; -x_82 = lean::cnstr_get(x_65, 0); -lean::inc(x_82); -lean::dec(x_65); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -x_84 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; -} -else -{ -obj* x_85; -lean::dec(x_65); -x_85 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__3; -return x_85; -} -} -} -else -{ -lean::dec(x_59); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_86; obj* x_87; obj* x_88; -x_86 = lean::cnstr_get(x_65, 0); -lean::inc(x_86); -lean::dec(x_65); -x_87 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -x_88 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_88, 0, x_87); -return x_88; -} -else -{ -obj* x_89; -lean::dec(x_65); -x_89 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__4; -return x_89; -} -} -} -else -{ -lean::dec(x_59); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_90; obj* x_91; obj* x_92; -x_90 = lean::cnstr_get(x_65, 0); -lean::inc(x_90); -lean::dec(x_65); -x_91 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_91, 0, x_90); -x_92 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; -} -else -{ -obj* x_93; -lean::dec(x_65); -x_93 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__5; -return x_93; -} -} -} -else -{ -obj* x_94; -lean::dec(x_64); -lean::dec(x_59); -lean::dec(x_57); -x_94 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_94; -} -} -} -} -} -} -} -} -else -{ -obj* x_95; -lean::dec(x_11); -lean::dec(x_6); -x_95 = l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6; -return x_95; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_defLike_kind_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_defLike_kind_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_defLike() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("defLike"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_defLike_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -lean::dec(x_1); -x_7 = l_Lean_Parser_command_defLike_kind_HasView; -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_2); -x_10 = l_Lean_Parser_command_identUnivParams_HasView; -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_4); -x_13 = l_Lean_Parser_command_optDeclSig_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_5); -x_16 = l_Lean_Parser_command_declVal_HasView; -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_6); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_15); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_12); -lean::cnstr_set(x_22, 1, x_21); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_23 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_9); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_command_defLike; -x_27 = l_Lean_Parser_Syntax_mkNode(x_26, x_25); -return x_27; -} -else -{ -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; -x_28 = lean::cnstr_get(x_3, 0); -lean::inc(x_28); -lean::dec(x_3); -x_29 = l_Lean_Parser_command_oldUnivParams_HasView; -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -x_31 = lean::apply_1(x_30, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_19); -x_33 = l_Lean_Parser_noKind; -x_34 = l_Lean_Parser_Syntax_mkNode(x_33, x_32); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_22); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_9); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Parser_command_defLike; -x_38 = l_Lean_Parser_Syntax_mkNode(x_37, x_36); -return x_38; -} -} -} -obj* _init_l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_identUnivParams_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_declVal_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_defLike_kind_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_7 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_8 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_9 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_6); -lean::cnstr_set(x_10, 2, x_7); -lean::cnstr_set(x_10, 3, x_8); -lean::cnstr_set(x_10, 4, x_9); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_5); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_5, 0); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -lean::free_heap_obj(x_5); -x_14 = lean::box(0); -x_15 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_16 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_17 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_18 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_14); -lean::cnstr_set(x_18, 2, x_15); -lean::cnstr_set(x_18, 3, x_16); -lean::cnstr_set(x_18, 4, x_17); -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_13, 1); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_20 = lean::cnstr_get(x_13, 0); -lean::inc(x_20); -lean::dec(x_13); -x_21 = l_Lean_Parser_command_oldUnivParams_HasView; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -lean::cnstr_set(x_5, 0, x_23); -x_24 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_25 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_26 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_27 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_27, 0, x_4); -lean::cnstr_set(x_27, 1, x_5); -lean::cnstr_set(x_27, 2, x_24); -lean::cnstr_set(x_27, 3, x_25); -lean::cnstr_set(x_27, 4, x_26); -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -lean::dec(x_19); -lean::dec(x_13); -lean::free_heap_obj(x_5); -x_28 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_29 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_30 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_31 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_32 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_32, 0, x_4); -lean::cnstr_set(x_32, 1, x_28); -lean::cnstr_set(x_32, 2, x_29); -lean::cnstr_set(x_32, 3, x_30); -lean::cnstr_set(x_32, 4, x_31); -return x_32; -} -} -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_5, 0); -lean::inc(x_33); -lean::dec(x_5); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_35 = lean::box(0); -x_36 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_37 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_38 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_39 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_39, 0, x_4); -lean::cnstr_set(x_39, 1, x_35); -lean::cnstr_set(x_39, 2, x_36); -lean::cnstr_set(x_39, 3, x_37); -lean::cnstr_set(x_39, 4, x_38); -return x_39; -} -else -{ -obj* x_40; -x_40 = lean::cnstr_get(x_34, 1); -lean::inc(x_40); -if (lean::obj_tag(x_40) == 0) -{ -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; -x_41 = lean::cnstr_get(x_34, 0); -lean::inc(x_41); -lean::dec(x_34); -x_42 = l_Lean_Parser_command_oldUnivParams_HasView; -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::apply_1(x_43, x_41); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_47 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_48 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_49 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_49, 0, x_4); -lean::cnstr_set(x_49, 1, x_45); -lean::cnstr_set(x_49, 2, x_46); -lean::cnstr_set(x_49, 3, x_47); -lean::cnstr_set(x_49, 4, x_48); -return x_49; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_40); -lean::dec(x_34); -x_50 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_51 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_52 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_53 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_54 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_54, 0, x_4); -lean::cnstr_set(x_54, 1, x_50); -lean::cnstr_set(x_54, 2, x_51); -lean::cnstr_set(x_54, 3, x_52); -lean::cnstr_set(x_54, 4, x_53); -return x_54; -} -} -} -} -} -} -obj* l_Lean_Parser_command_defLike_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_103; -x_103 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; -x_104 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__3; -return x_104; -} -else -{ -obj* x_105; obj* x_106; -x_105 = lean::cnstr_get(x_103, 0); -lean::inc(x_105); -lean::dec(x_103); -x_106 = lean::cnstr_get(x_105, 1); -lean::inc(x_106); -lean::dec(x_105); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; -x_107 = lean::box(3); -x_2 = x_106; -x_3 = x_107; -goto block_102; -} -else -{ -obj* x_108; obj* x_109; -x_108 = lean::cnstr_get(x_106, 0); -lean::inc(x_108); -x_109 = lean::cnstr_get(x_106, 1); -lean::inc(x_109); -lean::dec(x_106); -x_2 = x_109; -x_3 = x_108; -goto block_102; -} -} -block_102: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_29; obj* x_30; -x_4 = l_Lean_Parser_command_defLike_kind_HasView; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_99; -x_99 = lean::box(3); -x_29 = x_2; -x_30 = x_99; -goto block_98; -} -else -{ -obj* x_100; obj* x_101; -x_100 = lean::cnstr_get(x_2, 0); -lean::inc(x_100); -x_101 = lean::cnstr_get(x_2, 1); -lean::inc(x_101); -lean::dec(x_2); -x_29 = x_101; -x_30 = x_100; -goto block_98; -} -block_28: -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = l_Lean_Parser_command_identUnivParams_HasView; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_8); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_14 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_15 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_12); -lean::cnstr_set(x_15, 3, x_13); -lean::cnstr_set(x_15, 4, x_14); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = lean::cnstr_get(x_9, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_9, 1); -lean::inc(x_17); -lean::dec(x_9); -x_18 = l_Lean_Parser_command_optDeclSig_HasView; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::apply_1(x_19, x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_21; obj* x_22; -x_21 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_22 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_22, 0, x_6); -lean::cnstr_set(x_22, 1, x_7); -lean::cnstr_set(x_22, 2, x_12); -lean::cnstr_set(x_22, 3, x_20); -lean::cnstr_set(x_22, 4, x_21); -return x_22; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_23 = lean::cnstr_get(x_17, 0); -lean::inc(x_23); -lean::dec(x_17); -x_24 = l_Lean_Parser_command_declVal_HasView; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_7); -lean::cnstr_set(x_27, 2, x_12); -lean::cnstr_set(x_27, 3, x_20); -lean::cnstr_set(x_27, 4, x_26); -return x_27; -} -} -} -block_98: -{ -obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_30); -if (lean::obj_tag(x_31) == 0) -{ -if (lean::obj_tag(x_29) == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_33 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_34 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_35 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_36 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_36, 0, x_6); -lean::cnstr_set(x_36, 1, x_32); -lean::cnstr_set(x_36, 2, x_33); -lean::cnstr_set(x_36, 3, x_34); -lean::cnstr_set(x_36, 4, x_35); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; -x_37 = lean::cnstr_get(x_29, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_29, 1); -lean::inc(x_38); -lean::dec(x_29); -x_39 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_7 = x_39; -x_8 = x_37; -x_9 = x_38; -goto block_28; -} -} -else -{ -uint8 x_40; -x_40 = !lean::is_exclusive(x_31); -if (x_40 == 0) -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_31, 0); -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -lean::dec(x_41); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; -lean::free_heap_obj(x_31); -x_43 = lean::box(0); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_44 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_45 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_46 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_47 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_47, 0, x_6); -lean::cnstr_set(x_47, 1, x_43); -lean::cnstr_set(x_47, 2, x_44); -lean::cnstr_set(x_47, 3, x_45); -lean::cnstr_set(x_47, 4, x_46); -return x_47; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_29, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_29, 1); -lean::inc(x_49); -lean::dec(x_29); -x_7 = x_43; -x_8 = x_48; -x_9 = x_49; -goto block_28; -} -} -else -{ -obj* x_50; -x_50 = lean::cnstr_get(x_42, 1); -lean::inc(x_50); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_51 = lean::cnstr_get(x_42, 0); -lean::inc(x_51); -lean::dec(x_42); -x_52 = l_Lean_Parser_command_oldUnivParams_HasView; -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -x_54 = lean::apply_1(x_53, x_51); -lean::cnstr_set(x_31, 0, x_54); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_55 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_56 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_57 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_58 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_58, 0, x_6); -lean::cnstr_set(x_58, 1, x_31); -lean::cnstr_set(x_58, 2, x_55); -lean::cnstr_set(x_58, 3, x_56); -lean::cnstr_set(x_58, 4, x_57); -return x_58; -} -else -{ -obj* x_59; obj* x_60; -x_59 = lean::cnstr_get(x_29, 0); -lean::inc(x_59); -x_60 = lean::cnstr_get(x_29, 1); -lean::inc(x_60); -lean::dec(x_29); -x_7 = x_31; -x_8 = x_59; -x_9 = x_60; -goto block_28; -} -} -else -{ -lean::dec(x_50); -lean::dec(x_42); -lean::free_heap_obj(x_31); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_61 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_62 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_63 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_64 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_65 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_65, 0, x_6); -lean::cnstr_set(x_65, 1, x_61); -lean::cnstr_set(x_65, 2, x_62); -lean::cnstr_set(x_65, 3, x_63); -lean::cnstr_set(x_65, 4, x_64); -return x_65; -} -else -{ -obj* x_66; obj* x_67; obj* x_68; -x_66 = lean::cnstr_get(x_29, 0); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_29, 1); -lean::inc(x_67); -lean::dec(x_29); -x_68 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_7 = x_68; -x_8 = x_66; -x_9 = x_67; -goto block_28; -} -} -} -} -else -{ -obj* x_69; obj* x_70; -x_69 = lean::cnstr_get(x_31, 0); -lean::inc(x_69); -lean::dec(x_31); -x_70 = lean::cnstr_get(x_69, 1); -lean::inc(x_70); -lean::dec(x_69); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; -x_71 = lean::box(0); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_72 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_73 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_74 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_75 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_75, 0, x_6); -lean::cnstr_set(x_75, 1, x_71); -lean::cnstr_set(x_75, 2, x_72); -lean::cnstr_set(x_75, 3, x_73); -lean::cnstr_set(x_75, 4, x_74); -return x_75; -} -else -{ -obj* x_76; obj* x_77; -x_76 = lean::cnstr_get(x_29, 0); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_29, 1); -lean::inc(x_77); -lean::dec(x_29); -x_7 = x_71; -x_8 = x_76; -x_9 = x_77; -goto block_28; -} -} -else -{ -obj* x_78; -x_78 = lean::cnstr_get(x_70, 1); -lean::inc(x_78); -if (lean::obj_tag(x_78) == 0) -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_79 = lean::cnstr_get(x_70, 0); -lean::inc(x_79); -lean::dec(x_70); -x_80 = l_Lean_Parser_command_oldUnivParams_HasView; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_82 = lean::apply_1(x_81, x_79); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; -x_84 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_85 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_86 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_87 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_87, 0, x_6); -lean::cnstr_set(x_87, 1, x_83); -lean::cnstr_set(x_87, 2, x_84); -lean::cnstr_set(x_87, 3, x_85); -lean::cnstr_set(x_87, 4, x_86); -return x_87; -} -else -{ -obj* x_88; obj* x_89; -x_88 = lean::cnstr_get(x_29, 0); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_29, 1); -lean::inc(x_89); -lean::dec(x_29); -x_7 = x_83; -x_8 = x_88; -x_9 = x_89; -goto block_28; -} -} -else -{ -lean::dec(x_78); -lean::dec(x_70); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_90 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_91 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_92 = l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2; -x_93 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_94 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_94, 0, x_6); -lean::cnstr_set(x_94, 1, x_90); -lean::cnstr_set(x_94, 2, x_91); -lean::cnstr_set(x_94, 3, x_92); -lean::cnstr_set(x_94, 4, x_93); -return x_94; -} -else -{ -obj* x_95; obj* x_96; obj* x_97; -x_95 = lean::cnstr_get(x_29, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_29, 1); -lean::inc(x_96); -lean::dec(x_29); -x_97 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_7 = x_97; -x_8 = x_95; -x_9 = x_96; -goto block_28; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_defLike_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_defLike_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_defLike_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_defLike_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_defLike_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_instance() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("instance"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_instance_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_Lean_Parser_command_declSig_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_4); -x_9 = l_Lean_Parser_command_declVal_HasView; -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_5); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_8); -lean::cnstr_set(x_14, 1, x_13); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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::box(3); -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 = l_Lean_Parser_command_instance; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -else -{ -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; -x_21 = lean::cnstr_get(x_3, 0); -lean::inc(x_21); -lean::dec(x_3); -x_22 = l_Lean_Parser_command_identUnivParams_HasView; -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -x_24 = lean::apply_1(x_23, x_21); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_12); -x_26 = l_Lean_Parser_noKind; -x_27 = l_Lean_Parser_Syntax_mkNode(x_26, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_14); -x_29 = lean::box(3); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -x_31 = l_Lean_Parser_command_instance; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_2, 0); -lean::inc(x_33); -lean::dec(x_2); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_35 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_14); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_34); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_command_instance; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -return x_39; -} -else -{ -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; -x_40 = lean::cnstr_get(x_3, 0); -lean::inc(x_40); -lean::dec(x_3); -x_41 = l_Lean_Parser_command_identUnivParams_HasView; -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -x_43 = lean::apply_1(x_42, x_40); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_12); -x_45 = l_Lean_Parser_noKind; -x_46 = l_Lean_Parser_Syntax_mkNode(x_45, x_44); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_14); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_34); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_Lean_Parser_command_instance; -x_50 = l_Lean_Parser_Syntax_mkNode(x_49, x_48); -return x_50; -} -} -} -} -obj* _init_l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_identUnivParams_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_declSig_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_5 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_6 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_7 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_4); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_3); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_3, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -lean::free_heap_obj(x_3); -x_11 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_12 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_1); -lean::cnstr_set(x_13, 2, x_11); -lean::cnstr_set(x_13, 3, x_12); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_10, 1); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_15 = lean::cnstr_get(x_10, 0); -lean::inc(x_15); -lean::dec(x_10); -x_16 = l_Lean_Parser_command_identUnivParams_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_15); -lean::cnstr_set(x_3, 0, x_18); -x_19 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_20 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_21 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_3); -lean::cnstr_set(x_21, 2, x_19); -lean::cnstr_set(x_21, 3, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_14); -lean::dec(x_10); -lean::free_heap_obj(x_3); -x_22 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_23 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_24 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_25 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_25, 0, x_1); -lean::cnstr_set(x_25, 1, x_22); -lean::cnstr_set(x_25, 2, x_23); -lean::cnstr_set(x_25, 3, x_24); -return x_25; -} -} -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_3, 0); -lean::inc(x_26); -lean::dec(x_3); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_29 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_30 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_30, 0, x_1); -lean::cnstr_set(x_30, 1, x_1); -lean::cnstr_set(x_30, 2, x_28); -lean::cnstr_set(x_30, 3, x_29); -return x_30; -} -else -{ -obj* x_31; -x_31 = lean::cnstr_get(x_27, 1); -lean::inc(x_31); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_32 = lean::cnstr_get(x_27, 0); -lean::inc(x_32); -lean::dec(x_27); -x_33 = l_Lean_Parser_command_identUnivParams_HasView; -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -x_35 = lean::apply_1(x_34, x_32); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_37 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_38 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_39 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_39, 0, x_1); -lean::cnstr_set(x_39, 1, x_36); -lean::cnstr_set(x_39, 2, x_37); -lean::cnstr_set(x_39, 3, x_38); -return x_39; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -lean::dec(x_31); -lean::dec(x_27); -x_40 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_41 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_42 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_43 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_43, 0, x_1); -lean::cnstr_set(x_43, 1, x_40); -lean::cnstr_set(x_43, 2, x_41); -lean::cnstr_set(x_43, 3, x_42); -return x_43; -} -} -} -} -} -} -obj* l_Lean_Parser_command_instance_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_90; -x_90 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_90) == 0) -{ -obj* x_91; -x_91 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__3; -return x_91; -} -else -{ -obj* x_92; obj* x_93; -x_92 = lean::cnstr_get(x_90, 0); -lean::inc(x_92); -lean::dec(x_90); -x_93 = lean::cnstr_get(x_92, 1); -lean::inc(x_93); -lean::dec(x_92); -if (lean::obj_tag(x_93) == 0) -{ -obj* x_94; -x_94 = lean::box(3); -x_2 = x_93; -x_3 = x_94; -goto block_89; -} -else -{ -obj* x_95; obj* x_96; -x_95 = lean::cnstr_get(x_93, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_93, 1); -lean::inc(x_96); -lean::dec(x_93); -x_2 = x_96; -x_3 = x_95; -goto block_89; -} -} -block_89: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_86; obj* x_87; -x_86 = lean::cnstr_get(x_3, 0); -lean::inc(x_86); -lean::dec(x_3); -x_87 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -x_4 = x_87; -goto block_85; -} -else -{ -obj* x_88; -lean::dec(x_3); -x_88 = lean::box(0); -x_4 = x_88; -goto block_85; -} -block_85: -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_19; obj* x_20; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_82; -x_82 = lean::box(3); -x_19 = x_2; -x_20 = x_82; -goto block_81; -} -else -{ -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_2, 0); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_2, 1); -lean::inc(x_84); -lean::dec(x_2); -x_19 = x_84; -x_20 = x_83; -goto block_81; -} -block_18: -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = l_Lean_Parser_command_declSig_HasView; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::apply_1(x_9, x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_11; obj* x_12; -x_11 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_12 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_5); -lean::cnstr_set(x_12, 2, x_10); -lean::cnstr_set(x_12, 3, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_7, 0); -lean::inc(x_13); -lean::dec(x_7); -x_14 = l_Lean_Parser_command_declVal_HasView; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_5); -lean::cnstr_set(x_17, 2, x_10); -lean::cnstr_set(x_17, 3, x_16); -return x_17; -} -} -block_81: -{ -obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_20); -if (lean::obj_tag(x_21) == 0) -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_23 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_24 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_25 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_22); -lean::cnstr_set(x_25, 2, x_23); -lean::cnstr_set(x_25, 3, x_24); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_19, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_19, 1); -lean::inc(x_27); -lean::dec(x_19); -x_28 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_5 = x_28; -x_6 = x_26; -x_7 = x_27; -goto block_18; -} -} -else -{ -uint8 x_29; -x_29 = !lean::is_exclusive(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_21, 0); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -lean::free_heap_obj(x_21); -x_32 = lean::box(0); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_34 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_35 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_35, 0, x_4); -lean::cnstr_set(x_35, 1, x_32); -lean::cnstr_set(x_35, 2, x_33); -lean::cnstr_set(x_35, 3, x_34); -return x_35; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_19, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_19, 1); -lean::inc(x_37); -lean::dec(x_19); -x_5 = x_32; -x_6 = x_36; -x_7 = x_37; -goto block_18; -} -} -else -{ -obj* x_38; -x_38 = lean::cnstr_get(x_31, 1); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_39 = lean::cnstr_get(x_31, 0); -lean::inc(x_39); -lean::dec(x_31); -x_40 = l_Lean_Parser_command_identUnivParams_HasView; -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::apply_1(x_41, x_39); -lean::cnstr_set(x_21, 0, x_42); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; -x_43 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_44 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_45 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_45, 0, x_4); -lean::cnstr_set(x_45, 1, x_21); -lean::cnstr_set(x_45, 2, x_43); -lean::cnstr_set(x_45, 3, x_44); -return x_45; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_19, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_19, 1); -lean::inc(x_47); -lean::dec(x_19); -x_5 = x_21; -x_6 = x_46; -x_7 = x_47; -goto block_18; -} -} -else -{ -lean::dec(x_38); -lean::dec(x_31); -lean::free_heap_obj(x_21); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_48 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_49 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_50 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_51 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_51, 0, x_4); -lean::cnstr_set(x_51, 1, x_48); -lean::cnstr_set(x_51, 2, x_49); -lean::cnstr_set(x_51, 3, x_50); -return x_51; -} -else -{ -obj* x_52; obj* x_53; obj* x_54; -x_52 = lean::cnstr_get(x_19, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_19, 1); -lean::inc(x_53); -lean::dec(x_19); -x_54 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_5 = x_54; -x_6 = x_52; -x_7 = x_53; -goto block_18; -} -} -} -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_21, 0); -lean::inc(x_55); -lean::dec(x_21); -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -lean::dec(x_55); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -x_57 = lean::box(0); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_58; obj* x_59; obj* x_60; -x_58 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_59 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_60 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_60, 0, x_4); -lean::cnstr_set(x_60, 1, x_57); -lean::cnstr_set(x_60, 2, x_58); -lean::cnstr_set(x_60, 3, x_59); -return x_60; -} -else -{ -obj* x_61; obj* x_62; -x_61 = lean::cnstr_get(x_19, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_19, 1); -lean::inc(x_62); -lean::dec(x_19); -x_5 = x_57; -x_6 = x_61; -x_7 = x_62; -goto block_18; -} -} -else -{ -obj* x_63; -x_63 = lean::cnstr_get(x_56, 1); -lean::inc(x_63); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_64 = lean::cnstr_get(x_56, 0); -lean::inc(x_64); -lean::dec(x_56); -x_65 = l_Lean_Parser_command_identUnivParams_HasView; -x_66 = lean::cnstr_get(x_65, 0); -lean::inc(x_66); -x_67 = lean::apply_1(x_66, x_64); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_69; obj* x_70; obj* x_71; -x_69 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_70 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_71 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_71, 0, x_4); -lean::cnstr_set(x_71, 1, x_68); -lean::cnstr_set(x_71, 2, x_69); -lean::cnstr_set(x_71, 3, x_70); -return x_71; -} -else -{ -obj* x_72; obj* x_73; -x_72 = lean::cnstr_get(x_19, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_19, 1); -lean::inc(x_73); -lean::dec(x_19); -x_5 = x_68; -x_6 = x_72; -x_7 = x_73; -goto block_18; -} -} -else -{ -lean::dec(x_63); -lean::dec(x_56); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_74 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_75 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_76 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_77 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_77, 0, x_4); -lean::cnstr_set(x_77, 1, x_74); -lean::cnstr_set(x_77, 2, x_75); -lean::cnstr_set(x_77, 3, x_76); -return x_77; -} -else -{ -obj* x_78; obj* x_79; obj* x_80; -x_78 = lean::cnstr_get(x_19, 0); -lean::inc(x_78); -x_79 = lean::cnstr_get(x_19, 1); -lean::inc(x_79); -lean::dec(x_19); -x_80 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1; -x_5 = x_80; -x_6 = x_78; -x_7 = x_79; -goto block_18; -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_instance_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_instance_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_instance_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_instance_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_instance_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_example() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("example"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_example_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_command_declSig_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = l_Lean_Parser_command_declVal_HasView; -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -x_10 = lean::apply_1(x_9, x_4); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::box(3); -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_command_example; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = lean::cnstr_get(x_2, 0); -lean::inc(x_18); -lean::dec(x_2); -x_19 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_13); -x_21 = l_Lean_Parser_command_example; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_declSig_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = l_Lean_Parser_command_declVal_HasView; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_4); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_command_example_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_16; obj* x_17; obj* x_30; -x_30 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; -x_31 = l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__2; -return x_31; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = lean::box(3); -x_16 = x_33; -x_17 = x_34; -goto block_29; -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_33, 1); -lean::inc(x_36); -lean::dec(x_33); -x_16 = x_36; -x_17 = x_35; -goto block_29; -} -} -block_15: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_declSig_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_4, 0); -lean::inc(x_10); -lean::dec(x_4); -x_11 = l_Lean_Parser_command_declVal_HasView; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_10); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_7); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -} -block_29: -{ -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -lean::dec(x_17); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; -x_20 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_21 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_20); -lean::cnstr_set(x_22, 2, x_21); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_16, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_16, 1); -lean::inc(x_24); -lean::dec(x_16); -x_2 = x_19; -x_3 = x_23; -x_4 = x_24; -goto block_15; -} -} -else -{ -lean::dec(x_17); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_25; -x_25 = l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_16, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_16, 1); -lean::inc(x_27); -lean::dec(x_16); -x_28 = lean::box(0); -x_2 = x_28; -x_3 = x_26; -x_4 = x_27; -goto block_15; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_example_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_example_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_example_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_example_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_example_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_constantKeyword() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("constantKeyword"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_constantKeyword; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_4); -x_10 = l_Lean_Parser_command_constantKeyword; -x_11 = l_Lean_Parser_Syntax_mkNode(x_10, x_9); -return x_11; -} -} -} -obj* _init_l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::box(0); -return x_1; -} -} -obj* _init_l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("constantKeyword"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -lean::dec(x_17); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_21, x_22); -lean::dec(x_21); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_24 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_25; -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_20, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 0); -lean::inc(x_27); -lean::dec(x_20); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -lean::dec(x_27); -lean::cnstr_set(x_13, 0, x_28); -return x_13; -} -else -{ -obj* x_29; -lean::dec(x_27); -lean::free_heap_obj(x_13); -x_29 = lean::box(0); -return x_29; -} -} -else -{ -obj* x_30; -lean::dec(x_26); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_30 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_30; -} -} -} -} -} -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_13, 0); -lean::inc(x_31); -lean::dec(x_13); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -switch (lean::obj_tag(x_32)) { -case 0: -{ -obj* x_33; -lean::dec(x_31); -x_33 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_33; -} -case 1: -{ -obj* x_34; -lean::dec(x_32); -lean::dec(x_31); -x_34 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_34; -} -default: -{ -obj* x_35; obj* x_36; obj* x_37; uint8 x_38; -x_35 = lean::cnstr_get(x_31, 1); -lean::inc(x_35); -lean::dec(x_31); -x_36 = lean::cnstr_get(x_32, 0); -lean::inc(x_36); -lean::dec(x_32); -x_37 = lean::box(0); -x_38 = lean_name_dec_eq(x_36, x_37); -lean::dec(x_36); -if (x_38 == 0) -{ -obj* x_39; -lean::dec(x_35); -x_39 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_39; -} -else -{ -if (lean::obj_tag(x_35) == 0) -{ -obj* x_40; -x_40 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_40; -} -else -{ -obj* x_41; -x_41 = lean::cnstr_get(x_35, 1); -lean::inc(x_41); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; -x_42 = lean::cnstr_get(x_35, 0); -lean::inc(x_42); -lean::dec(x_35); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -lean::dec(x_42); -x_44 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -return x_44; -} -else -{ -obj* x_45; -lean::dec(x_42); -x_45 = lean::box(0); -return x_45; -} -} -else -{ -obj* x_46; -lean::dec(x_41); -lean::dec(x_35); -x_46 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_46; -} -} -} -} -} -} -} -} -else -{ -obj* x_47; -lean::dec(x_11); -lean::dec(x_6); -x_47 = l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1; -return x_47; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_constantKeyword_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_constantKeyword_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_constantKeyword_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_axiom() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("axiom"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_axiom_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_command_constantKeyword_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_2); -x_8 = l_Lean_Parser_command_identUnivParams_HasView; -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -x_10 = lean::apply_1(x_9, x_3); -x_11 = l_Lean_Parser_command_declSig_HasView; -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_4); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_10); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_7); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_command_axiom; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -} -obj* _init_l_Lean_Parser_command_axiom_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = l_Lean_Parser_command_constantKeyword_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = l_Lean_Parser_command_identUnivParams_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = l_Lean_Parser_command_declSig_HasView; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::apply_1(x_9, x_3); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_7); -lean::cnstr_set(x_11, 2, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_axiom_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_axiom_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_command_axiom_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -lean::dec(x_5); -x_9 = l_Lean_Parser_command_constantKeyword_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1; -x_13 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_12); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_8, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_8, 1); -lean::inc(x_16); -lean::dec(x_8); -x_17 = l_Lean_Parser_command_identUnivParams_HasView; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -x_19 = lean::apply_1(x_18, x_15); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_20; obj* x_21; -x_20 = l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2; -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_11); -lean::cnstr_set(x_21, 1, x_19); -lean::cnstr_set(x_21, 2, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = lean::cnstr_get(x_16, 0); -lean::inc(x_22); -lean::dec(x_16); -x_23 = l_Lean_Parser_command_declSig_HasView; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::apply_1(x_24, x_22); -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_11); -lean::cnstr_set(x_26, 1, x_19); -lean::cnstr_set(x_26, 2, x_25); -return x_26; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_axiom_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_axiom_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_axiom_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_axiom_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_axiom_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_inductive() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("inductive"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_inductive_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_introRule_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_command_inductive_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 6); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::box(0); -x_10 = l_Lean_Parser_command_identUnivParams_HasView; -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_5); -x_13 = l_Lean_Parser_command_optDeclSig_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_6); -x_16 = l_Lean_Parser_command_inductive_HasView_x27___elambda__1___closed__1; -x_17 = l_List_map___main___rarg(x_16, x_8); -x_18 = l_Lean_Parser_noKind; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_9); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_80; -x_80 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_21 = x_80; -goto block_79; -} -else -{ -obj* x_81; -x_81 = lean::cnstr_get(x_2, 0); -lean::inc(x_81); -lean::dec(x_2); -if (lean::obj_tag(x_81) == 0) -{ -obj* x_82; -x_82 = l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -x_21 = x_82; -goto block_79; -} -else -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_81, 0); -lean::inc(x_83); -lean::dec(x_81); -x_84 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_9); -x_86 = l_Lean_Parser_Syntax_mkNode(x_18, x_85); -x_21 = x_86; -goto block_79; -} -} -block_79: -{ -obj* x_22; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_76; -x_76 = lean::box(3); -x_22 = x_76; -goto block_75; -} -else -{ -obj* x_77; obj* x_78; -x_77 = lean::cnstr_get(x_3, 0); -lean::inc(x_77); -lean::dec(x_3); -x_78 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_78, 0, x_77); -x_22 = x_78; -goto block_75; -} -block_75: -{ -obj* x_23; obj* x_24; obj* x_25; -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_9); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Syntax_mkNode(x_18, x_24); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_26 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_20); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_25); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_Lean_Parser_command_inductive; -x_33 = l_Lean_Parser_Syntax_mkNode(x_32, x_31); -return x_33; -} -else -{ -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_46; obj* x_47; -x_34 = lean::cnstr_get(x_7, 0); -lean::inc(x_34); -lean::dec(x_7); -x_35 = l_Lean_Parser_command_notationLike_HasView; -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -x_37 = lean::apply_1(x_36, x_34); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_9); -x_39 = l_Lean_Parser_Syntax_mkNode(x_18, 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_20); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_15); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_12); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_25); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_command_inductive; -x_47 = l_Lean_Parser_Syntax_mkNode(x_46, x_45); -return x_47; -} -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_48 = lean::cnstr_get(x_4, 0); -lean::inc(x_48); -lean::dec(x_4); -x_49 = l_Lean_Parser_command_oldUnivParams_HasView; -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -x_51 = lean::apply_1(x_50, x_48); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_9); -x_53 = l_Lean_Parser_Syntax_mkNode(x_18, x_52); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_54 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_20); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_15); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_12); -lean::cnstr_set(x_57, 1, x_56); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_53); -lean::cnstr_set(x_58, 1, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_25); -lean::cnstr_set(x_59, 1, x_58); -x_60 = l_Lean_Parser_command_inductive; -x_61 = l_Lean_Parser_Syntax_mkNode(x_60, x_59); -return x_61; -} -else -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_62 = lean::cnstr_get(x_7, 0); -lean::inc(x_62); -lean::dec(x_7); -x_63 = l_Lean_Parser_command_notationLike_HasView; -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -x_65 = lean::apply_1(x_64, x_62); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_9); -x_67 = l_Lean_Parser_Syntax_mkNode(x_18, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_20); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_15); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_12); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_53); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_25); -lean::cnstr_set(x_72, 1, x_71); -x_73 = l_Lean_Parser_command_inductive; -x_74 = l_Lean_Parser_Syntax_mkNode(x_73, x_72); -return x_74; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_command_introRule_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_introRule_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_notationLike_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_64; obj* x_65; -x_64 = lean::box(3); -x_65 = l_Lean_Parser_Syntax_asNode___main(x_64); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; -x_66 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_66; -goto block_63; -} -else -{ -uint8 x_67; -x_67 = !lean::is_exclusive(x_65); -if (x_67 == 0) -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_65, 0); -x_69 = lean::cnstr_get(x_68, 1); -lean::inc(x_69); -lean::dec(x_68); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -lean::free_heap_obj(x_65); -x_70 = lean::box(0); -x_1 = x_70; -goto block_63; -} -else -{ -obj* x_71; -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -x_72 = lean::cnstr_get(x_69, 0); -lean::inc(x_72); -lean::dec(x_69); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_72, 0); -lean::inc(x_73); -lean::dec(x_72); -lean::cnstr_set(x_65, 0, x_73); -x_74 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_74, 0, x_65); -x_1 = x_74; -goto block_63; -} -else -{ -obj* x_75; -lean::dec(x_72); -lean::free_heap_obj(x_65); -x_75 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_75; -goto block_63; -} -} -else -{ -obj* x_76; -lean::dec(x_71); -lean::dec(x_69); -lean::free_heap_obj(x_65); -x_76 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_76; -goto block_63; -} -} -} -else -{ -obj* x_77; obj* x_78; -x_77 = lean::cnstr_get(x_65, 0); -lean::inc(x_77); -lean::dec(x_65); -x_78 = lean::cnstr_get(x_77, 1); -lean::inc(x_78); -lean::dec(x_77); -if (lean::obj_tag(x_78) == 0) -{ -obj* x_79; -x_79 = lean::box(0); -x_1 = x_79; -goto block_63; -} -else -{ -obj* x_80; -x_80 = lean::cnstr_get(x_78, 1); -lean::inc(x_80); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; -x_81 = lean::cnstr_get(x_78, 0); -lean::inc(x_81); -lean::dec(x_78); -if (lean::obj_tag(x_81) == 0) -{ -obj* x_82; obj* x_83; obj* x_84; -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -lean::dec(x_81); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -x_1 = x_84; -goto block_63; -} -else -{ -obj* x_85; -lean::dec(x_81); -x_85 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_85; -goto block_63; -} -} -else -{ -obj* x_86; -lean::dec(x_80); -lean::dec(x_78); -x_86 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_86; -goto block_63; -} -} -} -} -block_63: -{ -obj* x_2; obj* x_3; obj* x_42; obj* x_43; -x_2 = lean::box(0); -x_42 = lean::box(3); -x_43 = l_Lean_Parser_Syntax_asNode___main(x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_3 = x_44; -goto block_41; -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_43); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_43, 0); -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -lean::dec(x_46); -if (lean::obj_tag(x_47) == 0) -{ -lean::free_heap_obj(x_43); -x_3 = x_2; -goto block_41; -} -else -{ -obj* x_48; -x_48 = lean::cnstr_get(x_47, 1); -lean::inc(x_48); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_49 = lean::cnstr_get(x_47, 0); -lean::inc(x_49); -lean::dec(x_47); -x_50 = l_Lean_Parser_command_oldUnivParams_HasView; -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::apply_1(x_51, x_49); -lean::cnstr_set(x_43, 0, x_52); -x_3 = x_43; -goto block_41; -} -else -{ -obj* x_53; -lean::dec(x_48); -lean::dec(x_47); -lean::free_heap_obj(x_43); -x_53 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_3 = x_53; -goto block_41; -} -} -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_43, 0); -lean::inc(x_54); -lean::dec(x_43); -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -lean::dec(x_54); -if (lean::obj_tag(x_55) == 0) -{ -x_3 = x_2; -goto block_41; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_57 = lean::cnstr_get(x_55, 0); -lean::inc(x_57); -lean::dec(x_55); -x_58 = l_Lean_Parser_command_oldUnivParams_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -x_3 = x_61; -goto block_41; -} -else -{ -obj* x_62; -lean::dec(x_56); -lean::dec(x_55); -x_62 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_3 = x_62; -goto block_41; -} -} -} -} -block_41: -{ -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_21; -x_4 = l_Lean_Parser_command_identUnivParams_HasView; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::box(3); -x_7 = lean::apply_1(x_5, x_6); -x_8 = l_Lean_Parser_command_optDeclSig_HasView; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::apply_1(x_9, x_6); -x_21 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_11 = x_22; -goto block_20; -} -else -{ -uint8 x_23; -x_23 = !lean::is_exclusive(x_21); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_21, 0); -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -lean::dec(x_24); -if (lean::obj_tag(x_25) == 0) -{ -lean::free_heap_obj(x_21); -x_11 = x_2; -goto block_20; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_25, 0); -lean::inc(x_27); -lean::dec(x_25); -x_28 = l_Lean_Parser_command_notationLike_HasView; -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -x_30 = lean::apply_1(x_29, x_27); -lean::cnstr_set(x_21, 0, x_30); -x_11 = x_21; -goto block_20; -} -else -{ -obj* x_31; -lean::dec(x_26); -lean::dec(x_25); -lean::free_heap_obj(x_21); -x_31 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_11 = x_31; -goto block_20; -} -} -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_21, 0); -lean::inc(x_32); -lean::dec(x_21); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -if (lean::obj_tag(x_33) == 0) -{ -x_11 = x_2; -goto block_20; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -lean::dec(x_33); -x_36 = l_Lean_Parser_command_notationLike_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_35); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_11 = x_39; -goto block_20; -} -else -{ -obj* x_40; -lean::dec(x_34); -lean::dec(x_33); -x_40 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_11 = x_40; -goto block_20; -} -} -} -} -block_20: -{ -obj* x_12; -x_12 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; -x_13 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__1; -x_14 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_14, 0, x_1); -lean::cnstr_set(x_14, 1, x_2); -lean::cnstr_set(x_14, 2, x_3); -lean::cnstr_set(x_14, 3, x_7); -lean::cnstr_set(x_14, 4, x_10); -lean::cnstr_set(x_14, 5, x_11); -lean::cnstr_set(x_14, 6, x_13); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_12, 0); -lean::inc(x_15); -lean::dec(x_12); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -lean::dec(x_15); -x_17 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__2; -x_18 = l_List_map___main___rarg(x_17, x_16); -x_19 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_19, 0, x_1); -lean::cnstr_set(x_19, 1, x_2); -lean::cnstr_set(x_19, 2, x_3); -lean::cnstr_set(x_19, 3, x_7); -lean::cnstr_set(x_19, 4, x_10); -lean::cnstr_set(x_19, 5, x_11); -lean::cnstr_set(x_19, 6, x_18); -return x_19; -} -} -} -} -} -} -obj* l_Lean_Parser_command_inductive_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_148; -x_148 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_148) == 0) -{ -obj* x_149; -x_149 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__4; -return x_149; -} -else -{ -obj* x_150; obj* x_151; -x_150 = lean::cnstr_get(x_148, 0); -lean::inc(x_150); -lean::dec(x_148); -x_151 = lean::cnstr_get(x_150, 1); -lean::inc(x_151); -lean::dec(x_150); -if (lean::obj_tag(x_151) == 0) -{ -obj* x_152; -x_152 = lean::box(3); -x_2 = x_151; -x_3 = x_152; -goto block_147; -} -else -{ -obj* x_153; obj* x_154; obj* x_155; -x_153 = lean::cnstr_get(x_151, 0); -lean::inc(x_153); -x_154 = lean::cnstr_get(x_151, 1); -lean::inc(x_154); -lean::dec(x_151); -x_155 = l_Lean_Parser_Syntax_asNode___main(x_153); -if (lean::obj_tag(x_155) == 0) -{ -if (lean::obj_tag(x_154) == 0) -{ -obj* x_156; -x_156 = lean::box(3); -x_2 = x_154; -x_3 = x_156; -goto block_147; -} -else -{ -obj* x_157; obj* x_158; -x_157 = lean::cnstr_get(x_154, 0); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_154, 1); -lean::inc(x_158); -lean::dec(x_154); -x_2 = x_158; -x_3 = x_157; -goto block_147; -} -} -else -{ -obj* x_159; obj* x_160; obj* x_161; -x_159 = lean::cnstr_get(x_155, 0); -lean::inc(x_159); -lean::dec(x_155); -x_160 = lean::cnstr_get(x_159, 1); -lean::inc(x_160); -lean::dec(x_159); -x_161 = l_List_append___rarg(x_160, x_154); -if (lean::obj_tag(x_161) == 0) -{ -obj* x_162; -x_162 = lean::box(3); -x_2 = x_161; -x_3 = x_162; -goto block_147; -} -else -{ -obj* x_163; obj* x_164; -x_163 = lean::cnstr_get(x_161, 0); -lean::inc(x_163); -x_164 = lean::cnstr_get(x_161, 1); -lean::inc(x_164); -lean::dec(x_161); -x_2 = x_164; -x_3 = x_163; -goto block_147; -} -} -} -} -block_147: -{ -obj* x_4; obj* x_125; -x_125 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_125) == 0) -{ -obj* x_126; -x_126 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_126; -goto block_124; -} -else -{ -uint8 x_127; -x_127 = !lean::is_exclusive(x_125); -if (x_127 == 0) -{ -obj* x_128; obj* x_129; -x_128 = lean::cnstr_get(x_125, 0); -x_129 = lean::cnstr_get(x_128, 1); -lean::inc(x_129); -lean::dec(x_128); -if (lean::obj_tag(x_129) == 0) -{ -obj* x_130; -lean::free_heap_obj(x_125); -x_130 = lean::box(0); -x_4 = x_130; -goto block_124; -} -else -{ -obj* x_131; -x_131 = lean::cnstr_get(x_129, 1); -lean::inc(x_131); -if (lean::obj_tag(x_131) == 0) -{ -obj* x_132; -x_132 = lean::cnstr_get(x_129, 0); -lean::inc(x_132); -lean::dec(x_129); -if (lean::obj_tag(x_132) == 0) -{ -obj* x_133; obj* x_134; -x_133 = lean::cnstr_get(x_132, 0); -lean::inc(x_133); -lean::dec(x_132); -lean::cnstr_set(x_125, 0, x_133); -x_134 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_134, 0, x_125); -x_4 = x_134; -goto block_124; -} -else -{ -obj* x_135; -lean::dec(x_132); -lean::free_heap_obj(x_125); -x_135 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_135; -goto block_124; -} -} -else -{ -obj* x_136; -lean::dec(x_131); -lean::dec(x_129); -lean::free_heap_obj(x_125); -x_136 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_136; -goto block_124; -} -} -} -else -{ -obj* x_137; obj* x_138; -x_137 = lean::cnstr_get(x_125, 0); -lean::inc(x_137); -lean::dec(x_125); -x_138 = lean::cnstr_get(x_137, 1); -lean::inc(x_138); -lean::dec(x_137); -if (lean::obj_tag(x_138) == 0) -{ -obj* x_139; -x_139 = lean::box(0); -x_4 = x_139; -goto block_124; -} -else -{ -obj* x_140; -x_140 = lean::cnstr_get(x_138, 1); -lean::inc(x_140); -if (lean::obj_tag(x_140) == 0) -{ -obj* x_141; -x_141 = lean::cnstr_get(x_138, 0); -lean::inc(x_141); -lean::dec(x_138); -if (lean::obj_tag(x_141) == 0) -{ -obj* x_142; obj* x_143; obj* x_144; -x_142 = lean::cnstr_get(x_141, 0); -lean::inc(x_142); -lean::dec(x_141); -x_143 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_143, 0, x_142); -x_144 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_144, 0, x_143); -x_4 = x_144; -goto block_124; -} -else -{ -obj* x_145; -lean::dec(x_141); -x_145 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_145; -goto block_124; -} -} -else -{ -obj* x_146; -lean::dec(x_140); -lean::dec(x_138); -x_146 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_146; -goto block_124; -} -} -} -} -block_124: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_121; -x_121 = lean::box(3); -x_5 = x_2; -x_6 = x_121; -goto block_120; -} -else -{ -obj* x_122; obj* x_123; -x_122 = lean::cnstr_get(x_2, 0); -lean::inc(x_122); -x_123 = lean::cnstr_get(x_2, 1); -lean::inc(x_123); -lean::dec(x_2); -x_5 = x_123; -x_6 = x_122; -goto block_120; -} -block_120: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 0) -{ -obj* x_117; obj* x_118; -x_117 = lean::cnstr_get(x_6, 0); -lean::inc(x_117); -lean::dec(x_6); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -x_7 = x_118; -goto block_116; -} -else -{ -obj* x_119; -lean::dec(x_6); -x_119 = lean::box(0); -x_7 = x_119; -goto block_116; -} -block_116: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_113; -x_113 = lean::box(3); -x_8 = x_5; -x_9 = x_113; -goto block_112; -} -else -{ -obj* x_114; obj* x_115; -x_114 = lean::cnstr_get(x_5, 0); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_5, 1); -lean::inc(x_115); -lean::dec(x_5); -x_8 = x_115; -x_9 = x_114; -goto block_112; -} -block_112: -{ -obj* x_10; obj* x_90; -x_90 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_90) == 0) -{ -obj* x_91; -x_91 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_10 = x_91; -goto block_89; -} -else -{ -uint8 x_92; -x_92 = !lean::is_exclusive(x_90); -if (x_92 == 0) -{ -obj* x_93; obj* x_94; -x_93 = lean::cnstr_get(x_90, 0); -x_94 = lean::cnstr_get(x_93, 1); -lean::inc(x_94); -lean::dec(x_93); -if (lean::obj_tag(x_94) == 0) -{ -obj* x_95; -lean::free_heap_obj(x_90); -x_95 = lean::box(0); -x_10 = x_95; -goto block_89; -} -else -{ -obj* x_96; -x_96 = lean::cnstr_get(x_94, 1); -lean::inc(x_96); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_97 = lean::cnstr_get(x_94, 0); -lean::inc(x_97); -lean::dec(x_94); -x_98 = l_Lean_Parser_command_oldUnivParams_HasView; -x_99 = lean::cnstr_get(x_98, 0); -lean::inc(x_99); -x_100 = lean::apply_1(x_99, x_97); -lean::cnstr_set(x_90, 0, x_100); -x_10 = x_90; -goto block_89; -} -else -{ -obj* x_101; -lean::dec(x_96); -lean::dec(x_94); -lean::free_heap_obj(x_90); -x_101 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_10 = x_101; -goto block_89; -} -} -} -else -{ -obj* x_102; obj* x_103; -x_102 = lean::cnstr_get(x_90, 0); -lean::inc(x_102); -lean::dec(x_90); -x_103 = lean::cnstr_get(x_102, 1); -lean::inc(x_103); -lean::dec(x_102); -if (lean::obj_tag(x_103) == 0) -{ -obj* x_104; -x_104 = lean::box(0); -x_10 = x_104; -goto block_89; -} -else -{ -obj* x_105; -x_105 = lean::cnstr_get(x_103, 1); -lean::inc(x_105); -if (lean::obj_tag(x_105) == 0) -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -x_106 = lean::cnstr_get(x_103, 0); -lean::inc(x_106); -lean::dec(x_103); -x_107 = l_Lean_Parser_command_oldUnivParams_HasView; -x_108 = lean::cnstr_get(x_107, 0); -lean::inc(x_108); -x_109 = lean::apply_1(x_108, x_106); -x_110 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_110, 0, x_109); -x_10 = x_110; -goto block_89; -} -else -{ -obj* x_111; -lean::dec(x_105); -lean::dec(x_103); -x_111 = l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5; -x_10 = x_111; -goto block_89; -} -} -} -} -block_89: -{ -obj* x_11; obj* x_12; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_86; -x_86 = lean::box(3); -x_11 = x_8; -x_12 = x_86; -goto block_85; -} -else -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_8, 0); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_8, 1); -lean::inc(x_88); -lean::dec(x_8); -x_11 = x_88; -x_12 = x_87; -goto block_85; -} -block_85: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = l_Lean_Parser_command_identUnivParams_HasView; -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_12); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_82; -x_82 = lean::box(3); -x_16 = x_11; -x_17 = x_82; -goto block_81; -} -else -{ -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_11, 0); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_11, 1); -lean::inc(x_84); -lean::dec(x_11); -x_16 = x_84; -x_17 = x_83; -goto block_81; -} -block_81: -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_32; obj* x_33; obj* x_43; obj* x_44; -x_18 = l_Lean_Parser_command_optDeclSig_HasView; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::apply_1(x_19, x_17); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_78; -x_78 = lean::box(3); -x_43 = x_16; -x_44 = x_78; -goto block_77; -} -else -{ -obj* x_79; obj* x_80; -x_79 = lean::cnstr_get(x_16, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_16, 1); -lean::inc(x_80); -lean::dec(x_16); -x_43 = x_80; -x_44 = x_79; -goto block_77; -} -block_31: -{ -obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = l_Lean_Parser_Syntax_asNode___main(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_7); -lean::cnstr_set(x_25, 2, x_10); -lean::cnstr_set(x_25, 3, x_15); -lean::cnstr_set(x_25, 4, x_20); -lean::cnstr_set(x_25, 5, x_21); -lean::cnstr_set(x_25, 6, x_24); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -lean::dec(x_23); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -x_28 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__2; -x_29 = l_List_map___main___rarg(x_28, x_27); -x_30 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_30, 0, x_4); -lean::cnstr_set(x_30, 1, x_7); -lean::cnstr_set(x_30, 2, x_10); -lean::cnstr_set(x_30, 3, x_15); -lean::cnstr_set(x_30, 4, x_20); -lean::cnstr_set(x_30, 5, x_21); -lean::cnstr_set(x_30, 6, x_29); -return x_30; -} -} -block_42: -{ -obj* x_34; -x_34 = l_Lean_Parser_Syntax_asNode___main(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; -x_35 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_36, 0, x_4); -lean::cnstr_set(x_36, 1, x_7); -lean::cnstr_set(x_36, 2, x_10); -lean::cnstr_set(x_36, 3, x_15); -lean::cnstr_set(x_36, 4, x_20); -lean::cnstr_set(x_36, 5, x_32); -lean::cnstr_set(x_36, 6, x_35); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = lean::cnstr_get(x_34, 0); -lean::inc(x_37); -lean::dec(x_34); -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -lean::dec(x_37); -x_39 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__2; -x_40 = l_List_map___main___rarg(x_39, x_38); -x_41 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_41, 0, x_4); -lean::cnstr_set(x_41, 1, x_7); -lean::cnstr_set(x_41, 2, x_10); -lean::cnstr_set(x_41, 3, x_15); -lean::cnstr_set(x_41, 4, x_20); -lean::cnstr_set(x_41, 5, x_32); -lean::cnstr_set(x_41, 6, x_40); -return x_41; -} -} -block_77: -{ -obj* x_45; -x_45 = l_Lean_Parser_Syntax_asNode___main(x_44); -if (lean::obj_tag(x_45) == 0) -{ -if (lean::obj_tag(x_43) == 0) -{ -obj* x_46; -x_46 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_21 = x_46; -goto block_31; -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_32 = x_48; -x_33 = x_47; -goto block_42; -} -} -else -{ -uint8 x_49; -x_49 = !lean::is_exclusive(x_45); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; -x_50 = lean::cnstr_get(x_45, 0); -x_51 = lean::cnstr_get(x_50, 1); -lean::inc(x_51); -lean::dec(x_50); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; -lean::free_heap_obj(x_45); -x_52 = lean::box(0); -if (lean::obj_tag(x_43) == 0) -{ -x_21 = x_52; -goto block_31; -} -else -{ -obj* x_53; -x_53 = lean::cnstr_get(x_43, 0); -lean::inc(x_53); -lean::dec(x_43); -x_32 = x_52; -x_33 = x_53; -goto block_42; -} -} -else -{ -obj* x_54; -x_54 = lean::cnstr_get(x_51, 1); -lean::inc(x_54); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_55 = lean::cnstr_get(x_51, 0); -lean::inc(x_55); -lean::dec(x_51); -x_56 = l_Lean_Parser_command_notationLike_HasView; -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -x_58 = lean::apply_1(x_57, x_55); -lean::cnstr_set(x_45, 0, x_58); -if (lean::obj_tag(x_43) == 0) -{ -x_21 = x_45; -goto block_31; -} -else -{ -obj* x_59; -x_59 = lean::cnstr_get(x_43, 0); -lean::inc(x_59); -lean::dec(x_43); -x_32 = x_45; -x_33 = x_59; -goto block_42; -} -} -else -{ -lean::dec(x_54); -lean::dec(x_51); -lean::free_heap_obj(x_45); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_60; -x_60 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_21 = x_60; -goto block_31; -} -else -{ -obj* x_61; obj* x_62; -x_61 = lean::cnstr_get(x_43, 0); -lean::inc(x_61); -lean::dec(x_43); -x_62 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_32 = x_62; -x_33 = x_61; -goto block_42; -} -} -} -} -else -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_45, 0); -lean::inc(x_63); -lean::dec(x_45); -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -lean::dec(x_63); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; -x_65 = lean::box(0); -if (lean::obj_tag(x_43) == 0) -{ -x_21 = x_65; -goto block_31; -} -else -{ -obj* x_66; -x_66 = lean::cnstr_get(x_43, 0); -lean::inc(x_66); -lean::dec(x_43); -x_32 = x_65; -x_33 = x_66; -goto block_42; -} -} -else -{ -obj* x_67; -x_67 = lean::cnstr_get(x_64, 1); -lean::inc(x_67); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_68 = lean::cnstr_get(x_64, 0); -lean::inc(x_68); -lean::dec(x_64); -x_69 = l_Lean_Parser_command_notationLike_HasView; -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -x_71 = lean::apply_1(x_70, x_68); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -if (lean::obj_tag(x_43) == 0) -{ -x_21 = x_72; -goto block_31; -} -else -{ -obj* x_73; -x_73 = lean::cnstr_get(x_43, 0); -lean::inc(x_73); -lean::dec(x_43); -x_32 = x_72; -x_33 = x_73; -goto block_42; -} -} -else -{ -lean::dec(x_67); -lean::dec(x_64); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_74; -x_74 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_21 = x_74; -goto block_31; -} -else -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_43, 0); -lean::inc(x_75); -lean::dec(x_43); -x_76 = l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3; -x_32 = x_76; -x_33 = x_75; -goto block_42; -} -} -} -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_inductive_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inductive_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_inductive_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_inductive_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_inductive_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_declaration_inner() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("declaration"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("inner"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_declaration_inner_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_defLike_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_declaration_inner; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -case 1: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_command_instance_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_declaration_inner; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -case 2: -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -lean::dec(x_1); -x_24 = l_Lean_Parser_command_example_HasView; -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_2); -x_31 = l_Lean_Parser_command_declaration_inner; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -case 3: -{ -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; -x_33 = lean::cnstr_get(x_1, 0); -lean::inc(x_33); -lean::dec(x_1); -x_34 = l_Lean_Parser_command_axiom_HasView; -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_33); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_2); -x_38 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_2); -x_41 = l_Lean_Parser_command_declaration_inner; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -case 4: -{ -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; -x_43 = lean::cnstr_get(x_1, 0); -lean::inc(x_43); -lean::dec(x_1); -x_44 = l_Lean_Parser_command_inductive_HasView; -x_45 = lean::cnstr_get(x_44, 1); -lean::inc(x_45); -x_46 = lean::apply_1(x_45, x_43); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_2); -x_48 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6; -x_49 = l_Lean_Parser_Syntax_mkNode(x_48, x_47); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_2); -x_51 = l_Lean_Parser_command_declaration_inner; -x_52 = l_Lean_Parser_Syntax_mkNode(x_51, x_50); -return x_52; -} -default: -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_53 = lean::cnstr_get(x_1, 0); -lean::inc(x_53); -lean::dec(x_1); -x_54 = l_Lean_Parser_command_structure_HasView; -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -x_56 = lean::apply_1(x_55, x_53); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_2); -x_58 = l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__3; -x_59 = l_Lean_Parser_Syntax_mkNode(x_58, x_57); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_2); -x_61 = l_Lean_Parser_command_declaration_inner; -x_62 = l_Lean_Parser_Syntax_mkNode(x_61, x_60); -return x_62; -} -} -} -} -obj* _init_l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_defLike_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("declaration"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("inner"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_dec_eq(x_21, x_30); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::mk_nat_obj(2u); -x_33 = lean::nat_dec_eq(x_21, x_32); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::mk_nat_obj(3u); -x_35 = lean::nat_dec_eq(x_21, x_34); -if (x_35 == 0) -{ -obj* x_36; uint8 x_37; -x_36 = lean::mk_nat_obj(4u); -x_37 = lean::nat_dec_eq(x_21, x_36); -lean::dec(x_21); -if (x_37 == 0) -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = l_Lean_Parser_command_structure_HasView; -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::apply_1(x_39, x_27); -x_41 = lean::alloc_cnstr(5, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -return x_41; -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_42 = l_Lean_Parser_command_inductive_HasView; -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::apply_1(x_43, x_27); -x_45 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -lean::dec(x_21); -x_46 = l_Lean_Parser_command_axiom_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_27); -x_49 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -return x_49; -} -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; -lean::dec(x_21); -x_50 = l_Lean_Parser_command_example_HasView; -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::apply_1(x_51, x_27); -x_53 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -return x_53; -} -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; -lean::dec(x_21); -x_54 = l_Lean_Parser_command_instance_HasView; -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -x_56 = lean::apply_1(x_55, x_27); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -return x_57; -} -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; -lean::dec(x_21); -x_58 = l_Lean_Parser_command_defLike_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_27); -x_61 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -else -{ -obj* x_62; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_62 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_62; -} -} -} -} -} -} -} -else -{ -obj* x_63; -lean::dec(x_11); -lean::dec(x_6); -x_63 = l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1; -return x_63; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declaration_inner_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_inner_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_declaration_inner_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_declaration_inner_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_declaration() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("declaration"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_declaration_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_declModifiers_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_2); -x_7 = l_Lean_Parser_command_declaration_inner_HasView; -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_3); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_command_declaration; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -obj* _init_l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__1() { -_start: -{ -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_1 = l_Lean_Parser_command_declModifiers_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = l_Lean_Parser_command_declaration_inner_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_declaration_inner_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_command_declaration_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -lean::dec(x_5); -x_9 = l_Lean_Parser_command_declModifiers_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_12; obj* x_13; -x_12 = l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__2; -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_8, 0); -lean::inc(x_14); -lean::dec(x_8); -x_15 = l_Lean_Parser_command_declaration_inner_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -return x_18; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_declaration_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_declaration_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_declaration_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_1 = lean::mk_string("def"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_string("abbreviation"); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = lean::mk_string("abbrev"); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_2); -lean::dec(x_6); -x_8 = lean::mk_string("theorem"); -x_9 = l_Lean_Parser_symbol_tokens___rarg(x_8, x_2); -lean::dec(x_8); -x_10 = lean::mk_string("constant"); -x_11 = l_Lean_Parser_symbol_tokens___rarg(x_10, x_2); -lean::dec(x_10); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_12); -lean::dec(x_11); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_13); -lean::dec(x_13); -lean::dec(x_9); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_14); -lean::dec(x_14); -lean::dec(x_7); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_15); -lean::dec(x_15); -lean::dec(x_5); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_16); -lean::dec(x_16); -lean::dec(x_3); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_18, x_12); -lean::dec(x_18); -x_20 = l_Lean_Parser_tokens___rarg(x_19); -lean::dec(x_19); -x_21 = l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasTokens; -x_22 = l_Lean_Parser_tokens___rarg(x_21); -x_23 = l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasTokens; -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_23, x_12); -x_25 = l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens; -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_25, x_24); -x_27 = l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasTokens; -x_28 = l_Lean_Parser_List_cons_tokens___rarg(x_27, x_26); -lean::dec(x_26); -x_29 = l_Lean_Parser_List_cons_tokens___rarg(x_22, x_28); -lean::dec(x_28); -x_30 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_29); -lean::dec(x_29); -lean::dec(x_20); -x_31 = l_Lean_Parser_tokens___rarg(x_30); -lean::dec(x_30); -x_32 = lean::mk_string("instance"); -x_33 = l_Lean_Parser_symbol_tokens___rarg(x_32, x_2); -lean::dec(x_32); -x_34 = l_Lean_Parser_tokens___rarg(x_27); -x_35 = l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasTokens; -x_36 = l_Lean_Parser_List_cons_tokens___rarg(x_35, x_24); -lean::dec(x_24); -x_37 = l_Lean_Parser_List_cons_tokens___rarg(x_34, x_36); -lean::dec(x_34); -x_38 = l_Lean_Parser_List_cons_tokens___rarg(x_33, x_37); -lean::dec(x_37); -lean::dec(x_33); -x_39 = l_Lean_Parser_tokens___rarg(x_38); -lean::dec(x_38); -x_40 = lean::mk_string("example"); -x_41 = l_Lean_Parser_symbol_tokens___rarg(x_40, x_2); -lean::dec(x_40); -x_42 = l_Lean_Parser_List_cons_tokens___rarg(x_41, x_36); -lean::dec(x_36); -lean::dec(x_41); -x_43 = l_Lean_Parser_tokens___rarg(x_42); -lean::dec(x_42); -x_44 = lean::mk_string("axiom"); -x_45 = l_Lean_Parser_symbol_tokens___rarg(x_44, x_2); -lean::dec(x_44); -x_46 = l_Lean_Parser_List_cons_tokens___rarg(x_45, x_12); -lean::dec(x_45); -x_47 = l_Lean_Parser_tokens___rarg(x_46); -lean::dec(x_46); -x_48 = l_Lean_Parser_List_cons_tokens___rarg(x_47, x_12); -lean::dec(x_47); -x_49 = l_Lean_Parser_tokens___rarg(x_48); -lean::dec(x_48); -x_50 = l_Lean_Parser_List_cons_tokens___rarg(x_35, x_12); -x_51 = l_Lean_Parser_List_cons_tokens___rarg(x_27, x_50); -lean::dec(x_50); -x_52 = l_Lean_Parser_List_cons_tokens___rarg(x_49, x_51); -lean::dec(x_51); -lean::dec(x_49); -x_53 = l_Lean_Parser_tokens___rarg(x_52); -lean::dec(x_52); -x_54 = lean::mk_string("class"); -x_55 = l_Lean_Parser_symbol_tokens___rarg(x_54, x_2); -lean::dec(x_54); -x_56 = l_Lean_Parser_tokens___rarg(x_55); -lean::dec(x_55); -x_57 = lean::mk_string("inductive"); -x_58 = l_Lean_Parser_symbol_tokens___rarg(x_57, x_2); -lean::dec(x_57); -x_59 = l_Lean_Parser_List_cons_tokens___rarg(x_58, x_12); -lean::dec(x_58); -x_60 = l_Lean_Parser_List_cons_tokens___rarg(x_56, x_59); -lean::dec(x_59); -lean::dec(x_56); -x_61 = l_Lean_Parser_tokens___rarg(x_60); -lean::dec(x_60); -x_62 = l_Lean_Parser_tokens___rarg(x_61); -lean::dec(x_61); -x_63 = l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens; -x_64 = l_Lean_Parser_tokens___rarg(x_63); -x_65 = l_Lean_Parser_tokens___rarg(x_64); -lean::dec(x_64); -x_66 = l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens; -x_67 = l_Lean_Parser_tokens___rarg(x_66); -x_68 = l_Lean_Parser_List_cons_tokens___rarg(x_67, x_12); -lean::dec(x_67); -x_69 = l_Lean_Parser_List_cons_tokens___rarg(x_65, x_68); -lean::dec(x_68); -lean::dec(x_65); -x_70 = l_Lean_Parser_List_cons_tokens___rarg(x_25, x_69); -lean::dec(x_69); -x_71 = l_Lean_Parser_List_cons_tokens___rarg(x_27, x_70); -lean::dec(x_70); -x_72 = l_Lean_Parser_List_cons_tokens___rarg(x_22, x_71); -lean::dec(x_71); -lean::dec(x_22); -x_73 = l_Lean_Parser_List_cons_tokens___rarg(x_62, x_72); -lean::dec(x_72); -lean::dec(x_62); -x_74 = l_Lean_Parser_tokens___rarg(x_73); -lean::dec(x_73); -x_75 = l_Lean_Parser_command_structure_Parser_Lean_Parser_HasTokens; -x_76 = l_Lean_Parser_List_cons_tokens___rarg(x_75, x_12); -x_77 = l_Lean_Parser_List_cons_tokens___rarg(x_74, x_76); -lean::dec(x_76); -lean::dec(x_74); -x_78 = l_Lean_Parser_List_cons_tokens___rarg(x_53, x_77); -lean::dec(x_77); -lean::dec(x_53); -x_79 = l_Lean_Parser_List_cons_tokens___rarg(x_43, x_78); -lean::dec(x_78); -lean::dec(x_43); -x_80 = l_Lean_Parser_List_cons_tokens___rarg(x_39, x_79); -lean::dec(x_79); -lean::dec(x_39); -x_81 = l_Lean_Parser_List_cons_tokens___rarg(x_31, x_80); -lean::dec(x_80); -lean::dec(x_31); -x_82 = l_Lean_Parser_tokens___rarg(x_81); -lean::dec(x_81); -x_83 = l_Lean_Parser_List_cons_tokens___rarg(x_82, x_12); -lean::dec(x_82); -x_84 = l_Lean_Parser_tokens___rarg(x_83); -lean::dec(x_83); -x_85 = l_Lean_Parser_List_cons_tokens___rarg(x_84, x_12); -lean::dec(x_84); -x_86 = l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens; -x_87 = l_Lean_Parser_List_cons_tokens___rarg(x_86, x_85); -lean::dec(x_85); -x_88 = l_Lean_Parser_tokens___rarg(x_87); -lean::dec(x_87); -return x_88; -} -} -obj* l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_6, x_1, x_2, x_3, x_4, x_5); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_9); -lean::cnstr_set(x_7, 0, x_10); -return x_7; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_7, 0); -x_12 = lean::cnstr_get(x_7, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_7); -x_13 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_11); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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; uint8 x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_1 = l_Lean_Parser_CommandParserM_Monad(lean::box(0)); -x_2 = l_Lean_Parser_CommandParserM_MonadExcept(lean::box(0)); -x_3 = l_Lean_Parser_CommandParserM_Lean_Parser_MonadParsec(lean::box(0)); -x_4 = l_Lean_Parser_CommandParserM_Alternative(lean::box(0)); -x_5 = lean::mk_string("def"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::mk_string("abbreviation"); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_8); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::mk_string("abbrev"); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_8); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::mk_string("theorem"); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_8); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::mk_string("constant"); -x_23 = l_String_trim(x_22); -lean::dec(x_22); -lean::inc(x_23); -x_24 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_24, 0, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_8); -lean::closure_set(x_25, 2, x_24); -x_26 = lean::box(0); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_21); -lean::cnstr_set(x_28, 1, x_27); -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_13); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_9); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_32, 0, x_31); -lean::closure_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_26); -x_34 = l_Lean_Parser_command_defLike_kind; -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_35, 0, x_34); -lean::closure_set(x_35, 1, x_33); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_oldUnivParams_Parser), 4, 0); -x_37 = 0; -x_38 = lean::box(x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_39, 0, x_36); -lean::closure_set(x_39, 1, x_38); -x_40 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declVal_Parser), 4, 0); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_26); -x_42 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_Parser), 4, 0); -lean::inc(x_41); -lean::inc(x_42); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_41); -x_44 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_identUnivParams_Parser), 4, 0); -lean::inc(x_44); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_43); -lean::inc(x_39); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_39); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_35); -lean::cnstr_set(x_47, 1, x_46); -x_48 = l_Lean_Parser_command_defLike; -x_49 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_49, 0, x_48); -lean::closure_set(x_49, 1, x_47); -x_50 = lean::mk_string("instance"); -x_51 = l_String_trim(x_50); -lean::dec(x_50); -lean::inc(x_51); -x_52 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_52, 0, x_51); -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_53, 0, x_51); -lean::closure_set(x_53, 1, x_8); -lean::closure_set(x_53, 2, x_52); -x_54 = lean::box(x_37); -lean::inc(x_44); -x_55 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_55, 0, x_44); -lean::closure_set(x_55, 1, x_54); -x_56 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declSig_Parser), 4, 0); -lean::inc(x_56); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_41); -lean::inc(x_57); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_55); -lean::cnstr_set(x_58, 1, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_53); -lean::cnstr_set(x_59, 1, x_58); -x_60 = l_Lean_Parser_command_instance; -x_61 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_61, 0, x_60); -lean::closure_set(x_61, 1, x_59); -x_62 = lean::mk_string("example"); -x_63 = l_String_trim(x_62); -lean::dec(x_62); -lean::inc(x_63); -x_64 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_64, 0, x_63); -x_65 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_65, 0, x_63); -lean::closure_set(x_65, 1, x_8); -lean::closure_set(x_65, 2, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_57); -x_67 = l_Lean_Parser_command_example; -x_68 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_68, 0, x_67); -lean::closure_set(x_68, 1, x_66); -x_69 = lean::mk_string("axiom"); -x_70 = l_String_trim(x_69); -lean::dec(x_69); -lean::inc(x_70); -x_71 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_71, 0, x_70); -x_72 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_72, 0, x_70); -lean::closure_set(x_72, 1, x_8); -lean::closure_set(x_72, 2, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_26); -x_74 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_74, 0, x_73); -lean::closure_set(x_74, 1, x_8); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_26); -x_76 = l_Lean_Parser_command_constantKeyword; -x_77 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_77, 0, x_76); -lean::closure_set(x_77, 1, x_75); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_56); -lean::cnstr_set(x_78, 1, x_26); -lean::inc(x_44); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_44); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_77); -lean::cnstr_set(x_80, 1, x_79); -x_81 = l_Lean_Parser_command_axiom; -x_82 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_82, 0, x_81); -lean::closure_set(x_82, 1, x_80); -x_83 = lean::mk_string("class"); -x_84 = l_String_trim(x_83); -lean::dec(x_83); -lean::inc(x_84); -x_85 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_85, 0, x_84); -x_86 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_86, 0, x_84); -lean::closure_set(x_86, 1, x_8); -lean::closure_set(x_86, 2, x_85); -x_87 = lean::box(x_37); -x_88 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_88, 0, x_86); -lean::closure_set(x_88, 1, x_87); -x_89 = lean::mk_string("inductive"); -x_90 = l_String_trim(x_89); -lean::dec(x_89); -lean::inc(x_90); -x_91 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_91, 0, x_90); -x_92 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_92, 0, x_90); -lean::closure_set(x_92, 1, x_8); -lean::closure_set(x_92, 2, x_91); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set(x_93, 1, x_26); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_88); -lean::cnstr_set(x_94, 1, x_93); -x_95 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_95, 0, x_94); -x_96 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notationLike_Parser), 5, 0); -x_97 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_97, 0, x_96); -x_98 = lean::box(x_37); -x_99 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_99, 0, x_97); -lean::closure_set(x_99, 1, x_98); -x_100 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_introRule_Parser), 4, 0); -x_101 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_101, 0, x_100); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_26); -x_103 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_103, 0, x_99); -lean::cnstr_set(x_103, 1, x_102); -x_104 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_104, 0, x_42); -lean::cnstr_set(x_104, 1, x_103); -x_105 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_105, 0, x_44); -lean::cnstr_set(x_105, 1, x_104); -x_106 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_106, 0, x_39); -lean::cnstr_set(x_106, 1, x_105); -x_107 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_107, 0, x_95); -lean::cnstr_set(x_107, 1, x_106); -x_108 = l_Lean_Parser_command_inductive; -x_109 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_109, 0, x_108); -lean::closure_set(x_109, 1, x_107); -x_110 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structure_Parser), 4, 0); -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_26); -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_109); -lean::cnstr_set(x_112, 1, x_111); -x_113 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_113, 0, x_82); -lean::cnstr_set(x_113, 1, x_112); -x_114 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_114, 0, x_68); -lean::cnstr_set(x_114, 1, x_113); -x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_61); -lean::cnstr_set(x_115, 1, x_114); -x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_49); -lean::cnstr_set(x_116, 1, x_115); -x_117 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_117, 0, x_116); -lean::closure_set(x_117, 1, x_8); -x_118 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_118, 0, x_117); -lean::cnstr_set(x_118, 1, x_26); -x_119 = l_Lean_Parser_command_declaration_inner; -x_120 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_120, 0, x_119); -lean::closure_set(x_120, 1, x_118); -x_121 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_121, 0, x_120); -lean::cnstr_set(x_121, 1, x_26); -x_122 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declModifiers_Parser), 4, 0); -x_123 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_121); -x_124 = l_Lean_Parser_command_declaration; -x_125 = l_Lean_Parser_command_declaration_HasView; -x_126 = l_Lean_Parser_Combinators_node_view___rarg(x_1, x_2, x_3, x_4, x_124, x_123, x_125); -lean::dec(x_123); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_126; -} -} -obj* _init_l_Lean_Parser_command_declaration_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; uint8 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_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_1 = lean::mk_string("def"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("abbreviation"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::mk_string("abbrev"); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_4); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::mk_string("theorem"); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::mk_string("constant"); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_17); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_9); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_5); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_28, 0, x_27); -lean::closure_set(x_28, 1, x_4); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_22); -x_30 = l_Lean_Parser_command_defLike_kind; -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_31, 0, x_30); -lean::closure_set(x_31, 1, x_29); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_oldUnivParams_Parser), 4, 0); -x_33 = 0; -x_34 = lean::box(x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_35, 0, x_32); -lean::closure_set(x_35, 1, x_34); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declVal_Parser), 4, 0); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_22); -x_38 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_optDeclSig_Parser), 4, 0); -lean::inc(x_37); -lean::inc(x_38); -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_closure(reinterpret_cast(l_Lean_Parser_command_identUnivParams_Parser), 4, 0); -lean::inc(x_40); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_39); -lean::inc(x_35); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_35); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_31); -lean::cnstr_set(x_43, 1, x_42); -x_44 = l_Lean_Parser_command_defLike; -x_45 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_45, 0, x_44); -lean::closure_set(x_45, 1, x_43); -x_46 = lean::mk_string("instance"); -x_47 = l_String_trim(x_46); -lean::dec(x_46); -lean::inc(x_47); -x_48 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_48, 0, x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_49, 0, x_47); -lean::closure_set(x_49, 1, x_4); -lean::closure_set(x_49, 2, x_48); -x_50 = lean::box(x_33); -lean::inc(x_40); -x_51 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_51, 0, x_40); -lean::closure_set(x_51, 1, x_50); -x_52 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declSig_Parser), 4, 0); -lean::inc(x_52); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_37); -lean::inc(x_53); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_51); -lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_49); -lean::cnstr_set(x_55, 1, x_54); -x_56 = l_Lean_Parser_command_instance; -x_57 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_57, 0, x_56); -lean::closure_set(x_57, 1, x_55); -x_58 = lean::mk_string("example"); -x_59 = l_String_trim(x_58); -lean::dec(x_58); -lean::inc(x_59); -x_60 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_60, 0, x_59); -x_61 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_61, 0, x_59); -lean::closure_set(x_61, 1, x_4); -lean::closure_set(x_61, 2, x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_53); -x_63 = l_Lean_Parser_command_example; -x_64 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_64, 0, x_63); -lean::closure_set(x_64, 1, x_62); -x_65 = lean::mk_string("axiom"); -x_66 = l_String_trim(x_65); -lean::dec(x_65); -lean::inc(x_66); -x_67 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_67, 0, x_66); -x_68 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_68, 0, x_66); -lean::closure_set(x_68, 1, x_4); -lean::closure_set(x_68, 2, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_22); -x_70 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_70, 0, x_69); -lean::closure_set(x_70, 1, x_4); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_22); -x_72 = l_Lean_Parser_command_constantKeyword; -x_73 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_73, 0, x_72); -lean::closure_set(x_73, 1, x_71); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_52); -lean::cnstr_set(x_74, 1, x_22); -lean::inc(x_40); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_40); -lean::cnstr_set(x_75, 1, x_74); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_73); -lean::cnstr_set(x_76, 1, x_75); -x_77 = l_Lean_Parser_command_axiom; -x_78 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_78, 0, x_77); -lean::closure_set(x_78, 1, x_76); -x_79 = lean::mk_string("class"); -x_80 = l_String_trim(x_79); -lean::dec(x_79); -lean::inc(x_80); -x_81 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_81, 0, x_80); -x_82 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_82, 0, x_80); -lean::closure_set(x_82, 1, x_4); -lean::closure_set(x_82, 2, x_81); -x_83 = lean::box(x_33); -x_84 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_84, 0, x_82); -lean::closure_set(x_84, 1, x_83); -x_85 = lean::mk_string("inductive"); -x_86 = l_String_trim(x_85); -lean::dec(x_85); -lean::inc(x_86); -x_87 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_87, 0, x_86); -x_88 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_88, 0, x_86); -lean::closure_set(x_88, 1, x_4); -lean::closure_set(x_88, 2, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_22); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_84); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView___lambda__1), 5, 1); -lean::closure_set(x_91, 0, x_90); -x_92 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notationLike_Parser), 5, 0); -x_93 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_termParser_run), 5, 1); -lean::closure_set(x_93, 0, x_92); -x_94 = lean::box(x_33); -x_95 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__1___boxed), 6, 2); -lean::closure_set(x_95, 0, x_93); -lean::closure_set(x_95, 1, x_94); -x_96 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_introRule_Parser), 4, 0); -x_97 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens___spec__2), 5, 1); -lean::closure_set(x_97, 0, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_97); -lean::cnstr_set(x_98, 1, x_22); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_95); -lean::cnstr_set(x_99, 1, x_98); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_38); -lean::cnstr_set(x_100, 1, x_99); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_40); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_35); -lean::cnstr_set(x_102, 1, x_101); -x_103 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_103, 0, x_91); -lean::cnstr_set(x_103, 1, x_102); -x_104 = l_Lean_Parser_command_inductive; -x_105 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_105, 0, x_104); -lean::closure_set(x_105, 1, x_103); -x_106 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_structure_Parser), 4, 0); -x_107 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_107, 1, x_22); -x_108 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_108, 0, x_105); -lean::cnstr_set(x_108, 1, x_107); -x_109 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_109, 0, x_78); -lean::cnstr_set(x_109, 1, x_108); -x_110 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_110, 0, x_64); -lean::cnstr_set(x_110, 1, x_109); -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_57); -lean::cnstr_set(x_111, 1, x_110); -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_45); -lean::cnstr_set(x_112, 1, x_111); -x_113 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens___spec__2), 6, 2); -lean::closure_set(x_113, 0, x_112); -lean::closure_set(x_113, 1, x_4); -x_114 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_114, 0, x_113); -lean::cnstr_set(x_114, 1, x_22); -x_115 = l_Lean_Parser_command_declaration_inner; -x_116 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2), 6, 2); -lean::closure_set(x_116, 0, x_115); -lean::closure_set(x_116, 1, x_114); -x_117 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_117, 0, x_116); -lean::cnstr_set(x_117, 1, x_22); -x_118 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_declModifiers_Parser), 4, 0); -x_119 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_119, 1, x_117); -return x_119; -} -} -obj* l_Lean_Parser_command_declaration_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_declaration; -x_6 = l_Lean_Parser_command_declaration_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_docComment_Parser___spec__2(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* initialize_init_lean_parser_term(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_declaration(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_term(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_command_docComment = _init_l_Lean_Parser_command_docComment(); -lean::mark_persistent(l_Lean_Parser_command_docComment); -l_Lean_Parser_command_docComment_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_docComment_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_docComment_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_docComment_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_docComment_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_docComment_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_docComment_HasView_x27 = _init_l_Lean_Parser_command_docComment_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_docComment_HasView_x27); -l_Lean_Parser_command_docComment_HasView = _init_l_Lean_Parser_command_docComment_HasView(); -lean::mark_persistent(l_Lean_Parser_command_docComment_HasView); -l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_docComment_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_docComment_Parser___closed__1 = _init_l_Lean_Parser_command_docComment_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_docComment_Parser___closed__1); -l_Lean_Parser_command_attrInstance = _init_l_Lean_Parser_command_attrInstance(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance); -l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_attrInstance_HasView_x27 = _init_l_Lean_Parser_command_attrInstance_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance_HasView_x27); -l_Lean_Parser_command_attrInstance_HasView = _init_l_Lean_Parser_command_attrInstance_HasView(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance_HasView); -l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_attrInstance_Parser___closed__1 = _init_l_Lean_Parser_command_attrInstance_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_attrInstance_Parser___closed__1); -l_Lean_Parser_command_declAttributes = _init_l_Lean_Parser_command_declAttributes(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes); -l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_declAttributes_HasView_x27 = _init_l_Lean_Parser_command_declAttributes_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_HasView_x27); -l_Lean_Parser_command_declAttributes_HasView = _init_l_Lean_Parser_command_declAttributes_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_HasView); -l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_declAttributes_Parser___closed__1 = _init_l_Lean_Parser_command_declAttributes_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declAttributes_Parser___closed__1); -l_Lean_Parser_command_visibility = _init_l_Lean_Parser_command_visibility(); -lean::mark_persistent(l_Lean_Parser_command_visibility); -l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_visibility_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_visibility_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_visibility_HasView_x27 = _init_l_Lean_Parser_command_visibility_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_visibility_HasView_x27); -l_Lean_Parser_command_visibility_HasView = _init_l_Lean_Parser_command_visibility_HasView(); -lean::mark_persistent(l_Lean_Parser_command_visibility_HasView); -l_Lean_Parser_command_declModifiers = _init_l_Lean_Parser_command_declModifiers(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers); -l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_declModifiers_HasView_x27 = _init_l_Lean_Parser_command_declModifiers_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_HasView_x27); -l_Lean_Parser_command_declModifiers_HasView = _init_l_Lean_Parser_command_declModifiers_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_HasView); -l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_declModifiers_Parser___closed__1 = _init_l_Lean_Parser_command_declModifiers_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declModifiers_Parser___closed__1); -l_Lean_Parser_command_declSig = _init_l_Lean_Parser_command_declSig(); -lean::mark_persistent(l_Lean_Parser_command_declSig); -l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__2 = _init_l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_declSig_HasView_x27___elambda__2___closed__2); -l_Lean_Parser_command_declSig_HasView_x27 = _init_l_Lean_Parser_command_declSig_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_declSig_HasView_x27); -l_Lean_Parser_command_declSig_HasView = _init_l_Lean_Parser_command_declSig_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declSig_HasView); -l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declSig_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_declSig_Parser___closed__1 = _init_l_Lean_Parser_command_declSig_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declSig_Parser___closed__1); -l_Lean_Parser_command_optDeclSig = _init_l_Lean_Parser_command_optDeclSig(); -lean::mark_persistent(l_Lean_Parser_command_optDeclSig); -l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_optDeclSig_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_optDeclSig_HasView_x27 = _init_l_Lean_Parser_command_optDeclSig_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_optDeclSig_HasView_x27); -l_Lean_Parser_command_optDeclSig_HasView = _init_l_Lean_Parser_command_optDeclSig_HasView(); -lean::mark_persistent(l_Lean_Parser_command_optDeclSig_HasView); -l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_optDeclSig_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_optDeclSig_Parser___closed__1 = _init_l_Lean_Parser_command_optDeclSig_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_optDeclSig_Parser___closed__1); -l_Lean_Parser_command_equation = _init_l_Lean_Parser_command_equation(); -lean::mark_persistent(l_Lean_Parser_command_equation); -l_Lean_Parser_command_equation_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_equation_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_equation_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_equation_HasView_x27 = _init_l_Lean_Parser_command_equation_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_equation_HasView_x27); -l_Lean_Parser_command_equation_HasView = _init_l_Lean_Parser_command_equation_HasView(); -lean::mark_persistent(l_Lean_Parser_command_equation_HasView); -l_Lean_Parser_command_equation_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_equation_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_equation_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_equation_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_equation_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_equation_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_equation_Parser___closed__1 = _init_l_Lean_Parser_command_equation_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_equation_Parser___closed__1); -l_Lean_Parser_command_simpleDeclVal = _init_l_Lean_Parser_command_simpleDeclVal(); -lean::mark_persistent(l_Lean_Parser_command_simpleDeclVal); -l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_simpleDeclVal_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_command_simpleDeclVal_HasView_x27 = _init_l_Lean_Parser_command_simpleDeclVal_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_simpleDeclVal_HasView_x27); -l_Lean_Parser_command_simpleDeclVal_HasView = _init_l_Lean_Parser_command_simpleDeclVal_HasView(); -lean::mark_persistent(l_Lean_Parser_command_simpleDeclVal_HasView); -l_Lean_Parser_command_declVal = _init_l_Lean_Parser_command_declVal(); -lean::mark_persistent(l_Lean_Parser_command_declVal); -l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_command_declVal_HasView_x27 = _init_l_Lean_Parser_command_declVal_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView_x27); -l_Lean_Parser_command_declVal_HasView = _init_l_Lean_Parser_command_declVal_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declVal_HasView); -l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declVal_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_declVal_Parser___closed__1 = _init_l_Lean_Parser_command_declVal_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declVal_Parser___closed__1); -l_Lean_Parser_command_relaxedInferModifier = _init_l_Lean_Parser_command_relaxedInferModifier(); -lean::mark_persistent(l_Lean_Parser_command_relaxedInferModifier); -l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_relaxedInferModifier_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_relaxedInferModifier_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_relaxedInferModifier_HasView_x27 = _init_l_Lean_Parser_command_relaxedInferModifier_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_relaxedInferModifier_HasView_x27); -l_Lean_Parser_command_relaxedInferModifier_HasView = _init_l_Lean_Parser_command_relaxedInferModifier_HasView(); -lean::mark_persistent(l_Lean_Parser_command_relaxedInferModifier_HasView); -l_Lean_Parser_command_strictInferModifier = _init_l_Lean_Parser_command_strictInferModifier(); -lean::mark_persistent(l_Lean_Parser_command_strictInferModifier); -l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_strictInferModifier_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_strictInferModifier_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_strictInferModifier_HasView_x27 = _init_l_Lean_Parser_command_strictInferModifier_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_strictInferModifier_HasView_x27); -l_Lean_Parser_command_strictInferModifier_HasView = _init_l_Lean_Parser_command_strictInferModifier_HasView(); -lean::mark_persistent(l_Lean_Parser_command_strictInferModifier_HasView); -l_Lean_Parser_command_inferModifier = _init_l_Lean_Parser_command_inferModifier(); -lean::mark_persistent(l_Lean_Parser_command_inferModifier); -l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_inferModifier_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_inferModifier_HasView_x27 = _init_l_Lean_Parser_command_inferModifier_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_inferModifier_HasView_x27); -l_Lean_Parser_command_inferModifier_HasView = _init_l_Lean_Parser_command_inferModifier_HasView(); -lean::mark_persistent(l_Lean_Parser_command_inferModifier_HasView); -l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_inferModifier_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_inferModifier_Parser___closed__1 = _init_l_Lean_Parser_command_inferModifier_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_inferModifier_Parser___closed__1); -l_Lean_Parser_command_introRule = _init_l_Lean_Parser_command_introRule(); -lean::mark_persistent(l_Lean_Parser_command_introRule); -l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_introRule_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_introRule_HasView_x27 = _init_l_Lean_Parser_command_introRule_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_introRule_HasView_x27); -l_Lean_Parser_command_introRule_HasView = _init_l_Lean_Parser_command_introRule_HasView(); -lean::mark_persistent(l_Lean_Parser_command_introRule_HasView); -l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_introRule_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_introRule_Parser___closed__1 = _init_l_Lean_Parser_command_introRule_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_introRule_Parser___closed__1); -l_Lean_Parser_command_structBinderContent = _init_l_Lean_Parser_command_structBinderContent(); -lean::mark_persistent(l_Lean_Parser_command_structBinderContent); -l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_structBinderContent_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_structBinderContent_HasView_x27 = _init_l_Lean_Parser_command_structBinderContent_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_structBinderContent_HasView_x27); -l_Lean_Parser_command_structBinderContent_HasView = _init_l_Lean_Parser_command_structBinderContent_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structBinderContent_HasView); -l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structBinderContent_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_structBinderContent_Parser___closed__1 = _init_l_Lean_Parser_command_structBinderContent_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structBinderContent_Parser___closed__1); -l_Lean_Parser_command_structExplicitBinderContent = _init_l_Lean_Parser_command_structExplicitBinderContent(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinderContent); -l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinderContent_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_structExplicitBinderContent_HasView_x27 = _init_l_Lean_Parser_command_structExplicitBinderContent_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinderContent_HasView_x27); -l_Lean_Parser_command_structExplicitBinderContent_HasView = _init_l_Lean_Parser_command_structExplicitBinderContent_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinderContent_HasView); -l_Lean_Parser_command_structExplicitBinder = _init_l_Lean_Parser_command_structExplicitBinder(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinder); -l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinder_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_structExplicitBinder_HasView_x27 = _init_l_Lean_Parser_command_structExplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinder_HasView_x27); -l_Lean_Parser_command_structExplicitBinder_HasView = _init_l_Lean_Parser_command_structExplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structExplicitBinder_HasView); -l_Lean_Parser_command_structImplicitBinder = _init_l_Lean_Parser_command_structImplicitBinder(); -lean::mark_persistent(l_Lean_Parser_command_structImplicitBinder); -l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_structImplicitBinder_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_structImplicitBinder_HasView_x27 = _init_l_Lean_Parser_command_structImplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_structImplicitBinder_HasView_x27); -l_Lean_Parser_command_structImplicitBinder_HasView = _init_l_Lean_Parser_command_structImplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structImplicitBinder_HasView); -l_Lean_Parser_command_strictImplicitBinder = _init_l_Lean_Parser_command_strictImplicitBinder(); -lean::mark_persistent(l_Lean_Parser_command_strictImplicitBinder); -l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_strictImplicitBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_strictImplicitBinder_HasView_x27 = _init_l_Lean_Parser_command_strictImplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_strictImplicitBinder_HasView_x27); -l_Lean_Parser_command_strictImplicitBinder_HasView = _init_l_Lean_Parser_command_strictImplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_command_strictImplicitBinder_HasView); -l_Lean_Parser_command_instImplicitBinder = _init_l_Lean_Parser_command_instImplicitBinder(); -lean::mark_persistent(l_Lean_Parser_command_instImplicitBinder); -l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_instImplicitBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_instImplicitBinder_HasView_x27 = _init_l_Lean_Parser_command_instImplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_instImplicitBinder_HasView_x27); -l_Lean_Parser_command_instImplicitBinder_HasView = _init_l_Lean_Parser_command_instImplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_command_instImplicitBinder_HasView); -l_Lean_Parser_command_structureFieldBlock = _init_l_Lean_Parser_command_structureFieldBlock(); -lean::mark_persistent(l_Lean_Parser_command_structureFieldBlock); -l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_structureFieldBlock_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_structureFieldBlock_HasView_x27 = _init_l_Lean_Parser_command_structureFieldBlock_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_structureFieldBlock_HasView_x27); -l_Lean_Parser_command_structureFieldBlock_HasView = _init_l_Lean_Parser_command_structureFieldBlock_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structureFieldBlock_HasView); -l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structureFieldBlock_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_structureFieldBlock_Parser___closed__1 = _init_l_Lean_Parser_command_structureFieldBlock_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structureFieldBlock_Parser___closed__1); -l_Lean_Parser_command_oldUnivParams = _init_l_Lean_Parser_command_oldUnivParams(); -lean::mark_persistent(l_Lean_Parser_command_oldUnivParams); -l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_oldUnivParams_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_oldUnivParams_HasView_x27 = _init_l_Lean_Parser_command_oldUnivParams_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_oldUnivParams_HasView_x27); -l_Lean_Parser_command_oldUnivParams_HasView = _init_l_Lean_Parser_command_oldUnivParams_HasView(); -lean::mark_persistent(l_Lean_Parser_command_oldUnivParams_HasView); -l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_oldUnivParams_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_oldUnivParams_Parser___closed__1 = _init_l_Lean_Parser_command_oldUnivParams_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_oldUnivParams_Parser___closed__1); -l_Lean_Parser_command_univParams = _init_l_Lean_Parser_command_univParams(); -lean::mark_persistent(l_Lean_Parser_command_univParams); -l_Lean_Parser_command_univParams_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_univParams_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_univParams_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_univParams_HasView_x27 = _init_l_Lean_Parser_command_univParams_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_univParams_HasView_x27); -l_Lean_Parser_command_univParams_HasView = _init_l_Lean_Parser_command_univParams_HasView(); -lean::mark_persistent(l_Lean_Parser_command_univParams_HasView); -l_Lean_Parser_command_identUnivParams = _init_l_Lean_Parser_command_identUnivParams(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams); -l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_command_identUnivParams_HasView_x27 = _init_l_Lean_Parser_command_identUnivParams_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_HasView_x27); -l_Lean_Parser_command_identUnivParams_HasView = _init_l_Lean_Parser_command_identUnivParams_HasView(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_HasView); -l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_identUnivParams_Parser___closed__1 = _init_l_Lean_Parser_command_identUnivParams_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_identUnivParams_Parser___closed__1); -l_Lean_Parser_command_structureKw = _init_l_Lean_Parser_command_structureKw(); -lean::mark_persistent(l_Lean_Parser_command_structureKw); -l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_structureKw_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_structureKw_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_structureKw_HasView_x27 = _init_l_Lean_Parser_command_structureKw_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_structureKw_HasView_x27); -l_Lean_Parser_command_structureKw_HasView = _init_l_Lean_Parser_command_structureKw_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structureKw_HasView); -l_Lean_Parser_command_extends = _init_l_Lean_Parser_command_extends(); -lean::mark_persistent(l_Lean_Parser_command_extends); -l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_extends_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_extends_HasView_x27 = _init_l_Lean_Parser_command_extends_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_extends_HasView_x27); -l_Lean_Parser_command_extends_HasView = _init_l_Lean_Parser_command_extends_HasView(); -lean::mark_persistent(l_Lean_Parser_command_extends_HasView); -l_Lean_Parser_command_structureCtor = _init_l_Lean_Parser_command_structureCtor(); -lean::mark_persistent(l_Lean_Parser_command_structureCtor); -l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structureCtor_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_structureCtor_HasView_x27 = _init_l_Lean_Parser_command_structureCtor_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_structureCtor_HasView_x27); -l_Lean_Parser_command_structureCtor_HasView = _init_l_Lean_Parser_command_structureCtor_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structureCtor_HasView); -l_Lean_Parser_command_structure = _init_l_Lean_Parser_command_structure(); -lean::mark_persistent(l_Lean_Parser_command_structure); -l_Lean_Parser_command_structure_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_structure_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__6 = _init_l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView_x27___lambda__1___closed__6); -l_Lean_Parser_command_structure_HasView_x27 = _init_l_Lean_Parser_command_structure_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView_x27); -l_Lean_Parser_command_structure_HasView = _init_l_Lean_Parser_command_structure_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structure_HasView); -l_Lean_Parser_command_structure_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_structure_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_structure_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_structure_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_structure_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_structure_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_structure_Parser___closed__1 = _init_l_Lean_Parser_command_structure_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_structure_Parser___closed__1); -l_Lean_Parser_command_defLike_kind = _init_l_Lean_Parser_command_defLike_kind(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind); -l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__3 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__3); -l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__4 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__4); -l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__5 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___elambda__1___closed__5); -l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__6); -l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__7 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__7(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27___lambda__1___closed__7); -l_Lean_Parser_command_defLike_kind_HasView_x27 = _init_l_Lean_Parser_command_defLike_kind_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView_x27); -l_Lean_Parser_command_defLike_kind_HasView = _init_l_Lean_Parser_command_defLike_kind_HasView(); -lean::mark_persistent(l_Lean_Parser_command_defLike_kind_HasView); -l_Lean_Parser_command_defLike = _init_l_Lean_Parser_command_defLike(); -lean::mark_persistent(l_Lean_Parser_command_defLike); -l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_defLike_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_defLike_HasView_x27 = _init_l_Lean_Parser_command_defLike_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_defLike_HasView_x27); -l_Lean_Parser_command_defLike_HasView = _init_l_Lean_Parser_command_defLike_HasView(); -lean::mark_persistent(l_Lean_Parser_command_defLike_HasView); -l_Lean_Parser_command_instance = _init_l_Lean_Parser_command_instance(); -lean::mark_persistent(l_Lean_Parser_command_instance); -l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_instance_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_instance_HasView_x27 = _init_l_Lean_Parser_command_instance_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_instance_HasView_x27); -l_Lean_Parser_command_instance_HasView = _init_l_Lean_Parser_command_instance_HasView(); -lean::mark_persistent(l_Lean_Parser_command_instance_HasView); -l_Lean_Parser_command_example = _init_l_Lean_Parser_command_example(); -lean::mark_persistent(l_Lean_Parser_command_example); -l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_example_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_example_HasView_x27 = _init_l_Lean_Parser_command_example_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_example_HasView_x27); -l_Lean_Parser_command_example_HasView = _init_l_Lean_Parser_command_example_HasView(); -lean::mark_persistent(l_Lean_Parser_command_example_HasView); -l_Lean_Parser_command_constantKeyword = _init_l_Lean_Parser_command_constantKeyword(); -lean::mark_persistent(l_Lean_Parser_command_constantKeyword); -l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_constantKeyword_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_constantKeyword_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_constantKeyword_HasView_x27 = _init_l_Lean_Parser_command_constantKeyword_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_constantKeyword_HasView_x27); -l_Lean_Parser_command_constantKeyword_HasView = _init_l_Lean_Parser_command_constantKeyword_HasView(); -lean::mark_persistent(l_Lean_Parser_command_constantKeyword_HasView); -l_Lean_Parser_command_axiom = _init_l_Lean_Parser_command_axiom(); -lean::mark_persistent(l_Lean_Parser_command_axiom); -l_Lean_Parser_command_axiom_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_command_axiom_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_axiom_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_command_axiom_HasView_x27 = _init_l_Lean_Parser_command_axiom_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_axiom_HasView_x27); -l_Lean_Parser_command_axiom_HasView = _init_l_Lean_Parser_command_axiom_HasView(); -lean::mark_persistent(l_Lean_Parser_command_axiom_HasView); -l_Lean_Parser_command_inductive = _init_l_Lean_Parser_command_inductive(); -lean::mark_persistent(l_Lean_Parser_command_inductive); -l_Lean_Parser_command_inductive_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_inductive_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_inductive_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_inductive_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_inductive_HasView_x27 = _init_l_Lean_Parser_command_inductive_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_inductive_HasView_x27); -l_Lean_Parser_command_inductive_HasView = _init_l_Lean_Parser_command_inductive_HasView(); -lean::mark_persistent(l_Lean_Parser_command_inductive_HasView); -l_Lean_Parser_command_declaration_inner = _init_l_Lean_Parser_command_declaration_inner(); -lean::mark_persistent(l_Lean_Parser_command_declaration_inner); -l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_declaration_inner_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_declaration_inner_HasView_x27 = _init_l_Lean_Parser_command_declaration_inner_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_declaration_inner_HasView_x27); -l_Lean_Parser_command_declaration_inner_HasView = _init_l_Lean_Parser_command_declaration_inner_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declaration_inner_HasView); -l_Lean_Parser_command_declaration = _init_l_Lean_Parser_command_declaration(); -lean::mark_persistent(l_Lean_Parser_command_declaration); -l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__2 = _init_l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_declaration_HasView_x27___elambda__2___closed__2); -l_Lean_Parser_command_declaration_HasView_x27 = _init_l_Lean_Parser_command_declaration_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_declaration_HasView_x27); -l_Lean_Parser_command_declaration_HasView = _init_l_Lean_Parser_command_declaration_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declaration_HasView); -l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_declaration_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_declaration_Parser___closed__1 = _init_l_Lean_Parser_command_declaration_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_declaration_Parser___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/identifier.cpp b/src/stage0/init/lean/parser/identifier.cpp deleted file mode 100644 index df89d4536c..0000000000 --- a/src/stage0/init/lean/parser/identifier.cpp +++ /dev/null @@ -1,1987 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.identifier -// Imports: init.data.char.basic init.lean.parser.parsec -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -uint8 l_Lean_isSubScriptAlnum(uint32); -obj* l_Lean_isIdRest___boxed(obj*); -obj* l_Lean_Parser_idPartDefault___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_identifier___rarg(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_4__mkStringResult___rarg(obj*, obj*); -uint8 l_Char_isAlphanum(uint32); -obj* l_Lean_isLetterLike___boxed(obj*); -obj* l_Lean_Parser_cppIdentifier___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_idPartDefault___boxed(obj*, obj*); -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_idPartEscaped___boxed(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -uint8 l_Lean_isIdRest(uint32); -obj* l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -uint8 l_Lean_isIdEndEscape(uint32); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___boxed(obj*, obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_isIdBeginEscape___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__2(obj*, obj*, uint32); -obj* l_Lean_Parser_cppIdentifier___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_idPart(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___rarg(obj*, obj*); -uint8 l_Char_isAlpha(uint32); -uint32 l_String_OldIterator_curr___main(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___rarg(obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_cIdentifier___spec__2(obj*); -obj* l_Lean_Parser_MonadParsec_error___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_remaining___main(obj*); -obj* l_Lean_Parser_cIdentifier___rarg___lambda__2(obj*, obj*, uint32); -obj* l_Lean_isIdFirst___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2(obj*); -obj* l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__3; -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_identifier___rarg___closed__1; -obj* l_Lean_Parser_cIdentifier___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___rarg(obj*, obj*); -namespace lean { -obj* string_push(obj*, uint32); -} -obj* l_Lean_Parser_identifier(obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartEscaped___spec__3(obj*); -obj* l_Lean_Parser_cIdentifier___rarg___lambda__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_idPartDefault___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1(obj*, obj*, obj*); -uint8 l_Lean_isLetterLike(uint32); -extern obj* l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -obj* l_Lean_Parser_identifier___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartEscaped___spec__3___rarg(obj*, obj*, obj*); -uint8 l_Lean_isIdBeginEscape(uint32); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2(obj*, obj*, obj*); -obj* l_Lean_Parser_cppIdentifier(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_cond___rarg___lambda__1___boxed(obj*, obj*, obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_String_OldIterator_next___main(obj*); -obj* l_Lean_Parser_idPartDefault___rarg___lambda__2(obj*, obj*, uint32); -uint8 l_UInt32_decLe(uint32, uint32); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartDefault___spec__2(obj*); -obj* l_Lean_Parser_cIdentifier___boxed(obj*, obj*); -obj* l_Lean_Parser_cIdentifier(obj*, obj*); -extern obj* l_Char_HasRepr___closed__1; -obj* l_Lean_Parser_idPartEscaped___rarg(obj*, obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -uint32 l_Lean_idBeginEscape; -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartDefault___spec__2___rarg(obj*, obj*, obj*); -obj* l_Char_quoteCore(uint32); -uint8 l_String_OldIterator_hasNext___main(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__2___boxed(obj*, obj*, obj*); -obj* l_String_append___boxed(obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_try___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___rarg___lambda__1(obj*, obj*); -uint8 l_UInt32_decEq(uint32, uint32); -obj* l_Lean_Parser_cppIdentifier___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_idPartDefault___rarg___lambda__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_cIdentifier___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__2; -obj* l_Lean_Parser_identifier___boxed(obj*, obj*); -obj* l_Lean_isGreek___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___boxed(obj*); -extern obj* l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_cppIdentifier___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_cIdentifier___rarg___closed__1; -obj* l_Lean_Parser_idPart___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___boxed(obj*, obj*); -obj* l_Lean_Parser_idPartEscaped(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_strCore___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_cIdentifier___spec__2___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_curr___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_isIdEndEscape___boxed(obj*); -obj* l_Lean_Parser_idPartDefault___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__1(obj*, obj*, obj*); -uint32 l_Lean_idEndEscape; -obj* l_List_foldl___main___at_String_join___spec__1(obj*, obj*); -obj* l_String_quote(obj*); -obj* l_Lean_Parser_cppIdentifier___boxed(obj*, obj*); -obj* l_Lean_Parser_idPart___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_idPartDefault(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many___rarg(obj*, obj*, obj*, obj*, obj*); -uint8 l_Lean_isIdFirst(uint32); -uint8 l_Lean_isGreek(uint32); -obj* l_Lean_Parser_cIdentifier___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__1; -obj* l_Lean_Parser_MonadParsec_ch___rarg(obj*, obj*, uint32); -obj* l_Lean_Parser_idPart___rarg___closed__1; -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_isSubScriptAlnum___boxed(obj*); -uint8 l_Lean_isGreek(uint32 x_1) { -_start: -{ -uint32 x_2; uint8 x_3; -x_2 = 913; -x_3 = x_2 <= x_1; -if (x_3 == 0) -{ -uint8 x_4; -x_4 = 0; -return x_4; -} -else -{ -uint32 x_5; uint8 x_6; -x_5 = 989; -x_6 = x_1 <= x_5; -return x_6; -} -} -} -obj* l_Lean_isGreek___boxed(obj* x_1) { -_start: -{ -uint32 x_2; uint8 x_3; obj* x_4; -x_2 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_3 = l_Lean_isGreek(x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_Lean_isLetterLike(uint32 x_1) { -_start: -{ -uint32 x_2; uint8 x_3; uint8 x_18; uint8 x_25; uint8 x_32; -x_2 = 945; -x_32 = x_2 <= x_1; -if (x_32 == 0) -{ -uint32 x_33; uint8 x_34; -x_33 = 913; -x_34 = x_33 <= x_1; -if (x_34 == 0) -{ -uint8 x_35; -x_35 = 0; -x_25 = x_35; -goto block_31; -} -else -{ -uint32 x_36; uint8 x_37; -x_36 = 937; -x_37 = x_1 <= x_36; -if (x_37 == 0) -{ -uint8 x_38; -x_38 = 0; -x_25 = x_38; -goto block_31; -} -else -{ -uint32 x_39; uint8 x_40; -x_39 = 928; -x_40 = x_1 == x_39; -if (x_40 == 0) -{ -uint32 x_41; uint8 x_42; -x_41 = 931; -x_42 = x_1 == x_41; -if (x_42 == 0) -{ -uint8 x_43; -x_43 = 1; -return x_43; -} -else -{ -uint8 x_44; -x_44 = 0; -x_25 = x_44; -goto block_31; -} -} -else -{ -uint8 x_45; -x_45 = 0; -x_25 = x_45; -goto block_31; -} -} -} -} -else -{ -uint32 x_46; uint8 x_47; -x_46 = 969; -x_47 = x_1 <= x_46; -if (x_47 == 0) -{ -uint32 x_48; uint8 x_49; -x_48 = 913; -x_49 = x_48 <= x_1; -if (x_49 == 0) -{ -uint8 x_50; -x_50 = 0; -x_25 = x_50; -goto block_31; -} -else -{ -uint32 x_51; uint8 x_52; -x_51 = 937; -x_52 = x_1 <= x_51; -if (x_52 == 0) -{ -uint8 x_53; -x_53 = 0; -x_25 = x_53; -goto block_31; -} -else -{ -uint32 x_54; uint8 x_55; -x_54 = 928; -x_55 = x_1 == x_54; -if (x_55 == 0) -{ -uint32 x_56; uint8 x_57; -x_56 = 931; -x_57 = x_1 == x_56; -if (x_57 == 0) -{ -uint8 x_58; -x_58 = 1; -return x_58; -} -else -{ -uint8 x_59; -x_59 = 0; -x_25 = x_59; -goto block_31; -} -} -else -{ -uint8 x_60; -x_60 = 0; -x_25 = x_60; -goto block_31; -} -} -} -} -else -{ -uint32 x_61; uint8 x_62; uint8 x_75; -x_61 = 955; -x_75 = x_1 == x_61; -if (x_75 == 0) -{ -uint8 x_76; -x_76 = 1; -x_62 = x_76; -goto block_74; -} -else -{ -uint8 x_77; -x_77 = 0; -x_62 = x_77; -goto block_74; -} -block_74: -{ -if (x_62 == 0) -{ -uint32 x_63; uint8 x_64; -x_63 = 913; -x_64 = x_63 <= x_1; -if (x_64 == 0) -{ -x_25 = x_62; -goto block_31; -} -else -{ -uint32 x_65; uint8 x_66; -x_65 = 937; -x_66 = x_1 <= x_65; -if (x_66 == 0) -{ -x_25 = x_62; -goto block_31; -} -else -{ -uint32 x_67; uint8 x_68; -x_67 = 928; -x_68 = x_1 == x_67; -if (x_68 == 0) -{ -uint32 x_69; uint8 x_70; -x_69 = 931; -x_70 = x_1 == x_69; -if (x_70 == 0) -{ -uint8 x_71; -x_71 = 1; -return x_71; -} -else -{ -uint8 x_72; -x_72 = 0; -x_25 = x_72; -goto block_31; -} -} -else -{ -x_25 = x_62; -goto block_31; -} -} -} -} -else -{ -uint8 x_73; -x_73 = 1; -return x_73; -} -} -} -} -block_17: -{ -uint32 x_4; uint8 x_5; -x_4 = 8448; -x_5 = x_4 <= x_1; -if (x_5 == 0) -{ -uint32 x_6; uint8 x_7; -x_6 = 119964; -x_7 = x_6 <= x_1; -if (x_7 == 0) -{ -return x_3; -} -else -{ -uint32 x_8; uint8 x_9; -x_8 = 120223; -x_9 = x_1 <= x_8; -return x_9; -} -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = 8527; -x_11 = x_1 <= x_10; -if (x_11 == 0) -{ -uint32 x_12; uint8 x_13; -x_12 = 119964; -x_13 = x_12 <= x_1; -if (x_13 == 0) -{ -return x_11; -} -else -{ -uint32 x_14; uint8 x_15; -x_14 = 120223; -x_15 = x_1 <= x_14; -return x_15; -} -} -else -{ -uint8 x_16; -x_16 = 1; -return x_16; -} -} -} -block_24: -{ -uint32 x_19; uint8 x_20; -x_19 = 7936; -x_20 = x_19 <= x_1; -if (x_20 == 0) -{ -x_3 = x_18; -goto block_17; -} -else -{ -uint32 x_21; uint8 x_22; -x_21 = 8190; -x_22 = x_1 <= x_21; -if (x_22 == 0) -{ -x_3 = x_22; -goto block_17; -} -else -{ -uint8 x_23; -x_23 = 1; -return x_23; -} -} -} -block_31: -{ -uint32 x_26; uint8 x_27; -x_26 = 970; -x_27 = x_26 <= x_1; -if (x_27 == 0) -{ -x_18 = x_25; -goto block_24; -} -else -{ -uint32 x_28; uint8 x_29; -x_28 = 1019; -x_29 = x_1 <= x_28; -if (x_29 == 0) -{ -x_18 = x_29; -goto block_24; -} -else -{ -uint8 x_30; -x_30 = 1; -return x_30; -} -} -} -} -} -obj* l_Lean_isLetterLike___boxed(obj* x_1) { -_start: -{ -uint32 x_2; uint8 x_3; obj* x_4; -x_2 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_3 = l_Lean_isLetterLike(x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_Lean_isSubScriptAlnum(uint32 x_1) { -_start: -{ -uint32 x_2; uint8 x_3; uint8 x_18; -x_2 = 8319; -x_18 = x_2 <= x_1; -if (x_18 == 0) -{ -uint8 x_19; -x_19 = 0; -x_3 = x_19; -goto block_17; -} -else -{ -uint32 x_20; uint8 x_21; -x_20 = 8329; -x_21 = x_1 <= x_20; -if (x_21 == 0) -{ -x_3 = x_21; -goto block_17; -} -else -{ -uint8 x_22; -x_22 = 1; -return x_22; -} -} -block_17: -{ -uint32 x_4; uint8 x_5; -x_4 = 8336; -x_5 = x_4 <= x_1; -if (x_5 == 0) -{ -uint32 x_6; uint8 x_7; -x_6 = 7522; -x_7 = x_6 <= x_1; -if (x_7 == 0) -{ -return x_3; -} -else -{ -uint32 x_8; uint8 x_9; -x_8 = 7530; -x_9 = x_1 <= x_8; -return x_9; -} -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = 8348; -x_11 = x_1 <= x_10; -if (x_11 == 0) -{ -uint32 x_12; uint8 x_13; -x_12 = 7522; -x_13 = x_12 <= x_1; -if (x_13 == 0) -{ -return x_11; -} -else -{ -uint32 x_14; uint8 x_15; -x_14 = 7530; -x_15 = x_1 <= x_14; -return x_15; -} -} -else -{ -uint8 x_16; -x_16 = 1; -return x_16; -} -} -} -} -} -obj* l_Lean_isSubScriptAlnum___boxed(obj* x_1) { -_start: -{ -uint32 x_2; uint8 x_3; obj* x_4; -x_2 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_3 = l_Lean_isSubScriptAlnum(x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_Lean_isIdFirst(uint32 x_1) { -_start: -{ -uint8 x_2; -x_2 = l_Char_isAlpha(x_1); -if (x_2 == 0) -{ -uint32 x_3; uint8 x_4; -x_3 = 95; -x_4 = x_1 == x_3; -if (x_4 == 0) -{ -uint8 x_5; -x_5 = l_Lean_isLetterLike(x_1); -return x_5; -} -else -{ -uint8 x_6; -x_6 = 1; -return x_6; -} -} -else -{ -uint8 x_7; -x_7 = 1; -return x_7; -} -} -} -obj* l_Lean_isIdFirst___boxed(obj* x_1) { -_start: -{ -uint32 x_2; uint8 x_3; obj* x_4; -x_2 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_3 = l_Lean_isIdFirst(x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_Lean_isIdRest(uint32 x_1) { -_start: -{ -uint8 x_2; -x_2 = l_Char_isAlphanum(x_1); -if (x_2 == 0) -{ -uint32 x_3; uint8 x_4; -x_3 = 95; -x_4 = x_1 == x_3; -if (x_4 == 0) -{ -uint32 x_5; uint8 x_6; -x_5 = 39; -x_6 = x_1 == x_5; -if (x_6 == 0) -{ -uint8 x_7; -x_7 = l_Lean_isLetterLike(x_1); -if (x_7 == 0) -{ -uint8 x_8; -x_8 = l_Lean_isSubScriptAlnum(x_1); -return x_8; -} -else -{ -uint8 x_9; -x_9 = 1; -return x_9; -} -} -else -{ -uint8 x_10; -x_10 = 1; -return x_10; -} -} -else -{ -uint8 x_11; -x_11 = 1; -return x_11; -} -} -else -{ -uint8 x_12; -x_12 = 1; -return x_12; -} -} -} -obj* l_Lean_isIdRest___boxed(obj* x_1) { -_start: -{ -uint32 x_2; uint8 x_3; obj* x_4; -x_2 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_3 = l_Lean_isIdRest(x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -uint32 _init_l_Lean_idBeginEscape() { -_start: -{ -uint32 x_1; -x_1 = 171; -return x_1; -} -} -uint32 _init_l_Lean_idEndEscape() { -_start: -{ -uint32 x_1; -x_1 = 187; -return x_1; -} -} -uint8 l_Lean_isIdBeginEscape(uint32 x_1) { -_start: -{ -uint32 x_2; uint8 x_3; -x_2 = l_Lean_idBeginEscape; -x_3 = x_1 == x_2; -if (x_3 == 0) -{ -uint8 x_4; -x_4 = 0; -return x_4; -} -else -{ -uint8 x_5; -x_5 = 1; -return x_5; -} -} -} -obj* l_Lean_isIdBeginEscape___boxed(obj* x_1) { -_start: -{ -uint32 x_2; uint8 x_3; obj* x_4; -x_2 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_3 = l_Lean_isIdBeginEscape(x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_Lean_isIdEndEscape(uint32 x_1) { -_start: -{ -uint32 x_2; uint8 x_3; -x_2 = l_Lean_idEndEscape; -x_3 = x_1 == x_2; -if (x_3 == 0) -{ -uint8 x_4; -x_4 = 0; -return x_4; -} -else -{ -uint8 x_5; -x_5 = 1; -return x_5; -} -} -} -obj* l_Lean_isIdEndEscape___boxed(obj* x_1) { -_start: -{ -uint32 x_2; uint8 x_3; obj* x_4; -x_2 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_3 = l_Lean_isIdEndEscape(x_2); -x_4 = lean::box(x_3); -return x_4; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartDefault___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Lean_isIdRest(x_10); -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::string_push(x_2, x_10); -x_14 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_13; -x_3 = x_14; -goto _start; -} -} -} -else -{ -obj* x_16; -lean::dec(x_1); -x_16 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_16; -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartDefault___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartDefault___spec__2___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_String_OldIterator_remaining___main(x_2); -x_4 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartDefault___spec__2___rarg(x_3, x_1, x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___rarg___lambda__1), 2, 1); -lean::closure_set(x_4, 0, x_2); -x_5 = lean::apply_2(x_3, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_idPartDefault___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = l_Lean_isIdFirst(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_3); -lean::dec(x_2); -x_11 = l_Char_quoteCore(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_12, x_11); -lean::dec(x_11); -x_14 = lean::string_append(x_13, x_12); -x_15 = lean::box(0); -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_14, x_16, x_15, x_15); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_1); -x_18 = lean::box_uint32(x_9); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_19, 0, x_3); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::apply_2(x_2, lean::box(0), x_19); -return x_20; -} -} -} -} -obj* l_Lean_Parser_idPartDefault___rarg___lambda__2(obj* x_1, obj* x_2, uint32 x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_String_splitAux___main___closed__1; -x_5 = lean::string_push(x_4, x_3); -x_6 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___rarg(x_2, x_5); -return x_6; -} -} -obj* l_Lean_Parser_idPartDefault___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_5); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -lean::inc(x_2); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_idPartDefault___rarg___lambda__1), 3, 2); -lean::closure_set(x_8, 0, x_2); -lean::closure_set(x_8, 1, x_5); -lean::inc(x_4); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_idPartDefault___rarg___lambda__2___boxed), 3, 2); -lean::closure_set(x_10, 0, x_1); -lean::closure_set(x_10, 1, x_2); -x_11 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_idPartDefault(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_idPartDefault___rarg___boxed), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartDefault___spec__1(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_idPartDefault___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_idPartDefault___rarg___lambda__2(x_1, x_2, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_idPartDefault___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_idPartDefault___rarg(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_Lean_Parser_idPartDefault___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_idPartDefault(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartEscaped___spec__3___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Lean_isIdEndEscape(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::string_push(x_2, x_10); -x_13 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_12; -x_3 = x_13; -goto _start; -} -else -{ -obj* x_15; -lean::dec(x_7); -x_15 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_15; -} -} -} -else -{ -obj* x_16; -lean::dec(x_1); -x_16 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_16; -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartEscaped___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartEscaped___spec__3___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_String_OldIterator_remaining___main(x_2); -x_4 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_idPartEscaped___spec__3___rarg(x_3, x_1, x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___rarg___lambda__1), 2, 1); -lean::closure_set(x_4, 0, x_2); -x_5 = lean::apply_2(x_3, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = l_Lean_isIdEndEscape(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -lean::dec(x_1); -x_11 = lean::box_uint32(x_9); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_12, 0, x_3); -lean::closure_set(x_12, 1, x_11); -x_13 = lean::apply_2(x_2, lean::box(0), x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_3); -lean::dec(x_2); -x_14 = l_Char_quoteCore(x_9); -x_15 = l_Char_HasRepr___closed__1; -x_16 = lean::string_append(x_15, x_14); -lean::dec(x_14); -x_17 = lean::string_append(x_16, x_15); -x_18 = lean::box(0); -x_19 = l_mjoin___rarg___closed__1; -x_20 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_17, x_19, x_18, x_18); -return x_20; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__2(obj* x_1, obj* x_2, uint32 x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_String_splitAux___main___closed__1; -x_5 = lean::string_push(x_4, x_3); -x_6 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___rarg(x_2, x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_4); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -lean::inc(x_2); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_4); -lean::inc(x_3); -x_8 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_6, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__2___boxed), 3, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_2); -x_10 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_idPartEscaped___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; uint32 x_6; obj* x_7; obj* x_8; obj* x_9; uint32 x_10; obj* x_11; obj* x_12; obj* x_13; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::cnstr_get(x_4, 4); -lean::inc(x_5); -x_6 = l_Lean_idBeginEscape; -lean::inc(x_2); -lean::inc(x_1); -x_7 = l_Lean_Parser_MonadParsec_ch___rarg(x_1, x_2, x_6); -x_8 = lean::cnstr_get(x_4, 3); -lean::inc(x_8); -lean::dec(x_4); -lean::inc(x_2); -lean::inc(x_1); -x_9 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg(x_1, x_2); -x_10 = l_Lean_idEndEscape; -x_11 = l_Lean_Parser_MonadParsec_ch___rarg(x_1, x_2, x_10); -x_12 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_9, x_11); -x_13 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_7, x_12); -return x_13; -} -} -obj* l_Lean_Parser_idPartEscaped(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_idPartEscaped___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_idPartEscaped___spec__2(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___rarg___lambda__2(x_1, x_2, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_idPartEscaped___spec__1(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_idPartEscaped___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_idPartEscaped(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_idPart___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_isIdBeginEscape___boxed), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_idPart___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -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; -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_4 = l_Lean_Parser_idPartEscaped___rarg(x_1, x_2, x_3); -lean::inc(x_2); -lean::inc(x_1); -x_5 = l_Lean_Parser_idPartDefault___rarg(x_1, x_2, x_3); -lean::dec(x_3); -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = l_Lean_Parser_MonadParsec_curr___rarg(x_1, x_2); -x_11 = l_Lean_Parser_idPart___rarg___closed__1; -x_12 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_11, x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_cond___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_13, 0, x_5); -lean::closure_set(x_13, 1, x_4); -x_14 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_12, x_13); -return x_14; -} -} -obj* l_Lean_Parser_idPart(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_idPart___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_idPart___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_idPart(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = lean_name_mk_string(x_1, x_6); -x_8 = l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg(x_2, x_3, x_4, x_7, x_5); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_5, x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_sub(x_5, x_8); -x_10 = lean::cnstr_get(x_2, 2); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_1, 1); -lean::inc(x_11); -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___lambda__1___boxed), 6, 5); -lean::closure_set(x_12, 0, x_4); -lean::closure_set(x_12, 1, x_1); -lean::closure_set(x_12, 2, x_2); -lean::closure_set(x_12, 3, x_3); -lean::closure_set(x_12, 4, x_9); -x_13 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_3, x_12); -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::apply_2(x_15, lean::box(0), x_4); -x_17 = lean::apply_3(x_10, lean::box(0), x_13, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_3); -lean::dec(x_1); -x_18 = lean::cnstr_get(x_2, 0); -lean::inc(x_18); -lean::dec(x_2); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::apply_2(x_19, lean::box(0), x_4); -return x_20; -} -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = l_String_OldIterator_remaining___main(x_5); -x_7 = l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg(x_1, x_2, x_3, x_4, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg(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_10; obj* x_11; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -lean::dec(x_2); -x_8 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_9 = lean::apply_2(x_7, lean::box(0), x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_10, 0, x_1); -lean::closure_set(x_10, 1, x_3); -lean::closure_set(x_10, 2, x_5); -lean::closure_set(x_10, 3, x_4); -x_11 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_identifier___rarg___lambda__1(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; uint32 x_10; obj* x_11; obj* x_12; obj* x_13; -x_6 = lean::box(0); -x_7 = lean_name_mk_string(x_6, x_5); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 4); -lean::inc(x_9); -lean::dec(x_8); -x_10 = 46; -lean::inc(x_3); -lean::inc(x_2); -x_11 = l_Lean_Parser_MonadParsec_ch___rarg(x_2, x_3, x_10); -x_12 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_11, x_4); -x_13 = l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg(x_2, x_3, x_1, x_7, x_12); -return x_13; -} -} -obj* _init_l_Lean_Parser_identifier___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("identifier"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_Lean_Parser_identifier___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -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_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_5 = l_Lean_Parser_idPart___rarg(x_1, x_2, x_3); -lean::inc(x_5); -lean::inc(x_2); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identifier___rarg___lambda__1), 5, 4); -lean::closure_set(x_6, 0, x_3); -lean::closure_set(x_6, 1, x_1); -lean::closure_set(x_6, 2, x_2); -lean::closure_set(x_6, 3, x_5); -x_7 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_5, x_6); -x_8 = lean::cnstr_get(x_2, 1); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l_Lean_Parser_MonadParsec_try___rarg___closed__1; -lean::inc(x_8); -x_10 = lean::apply_3(x_8, lean::box(0), x_9, x_7); -x_11 = l_Lean_Parser_identifier___rarg___closed__1; -x_12 = lean::apply_3(x_8, lean::box(0), x_11, x_10); -return x_12; -} -} -obj* l_Lean_Parser_identifier(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identifier___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_5); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_MonadParsec_foldlAux___main___at_Lean_Parser_identifier___spec__2(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_foldl___at_Lean_Parser_identifier___spec__1(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_identifier___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_identifier(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_cIdentifier___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Char_isAlphanum(x_10); -if (x_11 == 0) -{ -uint32 x_12; uint8 x_13; -x_12 = 95; -x_13 = x_10 == x_12; -if (x_13 == 0) -{ -obj* x_14; -lean::dec(x_7); -x_14 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::string_push(x_2, x_10); -x_16 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_15; -x_3 = x_16; -goto _start; -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::string_push(x_2, x_10); -x_19 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_18; -x_3 = x_19; -goto _start; -} -} -} -else -{ -obj* x_21; -lean::dec(x_1); -x_21 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_21; -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_cIdentifier___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_cIdentifier___spec__2___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_String_OldIterator_remaining___main(x_2); -x_4 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_cIdentifier___spec__2___rarg(x_3, x_1, x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___rarg___lambda__1), 2, 1); -lean::closure_set(x_4, 0, x_2); -x_5 = lean::apply_2(x_3, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_cIdentifier___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = l_Char_isAlpha(x_9); -if (x_10 == 0) -{ -uint32 x_11; uint8 x_12; -x_11 = 95; -x_12 = x_9 == x_11; -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -lean::dec(x_3); -lean::dec(x_2); -x_13 = l_Char_quoteCore(x_9); -x_14 = l_Char_HasRepr___closed__1; -x_15 = lean::string_append(x_14, x_13); -lean::dec(x_13); -x_16 = lean::string_append(x_15, x_14); -x_17 = lean::box(0); -x_18 = l_mjoin___rarg___closed__1; -x_19 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_16, x_18, x_17, x_17); -return x_19; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; -lean::dec(x_1); -x_20 = lean::box_uint32(x_9); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_21, 0, x_3); -lean::closure_set(x_21, 1, x_20); -x_22 = lean::apply_2(x_2, lean::box(0), x_21); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_1); -x_23 = lean::box_uint32(x_9); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_24, 0, x_3); -lean::closure_set(x_24, 1, x_23); -x_25 = lean::apply_2(x_2, lean::box(0), x_24); -return x_25; -} -} -} -} -obj* l_Lean_Parser_cIdentifier___rarg___lambda__2(obj* x_1, obj* x_2, uint32 x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_String_splitAux___main___closed__1; -x_5 = lean::string_push(x_4, x_3); -x_6 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___rarg(x_2, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_cIdentifier___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("C identifier"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_Lean_Parser_cIdentifier___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_5); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -lean::inc(x_2); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_cIdentifier___rarg___lambda__1), 3, 2); -lean::closure_set(x_8, 0, x_2); -lean::closure_set(x_8, 1, x_5); -lean::inc(x_4); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -lean::inc(x_2); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_cIdentifier___rarg___lambda__2___boxed), 3, 2); -lean::closure_set(x_10, 0, x_1); -lean::closure_set(x_10, 1, x_2); -x_11 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_9, x_10); -x_12 = lean::cnstr_get(x_2, 1); -lean::inc(x_12); -lean::dec(x_2); -x_13 = l_Lean_Parser_MonadParsec_try___rarg___closed__1; -lean::inc(x_12); -x_14 = lean::apply_3(x_12, lean::box(0), x_13, x_11); -x_15 = l_Lean_Parser_cIdentifier___rarg___closed__1; -x_16 = lean::apply_3(x_12, lean::box(0), x_15, x_14); -return x_16; -} -} -obj* l_Lean_Parser_cIdentifier(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_cIdentifier___rarg___boxed), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_cIdentifier___spec__1(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_cIdentifier___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_cIdentifier___rarg___lambda__2(x_1, x_2, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_cIdentifier___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_cIdentifier___rarg(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_Lean_Parser_cIdentifier___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_cIdentifier(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_cppIdentifier___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::cnstr_set(x_5, 1, x_3); -x_6 = l_String_splitAux___main___closed__1; -x_7 = l_List_foldl___main___at_String_join___spec__1(x_6, x_5); -lean::dec(x_5); -x_8 = lean::apply_2(x_4, lean::box(0), x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("::"); -return x_1; -} -} -obj* _init_l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("::"); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_String_append___boxed), 2, 0); -return x_1; -} -} -obj* l_Lean_Parser_cppIdentifier___rarg___lambda__2(obj* x_1, obj* 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; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_7, 2); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__1; -x_12 = l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__2; -lean::inc(x_3); -lean::inc(x_2); -x_13 = l_Lean_Parser_MonadParsec_strCore___rarg(x_2, x_3, x_11, x_12); -x_14 = l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__3; -x_15 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_14, x_13); -x_16 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_15, x_4); -x_17 = l_Lean_Parser_MonadParsec_many___rarg(x_2, x_3, lean::box(0), x_1, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_cppIdentifier___rarg___lambda__1), 3, 2); -lean::closure_set(x_18, 0, x_7); -lean::closure_set(x_18, 1, x_6); -x_19 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_17, x_18); -return x_19; -} -} -obj* _init_l_Lean_Parser_cppIdentifier___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("C++ identifier"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_Lean_Parser_cppIdentifier___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -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_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::inc(x_2); -lean::inc(x_1); -x_5 = l_Lean_Parser_cIdentifier___rarg(x_1, x_2, x_3); -lean::inc(x_4); -lean::inc(x_5); -lean::inc(x_2); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_cppIdentifier___rarg___lambda__2), 6, 5); -lean::closure_set(x_6, 0, x_3); -lean::closure_set(x_6, 1, x_1); -lean::closure_set(x_6, 2, x_2); -lean::closure_set(x_6, 3, x_5); -lean::closure_set(x_6, 4, x_4); -x_7 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_5, x_6); -x_8 = lean::cnstr_get(x_2, 1); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l_Lean_Parser_MonadParsec_try___rarg___closed__1; -lean::inc(x_8); -x_10 = lean::apply_3(x_8, lean::box(0), x_9, x_7); -x_11 = l_Lean_Parser_cppIdentifier___rarg___closed__1; -x_12 = lean::apply_3(x_8, lean::box(0), x_11, x_10); -return x_12; -} -} -obj* l_Lean_Parser_cppIdentifier(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_cppIdentifier___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_cppIdentifier___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_cppIdentifier(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* initialize_init_data_char_basic(obj*); -obj* initialize_init_lean_parser_parsec(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_identifier(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_data_char_basic(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_parsec(w); -if (io_result_is_error(w)) return w; -l_Lean_idBeginEscape = _init_l_Lean_idBeginEscape(); -l_Lean_idEndEscape = _init_l_Lean_idEndEscape(); -l_Lean_Parser_idPart___rarg___closed__1 = _init_l_Lean_Parser_idPart___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_idPart___rarg___closed__1); -l_Lean_Parser_identifier___rarg___closed__1 = _init_l_Lean_Parser_identifier___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_identifier___rarg___closed__1); -l_Lean_Parser_cIdentifier___rarg___closed__1 = _init_l_Lean_Parser_cIdentifier___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_cIdentifier___rarg___closed__1); -l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__1 = _init_l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__1); -l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__2 = _init_l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__2(); -lean::mark_persistent(l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__2); -l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__3 = _init_l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__3(); -lean::mark_persistent(l_Lean_Parser_cppIdentifier___rarg___lambda__2___closed__3); -l_Lean_Parser_cppIdentifier___rarg___closed__1 = _init_l_Lean_Parser_cppIdentifier___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_cppIdentifier___rarg___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/level.cpp b/src/stage0/init/lean/parser/level.cpp deleted file mode 100644 index 616aea026d..0000000000 --- a/src/stage0/init/lean/parser/level.cpp +++ /dev/null @@ -1,10734 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.level -// Imports: init.lean.parser.pratt -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_Level_leading_Parser___closed__1; -obj* l_Lean_Parser_prattParser_View___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_fixCore___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_monadParsecTrans___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec; -obj* l_Lean_Parser_LevelParserM_Monad; -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView___boxed(obj*); -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -extern obj* l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -extern obj* l_Lean_Parser_BasicParserM_Alternative; -obj* l_Lean_Parser_Level_app_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_trailingLevelParserCoe(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Trie_oldMatchPrefix___rarg(obj*, obj*); -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_symbol_tokens___rarg(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_Level_paren; -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*, obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2(obj*, obj*, obj*, 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_app_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___closed__1; -extern obj* l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -obj* l_Lean_Parser_MonadRec_trans___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_trailing_HasView; -obj* l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -extern obj* l_mjoin___rarg___closed__1; -extern obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -extern obj* l_Lean_Parser_finishCommentBlock___closed__2; -obj* l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_addLit_HasView_x27; -extern obj* l_Lean_Parser_BasicParserM_Monad; -obj* l_Lean_Parser_LevelParserM_MonadExcept; -extern obj* l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -obj* l_Lean_Parser_TrailingLevelParserM_Alternative; -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__1; -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_Level_app_HasView_x27___elambda__2(obj*); -obj* l_List_reverse___rarg(obj*); -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3; -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3(obj*); -obj* l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Level_leading_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_currLbp___at_Lean_Parser_levelParser_run___spec__4(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5(obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_paren_Parser___closed__1; -obj* l_id___rarg___boxed(obj*); -obj* l_Lean_Parser_Level_app; -obj* l_String_OldIterator_remaining___main(obj*); -obj* l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_Level_addLit; -obj* l_Lean_Parser_Combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_LevelParserM_Lean_Parser_MonadRec; -obj* l_Lean_Parser_Level_paren_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_number_HasView; -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Substring_toString(obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_addLit_HasView; -obj* l_Lean_Parser_LevelParserM_MonadReader; -obj* l_Lean_Parser_levelParserCoe; -obj* l_Lean_Parser_currLbp___at_Lean_Parser_levelParser_run___spec__4___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_currLbp___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__3; -obj* l_ReaderT_read___rarg(obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Parser_Level_trailing_Parser(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_Level_app_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Level_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_BasicParserM_MonadReader; -obj* l_Lean_Parser_Combinators_recurse_view___rarg(obj*, obj*); -obj* l_ReaderT_Monad___rarg(obj*); -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_number; -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*); -obj* l_Lean_Parser_TrailingLevelParserM_MonadExcept; -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_app_HasView_x27; -obj* l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens(obj*); -obj* l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Level_leading_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_LevelParserM_Lean_Parser_monadBasicParser; -obj* l_Lean_Parser_Level_getLeading(obj*, obj*, obj*, obj*, obj*); -obj* l_hasMonadLiftTTrans___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -namespace lean { -uint8 nat_dec_lt(obj*, obj*); -} -obj* l_Lean_Parser_Level_trailing_Parser___closed__1; -obj* l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasView; -obj* l_hasMonadLiftTRefl___boxed(obj*, obj*); -extern obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -obj* l_Lean_Parser_Level_paren_HasView_x27; -obj* l_Lean_Parser_Level_leading_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_matchToken___closed__1; -obj* l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -obj* l_List_append___rarg(obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_LevelParserM_Alternative; -obj* l_Lean_Parser_Level_addLit_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj*, obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_tokens___rarg(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_Level_paren_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_trailing_HasView_x27; -extern obj* l_Lean_Parser_peekToken___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_paren_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3(obj*); -obj* l_Lean_Parser_Level_paren_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens___boxed(obj*); -obj* l_Lean_Parser_Level_trailing_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasView(obj*); -obj* l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Level_addLit_Parser___closed__1; -obj* l_Lean_Parser_Level_trailing; -namespace lean { -uint8 string_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_Level_leading; -obj* l_Lean_Parser_Combinators_label_view___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_Level_app_Parser___spec__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_app_HasView; -extern obj* l_Lean_Parser_maxPrec; -obj* l_Lean_Parser_Level_Parser___closed__1; -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2; -obj* l_String_trim(obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj*); -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_trailingLevelParserCoe___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_MonadFunctor___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -obj* l_Lean_Parser_Level_Lean_Parser_HasView; -obj* l_Lean_Parser_TrailingLevelParserM_MonadReader; -obj* l_ReaderT_MonadExcept___rarg(obj*); -extern "C" obj* lean_name_mk_numeral(obj*, obj*); -obj* l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_token(obj*, obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_leading_HasView_x27; -obj* l_Lean_Parser_List_cons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_Level_app_Parser___closed__1; -obj* l_Lean_Parser_RecT_recurse___at_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_app_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadParsec; -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___boxed(obj*); -obj* l_Lean_Parser_Level_getLeading___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -obj* l_Lean_Parser_levelParser_run(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -obj* l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Level_addLit_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Level_leading_HasView; -obj* l_Lean_Parser_Level_app_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadRec; -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens___closed__1; -obj* l_Lean_Parser_RecT_recurse___rarg(obj*, obj*); -extern obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2(obj*); -obj* l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasView___closed__1; -obj* l_ReaderT_Alternative___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView(obj*); -obj* l_Lean_Parser_detailIdent_Parser___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_addLit_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2(obj*); -obj* l_Lean_Parser_Level_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__1; -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_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_String_quote(obj*); -obj* l_Lean_Parser_Substring_ofString(obj*); -extern obj* l_Lean_Parser_BasicParserM_MonadExcept; -obj* l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__2; -obj* l_ReaderT_lift___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Level_paren_HasView; -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_TrailingLevelParserM_Monad; -extern obj* l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens(obj*); -obj* l_Lean_Parser_Level_trailing_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_TrailingLevelParserM_Lean_Parser_monadBasicParser; -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___closed__1; -obj* _init_l_Lean_Parser_LevelParserM_Monad() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_BasicParserM_Monad; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_LevelParserM_Alternative() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_BasicParserM_Monad; -x_2 = l_Lean_Parser_BasicParserM_Alternative; -x_3 = l_ReaderT_Alternative___rarg(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_LevelParserM_MonadReader() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_BasicParserM_MonadReader; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___rarg___boxed), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_BasicParserM_Monad; -x_2 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_3 = l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(x_1, lean::box(0), x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_LevelParserM_MonadExcept() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_BasicParserM_MonadExcept; -x_2 = l_ReaderT_MonadExcept___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_LevelParserM_Lean_Parser_MonadRec() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___rarg), 2, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_LevelParserM_Lean_Parser_monadBasicParser() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_BasicParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_hasMonadLiftTRefl___boxed), 2, 1); -lean::closure_set(x_3, 0, lean::box(0)); -x_4 = lean::alloc_closure(reinterpret_cast(l_hasMonadLiftTTrans___rarg), 4, 2); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_TrailingLevelParserM_Monad() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_LevelParserM_Monad; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TrailingLevelParserM_Alternative() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_LevelParserM_Monad; -x_2 = l_Lean_Parser_LevelParserM_Alternative; -x_3 = l_ReaderT_Alternative___rarg(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_TrailingLevelParserM_MonadReader() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_LevelParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_read___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadParsec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_LevelParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_MonadFunctor___boxed), 6, 5); -lean::closure_set(x_3, 0, lean::box(0)); -lean::closure_set(x_3, 1, lean::box(0)); -lean::closure_set(x_3, 2, lean::box(0)); -lean::closure_set(x_3, 3, x_1); -lean::closure_set(x_3, 4, x_1); -x_4 = l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec; -x_5 = l_Lean_Parser_monadParsecTrans___rarg(x_2, x_3, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_TrailingLevelParserM_MonadExcept() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_LevelParserM_MonadExcept; -x_2 = l_ReaderT_MonadExcept___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadRec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_LevelParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -x_3 = l_Lean_Parser_LevelParserM_Lean_Parser_MonadRec; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadRec_trans___rarg___boxed), 4, 3); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -lean::closure_set(x_4, 2, x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_TrailingLevelParserM_Lean_Parser_monadBasicParser() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_LevelParserM_Monad; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -x_3 = l_Lean_Parser_LevelParserM_Lean_Parser_monadBasicParser; -x_4 = lean::alloc_closure(reinterpret_cast(l_hasMonadLiftTTrans___rarg), 4, 2); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_trailingLevelParserCoe(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_trailingLevelParserCoe___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_trailingLevelParserCoe(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_RecT_recurse___at_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::apply_4(x_2, x_1, x_3, x_4, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Level_Parser_Lean_Parser_HasView___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("universe Level"); -return x_1; -} -} -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasView(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::inc(x_1); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___at_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___spec__1), 5, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = l_Lean_Parser_LevelParserM_Lean_Parser_MonadRec; -x_4 = l_Lean_Parser_Combinators_recurse_view___rarg(x_1, x_3); -lean::dec(x_1); -x_5 = l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec; -x_6 = l_Lean_Parser_LevelParserM_Alternative; -x_7 = l_Lean_Parser_Level_Parser_Lean_Parser_HasView___closed__1; -x_8 = l_Lean_Parser_Combinators_label_view___rarg(x_5, x_6, x_2, x_7, x_4); -lean::dec(x_2); -return x_8; -} -} -obj* _init_l_Lean_Parser_Level_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("universe Level"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Level_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::apply_4(x_2, x_1, x_3, x_4, x_5); -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = l_Lean_Parser_Level_Parser___closed__1; -x_10 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_8, x_9); -lean::cnstr_set(x_6, 0, x_10); -return x_6; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_6, 0); -x_12 = lean::cnstr_get(x_6, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_6); -x_13 = l_Lean_Parser_Level_Parser___closed__1; -x_14 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_11, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_12); -return x_15; -} -} -} -obj* l_Lean_Parser_Level_getLeading(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; -x_6 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_4); -lean::cnstr_set(x_7, 2, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_5); -return x_8; -} -} -obj* l_Lean_Parser_Level_getLeading___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Level_getLeading(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_6; -} -} -obj* _init_l_Lean_Parser_Level_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; -x_1 = lean::box(0); -return x_1; -} -} -obj* _init_l_Lean_Parser_Level_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -lean::inc(x_1); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Level_paren() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Level"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("paren"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Level_paren_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_6 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_3); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::box(3); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -x_10 = l_Lean_Parser_Level_paren; -x_11 = l_Lean_Parser_Syntax_mkNode(x_10, x_9); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_12 = lean::cnstr_get(x_4, 0); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_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_5); -lean::inc(x_3); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_3); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::box(3); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_15); -x_18 = l_Lean_Parser_Level_paren; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_3); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_3); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Level_paren; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_27 = lean::cnstr_get(x_4, 0); -lean::inc(x_27); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_5); -lean::inc(x_3); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_3); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_21); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_Lean_Parser_Level_paren; -x_33 = l_Lean_Parser_Syntax_mkNode(x_32, x_31); -return x_33; -} -} -} -} -obj* _init_l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -lean::cnstr_set(x_3, 2, x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_Level_paren_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_14; obj* x_15; obj* x_28; -x_28 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; -x_29 = l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__2; -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -lean::dec(x_28); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = lean::box(3); -x_14 = x_31; -x_15 = x_32; -goto block_27; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -lean::dec(x_31); -x_14 = x_34; -x_15 = x_33; -goto block_27; -} -} -block_13: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_3); -lean::cnstr_set(x_6, 2, x_5); -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_3); -lean::cnstr_set(x_10, 2, x_9); -return x_10; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_3); -lean::cnstr_set(x_12, 2, x_11); -return x_12; -} -} -} -block_27: -{ -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -lean::dec(x_15); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::box(0); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -lean::cnstr_set(x_20, 2, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_14, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_14, 1); -lean::inc(x_22); -lean::dec(x_14); -x_2 = x_17; -x_3 = x_21; -x_4 = x_22; -goto block_13; -} -} -else -{ -lean::dec(x_15); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_23; -x_23 = l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__1; -return x_23; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_14, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_14, 1); -lean::inc(x_25); -lean::dec(x_14); -x_26 = lean::box(0); -x_2 = x_26; -x_3 = x_24; -x_4 = x_25; -goto block_13; -} -} -} -} -} -obj* _init_l_Lean_Parser_Level_paren_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_paren_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_paren_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Level_paren_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Level_paren_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Level_paren_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Level_paren_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1(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_10; -lean::inc(x_1); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_1); -lean::inc(x_6); -lean::inc(x_5); -x_9 = l_Lean_Parser_token(x_5, x_6, x_7); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; uint8 x_14; -x_12 = lean::cnstr_get(x_9, 1); -x_13 = lean::cnstr_get(x_9, 0); -lean::dec(x_13); -x_14 = !lean::is_exclusive(x_10); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_10, 0); -x_16 = lean::cnstr_get(x_10, 1); -x_17 = lean::cnstr_get(x_10, 2); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_39; obj* x_40; uint8 x_41; -x_39 = lean::cnstr_get(x_15, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -lean::dec(x_39); -x_41 = lean::string_dec_eq(x_1, x_40); -lean::dec(x_1); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -lean::free_heap_obj(x_10); -lean::free_heap_obj(x_9); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_6); -x_43 = lean::box(0); -x_44 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_40, x_3, x_42, x_43, x_5, x_16, x_12); -lean::dec(x_5); -lean::dec(x_42); -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -if (lean::obj_tag(x_45) == 0) -{ -uint8 x_46; -x_46 = !lean::is_exclusive(x_44); -if (x_46 == 0) -{ -obj* x_47; uint8 x_48; -x_47 = lean::cnstr_get(x_44, 0); -lean::dec(x_47); -x_48 = !lean::is_exclusive(x_45); -if (x_48 == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_49 = lean::cnstr_get(x_45, 2); -x_50 = lean::cnstr_get(x_45, 0); -lean::dec(x_50); -x_51 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_45, 2, x_51); -lean::cnstr_set(x_45, 0, x_15); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_49, x_45); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_52); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_53); -x_55 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_54, x_8); -x_56 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_55); -lean::cnstr_set(x_44, 0, x_56); -return x_44; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_57 = lean::cnstr_get(x_45, 1); -x_58 = lean::cnstr_get(x_45, 2); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_45); -x_59 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_60 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_60, 0, x_15); -lean::cnstr_set(x_60, 1, x_57); -lean::cnstr_set(x_60, 2, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_62); -x_64 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_63, x_8); -x_65 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_64); -lean::cnstr_set(x_44, 0, x_65); -return x_44; -} -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_66 = lean::cnstr_get(x_44, 1); -lean::inc(x_66); -lean::dec(x_44); -x_67 = lean::cnstr_get(x_45, 1); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_45, 2); -lean::inc(x_68); -if (lean::is_exclusive(x_45)) { - lean::cnstr_release(x_45, 0); - lean::cnstr_release(x_45, 1); - lean::cnstr_release(x_45, 2); - x_69 = x_45; -} else { - lean::dec_ref(x_45); - x_69 = lean::box(0); -} -x_70 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_69)) { - x_71 = lean::alloc_cnstr(0, 3, 0); -} else { - x_71 = x_69; -} -lean::cnstr_set(x_71, 0, x_15); -lean::cnstr_set(x_71, 1, x_67); -lean::cnstr_set(x_71, 2, x_70); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_68, x_71); -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_72); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_70, x_73); -x_75 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_74, x_8); -x_76 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_75); -x_77 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_66); -return x_77; -} -} -else -{ -uint8 x_78; -lean::dec(x_15); -x_78 = !lean::is_exclusive(x_44); -if (x_78 == 0) -{ -obj* x_79; uint8 x_80; -x_79 = lean::cnstr_get(x_44, 0); -lean::dec(x_79); -x_80 = !lean::is_exclusive(x_45); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_45); -x_82 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_82, x_81); -x_84 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_83, x_8); -x_85 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_84); -lean::cnstr_set(x_44, 0, x_85); -return x_44; -} -else -{ -obj* x_86; uint8 x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_86 = lean::cnstr_get(x_45, 0); -x_87 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); -lean::inc(x_86); -lean::dec(x_45); -x_88 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_88, 0, x_86); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_87); -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_88); -x_90 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_89); -x_92 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_91, x_8); -x_93 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_92); -lean::cnstr_set(x_44, 0, x_93); -return x_44; -} -} -else -{ -obj* x_94; obj* x_95; uint8 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; -x_94 = lean::cnstr_get(x_44, 1); -lean::inc(x_94); -lean::dec(x_44); -x_95 = lean::cnstr_get(x_45, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); -if (lean::is_exclusive(x_45)) { - lean::cnstr_release(x_45, 0); - x_97 = x_45; -} else { - lean::dec_ref(x_45); - x_97 = lean::box(0); -} -if (lean::is_scalar(x_97)) { - x_98 = lean::alloc_cnstr(1, 1, 1); -} else { - x_98 = x_97; -} -lean::cnstr_set(x_98, 0, x_95); -lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96); -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_98); -x_100 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_100, x_99); -x_102 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_101, x_8); -x_103 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_102); -x_104 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_94); -return x_104; -} -} -} -else -{ -obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -lean::dec(x_40); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -x_105 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_10, 2, x_105); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_10); -x_107 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_107, x_106); -x_109 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_108, x_8); -x_110 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_109); -lean::cnstr_set(x_9, 0, x_110); -return x_9; -} -} -else -{ -obj* x_111; -lean::free_heap_obj(x_10); -lean::dec(x_15); -lean::free_heap_obj(x_9); -lean::dec(x_1); -x_111 = lean::box(0); -x_18 = x_111; -goto block_38; -} -block_38: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -lean::dec(x_18); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_6); -x_20 = lean::box(0); -x_21 = l_String_splitAux___main___closed__1; -x_22 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_21, x_3, x_19, x_20, x_5, x_16, x_12); -lean::dec(x_5); -lean::dec(x_19); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_24 = lean::cnstr_get(x_22, 0); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_24); -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_25); -x_28 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_27, x_8); -x_29 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_28); -lean::cnstr_set(x_22, 0, x_29); -return x_22; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_30 = lean::cnstr_get(x_22, 0); -x_31 = lean::cnstr_get(x_22, 1); -lean::inc(x_31); -lean::inc(x_30); -lean::dec(x_22); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_30); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_32); -x_35 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_34, x_8); -x_36 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_35); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_31); -return x_37; -} -} -} -else -{ -obj* x_112; obj* x_113; obj* x_114; obj* x_115; -x_112 = lean::cnstr_get(x_10, 0); -x_113 = lean::cnstr_get(x_10, 1); -x_114 = lean::cnstr_get(x_10, 2); -lean::inc(x_114); -lean::inc(x_113); -lean::inc(x_112); -lean::dec(x_10); -if (lean::obj_tag(x_112) == 0) -{ -obj* x_130; obj* x_131; uint8 x_132; -x_130 = lean::cnstr_get(x_112, 0); -lean::inc(x_130); -x_131 = lean::cnstr_get(x_130, 1); -lean::inc(x_131); -lean::dec(x_130); -x_132 = lean::string_dec_eq(x_1, x_131); -lean::dec(x_1); -if (x_132 == 0) -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; -lean::free_heap_obj(x_9); -x_133 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_133, 0, x_6); -x_134 = lean::box(0); -x_135 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_131, x_3, x_133, x_134, x_5, x_113, x_12); -lean::dec(x_5); -lean::dec(x_133); -x_136 = lean::cnstr_get(x_135, 0); -lean::inc(x_136); -if (lean::obj_tag(x_136) == 0) -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; -x_137 = lean::cnstr_get(x_135, 1); -lean::inc(x_137); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - lean::cnstr_release(x_135, 1); - x_138 = x_135; -} else { - lean::dec_ref(x_135); - x_138 = lean::box(0); -} -x_139 = lean::cnstr_get(x_136, 1); -lean::inc(x_139); -x_140 = lean::cnstr_get(x_136, 2); -lean::inc(x_140); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - lean::cnstr_release(x_136, 2); - x_141 = x_136; -} else { - lean::dec_ref(x_136); - x_141 = lean::box(0); -} -x_142 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_141)) { - x_143 = lean::alloc_cnstr(0, 3, 0); -} else { - x_143 = x_141; -} -lean::cnstr_set(x_143, 0, x_112); -lean::cnstr_set(x_143, 1, x_139); -lean::cnstr_set(x_143, 2, x_142); -x_144 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_140, x_143); -x_145 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_114, x_144); -x_146 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_142, x_145); -x_147 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_146, x_8); -x_148 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_147); -if (lean::is_scalar(x_138)) { - x_149 = lean::alloc_cnstr(0, 2, 0); -} else { - x_149 = x_138; -} -lean::cnstr_set(x_149, 0, x_148); -lean::cnstr_set(x_149, 1, x_137); -return x_149; -} -else -{ -obj* x_150; obj* x_151; obj* x_152; uint8 x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; -lean::dec(x_112); -x_150 = lean::cnstr_get(x_135, 1); -lean::inc(x_150); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - lean::cnstr_release(x_135, 1); - x_151 = x_135; -} else { - lean::dec_ref(x_135); - x_151 = lean::box(0); -} -x_152 = lean::cnstr_get(x_136, 0); -lean::inc(x_152); -x_153 = lean::cnstr_get_scalar(x_136, sizeof(void*)*1); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - x_154 = x_136; -} else { - lean::dec_ref(x_136); - x_154 = lean::box(0); -} -if (lean::is_scalar(x_154)) { - x_155 = lean::alloc_cnstr(1, 1, 1); -} else { - x_155 = x_154; -} -lean::cnstr_set(x_155, 0, x_152); -lean::cnstr_set_scalar(x_155, sizeof(void*)*1, x_153); -x_156 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_114, x_155); -x_157 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_158 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_157, x_156); -x_159 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_158, x_8); -x_160 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_159); -if (lean::is_scalar(x_151)) { - x_161 = lean::alloc_cnstr(0, 2, 0); -} else { - x_161 = x_151; -} -lean::cnstr_set(x_161, 0, x_160); -lean::cnstr_set(x_161, 1, x_150); -return x_161; -} -} -else -{ -obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; -lean::dec(x_131); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -x_162 = l_Lean_Parser_finishCommentBlock___closed__2; -x_163 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_163, 0, x_112); -lean::cnstr_set(x_163, 1, x_113); -lean::cnstr_set(x_163, 2, x_162); -x_164 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_114, x_163); -x_165 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_166 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_165, x_164); -x_167 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_166, x_8); -x_168 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_167); -lean::cnstr_set(x_9, 0, x_168); -return x_9; -} -} -else -{ -obj* x_169; -lean::dec(x_112); -lean::free_heap_obj(x_9); -lean::dec(x_1); -x_169 = lean::box(0); -x_115 = x_169; -goto block_129; -} -block_129: -{ -obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; -lean::dec(x_115); -x_116 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_116, 0, x_6); -x_117 = lean::box(0); -x_118 = l_String_splitAux___main___closed__1; -x_119 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_118, x_3, x_116, x_117, x_5, x_113, x_12); -lean::dec(x_5); -lean::dec(x_116); -x_120 = lean::cnstr_get(x_119, 0); -lean::inc(x_120); -x_121 = lean::cnstr_get(x_119, 1); -lean::inc(x_121); -if (lean::is_exclusive(x_119)) { - lean::cnstr_release(x_119, 0); - lean::cnstr_release(x_119, 1); - x_122 = x_119; -} else { - lean::dec_ref(x_119); - x_122 = lean::box(0); -} -x_123 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_114, x_120); -x_124 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_125 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_124, x_123); -x_126 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_125, x_8); -x_127 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_126); -if (lean::is_scalar(x_122)) { - x_128 = lean::alloc_cnstr(0, 2, 0); -} else { - x_128 = x_122; -} -lean::cnstr_set(x_128, 0, x_127); -lean::cnstr_set(x_128, 1, x_121); -return x_128; -} -} -} -else -{ -obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; -x_170 = lean::cnstr_get(x_9, 1); -lean::inc(x_170); -lean::dec(x_9); -x_171 = lean::cnstr_get(x_10, 0); -lean::inc(x_171); -x_172 = lean::cnstr_get(x_10, 1); -lean::inc(x_172); -x_173 = lean::cnstr_get(x_10, 2); -lean::inc(x_173); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - lean::cnstr_release(x_10, 2); - x_174 = x_10; -} else { - lean::dec_ref(x_10); - x_174 = lean::box(0); -} -if (lean::obj_tag(x_171) == 0) -{ -obj* x_190; obj* x_191; uint8 x_192; -x_190 = lean::cnstr_get(x_171, 0); -lean::inc(x_190); -x_191 = lean::cnstr_get(x_190, 1); -lean::inc(x_191); -lean::dec(x_190); -x_192 = lean::string_dec_eq(x_1, x_191); -lean::dec(x_1); -if (x_192 == 0) -{ -obj* x_193; obj* x_194; obj* x_195; obj* x_196; -lean::dec(x_174); -x_193 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_193, 0, x_6); -x_194 = lean::box(0); -x_195 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_191, x_3, x_193, x_194, x_5, x_172, x_170); -lean::dec(x_5); -lean::dec(x_193); -x_196 = lean::cnstr_get(x_195, 0); -lean::inc(x_196); -if (lean::obj_tag(x_196) == 0) -{ -obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; -x_197 = lean::cnstr_get(x_195, 1); -lean::inc(x_197); -if (lean::is_exclusive(x_195)) { - lean::cnstr_release(x_195, 0); - lean::cnstr_release(x_195, 1); - x_198 = x_195; -} else { - lean::dec_ref(x_195); - x_198 = lean::box(0); -} -x_199 = lean::cnstr_get(x_196, 1); -lean::inc(x_199); -x_200 = lean::cnstr_get(x_196, 2); -lean::inc(x_200); -if (lean::is_exclusive(x_196)) { - lean::cnstr_release(x_196, 0); - lean::cnstr_release(x_196, 1); - lean::cnstr_release(x_196, 2); - x_201 = x_196; -} else { - lean::dec_ref(x_196); - x_201 = lean::box(0); -} -x_202 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_201)) { - x_203 = lean::alloc_cnstr(0, 3, 0); -} else { - x_203 = x_201; -} -lean::cnstr_set(x_203, 0, x_171); -lean::cnstr_set(x_203, 1, x_199); -lean::cnstr_set(x_203, 2, x_202); -x_204 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_200, x_203); -x_205 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_173, x_204); -x_206 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_202, x_205); -x_207 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_206, x_8); -x_208 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_207); -if (lean::is_scalar(x_198)) { - x_209 = lean::alloc_cnstr(0, 2, 0); -} else { - x_209 = x_198; -} -lean::cnstr_set(x_209, 0, x_208); -lean::cnstr_set(x_209, 1, x_197); -return x_209; -} -else -{ -obj* x_210; obj* x_211; obj* x_212; uint8 x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; -lean::dec(x_171); -x_210 = lean::cnstr_get(x_195, 1); -lean::inc(x_210); -if (lean::is_exclusive(x_195)) { - lean::cnstr_release(x_195, 0); - lean::cnstr_release(x_195, 1); - x_211 = x_195; -} else { - lean::dec_ref(x_195); - x_211 = lean::box(0); -} -x_212 = lean::cnstr_get(x_196, 0); -lean::inc(x_212); -x_213 = lean::cnstr_get_scalar(x_196, sizeof(void*)*1); -if (lean::is_exclusive(x_196)) { - lean::cnstr_release(x_196, 0); - x_214 = x_196; -} else { - lean::dec_ref(x_196); - x_214 = lean::box(0); -} -if (lean::is_scalar(x_214)) { - x_215 = lean::alloc_cnstr(1, 1, 1); -} else { - x_215 = x_214; -} -lean::cnstr_set(x_215, 0, x_212); -lean::cnstr_set_scalar(x_215, sizeof(void*)*1, x_213); -x_216 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_173, x_215); -x_217 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_218 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_217, x_216); -x_219 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_218, x_8); -x_220 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_219); -if (lean::is_scalar(x_211)) { - x_221 = lean::alloc_cnstr(0, 2, 0); -} else { - x_221 = x_211; -} -lean::cnstr_set(x_221, 0, x_220); -lean::cnstr_set(x_221, 1, x_210); -return x_221; -} -} -else -{ -obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; -lean::dec(x_191); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -x_222 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_174)) { - x_223 = lean::alloc_cnstr(0, 3, 0); -} else { - x_223 = x_174; -} -lean::cnstr_set(x_223, 0, x_171); -lean::cnstr_set(x_223, 1, x_172); -lean::cnstr_set(x_223, 2, x_222); -x_224 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_173, x_223); -x_225 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_226 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_225, x_224); -x_227 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_226, x_8); -x_228 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_227); -x_229 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_229, 0, x_228); -lean::cnstr_set(x_229, 1, x_170); -return x_229; -} -} -else -{ -obj* x_230; -lean::dec(x_174); -lean::dec(x_171); -lean::dec(x_1); -x_230 = lean::box(0); -x_175 = x_230; -goto block_189; -} -block_189: -{ -obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; -lean::dec(x_175); -x_176 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_176, 0, x_6); -x_177 = lean::box(0); -x_178 = l_String_splitAux___main___closed__1; -x_179 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_178, x_3, x_176, x_177, x_5, x_172, x_170); -lean::dec(x_5); -lean::dec(x_176); -x_180 = lean::cnstr_get(x_179, 0); -lean::inc(x_180); -x_181 = lean::cnstr_get(x_179, 1); -lean::inc(x_181); -if (lean::is_exclusive(x_179)) { - lean::cnstr_release(x_179, 0); - lean::cnstr_release(x_179, 1); - x_182 = x_179; -} else { - lean::dec_ref(x_179); - x_182 = lean::box(0); -} -x_183 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_173, x_180); -x_184 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_185 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_184, x_183); -x_186 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_185, x_8); -x_187 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_186); -if (lean::is_scalar(x_182)) { - x_188 = lean::alloc_cnstr(0, 2, 0); -} else { - x_188 = x_182; -} -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set(x_188, 1, x_181); -return x_188; -} -} -} -else -{ -uint8 x_231; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_1); -x_231 = !lean::is_exclusive(x_9); -if (x_231 == 0) -{ -obj* x_232; uint8 x_233; -x_232 = lean::cnstr_get(x_9, 0); -lean::dec(x_232); -x_233 = !lean::is_exclusive(x_10); -if (x_233 == 0) -{ -obj* x_234; obj* x_235; obj* x_236; obj* x_237; -x_234 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_235 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_234, x_10); -x_236 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_235, x_8); -x_237 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_236); -lean::cnstr_set(x_9, 0, x_237); -return x_9; -} -else -{ -obj* x_238; uint8 x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; -x_238 = lean::cnstr_get(x_10, 0); -x_239 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_238); -lean::dec(x_10); -x_240 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_240, 0, x_238); -lean::cnstr_set_scalar(x_240, sizeof(void*)*1, x_239); -x_241 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_242 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_241, x_240); -x_243 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_242, x_8); -x_244 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_243); -lean::cnstr_set(x_9, 0, x_244); -return x_9; -} -} -else -{ -obj* x_245; obj* x_246; uint8 x_247; obj* x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; -x_245 = lean::cnstr_get(x_9, 1); -lean::inc(x_245); -lean::dec(x_9); -x_246 = lean::cnstr_get(x_10, 0); -lean::inc(x_246); -x_247 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_248 = x_10; -} else { - lean::dec_ref(x_10); - x_248 = lean::box(0); -} -if (lean::is_scalar(x_248)) { - x_249 = lean::alloc_cnstr(1, 1, 1); -} else { - x_249 = x_248; -} -lean::cnstr_set(x_249, 0, x_246); -lean::cnstr_set_scalar(x_249, sizeof(void*)*1, x_247); -x_250 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_251 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_250, x_249); -x_252 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_251, x_8); -x_253 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_252); -x_254 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_254, 0, x_253); -lean::cnstr_set(x_254, 1, x_245); -return x_254; -} -} -} -} -obj* _init_l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("("); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_nat_obj(0u); -x_5 = l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens(x_4); -x_6 = lean::mk_string(")"); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_4); -lean::dec(x_6); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_8); -lean::dec(x_7); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_9); -lean::dec(x_9); -lean::dec(x_5); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_10); -lean::dec(x_10); -lean::dec(x_3); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -return x_12; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed(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; -x_8 = l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_4); -lean::dec(x_2); -return x_8; -} -} -obj* _init_l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_Parser), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string(")"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_6); -lean::closure_set(x_11, 2, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_5); -lean::cnstr_set(x_15, 1, x_14); -x_16 = l_Lean_Parser_LevelParserM_Monad; -x_17 = l_Lean_Parser_LevelParserM_MonadExcept; -x_18 = l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec; -x_19 = l_Lean_Parser_LevelParserM_Alternative; -x_20 = l_Lean_Parser_Level_paren; -x_21 = l_Lean_Parser_Level_paren_HasView; -x_22 = l_Lean_Parser_Combinators_node_view___rarg(x_16, x_17, x_18, x_19, x_20, x_15, x_21); -lean::dec(x_15); -return x_22; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_Level_paren_Parser___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_8 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_6); -lean::cnstr_set(x_9, 2, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_7); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_67; obj* x_68; -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_13 = x_3; -} else { - lean::dec_ref(x_3); - x_13 = lean::box(0); -} -lean::inc(x_5); -lean::inc(x_4); -x_67 = lean::apply_4(x_11, x_4, x_5, x_6, x_7); -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = lean::cnstr_get(x_67, 1); -lean::inc(x_69); -lean::dec(x_67); -x_14 = x_68; -x_15 = x_69; -goto block_66; -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_70; -x_70 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -if (x_70 == 0) -{ -obj* x_71; uint8 x_72; -x_71 = lean::cnstr_get(x_67, 1); -lean::inc(x_71); -lean::dec(x_67); -x_72 = !lean::is_exclusive(x_68); -if (x_72 == 0) -{ -uint8 x_73; -x_73 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_73); -x_14 = x_68; -x_15 = x_71; -goto block_66; -} -else -{ -obj* x_74; uint8 x_75; obj* x_76; -x_74 = lean::cnstr_get(x_68, 0); -lean::inc(x_74); -lean::dec(x_68); -x_75 = 0; -x_76 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_76, 0, x_74); -lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_75); -x_14 = x_76; -x_15 = x_71; -goto block_66; -} -} -else -{ -obj* x_77; uint8 x_78; -x_77 = lean::cnstr_get(x_67, 1); -lean::inc(x_77); -lean::dec(x_67); -x_78 = !lean::is_exclusive(x_68); -if (x_78 == 0) -{ -uint8 x_79; -x_79 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_79); -x_14 = x_68; -x_15 = x_77; -goto block_66; -} -else -{ -obj* x_80; uint8 x_81; obj* x_82; -x_80 = lean::cnstr_get(x_68, 0); -lean::inc(x_80); -lean::dec(x_68); -x_81 = 1; -x_82 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_82, 0, x_80); -lean::cnstr_set_scalar(x_82, sizeof(void*)*1, x_81); -x_14 = x_82; -x_15 = x_77; -goto block_66; -} -} -} -else -{ -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_68, 0); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_83, 3); -lean::inc(x_84); -if (lean::obj_tag(x_84) == 0) -{ -obj* x_85; uint8 x_86; -x_85 = lean::cnstr_get(x_67, 1); -lean::inc(x_85); -lean::dec(x_67); -x_86 = !lean::is_exclusive(x_68); -if (x_86 == 0) -{ -uint8 x_87; obj* x_88; uint8 x_89; -x_87 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -x_88 = lean::cnstr_get(x_68, 0); -lean::dec(x_88); -x_89 = !lean::is_exclusive(x_83); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -x_90 = lean::cnstr_get(x_83, 3); -lean::dec(x_90); -x_91 = lean::box(3); -lean::inc(x_2); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_2); -x_93 = l_List_reverse___rarg(x_92); -lean::inc(x_1); -x_94 = l_Lean_Parser_Syntax_mkNode(x_1, x_93); -x_95 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_83, 3, x_95); -if (x_87 == 0) -{ -uint8 x_96; -x_96 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_96); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_97; -x_97 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_97); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -} -else -{ -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; -x_98 = lean::cnstr_get(x_83, 0); -x_99 = lean::cnstr_get(x_83, 1); -x_100 = lean::cnstr_get(x_83, 2); -lean::inc(x_100); -lean::inc(x_99); -lean::inc(x_98); -lean::dec(x_83); -x_101 = lean::box(3); -lean::inc(x_2); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_2); -x_103 = l_List_reverse___rarg(x_102); -lean::inc(x_1); -x_104 = l_Lean_Parser_Syntax_mkNode(x_1, x_103); -x_105 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_105, 0, x_104); -x_106 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_106, 0, x_98); -lean::cnstr_set(x_106, 1, x_99); -lean::cnstr_set(x_106, 2, x_100); -lean::cnstr_set(x_106, 3, x_105); -if (x_87 == 0) -{ -uint8 x_107; -x_107 = 0; -lean::cnstr_set(x_68, 0, x_106); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_107); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_108; -x_108 = 1; -lean::cnstr_set(x_68, 0, x_106); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_108); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -} -} -else -{ -uint8 x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_109 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -lean::dec(x_68); -x_110 = lean::cnstr_get(x_83, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_83, 1); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_83, 2); -lean::inc(x_112); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - lean::cnstr_release(x_83, 2); - lean::cnstr_release(x_83, 3); - x_113 = x_83; -} else { - lean::dec_ref(x_83); - x_113 = lean::box(0); -} -x_114 = lean::box(3); -lean::inc(x_2); -x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_114); -lean::cnstr_set(x_115, 1, x_2); -x_116 = l_List_reverse___rarg(x_115); -lean::inc(x_1); -x_117 = l_Lean_Parser_Syntax_mkNode(x_1, x_116); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -if (lean::is_scalar(x_113)) { - x_119 = lean::alloc_cnstr(0, 4, 0); -} else { - x_119 = x_113; -} -lean::cnstr_set(x_119, 0, x_110); -lean::cnstr_set(x_119, 1, x_111); -lean::cnstr_set(x_119, 2, x_112); -lean::cnstr_set(x_119, 3, x_118); -if (x_109 == 0) -{ -uint8 x_120; obj* x_121; -x_120 = 0; -x_121 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_121, 0, x_119); -lean::cnstr_set_scalar(x_121, sizeof(void*)*1, x_120); -x_14 = x_121; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_122; obj* x_123; -x_122 = 1; -x_123 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_123, 0, x_119); -lean::cnstr_set_scalar(x_123, sizeof(void*)*1, x_122); -x_14 = x_123; -x_15 = x_85; -goto block_66; -} -} -} -else -{ -obj* x_124; uint8 x_125; -x_124 = lean::cnstr_get(x_67, 1); -lean::inc(x_124); -lean::dec(x_67); -x_125 = !lean::is_exclusive(x_68); -if (x_125 == 0) -{ -uint8 x_126; obj* x_127; uint8 x_128; -x_126 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -x_127 = lean::cnstr_get(x_68, 0); -lean::dec(x_127); -x_128 = !lean::is_exclusive(x_83); -if (x_128 == 0) -{ -obj* x_129; uint8 x_130; -x_129 = lean::cnstr_get(x_83, 3); -lean::dec(x_129); -x_130 = !lean::is_exclusive(x_84); -if (x_130 == 0) -{ -obj* x_131; obj* x_132; obj* x_133; obj* x_134; -x_131 = lean::cnstr_get(x_84, 0); -lean::inc(x_2); -x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_131); -lean::cnstr_set(x_132, 1, x_2); -x_133 = l_List_reverse___rarg(x_132); -lean::inc(x_1); -x_134 = l_Lean_Parser_Syntax_mkNode(x_1, x_133); -lean::cnstr_set(x_84, 0, x_134); -if (x_126 == 0) -{ -uint8 x_135; -x_135 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_135); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_136; -x_136 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_136); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_137 = lean::cnstr_get(x_84, 0); -lean::inc(x_137); -lean::dec(x_84); -lean::inc(x_2); -x_138 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_138, 0, x_137); -lean::cnstr_set(x_138, 1, x_2); -x_139 = l_List_reverse___rarg(x_138); -lean::inc(x_1); -x_140 = l_Lean_Parser_Syntax_mkNode(x_1, x_139); -x_141 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_141, 0, x_140); -lean::cnstr_set(x_83, 3, x_141); -if (x_126 == 0) -{ -uint8 x_142; -x_142 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_142); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_143; -x_143 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_143); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -} -else -{ -obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; -x_144 = lean::cnstr_get(x_83, 0); -x_145 = lean::cnstr_get(x_83, 1); -x_146 = lean::cnstr_get(x_83, 2); -lean::inc(x_146); -lean::inc(x_145); -lean::inc(x_144); -lean::dec(x_83); -x_147 = lean::cnstr_get(x_84, 0); -lean::inc(x_147); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - x_148 = x_84; -} else { - lean::dec_ref(x_84); - x_148 = lean::box(0); -} -lean::inc(x_2); -x_149 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_149, 0, x_147); -lean::cnstr_set(x_149, 1, x_2); -x_150 = l_List_reverse___rarg(x_149); -lean::inc(x_1); -x_151 = l_Lean_Parser_Syntax_mkNode(x_1, x_150); -if (lean::is_scalar(x_148)) { - x_152 = lean::alloc_cnstr(1, 1, 0); -} else { - x_152 = x_148; -} -lean::cnstr_set(x_152, 0, x_151); -x_153 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_153, 0, x_144); -lean::cnstr_set(x_153, 1, x_145); -lean::cnstr_set(x_153, 2, x_146); -lean::cnstr_set(x_153, 3, x_152); -if (x_126 == 0) -{ -uint8 x_154; -x_154 = 0; -lean::cnstr_set(x_68, 0, x_153); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_154); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_155; -x_155 = 1; -lean::cnstr_set(x_68, 0, x_153); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_155); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -} -else -{ -uint8 x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; -x_156 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -lean::dec(x_68); -x_157 = lean::cnstr_get(x_83, 0); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_83, 1); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_83, 2); -lean::inc(x_159); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - lean::cnstr_release(x_83, 2); - lean::cnstr_release(x_83, 3); - x_160 = x_83; -} else { - lean::dec_ref(x_83); - x_160 = lean::box(0); -} -x_161 = lean::cnstr_get(x_84, 0); -lean::inc(x_161); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - x_162 = x_84; -} else { - lean::dec_ref(x_84); - x_162 = lean::box(0); -} -lean::inc(x_2); -x_163 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_163, 0, x_161); -lean::cnstr_set(x_163, 1, x_2); -x_164 = l_List_reverse___rarg(x_163); -lean::inc(x_1); -x_165 = l_Lean_Parser_Syntax_mkNode(x_1, x_164); -if (lean::is_scalar(x_162)) { - x_166 = lean::alloc_cnstr(1, 1, 0); -} else { - x_166 = x_162; -} -lean::cnstr_set(x_166, 0, x_165); -if (lean::is_scalar(x_160)) { - x_167 = lean::alloc_cnstr(0, 4, 0); -} else { - x_167 = x_160; -} -lean::cnstr_set(x_167, 0, x_157); -lean::cnstr_set(x_167, 1, x_158); -lean::cnstr_set(x_167, 2, x_159); -lean::cnstr_set(x_167, 3, x_166); -if (x_156 == 0) -{ -uint8 x_168; obj* x_169; -x_168 = 0; -x_169 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_169, 0, x_167); -lean::cnstr_set_scalar(x_169, sizeof(void*)*1, x_168); -x_14 = x_169; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_170; obj* x_171; -x_170 = 1; -x_171 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_171, 0, x_167); -lean::cnstr_set_scalar(x_171, sizeof(void*)*1, x_170); -x_14 = x_171; -x_15 = x_124; -goto block_66; -} -} -} -} -} -block_66: -{ -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_16; -x_16 = !lean::is_exclusive(x_14); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_14, 0); -x_18 = lean::cnstr_get(x_14, 2); -if (lean::is_scalar(x_13)) { - x_19 = lean::alloc_cnstr(1, 2, 0); -} else { - x_19 = x_13; -} -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_2); -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_14, 2, x_20); -lean::cnstr_set(x_14, 0, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_14); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; uint8 x_26; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_21, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_21, 2); -lean::inc(x_24); -lean::dec(x_21); -x_25 = l_List_mfoldl___main___at_Lean_Parser_Level_paren_Parser___spec__2(x_1, x_22, x_12, x_4, x_5, x_23, x_15); -x_26 = !lean::is_exclusive(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_25, 0); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_27); -lean::cnstr_set(x_25, 0, x_28); -return x_25; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::cnstr_get(x_25, 0); -x_30 = lean::cnstr_get(x_25, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_25); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_29); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_30); -return x_32; -} -} -else -{ -uint8 x_33; -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_33 = !lean::is_exclusive(x_21); -if (x_33 == 0) -{ -obj* x_34; -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_21); -lean::cnstr_set(x_34, 1, x_15); -return x_34; -} -else -{ -obj* x_35; uint8 x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_21, 0); -x_36 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); -lean::inc(x_35); -lean::dec(x_21); -x_37 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_15); -return x_38; -} -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_39 = lean::cnstr_get(x_14, 0); -x_40 = lean::cnstr_get(x_14, 1); -x_41 = lean::cnstr_get(x_14, 2); -lean::inc(x_41); -lean::inc(x_40); -lean::inc(x_39); -lean::dec(x_14); -if (lean::is_scalar(x_13)) { - x_42 = lean::alloc_cnstr(1, 2, 0); -} else { - x_42 = x_13; -} -lean::cnstr_set(x_42, 0, x_39); -lean::cnstr_set(x_42, 1, x_2); -x_43 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set(x_44, 1, x_40); -lean::cnstr_set(x_44, 2, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_44); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_45, 1); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_45, 2); -lean::inc(x_48); -lean::dec(x_45); -x_49 = l_List_mfoldl___main___at_Lean_Parser_Level_paren_Parser___spec__2(x_1, x_46, x_12, x_4, x_5, x_47, x_15); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_49, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_52 = x_49; -} else { - lean::dec_ref(x_49); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -return x_54; -} -else -{ -obj* x_55; uint8 x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_55 = lean::cnstr_get(x_45, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); -if (lean::is_exclusive(x_45)) { - lean::cnstr_release(x_45, 0); - x_57 = x_45; -} else { - lean::dec_ref(x_45); - x_57 = lean::box(0); -} -if (lean::is_scalar(x_57)) { - x_58 = lean::alloc_cnstr(1, 1, 1); -} else { - x_58 = x_57; -} -lean::cnstr_set(x_58, 0, x_55); -lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_15); -return x_59; -} -} -} -else -{ -uint8 x_60; -lean::dec(x_13); -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_60 = !lean::is_exclusive(x_14); -if (x_60 == 0) -{ -obj* x_61; -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_14); -lean::cnstr_set(x_61, 1, x_15); -return x_61; -} -else -{ -obj* x_62; uint8 x_63; obj* x_64; obj* x_65; -x_62 = lean::cnstr_get(x_14, 0); -x_63 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -lean::inc(x_62); -lean::dec(x_14); -x_64 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set_scalar(x_64, sizeof(void*)*1, x_63); -x_65 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_15); -return x_65; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_Level_paren_Parser___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::box(0); -lean::inc(x_1); -x_8 = l_List_mfoldl___main___at_Lean_Parser_Level_paren_Parser___spec__2(x_1, x_7, x_2, x_3, x_4, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_8, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_9, 0); -x_14 = lean::cnstr_get(x_9, 2); -x_15 = l_List_reverse___rarg(x_13); -x_16 = l_Lean_Parser_Syntax_mkNode(x_1, x_15); -x_17 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_9, 2, x_17); -lean::cnstr_set(x_9, 0, x_16); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_9); -lean::cnstr_set(x_8, 0, x_18); -return x_8; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_19 = lean::cnstr_get(x_9, 0); -x_20 = lean::cnstr_get(x_9, 1); -x_21 = lean::cnstr_get(x_9, 2); -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_9); -x_22 = l_List_reverse___rarg(x_19); -x_23 = l_Lean_Parser_Syntax_mkNode(x_1, x_22); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_20); -lean::cnstr_set(x_25, 2, x_24); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_25); -lean::cnstr_set(x_8, 0, x_26); -return x_8; -} -} -else -{ -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_37; -x_27 = lean::cnstr_get(x_8, 1); -lean::inc(x_27); -lean::dec(x_8); -x_28 = lean::cnstr_get(x_9, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_9, 1); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_9, 2); -lean::inc(x_30); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_31 = x_9; -} else { - lean::dec_ref(x_9); - x_31 = lean::box(0); -} -x_32 = l_List_reverse___rarg(x_28); -x_33 = l_Lean_Parser_Syntax_mkNode(x_1, x_32); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_31)) { - x_35 = lean::alloc_cnstr(0, 3, 0); -} else { - x_35 = x_31; -} -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_29); -lean::cnstr_set(x_35, 2, x_34); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_35); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_27); -return x_37; -} -} -else -{ -uint8 x_38; -lean::dec(x_1); -x_38 = !lean::is_exclusive(x_8); -if (x_38 == 0) -{ -obj* x_39; uint8 x_40; -x_39 = lean::cnstr_get(x_8, 0); -lean::dec(x_39); -x_40 = !lean::is_exclusive(x_9); -if (x_40 == 0) -{ -return x_8; -} -else -{ -obj* x_41; uint8 x_42; obj* x_43; -x_41 = lean::cnstr_get(x_9, 0); -x_42 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_41); -lean::dec(x_9); -x_43 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_42); -lean::cnstr_set(x_8, 0, x_43); -return x_8; -} -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; obj* x_48; obj* x_49; -x_44 = lean::cnstr_get(x_8, 1); -lean::inc(x_44); -lean::dec(x_8); -x_45 = lean::cnstr_get(x_9, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_47 = x_9; -} else { - lean::dec_ref(x_9); - x_47 = lean::box(0); -} -if (lean::is_scalar(x_47)) { - x_48 = lean::alloc_cnstr(1, 1, 1); -} else { - x_48 = x_47; -} -lean::cnstr_set(x_48, 0, x_45); -lean::cnstr_set_scalar(x_48, sizeof(void*)*1, x_46); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_44); -return x_49; -} -} -} -} -obj* _init_l_Lean_Parser_Level_paren_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_Parser), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string(")"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_6); -lean::closure_set(x_11, 2, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_5); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -} -obj* l_Lean_Parser_Level_paren_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_Level_paren; -x_6 = l_Lean_Parser_Level_paren_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Level_paren_Parser___spec__1(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_Level_leading() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Level"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("leading"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(2u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_Level_leading; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(4u); -x_3 = lean_name_mk_numeral(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(5u); -x_3 = lean_name_mk_numeral(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Level_leading_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_2); -x_5 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_Level_leading; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -case 1: -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -lean::dec(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_2); -x_12 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -x_15 = l_Lean_Parser_Level_leading; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -case 2: -{ -obj* x_17; -x_17 = lean::cnstr_get(x_1, 0); -lean::inc(x_17); -lean::dec(x_1); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__1; -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_2); -x_22 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_2); -x_25 = l_Lean_Parser_Level_leading; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -} -case 3: -{ -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; -x_27 = lean::cnstr_get(x_1, 0); -lean::inc(x_27); -lean::dec(x_1); -x_28 = l_Lean_Parser_Level_paren_HasView; -x_29 = lean::cnstr_get(x_28, 1); -lean::inc(x_29); -x_30 = lean::apply_1(x_29, x_27); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_2); -x_32 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_33 = l_Lean_Parser_Syntax_mkNode(x_32, x_31); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_2); -x_35 = l_Lean_Parser_Level_leading; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -case 4: -{ -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; -x_37 = lean::cnstr_get(x_1, 0); -lean::inc(x_37); -lean::dec(x_1); -x_38 = l_Lean_Parser_number_HasView; -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -x_40 = lean::apply_1(x_39, x_37); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_2); -x_42 = l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__2; -x_43 = l_Lean_Parser_Syntax_mkNode(x_42, x_41); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_2); -x_45 = l_Lean_Parser_Level_leading; -x_46 = l_Lean_Parser_Syntax_mkNode(x_45, x_44); -return x_46; -} -default: -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_47 = lean::cnstr_get(x_1, 0); -lean::inc(x_47); -lean::dec(x_1); -x_48 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_48, 0, x_47); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_2); -x_50 = l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__3; -x_51 = l_Lean_Parser_Syntax_mkNode(x_50, x_49); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_2); -x_53 = l_Lean_Parser_Level_leading; -x_54 = l_Lean_Parser_Syntax_mkNode(x_53, x_52); -return x_54; -} -} -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(5, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Level"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("leading"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Level_leading_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::mk_nat_obj(1u); -x_32 = lean::nat_dec_eq(x_22, x_31); -if (x_32 == 0) -{ -obj* x_33; uint8 x_34; -x_33 = lean::mk_nat_obj(2u); -x_34 = lean::nat_dec_eq(x_22, x_33); -if (x_34 == 0) -{ -obj* x_35; uint8 x_36; -lean::free_heap_obj(x_13); -x_35 = lean::mk_nat_obj(3u); -x_36 = lean::nat_dec_eq(x_22, x_35); -if (x_36 == 0) -{ -obj* x_37; uint8 x_38; -x_37 = lean::mk_nat_obj(4u); -x_38 = lean::nat_dec_eq(x_22, x_37); -lean::dec(x_22); -if (x_38 == 0) -{ -if (lean::obj_tag(x_28) == 1) -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_28, 0); -lean::inc(x_39); -lean::dec(x_28); -x_40 = lean::alloc_cnstr(5, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -return x_40; -} -else -{ -obj* x_41; -lean::dec(x_28); -x_41 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__2; -return x_41; -} -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_42 = l_Lean_Parser_number_HasView; -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::apply_1(x_43, x_28); -x_45 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -lean::dec(x_22); -x_46 = l_Lean_Parser_Level_paren_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_28); -x_49 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -return x_49; -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_50; obj* x_51; -x_50 = lean::cnstr_get(x_28, 0); -lean::inc(x_50); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_50); -x_51 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_51, 0, x_13); -return x_51; -} -else -{ -obj* x_52; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_52 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__3; -return x_52; -} -} -} -else -{ -obj* x_53; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_53 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_53, 0, x_28); -return x_53; -} -} -else -{ -obj* x_54; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_54 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_54, 0, x_28); -return x_54; -} -} -else -{ -obj* x_55; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_55 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_55; -} -} -} -} -} -} -else -{ -obj* x_56; obj* x_57; -x_56 = lean::cnstr_get(x_13, 0); -lean::inc(x_56); -lean::dec(x_13); -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -switch (lean::obj_tag(x_57)) { -case 0: -{ -obj* x_58; -lean::dec(x_56); -x_58 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_58; -} -case 1: -{ -obj* x_59; -lean::dec(x_57); -lean::dec(x_56); -x_59 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_59; -} -default: -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; uint8 x_64; -x_60 = lean::cnstr_get(x_56, 1); -lean::inc(x_60); -lean::dec(x_56); -x_61 = lean::cnstr_get(x_57, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_57, 1); -lean::inc(x_62); -lean::dec(x_57); -x_63 = lean::box(0); -x_64 = lean_name_dec_eq(x_61, x_63); -lean::dec(x_61); -if (x_64 == 0) -{ -obj* x_65; -lean::dec(x_62); -lean::dec(x_60); -x_65 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_65; -} -else -{ -if (lean::obj_tag(x_60) == 0) -{ -obj* x_66; -lean::dec(x_62); -x_66 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_66; -} -else -{ -obj* x_67; -x_67 = lean::cnstr_get(x_60, 1); -lean::inc(x_67); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; uint8 x_70; -x_68 = lean::cnstr_get(x_60, 0); -lean::inc(x_68); -lean::dec(x_60); -x_69 = lean::mk_nat_obj(0u); -x_70 = lean::nat_dec_eq(x_62, x_69); -if (x_70 == 0) -{ -obj* x_71; uint8 x_72; -x_71 = lean::mk_nat_obj(1u); -x_72 = lean::nat_dec_eq(x_62, x_71); -if (x_72 == 0) -{ -obj* x_73; uint8 x_74; -x_73 = lean::mk_nat_obj(2u); -x_74 = lean::nat_dec_eq(x_62, x_73); -if (x_74 == 0) -{ -obj* x_75; uint8 x_76; -x_75 = lean::mk_nat_obj(3u); -x_76 = lean::nat_dec_eq(x_62, x_75); -if (x_76 == 0) -{ -obj* x_77; uint8 x_78; -x_77 = lean::mk_nat_obj(4u); -x_78 = lean::nat_dec_eq(x_62, x_77); -lean::dec(x_62); -if (x_78 == 0) -{ -if (lean::obj_tag(x_68) == 1) -{ -obj* x_79; obj* x_80; -x_79 = lean::cnstr_get(x_68, 0); -lean::inc(x_79); -lean::dec(x_68); -x_80 = lean::alloc_cnstr(5, 1, 0); -lean::cnstr_set(x_80, 0, x_79); -return x_80; -} -else -{ -obj* x_81; -lean::dec(x_68); -x_81 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__2; -return x_81; -} -} -else -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; -x_82 = l_Lean_Parser_number_HasView; -x_83 = lean::cnstr_get(x_82, 0); -lean::inc(x_83); -x_84 = lean::apply_1(x_83, x_68); -x_85 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -return x_85; -} -} -else -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; -lean::dec(x_62); -x_86 = l_Lean_Parser_Level_paren_HasView; -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -x_88 = lean::apply_1(x_87, x_68); -x_89 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; -} -} -else -{ -lean::dec(x_62); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_90; obj* x_91; obj* x_92; -x_90 = lean::cnstr_get(x_68, 0); -lean::inc(x_90); -lean::dec(x_68); -x_91 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_91, 0, x_90); -x_92 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; -} -else -{ -obj* x_93; -lean::dec(x_68); -x_93 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__3; -return x_93; -} -} -} -else -{ -obj* x_94; -lean::dec(x_62); -x_94 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_94, 0, x_68); -return x_94; -} -} -else -{ -obj* x_95; -lean::dec(x_62); -x_95 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_95, 0, x_68); -return x_95; -} -} -else -{ -obj* x_96; -lean::dec(x_67); -lean::dec(x_62); -lean::dec(x_60); -x_96 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_96; -} -} -} -} -} -} -} -} -else -{ -obj* x_97; -lean::dec(x_11); -lean::dec(x_6); -x_97 = l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4; -return x_97; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_leading_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_leading_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Level_leading_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Level_leading_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_4); -lean::inc(x_3); -x_6 = l_Lean_Parser_token(x_3, x_4, x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - x_9 = x_6; -} else { - lean::dec_ref(x_6); - x_9 = lean::box(0); -} -x_10 = lean::cnstr_get(x_7, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_7, 1); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_7, 2); -lean::inc(x_12); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_13 = x_7; -} else { - lean::dec_ref(x_7); - x_13 = lean::box(0); -} -switch (lean::obj_tag(x_10)) { -case 0: -{ -obj* x_90; obj* x_91; obj* x_92; -x_90 = lean::cnstr_get(x_10, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_90, 1); -lean::inc(x_91); -lean::dec(x_90); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -x_14 = x_92; -goto block_89; -} -case 1: -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_93 = lean::cnstr_get(x_10, 0); -lean::inc(x_93); -x_94 = lean::cnstr_get(x_93, 1); -lean::inc(x_94); -lean::dec(x_93); -x_95 = l_Lean_Parser_Substring_toString(x_94); -lean::dec(x_94); -x_96 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_96, 0, x_95); -x_14 = x_96; -goto block_89; -} -default: -{ -obj* x_97; -x_97 = lean::box(0); -x_14 = x_97; -goto block_89; -} -} -block_89: -{ -uint8 x_15; -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_84; -x_84 = 1; -x_15 = x_84; -goto block_83; -} -else -{ -obj* x_85; uint8 x_86; -x_85 = lean::cnstr_get(x_14, 0); -lean::inc(x_85); -lean::dec(x_14); -x_86 = lean::string_dec_eq(x_85, x_1); -lean::dec(x_85); -if (x_86 == 0) -{ -uint8 x_87; -x_87 = 1; -x_15 = x_87; -goto block_83; -} -else -{ -uint8 x_88; -x_88 = 0; -x_15 = x_88; -goto block_83; -} -} -block_83: -{ -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_16 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_13)) { - x_17 = lean::alloc_cnstr(0, 3, 0); -} else { - x_17 = x_13; -} -lean::cnstr_set(x_17, 0, x_10); -lean::cnstr_set(x_17, 1, x_11); -lean::cnstr_set(x_17, 2, x_16); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_17); -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_18); -x_21 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_20); -if (lean::is_scalar(x_9)) { - x_22 = lean::alloc_cnstr(0, 2, 0); -} else { - x_22 = x_9; -} -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_8); -return x_22; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -lean::dec(x_13); -lean::dec(x_9); -x_23 = l_String_quote(x_1); -x_24 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_25, 0, x_4); -x_26 = lean::box(0); -x_27 = l_String_splitAux___main___closed__1; -x_28 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_27, x_24, x_25, x_26, x_3, x_11, x_8); -lean::dec(x_3); -lean::dec(x_25); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -uint8 x_30; -x_30 = !lean::is_exclusive(x_28); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::cnstr_get(x_28, 0); -lean::dec(x_31); -x_32 = !lean::is_exclusive(x_29); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_33 = lean::cnstr_get(x_29, 2); -x_34 = lean::cnstr_get(x_29, 0); -lean::dec(x_34); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_29, 2, x_35); -lean::cnstr_set(x_29, 0, x_10); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_29); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_36); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_37); -x_39 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_38); -lean::cnstr_set(x_28, 0, x_39); -return x_28; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_40 = lean::cnstr_get(x_29, 1); -x_41 = lean::cnstr_get(x_29, 2); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_29); -x_42 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_10); -lean::cnstr_set(x_43, 1, x_40); -lean::cnstr_set(x_43, 2, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_45); -x_47 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_46); -lean::cnstr_set(x_28, 0, x_47); -return x_28; -} -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_48 = lean::cnstr_get(x_28, 1); -lean::inc(x_48); -lean::dec(x_28); -x_49 = lean::cnstr_get(x_29, 1); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_29, 2); -lean::inc(x_50); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - lean::cnstr_release(x_29, 1); - lean::cnstr_release(x_29, 2); - x_51 = x_29; -} else { - lean::dec_ref(x_29); - x_51 = lean::box(0); -} -x_52 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_51)) { - x_53 = lean::alloc_cnstr(0, 3, 0); -} else { - x_53 = x_51; -} -lean::cnstr_set(x_53, 0, x_10); -lean::cnstr_set(x_53, 1, x_49); -lean::cnstr_set(x_53, 2, x_52); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_53); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_54); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_55); -x_57 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_56); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_48); -return x_58; -} -} -else -{ -uint8 x_59; -lean::dec(x_10); -x_59 = !lean::is_exclusive(x_28); -if (x_59 == 0) -{ -obj* x_60; uint8 x_61; -x_60 = lean::cnstr_get(x_28, 0); -lean::dec(x_60); -x_61 = !lean::is_exclusive(x_29); -if (x_61 == 0) -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_29); -x_63 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_62); -x_65 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_64); -lean::cnstr_set(x_28, 0, x_65); -return x_28; -} -else -{ -obj* x_66; uint8 x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_66 = lean::cnstr_get(x_29, 0); -x_67 = lean::cnstr_get_scalar(x_29, sizeof(void*)*1); -lean::inc(x_66); -lean::dec(x_29); -x_68 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_68, 0, x_66); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_67); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_68); -x_70 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_71 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_70, x_69); -x_72 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_71); -lean::cnstr_set(x_28, 0, x_72); -return x_28; -} -} -else -{ -obj* x_73; obj* x_74; uint8 x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_73 = lean::cnstr_get(x_28, 1); -lean::inc(x_73); -lean::dec(x_28); -x_74 = lean::cnstr_get(x_29, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get_scalar(x_29, sizeof(void*)*1); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - x_76 = x_29; -} else { - lean::dec_ref(x_29); - x_76 = lean::box(0); -} -if (lean::is_scalar(x_76)) { - x_77 = lean::alloc_cnstr(1, 1, 1); -} else { - x_77 = x_76; -} -lean::cnstr_set(x_77, 0, x_74); -lean::cnstr_set_scalar(x_77, sizeof(void*)*1, x_75); -x_78 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_77); -x_79 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_80 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_79, x_78); -x_81 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_80); -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_73); -return x_82; -} -} -} -} -} -} -else -{ -uint8 x_98; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_98 = !lean::is_exclusive(x_6); -if (x_98 == 0) -{ -obj* x_99; uint8 x_100; -x_99 = lean::cnstr_get(x_6, 0); -lean::dec(x_99); -x_100 = !lean::is_exclusive(x_7); -if (x_100 == 0) -{ -obj* x_101; obj* x_102; obj* x_103; -x_101 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_101, x_7); -x_103 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_102); -lean::cnstr_set(x_6, 0, x_103); -return x_6; -} -else -{ -obj* x_104; uint8 x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; -x_104 = lean::cnstr_get(x_7, 0); -x_105 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_104); -lean::dec(x_7); -x_106 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_106, 0, x_104); -lean::cnstr_set_scalar(x_106, sizeof(void*)*1, x_105); -x_107 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_107, x_106); -x_109 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_108); -lean::cnstr_set(x_6, 0, x_109); -return x_6; -} -} -else -{ -obj* x_110; obj* x_111; uint8 x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_110 = lean::cnstr_get(x_6, 1); -lean::inc(x_110); -lean::dec(x_6); -x_111 = lean::cnstr_get(x_7, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_113 = x_7; -} else { - lean::dec_ref(x_7); - x_113 = lean::box(0); -} -if (lean::is_scalar(x_113)) { - x_114 = lean::alloc_cnstr(1, 1, 1); -} else { - x_114 = x_113; -} -lean::cnstr_set(x_114, 0, x_111); -lean::cnstr_set_scalar(x_114, sizeof(void*)*1, x_112); -x_115 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_116 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_114); -x_117 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_116); -x_118 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_118, 0, x_117); -lean::cnstr_set(x_118, 1, x_110); -return x_118; -} -} -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -lean::inc(x_1); -x_4 = l_Lean_Parser_token(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_4, 1); -x_8 = lean::cnstr_get(x_4, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; uint8 x_14; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_5, 1); -x_12 = lean::cnstr_get(x_5, 2); -x_13 = l_Lean_Parser_number; -x_14 = l_Lean_Parser_Syntax_isOfKind___main(x_13, x_10); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -lean::free_heap_obj(x_5); -lean::dec(x_10); -lean::free_heap_obj(x_4); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_2); -x_16 = lean::box(0); -x_17 = l_String_splitAux___main___closed__1; -x_18 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_19 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_17, x_18, x_15, x_16, x_1, x_11, x_7); -lean::dec(x_1); -lean::dec(x_15); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_21); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_22); -x_25 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_24); -lean::cnstr_set(x_19, 0, x_25); -return x_19; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_26 = lean::cnstr_get(x_19, 0); -x_27 = lean::cnstr_get(x_19, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_19); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_26); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_28); -x_31 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_27); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; -lean::dec(x_2); -lean::dec(x_1); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_5, 2, x_33); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_34); -x_36 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_35); -lean::cnstr_set(x_4, 0, x_36); -return x_4; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; uint8 x_41; -x_37 = lean::cnstr_get(x_5, 0); -x_38 = lean::cnstr_get(x_5, 1); -x_39 = lean::cnstr_get(x_5, 2); -lean::inc(x_39); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_5); -x_40 = l_Lean_Parser_number; -x_41 = l_Lean_Parser_Syntax_isOfKind___main(x_40, x_37); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_37); -lean::free_heap_obj(x_4); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_2); -x_43 = lean::box(0); -x_44 = l_String_splitAux___main___closed__1; -x_45 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_46 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_44, x_45, x_42, x_43, x_1, x_38, x_7); -lean::dec(x_1); -lean::dec(x_42); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - x_49 = x_46; -} else { - lean::dec_ref(x_46); - x_49 = lean::box(0); -} -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_47); -x_51 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_50); -x_53 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_52); -if (lean::is_scalar(x_49)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_49; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_48); -return x_54; -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_2); -lean::dec(x_1); -x_55 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_56 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_56, 0, x_37); -lean::cnstr_set(x_56, 1, x_38); -lean::cnstr_set(x_56, 2, x_55); -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_56); -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_57); -x_59 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_58); -lean::cnstr_set(x_4, 0, x_59); -return x_4; -} -} -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; uint8 x_66; -x_60 = lean::cnstr_get(x_4, 1); -lean::inc(x_60); -lean::dec(x_4); -x_61 = lean::cnstr_get(x_5, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_5, 1); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_5, 2); -lean::inc(x_63); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_64 = x_5; -} else { - lean::dec_ref(x_5); - x_64 = lean::box(0); -} -x_65 = l_Lean_Parser_number; -x_66 = l_Lean_Parser_Syntax_isOfKind___main(x_65, x_61); -if (x_66 == 0) -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -lean::dec(x_64); -lean::dec(x_61); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_2); -x_68 = lean::box(0); -x_69 = l_String_splitAux___main___closed__1; -x_70 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_71 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_69, x_70, x_67, x_68, x_1, x_62, x_60); -lean::dec(x_1); -lean::dec(x_67); -x_72 = lean::cnstr_get(x_71, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_71, 1); -lean::inc(x_73); -if (lean::is_exclusive(x_71)) { - lean::cnstr_release(x_71, 0); - lean::cnstr_release(x_71, 1); - x_74 = x_71; -} else { - lean::dec_ref(x_71); - x_74 = lean::box(0); -} -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_72); -x_76 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_76, x_75); -x_78 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_77); -if (lean::is_scalar(x_74)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_74; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_73); -return x_79; -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -lean::dec(x_2); -lean::dec(x_1); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_64)) { - x_81 = lean::alloc_cnstr(0, 3, 0); -} else { - x_81 = x_64; -} -lean::cnstr_set(x_81, 0, x_61); -lean::cnstr_set(x_81, 1, x_62); -lean::cnstr_set(x_81, 2, x_80); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_82); -x_84 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_83); -x_85 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_60); -return x_85; -} -} -} -else -{ -uint8 x_86; -lean::dec(x_2); -lean::dec(x_1); -x_86 = !lean::is_exclusive(x_4); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_4, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_5); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; -x_89 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_89, x_5); -x_91 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_90); -lean::cnstr_set(x_4, 0, x_91); -return x_4; -} -else -{ -obj* x_92; uint8 x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_92 = lean::cnstr_get(x_5, 0); -x_93 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_92); -lean::dec(x_5); -x_94 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_93); -x_95 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_96 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_95, x_94); -x_97 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_96); -lean::cnstr_set(x_4, 0, x_97); -return x_4; -} -} -else -{ -obj* x_98; obj* x_99; uint8 x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_98 = lean::cnstr_get(x_4, 1); -lean::inc(x_98); -lean::dec(x_4); -x_99 = lean::cnstr_get(x_5, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - x_101 = x_5; -} else { - lean::dec_ref(x_5); - x_101 = lean::box(0); -} -if (lean::is_scalar(x_101)) { - x_102 = lean::alloc_cnstr(1, 1, 1); -} else { - x_102 = x_101; -} -lean::cnstr_set(x_102, 0, x_99); -lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_100); -x_103 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_102); -x_105 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_104); -x_106 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_106, 0, x_105); -lean::cnstr_set(x_106, 1, x_98); -return x_106; -} -} -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2___rarg), 3, 0); -return x_2; -} -} -obj* _init_l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("identifier"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -lean::inc(x_1); -x_4 = l_Lean_Parser_token(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_4, 1); -x_8 = lean::cnstr_get(x_4, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_5, 1); -x_12 = lean::cnstr_get(x_5, 2); -if (lean::obj_tag(x_10) == 1) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_2); -lean::dec(x_1); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_5, 2, x_35); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_36); -x_38 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_39 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_37, x_38); -x_40 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_39); -lean::cnstr_set(x_4, 0, x_40); -return x_4; -} -else -{ -obj* x_41; -lean::free_heap_obj(x_5); -lean::dec(x_10); -lean::free_heap_obj(x_4); -x_41 = lean::box(0); -x_13 = x_41; -goto block_34; -} -block_34: -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -lean::dec(x_13); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_2); -x_15 = lean::box(0); -x_16 = l_String_splitAux___main___closed__1; -x_17 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_16, x_17, x_14, x_15, x_1, x_11, x_7); -lean::dec(x_1); -lean::dec(x_14); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_20); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_21); -x_24 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_23, x_17); -x_25 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_24); -lean::cnstr_set(x_18, 0, x_25); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_26 = lean::cnstr_get(x_18, 0); -x_27 = lean::cnstr_get(x_18, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_18); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_26); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_28); -x_31 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_30, x_17); -x_32 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_31); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_27); -return x_33; -} -} -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_42 = lean::cnstr_get(x_5, 0); -x_43 = lean::cnstr_get(x_5, 1); -x_44 = lean::cnstr_get(x_5, 2); -lean::inc(x_44); -lean::inc(x_43); -lean::inc(x_42); -lean::dec(x_5); -if (lean::obj_tag(x_42) == 1) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -lean::dec(x_2); -lean::dec(x_1); -x_61 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_62 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_62, 0, x_42); -lean::cnstr_set(x_62, 1, x_43); -lean::cnstr_set(x_62, 2, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_61, x_63); -x_65 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_66 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_64, x_65); -x_67 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_66); -lean::cnstr_set(x_4, 0, x_67); -return x_4; -} -else -{ -obj* x_68; -lean::dec(x_42); -lean::free_heap_obj(x_4); -x_68 = lean::box(0); -x_45 = x_68; -goto block_60; -} -block_60: -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_45); -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_splitAux___main___closed__1; -x_49 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_50 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_48, x_49, x_46, x_47, x_1, x_43, x_7); -lean::dec(x_1); -lean::dec(x_46); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_50, 1); -lean::inc(x_52); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - x_53 = x_50; -} else { - lean::dec_ref(x_50); - x_53 = lean::box(0); -} -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_51); -x_55 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_54); -x_57 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_56, x_49); -x_58 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_57); -if (lean::is_scalar(x_53)) { - x_59 = lean::alloc_cnstr(0, 2, 0); -} else { - x_59 = x_53; -} -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_52); -return x_59; -} -} -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_69 = lean::cnstr_get(x_4, 1); -lean::inc(x_69); -lean::dec(x_4); -x_70 = lean::cnstr_get(x_5, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_5, 1); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_5, 2); -lean::inc(x_72); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_73 = x_5; -} else { - lean::dec_ref(x_5); - x_73 = lean::box(0); -} -if (lean::obj_tag(x_70) == 1) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -lean::dec(x_2); -lean::dec(x_1); -x_90 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_73)) { - x_91 = lean::alloc_cnstr(0, 3, 0); -} else { - x_91 = x_73; -} -lean::cnstr_set(x_91, 0, x_70); -lean::cnstr_set(x_91, 1, x_71); -lean::cnstr_set(x_91, 2, x_90); -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_91); -x_93 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_92); -x_94 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_95 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_93, x_94); -x_96 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_95); -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_69); -return x_97; -} -else -{ -obj* x_98; -lean::dec(x_73); -lean::dec(x_70); -x_98 = lean::box(0); -x_74 = x_98; -goto block_89; -} -block_89: -{ -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; -lean::dec(x_74); -x_75 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_75, 0, x_2); -x_76 = lean::box(0); -x_77 = l_String_splitAux___main___closed__1; -x_78 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_79 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_77, x_78, x_75, x_76, x_1, x_71, x_69); -lean::dec(x_1); -lean::dec(x_75); -x_80 = lean::cnstr_get(x_79, 0); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_79, 1); -lean::inc(x_81); -if (lean::is_exclusive(x_79)) { - lean::cnstr_release(x_79, 0); - lean::cnstr_release(x_79, 1); - x_82 = x_79; -} else { - lean::dec_ref(x_79); - x_82 = lean::box(0); -} -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_80); -x_84 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_83); -x_86 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_85, x_78); -x_87 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_86); -if (lean::is_scalar(x_82)) { - x_88 = lean::alloc_cnstr(0, 2, 0); -} else { - x_88 = x_82; -} -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_81); -return x_88; -} -} -} -else -{ -uint8 x_99; -lean::dec(x_2); -lean::dec(x_1); -x_99 = !lean::is_exclusive(x_4); -if (x_99 == 0) -{ -obj* x_100; uint8 x_101; -x_100 = lean::cnstr_get(x_4, 0); -lean::dec(x_100); -x_101 = !lean::is_exclusive(x_5); -if (x_101 == 0) -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_102 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_102, x_5); -x_104 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_105 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_103, x_104); -x_106 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_105); -lean::cnstr_set(x_4, 0, x_106); -return x_4; -} -else -{ -obj* x_107; uint8 x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_107 = lean::cnstr_get(x_5, 0); -x_108 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_107); -lean::dec(x_5); -x_109 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_109, 0, x_107); -lean::cnstr_set_scalar(x_109, sizeof(void*)*1, x_108); -x_110 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_110, x_109); -x_112 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_113 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_111, x_112); -x_114 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_113); -lean::cnstr_set(x_4, 0, x_114); -return x_4; -} -} -else -{ -obj* x_115; obj* x_116; uint8 x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; -x_115 = lean::cnstr_get(x_4, 1); -lean::inc(x_115); -lean::dec(x_4); -x_116 = lean::cnstr_get(x_5, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - x_118 = x_5; -} else { - lean::dec_ref(x_5); - x_118 = lean::box(0); -} -if (lean::is_scalar(x_118)) { - x_119 = lean::alloc_cnstr(1, 1, 1); -} else { - x_119 = x_118; -} -lean::cnstr_set(x_119, 0, x_116); -lean::cnstr_set_scalar(x_119, sizeof(void*)*1, x_117); -x_120 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_121 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_120, x_119); -x_122 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1; -x_123 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_121, x_122); -x_124 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_123); -x_125 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_125, 0, x_124); -lean::cnstr_set(x_125, 1, x_115); -return x_125; -} -} -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5___rarg(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_3) == 0) -{ -obj* x_9; uint8 x_10; obj* x_11; obj* x_12; -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_2); -lean::cnstr_set(x_9, 3, x_4); -x_10 = 0; -x_11 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set_scalar(x_11, sizeof(void*)*1, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_8); -return x_12; -} -else -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -lean::dec(x_7); -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_4); -x_15 = 0; -x_16 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set_scalar(x_16, sizeof(void*)*1, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -return x_17; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5___rarg___boxed), 8, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4(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) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_2); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -x_9 = l_mjoin___rarg___closed__1; -x_10 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5___rarg(x_8, x_9, x_7, x_7, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_1); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::cnstr_get(x_1, 0); -x_13 = lean::cnstr_get(x_1, 1); -x_14 = lean::mk_nat_obj(1u); -x_15 = lean::nat_add(x_2, x_14); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_16 = lean::apply_4(x_12, x_3, x_4, x_5, x_6); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_16); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; uint8 x_21; -x_19 = lean::cnstr_get(x_16, 1); -x_20 = lean::cnstr_get(x_16, 0); -lean::dec(x_20); -x_21 = !lean::is_exclusive(x_17); -if (x_21 == 0) -{ -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_22 = lean::cnstr_get(x_17, 0); -x_23 = lean::cnstr_get(x_17, 2); -x_24 = lean::box(0); -x_25 = lean_name_mk_numeral(x_24, x_2); -x_26 = lean::box(0); -lean::cnstr_set(x_1, 1, x_26); -lean::cnstr_set(x_1, 0, x_22); -x_27 = l_Lean_Parser_Syntax_mkNode(x_25, x_1); -x_28 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_17, 2, x_28); -lean::cnstr_set(x_17, 0, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_17); -if (lean::obj_tag(x_29) == 0) -{ -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_16, 0, x_29); -return x_16; -} -else -{ -uint8 x_30; -x_30 = lean::cnstr_get_scalar(x_29, sizeof(void*)*1); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; uint8 x_33; -lean::free_heap_obj(x_16); -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -x_32 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4(x_13, x_15, x_3, x_4, x_5, x_19); -x_33 = !lean::is_exclusive(x_32); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -x_35 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_31, x_34); -lean::cnstr_set(x_32, 0, x_35); -return x_32; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_32, 0); -x_37 = lean::cnstr_get(x_32, 1); -lean::inc(x_37); -lean::inc(x_36); -lean::dec(x_32); -x_38 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_31, x_36); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_37); -return x_39; -} -} -else -{ -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_16, 0, x_29); -return x_16; -} -} -} -else -{ -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; -x_40 = lean::cnstr_get(x_17, 0); -x_41 = lean::cnstr_get(x_17, 1); -x_42 = lean::cnstr_get(x_17, 2); -lean::inc(x_42); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_17); -x_43 = lean::box(0); -x_44 = lean_name_mk_numeral(x_43, x_2); -x_45 = lean::box(0); -lean::cnstr_set(x_1, 1, x_45); -lean::cnstr_set(x_1, 0, x_40); -x_46 = l_Lean_Parser_Syntax_mkNode(x_44, x_1); -x_47 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_48 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_41); -lean::cnstr_set(x_48, 2, x_47); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_48); -if (lean::obj_tag(x_49) == 0) -{ -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_16, 0, x_49); -return x_16; -} -else -{ -uint8 x_50; -x_50 = lean::cnstr_get_scalar(x_49, sizeof(void*)*1); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -lean::free_heap_obj(x_16); -x_51 = lean::cnstr_get(x_49, 0); -lean::inc(x_51); -lean::dec(x_49); -x_52 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4(x_13, x_15, x_3, x_4, x_5, x_19); -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_52, 1); -lean::inc(x_54); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - lean::cnstr_release(x_52, 1); - x_55 = x_52; -} else { - lean::dec_ref(x_52); - x_55 = lean::box(0); -} -x_56 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_51, x_53); -if (lean::is_scalar(x_55)) { - x_57 = lean::alloc_cnstr(0, 2, 0); -} else { - x_57 = x_55; -} -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_54); -return x_57; -} -else -{ -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_16, 0, x_49); -return x_16; -} -} -} -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_58 = lean::cnstr_get(x_16, 1); -lean::inc(x_58); -lean::dec(x_16); -x_59 = lean::cnstr_get(x_17, 0); -lean::inc(x_59); -x_60 = lean::cnstr_get(x_17, 1); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_17, 2); -lean::inc(x_61); -if (lean::is_exclusive(x_17)) { - lean::cnstr_release(x_17, 0); - lean::cnstr_release(x_17, 1); - lean::cnstr_release(x_17, 2); - x_62 = x_17; -} else { - lean::dec_ref(x_17); - x_62 = lean::box(0); -} -x_63 = lean::box(0); -x_64 = lean_name_mk_numeral(x_63, x_2); -x_65 = lean::box(0); -lean::cnstr_set(x_1, 1, x_65); -lean::cnstr_set(x_1, 0, x_59); -x_66 = l_Lean_Parser_Syntax_mkNode(x_64, x_1); -x_67 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_62)) { - x_68 = lean::alloc_cnstr(0, 3, 0); -} else { - x_68 = x_62; -} -lean::cnstr_set(x_68, 0, x_66); -lean::cnstr_set(x_68, 1, x_60); -lean::cnstr_set(x_68, 2, x_67); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_61, x_68); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_70 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_58); -return x_70; -} -else -{ -uint8 x_71; -x_71 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -if (x_71 == 0) -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_72 = lean::cnstr_get(x_69, 0); -lean::inc(x_72); -lean::dec(x_69); -x_73 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4(x_13, x_15, x_3, x_4, x_5, x_58); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -if (lean::is_exclusive(x_73)) { - lean::cnstr_release(x_73, 0); - lean::cnstr_release(x_73, 1); - x_76 = x_73; -} else { - lean::dec_ref(x_73); - x_76 = lean::box(0); -} -x_77 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_72, x_74); -if (lean::is_scalar(x_76)) { - x_78 = lean::alloc_cnstr(0, 2, 0); -} else { - x_78 = x_76; -} -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_75); -return x_78; -} -else -{ -obj* x_79; -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_79 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_79, 0, x_69); -lean::cnstr_set(x_79, 1, x_58); -return x_79; -} -} -} -} -else -{ -uint8 x_80; -lean::free_heap_obj(x_1); -lean::dec(x_2); -x_80 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; obj* x_83; uint8 x_84; -x_81 = lean::cnstr_get(x_16, 1); -lean::inc(x_81); -lean::dec(x_16); -x_82 = lean::cnstr_get(x_17, 0); -lean::inc(x_82); -lean::dec(x_17); -x_83 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4(x_13, x_15, x_3, x_4, x_5, x_81); -x_84 = !lean::is_exclusive(x_83); -if (x_84 == 0) -{ -obj* x_85; obj* x_86; -x_85 = lean::cnstr_get(x_83, 0); -x_86 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_82, x_85); -lean::cnstr_set(x_83, 0, x_86); -return x_83; -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_87 = lean::cnstr_get(x_83, 0); -x_88 = lean::cnstr_get(x_83, 1); -lean::inc(x_88); -lean::inc(x_87); -lean::dec(x_83); -x_89 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_82, x_87); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_88); -return x_90; -} -} -else -{ -uint8 x_91; -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_91 = !lean::is_exclusive(x_16); -if (x_91 == 0) -{ -obj* x_92; uint8 x_93; -x_92 = lean::cnstr_get(x_16, 0); -lean::dec(x_92); -x_93 = !lean::is_exclusive(x_17); -if (x_93 == 0) -{ -return x_16; -} -else -{ -obj* x_94; obj* x_95; -x_94 = lean::cnstr_get(x_17, 0); -lean::inc(x_94); -lean::dec(x_17); -x_95 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_80); -lean::cnstr_set(x_16, 0, x_95); -return x_16; -} -} -else -{ -obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_96 = lean::cnstr_get(x_16, 1); -lean::inc(x_96); -lean::dec(x_16); -x_97 = lean::cnstr_get(x_17, 0); -lean::inc(x_97); -if (lean::is_exclusive(x_17)) { - lean::cnstr_release(x_17, 0); - x_98 = x_17; -} else { - lean::dec_ref(x_17); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(1, 1, 1); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_97); -lean::cnstr_set_scalar(x_99, sizeof(void*)*1, x_80); -x_100 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_96); -return x_100; -} -} -} -} -else -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_101 = lean::cnstr_get(x_1, 0); -x_102 = lean::cnstr_get(x_1, 1); -lean::inc(x_102); -lean::inc(x_101); -lean::dec(x_1); -x_103 = lean::mk_nat_obj(1u); -x_104 = lean::nat_add(x_2, x_103); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_105 = lean::apply_4(x_101, x_3, x_4, x_5, x_6); -x_106 = lean::cnstr_get(x_105, 0); -lean::inc(x_106); -if (lean::obj_tag(x_106) == 0) -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; -x_107 = lean::cnstr_get(x_105, 1); -lean::inc(x_107); -if (lean::is_exclusive(x_105)) { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - x_108 = x_105; -} else { - lean::dec_ref(x_105); - x_108 = lean::box(0); -} -x_109 = lean::cnstr_get(x_106, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_106, 1); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_106, 2); -lean::inc(x_111); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - lean::cnstr_release(x_106, 2); - x_112 = x_106; -} else { - lean::dec_ref(x_106); - x_112 = lean::box(0); -} -x_113 = lean::box(0); -x_114 = lean_name_mk_numeral(x_113, x_2); -x_115 = lean::box(0); -x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_109); -lean::cnstr_set(x_116, 1, x_115); -x_117 = l_Lean_Parser_Syntax_mkNode(x_114, x_116); -x_118 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_112)) { - x_119 = lean::alloc_cnstr(0, 3, 0); -} else { - x_119 = x_112; -} -lean::cnstr_set(x_119, 0, x_117); -lean::cnstr_set(x_119, 1, x_110); -lean::cnstr_set(x_119, 2, x_118); -x_120 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_111, x_119); -if (lean::obj_tag(x_120) == 0) -{ -obj* x_121; -lean::dec(x_104); -lean::dec(x_102); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_108)) { - x_121 = lean::alloc_cnstr(0, 2, 0); -} else { - x_121 = x_108; -} -lean::cnstr_set(x_121, 0, x_120); -lean::cnstr_set(x_121, 1, x_107); -return x_121; -} -else -{ -uint8 x_122; -x_122 = lean::cnstr_get_scalar(x_120, sizeof(void*)*1); -if (x_122 == 0) -{ -obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; -lean::dec(x_108); -x_123 = lean::cnstr_get(x_120, 0); -lean::inc(x_123); -lean::dec(x_120); -x_124 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4(x_102, x_104, x_3, x_4, x_5, x_107); -x_125 = lean::cnstr_get(x_124, 0); -lean::inc(x_125); -x_126 = lean::cnstr_get(x_124, 1); -lean::inc(x_126); -if (lean::is_exclusive(x_124)) { - lean::cnstr_release(x_124, 0); - lean::cnstr_release(x_124, 1); - x_127 = x_124; -} else { - lean::dec_ref(x_124); - x_127 = lean::box(0); -} -x_128 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_123, x_125); -if (lean::is_scalar(x_127)) { - x_129 = lean::alloc_cnstr(0, 2, 0); -} else { - x_129 = x_127; -} -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_126); -return x_129; -} -else -{ -obj* x_130; -lean::dec(x_104); -lean::dec(x_102); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_108)) { - x_130 = lean::alloc_cnstr(0, 2, 0); -} else { - x_130 = x_108; -} -lean::cnstr_set(x_130, 0, x_120); -lean::cnstr_set(x_130, 1, x_107); -return x_130; -} -} -} -else -{ -uint8 x_131; -lean::dec(x_2); -x_131 = lean::cnstr_get_scalar(x_106, sizeof(void*)*1); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; -x_132 = lean::cnstr_get(x_105, 1); -lean::inc(x_132); -lean::dec(x_105); -x_133 = lean::cnstr_get(x_106, 0); -lean::inc(x_133); -lean::dec(x_106); -x_134 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4(x_102, x_104, x_3, x_4, x_5, x_132); -x_135 = lean::cnstr_get(x_134, 0); -lean::inc(x_135); -x_136 = lean::cnstr_get(x_134, 1); -lean::inc(x_136); -if (lean::is_exclusive(x_134)) { - lean::cnstr_release(x_134, 0); - lean::cnstr_release(x_134, 1); - x_137 = x_134; -} else { - lean::dec_ref(x_134); - x_137 = lean::box(0); -} -x_138 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_133, x_135); -if (lean::is_scalar(x_137)) { - x_139 = lean::alloc_cnstr(0, 2, 0); -} else { - x_139 = x_137; -} -lean::cnstr_set(x_139, 0, x_138); -lean::cnstr_set(x_139, 1, x_136); -return x_139; -} -else -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; -lean::dec(x_104); -lean::dec(x_102); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_140 = lean::cnstr_get(x_105, 1); -lean::inc(x_140); -if (lean::is_exclusive(x_105)) { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - x_141 = x_105; -} else { - lean::dec_ref(x_105); - x_141 = lean::box(0); -} -x_142 = lean::cnstr_get(x_106, 0); -lean::inc(x_142); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - x_143 = x_106; -} else { - lean::dec_ref(x_106); - x_143 = lean::box(0); -} -if (lean::is_scalar(x_143)) { - x_144 = lean::alloc_cnstr(1, 1, 1); -} else { - x_144 = x_143; -} -lean::cnstr_set(x_144, 0, x_142); -lean::cnstr_set_scalar(x_144, sizeof(void*)*1, x_131); -if (lean::is_scalar(x_141)) { - x_145 = lean::alloc_cnstr(0, 2, 0); -} else { - x_145 = x_141; -} -lean::cnstr_set(x_145, 0, x_144); -lean::cnstr_set(x_145, 1, x_140); -return x_145; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::box(0); -x_2 = lean::mk_string("_"); -x_3 = l_Lean_Parser_maxPrec; -x_4 = l_Lean_Parser_symbol_tokens___rarg(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_1); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens; -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_6); -lean::dec(x_6); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_8); -lean::dec(x_8); -lean::dec(x_4); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_1); -lean::dec(x_12); -x_14 = l_Lean_Parser_tokens___rarg(x_13); -lean::dec(x_13); -return x_14; -} -} -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5___rarg___boxed(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_9; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__5___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_9; -} -} -obj* _init_l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_1 = lean::mk_string("max"); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1___boxed), 5, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::mk_string("imax"); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1___boxed), 5, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::mk_string("_"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = l_Lean_Parser_maxPrec; -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::box(0); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___boxed), 1, 0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2___boxed), 1, 0); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_paren_Parser), 4, 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_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_9); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_2); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::mk_nat_obj(0u); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4), 6, 2); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_10); -x_23 = l_Lean_Parser_LevelParserM_Monad; -x_24 = l_Lean_Parser_LevelParserM_MonadExcept; -x_25 = l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec; -x_26 = l_Lean_Parser_LevelParserM_Alternative; -x_27 = l_Lean_Parser_Level_leading; -x_28 = l_Lean_Parser_Level_leading_HasView; -x_29 = l_Lean_Parser_Combinators_node_view___rarg(x_23, x_24, x_25, x_26, x_27, x_22, x_28); -lean::dec(x_22); -return x_29; -} -} -obj* _init_l_Lean_Parser_Level_leading_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string("max"); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1___boxed), 5, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::mk_string("imax"); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__1___boxed), 5, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::mk_string("_"); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = l_Lean_Parser_maxPrec; -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 7, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::box(0); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___boxed), 1, 0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__2___boxed), 1, 0); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_paren_Parser), 4, 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_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_9); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_2); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::mk_nat_obj(0u); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__4), 6, 2); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_10); -return x_22; -} -} -obj* l_Lean_Parser_Level_leading_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_Level_leading; -x_6 = l_Lean_Parser_Level_leading_Parser___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Level_paren_Parser___spec__1(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* _init_l_Lean_Parser_Level_app() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Level"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("app"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Level_app_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -lean::inc(x_2); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_Level_app; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_Level_app_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Level_app_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Level_app_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_Level_app_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -lean::dec(x_5); -x_9 = lean::box(3); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -x_12 = lean::cnstr_get(x_7, 0); -lean::inc(x_12); -lean::dec(x_7); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -} -} -} -obj* _init_l_Lean_Parser_Level_app_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_app_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_app_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Level_app_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Level_app_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Level_app_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Level_app_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Level_app_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = l_Lean_Parser_maxPrec; -x_2 = l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens(x_1); -x_3 = l_Lean_Parser_tokens___rarg(x_2); -lean::dec(x_2); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_Level_Lean_Parser_HasTokens; -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_5); -lean::dec(x_5); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_maxPrec; -x_7 = l_Lean_Parser_Level_Parser(x_6, x_2, x_3, x_4, x_5); -return x_7; -} -} -obj* _init_l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView___lambda__1___boxed), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_getLeading___boxed), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = l_Lean_Parser_TrailingLevelParserM_Monad; -x_7 = l_Lean_Parser_TrailingLevelParserM_MonadExcept; -x_8 = l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadParsec; -x_9 = l_Lean_Parser_TrailingLevelParserM_Alternative; -x_10 = l_Lean_Parser_Level_app; -x_11 = l_Lean_Parser_Level_app_HasView; -x_12 = l_Lean_Parser_Combinators_node_view___rarg(x_6, x_7, x_8, x_9, x_10, x_5, x_11); -lean::dec(x_5); -return x_12; -} -} -obj* l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_Level_app_Parser___spec__2(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_3) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_9 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_9); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_8); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_68; obj* x_69; -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_3, 1); -lean::inc(x_13); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_14 = x_3; -} else { - lean::dec_ref(x_3); - x_14 = lean::box(0); -} -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -x_68 = lean::apply_5(x_12, x_4, x_5, x_6, x_7, x_8); -x_69 = lean::cnstr_get(x_68, 0); -lean::inc(x_69); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -x_70 = lean::cnstr_get(x_68, 1); -lean::inc(x_70); -lean::dec(x_68); -x_15 = x_69; -x_16 = x_70; -goto block_67; -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_71; -x_71 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -if (x_71 == 0) -{ -obj* x_72; uint8 x_73; -x_72 = lean::cnstr_get(x_68, 1); -lean::inc(x_72); -lean::dec(x_68); -x_73 = !lean::is_exclusive(x_69); -if (x_73 == 0) -{ -uint8 x_74; -x_74 = 0; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_74); -x_15 = x_69; -x_16 = x_72; -goto block_67; -} -else -{ -obj* x_75; uint8 x_76; obj* x_77; -x_75 = lean::cnstr_get(x_69, 0); -lean::inc(x_75); -lean::dec(x_69); -x_76 = 0; -x_77 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_77, 0, x_75); -lean::cnstr_set_scalar(x_77, sizeof(void*)*1, x_76); -x_15 = x_77; -x_16 = x_72; -goto block_67; -} -} -else -{ -obj* x_78; uint8 x_79; -x_78 = lean::cnstr_get(x_68, 1); -lean::inc(x_78); -lean::dec(x_68); -x_79 = !lean::is_exclusive(x_69); -if (x_79 == 0) -{ -uint8 x_80; -x_80 = 1; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_80); -x_15 = x_69; -x_16 = x_78; -goto block_67; -} -else -{ -obj* x_81; uint8 x_82; obj* x_83; -x_81 = lean::cnstr_get(x_69, 0); -lean::inc(x_81); -lean::dec(x_69); -x_82 = 1; -x_83 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_83, 0, x_81); -lean::cnstr_set_scalar(x_83, sizeof(void*)*1, x_82); -x_15 = x_83; -x_16 = x_78; -goto block_67; -} -} -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_69, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_84, 3); -lean::inc(x_85); -if (lean::obj_tag(x_85) == 0) -{ -obj* x_86; uint8 x_87; -x_86 = lean::cnstr_get(x_68, 1); -lean::inc(x_86); -lean::dec(x_68); -x_87 = !lean::is_exclusive(x_69); -if (x_87 == 0) -{ -uint8 x_88; obj* x_89; uint8 x_90; -x_88 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -x_89 = lean::cnstr_get(x_69, 0); -lean::dec(x_89); -x_90 = !lean::is_exclusive(x_84); -if (x_90 == 0) -{ -obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_91 = lean::cnstr_get(x_84, 3); -lean::dec(x_91); -x_92 = lean::box(3); -lean::inc(x_2); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set(x_93, 1, x_2); -x_94 = l_List_reverse___rarg(x_93); -lean::inc(x_1); -x_95 = l_Lean_Parser_Syntax_mkNode(x_1, x_94); -x_96 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_84, 3, x_96); -if (x_88 == 0) -{ -uint8 x_97; -x_97 = 0; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_97); -x_15 = x_69; -x_16 = x_86; -goto block_67; -} -else -{ -uint8 x_98; -x_98 = 1; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_98); -x_15 = x_69; -x_16 = x_86; -goto block_67; -} -} -else -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_99 = lean::cnstr_get(x_84, 0); -x_100 = lean::cnstr_get(x_84, 1); -x_101 = lean::cnstr_get(x_84, 2); -lean::inc(x_101); -lean::inc(x_100); -lean::inc(x_99); -lean::dec(x_84); -x_102 = lean::box(3); -lean::inc(x_2); -x_103 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_2); -x_104 = l_List_reverse___rarg(x_103); -lean::inc(x_1); -x_105 = l_Lean_Parser_Syntax_mkNode(x_1, x_104); -x_106 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_106, 0, x_105); -x_107 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_107, 0, x_99); -lean::cnstr_set(x_107, 1, x_100); -lean::cnstr_set(x_107, 2, x_101); -lean::cnstr_set(x_107, 3, x_106); -if (x_88 == 0) -{ -uint8 x_108; -x_108 = 0; -lean::cnstr_set(x_69, 0, x_107); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_108); -x_15 = x_69; -x_16 = x_86; -goto block_67; -} -else -{ -uint8 x_109; -x_109 = 1; -lean::cnstr_set(x_69, 0, x_107); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_109); -x_15 = x_69; -x_16 = x_86; -goto block_67; -} -} -} -else -{ -uint8 x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; -x_110 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -lean::dec(x_69); -x_111 = lean::cnstr_get(x_84, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_84, 1); -lean::inc(x_112); -x_113 = lean::cnstr_get(x_84, 2); -lean::inc(x_113); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - lean::cnstr_release(x_84, 1); - lean::cnstr_release(x_84, 2); - lean::cnstr_release(x_84, 3); - x_114 = x_84; -} else { - lean::dec_ref(x_84); - x_114 = lean::box(0); -} -x_115 = lean::box(3); -lean::inc(x_2); -x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_115); -lean::cnstr_set(x_116, 1, x_2); -x_117 = l_List_reverse___rarg(x_116); -lean::inc(x_1); -x_118 = l_Lean_Parser_Syntax_mkNode(x_1, x_117); -x_119 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_119, 0, x_118); -if (lean::is_scalar(x_114)) { - x_120 = lean::alloc_cnstr(0, 4, 0); -} else { - x_120 = x_114; -} -lean::cnstr_set(x_120, 0, x_111); -lean::cnstr_set(x_120, 1, x_112); -lean::cnstr_set(x_120, 2, x_113); -lean::cnstr_set(x_120, 3, x_119); -if (x_110 == 0) -{ -uint8 x_121; obj* x_122; -x_121 = 0; -x_122 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_122, 0, x_120); -lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_121); -x_15 = x_122; -x_16 = x_86; -goto block_67; -} -else -{ -uint8 x_123; obj* x_124; -x_123 = 1; -x_124 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_124, 0, x_120); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_123); -x_15 = x_124; -x_16 = x_86; -goto block_67; -} -} -} -else -{ -obj* x_125; uint8 x_126; -x_125 = lean::cnstr_get(x_68, 1); -lean::inc(x_125); -lean::dec(x_68); -x_126 = !lean::is_exclusive(x_69); -if (x_126 == 0) -{ -uint8 x_127; obj* x_128; uint8 x_129; -x_127 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -x_128 = lean::cnstr_get(x_69, 0); -lean::dec(x_128); -x_129 = !lean::is_exclusive(x_84); -if (x_129 == 0) -{ -obj* x_130; uint8 x_131; -x_130 = lean::cnstr_get(x_84, 3); -lean::dec(x_130); -x_131 = !lean::is_exclusive(x_85); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; -x_132 = lean::cnstr_get(x_85, 0); -lean::inc(x_2); -x_133 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_133, 0, x_132); -lean::cnstr_set(x_133, 1, x_2); -x_134 = l_List_reverse___rarg(x_133); -lean::inc(x_1); -x_135 = l_Lean_Parser_Syntax_mkNode(x_1, x_134); -lean::cnstr_set(x_85, 0, x_135); -if (x_127 == 0) -{ -uint8 x_136; -x_136 = 0; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_136); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -else -{ -uint8 x_137; -x_137 = 1; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_137); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -} -else -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -x_138 = lean::cnstr_get(x_85, 0); -lean::inc(x_138); -lean::dec(x_85); -lean::inc(x_2); -x_139 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_139, 0, x_138); -lean::cnstr_set(x_139, 1, x_2); -x_140 = l_List_reverse___rarg(x_139); -lean::inc(x_1); -x_141 = l_Lean_Parser_Syntax_mkNode(x_1, x_140); -x_142 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_142, 0, x_141); -lean::cnstr_set(x_84, 3, x_142); -if (x_127 == 0) -{ -uint8 x_143; -x_143 = 0; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_143); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -else -{ -uint8 x_144; -x_144 = 1; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_144); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -} -} -else -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; -x_145 = lean::cnstr_get(x_84, 0); -x_146 = lean::cnstr_get(x_84, 1); -x_147 = lean::cnstr_get(x_84, 2); -lean::inc(x_147); -lean::inc(x_146); -lean::inc(x_145); -lean::dec(x_84); -x_148 = lean::cnstr_get(x_85, 0); -lean::inc(x_148); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - x_149 = x_85; -} else { - lean::dec_ref(x_85); - x_149 = lean::box(0); -} -lean::inc(x_2); -x_150 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_150, 0, x_148); -lean::cnstr_set(x_150, 1, x_2); -x_151 = l_List_reverse___rarg(x_150); -lean::inc(x_1); -x_152 = l_Lean_Parser_Syntax_mkNode(x_1, x_151); -if (lean::is_scalar(x_149)) { - x_153 = lean::alloc_cnstr(1, 1, 0); -} else { - x_153 = x_149; -} -lean::cnstr_set(x_153, 0, x_152); -x_154 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_154, 0, x_145); -lean::cnstr_set(x_154, 1, x_146); -lean::cnstr_set(x_154, 2, x_147); -lean::cnstr_set(x_154, 3, x_153); -if (x_127 == 0) -{ -uint8 x_155; -x_155 = 0; -lean::cnstr_set(x_69, 0, x_154); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_155); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -else -{ -uint8 x_156; -x_156 = 1; -lean::cnstr_set(x_69, 0, x_154); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_156); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -} -} -else -{ -uint8 x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; -x_157 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -lean::dec(x_69); -x_158 = lean::cnstr_get(x_84, 0); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_84, 1); -lean::inc(x_159); -x_160 = lean::cnstr_get(x_84, 2); -lean::inc(x_160); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - lean::cnstr_release(x_84, 1); - lean::cnstr_release(x_84, 2); - lean::cnstr_release(x_84, 3); - x_161 = x_84; -} else { - lean::dec_ref(x_84); - x_161 = lean::box(0); -} -x_162 = lean::cnstr_get(x_85, 0); -lean::inc(x_162); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - x_163 = x_85; -} else { - lean::dec_ref(x_85); - x_163 = lean::box(0); -} -lean::inc(x_2); -x_164 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_164, 0, x_162); -lean::cnstr_set(x_164, 1, x_2); -x_165 = l_List_reverse___rarg(x_164); -lean::inc(x_1); -x_166 = l_Lean_Parser_Syntax_mkNode(x_1, x_165); -if (lean::is_scalar(x_163)) { - x_167 = lean::alloc_cnstr(1, 1, 0); -} else { - x_167 = x_163; -} -lean::cnstr_set(x_167, 0, x_166); -if (lean::is_scalar(x_161)) { - x_168 = lean::alloc_cnstr(0, 4, 0); -} else { - x_168 = x_161; -} -lean::cnstr_set(x_168, 0, x_158); -lean::cnstr_set(x_168, 1, x_159); -lean::cnstr_set(x_168, 2, x_160); -lean::cnstr_set(x_168, 3, x_167); -if (x_157 == 0) -{ -uint8 x_169; obj* x_170; -x_169 = 0; -x_170 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_170, 0, x_168); -lean::cnstr_set_scalar(x_170, sizeof(void*)*1, x_169); -x_15 = x_170; -x_16 = x_125; -goto block_67; -} -else -{ -uint8 x_171; obj* x_172; -x_171 = 1; -x_172 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_172, 0, x_168); -lean::cnstr_set_scalar(x_172, sizeof(void*)*1, x_171); -x_15 = x_172; -x_16 = x_125; -goto block_67; -} -} -} -} -} -block_67: -{ -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_15); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = lean::cnstr_get(x_15, 0); -x_19 = lean::cnstr_get(x_15, 2); -if (lean::is_scalar(x_14)) { - x_20 = lean::alloc_cnstr(1, 2, 0); -} else { - x_20 = x_14; -} -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_15, 2, x_21); -lean::cnstr_set(x_15, 0, x_20); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_15); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; uint8 x_27; -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_22, 2); -lean::inc(x_25); -lean::dec(x_22); -x_26 = l_List_mfoldl___main___at_Lean_Parser_Level_app_Parser___spec__2(x_1, x_23, x_13, x_4, x_5, x_6, x_24, x_16); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_26, 0); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_28); -lean::cnstr_set(x_26, 0, x_29); -return x_26; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = lean::cnstr_get(x_26, 0); -x_31 = lean::cnstr_get(x_26, 1); -lean::inc(x_31); -lean::inc(x_30); -lean::dec(x_26); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_30); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_31); -return x_33; -} -} -else -{ -uint8 x_34; -lean::dec(x_13); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_34 = !lean::is_exclusive(x_22); -if (x_34 == 0) -{ -obj* x_35; -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_22); -lean::cnstr_set(x_35, 1, x_16); -return x_35; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_22, 0); -x_37 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_22); -x_38 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_16); -return x_39; -} -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_40 = lean::cnstr_get(x_15, 0); -x_41 = lean::cnstr_get(x_15, 1); -x_42 = lean::cnstr_get(x_15, 2); -lean::inc(x_42); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_15); -if (lean::is_scalar(x_14)) { - x_43 = lean::alloc_cnstr(1, 2, 0); -} else { - x_43 = x_14; -} -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set(x_43, 1, x_2); -x_44 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_45 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_41); -lean::cnstr_set(x_45, 2, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_45); -if (lean::obj_tag(x_46) == 0) -{ -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; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_46, 2); -lean::inc(x_49); -lean::dec(x_46); -x_50 = l_List_mfoldl___main___at_Lean_Parser_Level_app_Parser___spec__2(x_1, x_47, x_13, x_4, x_5, x_6, x_48, x_16); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_50, 1); -lean::inc(x_52); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - x_53 = x_50; -} else { - lean::dec_ref(x_50); - x_53 = lean::box(0); -} -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_49, x_51); -if (lean::is_scalar(x_53)) { - x_55 = lean::alloc_cnstr(0, 2, 0); -} else { - x_55 = x_53; -} -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_52); -return x_55; -} -else -{ -obj* x_56; uint8 x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_13); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_56 = lean::cnstr_get(x_46, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_58 = x_46; -} else { - lean::dec_ref(x_46); - x_58 = lean::box(0); -} -if (lean::is_scalar(x_58)) { - x_59 = lean::alloc_cnstr(1, 1, 1); -} else { - x_59 = x_58; -} -lean::cnstr_set(x_59, 0, x_56); -lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_57); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_16); -return x_60; -} -} -} -else -{ -uint8 x_61; -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_61 = !lean::is_exclusive(x_15); -if (x_61 == 0) -{ -obj* x_62; -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_15); -lean::cnstr_set(x_62, 1, x_16); -return x_62; -} -else -{ -obj* x_63; uint8 x_64; obj* x_65; obj* x_66; -x_63 = lean::cnstr_get(x_15, 0); -x_64 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -lean::inc(x_63); -lean::dec(x_15); -x_65 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_65, 0, x_63); -lean::cnstr_set_scalar(x_65, sizeof(void*)*1, x_64); -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_16); -return x_66; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_Level_app_Parser___spec__1(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_10; -x_8 = lean::box(0); -lean::inc(x_1); -x_9 = l_List_mfoldl___main___at_Lean_Parser_Level_app_Parser___spec__2(x_1, x_8, x_2, x_3, x_4, x_5, x_6, x_7); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; uint8 x_13; -x_12 = lean::cnstr_get(x_9, 0); -lean::dec(x_12); -x_13 = !lean::is_exclusive(x_10); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_10, 0); -x_15 = lean::cnstr_get(x_10, 2); -x_16 = l_List_reverse___rarg(x_14); -x_17 = l_Lean_Parser_Syntax_mkNode(x_1, x_16); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_10, 2, x_18); -lean::cnstr_set(x_10, 0, x_17); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_10); -lean::cnstr_set(x_9, 0, x_19); -return x_9; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_20 = lean::cnstr_get(x_10, 0); -x_21 = lean::cnstr_get(x_10, 1); -x_22 = lean::cnstr_get(x_10, 2); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_10); -x_23 = l_List_reverse___rarg(x_20); -x_24 = l_Lean_Parser_Syntax_mkNode(x_1, x_23); -x_25 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_21); -lean::cnstr_set(x_26, 2, x_25); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_26); -lean::cnstr_set(x_9, 0, x_27); -return x_9; -} -} -else -{ -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; -x_28 = lean::cnstr_get(x_9, 1); -lean::inc(x_28); -lean::dec(x_9); -x_29 = lean::cnstr_get(x_10, 0); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_10, 1); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_10, 2); -lean::inc(x_31); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - lean::cnstr_release(x_10, 2); - x_32 = x_10; -} else { - lean::dec_ref(x_10); - x_32 = lean::box(0); -} -x_33 = l_List_reverse___rarg(x_29); -x_34 = l_Lean_Parser_Syntax_mkNode(x_1, x_33); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_32)) { - x_36 = lean::alloc_cnstr(0, 3, 0); -} else { - x_36 = x_32; -} -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_30); -lean::cnstr_set(x_36, 2, x_35); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_28); -return x_38; -} -} -else -{ -uint8 x_39; -lean::dec(x_1); -x_39 = !lean::is_exclusive(x_9); -if (x_39 == 0) -{ -obj* x_40; uint8 x_41; -x_40 = lean::cnstr_get(x_9, 0); -lean::dec(x_40); -x_41 = !lean::is_exclusive(x_10); -if (x_41 == 0) -{ -return x_9; -} -else -{ -obj* x_42; uint8 x_43; obj* x_44; -x_42 = lean::cnstr_get(x_10, 0); -x_43 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_42); -lean::dec(x_10); -x_44 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set_scalar(x_44, sizeof(void*)*1, x_43); -lean::cnstr_set(x_9, 0, x_44); -return x_9; -} -} -else -{ -obj* x_45; obj* x_46; uint8 x_47; obj* x_48; obj* x_49; obj* x_50; -x_45 = lean::cnstr_get(x_9, 1); -lean::inc(x_45); -lean::dec(x_9); -x_46 = lean::cnstr_get(x_10, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_48 = x_10; -} else { - lean::dec_ref(x_10); - x_48 = lean::box(0); -} -if (lean::is_scalar(x_48)) { - x_49 = lean::alloc_cnstr(1, 1, 1); -} else { - x_49 = x_48; -} -lean::cnstr_set(x_49, 0, x_46); -lean::cnstr_set_scalar(x_49, sizeof(void*)*1, x_47); -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_45); -return x_50; -} -} -} -} -obj* _init_l_Lean_Parser_Level_app_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView___lambda__1___boxed), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_getLeading___boxed), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -return x_5; -} -} -obj* l_Lean_Parser_Level_app_Parser(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; -x_6 = l_Lean_Parser_Level_app; -x_7 = l_Lean_Parser_Level_app_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Level_app_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Level_addLit() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Level"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("addLit"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Level_addLit_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_number_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_4); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_Level_addLit; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_9); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_2); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Level_addLit; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_number_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__1; -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_1); -lean::cnstr_set(x_4, 2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Level_addLit_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_28; -x_28 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; -x_29 = l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__2; -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -lean::dec(x_28); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = lean::box(3); -x_2 = x_31; -x_3 = x_32; -goto block_27; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -lean::dec(x_31); -x_2 = x_34; -x_3 = x_33; -goto block_27; -} -} -block_27: -{ -obj* x_4; obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_24; -x_24 = lean::box(3); -x_4 = x_2; -x_5 = x_24; -goto block_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_2, 1); -lean::inc(x_26); -lean::dec(x_2); -x_4 = x_26; -x_5 = x_25; -goto block_23; -} -block_23: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_3); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_4, 0); -lean::inc(x_10); -lean::dec(x_4); -x_11 = l_Lean_Parser_number_HasView; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_10); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_3); -lean::cnstr_set(x_14, 1, x_7); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_5); -x_15 = lean::box(0); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_16; obj* x_17; -x_16 = l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_3); -lean::cnstr_set(x_17, 1, x_15); -lean::cnstr_set(x_17, 2, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = lean::cnstr_get(x_4, 0); -lean::inc(x_18); -lean::dec(x_4); -x_19 = l_Lean_Parser_number_HasView; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_21 = lean::apply_1(x_20, x_18); -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_3); -lean::cnstr_set(x_22, 1, x_15); -lean::cnstr_set(x_22, 2, x_21); -return x_22; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Level_addLit_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_addLit_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_addLit_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Level_addLit_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Level_addLit_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__1(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_9; obj* x_10; obj* x_11; -lean::inc(x_1); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_1); -lean::inc(x_7); -lean::inc(x_6); -x_10 = l_Lean_Parser_token(x_6, x_7, x_8); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; uint8 x_15; -x_13 = lean::cnstr_get(x_10, 1); -x_14 = lean::cnstr_get(x_10, 0); -lean::dec(x_14); -x_15 = !lean::is_exclusive(x_11); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_11, 0); -x_17 = lean::cnstr_get(x_11, 1); -x_18 = lean::cnstr_get(x_11, 2); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; -x_40 = lean::cnstr_get(x_16, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -x_42 = lean::string_dec_eq(x_1, x_41); -lean::dec(x_1); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -lean::free_heap_obj(x_11); -lean::free_heap_obj(x_10); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_7); -x_44 = lean::box(0); -x_45 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_41, x_3, x_43, x_44, x_6, x_17, x_13); -lean::dec(x_6); -lean::dec(x_43); -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_45); -if (x_47 == 0) -{ -obj* x_48; uint8 x_49; -x_48 = lean::cnstr_get(x_45, 0); -lean::dec(x_48); -x_49 = !lean::is_exclusive(x_46); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_50 = lean::cnstr_get(x_46, 2); -x_51 = lean::cnstr_get(x_46, 0); -lean::dec(x_51); -x_52 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_46, 2, x_52); -lean::cnstr_set(x_46, 0, x_16); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_46); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_53); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_54); -x_56 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_55, x_9); -x_57 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_56); -lean::cnstr_set(x_45, 0, x_57); -return x_45; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_58 = lean::cnstr_get(x_46, 1); -x_59 = lean::cnstr_get(x_46, 2); -lean::inc(x_59); -lean::inc(x_58); -lean::dec(x_46); -x_60 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_61 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_61, 0, x_16); -lean::cnstr_set(x_61, 1, x_58); -lean::cnstr_set(x_61, 2, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_60, x_63); -x_65 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_64, x_9); -x_66 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_65); -lean::cnstr_set(x_45, 0, x_66); -return x_45; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_67 = lean::cnstr_get(x_45, 1); -lean::inc(x_67); -lean::dec(x_45); -x_68 = lean::cnstr_get(x_46, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_46, 2); -lean::inc(x_69); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - lean::cnstr_release(x_46, 2); - x_70 = x_46; -} else { - lean::dec_ref(x_46); - x_70 = lean::box(0); -} -x_71 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_70)) { - x_72 = lean::alloc_cnstr(0, 3, 0); -} else { - x_72 = x_70; -} -lean::cnstr_set(x_72, 0, x_16); -lean::cnstr_set(x_72, 1, x_68); -lean::cnstr_set(x_72, 2, x_71); -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_72); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_73); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_74); -x_76 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_75, x_9); -x_77 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_76); -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_67); -return x_78; -} -} -else -{ -uint8 x_79; -lean::dec(x_16); -x_79 = !lean::is_exclusive(x_45); -if (x_79 == 0) -{ -obj* x_80; uint8 x_81; -x_80 = lean::cnstr_get(x_45, 0); -lean::dec(x_80); -x_81 = !lean::is_exclusive(x_46); -if (x_81 == 0) -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_46); -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_82); -x_85 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_84, x_9); -x_86 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_85); -lean::cnstr_set(x_45, 0, x_86); -return x_45; -} -else -{ -obj* x_87; uint8 x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_87 = lean::cnstr_get(x_46, 0); -x_88 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -lean::inc(x_87); -lean::dec(x_46); -x_89 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_89, 0, x_87); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_88); -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_89); -x_91 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_90); -x_93 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_92, x_9); -x_94 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_93); -lean::cnstr_set(x_45, 0, x_94); -return x_45; -} -} -else -{ -obj* x_95; obj* x_96; uint8 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; -x_95 = lean::cnstr_get(x_45, 1); -lean::inc(x_95); -lean::dec(x_45); -x_96 = lean::cnstr_get(x_46, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_98 = x_46; -} else { - lean::dec_ref(x_46); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(1, 1, 1); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_96); -lean::cnstr_set_scalar(x_99, sizeof(void*)*1, x_97); -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_99); -x_101 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_101, x_100); -x_103 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_102, x_9); -x_104 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_103); -x_105 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_95); -return x_105; -} -} -} -else -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -lean::dec(x_41); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_3); -x_106 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_11, 2, x_106); -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_11); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_108, x_107); -x_110 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_109, x_9); -x_111 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_110); -lean::cnstr_set(x_10, 0, x_111); -return x_10; -} -} -else -{ -obj* x_112; -lean::free_heap_obj(x_11); -lean::dec(x_16); -lean::free_heap_obj(x_10); -lean::dec(x_1); -x_112 = lean::box(0); -x_19 = x_112; -goto block_39; -} -block_39: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -lean::dec(x_19); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_7); -x_21 = lean::box(0); -x_22 = l_String_splitAux___main___closed__1; -x_23 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_22, x_3, x_20, x_21, x_6, x_17, x_13); -lean::dec(x_6); -lean::dec(x_20); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_23, 0); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_25); -x_27 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_27, x_26); -x_29 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_28, x_9); -x_30 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_29); -lean::cnstr_set(x_23, 0, x_30); -return x_23; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_31 = lean::cnstr_get(x_23, 0); -x_32 = lean::cnstr_get(x_23, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_23); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_31); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_33); -x_36 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_35, x_9); -x_37 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_32); -return x_38; -} -} -} -else -{ -obj* x_113; obj* x_114; obj* x_115; obj* x_116; -x_113 = lean::cnstr_get(x_11, 0); -x_114 = lean::cnstr_get(x_11, 1); -x_115 = lean::cnstr_get(x_11, 2); -lean::inc(x_115); -lean::inc(x_114); -lean::inc(x_113); -lean::dec(x_11); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_131; obj* x_132; uint8 x_133; -x_131 = lean::cnstr_get(x_113, 0); -lean::inc(x_131); -x_132 = lean::cnstr_get(x_131, 1); -lean::inc(x_132); -lean::dec(x_131); -x_133 = lean::string_dec_eq(x_1, x_132); -lean::dec(x_1); -if (x_133 == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; -lean::free_heap_obj(x_10); -x_134 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_134, 0, x_7); -x_135 = lean::box(0); -x_136 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_132, x_3, x_134, x_135, x_6, x_114, x_13); -lean::dec(x_6); -lean::dec(x_134); -x_137 = lean::cnstr_get(x_136, 0); -lean::inc(x_137); -if (lean::obj_tag(x_137) == 0) -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; -x_138 = lean::cnstr_get(x_136, 1); -lean::inc(x_138); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_139 = x_136; -} else { - lean::dec_ref(x_136); - x_139 = lean::box(0); -} -x_140 = lean::cnstr_get(x_137, 1); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_137, 2); -lean::inc(x_141); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - lean::cnstr_release(x_137, 2); - x_142 = x_137; -} else { - lean::dec_ref(x_137); - x_142 = lean::box(0); -} -x_143 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_142)) { - x_144 = lean::alloc_cnstr(0, 3, 0); -} else { - x_144 = x_142; -} -lean::cnstr_set(x_144, 0, x_113); -lean::cnstr_set(x_144, 1, x_140); -lean::cnstr_set(x_144, 2, x_143); -x_145 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_141, x_144); -x_146 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_145); -x_147 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_143, x_146); -x_148 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_147, x_9); -x_149 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_148); -if (lean::is_scalar(x_139)) { - x_150 = lean::alloc_cnstr(0, 2, 0); -} else { - x_150 = x_139; -} -lean::cnstr_set(x_150, 0, x_149); -lean::cnstr_set(x_150, 1, x_138); -return x_150; -} -else -{ -obj* x_151; obj* x_152; obj* x_153; uint8 x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -lean::dec(x_113); -x_151 = lean::cnstr_get(x_136, 1); -lean::inc(x_151); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_152 = x_136; -} else { - lean::dec_ref(x_136); - x_152 = lean::box(0); -} -x_153 = lean::cnstr_get(x_137, 0); -lean::inc(x_153); -x_154 = lean::cnstr_get_scalar(x_137, sizeof(void*)*1); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - x_155 = x_137; -} else { - lean::dec_ref(x_137); - x_155 = lean::box(0); -} -if (lean::is_scalar(x_155)) { - x_156 = lean::alloc_cnstr(1, 1, 1); -} else { - x_156 = x_155; -} -lean::cnstr_set(x_156, 0, x_153); -lean::cnstr_set_scalar(x_156, sizeof(void*)*1, x_154); -x_157 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_156); -x_158 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_159 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_158, x_157); -x_160 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_159, x_9); -x_161 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_160); -if (lean::is_scalar(x_152)) { - x_162 = lean::alloc_cnstr(0, 2, 0); -} else { - x_162 = x_152; -} -lean::cnstr_set(x_162, 0, x_161); -lean::cnstr_set(x_162, 1, x_151); -return x_162; -} -} -else -{ -obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; -lean::dec(x_132); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_3); -x_163 = l_Lean_Parser_finishCommentBlock___closed__2; -x_164 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_164, 0, x_113); -lean::cnstr_set(x_164, 1, x_114); -lean::cnstr_set(x_164, 2, x_163); -x_165 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_164); -x_166 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_167 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_166, x_165); -x_168 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_167, x_9); -x_169 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_168); -lean::cnstr_set(x_10, 0, x_169); -return x_10; -} -} -else -{ -obj* x_170; -lean::dec(x_113); -lean::free_heap_obj(x_10); -lean::dec(x_1); -x_170 = lean::box(0); -x_116 = x_170; -goto block_130; -} -block_130: -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; -lean::dec(x_116); -x_117 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_117, 0, x_7); -x_118 = lean::box(0); -x_119 = l_String_splitAux___main___closed__1; -x_120 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_119, x_3, x_117, x_118, x_6, x_114, x_13); -lean::dec(x_6); -lean::dec(x_117); -x_121 = lean::cnstr_get(x_120, 0); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_120, 1); -lean::inc(x_122); -if (lean::is_exclusive(x_120)) { - lean::cnstr_release(x_120, 0); - lean::cnstr_release(x_120, 1); - x_123 = x_120; -} else { - lean::dec_ref(x_120); - x_123 = lean::box(0); -} -x_124 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_121); -x_125 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_126 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_125, x_124); -x_127 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_126, x_9); -x_128 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_127); -if (lean::is_scalar(x_123)) { - x_129 = lean::alloc_cnstr(0, 2, 0); -} else { - x_129 = x_123; -} -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_122); -return x_129; -} -} -} -else -{ -obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; -x_171 = lean::cnstr_get(x_10, 1); -lean::inc(x_171); -lean::dec(x_10); -x_172 = lean::cnstr_get(x_11, 0); -lean::inc(x_172); -x_173 = lean::cnstr_get(x_11, 1); -lean::inc(x_173); -x_174 = lean::cnstr_get(x_11, 2); -lean::inc(x_174); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - lean::cnstr_release(x_11, 2); - x_175 = x_11; -} else { - lean::dec_ref(x_11); - x_175 = lean::box(0); -} -if (lean::obj_tag(x_172) == 0) -{ -obj* x_191; obj* x_192; uint8 x_193; -x_191 = lean::cnstr_get(x_172, 0); -lean::inc(x_191); -x_192 = lean::cnstr_get(x_191, 1); -lean::inc(x_192); -lean::dec(x_191); -x_193 = lean::string_dec_eq(x_1, x_192); -lean::dec(x_1); -if (x_193 == 0) -{ -obj* x_194; obj* x_195; obj* x_196; obj* x_197; -lean::dec(x_175); -x_194 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_194, 0, x_7); -x_195 = lean::box(0); -x_196 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_192, x_3, x_194, x_195, x_6, x_173, x_171); -lean::dec(x_6); -lean::dec(x_194); -x_197 = lean::cnstr_get(x_196, 0); -lean::inc(x_197); -if (lean::obj_tag(x_197) == 0) -{ -obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; -x_198 = lean::cnstr_get(x_196, 1); -lean::inc(x_198); -if (lean::is_exclusive(x_196)) { - lean::cnstr_release(x_196, 0); - lean::cnstr_release(x_196, 1); - x_199 = x_196; -} else { - lean::dec_ref(x_196); - x_199 = lean::box(0); -} -x_200 = lean::cnstr_get(x_197, 1); -lean::inc(x_200); -x_201 = lean::cnstr_get(x_197, 2); -lean::inc(x_201); -if (lean::is_exclusive(x_197)) { - lean::cnstr_release(x_197, 0); - lean::cnstr_release(x_197, 1); - lean::cnstr_release(x_197, 2); - x_202 = x_197; -} else { - lean::dec_ref(x_197); - x_202 = lean::box(0); -} -x_203 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_202)) { - x_204 = lean::alloc_cnstr(0, 3, 0); -} else { - x_204 = x_202; -} -lean::cnstr_set(x_204, 0, x_172); -lean::cnstr_set(x_204, 1, x_200); -lean::cnstr_set(x_204, 2, x_203); -x_205 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_201, x_204); -x_206 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_205); -x_207 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_203, x_206); -x_208 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_207, x_9); -x_209 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_208); -if (lean::is_scalar(x_199)) { - x_210 = lean::alloc_cnstr(0, 2, 0); -} else { - x_210 = x_199; -} -lean::cnstr_set(x_210, 0, x_209); -lean::cnstr_set(x_210, 1, x_198); -return x_210; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; -lean::dec(x_172); -x_211 = lean::cnstr_get(x_196, 1); -lean::inc(x_211); -if (lean::is_exclusive(x_196)) { - lean::cnstr_release(x_196, 0); - lean::cnstr_release(x_196, 1); - x_212 = x_196; -} else { - lean::dec_ref(x_196); - x_212 = lean::box(0); -} -x_213 = lean::cnstr_get(x_197, 0); -lean::inc(x_213); -x_214 = lean::cnstr_get_scalar(x_197, sizeof(void*)*1); -if (lean::is_exclusive(x_197)) { - lean::cnstr_release(x_197, 0); - x_215 = x_197; -} else { - lean::dec_ref(x_197); - x_215 = lean::box(0); -} -if (lean::is_scalar(x_215)) { - x_216 = lean::alloc_cnstr(1, 1, 1); -} else { - x_216 = x_215; -} -lean::cnstr_set(x_216, 0, x_213); -lean::cnstr_set_scalar(x_216, sizeof(void*)*1, x_214); -x_217 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_216); -x_218 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_219 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_218, x_217); -x_220 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_219, x_9); -x_221 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_220); -if (lean::is_scalar(x_212)) { - x_222 = lean::alloc_cnstr(0, 2, 0); -} else { - x_222 = x_212; -} -lean::cnstr_set(x_222, 0, x_221); -lean::cnstr_set(x_222, 1, x_211); -return x_222; -} -} -else -{ -obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; -lean::dec(x_192); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_3); -x_223 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_175)) { - x_224 = lean::alloc_cnstr(0, 3, 0); -} else { - x_224 = x_175; -} -lean::cnstr_set(x_224, 0, x_172); -lean::cnstr_set(x_224, 1, x_173); -lean::cnstr_set(x_224, 2, x_223); -x_225 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_224); -x_226 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_227 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_226, x_225); -x_228 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_227, x_9); -x_229 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_228); -x_230 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_230, 0, x_229); -lean::cnstr_set(x_230, 1, x_171); -return x_230; -} -} -else -{ -obj* x_231; -lean::dec(x_175); -lean::dec(x_172); -lean::dec(x_1); -x_231 = lean::box(0); -x_176 = x_231; -goto block_190; -} -block_190: -{ -obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; -lean::dec(x_176); -x_177 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_177, 0, x_7); -x_178 = lean::box(0); -x_179 = l_String_splitAux___main___closed__1; -x_180 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_179, x_3, x_177, x_178, x_6, x_173, x_171); -lean::dec(x_6); -lean::dec(x_177); -x_181 = lean::cnstr_get(x_180, 0); -lean::inc(x_181); -x_182 = lean::cnstr_get(x_180, 1); -lean::inc(x_182); -if (lean::is_exclusive(x_180)) { - lean::cnstr_release(x_180, 0); - lean::cnstr_release(x_180, 1); - x_183 = x_180; -} else { - lean::dec_ref(x_180); - x_183 = lean::box(0); -} -x_184 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_181); -x_185 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_186 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_185, x_184); -x_187 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_186, x_9); -x_188 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_187); -if (lean::is_scalar(x_183)) { - x_189 = lean::alloc_cnstr(0, 2, 0); -} else { - x_189 = x_183; -} -lean::cnstr_set(x_189, 0, x_188); -lean::cnstr_set(x_189, 1, x_182); -return x_189; -} -} -} -else -{ -uint8 x_232; -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_1); -x_232 = !lean::is_exclusive(x_10); -if (x_232 == 0) -{ -obj* x_233; uint8 x_234; -x_233 = lean::cnstr_get(x_10, 0); -lean::dec(x_233); -x_234 = !lean::is_exclusive(x_11); -if (x_234 == 0) -{ -obj* x_235; obj* x_236; obj* x_237; obj* x_238; -x_235 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_236 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_235, x_11); -x_237 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_236, x_9); -x_238 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_237); -lean::cnstr_set(x_10, 0, x_238); -return x_10; -} -else -{ -obj* x_239; uint8 x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; -x_239 = lean::cnstr_get(x_11, 0); -x_240 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_239); -lean::dec(x_11); -x_241 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_241, 0, x_239); -lean::cnstr_set_scalar(x_241, sizeof(void*)*1, x_240); -x_242 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_243 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_242, x_241); -x_244 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_243, x_9); -x_245 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_244); -lean::cnstr_set(x_10, 0, x_245); -return x_10; -} -} -else -{ -obj* x_246; obj* x_247; uint8 x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; -x_246 = lean::cnstr_get(x_10, 1); -lean::inc(x_246); -lean::dec(x_10); -x_247 = lean::cnstr_get(x_11, 0); -lean::inc(x_247); -x_248 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_249 = x_11; -} else { - lean::dec_ref(x_11); - x_249 = lean::box(0); -} -if (lean::is_scalar(x_249)) { - x_250 = lean::alloc_cnstr(1, 1, 1); -} else { - x_250 = x_249; -} -lean::cnstr_set(x_250, 0, x_247); -lean::cnstr_set_scalar(x_250, sizeof(void*)*1, x_248); -x_251 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_252 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_251, x_250); -x_253 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_252, x_9); -x_254 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_253); -x_255 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_255, 0, x_254); -lean::cnstr_set(x_255, 1, x_246); -return x_255; -} -} -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -lean::inc(x_1); -x_4 = l_Lean_Parser_token(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_4, 1); -x_8 = lean::cnstr_get(x_4, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; uint8 x_14; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_5, 1); -x_12 = lean::cnstr_get(x_5, 2); -x_13 = l_Lean_Parser_number; -x_14 = l_Lean_Parser_Syntax_isOfKind___main(x_13, x_10); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -lean::free_heap_obj(x_5); -lean::dec(x_10); -lean::free_heap_obj(x_4); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_2); -x_16 = lean::box(0); -x_17 = l_String_splitAux___main___closed__1; -x_18 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_19 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_17, x_18, x_15, x_16, x_1, x_11, x_7); -lean::dec(x_1); -lean::dec(x_15); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_21); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_22); -x_25 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_24); -lean::cnstr_set(x_19, 0, x_25); -return x_19; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_26 = lean::cnstr_get(x_19, 0); -x_27 = lean::cnstr_get(x_19, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_19); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_26); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_28); -x_31 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_27); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; -lean::dec(x_2); -lean::dec(x_1); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_5, 2, x_33); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_34); -x_36 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_35); -lean::cnstr_set(x_4, 0, x_36); -return x_4; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; uint8 x_41; -x_37 = lean::cnstr_get(x_5, 0); -x_38 = lean::cnstr_get(x_5, 1); -x_39 = lean::cnstr_get(x_5, 2); -lean::inc(x_39); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_5); -x_40 = l_Lean_Parser_number; -x_41 = l_Lean_Parser_Syntax_isOfKind___main(x_40, x_37); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_37); -lean::free_heap_obj(x_4); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_2); -x_43 = lean::box(0); -x_44 = l_String_splitAux___main___closed__1; -x_45 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_46 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_44, x_45, x_42, x_43, x_1, x_38, x_7); -lean::dec(x_1); -lean::dec(x_42); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - x_49 = x_46; -} else { - lean::dec_ref(x_46); - x_49 = lean::box(0); -} -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_47); -x_51 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_50); -x_53 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_52); -if (lean::is_scalar(x_49)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_49; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_48); -return x_54; -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_2); -lean::dec(x_1); -x_55 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_56 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_56, 0, x_37); -lean::cnstr_set(x_56, 1, x_38); -lean::cnstr_set(x_56, 2, x_55); -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_56); -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_57); -x_59 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_58); -lean::cnstr_set(x_4, 0, x_59); -return x_4; -} -} -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; uint8 x_66; -x_60 = lean::cnstr_get(x_4, 1); -lean::inc(x_60); -lean::dec(x_4); -x_61 = lean::cnstr_get(x_5, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_5, 1); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_5, 2); -lean::inc(x_63); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_64 = x_5; -} else { - lean::dec_ref(x_5); - x_64 = lean::box(0); -} -x_65 = l_Lean_Parser_number; -x_66 = l_Lean_Parser_Syntax_isOfKind___main(x_65, x_61); -if (x_66 == 0) -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -lean::dec(x_64); -lean::dec(x_61); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_2); -x_68 = lean::box(0); -x_69 = l_String_splitAux___main___closed__1; -x_70 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_71 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_69, x_70, x_67, x_68, x_1, x_62, x_60); -lean::dec(x_1); -lean::dec(x_67); -x_72 = lean::cnstr_get(x_71, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_71, 1); -lean::inc(x_73); -if (lean::is_exclusive(x_71)) { - lean::cnstr_release(x_71, 0); - lean::cnstr_release(x_71, 1); - x_74 = x_71; -} else { - lean::dec_ref(x_71); - x_74 = lean::box(0); -} -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_72); -x_76 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_76, x_75); -x_78 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_77); -if (lean::is_scalar(x_74)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_74; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_73); -return x_79; -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -lean::dec(x_2); -lean::dec(x_1); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_64)) { - x_81 = lean::alloc_cnstr(0, 3, 0); -} else { - x_81 = x_64; -} -lean::cnstr_set(x_81, 0, x_61); -lean::cnstr_set(x_81, 1, x_62); -lean::cnstr_set(x_81, 2, x_80); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_82); -x_84 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_83); -x_85 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_60); -return x_85; -} -} -} -else -{ -uint8 x_86; -lean::dec(x_2); -lean::dec(x_1); -x_86 = !lean::is_exclusive(x_4); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_4, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_5); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; -x_89 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_89, x_5); -x_91 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_90); -lean::cnstr_set(x_4, 0, x_91); -return x_4; -} -else -{ -obj* x_92; uint8 x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_92 = lean::cnstr_get(x_5, 0); -x_93 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_92); -lean::dec(x_5); -x_94 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_93); -x_95 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_96 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_95, x_94); -x_97 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_96); -lean::cnstr_set(x_4, 0, x_97); -return x_4; -} -} -else -{ -obj* x_98; obj* x_99; uint8 x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_98 = lean::cnstr_get(x_4, 1); -lean::inc(x_98); -lean::dec(x_4); -x_99 = lean::cnstr_get(x_5, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - x_101 = x_5; -} else { - lean::dec_ref(x_5); - x_101 = lean::box(0); -} -if (lean::is_scalar(x_101)) { - x_102 = lean::alloc_cnstr(1, 1, 1); -} else { - x_102 = x_101; -} -lean::cnstr_set(x_102, 0, x_99); -lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_100); -x_103 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_102); -x_105 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_104); -x_106 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_106, 0, x_105); -lean::cnstr_set(x_106, 1, x_98); -return x_106; -} -} -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__2___rarg), 3, 0); -return x_3; -} -} -obj* _init_l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("+"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_5); -lean::dec(x_5); -lean::dec(x_3); -x_7 = l_Lean_Parser_Level_Lean_Parser_HasTokens; -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_6); -lean::dec(x_6); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__1___boxed(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_9; -x_9 = l_Lean_Parser_symbolCore___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -return x_9; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_number_Parser___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::mk_string("+"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_addLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 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); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_getLeading___boxed), 5, 0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_TrailingLevelParserM_Monad; -x_13 = l_Lean_Parser_TrailingLevelParserM_MonadExcept; -x_14 = l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadParsec; -x_15 = l_Lean_Parser_TrailingLevelParserM_Alternative; -x_16 = l_Lean_Parser_Level_addLit; -x_17 = l_Lean_Parser_Level_addLit_HasView; -x_18 = l_Lean_Parser_Combinators_node_view___rarg(x_12, x_13, x_14, x_15, x_16, x_11, x_17); -lean::dec(x_11); -return x_18; -} -} -obj* _init_l_Lean_Parser_Level_addLit_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::mk_string("+"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_addLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 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); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_getLeading___boxed), 5, 0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -return x_11; -} -} -obj* l_Lean_Parser_Level_addLit_Parser(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; -x_6 = l_Lean_Parser_Level_addLit; -x_7 = l_Lean_Parser_Level_addLit_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Level_app_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Level_trailing() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Level"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("trailing"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Level_trailing_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Level_app_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Level_trailing; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Level_addLit_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Level_trailing; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Level_app_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Level"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("trailing"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Level_trailing_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Level_addLit_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Level_app_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Level_trailing_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_trailing_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_trailing_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Level_trailing_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Level_trailing_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2___rarg(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: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_10; uint8 x_11; obj* x_12; obj* x_13; -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -lean::cnstr_set(x_10, 2, x_2); -lean::cnstr_set(x_10, 3, x_4); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_9); -return x_13; -} -else -{ -obj* x_14; obj* x_15; uint8 x_16; obj* x_17; obj* x_18; -lean::dec(x_8); -x_14 = lean::cnstr_get(x_3, 0); -lean::inc(x_14); -x_15 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -lean::cnstr_set(x_15, 2, x_2); -lean::cnstr_set(x_15, 3, x_4); -x_16 = 0; -x_17 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set_scalar(x_17, sizeof(void*)*1, x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -return x_18; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 9, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_2); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -x_10 = l_mjoin___rarg___closed__1; -x_11 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_9, x_10, x_8, x_8, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_11; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_1); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_1, 0); -x_14 = lean::cnstr_get(x_1, 1); -x_15 = lean::mk_nat_obj(1u); -x_16 = lean::nat_add(x_2, x_15); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_17 = lean::apply_5(x_13, x_3, x_4, x_5, x_6, x_7); -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_17); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; uint8 x_22; -x_20 = lean::cnstr_get(x_17, 1); -x_21 = lean::cnstr_get(x_17, 0); -lean::dec(x_21); -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = lean::cnstr_get(x_18, 2); -x_25 = lean::box(0); -x_26 = lean_name_mk_numeral(x_25, x_2); -x_27 = lean::box(0); -lean::cnstr_set(x_1, 1, x_27); -lean::cnstr_set(x_1, 0, x_23); -x_28 = l_Lean_Parser_Syntax_mkNode(x_26, x_1); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_18, 2, x_29); -lean::cnstr_set(x_18, 0, x_28); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_18); -if (lean::obj_tag(x_30) == 0) -{ -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_17, 0, x_30); -return x_17; -} -else -{ -uint8 x_31; -x_31 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; uint8 x_34; -lean::free_heap_obj(x_17); -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1(x_14, x_16, x_3, x_4, x_5, x_6, x_20); -x_34 = !lean::is_exclusive(x_33); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_33, 0); -x_36 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_32, x_35); -lean::cnstr_set(x_33, 0, x_36); -return x_33; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_37 = lean::cnstr_get(x_33, 0); -x_38 = lean::cnstr_get(x_33, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_33); -x_39 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_32, x_37); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_38); -return x_40; -} -} -else -{ -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_17, 0, x_30); -return x_17; -} -} -} -else -{ -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; -x_41 = lean::cnstr_get(x_18, 0); -x_42 = lean::cnstr_get(x_18, 1); -x_43 = lean::cnstr_get(x_18, 2); -lean::inc(x_43); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_18); -x_44 = lean::box(0); -x_45 = lean_name_mk_numeral(x_44, x_2); -x_46 = lean::box(0); -lean::cnstr_set(x_1, 1, x_46); -lean::cnstr_set(x_1, 0, x_41); -x_47 = l_Lean_Parser_Syntax_mkNode(x_45, x_1); -x_48 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_49 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_42); -lean::cnstr_set(x_49, 2, x_48); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_49); -if (lean::obj_tag(x_50) == 0) -{ -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_17, 0, x_50); -return x_17; -} -else -{ -uint8 x_51; -x_51 = lean::cnstr_get_scalar(x_50, sizeof(void*)*1); -if (x_51 == 0) -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -lean::free_heap_obj(x_17); -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1(x_14, x_16, x_3, x_4, x_5, x_6, x_20); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -if (lean::is_exclusive(x_53)) { - lean::cnstr_release(x_53, 0); - lean::cnstr_release(x_53, 1); - x_56 = x_53; -} else { - lean::dec_ref(x_53); - x_56 = lean::box(0); -} -x_57 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_52, x_54); -if (lean::is_scalar(x_56)) { - x_58 = lean::alloc_cnstr(0, 2, 0); -} else { - x_58 = x_56; -} -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_55); -return x_58; -} -else -{ -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_17, 0, x_50); -return x_17; -} -} -} -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_59 = lean::cnstr_get(x_17, 1); -lean::inc(x_59); -lean::dec(x_17); -x_60 = lean::cnstr_get(x_18, 0); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_18, 1); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_18, 2); -lean::inc(x_62); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - lean::cnstr_release(x_18, 1); - lean::cnstr_release(x_18, 2); - x_63 = x_18; -} else { - lean::dec_ref(x_18); - x_63 = lean::box(0); -} -x_64 = lean::box(0); -x_65 = lean_name_mk_numeral(x_64, x_2); -x_66 = lean::box(0); -lean::cnstr_set(x_1, 1, x_66); -lean::cnstr_set(x_1, 0, x_60); -x_67 = l_Lean_Parser_Syntax_mkNode(x_65, x_1); -x_68 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_63)) { - x_69 = lean::alloc_cnstr(0, 3, 0); -} else { - x_69 = x_63; -} -lean::cnstr_set(x_69, 0, x_67); -lean::cnstr_set(x_69, 1, x_61); -lean::cnstr_set(x_69, 2, x_68); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_69); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_59); -return x_71; -} -else -{ -uint8 x_72; -x_72 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -if (x_72 == 0) -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_73 = lean::cnstr_get(x_70, 0); -lean::inc(x_73); -lean::dec(x_70); -x_74 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1(x_14, x_16, x_3, x_4, x_5, x_6, x_59); -x_75 = lean::cnstr_get(x_74, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_74, 1); -lean::inc(x_76); -if (lean::is_exclusive(x_74)) { - lean::cnstr_release(x_74, 0); - lean::cnstr_release(x_74, 1); - x_77 = x_74; -} else { - lean::dec_ref(x_74); - x_77 = lean::box(0); -} -x_78 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_73, x_75); -if (lean::is_scalar(x_77)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_77; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_76); -return x_79; -} -else -{ -obj* x_80; -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_70); -lean::cnstr_set(x_80, 1, x_59); -return x_80; -} -} -} -} -else -{ -uint8 x_81; -lean::free_heap_obj(x_1); -lean::dec(x_2); -x_81 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -if (x_81 == 0) -{ -obj* x_82; obj* x_83; obj* x_84; uint8 x_85; -x_82 = lean::cnstr_get(x_17, 1); -lean::inc(x_82); -lean::dec(x_17); -x_83 = lean::cnstr_get(x_18, 0); -lean::inc(x_83); -lean::dec(x_18); -x_84 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1(x_14, x_16, x_3, x_4, x_5, x_6, x_82); -x_85 = !lean::is_exclusive(x_84); -if (x_85 == 0) -{ -obj* x_86; obj* x_87; -x_86 = lean::cnstr_get(x_84, 0); -x_87 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_83, x_86); -lean::cnstr_set(x_84, 0, x_87); -return x_84; -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_88 = lean::cnstr_get(x_84, 0); -x_89 = lean::cnstr_get(x_84, 1); -lean::inc(x_89); -lean::inc(x_88); -lean::dec(x_84); -x_90 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_83, x_88); -x_91 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_89); -return x_91; -} -} -else -{ -uint8 x_92; -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_92 = !lean::is_exclusive(x_17); -if (x_92 == 0) -{ -obj* x_93; uint8 x_94; -x_93 = lean::cnstr_get(x_17, 0); -lean::dec(x_93); -x_94 = !lean::is_exclusive(x_18); -if (x_94 == 0) -{ -return x_17; -} -else -{ -obj* x_95; obj* x_96; -x_95 = lean::cnstr_get(x_18, 0); -lean::inc(x_95); -lean::dec(x_18); -x_96 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_81); -lean::cnstr_set(x_17, 0, x_96); -return x_17; -} -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_97 = lean::cnstr_get(x_17, 1); -lean::inc(x_97); -lean::dec(x_17); -x_98 = lean::cnstr_get(x_18, 0); -lean::inc(x_98); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - x_99 = x_18; -} else { - lean::dec_ref(x_18); - x_99 = lean::box(0); -} -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_98); -lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_81); -x_101 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_97); -return x_101; -} -} -} -} -else -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_102 = lean::cnstr_get(x_1, 0); -x_103 = lean::cnstr_get(x_1, 1); -lean::inc(x_103); -lean::inc(x_102); -lean::dec(x_1); -x_104 = lean::mk_nat_obj(1u); -x_105 = lean::nat_add(x_2, x_104); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_106 = lean::apply_5(x_102, x_3, x_4, x_5, x_6, x_7); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -if (lean::obj_tag(x_107) == 0) -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_108 = lean::cnstr_get(x_106, 1); -lean::inc(x_108); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - x_109 = x_106; -} else { - lean::dec_ref(x_106); - x_109 = lean::box(0); -} -x_110 = lean::cnstr_get(x_107, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_107, 1); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_107, 2); -lean::inc(x_112); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - lean::cnstr_release(x_107, 2); - x_113 = x_107; -} else { - lean::dec_ref(x_107); - x_113 = lean::box(0); -} -x_114 = lean::box(0); -x_115 = lean_name_mk_numeral(x_114, x_2); -x_116 = lean::box(0); -x_117 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_117, 0, x_110); -lean::cnstr_set(x_117, 1, x_116); -x_118 = l_Lean_Parser_Syntax_mkNode(x_115, x_117); -x_119 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_113)) { - x_120 = lean::alloc_cnstr(0, 3, 0); -} else { - x_120 = x_113; -} -lean::cnstr_set(x_120, 0, x_118); -lean::cnstr_set(x_120, 1, x_111); -lean::cnstr_set(x_120, 2, x_119); -x_121 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_112, x_120); -if (lean::obj_tag(x_121) == 0) -{ -obj* x_122; -lean::dec(x_105); -lean::dec(x_103); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_109)) { - x_122 = lean::alloc_cnstr(0, 2, 0); -} else { - x_122 = x_109; -} -lean::cnstr_set(x_122, 0, x_121); -lean::cnstr_set(x_122, 1, x_108); -return x_122; -} -else -{ -uint8 x_123; -x_123 = lean::cnstr_get_scalar(x_121, sizeof(void*)*1); -if (x_123 == 0) -{ -obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -lean::dec(x_109); -x_124 = lean::cnstr_get(x_121, 0); -lean::inc(x_124); -lean::dec(x_121); -x_125 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1(x_103, x_105, x_3, x_4, x_5, x_6, x_108); -x_126 = lean::cnstr_get(x_125, 0); -lean::inc(x_126); -x_127 = lean::cnstr_get(x_125, 1); -lean::inc(x_127); -if (lean::is_exclusive(x_125)) { - lean::cnstr_release(x_125, 0); - lean::cnstr_release(x_125, 1); - x_128 = x_125; -} else { - lean::dec_ref(x_125); - x_128 = lean::box(0); -} -x_129 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_124, x_126); -if (lean::is_scalar(x_128)) { - x_130 = lean::alloc_cnstr(0, 2, 0); -} else { - x_130 = x_128; -} -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_127); -return x_130; -} -else -{ -obj* x_131; -lean::dec(x_105); -lean::dec(x_103); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_109)) { - x_131 = lean::alloc_cnstr(0, 2, 0); -} else { - x_131 = x_109; -} -lean::cnstr_set(x_131, 0, x_121); -lean::cnstr_set(x_131, 1, x_108); -return x_131; -} -} -} -else -{ -uint8 x_132; -lean::dec(x_2); -x_132 = lean::cnstr_get_scalar(x_107, sizeof(void*)*1); -if (x_132 == 0) -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; -x_133 = lean::cnstr_get(x_106, 1); -lean::inc(x_133); -lean::dec(x_106); -x_134 = lean::cnstr_get(x_107, 0); -lean::inc(x_134); -lean::dec(x_107); -x_135 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1(x_103, x_105, x_3, x_4, x_5, x_6, x_133); -x_136 = lean::cnstr_get(x_135, 0); -lean::inc(x_136); -x_137 = lean::cnstr_get(x_135, 1); -lean::inc(x_137); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - lean::cnstr_release(x_135, 1); - x_138 = x_135; -} else { - lean::dec_ref(x_135); - x_138 = lean::box(0); -} -x_139 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_134, x_136); -if (lean::is_scalar(x_138)) { - x_140 = lean::alloc_cnstr(0, 2, 0); -} else { - x_140 = x_138; -} -lean::cnstr_set(x_140, 0, x_139); -lean::cnstr_set(x_140, 1, x_137); -return x_140; -} -else -{ -obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; -lean::dec(x_105); -lean::dec(x_103); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_141 = lean::cnstr_get(x_106, 1); -lean::inc(x_141); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - x_142 = x_106; -} else { - lean::dec_ref(x_106); - x_142 = lean::box(0); -} -x_143 = lean::cnstr_get(x_107, 0); -lean::inc(x_143); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - x_144 = x_107; -} else { - lean::dec_ref(x_107); - x_144 = lean::box(0); -} -if (lean::is_scalar(x_144)) { - x_145 = lean::alloc_cnstr(1, 1, 1); -} else { - x_145 = x_144; -} -lean::cnstr_set(x_145, 0, x_143); -lean::cnstr_set_scalar(x_145, sizeof(void*)*1, x_132); -if (lean::is_scalar(x_142)) { - x_146 = lean::alloc_cnstr(0, 2, 0); -} else { - x_146 = x_142; -} -lean::cnstr_set(x_146, 0, x_145); -lean::cnstr_set(x_146, 1, x_141); -return x_146; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_1); -x_4 = l_Lean_Parser_Level_app_Parser_Lean_Parser_HasTokens; -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_3); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_1); -lean::dec(x_6); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_10; -} -} -obj* _init_l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_addLit_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_app_Parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_TrailingLevelParserM_Monad; -x_10 = l_Lean_Parser_TrailingLevelParserM_MonadExcept; -x_11 = l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadParsec; -x_12 = l_Lean_Parser_TrailingLevelParserM_Alternative; -x_13 = l_Lean_Parser_Level_trailing; -x_14 = l_Lean_Parser_Level_trailing_HasView; -x_15 = l_Lean_Parser_Combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -lean::dec(x_8); -return x_15; -} -} -obj* _init_l_Lean_Parser_Level_trailing_Parser___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_addLit_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_app_Parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens___spec__1), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* l_Lean_Parser_Level_trailing_Parser(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; -x_6 = l_Lean_Parser_Level_trailing; -x_7 = l_Lean_Parser_Level_trailing_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Level_app_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens; -x_3 = l_List_append___rarg(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_hasMonadLiftTRefl___boxed), 2, 1); -lean::closure_set(x_1, 0, lean::box(0)); -return x_1; -} -} -obj* _init_l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_leading_Parser), 4, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_trailing_Parser), 5, 0); -return x_1; -} -} -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView(obj* x_1) { -_start: -{ -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; -x_2 = l_Lean_Parser_BasicParserM_Monad; -x_3 = l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__1; -x_4 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_5 = l_Lean_Parser_BasicParserM_MonadReader; -x_6 = l_Lean_Parser_BasicParserM_MonadExcept; -x_7 = l_Lean_Parser_BasicParserM_Alternative; -x_8 = l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2; -x_9 = l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3; -x_10 = l_Lean_Parser_prattParser_View___rarg(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_1); -return x_10; -} -} -obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_levelParser_run_Lean_Parser_HasView(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(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_3) == 0) -{ -obj* x_9; uint8 x_10; obj* x_11; obj* x_12; -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_2); -lean::cnstr_set(x_9, 3, x_4); -x_10 = 0; -x_11 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set_scalar(x_11, sizeof(void*)*1, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_8); -return x_12; -} -else -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -lean::dec(x_7); -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_4); -x_15 = 0; -x_16 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set_scalar(x_16, sizeof(void*)*1, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -return x_17; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg___boxed), 8, 0); -return x_2; -} -} -obj* l_Lean_Parser_currLbp___at_Lean_Parser_levelParser_run___spec__4(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_peekToken___closed__1; -lean::inc(x_2); -x_6 = l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(x_5, x_2, x_3, x_4); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -lean::dec(x_8); -lean::dec(x_2); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_6, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_7); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_7, 2); -x_13 = lean::cnstr_get(x_7, 0); -lean::dec(x_13); -x_14 = lean::mk_nat_obj(0u); -x_15 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_15); -lean::cnstr_set(x_7, 0, x_14); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_7); -lean::cnstr_set(x_6, 0, x_16); -return x_6; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = lean::cnstr_get(x_7, 1); -x_18 = lean::cnstr_get(x_7, 2); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_7); -x_19 = lean::mk_nat_obj(0u); -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_17); -lean::cnstr_set(x_21, 2, x_20); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_21); -lean::cnstr_set(x_6, 0, x_22); -return x_6; -} -} -else -{ -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; -x_23 = lean::cnstr_get(x_6, 1); -lean::inc(x_23); -lean::dec(x_6); -x_24 = lean::cnstr_get(x_7, 1); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_7, 2); -lean::inc(x_25); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_26 = x_7; -} else { - lean::dec_ref(x_7); - x_26 = lean::box(0); -} -x_27 = lean::mk_nat_obj(0u); -x_28 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_26)) { - x_29 = lean::alloc_cnstr(0, 3, 0); -} else { - x_29 = x_26; -} -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set(x_29, 1, x_24); -lean::cnstr_set(x_29, 2, x_28); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_23); -return x_31; -} -} -else -{ -obj* x_32; -x_32 = lean::cnstr_get(x_8, 0); -lean::inc(x_32); -lean::dec(x_8); -switch (lean::obj_tag(x_32)) { -case 0: -{ -obj* x_33; obj* x_34; uint8 x_35; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -lean::dec(x_32); -x_34 = lean::cnstr_get(x_6, 1); -lean::inc(x_34); -lean::dec(x_6); -x_35 = !lean::is_exclusive(x_7); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_36 = lean::cnstr_get(x_7, 1); -x_37 = lean::cnstr_get(x_7, 2); -x_38 = lean::cnstr_get(x_7, 0); -lean::dec(x_38); -x_39 = lean::cnstr_get(x_33, 1); -lean::inc(x_39); -lean::dec(x_33); -x_40 = lean::cnstr_get(x_2, 1); -lean::inc(x_40); -x_41 = lean::mk_nat_obj(0u); -x_42 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_42, 0, x_39); -lean::cnstr_set(x_42, 1, x_41); -lean::cnstr_set(x_42, 2, x_41); -x_43 = l_Lean_Parser_Trie_oldMatchPrefix___rarg(x_40, x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; uint8 x_48; -lean::free_heap_obj(x_7); -x_44 = lean::box(0); -x_45 = l_Lean_Parser_currLbp___rarg___lambda__1___closed__1; -x_46 = l_mjoin___rarg___closed__1; -x_47 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(x_45, x_46, x_44, x_44, x_1, x_2, x_36, x_34); -lean::dec(x_2); -x_48 = !lean::is_exclusive(x_47); -if (x_48 == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_49 = lean::cnstr_get(x_47, 0); -x_50 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_49); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_51); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_52); -lean::cnstr_set(x_47, 0, x_53); -return x_47; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_54 = lean::cnstr_get(x_47, 0); -x_55 = lean::cnstr_get(x_47, 1); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_47); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_54); -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_58); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_55); -return x_60; -} -} -else -{ -obj* x_61; uint8 x_62; -lean::dec(x_2); -x_61 = lean::cnstr_get(x_43, 0); -lean::inc(x_61); -lean::dec(x_43); -x_62 = !lean::is_exclusive(x_61); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_63 = lean::cnstr_get(x_61, 1); -x_64 = lean::cnstr_get(x_61, 0); -lean::dec(x_64); -x_65 = lean::cnstr_get(x_63, 1); -lean::inc(x_65); -lean::dec(x_63); -x_66 = l_Lean_Parser_matchToken___closed__1; -lean::cnstr_set(x_7, 2, x_66); -lean::cnstr_set(x_7, 0, x_65); -x_67 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_7); -lean::cnstr_set(x_61, 1, x_34); -lean::cnstr_set(x_61, 0, x_67); -return x_61; -} -else -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_68 = lean::cnstr_get(x_61, 1); -lean::inc(x_68); -lean::dec(x_61); -x_69 = lean::cnstr_get(x_68, 1); -lean::inc(x_69); -lean::dec(x_68); -x_70 = l_Lean_Parser_matchToken___closed__1; -lean::cnstr_set(x_7, 2, x_70); -lean::cnstr_set(x_7, 0, x_69); -x_71 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_7); -x_72 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_34); -return x_72; -} -} -} -else -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_73 = lean::cnstr_get(x_7, 1); -x_74 = lean::cnstr_get(x_7, 2); -lean::inc(x_74); -lean::inc(x_73); -lean::dec(x_7); -x_75 = lean::cnstr_get(x_33, 1); -lean::inc(x_75); -lean::dec(x_33); -x_76 = lean::cnstr_get(x_2, 1); -lean::inc(x_76); -x_77 = lean::mk_nat_obj(0u); -x_78 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_78, 0, x_75); -lean::cnstr_set(x_78, 1, x_77); -lean::cnstr_set(x_78, 2, x_77); -x_79 = l_Lean_Parser_Trie_oldMatchPrefix___rarg(x_76, x_78); -if (lean::obj_tag(x_79) == 0) -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_80 = lean::box(0); -x_81 = l_Lean_Parser_currLbp___rarg___lambda__1___closed__1; -x_82 = l_mjoin___rarg___closed__1; -x_83 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(x_81, x_82, x_80, x_80, x_1, x_2, x_73, x_34); -lean::dec(x_2); -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_83, 1); -lean::inc(x_85); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - x_86 = x_83; -} else { - lean::dec_ref(x_83); - x_86 = lean::box(0); -} -x_87 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_88 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_84); -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_88); -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_74, x_89); -if (lean::is_scalar(x_86)) { - x_91 = lean::alloc_cnstr(0, 2, 0); -} else { - x_91 = x_86; -} -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_85); -return x_91; -} -else -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -lean::dec(x_2); -x_92 = lean::cnstr_get(x_79, 0); -lean::inc(x_92); -lean::dec(x_79); -x_93 = lean::cnstr_get(x_92, 1); -lean::inc(x_93); -if (lean::is_exclusive(x_92)) { - lean::cnstr_release(x_92, 0); - lean::cnstr_release(x_92, 1); - x_94 = x_92; -} else { - lean::dec_ref(x_92); - x_94 = lean::box(0); -} -x_95 = lean::cnstr_get(x_93, 1); -lean::inc(x_95); -lean::dec(x_93); -x_96 = l_Lean_Parser_matchToken___closed__1; -x_97 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_97, 0, x_95); -lean::cnstr_set(x_97, 1, x_73); -lean::cnstr_set(x_97, 2, x_96); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_74, x_97); -if (lean::is_scalar(x_94)) { - x_99 = lean::alloc_cnstr(0, 2, 0); -} else { - x_99 = x_94; -} -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_34); -return x_99; -} -} -} -case 1: -{ -uint8 x_100; -lean::dec(x_32); -lean::dec(x_2); -x_100 = !lean::is_exclusive(x_6); -if (x_100 == 0) -{ -obj* x_101; uint8 x_102; -x_101 = lean::cnstr_get(x_6, 0); -lean::dec(x_101); -x_102 = !lean::is_exclusive(x_7); -if (x_102 == 0) -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_103 = lean::cnstr_get(x_7, 2); -x_104 = lean::cnstr_get(x_7, 0); -lean::dec(x_104); -x_105 = l_Lean_Parser_maxPrec; -x_106 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_106); -lean::cnstr_set(x_7, 0, x_105); -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_7); -lean::cnstr_set(x_6, 0, x_107); -return x_6; -} -else -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_108 = lean::cnstr_get(x_7, 1); -x_109 = lean::cnstr_get(x_7, 2); -lean::inc(x_109); -lean::inc(x_108); -lean::dec(x_7); -x_110 = l_Lean_Parser_maxPrec; -x_111 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_112 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_112, 0, x_110); -lean::cnstr_set(x_112, 1, x_108); -lean::cnstr_set(x_112, 2, x_111); -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_109, x_112); -lean::cnstr_set(x_6, 0, x_113); -return x_6; -} -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; -x_114 = lean::cnstr_get(x_6, 1); -lean::inc(x_114); -lean::dec(x_6); -x_115 = lean::cnstr_get(x_7, 1); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_7, 2); -lean::inc(x_116); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_117 = x_7; -} else { - lean::dec_ref(x_7); - x_117 = lean::box(0); -} -x_118 = l_Lean_Parser_maxPrec; -x_119 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_117)) { - x_120 = lean::alloc_cnstr(0, 3, 0); -} else { - x_120 = x_117; -} -lean::cnstr_set(x_120, 0, x_118); -lean::cnstr_set(x_120, 1, x_115); -lean::cnstr_set(x_120, 2, x_119); -x_121 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_120); -x_122 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_122, 0, x_121); -lean::cnstr_set(x_122, 1, x_114); -return x_122; -} -} -case 2: -{ -obj* x_123; uint8 x_124; -x_123 = lean::cnstr_get(x_32, 0); -lean::inc(x_123); -lean::dec(x_32); -x_124 = !lean::is_exclusive(x_6); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; uint8 x_127; -x_125 = lean::cnstr_get(x_6, 1); -x_126 = lean::cnstr_get(x_6, 0); -lean::dec(x_126); -x_127 = !lean::is_exclusive(x_7); -if (x_127 == 0) -{ -obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; uint8 x_133; -x_128 = lean::cnstr_get(x_7, 1); -x_129 = lean::cnstr_get(x_7, 2); -x_130 = lean::cnstr_get(x_7, 0); -lean::dec(x_130); -x_131 = lean::cnstr_get(x_123, 0); -lean::inc(x_131); -lean::dec(x_123); -x_132 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_133 = lean_name_dec_eq(x_131, x_132); -if (x_133 == 0) -{ -obj* x_134; uint8 x_135; -x_134 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -x_135 = lean_name_dec_eq(x_131, x_134); -lean::dec(x_131); -if (x_135 == 0) -{ -obj* x_136; obj* x_137; obj* x_138; obj* x_139; uint8 x_140; -lean::free_heap_obj(x_7); -lean::free_heap_obj(x_6); -x_136 = lean::box(0); -x_137 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_138 = l_mjoin___rarg___closed__1; -x_139 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(x_137, x_138, x_136, x_136, x_1, x_2, x_128, x_125); -lean::dec(x_2); -x_140 = !lean::is_exclusive(x_139); -if (x_140 == 0) -{ -obj* x_141; obj* x_142; -x_141 = lean::cnstr_get(x_139, 0); -x_142 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_129, x_141); -lean::cnstr_set(x_139, 0, x_142); -return x_139; -} -else -{ -obj* x_143; obj* x_144; obj* x_145; obj* x_146; -x_143 = lean::cnstr_get(x_139, 0); -x_144 = lean::cnstr_get(x_139, 1); -lean::inc(x_144); -lean::inc(x_143); -lean::dec(x_139); -x_145 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_129, x_143); -x_146 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_146, 0, x_145); -lean::cnstr_set(x_146, 1, x_144); -return x_146; -} -} -else -{ -obj* x_147; obj* x_148; obj* x_149; -lean::dec(x_2); -x_147 = l_Lean_Parser_maxPrec; -x_148 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_148); -lean::cnstr_set(x_7, 0, x_147); -x_149 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_129, x_7); -lean::cnstr_set(x_6, 0, x_149); -return x_6; -} -} -else -{ -obj* x_150; obj* x_151; obj* x_152; -lean::dec(x_131); -lean::dec(x_2); -x_150 = l_Lean_Parser_maxPrec; -x_151 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_151); -lean::cnstr_set(x_7, 0, x_150); -x_152 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_129, x_7); -lean::cnstr_set(x_6, 0, x_152); -return x_6; -} -} -else -{ -obj* x_153; obj* x_154; obj* x_155; obj* x_156; uint8 x_157; -x_153 = lean::cnstr_get(x_7, 1); -x_154 = lean::cnstr_get(x_7, 2); -lean::inc(x_154); -lean::inc(x_153); -lean::dec(x_7); -x_155 = lean::cnstr_get(x_123, 0); -lean::inc(x_155); -lean::dec(x_123); -x_156 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_157 = lean_name_dec_eq(x_155, x_156); -if (x_157 == 0) -{ -obj* x_158; uint8 x_159; -x_158 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -x_159 = lean_name_dec_eq(x_155, x_158); -lean::dec(x_155); -if (x_159 == 0) -{ -obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; -lean::free_heap_obj(x_6); -x_160 = lean::box(0); -x_161 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_162 = l_mjoin___rarg___closed__1; -x_163 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(x_161, x_162, x_160, x_160, x_1, x_2, x_153, x_125); -lean::dec(x_2); -x_164 = lean::cnstr_get(x_163, 0); -lean::inc(x_164); -x_165 = lean::cnstr_get(x_163, 1); -lean::inc(x_165); -if (lean::is_exclusive(x_163)) { - lean::cnstr_release(x_163, 0); - lean::cnstr_release(x_163, 1); - x_166 = x_163; -} else { - lean::dec_ref(x_163); - x_166 = lean::box(0); -} -x_167 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_154, x_164); -if (lean::is_scalar(x_166)) { - x_168 = lean::alloc_cnstr(0, 2, 0); -} else { - x_168 = x_166; -} -lean::cnstr_set(x_168, 0, x_167); -lean::cnstr_set(x_168, 1, x_165); -return x_168; -} -else -{ -obj* x_169; obj* x_170; obj* x_171; obj* x_172; -lean::dec(x_2); -x_169 = l_Lean_Parser_maxPrec; -x_170 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_171 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_171, 0, x_169); -lean::cnstr_set(x_171, 1, x_153); -lean::cnstr_set(x_171, 2, x_170); -x_172 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_154, x_171); -lean::cnstr_set(x_6, 0, x_172); -return x_6; -} -} -else -{ -obj* x_173; obj* x_174; obj* x_175; obj* x_176; -lean::dec(x_155); -lean::dec(x_2); -x_173 = l_Lean_Parser_maxPrec; -x_174 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_175 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_175, 0, x_173); -lean::cnstr_set(x_175, 1, x_153); -lean::cnstr_set(x_175, 2, x_174); -x_176 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_154, x_175); -lean::cnstr_set(x_6, 0, x_176); -return x_6; -} -} -} -else -{ -obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; uint8 x_183; -x_177 = lean::cnstr_get(x_6, 1); -lean::inc(x_177); -lean::dec(x_6); -x_178 = lean::cnstr_get(x_7, 1); -lean::inc(x_178); -x_179 = lean::cnstr_get(x_7, 2); -lean::inc(x_179); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_180 = x_7; -} else { - lean::dec_ref(x_7); - x_180 = lean::box(0); -} -x_181 = lean::cnstr_get(x_123, 0); -lean::inc(x_181); -lean::dec(x_123); -x_182 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_183 = lean_name_dec_eq(x_181, x_182); -if (x_183 == 0) -{ -obj* x_184; uint8 x_185; -x_184 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -x_185 = lean_name_dec_eq(x_181, x_184); -lean::dec(x_181); -if (x_185 == 0) -{ -obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; -lean::dec(x_180); -x_186 = lean::box(0); -x_187 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_188 = l_mjoin___rarg___closed__1; -x_189 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(x_187, x_188, x_186, x_186, x_1, x_2, x_178, x_177); -lean::dec(x_2); -x_190 = lean::cnstr_get(x_189, 0); -lean::inc(x_190); -x_191 = lean::cnstr_get(x_189, 1); -lean::inc(x_191); -if (lean::is_exclusive(x_189)) { - lean::cnstr_release(x_189, 0); - lean::cnstr_release(x_189, 1); - x_192 = x_189; -} else { - lean::dec_ref(x_189); - x_192 = lean::box(0); -} -x_193 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_179, x_190); -if (lean::is_scalar(x_192)) { - x_194 = lean::alloc_cnstr(0, 2, 0); -} else { - x_194 = x_192; -} -lean::cnstr_set(x_194, 0, x_193); -lean::cnstr_set(x_194, 1, x_191); -return x_194; -} -else -{ -obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; -lean::dec(x_2); -x_195 = l_Lean_Parser_maxPrec; -x_196 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_180)) { - x_197 = lean::alloc_cnstr(0, 3, 0); -} else { - x_197 = x_180; -} -lean::cnstr_set(x_197, 0, x_195); -lean::cnstr_set(x_197, 1, x_178); -lean::cnstr_set(x_197, 2, x_196); -x_198 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_179, x_197); -x_199 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_199, 0, x_198); -lean::cnstr_set(x_199, 1, x_177); -return x_199; -} -} -else -{ -obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; -lean::dec(x_181); -lean::dec(x_2); -x_200 = l_Lean_Parser_maxPrec; -x_201 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_180)) { - x_202 = lean::alloc_cnstr(0, 3, 0); -} else { - x_202 = x_180; -} -lean::cnstr_set(x_202, 0, x_200); -lean::cnstr_set(x_202, 1, x_178); -lean::cnstr_set(x_202, 2, x_201); -x_203 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_179, x_202); -x_204 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_204, 0, x_203); -lean::cnstr_set(x_204, 1, x_177); -return x_204; -} -} -} -default: -{ -obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; uint8 x_212; -x_205 = lean::cnstr_get(x_6, 1); -lean::inc(x_205); -lean::dec(x_6); -x_206 = lean::cnstr_get(x_7, 1); -lean::inc(x_206); -x_207 = lean::cnstr_get(x_7, 2); -lean::inc(x_207); -lean::dec(x_7); -x_208 = lean::box(0); -x_209 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_210 = l_mjoin___rarg___closed__1; -x_211 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(x_209, x_210, x_208, x_208, x_1, x_2, x_206, x_205); -lean::dec(x_2); -x_212 = !lean::is_exclusive(x_211); -if (x_212 == 0) -{ -obj* x_213; obj* x_214; -x_213 = lean::cnstr_get(x_211, 0); -x_214 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_207, x_213); -lean::cnstr_set(x_211, 0, x_214); -return x_211; -} -else -{ -obj* x_215; obj* x_216; obj* x_217; obj* x_218; -x_215 = lean::cnstr_get(x_211, 0); -x_216 = lean::cnstr_get(x_211, 1); -lean::inc(x_216); -lean::inc(x_215); -lean::dec(x_211); -x_217 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_207, x_215); -x_218 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_218, 0, x_217); -lean::cnstr_set(x_218, 1, x_216); -return x_218; -} -} -} -} -} -else -{ -uint8 x_219; -lean::dec(x_2); -x_219 = !lean::is_exclusive(x_6); -if (x_219 == 0) -{ -obj* x_220; uint8 x_221; -x_220 = lean::cnstr_get(x_6, 0); -lean::dec(x_220); -x_221 = !lean::is_exclusive(x_7); -if (x_221 == 0) -{ -return x_6; -} -else -{ -obj* x_222; uint8 x_223; obj* x_224; -x_222 = lean::cnstr_get(x_7, 0); -x_223 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_222); -lean::dec(x_7); -x_224 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_224, 0, x_222); -lean::cnstr_set_scalar(x_224, sizeof(void*)*1, x_223); -lean::cnstr_set(x_6, 0, x_224); -return x_6; -} -} -else -{ -obj* x_225; obj* x_226; uint8 x_227; obj* x_228; obj* x_229; obj* x_230; -x_225 = lean::cnstr_get(x_6, 1); -lean::inc(x_225); -lean::dec(x_6); -x_226 = lean::cnstr_get(x_7, 0); -lean::inc(x_226); -x_227 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_228 = x_7; -} else { - lean::dec_ref(x_7); - x_228 = lean::box(0); -} -if (lean::is_scalar(x_228)) { - x_229 = lean::alloc_cnstr(1, 1, 1); -} else { - x_229 = x_228; -} -lean::cnstr_set(x_229, 0, x_226); -lean::cnstr_set_scalar(x_229, sizeof(void*)*1, x_227); -x_230 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_230, 0, x_229); -lean::cnstr_set(x_230, 1, x_225); -return x_230; -} -} -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2(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_9; uint8 x_10; -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::nat_dec_eq(x_3, x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_sub(x_3, x_11); -lean::inc(x_6); -x_13 = l_Lean_Parser_currLbp___at_Lean_Parser_levelParser_run___spec__4(x_5, x_6, x_7, x_8); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; uint8 x_18; -x_16 = lean::cnstr_get(x_13, 1); -x_17 = lean::cnstr_get(x_13, 0); -lean::dec(x_17); -x_18 = !lean::is_exclusive(x_14); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; uint8 x_22; -x_19 = lean::cnstr_get(x_14, 0); -x_20 = lean::cnstr_get(x_14, 1); -x_21 = lean::cnstr_get(x_14, 2); -x_22 = lean::nat_dec_lt(x_2, x_19); -lean::dec(x_19); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_14, 2, x_23); -lean::cnstr_set(x_14, 0, x_4); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_14); -lean::cnstr_set(x_13, 0, x_24); -return x_13; -} -else -{ -obj* x_25; obj* x_26; -lean::free_heap_obj(x_14); -lean::free_heap_obj(x_13); -lean::inc(x_1); -lean::inc(x_6); -lean::inc(x_5); -x_25 = lean::apply_5(x_1, x_4, x_5, x_6, x_20, x_16); -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_27 = lean::cnstr_get(x_25, 1); -lean::inc(x_27); -lean::dec(x_25); -x_28 = lean::cnstr_get(x_26, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_26, 2); -lean::inc(x_30); -lean::dec(x_26); -x_31 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2(x_1, x_2, x_12, x_28, x_5, x_6, x_29, x_27); -lean::dec(x_12); -x_32 = !lean::is_exclusive(x_31); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_33); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_34); -lean::cnstr_set(x_31, 0, x_35); -return x_31; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_36 = lean::cnstr_get(x_31, 0); -x_37 = lean::cnstr_get(x_31, 1); -lean::inc(x_37); -lean::inc(x_36); -lean::dec(x_31); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_36); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_38); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_37); -return x_40; -} -} -else -{ -uint8 x_41; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_41 = !lean::is_exclusive(x_25); -if (x_41 == 0) -{ -obj* x_42; uint8 x_43; -x_42 = lean::cnstr_get(x_25, 0); -lean::dec(x_42); -x_43 = !lean::is_exclusive(x_26); -if (x_43 == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_26); -lean::cnstr_set(x_25, 0, x_44); -return x_25; -} -else -{ -obj* x_45; uint8 x_46; obj* x_47; obj* x_48; -x_45 = lean::cnstr_get(x_26, 0); -x_46 = lean::cnstr_get_scalar(x_26, sizeof(void*)*1); -lean::inc(x_45); -lean::dec(x_26); -x_47 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_46); -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_47); -lean::cnstr_set(x_25, 0, x_48); -return x_25; -} -} -else -{ -obj* x_49; obj* x_50; uint8 x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_49 = lean::cnstr_get(x_25, 1); -lean::inc(x_49); -lean::dec(x_25); -x_50 = lean::cnstr_get(x_26, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get_scalar(x_26, sizeof(void*)*1); -if (lean::is_exclusive(x_26)) { - lean::cnstr_release(x_26, 0); - x_52 = x_26; -} else { - lean::dec_ref(x_26); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(1, 1, 1); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_50); -lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_51); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_49); -return x_55; -} -} -} -} -else -{ -obj* x_56; obj* x_57; obj* x_58; uint8 x_59; -x_56 = lean::cnstr_get(x_14, 0); -x_57 = lean::cnstr_get(x_14, 1); -x_58 = lean::cnstr_get(x_14, 2); -lean::inc(x_58); -lean::inc(x_57); -lean::inc(x_56); -lean::dec(x_14); -x_59 = lean::nat_dec_lt(x_2, x_56); -lean::dec(x_56); -if (x_59 == 0) -{ -obj* x_60; obj* x_61; obj* x_62; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_60 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_61 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_61, 0, x_4); -lean::cnstr_set(x_61, 1, x_57); -lean::cnstr_set(x_61, 2, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_61); -lean::cnstr_set(x_13, 0, x_62); -return x_13; -} -else -{ -obj* x_63; obj* x_64; -lean::free_heap_obj(x_13); -lean::inc(x_1); -lean::inc(x_6); -lean::inc(x_5); -x_63 = lean::apply_5(x_1, x_4, x_5, x_6, x_57, x_16); -x_64 = lean::cnstr_get(x_63, 0); -lean::inc(x_64); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_65 = lean::cnstr_get(x_63, 1); -lean::inc(x_65); -lean::dec(x_63); -x_66 = lean::cnstr_get(x_64, 0); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_64, 1); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_64, 2); -lean::inc(x_68); -lean::dec(x_64); -x_69 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2(x_1, x_2, x_12, x_66, x_5, x_6, x_67, x_65); -lean::dec(x_12); -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -if (lean::is_exclusive(x_69)) { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_72 = x_69; -} else { - lean::dec_ref(x_69); - x_72 = lean::box(0); -} -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_68, x_70); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_73); -if (lean::is_scalar(x_72)) { - x_75 = lean::alloc_cnstr(0, 2, 0); -} else { - x_75 = x_72; -} -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_71); -return x_75; -} -else -{ -obj* x_76; obj* x_77; obj* x_78; uint8 x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_76 = lean::cnstr_get(x_63, 1); -lean::inc(x_76); -if (lean::is_exclusive(x_63)) { - lean::cnstr_release(x_63, 0); - lean::cnstr_release(x_63, 1); - x_77 = x_63; -} else { - lean::dec_ref(x_63); - x_77 = lean::box(0); -} -x_78 = lean::cnstr_get(x_64, 0); -lean::inc(x_78); -x_79 = lean::cnstr_get_scalar(x_64, sizeof(void*)*1); -if (lean::is_exclusive(x_64)) { - lean::cnstr_release(x_64, 0); - x_80 = x_64; -} else { - lean::dec_ref(x_64); - x_80 = lean::box(0); -} -if (lean::is_scalar(x_80)) { - x_81 = lean::alloc_cnstr(1, 1, 1); -} else { - x_81 = x_80; -} -lean::cnstr_set(x_81, 0, x_78); -lean::cnstr_set_scalar(x_81, sizeof(void*)*1, x_79); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_81); -if (lean::is_scalar(x_77)) { - x_83 = lean::alloc_cnstr(0, 2, 0); -} else { - x_83 = x_77; -} -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_76); -return x_83; -} -} -} -} -else -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; uint8 x_89; -x_84 = lean::cnstr_get(x_13, 1); -lean::inc(x_84); -lean::dec(x_13); -x_85 = lean::cnstr_get(x_14, 0); -lean::inc(x_85); -x_86 = lean::cnstr_get(x_14, 1); -lean::inc(x_86); -x_87 = lean::cnstr_get(x_14, 2); -lean::inc(x_87); -if (lean::is_exclusive(x_14)) { - lean::cnstr_release(x_14, 0); - lean::cnstr_release(x_14, 1); - lean::cnstr_release(x_14, 2); - x_88 = x_14; -} else { - lean::dec_ref(x_14); - x_88 = lean::box(0); -} -x_89 = lean::nat_dec_lt(x_2, x_85); -lean::dec(x_85); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_90 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_88)) { - x_91 = lean::alloc_cnstr(0, 3, 0); -} else { - x_91 = x_88; -} -lean::cnstr_set(x_91, 0, x_4); -lean::cnstr_set(x_91, 1, x_86); -lean::cnstr_set(x_91, 2, x_90); -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_91); -x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set(x_93, 1, x_84); -return x_93; -} -else -{ -obj* x_94; obj* x_95; -lean::dec(x_88); -lean::inc(x_1); -lean::inc(x_6); -lean::inc(x_5); -x_94 = lean::apply_5(x_1, x_4, x_5, x_6, x_86, x_84); -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -if (lean::obj_tag(x_95) == 0) -{ -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; -x_96 = lean::cnstr_get(x_94, 1); -lean::inc(x_96); -lean::dec(x_94); -x_97 = lean::cnstr_get(x_95, 0); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_95, 1); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_95, 2); -lean::inc(x_99); -lean::dec(x_95); -x_100 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2(x_1, x_2, x_12, x_97, x_5, x_6, x_98, x_96); -lean::dec(x_12); -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - lean::cnstr_release(x_100, 1); - x_103 = x_100; -} else { - lean::dec_ref(x_100); - x_103 = lean::box(0); -} -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_99, x_101); -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_104); -if (lean::is_scalar(x_103)) { - x_106 = lean::alloc_cnstr(0, 2, 0); -} else { - x_106 = x_103; -} -lean::cnstr_set(x_106, 0, x_105); -lean::cnstr_set(x_106, 1, x_102); -return x_106; -} -else -{ -obj* x_107; obj* x_108; obj* x_109; uint8 x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_107 = lean::cnstr_get(x_94, 1); -lean::inc(x_107); -if (lean::is_exclusive(x_94)) { - lean::cnstr_release(x_94, 0); - lean::cnstr_release(x_94, 1); - x_108 = x_94; -} else { - lean::dec_ref(x_94); - x_108 = lean::box(0); -} -x_109 = lean::cnstr_get(x_95, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -if (lean::is_exclusive(x_95)) { - lean::cnstr_release(x_95, 0); - x_111 = x_95; -} else { - lean::dec_ref(x_95); - x_111 = lean::box(0); -} -if (lean::is_scalar(x_111)) { - x_112 = lean::alloc_cnstr(1, 1, 1); -} else { - x_112 = x_111; -} -lean::cnstr_set(x_112, 0, x_109); -lean::cnstr_set_scalar(x_112, sizeof(void*)*1, x_110); -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_112); -if (lean::is_scalar(x_108)) { - x_114 = lean::alloc_cnstr(0, 2, 0); -} else { - x_114 = x_108; -} -lean::cnstr_set(x_114, 0, x_113); -lean::cnstr_set(x_114, 1, x_107); -return x_114; -} -} -} -} -else -{ -uint8 x_115; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_115 = !lean::is_exclusive(x_13); -if (x_115 == 0) -{ -obj* x_116; uint8 x_117; -x_116 = lean::cnstr_get(x_13, 0); -lean::dec(x_116); -x_117 = !lean::is_exclusive(x_14); -if (x_117 == 0) -{ -return x_13; -} -else -{ -obj* x_118; uint8 x_119; obj* x_120; -x_118 = lean::cnstr_get(x_14, 0); -x_119 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -lean::inc(x_118); -lean::dec(x_14); -x_120 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_120, 0, x_118); -lean::cnstr_set_scalar(x_120, sizeof(void*)*1, x_119); -lean::cnstr_set(x_13, 0, x_120); -return x_13; -} -} -else -{ -obj* x_121; obj* x_122; uint8 x_123; obj* x_124; obj* x_125; obj* x_126; -x_121 = lean::cnstr_get(x_13, 1); -lean::inc(x_121); -lean::dec(x_13); -x_122 = lean::cnstr_get(x_14, 0); -lean::inc(x_122); -x_123 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -if (lean::is_exclusive(x_14)) { - lean::cnstr_release(x_14, 0); - x_124 = x_14; -} else { - lean::dec_ref(x_14); - x_124 = lean::box(0); -} -if (lean::is_scalar(x_124)) { - x_125 = lean::alloc_cnstr(1, 1, 1); -} else { - x_125 = x_124; -} -lean::cnstr_set(x_125, 0, x_122); -lean::cnstr_set_scalar(x_125, sizeof(void*)*1, x_123); -x_126 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_126, 0, x_125); -lean::cnstr_set(x_126, 1, x_121); -return x_126; -} -} -} -else -{ -obj* x_127; obj* x_128; obj* x_129; obj* x_130; -lean::dec(x_4); -lean::dec(x_1); -x_127 = lean::box(0); -x_128 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_129 = l_mjoin___rarg___closed__1; -x_130 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(x_128, x_129, x_127, x_127, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -return x_130; -} -} -} -obj* l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___lambda__1(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; -lean::inc(x_5); -lean::inc(x_3); -x_8 = lean::apply_4(x_1, x_3, x_5, x_6, x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -lean::dec(x_8); -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_9, 2); -lean::inc(x_13); -lean::dec(x_9); -x_14 = l_String_OldIterator_remaining___main(x_12); -x_15 = lean::mk_nat_obj(1u); -x_16 = lean::nat_add(x_14, x_15); -lean::dec(x_14); -x_17 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2(x_2, x_4, x_16, x_11, x_3, x_5, x_12, x_10); -lean::dec(x_16); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = l_Lean_Parser_finishCommentBlock___closed__2; -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_19); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_21); -lean::cnstr_set(x_17, 0, x_22); -return x_17; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_17, 0); -x_24 = lean::cnstr_get(x_17, 1); -lean::inc(x_24); -lean::inc(x_23); -lean::dec(x_17); -x_25 = l_Lean_Parser_finishCommentBlock___closed__2; -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_23); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_26); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_24); -return x_28; -} -} -else -{ -uint8 x_29; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -x_29 = !lean::is_exclusive(x_8); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::cnstr_get(x_8, 0); -lean::dec(x_30); -x_31 = !lean::is_exclusive(x_9); -if (x_31 == 0) -{ -return x_8; -} -else -{ -obj* x_32; uint8 x_33; obj* x_34; -x_32 = lean::cnstr_get(x_9, 0); -x_33 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_32); -lean::dec(x_9); -x_34 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set_scalar(x_34, sizeof(void*)*1, x_33); -lean::cnstr_set(x_8, 0, x_34); -return x_8; -} -} -else -{ -obj* x_35; obj* x_36; uint8 x_37; obj* x_38; obj* x_39; obj* x_40; -x_35 = lean::cnstr_get(x_8, 1); -lean::inc(x_35); -lean::dec(x_8); -x_36 = lean::cnstr_get(x_9, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_38 = x_9; -} else { - lean::dec_ref(x_9); - x_38 = lean::box(0); -} -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_36); -lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_35); -return x_40; -} -} -} -} -obj* _init_l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdent_Parser___lambda__1___boxed), 4, 0); -return x_1; -} -} -obj* l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1(obj* x_1, obj* 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; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___lambda__1___boxed), 7, 2); -lean::closure_set(x_7, 0, x_1); -lean::closure_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___closed__1; -x_9 = lean::alloc_closure(reinterpret_cast(l_fixCore___rarg___boxed), 3, 2); -lean::closure_set(x_9, 0, x_8); -lean::closure_set(x_9, 1, x_7); -x_10 = lean::apply_4(x_3, x_9, x_4, x_5, x_6); -return x_10; -} -} -obj* l_Lean_Parser_levelParser_run(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2; -x_6 = l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3; -x_7 = l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg___boxed(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_9; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_levelParser_run___spec__3___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_9; -} -} -obj* l_Lean_Parser_currLbp___at_Lean_Parser_levelParser_run___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_currLbp___at_Lean_Parser_levelParser_run___spec__4(x_1, x_2, x_3, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2___boxed(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_9; -x_9 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_levelParser_run___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_3); -lean::dec(x_2); -return x_9; -} -} -obj* l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___lambda__1___boxed(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; -x_8 = l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_4); -return x_8; -} -} -obj* _init_l_Lean_Parser_levelParserCoe() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_levelParser_run), 4, 0); -return x_1; -} -} -obj* initialize_init_lean_parser_pratt(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_level(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_pratt(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_LevelParserM_Monad = _init_l_Lean_Parser_LevelParserM_Monad(); -lean::mark_persistent(l_Lean_Parser_LevelParserM_Monad); -l_Lean_Parser_LevelParserM_Alternative = _init_l_Lean_Parser_LevelParserM_Alternative(); -lean::mark_persistent(l_Lean_Parser_LevelParserM_Alternative); -l_Lean_Parser_LevelParserM_MonadReader = _init_l_Lean_Parser_LevelParserM_MonadReader(); -lean::mark_persistent(l_Lean_Parser_LevelParserM_MonadReader); -l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec = _init_l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec(); -lean::mark_persistent(l_Lean_Parser_LevelParserM_Lean_Parser_MonadParsec); -l_Lean_Parser_LevelParserM_MonadExcept = _init_l_Lean_Parser_LevelParserM_MonadExcept(); -lean::mark_persistent(l_Lean_Parser_LevelParserM_MonadExcept); -l_Lean_Parser_LevelParserM_Lean_Parser_MonadRec = _init_l_Lean_Parser_LevelParserM_Lean_Parser_MonadRec(); -lean::mark_persistent(l_Lean_Parser_LevelParserM_Lean_Parser_MonadRec); -l_Lean_Parser_LevelParserM_Lean_Parser_monadBasicParser = _init_l_Lean_Parser_LevelParserM_Lean_Parser_monadBasicParser(); -lean::mark_persistent(l_Lean_Parser_LevelParserM_Lean_Parser_monadBasicParser); -l_Lean_Parser_TrailingLevelParserM_Monad = _init_l_Lean_Parser_TrailingLevelParserM_Monad(); -lean::mark_persistent(l_Lean_Parser_TrailingLevelParserM_Monad); -l_Lean_Parser_TrailingLevelParserM_Alternative = _init_l_Lean_Parser_TrailingLevelParserM_Alternative(); -lean::mark_persistent(l_Lean_Parser_TrailingLevelParserM_Alternative); -l_Lean_Parser_TrailingLevelParserM_MonadReader = _init_l_Lean_Parser_TrailingLevelParserM_MonadReader(); -lean::mark_persistent(l_Lean_Parser_TrailingLevelParserM_MonadReader); -l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadParsec = _init_l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadParsec(); -lean::mark_persistent(l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadParsec); -l_Lean_Parser_TrailingLevelParserM_MonadExcept = _init_l_Lean_Parser_TrailingLevelParserM_MonadExcept(); -lean::mark_persistent(l_Lean_Parser_TrailingLevelParserM_MonadExcept); -l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadRec = _init_l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadRec(); -lean::mark_persistent(l_Lean_Parser_TrailingLevelParserM_Lean_Parser_MonadRec); -l_Lean_Parser_TrailingLevelParserM_Lean_Parser_monadBasicParser = _init_l_Lean_Parser_TrailingLevelParserM_Lean_Parser_monadBasicParser(); -lean::mark_persistent(l_Lean_Parser_TrailingLevelParserM_Lean_Parser_monadBasicParser); -l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___closed__1 = _init_l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens___closed__1); -l_Lean_Parser_Level_Parser_Lean_Parser_HasView___closed__1 = _init_l_Lean_Parser_Level_Parser_Lean_Parser_HasView___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_Parser_Lean_Parser_HasView___closed__1); -l_Lean_Parser_Level_Parser___closed__1 = _init_l_Lean_Parser_Level_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_Parser___closed__1); -l_Lean_Parser_Level_Lean_Parser_HasTokens = _init_l_Lean_Parser_Level_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Level_Lean_Parser_HasTokens); -l_Lean_Parser_Level_Lean_Parser_HasView = _init_l_Lean_Parser_Level_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_Lean_Parser_HasView); -l_Lean_Parser_Level_paren = _init_l_Lean_Parser_Level_paren(); -lean::mark_persistent(l_Lean_Parser_Level_paren); -l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Level_paren_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Level_paren_HasView_x27 = _init_l_Lean_Parser_Level_paren_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Level_paren_HasView_x27); -l_Lean_Parser_Level_paren_HasView = _init_l_Lean_Parser_Level_paren_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_paren_HasView); -l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_paren_Parser_Lean_Parser_HasView); -l_Lean_Parser_Level_paren_Parser___closed__1 = _init_l_Lean_Parser_Level_paren_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_paren_Parser___closed__1); -l_Lean_Parser_Level_leading = _init_l_Lean_Parser_Level_leading(); -lean::mark_persistent(l_Lean_Parser_Level_leading); -l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__3 = _init_l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27___elambda__1___closed__3); -l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_Level_leading_HasView_x27 = _init_l_Lean_Parser_Level_leading_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView_x27); -l_Lean_Parser_Level_leading_HasView = _init_l_Lean_Parser_Level_leading_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_leading_HasView); -l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1 = _init_l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_ident_Parser___at_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens___spec__3___rarg___closed__1); -l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasView); -l_Lean_Parser_Level_leading_Parser___closed__1 = _init_l_Lean_Parser_Level_leading_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_leading_Parser___closed__1); -l_Lean_Parser_Level_app = _init_l_Lean_Parser_Level_app(); -lean::mark_persistent(l_Lean_Parser_Level_app); -l_Lean_Parser_Level_app_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Level_app_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_app_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Level_app_HasView_x27 = _init_l_Lean_Parser_Level_app_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Level_app_HasView_x27); -l_Lean_Parser_Level_app_HasView = _init_l_Lean_Parser_Level_app_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_app_HasView); -l_Lean_Parser_Level_app_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Level_app_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Level_app_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_app_Parser_Lean_Parser_HasView); -l_Lean_Parser_Level_app_Parser___closed__1 = _init_l_Lean_Parser_Level_app_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_app_Parser___closed__1); -l_Lean_Parser_Level_addLit = _init_l_Lean_Parser_Level_addLit(); -lean::mark_persistent(l_Lean_Parser_Level_addLit); -l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Level_addLit_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Level_addLit_HasView_x27 = _init_l_Lean_Parser_Level_addLit_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Level_addLit_HasView_x27); -l_Lean_Parser_Level_addLit_HasView = _init_l_Lean_Parser_Level_addLit_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_addLit_HasView); -l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_addLit_Parser_Lean_Parser_HasView); -l_Lean_Parser_Level_addLit_Parser___closed__1 = _init_l_Lean_Parser_Level_addLit_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_addLit_Parser___closed__1); -l_Lean_Parser_Level_trailing = _init_l_Lean_Parser_Level_trailing(); -lean::mark_persistent(l_Lean_Parser_Level_trailing); -l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Level_trailing_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Level_trailing_HasView_x27 = _init_l_Lean_Parser_Level_trailing_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Level_trailing_HasView_x27); -l_Lean_Parser_Level_trailing_HasView = _init_l_Lean_Parser_Level_trailing_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_trailing_HasView); -l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasView); -l_Lean_Parser_Level_trailing_Parser___closed__1 = _init_l_Lean_Parser_Level_trailing_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Level_trailing_Parser___closed__1); -l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens___closed__1 = _init_l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens___closed__1(); -lean::mark_persistent(l_Lean_Parser_levelParser_run_Lean_Parser_HasTokens___closed__1); -l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__1 = _init_l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__1(); -lean::mark_persistent(l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__1); -l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2 = _init_l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2(); -lean::mark_persistent(l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2); -l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3 = _init_l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3(); -lean::mark_persistent(l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3); -l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___closed__1 = _init_l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1___closed__1); -l_Lean_Parser_levelParserCoe = _init_l_Lean_Parser_levelParserCoe(); -lean::mark_persistent(l_Lean_Parser_levelParserCoe); -return w; -} diff --git a/src/stage0/init/lean/parser/module.cpp b/src/stage0/init/lean/parser/module.cpp deleted file mode 100644 index 6e8566d9b9..0000000000 --- a/src/stage0/init/lean/parser/module.cpp +++ /dev/null @@ -1,9068 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.module -// Imports: init.lean.parser.command -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_withTrailing___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_Parser___rarg___closed__1; -obj* l_Lean_Parser_monadParsecTrans___rarg(obj*, obj*, obj*); -extern obj* l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -extern obj* l_Lean_Parser_BasicParserM_Alternative; -obj* l___private_init_lean_parser_module_1__commandWrecAux(uint8, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_MessageLog_empty; -obj* l_Lean_Parser_ModuleParserM_Alternative; -obj* l_Lean_Parser_ModuleParserM_MonadReader; -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_Module_header_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_commandParser_run(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_tokens___rarg(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_ModuleParserM_Monad; -obj* l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_ParserT_Lean_Parser_MonadParsec___rarg(obj*); -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1(obj*, obj*); -obj* l_Lean_Parser_parseHeader___lambda__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_header_Parser_Lean_Parser_HasView; -extern obj* l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_ParserT_Alternative___rarg(obj*); -obj* l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1; -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView; -extern obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -extern obj* l_Lean_Parser_finishCommentBlock___closed__2; -obj* l_Lean_Parser_Module_header; -extern obj* l_Lean_Parser_BasicParserM_Monad; -obj* l_StateT_Monad___rarg(obj*); -extern obj* l_Lean_Parser_run___rarg___closed__1; -obj* l_Lean_Parser_moduleParserConfigCoe(obj*); -obj* l_Lean_Parser_Module_header_Parser___closed__1; -obj* l___private_init_lean_parser_module_1__commandWrecAux___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasView; -obj* l_Function_comp___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Module_prelude_HasView; -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj*, obj*); -uint32 l_String_OldIterator_curr___main(obj*); -obj* l_Lean_Parser_Module_import_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_ParserT_MonadExcept___rarg(obj*); -obj* l_Lean_Parser_Module_header_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_ModuleParserM_BasicParserM(obj*, obj*); -obj* l_Lean_Parser_Module_importPath_Parser___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -obj* l_Lean_Parser_Module_prelude_Parser(obj*, obj*, obj*); -obj* l_id___rarg___boxed(obj*); -obj* l_Lean_Parser_Module_prelude_HasView_x27___elambda__1(obj*); -obj* l_String_OldIterator_remaining___main(obj*); -obj* l_List_map___main___rarg(obj*, obj*); -obj* l_Lean_Parser_Combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_header_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2(obj*); -obj* l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__2(obj*, obj*, obj*); -extern obj* l_Id_Monad; -obj* l_Lean_Parser_Module_header_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Module_importPath_HasView_x27; -obj* l_Lean_Parser_Module_import_HasView; -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ModuleParserM_BasicParserM___boxed(obj*, obj*); -obj* l_Lean_Parser_Module_importPath_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_resumeModuleParser___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_whitespace(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l___private_init_lean_parser_module_1__commandWrecAux___main___closed__2; -obj* l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Module_parseCommandWithRecovery___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_parseCommandWithRecovery(uint8, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_mkRawRes(obj*, obj*); -obj* l_Lean_Parser_commandParserConfigCoeParserConfig___boxed(obj*); -extern obj* l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -obj* l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_import_Parser(obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_eoi_Parser___boxed(obj*, obj*, obj*, obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_String_OldIterator_next___main(obj*); -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_parseHeader___lambda__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__3___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_eoi_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1(obj*, obj*, obj*, obj*); -extern obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -extern obj* l_Char_HasRepr___closed__1; -obj* l___private_init_lean_parser_module_1__commandWrecAux___main___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_noKind; -obj* l_Lean_Parser_Module_import; -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_String_OldIterator_toEnd___main(obj*); -extern obj* l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_Module_header_HasView; -obj* l_Char_quoteCore(uint32); -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj*, obj*); -uint8 l_String_OldIterator_hasNext___main(obj*); -obj* l_Lean_Parser_ModuleParserM_MonadState; -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Parser_parseHeader___lambda__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_eoi; -obj* l_Lean_Parser_ModuleParserM_Lean_Parser_MonadParsec; -obj* l_coeB___rarg(obj*, obj*); -obj* l_Lean_Parser_Module_import_HasView_x27; -obj* l_Lean_Parser_tokens___rarg(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -obj* l_StateT_MonadExcept___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_parseHeader___lambda__1(obj*, obj*); -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj*); -obj* l_Lean_Parser_Module_prelude_Parser___closed__1; -obj* l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ModuleParserM_liftParserT___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_import_Parser___closed__1; -obj* l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParserT_Monad___rarg(obj*); -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_Module_header_Parser_Lean_Parser_HasView___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_moduleParserConfigCoe___boxed(obj*); -obj* l_StateT_bind___at_Lean_Parser_parseHeader___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_module_1__commandWrecAux___main___closed__3; -obj* l_String_trim(obj*); -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj*, obj*); -obj* l_StateT_MonadFunctor___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_resumeModuleParser___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_importPath; -obj* l_Lean_Parser_Module_import_Parser_Lean_Parser_HasView; -obj* l___private_init_lean_parser_module_1__commandWrecAux___main(uint8, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseHeader___lambda__3___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseHeader___closed__1; -obj* l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_ModuleParserM_MonadExcept; -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -obj* l_Lean_Parser_Module_importPath_HasView; -obj* l_Lean_Parser_resumeModuleParser(obj*); -obj* l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_Module_import_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Module_importPath_Parser(obj*, obj*, obj*); -obj* l_Lean_Parser_token(obj*, obj*, obj*); -obj* l_Lean_Parser_command_Parser___boxed(obj*); -obj* l_Lean_Parser_List_cons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_ModuleParserM_BasicParserM___closed__1; -obj* l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___elambda__1___spec__1(obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Combinators_many___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__1(obj*, obj*, obj*, obj*); -obj* l_coeTrans___rarg(obj*, obj*, obj*); -obj* l_StateT_bind___at_Lean_Parser_parseHeader___spec__1(obj*, obj*); -obj* l_Lean_Parser_ModuleParserM_liftParserT(obj*); -obj* l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__1; -obj* l_coeT___rarg(obj*, obj*); -obj* l_Lean_Parser_Module_importPath_HasView_x27___lambda__1(obj*); -extern uint8 l_True_Decidable; -obj* l_Lean_Parser_parseCommand(obj*, obj*); -obj* l_Lean_Parser_messageOfParsecMessage___rarg(obj*, obj*); -extern obj* l_Lean_Name_toString___closed__1; -obj* l_Lean_Parser_Module_prelude; -obj* l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__2___boxed(obj*, obj*, obj*, obj*); -obj* l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Module_header_Parser(obj*, obj*, obj*); -obj* l_Lean_Parser_parseCommand___lambda__1(obj*, obj*); -obj* l_Lean_Parser_Module_import_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Module_prelude_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Module_import_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Module_header_HasView_x27; -obj* l_StateT_Alternative___rarg(obj*, obj*); -obj* l_String_quote(obj*); -obj* l_Lean_Parser_Substring_ofString(obj*); -obj* l_Lean_Parser_ParserT_MonadReader___rarg(obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_BasicParserM_MonadExcept; -extern obj* l_Lean_Parser_Combinators_many___rarg___closed__1; -obj* l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___closed__1; -obj* l_List_zip___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_StateT_MonadState___rarg(obj*); -obj* l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1; -obj* l___private_init_lean_parser_module_1__commandWrecAux___main___closed__1; -obj* l_StateT_lift___rarg(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_ParsecT_MonadFail___rarg___closed__1; -obj* l_Lean_Parser_Module_prelude_HasView_x27; -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_Module_header_Parser_Lean_Parser_HasView___spec__1(obj*, uint8, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___spec__1(obj*); -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Parser_parseHeader(obj*); -obj* l_Lean_Parser_moduleParserConfigCoe(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_moduleParserConfigCoe___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_moduleParserConfigCoe(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_ModuleParserM_Monad() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Monad___rarg(x_1); -x_3 = l_StateT_Monad___rarg(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_ModuleParserM_Alternative() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_ParserT_Alternative___rarg(x_1); -x_4 = l_StateT_Alternative___rarg(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_ModuleParserM_MonadReader() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_ParserT_MonadReader___rarg(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_StateT_lift___rarg), 4, 3); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, lean::box(0)); -lean::closure_set(x_4, 2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_ModuleParserM_MonadState() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Monad___rarg(x_1); -x_3 = l_StateT_MonadState___rarg(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_ModuleParserM_Lean_Parser_MonadParsec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Monad___rarg(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_StateT_lift___rarg), 4, 1); -lean::closure_set(x_3, 0, x_2); -lean::inc(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_StateT_MonadFunctor___boxed), 6, 5); -lean::closure_set(x_4, 0, lean::box(0)); -lean::closure_set(x_4, 1, lean::box(0)); -lean::closure_set(x_4, 2, lean::box(0)); -lean::closure_set(x_4, 3, x_2); -lean::closure_set(x_4, 4, x_2); -x_5 = l_Lean_Parser_ParserT_Lean_Parser_MonadParsec___rarg(x_1); -x_6 = l_Lean_Parser_monadParsecTrans___rarg(x_3, x_4, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_ModuleParserM_MonadExcept() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Id_Monad; -x_2 = l_Lean_Parser_ParserT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_ParserT_MonadExcept___rarg(x_1); -x_4 = l_StateT_MonadExcept___rarg(x_2, lean::box(0), x_3); -return x_4; -} -} -obj* l_Lean_Parser_ModuleParserM_liftParserT___rarg(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_10; -x_8 = lean::apply_1(x_1, x_5); -x_9 = lean::apply_3(x_3, x_8, x_6, x_7); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; uint8 x_14; -x_12 = lean::cnstr_get(x_9, 1); -x_13 = lean::cnstr_get(x_9, 0); -lean::dec(x_13); -x_14 = !lean::is_exclusive(x_10); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_10, 0); -x_16 = lean::cnstr_get(x_10, 2); -lean::cnstr_set(x_9, 1, x_4); -lean::cnstr_set(x_9, 0, x_15); -x_17 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_10, 2, x_17); -lean::cnstr_set(x_10, 0, x_9); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_10); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_12); -return x_19; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_20 = lean::cnstr_get(x_10, 0); -x_21 = lean::cnstr_get(x_10, 1); -x_22 = lean::cnstr_get(x_10, 2); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_10); -lean::cnstr_set(x_9, 1, x_4); -lean::cnstr_set(x_9, 0, x_20); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_9); -lean::cnstr_set(x_24, 1, x_21); -lean::cnstr_set(x_24, 2, x_23); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_12); -return x_26; -} -} -else -{ -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; -x_27 = lean::cnstr_get(x_9, 1); -lean::inc(x_27); -lean::dec(x_9); -x_28 = lean::cnstr_get(x_10, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_10, 1); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_10, 2); -lean::inc(x_30); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - lean::cnstr_release(x_10, 2); - x_31 = x_10; -} else { - lean::dec_ref(x_10); - x_31 = lean::box(0); -} -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_28); -lean::cnstr_set(x_32, 1, x_4); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_31)) { - x_34 = lean::alloc_cnstr(0, 3, 0); -} else { - x_34 = x_31; -} -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_29); -lean::cnstr_set(x_34, 2, x_33); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_34); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_27); -return x_36; -} -} -else -{ -uint8 x_37; -lean::dec(x_4); -x_37 = !lean::is_exclusive(x_9); -if (x_37 == 0) -{ -obj* x_38; uint8 x_39; -x_38 = lean::cnstr_get(x_9, 0); -lean::dec(x_38); -x_39 = !lean::is_exclusive(x_10); -if (x_39 == 0) -{ -return x_9; -} -else -{ -obj* x_40; uint8 x_41; obj* x_42; -x_40 = lean::cnstr_get(x_10, 0); -x_41 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_40); -lean::dec(x_10); -x_42 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_41); -lean::cnstr_set(x_9, 0, x_42); -return x_9; -} -} -else -{ -obj* x_43; obj* x_44; uint8 x_45; obj* x_46; obj* x_47; obj* x_48; -x_43 = lean::cnstr_get(x_9, 1); -lean::inc(x_43); -lean::dec(x_9); -x_44 = lean::cnstr_get(x_10, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_46 = x_10; -} else { - lean::dec_ref(x_10); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(1, 1, 1); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_44); -lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_45); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_43); -return x_48; -} -} -} -} -obj* l_Lean_Parser_ModuleParserM_liftParserT(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ModuleParserM_liftParserT___rarg), 7, 0); -return x_2; -} -} -obj* _init_l_Lean_Parser_ModuleParserM_BasicParserM___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_commandParserConfigCoeParserConfig___boxed), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_coeB___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_moduleParserConfigCoe___boxed), 1, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_coeTrans___rarg), 3, 2); -lean::closure_set(x_4, 0, x_3); -lean::closure_set(x_4, 1, x_2); -x_5 = lean::alloc_closure(reinterpret_cast(l_coeT___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ModuleParserM_liftParserT___rarg), 7, 1); -lean::closure_set(x_6, 0, x_5); -return x_6; -} -} -obj* l_Lean_Parser_ModuleParserM_BasicParserM(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ModuleParserM_BasicParserM___closed__1; -return x_3; -} -} -obj* l_Lean_Parser_ModuleParserM_BasicParserM___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ModuleParserM_BasicParserM(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Module_prelude() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Module"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("prelude"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_Module_prelude; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_Module_prelude_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = l_Lean_Parser_Module_prelude; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -} -obj* l_Lean_Parser_Module_prelude_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_10; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -return x_10; -} -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; -x_13 = lean::box(0); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -else -{ -obj* x_17; -lean::dec(x_14); -x_17 = lean::box(0); -return x_17; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Module_prelude_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_prelude_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Module_prelude_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Module_prelude_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Module_prelude_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::mk_string("prelude"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = l_Lean_Parser_BasicParserM_Monad; -x_9 = l_Lean_Parser_BasicParserM_MonadExcept; -x_10 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_11 = l_Lean_Parser_BasicParserM_Alternative; -x_12 = l_Lean_Parser_Module_prelude; -x_13 = l_Lean_Parser_Module_prelude_HasView; -x_14 = l_Lean_Parser_Combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); -lean::dec(x_7); -return x_14; -} -} -obj* _init_l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::mk_string("prelude"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Module_prelude_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::mk_string("prelude"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_Module_prelude_Parser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_Module_prelude; -x_5 = l_Lean_Parser_Module_prelude_Parser___closed__1; -x_6 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(x_4, x_5, x_1, x_2, x_3); -return x_6; -} -} -obj* _init_l_Lean_Parser_Module_importPath() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Module"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("importPath"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___elambda__1___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___elambda__1___spec__1(x_5); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_7; -x_7 = lean::box(3); -lean::cnstr_set(x_1, 1, x_6); -lean::cnstr_set(x_1, 0, x_7); -return x_1; -} -else -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_1, 1, x_6); -lean::cnstr_set(x_1, 0, x_9); -return x_1; -} -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_1, 0); -x_11 = lean::cnstr_get(x_1, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_1); -x_12 = l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___elambda__1___spec__1(x_11); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::box(3); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_10, 0); -lean::inc(x_15); -lean::dec(x_10); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_12); -return x_17; -} -} -} -} -} -obj* l_Lean_Parser_Module_importPath_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___elambda__1___spec__1(x_2); -x_5 = l_Lean_Parser_noKind; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_3); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_6); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_Module_importPath; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -obj* l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___spec__1(x_5); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_1, 1, x_6); -lean::cnstr_set(x_1, 0, x_8); -return x_1; -} -else -{ -obj* x_9; -lean::dec(x_4); -x_9 = lean::box(0); -lean::cnstr_set(x_1, 1, x_6); -lean::cnstr_set(x_1, 0, x_9); -return x_1; -} -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_1, 0); -x_11 = lean::cnstr_get(x_1, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_1); -x_12 = l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___spec__1(x_11); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_10, 0); -lean::inc(x_13); -lean::dec(x_10); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_12); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_12); -return x_17; -} -} -} -} -} -obj* _init_l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -x_4 = lean::mk_string("NOTAnIdent"); -lean::inc(x_4); -x_5 = l_Lean_Parser_Substring_ofString(x_4); -x_6 = lean::box(0); -x_7 = lean_name_mk_string(x_6, x_4); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_1); -lean::cnstr_set(x_8, 1, x_5); -lean::cnstr_set(x_8, 2, x_7); -lean::cnstr_set(x_8, 3, x_2); -lean::cnstr_set(x_8, 4, x_2); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_3); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* _init_l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__2; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___spec__1(x_5); -x_7 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -} -obj* l_Lean_Parser_Module_importPath_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_22; -x_22 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; -x_23 = l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__4; -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_22, 0); -lean::inc(x_24); -lean::dec(x_22); -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -lean::dec(x_24); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; -x_26 = lean::box(3); -x_2 = x_25; -x_3 = x_26; -goto block_21; -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_25, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_25, 1); -lean::inc(x_28); -lean::dec(x_25); -x_2 = x_28; -x_3 = x_27; -goto block_21; -} -} -block_21: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__2; -return x_5; -} -else -{ -obj* x_6; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -if (lean::obj_tag(x_6) == 1) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__3; -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -return x_9; -} -else -{ -obj* x_10; -lean::dec(x_6); -x_10 = l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__2; -return x_10; -} -} -} -else -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_4, 0); -lean::inc(x_11); -lean::dec(x_4); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -x_13 = l_List_map___main___at_Lean_Parser_Module_importPath_HasView_x27___spec__1(x_12); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_14; obj* x_15; -x_14 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -if (lean::obj_tag(x_16) == 1) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -lean::dec(x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_13); -lean::cnstr_set(x_18, 1, x_17); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_16); -x_19 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_13); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Module_importPath_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_importPath_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_importPath_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Module_importPath_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Module_importPath_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_Combinators_many___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -x_5 = l_Lean_Parser_Combinators_many1___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -lean::dec(x_3); -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -return x_5; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_5, 1); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_6); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -else -{ -uint8 x_11; -x_11 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (x_11 == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_5); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = lean::cnstr_get(x_5, 0); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_6, 0); -lean::inc(x_14); -lean::dec(x_6); -x_15 = lean::cnstr_get(x_14, 2); -lean::inc(x_15); -lean::dec(x_14); -x_16 = l_mjoin___rarg___closed__1; -x_17 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_3); -lean::cnstr_set(x_20, 2, x_18); -lean::cnstr_set(x_5, 0, x_20); -return x_5; -} -else -{ -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_21 = lean::cnstr_get(x_5, 1); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::cnstr_get(x_6, 0); -lean::inc(x_22); -lean::dec(x_6); -x_23 = lean::cnstr_get(x_22, 2); -lean::inc(x_23); -lean::dec(x_22); -x_24 = l_mjoin___rarg___closed__1; -x_25 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_3); -lean::cnstr_set(x_28, 2, x_26); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_21); -return x_29; -} -} -else -{ -uint8 x_30; -lean::dec(x_3); -x_30 = !lean::is_exclusive(x_5); -if (x_30 == 0) -{ -obj* x_31; -x_31 = lean::cnstr_get(x_5, 0); -lean::dec(x_31); -return x_5; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_5, 1); -lean::inc(x_32); -lean::dec(x_5); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_6); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -lean::inc(x_1); -x_4 = l_Lean_Parser_token(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_4, 1); -x_8 = lean::cnstr_get(x_4, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_5, 1); -x_12 = lean::cnstr_get(x_5, 2); -if (lean::obj_tag(x_10) == 1) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -lean::dec(x_2); -lean::dec(x_1); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_5, 2, x_35); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_36); -x_38 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_39 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_37, x_38); -x_40 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_39); -lean::cnstr_set(x_4, 0, x_40); -return x_4; -} -else -{ -obj* x_41; -lean::free_heap_obj(x_5); -lean::dec(x_10); -lean::free_heap_obj(x_4); -x_41 = lean::box(0); -x_13 = x_41; -goto block_34; -} -block_34: -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -lean::dec(x_13); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_2); -x_15 = lean::box(0); -x_16 = l_String_splitAux___main___closed__1; -x_17 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_16, x_17, x_14, x_15, x_1, x_11, x_7); -lean::dec(x_1); -lean::dec(x_14); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_20); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_21); -x_24 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_23, x_17); -x_25 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_24); -lean::cnstr_set(x_18, 0, x_25); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_26 = lean::cnstr_get(x_18, 0); -x_27 = lean::cnstr_get(x_18, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_18); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_26); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_28); -x_31 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_30, x_17); -x_32 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_31); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_27); -return x_33; -} -} -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_42 = lean::cnstr_get(x_5, 0); -x_43 = lean::cnstr_get(x_5, 1); -x_44 = lean::cnstr_get(x_5, 2); -lean::inc(x_44); -lean::inc(x_43); -lean::inc(x_42); -lean::dec(x_5); -if (lean::obj_tag(x_42) == 1) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -lean::dec(x_2); -lean::dec(x_1); -x_61 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_62 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_62, 0, x_42); -lean::cnstr_set(x_62, 1, x_43); -lean::cnstr_set(x_62, 2, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_61, x_63); -x_65 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_66 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_64, x_65); -x_67 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_66); -lean::cnstr_set(x_4, 0, x_67); -return x_4; -} -else -{ -obj* x_68; -lean::dec(x_42); -lean::free_heap_obj(x_4); -x_68 = lean::box(0); -x_45 = x_68; -goto block_60; -} -block_60: -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_45); -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_splitAux___main___closed__1; -x_49 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_50 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_48, x_49, x_46, x_47, x_1, x_43, x_7); -lean::dec(x_1); -lean::dec(x_46); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_50, 1); -lean::inc(x_52); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - x_53 = x_50; -} else { - lean::dec_ref(x_50); - x_53 = lean::box(0); -} -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_51); -x_55 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_54); -x_57 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_56, x_49); -x_58 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_57); -if (lean::is_scalar(x_53)) { - x_59 = lean::alloc_cnstr(0, 2, 0); -} else { - x_59 = x_53; -} -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_52); -return x_59; -} -} -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_69 = lean::cnstr_get(x_4, 1); -lean::inc(x_69); -lean::dec(x_4); -x_70 = lean::cnstr_get(x_5, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_5, 1); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_5, 2); -lean::inc(x_72); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_73 = x_5; -} else { - lean::dec_ref(x_5); - x_73 = lean::box(0); -} -if (lean::obj_tag(x_70) == 1) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -lean::dec(x_2); -lean::dec(x_1); -x_90 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_73)) { - x_91 = lean::alloc_cnstr(0, 3, 0); -} else { - x_91 = x_73; -} -lean::cnstr_set(x_91, 0, x_70); -lean::cnstr_set(x_91, 1, x_71); -lean::cnstr_set(x_91, 2, x_90); -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_91); -x_93 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_92); -x_94 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_95 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_93, x_94); -x_96 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_95); -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_69); -return x_97; -} -else -{ -obj* x_98; -lean::dec(x_73); -lean::dec(x_70); -x_98 = lean::box(0); -x_74 = x_98; -goto block_89; -} -block_89: -{ -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; -lean::dec(x_74); -x_75 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_75, 0, x_2); -x_76 = lean::box(0); -x_77 = l_String_splitAux___main___closed__1; -x_78 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_79 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_77, x_78, x_75, x_76, x_1, x_71, x_69); -lean::dec(x_1); -lean::dec(x_75); -x_80 = lean::cnstr_get(x_79, 0); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_79, 1); -lean::inc(x_81); -if (lean::is_exclusive(x_79)) { - lean::cnstr_release(x_79, 0); - lean::cnstr_release(x_79, 1); - x_82 = x_79; -} else { - lean::dec_ref(x_79); - x_82 = lean::box(0); -} -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_80); -x_84 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_83); -x_86 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_85, x_78); -x_87 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_86); -if (lean::is_scalar(x_82)) { - x_88 = lean::alloc_cnstr(0, 2, 0); -} else { - x_88 = x_82; -} -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_81); -return x_88; -} -} -} -else -{ -uint8 x_99; -lean::dec(x_2); -lean::dec(x_1); -x_99 = !lean::is_exclusive(x_4); -if (x_99 == 0) -{ -obj* x_100; uint8 x_101; -x_100 = lean::cnstr_get(x_4, 0); -lean::dec(x_100); -x_101 = !lean::is_exclusive(x_5); -if (x_101 == 0) -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_102 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_102, x_5); -x_104 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_105 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_103, x_104); -x_106 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_105); -lean::cnstr_set(x_4, 0, x_106); -return x_4; -} -else -{ -obj* x_107; uint8 x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_107 = lean::cnstr_get(x_5, 0); -x_108 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_107); -lean::dec(x_5); -x_109 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_109, 0, x_107); -lean::cnstr_set_scalar(x_109, sizeof(void*)*1, x_108); -x_110 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_110, x_109); -x_112 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_113 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_111, x_112); -x_114 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_113); -lean::cnstr_set(x_4, 0, x_114); -return x_4; -} -} -else -{ -obj* x_115; obj* x_116; uint8 x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; -x_115 = lean::cnstr_get(x_4, 1); -lean::inc(x_115); -lean::dec(x_4); -x_116 = lean::cnstr_get(x_5, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - x_118 = x_5; -} else { - lean::dec_ref(x_5); - x_118 = lean::box(0); -} -if (lean::is_scalar(x_118)) { - x_119 = lean::alloc_cnstr(1, 1, 1); -} else { - x_119 = x_118; -} -lean::cnstr_set(x_119, 0, x_116); -lean::cnstr_set_scalar(x_119, sizeof(void*)*1, x_117); -x_120 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_121 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_120, x_119); -x_122 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_123 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_121, x_122); -x_124 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_123); -x_125 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_125, 0, x_124); -lean::cnstr_set(x_125, 1, x_115); -return x_125; -} -} -} -} -obj* l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___lambda__1(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; -x_6 = l_Lean_Name_toString___closed__1; -x_7 = l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(x_6, x_1, x_3, x_4, x_5); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::cnstr_get(x_8, 1); -x_13 = lean::cnstr_get(x_8, 2); -x_14 = lean::cnstr_get(x_8, 0); -lean::dec(x_14); -lean::inc(x_12); -x_15 = l_Lean_Parser_mkRawRes(x_2, x_12); -x_16 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_8, 2, x_16); -lean::cnstr_set(x_8, 0, x_15); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_8); -lean::cnstr_set(x_7, 0, x_17); -return x_7; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::cnstr_get(x_8, 1); -x_19 = lean::cnstr_get(x_8, 2); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_8); -lean::inc(x_18); -x_20 = l_Lean_Parser_mkRawRes(x_2, x_18); -x_21 = l_Lean_Parser_finishCommentBlock___closed__2; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_18); -lean::cnstr_set(x_22, 2, x_21); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_22); -lean::cnstr_set(x_7, 0, x_23); -return x_7; -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_24 = lean::cnstr_get(x_7, 1); -lean::inc(x_24); -lean::dec(x_7); -x_25 = lean::cnstr_get(x_8, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_8, 2); -lean::inc(x_26); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_27 = x_8; -} else { - lean::dec_ref(x_8); - x_27 = lean::box(0); -} -lean::inc(x_25); -x_28 = l_Lean_Parser_mkRawRes(x_2, x_25); -x_29 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_27)) { - x_30 = lean::alloc_cnstr(0, 3, 0); -} else { - x_30 = x_27; -} -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_25); -lean::cnstr_set(x_30, 2, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_24); -return x_32; -} -} -else -{ -uint8 x_33; -lean::dec(x_2); -x_33 = !lean::is_exclusive(x_7); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::cnstr_get(x_7, 0); -lean::dec(x_34); -x_35 = !lean::is_exclusive(x_8); -if (x_35 == 0) -{ -return x_7; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; -x_36 = lean::cnstr_get(x_8, 0); -x_37 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_8); -x_38 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_37); -lean::cnstr_set(x_7, 0, x_38); -return x_7; -} -} -else -{ -obj* x_39; obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_44; -x_39 = lean::cnstr_get(x_7, 1); -lean::inc(x_39); -lean::dec(x_7); -x_40 = lean::cnstr_get(x_8, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_42 = x_8; -} else { - lean::dec_ref(x_8); - x_42 = lean::box(0); -} -if (lean::is_scalar(x_42)) { - x_43 = lean::alloc_cnstr(1, 1, 1); -} else { - x_43 = x_42; -} -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_41); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_39); -return x_44; -} -} -} -} -obj* _init_l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_1 = lean::mk_string("."); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___lambda__1___boxed), 5, 1); -lean::closure_set(x_6, 0, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__1), 4, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__2), 3, 0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_BasicParserM_Monad; -x_14 = l_Lean_Parser_BasicParserM_MonadExcept; -x_15 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_16 = l_Lean_Parser_BasicParserM_Alternative; -x_17 = l_Lean_Parser_Module_importPath; -x_18 = l_Lean_Parser_Module_importPath_HasView; -x_19 = l_Lean_Parser_Combinators_node_view___rarg(x_13, x_14, x_15, x_16, x_17, x_12, x_18); -lean::dec(x_12); -return x_19; -} -} -obj* l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* _init_l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_1); -x_4 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -lean::dec(x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Module_importPath_Parser___closed__1() { -_start: -{ -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_1 = lean::mk_string("."); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___lambda__1___boxed), 5, 1); -lean::closure_set(x_6, 0, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__1), 4, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__2), 3, 0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -obj* l_Lean_Parser_Module_importPath_Parser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_Module_importPath; -x_5 = l_Lean_Parser_Module_importPath_Parser___closed__1; -x_6 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(x_4, x_5, x_1, x_2, x_3); -return x_6; -} -} -obj* _init_l_Lean_Parser_Module_import() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Module"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("import"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Module_import_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Module_importPath_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_Module_import_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Module_import_HasView_x27___elambda__1___closed__1; -x_5 = l_List_map___main___rarg(x_4, x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_Module_import; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_9); -x_17 = l_Lean_Parser_Module_import; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -} -} -obj* _init_l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_Module_importPath_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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); -return x_6; -} -} -obj* _init_l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Module_importPath_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2; -x_9 = l_List_map___main___rarg(x_8, x_7); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_Module_import_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_13; -x_13 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -lean::free_heap_obj(x_13); -x_18 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3; -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_17, 1); -lean::inc(x_20); -lean::dec(x_17); -x_21 = lean::cnstr_get(x_19, 0); -lean::inc(x_21); -lean::dec(x_19); -lean::cnstr_set(x_13, 0, x_21); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = l_Lean_Parser_Syntax_asNode___main(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -lean::dec(x_23); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -x_28 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2; -x_29 = l_List_map___main___rarg(x_28, x_27); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_13); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -x_31 = lean::cnstr_get(x_20, 0); -lean::inc(x_31); -lean::dec(x_20); -x_2 = x_13; -x_3 = x_31; -goto block_12; -} -} -else -{ -obj* x_32; -lean::dec(x_19); -lean::free_heap_obj(x_13); -x_32 = lean::cnstr_get(x_17, 1); -lean::inc(x_32); -lean::dec(x_17); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -x_33 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3; -return x_33; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::box(0); -x_2 = x_35; -x_3 = x_34; -goto block_12; -} -} -} -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_13, 0); -lean::inc(x_36); -lean::dec(x_13); -x_37 = lean::cnstr_get(x_36, 1); -lean::inc(x_37); -lean::dec(x_36); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3; -return x_38; -} -else -{ -obj* x_39; -x_39 = lean::cnstr_get(x_37, 0); -lean::inc(x_39); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; obj* x_42; -x_40 = lean::cnstr_get(x_37, 1); -lean::inc(x_40); -lean::dec(x_37); -x_41 = lean::cnstr_get(x_39, 0); -lean::inc(x_41); -lean::dec(x_39); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_43; obj* x_44; -x_43 = lean::box(3); -x_44 = l_Lean_Parser_Syntax_asNode___main(x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; -x_45 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1; -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_42); -lean::cnstr_set(x_46, 1, x_45); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = lean::cnstr_get(x_44, 0); -lean::inc(x_47); -lean::dec(x_44); -x_48 = lean::cnstr_get(x_47, 1); -lean::inc(x_48); -lean::dec(x_47); -x_49 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2; -x_50 = l_List_map___main___rarg(x_49, x_48); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_42); -lean::cnstr_set(x_51, 1, x_50); -return x_51; -} -} -else -{ -obj* x_52; -x_52 = lean::cnstr_get(x_40, 0); -lean::inc(x_52); -lean::dec(x_40); -x_2 = x_42; -x_3 = x_52; -goto block_12; -} -} -else -{ -obj* x_53; -lean::dec(x_39); -x_53 = lean::cnstr_get(x_37, 1); -lean::inc(x_53); -lean::dec(x_37); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3; -return x_54; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::box(0); -x_2 = x_56; -x_3 = x_55; -goto block_12; -} -} -} -} -} -block_12: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2; -x_10 = l_List_map___main___rarg(x_9, x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_2); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -} -obj* _init_l_Lean_Parser_Module_import_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_import_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_import_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Module_import_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Module_import_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Module_import_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::mk_string("import"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_5, 0, x_2); -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_importPath_Parser), 3, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___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); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_BasicParserM_Monad; -x_12 = l_Lean_Parser_BasicParserM_MonadExcept; -x_13 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_14 = l_Lean_Parser_BasicParserM_Alternative; -x_15 = l_Lean_Parser_Module_import; -x_16 = l_Lean_Parser_Module_import_HasView; -x_17 = l_Lean_Parser_Combinators_node_view___rarg(x_11, x_12, x_13, x_14, x_15, x_10, x_16); -lean::dec(x_10); -return x_17; -} -} -obj* _init_l_Lean_Parser_Module_import_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("import"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasTokens; -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); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Module_import_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("import"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_5, 0, x_2); -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_importPath_Parser), 3, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___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); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* l_Lean_Parser_Module_import_Parser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_Module_import; -x_5 = l_Lean_Parser_Module_import_Parser___closed__1; -x_6 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(x_4, x_5, x_1, x_2, x_3); -return x_6; -} -} -obj* _init_l_Lean_Parser_Module_header() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Module"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("header"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Module_header_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Module_import_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_Module_header_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Module_header_HasView_x27___elambda__1___closed__1; -x_5 = l_List_map___main___rarg(x_4, x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_Module_header; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -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; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = l_Lean_Parser_Module_prelude_HasView; -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_8); -x_19 = l_Lean_Parser_Syntax_mkNode(x_6, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_9); -x_21 = l_Lean_Parser_Module_header; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_Module_import_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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); -return x_6; -} -} -obj* _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Module_import_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_Module_prelude_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_5); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2; -x_12 = l_List_map___main___rarg(x_11, x_10); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_5); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -} -obj* _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Module_prelude_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2; -x_9 = l_List_map___main___rarg(x_8, x_7); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -} -obj* _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__6() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -x_10 = l_Lean_Parser_Module_prelude_HasView; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_9); -lean::cnstr_set(x_2, 0, x_12); -x_13 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2; -x_14 = l_List_map___main___rarg(x_13, x_6); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -lean::dec(x_8); -lean::dec(x_6); -lean::free_heap_obj(x_2); -x_16 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3; -return x_16; -} -} -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_2, 0); -lean::inc(x_17); -lean::dec(x_2); -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -lean::dec(x_17); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; -x_19 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5; -return x_19; -} -else -{ -obj* x_20; -x_20 = lean::cnstr_get(x_18, 1); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_21 = lean::cnstr_get(x_18, 0); -lean::inc(x_21); -x_22 = l_Lean_Parser_Module_prelude_HasView; -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_24 = lean::apply_1(x_23, x_21); -x_25 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -x_26 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2; -x_27 = l_List_map___main___rarg(x_26, x_18); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_25); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; -lean::dec(x_20); -lean::dec(x_18); -x_29 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3; -return x_29; -} -} -} -} -} -} -obj* l_Lean_Parser_Module_header_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_13; obj* x_14; obj* x_68; -x_68 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__6; -return x_69; -} -else -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -lean::inc(x_70); -lean::dec(x_68); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -lean::dec(x_70); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -x_72 = lean::box(3); -x_13 = x_71; -x_14 = x_72; -goto block_67; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_71, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_71, 1); -lean::inc(x_74); -lean::dec(x_71); -x_13 = x_74; -x_14 = x_73; -goto block_67; -} -} -block_12: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2; -x_10 = l_List_map___main___rarg(x_9, x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_2); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -block_67: -{ -obj* x_15; -x_15 = l_Lean_Parser_Syntax_asNode___main(x_14); -if (lean::obj_tag(x_15) == 0) -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3; -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_13, 0); -lean::inc(x_17); -lean::dec(x_13); -x_18 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__4; -x_2 = x_18; -x_3 = x_17; -goto block_12; -} -} -else -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_15); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_15, 0); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -lean::free_heap_obj(x_15); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_13, 0); -lean::inc(x_23); -lean::dec(x_13); -x_24 = lean::box(0); -x_2 = x_24; -x_3 = x_23; -goto block_12; -} -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_21, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_21, 0); -lean::inc(x_26); -lean::dec(x_21); -x_27 = l_Lean_Parser_Module_prelude_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -lean::cnstr_set(x_15, 0, x_29); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::box(3); -x_31 = l_Lean_Parser_Syntax_asNode___main(x_30); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; obj* x_33; -x_32 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_15); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_34 = lean::cnstr_get(x_31, 0); -lean::inc(x_34); -lean::dec(x_31); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -x_36 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2; -x_37 = l_List_map___main___rarg(x_36, x_35); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_15); -lean::cnstr_set(x_38, 1, x_37); -return x_38; -} -} -else -{ -obj* x_39; -x_39 = lean::cnstr_get(x_13, 0); -lean::inc(x_39); -lean::dec(x_13); -x_2 = x_15; -x_3 = x_39; -goto block_12; -} -} -else -{ -lean::dec(x_25); -lean::dec(x_21); -lean::free_heap_obj(x_15); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_40; -x_40 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3; -return x_40; -} -else -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_13, 0); -lean::inc(x_41); -lean::dec(x_13); -x_42 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__4; -x_2 = x_42; -x_3 = x_41; -goto block_12; -} -} -} -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_15, 0); -lean::inc(x_43); -lean::dec(x_15); -x_44 = lean::cnstr_get(x_43, 1); -lean::inc(x_44); -lean::dec(x_43); -if (lean::obj_tag(x_44) == 0) -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_45; -x_45 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5; -return x_45; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_13, 0); -lean::inc(x_46); -lean::dec(x_13); -x_47 = lean::box(0); -x_2 = x_47; -x_3 = x_46; -goto block_12; -} -} -else -{ -obj* x_48; -x_48 = lean::cnstr_get(x_44, 1); -lean::inc(x_48); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_49 = lean::cnstr_get(x_44, 0); -lean::inc(x_49); -lean::dec(x_44); -x_50 = l_Lean_Parser_Module_prelude_HasView; -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::apply_1(x_51, x_49); -x_53 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_54; obj* x_55; -x_54 = lean::box(3); -x_55 = l_Lean_Parser_Syntax_asNode___main(x_54); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; -x_56 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1; -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_53); -lean::cnstr_set(x_57, 1, x_56); -return x_57; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_58 = lean::cnstr_get(x_55, 0); -lean::inc(x_58); -lean::dec(x_55); -x_59 = lean::cnstr_get(x_58, 1); -lean::inc(x_59); -lean::dec(x_58); -x_60 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2; -x_61 = l_List_map___main___rarg(x_60, x_59); -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_53); -lean::cnstr_set(x_62, 1, x_61); -return x_62; -} -} -else -{ -obj* x_63; -x_63 = lean::cnstr_get(x_13, 0); -lean::inc(x_63); -lean::dec(x_13); -x_2 = x_53; -x_3 = x_63; -goto block_12; -} -} -else -{ -lean::dec(x_48); -lean::dec(x_44); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_64; -x_64 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3; -return x_64; -} -else -{ -obj* x_65; obj* x_66; -x_65 = lean::cnstr_get(x_13, 0); -lean::inc(x_65); -lean::dec(x_13); -x_66 = l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__4; -x_2 = x_66; -x_3 = x_65; -goto block_12; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Module_header_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_header_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_header_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Module_header_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Module_header_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_Module_header_Parser_Lean_Parser_HasView___spec__1(obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -if (x_2 == 0) -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_93; obj* x_94; -x_52 = lean::box(0); -lean::inc(x_4); -x_93 = lean::apply_3(x_1, x_3, x_4, x_5); -x_94 = lean::cnstr_get(x_93, 0); -lean::inc(x_94); -if (lean::obj_tag(x_94) == 0) -{ -obj* x_95; -x_95 = lean::cnstr_get(x_93, 1); -lean::inc(x_95); -lean::dec(x_93); -x_53 = x_94; -x_54 = x_95; -goto block_92; -} -else -{ -obj* x_96; obj* x_97; -x_96 = lean::cnstr_get(x_94, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_96, 3); -lean::inc(x_97); -if (lean::obj_tag(x_97) == 0) -{ -obj* x_98; uint8 x_99; -x_98 = lean::cnstr_get(x_93, 1); -lean::inc(x_98); -lean::dec(x_93); -x_99 = !lean::is_exclusive(x_94); -if (x_99 == 0) -{ -uint8 x_100; obj* x_101; uint8 x_102; -x_100 = lean::cnstr_get_scalar(x_94, sizeof(void*)*1); -x_101 = lean::cnstr_get(x_94, 0); -lean::dec(x_101); -x_102 = !lean::is_exclusive(x_96); -if (x_102 == 0) -{ -obj* x_103; obj* x_104; -x_103 = lean::cnstr_get(x_96, 3); -lean::dec(x_103); -x_104 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -lean::cnstr_set(x_96, 3, x_104); -if (x_100 == 0) -{ -uint8 x_105; -x_105 = 0; -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_105); -x_53 = x_94; -x_54 = x_98; -goto block_92; -} -else -{ -uint8 x_106; -x_106 = 1; -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_106); -x_53 = x_94; -x_54 = x_98; -goto block_92; -} -} -else -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_107 = lean::cnstr_get(x_96, 0); -x_108 = lean::cnstr_get(x_96, 1); -x_109 = lean::cnstr_get(x_96, 2); -lean::inc(x_109); -lean::inc(x_108); -lean::inc(x_107); -lean::dec(x_96); -x_110 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -x_111 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_111, 0, x_107); -lean::cnstr_set(x_111, 1, x_108); -lean::cnstr_set(x_111, 2, x_109); -lean::cnstr_set(x_111, 3, x_110); -if (x_100 == 0) -{ -uint8 x_112; -x_112 = 0; -lean::cnstr_set(x_94, 0, x_111); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_112); -x_53 = x_94; -x_54 = x_98; -goto block_92; -} -else -{ -uint8 x_113; -x_113 = 1; -lean::cnstr_set(x_94, 0, x_111); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_113); -x_53 = x_94; -x_54 = x_98; -goto block_92; -} -} -} -else -{ -uint8 x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; -x_114 = lean::cnstr_get_scalar(x_94, sizeof(void*)*1); -lean::dec(x_94); -x_115 = lean::cnstr_get(x_96, 0); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_96, 1); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_96, 2); -lean::inc(x_117); -if (lean::is_exclusive(x_96)) { - lean::cnstr_release(x_96, 0); - lean::cnstr_release(x_96, 1); - lean::cnstr_release(x_96, 2); - lean::cnstr_release(x_96, 3); - x_118 = x_96; -} else { - lean::dec_ref(x_96); - x_118 = lean::box(0); -} -x_119 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -if (lean::is_scalar(x_118)) { - x_120 = lean::alloc_cnstr(0, 4, 0); -} else { - x_120 = x_118; -} -lean::cnstr_set(x_120, 0, x_115); -lean::cnstr_set(x_120, 1, x_116); -lean::cnstr_set(x_120, 2, x_117); -lean::cnstr_set(x_120, 3, x_119); -if (x_114 == 0) -{ -uint8 x_121; obj* x_122; -x_121 = 0; -x_122 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_122, 0, x_120); -lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_121); -x_53 = x_122; -x_54 = x_98; -goto block_92; -} -else -{ -uint8 x_123; obj* x_124; -x_123 = 1; -x_124 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_124, 0, x_120); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_123); -x_53 = x_124; -x_54 = x_98; -goto block_92; -} -} -} -else -{ -obj* x_125; uint8 x_126; -x_125 = lean::cnstr_get(x_93, 1); -lean::inc(x_125); -lean::dec(x_93); -x_126 = !lean::is_exclusive(x_94); -if (x_126 == 0) -{ -uint8 x_127; obj* x_128; uint8 x_129; -x_127 = lean::cnstr_get_scalar(x_94, sizeof(void*)*1); -x_128 = lean::cnstr_get(x_94, 0); -lean::dec(x_128); -x_129 = !lean::is_exclusive(x_96); -if (x_129 == 0) -{ -obj* x_130; uint8 x_131; -x_130 = lean::cnstr_get(x_96, 3); -lean::dec(x_130); -x_131 = !lean::is_exclusive(x_97); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; -x_132 = lean::cnstr_get(x_97, 0); -x_133 = lean::box(0); -x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_132); -lean::cnstr_set(x_134, 1, x_133); -x_135 = l_Lean_Parser_noKind; -x_136 = l_Lean_Parser_Syntax_mkNode(x_135, x_134); -lean::cnstr_set(x_97, 0, x_136); -if (x_127 == 0) -{ -uint8 x_137; -x_137 = 0; -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_137); -x_53 = x_94; -x_54 = x_125; -goto block_92; -} -else -{ -uint8 x_138; -x_138 = 1; -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_138); -x_53 = x_94; -x_54 = x_125; -goto block_92; -} -} -else -{ -obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; -x_139 = lean::cnstr_get(x_97, 0); -lean::inc(x_139); -lean::dec(x_97); -x_140 = lean::box(0); -x_141 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_141, 0, x_139); -lean::cnstr_set(x_141, 1, x_140); -x_142 = l_Lean_Parser_noKind; -x_143 = l_Lean_Parser_Syntax_mkNode(x_142, x_141); -x_144 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_144, 0, x_143); -lean::cnstr_set(x_96, 3, x_144); -if (x_127 == 0) -{ -uint8 x_145; -x_145 = 0; -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_145); -x_53 = x_94; -x_54 = x_125; -goto block_92; -} -else -{ -uint8 x_146; -x_146 = 1; -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_146); -x_53 = x_94; -x_54 = x_125; -goto block_92; -} -} -} -else -{ -obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; -x_147 = lean::cnstr_get(x_96, 0); -x_148 = lean::cnstr_get(x_96, 1); -x_149 = lean::cnstr_get(x_96, 2); -lean::inc(x_149); -lean::inc(x_148); -lean::inc(x_147); -lean::dec(x_96); -x_150 = lean::cnstr_get(x_97, 0); -lean::inc(x_150); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - x_151 = x_97; -} else { - lean::dec_ref(x_97); - x_151 = lean::box(0); -} -x_152 = lean::box(0); -x_153 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_153, 0, x_150); -lean::cnstr_set(x_153, 1, x_152); -x_154 = l_Lean_Parser_noKind; -x_155 = l_Lean_Parser_Syntax_mkNode(x_154, x_153); -if (lean::is_scalar(x_151)) { - x_156 = lean::alloc_cnstr(1, 1, 0); -} else { - x_156 = x_151; -} -lean::cnstr_set(x_156, 0, x_155); -x_157 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_157, 0, x_147); -lean::cnstr_set(x_157, 1, x_148); -lean::cnstr_set(x_157, 2, x_149); -lean::cnstr_set(x_157, 3, x_156); -if (x_127 == 0) -{ -uint8 x_158; -x_158 = 0; -lean::cnstr_set(x_94, 0, x_157); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_158); -x_53 = x_94; -x_54 = x_125; -goto block_92; -} -else -{ -uint8 x_159; -x_159 = 1; -lean::cnstr_set(x_94, 0, x_157); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_159); -x_53 = x_94; -x_54 = x_125; -goto block_92; -} -} -} -else -{ -uint8 x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; -x_160 = lean::cnstr_get_scalar(x_94, sizeof(void*)*1); -lean::dec(x_94); -x_161 = lean::cnstr_get(x_96, 0); -lean::inc(x_161); -x_162 = lean::cnstr_get(x_96, 1); -lean::inc(x_162); -x_163 = lean::cnstr_get(x_96, 2); -lean::inc(x_163); -if (lean::is_exclusive(x_96)) { - lean::cnstr_release(x_96, 0); - lean::cnstr_release(x_96, 1); - lean::cnstr_release(x_96, 2); - lean::cnstr_release(x_96, 3); - x_164 = x_96; -} else { - lean::dec_ref(x_96); - x_164 = lean::box(0); -} -x_165 = lean::cnstr_get(x_97, 0); -lean::inc(x_165); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - x_166 = x_97; -} else { - lean::dec_ref(x_97); - x_166 = lean::box(0); -} -x_167 = lean::box(0); -x_168 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_168, 0, x_165); -lean::cnstr_set(x_168, 1, x_167); -x_169 = l_Lean_Parser_noKind; -x_170 = l_Lean_Parser_Syntax_mkNode(x_169, x_168); -if (lean::is_scalar(x_166)) { - x_171 = lean::alloc_cnstr(1, 1, 0); -} else { - x_171 = x_166; -} -lean::cnstr_set(x_171, 0, x_170); -if (lean::is_scalar(x_164)) { - x_172 = lean::alloc_cnstr(0, 4, 0); -} else { - x_172 = x_164; -} -lean::cnstr_set(x_172, 0, x_161); -lean::cnstr_set(x_172, 1, x_162); -lean::cnstr_set(x_172, 2, x_163); -lean::cnstr_set(x_172, 3, x_171); -if (x_160 == 0) -{ -uint8 x_173; obj* x_174; -x_173 = 0; -x_174 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_174, 0, x_172); -lean::cnstr_set_scalar(x_174, sizeof(void*)*1, x_173); -x_53 = x_174; -x_54 = x_125; -goto block_92; -} -else -{ -uint8 x_175; obj* x_176; -x_175 = 1; -x_176 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_176, 0, x_172); -lean::cnstr_set_scalar(x_176, sizeof(void*)*1, x_175); -x_53 = x_176; -x_54 = x_125; -goto block_92; -} -} -} -} -block_92: -{ -if (lean::obj_tag(x_53) == 0) -{ -uint8 x_55; -x_55 = !lean::is_exclusive(x_53); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_56 = lean::cnstr_get(x_53, 0); -x_57 = lean::cnstr_get(x_53, 2); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_56); -x_59 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_53, 2, x_59); -lean::cnstr_set(x_53, 0, x_58); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_53); -if (lean::obj_tag(x_60) == 0) -{ -lean::dec(x_4); -x_6 = x_60; -x_7 = x_54; -goto block_51; -} -else -{ -uint8 x_61; -x_61 = lean::cnstr_get_scalar(x_60, sizeof(void*)*1); -if (x_61 == 0) -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_62 = lean::cnstr_get(x_60, 0); -lean::inc(x_62); -lean::dec(x_60); -x_63 = lean::cnstr_get(x_62, 2); -lean::inc(x_63); -lean::dec(x_62); -x_64 = l_mjoin___rarg___closed__1; -x_65 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_65, 0, x_63); -lean::closure_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_66, 0, x_65); -x_67 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_67, 0, x_52); -lean::cnstr_set(x_67, 1, x_4); -lean::cnstr_set(x_67, 2, x_66); -x_6 = x_67; -x_7 = x_54; -goto block_51; -} -else -{ -lean::dec(x_4); -x_6 = x_60; -x_7 = x_54; -goto block_51; -} -} -} -else -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_68 = lean::cnstr_get(x_53, 0); -x_69 = lean::cnstr_get(x_53, 1); -x_70 = lean::cnstr_get(x_53, 2); -lean::inc(x_70); -lean::inc(x_69); -lean::inc(x_68); -lean::dec(x_53); -x_71 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_71, 0, x_68); -x_72 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_73 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_73, 0, x_71); -lean::cnstr_set(x_73, 1, x_69); -lean::cnstr_set(x_73, 2, x_72); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_70, x_73); -if (lean::obj_tag(x_74) == 0) -{ -lean::dec(x_4); -x_6 = x_74; -x_7 = x_54; -goto block_51; -} -else -{ -uint8 x_75; -x_75 = lean::cnstr_get_scalar(x_74, sizeof(void*)*1); -if (x_75 == 0) -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_76 = lean::cnstr_get(x_74, 0); -lean::inc(x_76); -lean::dec(x_74); -x_77 = lean::cnstr_get(x_76, 2); -lean::inc(x_77); -lean::dec(x_76); -x_78 = l_mjoin___rarg___closed__1; -x_79 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_79, 0, x_77); -lean::closure_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_80, 0, x_79); -x_81 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_81, 0, x_52); -lean::cnstr_set(x_81, 1, x_4); -lean::cnstr_set(x_81, 2, x_80); -x_6 = x_81; -x_7 = x_54; -goto block_51; -} -else -{ -lean::dec(x_4); -x_6 = x_74; -x_7 = x_54; -goto block_51; -} -} -} -} -else -{ -uint8 x_82; -x_82 = lean::cnstr_get_scalar(x_53, sizeof(void*)*1); -if (x_82 == 0) -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_83 = lean::cnstr_get(x_53, 0); -lean::inc(x_83); -lean::dec(x_53); -x_84 = lean::cnstr_get(x_83, 2); -lean::inc(x_84); -lean::dec(x_83); -x_85 = l_mjoin___rarg___closed__1; -x_86 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_86, 0, x_84); -lean::closure_set(x_86, 1, x_85); -x_87 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -x_88 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_88, 0, x_52); -lean::cnstr_set(x_88, 1, x_4); -lean::cnstr_set(x_88, 2, x_87); -x_6 = x_88; -x_7 = x_54; -goto block_51; -} -else -{ -uint8 x_89; -lean::dec(x_4); -x_89 = !lean::is_exclusive(x_53); -if (x_89 == 0) -{ -x_6 = x_53; -x_7 = x_54; -goto block_51; -} -else -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_53, 0); -lean::inc(x_90); -lean::dec(x_53); -x_91 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set_scalar(x_91, sizeof(void*)*1, x_82); -x_6 = x_91; -x_7 = x_54; -goto block_51; -} -} -} -} -} -else -{ -obj* x_177; -x_177 = lean::apply_3(x_1, x_3, x_4, x_5); -return x_177; -} -block_51: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_6, 2); -x_11 = lean::cnstr_get(x_6, 0); -lean::dec(x_11); -x_12 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_13 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_13); -lean::cnstr_set(x_6, 0, x_12); -x_14 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_10, x_6); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_7); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_16 = lean::cnstr_get(x_6, 1); -x_17 = lean::cnstr_get(x_6, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_6); -x_18 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_7); -return x_22; -} -} -else -{ -uint8 x_23; -x_23 = !lean::is_exclusive(x_6); -if (x_23 == 0) -{ -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; -x_24 = lean::cnstr_get(x_6, 2); -x_25 = lean::cnstr_get(x_6, 0); -lean::dec(x_25); -x_26 = lean::cnstr_get(x_8, 0); -lean::inc(x_26); -lean::dec(x_8); -x_27 = lean::box(0); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_noKind; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_31); -lean::cnstr_set(x_6, 0, x_30); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_6); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_7); -return x_33; -} -else -{ -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; -x_34 = lean::cnstr_get(x_6, 1); -x_35 = lean::cnstr_get(x_6, 2); -lean::inc(x_35); -lean::inc(x_34); -lean::dec(x_6); -x_36 = lean::cnstr_get(x_8, 0); -lean::inc(x_36); -lean::dec(x_8); -x_37 = lean::box(0); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set(x_38, 1, x_37); -x_39 = l_Lean_Parser_noKind; -x_40 = l_Lean_Parser_Syntax_mkNode(x_39, x_38); -x_41 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_42 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_34); -lean::cnstr_set(x_42, 2, x_41); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_42); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_7); -return x_44; -} -} -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_6); -if (x_45 == 0) -{ -obj* x_46; -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_6); -lean::cnstr_set(x_46, 1, x_7); -return x_46; -} -else -{ -obj* x_47; uint8 x_48; obj* x_49; obj* x_50; -x_47 = lean::cnstr_get(x_6, 0); -x_48 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_47); -lean::dec(x_6); -x_49 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set_scalar(x_49, sizeof(void*)*1, x_48); -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_7); -return x_50; -} -} -} -} -} -obj* _init_l_Lean_Parser_Module_header_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; uint8 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; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_prelude_Parser), 3, 0); -x_2 = 0; -x_3 = lean::box(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_Module_header_Parser_Lean_Parser_HasView___spec__1___boxed), 5, 2); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_import_Parser), 3, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__1), 4, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_BasicParserM_Monad; -x_11 = l_Lean_Parser_BasicParserM_MonadExcept; -x_12 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_13 = l_Lean_Parser_BasicParserM_Alternative; -x_14 = l_Lean_Parser_Module_header; -x_15 = l_Lean_Parser_Module_header_HasView; -x_16 = l_Lean_Parser_Combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); -lean::dec(x_9); -return x_16; -} -} -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_Module_header_Parser_Lean_Parser_HasView___spec__1___boxed(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_2); -lean::dec(x_2); -x_7 = l_Lean_Parser_Combinators_optional___at_Lean_Parser_Module_header_Parser_Lean_Parser_HasView___spec__1(x_1, x_6, x_3, x_4, x_5); -return x_7; -} -} -obj* _init_l_Lean_Parser_Module_header_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_Module_import_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_6); -lean::dec(x_6); -lean::dec(x_2); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Module_header_Parser___closed__1() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_prelude_Parser), 3, 0); -x_2 = 0; -x_3 = lean::box(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_Module_header_Parser_Lean_Parser_HasView___spec__1___boxed), 5, 2); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_import_Parser), 3, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView___spec__1), 4, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Module_header_Parser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_Module_header; -x_5 = l_Lean_Parser_Module_header_Parser___closed__1; -x_6 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(x_4, x_5, x_1, x_2, x_3); -return x_6; -} -} -obj* _init_l_Lean_Parser_Module_eoi() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Module"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("eoi"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg(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_3) == 0) -{ -obj* x_9; uint8 x_10; obj* x_11; obj* x_12; -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_2); -lean::cnstr_set(x_9, 3, x_4); -x_10 = 0; -x_11 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set_scalar(x_11, sizeof(void*)*1, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_8); -return x_12; -} -else -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -lean::dec(x_7); -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_4); -x_15 = 0; -x_16 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set_scalar(x_16, sizeof(void*)*1, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -return x_17; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg___boxed), 8, 0); -return x_2; -} -} -obj* _init_l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -lean::inc(x_1, 2); -x_2 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_2, 0, x_1); -lean::closure_set(x_2, 1, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_3, 0, x_2); -lean::closure_set(x_3, 1, x_1); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; uint8 x_7; -x_5 = l_String_OldIterator_remaining___main(x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_5, x_6); -lean::dec(x_5); -if (x_7 == 0) -{ -uint32 x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint8 x_16; -x_8 = l_String_OldIterator_curr___main(x_3); -x_9 = l_Char_quoteCore(x_8); -x_10 = l_Char_HasRepr___closed__1; -x_11 = lean::string_append(x_10, x_9); -lean::dec(x_9); -x_12 = lean::string_append(x_11, x_10); -x_13 = lean::box(0); -x_14 = l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1; -x_15 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg(x_12, x_14, x_13, x_13, x_1, x_2, x_3, x_4); -lean::dec(x_1); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -x_18 = l_Lean_Parser_finishCommentBlock___closed__2; -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_17); -lean::cnstr_set(x_15, 0, x_19); -return x_15; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_20 = lean::cnstr_get(x_15, 0); -x_21 = lean::cnstr_get(x_15, 1); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_15); -x_22 = l_Lean_Parser_finishCommentBlock___closed__2; -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_20); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_21); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = lean::box(0); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_3); -lean::cnstr_set(x_28, 2, x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_4); -return x_29; -} -} -} -obj* l_Lean_Parser_Module_eoi_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1(x_1, x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; uint8 x_8; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; uint8 x_10; -x_9 = lean::cnstr_get(x_5, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; -x_11 = lean::cnstr_get(x_6, 1); -x_12 = lean::cnstr_get(x_6, 2); -x_13 = lean::cnstr_get(x_6, 0); -lean::dec(x_13); -x_14 = !lean::is_exclusive(x_7); -if (x_14 == 0) -{ -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; -x_15 = lean::cnstr_get(x_7, 0); -lean::dec(x_15); -lean::inc(x_11); -x_16 = l_String_OldIterator_toEnd___main(x_11); -lean::inc(x_16, 2); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::cnstr_get(x_16, 1); -lean::inc(x_18); -lean::dec(x_16); -lean::inc(x_17); -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -lean::cnstr_set(x_19, 2, x_17); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -x_21 = l_String_splitAux___main___closed__1; -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::box(0); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_Module_eoi; -x_27 = l_Lean_Parser_Syntax_mkNode(x_26, x_25); -lean::cnstr_set(x_7, 0, x_27); -x_28 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -lean::cnstr_set(x_6, 2, x_28); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_6); -lean::cnstr_set(x_5, 0, x_29); -return x_5; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_30 = lean::cnstr_get(x_7, 1); -lean::inc(x_30); -lean::dec(x_7); -lean::inc(x_11); -x_31 = l_String_OldIterator_toEnd___main(x_11); -lean::inc(x_31, 2); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::cnstr_get(x_31, 1); -lean::inc(x_33); -lean::dec(x_31); -lean::inc(x_32); -x_34 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_33); -lean::cnstr_set(x_34, 2, x_32); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -x_36 = l_String_splitAux___main___closed__1; -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -x_39 = lean::box(0); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_Lean_Parser_Module_eoi; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_30); -x_44 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -lean::cnstr_set(x_6, 2, x_44); -lean::cnstr_set(x_6, 0, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_6); -lean::cnstr_set(x_5, 0, x_45); -return x_5; -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_46 = lean::cnstr_get(x_6, 1); -x_47 = lean::cnstr_get(x_6, 2); -lean::inc(x_47); -lean::inc(x_46); -lean::dec(x_6); -x_48 = lean::cnstr_get(x_7, 1); -lean::inc(x_48); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - x_49 = x_7; -} else { - lean::dec_ref(x_7); - x_49 = lean::box(0); -} -lean::inc(x_46); -x_50 = l_String_OldIterator_toEnd___main(x_46); -lean::inc(x_50, 2); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_50); -x_52 = lean::cnstr_get(x_50, 1); -lean::inc(x_52); -lean::dec(x_50); -lean::inc(x_51); -x_53 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_53, 0, x_51); -lean::cnstr_set(x_53, 1, x_52); -lean::cnstr_set(x_53, 2, x_51); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = l_String_splitAux___main___closed__1; -x_56 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_56, 0, x_54); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_58 = lean::box(0); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_57); -lean::cnstr_set(x_59, 1, x_58); -x_60 = l_Lean_Parser_Module_eoi; -x_61 = l_Lean_Parser_Syntax_mkNode(x_60, x_59); -if (lean::is_scalar(x_49)) { - x_62 = lean::alloc_cnstr(0, 2, 0); -} else { - x_62 = x_49; -} -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_48); -x_63 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_64 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set(x_64, 1, x_46); -lean::cnstr_set(x_64, 2, x_63); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_47, x_64); -lean::cnstr_set(x_5, 0, x_65); -return x_5; -} -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_66 = lean::cnstr_get(x_5, 1); -lean::inc(x_66); -lean::dec(x_5); -x_67 = lean::cnstr_get(x_6, 1); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_6, 2); -lean::inc(x_68); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_69 = x_6; -} else { - lean::dec_ref(x_6); - x_69 = lean::box(0); -} -x_70 = lean::cnstr_get(x_7, 1); -lean::inc(x_70); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - x_71 = x_7; -} else { - lean::dec_ref(x_7); - x_71 = lean::box(0); -} -lean::inc(x_67); -x_72 = l_String_OldIterator_toEnd___main(x_67); -lean::inc(x_72, 2); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::cnstr_get(x_72, 1); -lean::inc(x_74); -lean::dec(x_72); -lean::inc(x_73); -x_75 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_75, 0, x_73); -lean::cnstr_set(x_75, 1, x_74); -lean::cnstr_set(x_75, 2, x_73); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -x_77 = l_String_splitAux___main___closed__1; -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_76); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -x_80 = lean::box(0); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_79); -lean::cnstr_set(x_81, 1, x_80); -x_82 = l_Lean_Parser_Module_eoi; -x_83 = l_Lean_Parser_Syntax_mkNode(x_82, x_81); -if (lean::is_scalar(x_71)) { - x_84 = lean::alloc_cnstr(0, 2, 0); -} else { - x_84 = x_71; -} -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_70); -x_85 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -if (lean::is_scalar(x_69)) { - x_86 = lean::alloc_cnstr(0, 3, 0); -} else { - x_86 = x_69; -} -lean::cnstr_set(x_86, 0, x_84); -lean::cnstr_set(x_86, 1, x_67); -lean::cnstr_set(x_86, 2, x_85); -x_87 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_68, x_86); -x_88 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_66); -return x_88; -} -} -else -{ -uint8 x_89; -x_89 = !lean::is_exclusive(x_5); -if (x_89 == 0) -{ -obj* x_90; uint8 x_91; -x_90 = lean::cnstr_get(x_5, 0); -lean::dec(x_90); -x_91 = !lean::is_exclusive(x_6); -if (x_91 == 0) -{ -return x_5; -} -else -{ -obj* x_92; uint8 x_93; obj* x_94; -x_92 = lean::cnstr_get(x_6, 0); -x_93 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_92); -lean::dec(x_6); -x_94 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_93); -lean::cnstr_set(x_5, 0, x_94); -return x_5; -} -} -else -{ -obj* x_95; obj* x_96; uint8 x_97; obj* x_98; obj* x_99; obj* x_100; -x_95 = lean::cnstr_get(x_5, 1); -lean::inc(x_95); -lean::dec(x_5); -x_96 = lean::cnstr_get(x_6, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_98 = x_6; -} else { - lean::dec_ref(x_6); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(1, 1, 1); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_96); -lean::cnstr_set_scalar(x_99, sizeof(void*)*1, x_97); -x_100 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_95); -return x_100; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg___boxed(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_9; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_Module_eoi_Parser___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_Module_eoi_Parser(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__1(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_6, 0); -x_8 = lean::cnstr_get(x_7, 0); -x_9 = l_Lean_Parser_messageOfParsecMessage___rarg(x_8, x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_4); -lean::cnstr_set(x_14, 2, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_5); -return x_15; -} -} -obj* l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = l_String_OldIterator_hasNext___main(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; uint8 x_10; -x_6 = lean::box(0); -x_7 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); -lean::dec(x_1); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = l_Lean_Parser_finishCommentBlock___closed__2; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_11); -lean::cnstr_set(x_9, 0, x_13); -return x_9; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_9); -x_16 = l_Lean_Parser_finishCommentBlock___closed__2; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_15); -return x_18; -} -} -else -{ -uint32 x_19; uint8 x_20; -x_19 = l_String_OldIterator_curr___main(x_3); -x_20 = l_True_Decidable; -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; uint8 x_28; -x_21 = l_Char_quoteCore(x_19); -x_22 = l_Char_HasRepr___closed__1; -x_23 = lean::string_append(x_22, x_21); -lean::dec(x_21); -x_24 = lean::string_append(x_23, x_22); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; -x_27 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg(x_24, x_26, x_25, x_25, x_1, x_2, x_3, x_4); -lean::dec(x_1); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::cnstr_get(x_27, 0); -x_30 = l_Lean_Parser_finishCommentBlock___closed__2; -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_29); -lean::cnstr_set(x_27, 0, x_31); -return x_27; -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = lean::cnstr_get(x_27, 0); -x_33 = lean::cnstr_get(x_27, 1); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_27); -x_34 = l_Lean_Parser_finishCommentBlock___closed__2; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_32); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_33); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = l_String_OldIterator_next___main(x_3); -x_38 = lean::box(0); -x_39 = lean::box_uint32(x_19); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_1); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_37); -lean::cnstr_set(x_41, 2, x_38); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_4); -return x_42; -} -} -} -} -obj* l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__3(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_6, 0); -x_8 = lean::cnstr_get(x_7, 0); -x_9 = l_Lean_Parser_messageOfParsecMessage___rarg(x_8, x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_4); -lean::cnstr_set(x_14, 2, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_5); -return x_15; -} -} -obj* _init_l___private_init_lean_parser_module_1__commandWrecAux___main___closed__1() { -_start: -{ -obj* x_1; obj* x_2; uint8 x_3; obj* x_4; obj* x_5; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = 1; -x_4 = lean::box(x_3); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_2); -return x_5; -} -} -obj* _init_l___private_init_lean_parser_module_1__commandWrecAux___main___closed__2() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = 1; -x_3 = lean::box(x_2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -return x_4; -} -} -obj* _init_l___private_init_lean_parser_module_1__commandWrecAux___main___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_Parser___boxed), 1, 0); -return x_1; -} -} -obj* l___private_init_lean_parser_module_1__commandWrecAux___main(uint8 x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; uint8 x_8; -x_7 = lean::mk_nat_obj(0u); -x_8 = lean::nat_dec_eq(x_2, x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_92; obj* x_93; uint8 x_254; uint8 x_589; -x_9 = lean::mk_nat_obj(1u); -x_10 = lean::nat_sub(x_2, x_9); -x_11 = l_String_OldIterator_remaining___main(x_5); -x_589 = lean::nat_dec_eq(x_11, x_7); -lean::dec(x_11); -if (x_589 == 0) -{ -if (x_1 == 0) -{ -uint8 x_590; -x_590 = 1; -x_254 = x_590; -goto block_588; -} -else -{ -uint8 x_591; -x_591 = 0; -x_254 = x_591; -goto block_588; -} -} -else -{ -obj* x_592; obj* x_593; -lean::dec(x_10); -x_592 = l_Lean_Parser_Module_eoi_Parser(x_3, x_4, x_5, x_6); -lean::dec(x_4); -x_593 = lean::cnstr_get(x_592, 0); -lean::inc(x_593); -if (lean::obj_tag(x_593) == 0) -{ -obj* x_594; uint8 x_595; -x_594 = lean::cnstr_get(x_593, 0); -lean::inc(x_594); -x_595 = !lean::is_exclusive(x_592); -if (x_595 == 0) -{ -obj* x_596; obj* x_597; uint8 x_598; -x_596 = lean::cnstr_get(x_592, 1); -x_597 = lean::cnstr_get(x_592, 0); -lean::dec(x_597); -x_598 = !lean::is_exclusive(x_593); -if (x_598 == 0) -{ -obj* x_599; obj* x_600; uint8 x_601; -x_599 = lean::cnstr_get(x_593, 2); -x_600 = lean::cnstr_get(x_593, 0); -lean::dec(x_600); -x_601 = !lean::is_exclusive(x_594); -if (x_601 == 0) -{ -obj* x_602; obj* x_603; uint8 x_604; obj* x_605; obj* x_606; obj* x_607; obj* x_608; obj* x_609; obj* x_610; -x_602 = lean::cnstr_get(x_594, 0); -x_603 = lean::cnstr_get(x_594, 1); -x_604 = 0; -x_605 = lean::box(x_604); -lean::cnstr_set(x_594, 1, x_602); -lean::cnstr_set(x_594, 0, x_605); -lean::cnstr_set(x_592, 1, x_603); -lean::cnstr_set(x_592, 0, x_594); -x_606 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_593, 2, x_606); -lean::cnstr_set(x_593, 0, x_592); -x_607 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_599, x_593); -x_608 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_609 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_608, x_607); -x_610 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_610, 0, x_609); -lean::cnstr_set(x_610, 1, x_596); -return x_610; -} -else -{ -obj* x_611; obj* x_612; uint8 x_613; obj* x_614; obj* x_615; obj* x_616; obj* x_617; obj* x_618; obj* x_619; obj* x_620; -x_611 = lean::cnstr_get(x_594, 0); -x_612 = lean::cnstr_get(x_594, 1); -lean::inc(x_612); -lean::inc(x_611); -lean::dec(x_594); -x_613 = 0; -x_614 = lean::box(x_613); -x_615 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_615, 0, x_614); -lean::cnstr_set(x_615, 1, x_611); -lean::cnstr_set(x_592, 1, x_612); -lean::cnstr_set(x_592, 0, x_615); -x_616 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_593, 2, x_616); -lean::cnstr_set(x_593, 0, x_592); -x_617 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_599, x_593); -x_618 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_619 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_618, x_617); -x_620 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_620, 0, x_619); -lean::cnstr_set(x_620, 1, x_596); -return x_620; -} -} -else -{ -obj* x_621; obj* x_622; obj* x_623; obj* x_624; obj* x_625; uint8 x_626; obj* x_627; obj* x_628; obj* x_629; obj* x_630; obj* x_631; obj* x_632; obj* x_633; obj* x_634; -x_621 = lean::cnstr_get(x_593, 1); -x_622 = lean::cnstr_get(x_593, 2); -lean::inc(x_622); -lean::inc(x_621); -lean::dec(x_593); -x_623 = lean::cnstr_get(x_594, 0); -lean::inc(x_623); -x_624 = lean::cnstr_get(x_594, 1); -lean::inc(x_624); -if (lean::is_exclusive(x_594)) { - lean::cnstr_release(x_594, 0); - lean::cnstr_release(x_594, 1); - x_625 = x_594; -} else { - lean::dec_ref(x_594); - x_625 = lean::box(0); -} -x_626 = 0; -x_627 = lean::box(x_626); -if (lean::is_scalar(x_625)) { - x_628 = lean::alloc_cnstr(0, 2, 0); -} else { - x_628 = x_625; -} -lean::cnstr_set(x_628, 0, x_627); -lean::cnstr_set(x_628, 1, x_623); -lean::cnstr_set(x_592, 1, x_624); -lean::cnstr_set(x_592, 0, x_628); -x_629 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_630 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_630, 0, x_592); -lean::cnstr_set(x_630, 1, x_621); -lean::cnstr_set(x_630, 2, x_629); -x_631 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_622, x_630); -x_632 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_633 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_632, x_631); -x_634 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_634, 0, x_633); -lean::cnstr_set(x_634, 1, x_596); -return x_634; -} -} -else -{ -obj* x_635; obj* x_636; obj* x_637; obj* x_638; obj* x_639; obj* x_640; obj* x_641; uint8 x_642; obj* x_643; obj* x_644; obj* x_645; obj* x_646; obj* x_647; obj* x_648; obj* x_649; obj* x_650; obj* x_651; -x_635 = lean::cnstr_get(x_592, 1); -lean::inc(x_635); -lean::dec(x_592); -x_636 = lean::cnstr_get(x_593, 1); -lean::inc(x_636); -x_637 = lean::cnstr_get(x_593, 2); -lean::inc(x_637); -if (lean::is_exclusive(x_593)) { - lean::cnstr_release(x_593, 0); - lean::cnstr_release(x_593, 1); - lean::cnstr_release(x_593, 2); - x_638 = x_593; -} else { - lean::dec_ref(x_593); - x_638 = lean::box(0); -} -x_639 = lean::cnstr_get(x_594, 0); -lean::inc(x_639); -x_640 = lean::cnstr_get(x_594, 1); -lean::inc(x_640); -if (lean::is_exclusive(x_594)) { - lean::cnstr_release(x_594, 0); - lean::cnstr_release(x_594, 1); - x_641 = x_594; -} else { - lean::dec_ref(x_594); - x_641 = lean::box(0); -} -x_642 = 0; -x_643 = lean::box(x_642); -if (lean::is_scalar(x_641)) { - x_644 = lean::alloc_cnstr(0, 2, 0); -} else { - x_644 = x_641; -} -lean::cnstr_set(x_644, 0, x_643); -lean::cnstr_set(x_644, 1, x_639); -x_645 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_645, 0, x_644); -lean::cnstr_set(x_645, 1, x_640); -x_646 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_638)) { - x_647 = lean::alloc_cnstr(0, 3, 0); -} else { - x_647 = x_638; -} -lean::cnstr_set(x_647, 0, x_645); -lean::cnstr_set(x_647, 1, x_636); -lean::cnstr_set(x_647, 2, x_646); -x_648 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_637, x_647); -x_649 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_650 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_649, x_648); -x_651 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_651, 0, x_650); -lean::cnstr_set(x_651, 1, x_635); -return x_651; -} -} -else -{ -uint8 x_652; -x_652 = !lean::is_exclusive(x_592); -if (x_652 == 0) -{ -obj* x_653; uint8 x_654; -x_653 = lean::cnstr_get(x_592, 0); -lean::dec(x_653); -x_654 = !lean::is_exclusive(x_593); -if (x_654 == 0) -{ -obj* x_655; obj* x_656; -x_655 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_656 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_655, x_593); -lean::cnstr_set(x_592, 0, x_656); -return x_592; -} -else -{ -obj* x_657; uint8 x_658; obj* x_659; obj* x_660; obj* x_661; -x_657 = lean::cnstr_get(x_593, 0); -x_658 = lean::cnstr_get_scalar(x_593, sizeof(void*)*1); -lean::inc(x_657); -lean::dec(x_593); -x_659 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_659, 0, x_657); -lean::cnstr_set_scalar(x_659, sizeof(void*)*1, x_658); -x_660 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_661 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_660, x_659); -lean::cnstr_set(x_592, 0, x_661); -return x_592; -} -} -else -{ -obj* x_662; obj* x_663; uint8 x_664; obj* x_665; obj* x_666; obj* x_667; obj* x_668; obj* x_669; -x_662 = lean::cnstr_get(x_592, 1); -lean::inc(x_662); -lean::dec(x_592); -x_663 = lean::cnstr_get(x_593, 0); -lean::inc(x_663); -x_664 = lean::cnstr_get_scalar(x_593, sizeof(void*)*1); -if (lean::is_exclusive(x_593)) { - lean::cnstr_release(x_593, 0); - x_665 = x_593; -} else { - lean::dec_ref(x_593); - x_665 = lean::box(0); -} -if (lean::is_scalar(x_665)) { - x_666 = lean::alloc_cnstr(1, 1, 1); -} else { - x_666 = x_665; -} -lean::cnstr_set(x_666, 0, x_663); -lean::cnstr_set_scalar(x_666, sizeof(void*)*1, x_664); -x_667 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_668 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_667, x_666); -x_669 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_669, 0, x_668); -lean::cnstr_set(x_669, 1, x_662); -return x_669; -} -} -} -block_91: -{ -if (lean::obj_tag(x_12) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; uint8 x_21; obj* x_22; uint8 x_23; -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_12, 2); -lean::inc(x_18); -lean::dec(x_12); -x_19 = lean::cnstr_get(x_14, 1); -lean::inc(x_19); -lean::dec(x_14); -x_20 = lean::cnstr_get(x_15, 0); -lean::inc(x_20); -lean::dec(x_15); -x_21 = lean::unbox(x_20); -lean::dec(x_20); -x_22 = l___private_init_lean_parser_module_1__commandWrecAux___main(x_21, x_10, x_19, x_4, x_17, x_13); -lean::dec(x_10); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_24 = lean::cnstr_get(x_22, 0); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_24); -x_26 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_25); -lean::cnstr_set(x_22, 0, x_27); -return x_22; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_28 = lean::cnstr_get(x_22, 0); -x_29 = lean::cnstr_get(x_22, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_22); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_28); -x_31 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_30); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_29); -return x_33; -} -} -else -{ -uint8 x_34; -lean::dec(x_10); -lean::dec(x_4); -x_34 = !lean::is_exclusive(x_12); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; uint8 x_37; -x_35 = lean::cnstr_get(x_12, 2); -x_36 = lean::cnstr_get(x_12, 0); -lean::dec(x_36); -x_37 = !lean::is_exclusive(x_14); -if (x_37 == 0) -{ -obj* x_38; uint8 x_39; -x_38 = lean::cnstr_get(x_14, 0); -lean::dec(x_38); -x_39 = !lean::is_exclusive(x_15); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_40 = lean::cnstr_get(x_15, 1); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_16, 0); -lean::inc(x_41); -lean::dec(x_16); -lean::cnstr_set(x_15, 1, x_41); -x_42 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_12, 2, x_42); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_12); -x_44 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_43); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_13); -return x_46; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_47 = lean::cnstr_get(x_15, 0); -lean::inc(x_47); -lean::dec(x_15); -x_48 = lean::cnstr_get(x_16, 0); -lean::inc(x_48); -lean::dec(x_16); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_48); -lean::cnstr_set(x_14, 0, x_49); -x_50 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_12, 2, x_50); -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_12); -x_52 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_51); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_13); -return x_54; -} -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_55 = lean::cnstr_get(x_14, 1); -lean::inc(x_55); -lean::dec(x_14); -x_56 = lean::cnstr_get(x_15, 0); -lean::inc(x_56); -if (lean::is_exclusive(x_15)) { - lean::cnstr_release(x_15, 0); - lean::cnstr_release(x_15, 1); - x_57 = x_15; -} else { - lean::dec_ref(x_15); - x_57 = lean::box(0); -} -x_58 = lean::cnstr_get(x_16, 0); -lean::inc(x_58); -lean::dec(x_16); -if (lean::is_scalar(x_57)) { - x_59 = lean::alloc_cnstr(0, 2, 0); -} else { - x_59 = x_57; -} -lean::cnstr_set(x_59, 0, x_56); -lean::cnstr_set(x_59, 1, x_58); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_55); -x_61 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_12, 2, x_61); -lean::cnstr_set(x_12, 0, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_12); -x_63 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_62); -x_65 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_13); -return x_65; -} -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_66 = lean::cnstr_get(x_12, 1); -x_67 = lean::cnstr_get(x_12, 2); -lean::inc(x_67); -lean::inc(x_66); -lean::dec(x_12); -x_68 = lean::cnstr_get(x_14, 1); -lean::inc(x_68); -if (lean::is_exclusive(x_14)) { - lean::cnstr_release(x_14, 0); - lean::cnstr_release(x_14, 1); - x_69 = x_14; -} else { - lean::dec_ref(x_14); - x_69 = lean::box(0); -} -x_70 = lean::cnstr_get(x_15, 0); -lean::inc(x_70); -if (lean::is_exclusive(x_15)) { - lean::cnstr_release(x_15, 0); - lean::cnstr_release(x_15, 1); - x_71 = x_15; -} else { - lean::dec_ref(x_15); - x_71 = lean::box(0); -} -x_72 = lean::cnstr_get(x_16, 0); -lean::inc(x_72); -lean::dec(x_16); -if (lean::is_scalar(x_71)) { - x_73 = lean::alloc_cnstr(0, 2, 0); -} else { - x_73 = x_71; -} -lean::cnstr_set(x_73, 0, x_70); -lean::cnstr_set(x_73, 1, x_72); -if (lean::is_scalar(x_69)) { - x_74 = lean::alloc_cnstr(0, 2, 0); -} else { - x_74 = x_69; -} -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_68); -x_75 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_76 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_76, 0, x_74); -lean::cnstr_set(x_76, 1, x_66); -lean::cnstr_set(x_76, 2, x_75); -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_76); -x_78 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_78, x_77); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_13); -return x_80; -} -} -} -else -{ -uint8 x_81; -lean::dec(x_10); -lean::dec(x_4); -x_81 = !lean::is_exclusive(x_12); -if (x_81 == 0) -{ -obj* x_82; obj* x_83; obj* x_84; -x_82 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_82, x_12); -x_84 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_13); -return x_84; -} -else -{ -obj* x_85; uint8 x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_85 = lean::cnstr_get(x_12, 0); -x_86 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -lean::inc(x_85); -lean::dec(x_12); -x_87 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_87, 0, x_85); -lean::cnstr_set_scalar(x_87, sizeof(void*)*1, x_86); -x_88 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_87); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_13); -return x_90; -} -} -} -block_253: -{ -if (lean::obj_tag(x_92) == 0) -{ -lean::dec(x_3); -x_12 = x_92; -x_13 = x_93; -goto block_91; -} -else -{ -obj* x_94; uint8 x_95; obj* x_96; obj* x_97; obj* x_98; -x_94 = lean::cnstr_get(x_92, 0); -lean::inc(x_94); -x_95 = lean::cnstr_get_scalar(x_92, sizeof(void*)*1); -lean::dec(x_92); -x_96 = lean::cnstr_get(x_94, 0); -lean::inc(x_96); -lean::inc(x_94); -x_97 = l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__1(x_94, x_3, x_4, x_96, x_93); -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -if (lean::obj_tag(x_98) == 0) -{ -obj* x_99; obj* x_100; -x_99 = lean::cnstr_get(x_98, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_94, 3); -lean::inc(x_100); -lean::dec(x_94); -if (lean::obj_tag(x_100) == 0) -{ -obj* x_101; uint8 x_102; -x_101 = lean::cnstr_get(x_97, 1); -lean::inc(x_101); -lean::dec(x_97); -x_102 = !lean::is_exclusive(x_98); -if (x_102 == 0) -{ -obj* x_103; obj* x_104; uint8 x_105; -x_103 = lean::cnstr_get(x_98, 2); -x_104 = lean::cnstr_get(x_98, 0); -lean::dec(x_104); -x_105 = !lean::is_exclusive(x_99); -if (x_105 == 0) -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; -x_106 = lean::cnstr_get(x_99, 0); -lean::dec(x_106); -x_107 = l___private_init_lean_parser_module_1__commandWrecAux___main___closed__1; -lean::cnstr_set(x_99, 0, x_107); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_98, 2, x_108); -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_98); -if (lean::obj_tag(x_109) == 0) -{ -x_12 = x_109; -x_13 = x_101; -goto block_91; -} -else -{ -if (x_95 == 0) -{ -uint8 x_110; -x_110 = !lean::is_exclusive(x_109); -if (x_110 == 0) -{ -x_12 = x_109; -x_13 = x_101; -goto block_91; -} -else -{ -obj* x_111; uint8 x_112; obj* x_113; -x_111 = lean::cnstr_get(x_109, 0); -x_112 = lean::cnstr_get_scalar(x_109, sizeof(void*)*1); -lean::inc(x_111); -lean::dec(x_109); -x_113 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_112); -x_12 = x_113; -x_13 = x_101; -goto block_91; -} -} -else -{ -uint8 x_114; -x_114 = !lean::is_exclusive(x_109); -if (x_114 == 0) -{ -uint8 x_115; -x_115 = 1; -lean::cnstr_set_scalar(x_109, sizeof(void*)*1, x_115); -x_12 = x_109; -x_13 = x_101; -goto block_91; -} -else -{ -obj* x_116; uint8 x_117; obj* x_118; -x_116 = lean::cnstr_get(x_109, 0); -lean::inc(x_116); -lean::dec(x_109); -x_117 = 1; -x_118 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_118, 0, x_116); -lean::cnstr_set_scalar(x_118, sizeof(void*)*1, x_117); -x_12 = x_118; -x_13 = x_101; -goto block_91; -} -} -} -} -else -{ -obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; -x_119 = lean::cnstr_get(x_99, 1); -lean::inc(x_119); -lean::dec(x_99); -x_120 = l___private_init_lean_parser_module_1__commandWrecAux___main___closed__1; -x_121 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_121, 0, x_120); -lean::cnstr_set(x_121, 1, x_119); -x_122 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_98, 2, x_122); -lean::cnstr_set(x_98, 0, x_121); -x_123 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_98); -if (lean::obj_tag(x_123) == 0) -{ -x_12 = x_123; -x_13 = x_101; -goto block_91; -} -else -{ -if (x_95 == 0) -{ -obj* x_124; uint8 x_125; obj* x_126; obj* x_127; -x_124 = lean::cnstr_get(x_123, 0); -lean::inc(x_124); -x_125 = lean::cnstr_get_scalar(x_123, sizeof(void*)*1); -if (lean::is_exclusive(x_123)) { - lean::cnstr_release(x_123, 0); - x_126 = x_123; -} else { - lean::dec_ref(x_123); - x_126 = lean::box(0); -} -if (lean::is_scalar(x_126)) { - x_127 = lean::alloc_cnstr(1, 1, 1); -} else { - x_127 = x_126; -} -lean::cnstr_set(x_127, 0, x_124); -lean::cnstr_set_scalar(x_127, sizeof(void*)*1, x_125); -x_12 = x_127; -x_13 = x_101; -goto block_91; -} -else -{ -obj* x_128; obj* x_129; uint8 x_130; obj* x_131; -x_128 = lean::cnstr_get(x_123, 0); -lean::inc(x_128); -if (lean::is_exclusive(x_123)) { - lean::cnstr_release(x_123, 0); - x_129 = x_123; -} else { - lean::dec_ref(x_123); - x_129 = lean::box(0); -} -x_130 = 1; -if (lean::is_scalar(x_129)) { - x_131 = lean::alloc_cnstr(1, 1, 1); -} else { - x_131 = x_129; -} -lean::cnstr_set(x_131, 0, x_128); -lean::cnstr_set_scalar(x_131, sizeof(void*)*1, x_130); -x_12 = x_131; -x_13 = x_101; -goto block_91; -} -} -} -} -else -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; -x_132 = lean::cnstr_get(x_98, 1); -x_133 = lean::cnstr_get(x_98, 2); -lean::inc(x_133); -lean::inc(x_132); -lean::dec(x_98); -x_134 = lean::cnstr_get(x_99, 1); -lean::inc(x_134); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - lean::cnstr_release(x_99, 1); - x_135 = x_99; -} else { - lean::dec_ref(x_99); - x_135 = lean::box(0); -} -x_136 = l___private_init_lean_parser_module_1__commandWrecAux___main___closed__1; -if (lean::is_scalar(x_135)) { - x_137 = lean::alloc_cnstr(0, 2, 0); -} else { - x_137 = x_135; -} -lean::cnstr_set(x_137, 0, x_136); -lean::cnstr_set(x_137, 1, x_134); -x_138 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_139 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_139, 0, x_137); -lean::cnstr_set(x_139, 1, x_132); -lean::cnstr_set(x_139, 2, x_138); -x_140 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_133, x_139); -if (lean::obj_tag(x_140) == 0) -{ -x_12 = x_140; -x_13 = x_101; -goto block_91; -} -else -{ -if (x_95 == 0) -{ -obj* x_141; uint8 x_142; obj* x_143; obj* x_144; -x_141 = lean::cnstr_get(x_140, 0); -lean::inc(x_141); -x_142 = lean::cnstr_get_scalar(x_140, sizeof(void*)*1); -if (lean::is_exclusive(x_140)) { - lean::cnstr_release(x_140, 0); - x_143 = x_140; -} else { - lean::dec_ref(x_140); - x_143 = lean::box(0); -} -if (lean::is_scalar(x_143)) { - x_144 = lean::alloc_cnstr(1, 1, 1); -} else { - x_144 = x_143; -} -lean::cnstr_set(x_144, 0, x_141); -lean::cnstr_set_scalar(x_144, sizeof(void*)*1, x_142); -x_12 = x_144; -x_13 = x_101; -goto block_91; -} -else -{ -obj* x_145; obj* x_146; uint8 x_147; obj* x_148; -x_145 = lean::cnstr_get(x_140, 0); -lean::inc(x_145); -if (lean::is_exclusive(x_140)) { - lean::cnstr_release(x_140, 0); - x_146 = x_140; -} else { - lean::dec_ref(x_140); - x_146 = lean::box(0); -} -x_147 = 1; -if (lean::is_scalar(x_146)) { - x_148 = lean::alloc_cnstr(1, 1, 1); -} else { - x_148 = x_146; -} -lean::cnstr_set(x_148, 0, x_145); -lean::cnstr_set_scalar(x_148, sizeof(void*)*1, x_147); -x_12 = x_148; -x_13 = x_101; -goto block_91; -} -} -} -} -else -{ -uint8 x_149; -x_149 = !lean::is_exclusive(x_97); -if (x_149 == 0) -{ -obj* x_150; obj* x_151; uint8 x_152; -x_150 = lean::cnstr_get(x_97, 1); -x_151 = lean::cnstr_get(x_97, 0); -lean::dec(x_151); -x_152 = !lean::is_exclusive(x_98); -if (x_152 == 0) -{ -obj* x_153; obj* x_154; uint8 x_155; -x_153 = lean::cnstr_get(x_98, 2); -x_154 = lean::cnstr_get(x_98, 0); -lean::dec(x_154); -x_155 = !lean::is_exclusive(x_99); -if (x_155 == 0) -{ -obj* x_156; obj* x_157; uint8 x_158; -x_156 = lean::cnstr_get(x_99, 1); -x_157 = lean::cnstr_get(x_99, 0); -lean::dec(x_157); -x_158 = !lean::is_exclusive(x_100); -if (x_158 == 0) -{ -uint8 x_159; obj* x_160; obj* x_161; obj* x_162; -x_159 = 1; -x_160 = lean::box(x_159); -lean::cnstr_set(x_99, 1, x_100); -lean::cnstr_set(x_99, 0, x_160); -lean::cnstr_set(x_97, 1, x_156); -lean::cnstr_set(x_97, 0, x_99); -x_161 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_98, 2, x_161); -lean::cnstr_set(x_98, 0, x_97); -x_162 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_153, x_98); -if (lean::obj_tag(x_162) == 0) -{ -x_12 = x_162; -x_13 = x_150; -goto block_91; -} -else -{ -if (x_95 == 0) -{ -uint8 x_163; -x_163 = !lean::is_exclusive(x_162); -if (x_163 == 0) -{ -x_12 = x_162; -x_13 = x_150; -goto block_91; -} -else -{ -obj* x_164; uint8 x_165; obj* x_166; -x_164 = lean::cnstr_get(x_162, 0); -x_165 = lean::cnstr_get_scalar(x_162, sizeof(void*)*1); -lean::inc(x_164); -lean::dec(x_162); -x_166 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_166, 0, x_164); -lean::cnstr_set_scalar(x_166, sizeof(void*)*1, x_165); -x_12 = x_166; -x_13 = x_150; -goto block_91; -} -} -else -{ -uint8 x_167; -x_167 = !lean::is_exclusive(x_162); -if (x_167 == 0) -{ -lean::cnstr_set_scalar(x_162, sizeof(void*)*1, x_159); -x_12 = x_162; -x_13 = x_150; -goto block_91; -} -else -{ -obj* x_168; obj* x_169; -x_168 = lean::cnstr_get(x_162, 0); -lean::inc(x_168); -lean::dec(x_162); -x_169 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_169, 0, x_168); -lean::cnstr_set_scalar(x_169, sizeof(void*)*1, x_159); -x_12 = x_169; -x_13 = x_150; -goto block_91; -} -} -} -} -else -{ -obj* x_170; obj* x_171; uint8 x_172; obj* x_173; obj* x_174; obj* x_175; -x_170 = lean::cnstr_get(x_100, 0); -lean::inc(x_170); -lean::dec(x_100); -x_171 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_171, 0, x_170); -x_172 = 1; -x_173 = lean::box(x_172); -lean::cnstr_set(x_99, 1, x_171); -lean::cnstr_set(x_99, 0, x_173); -lean::cnstr_set(x_97, 1, x_156); -lean::cnstr_set(x_97, 0, x_99); -x_174 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_98, 2, x_174); -lean::cnstr_set(x_98, 0, x_97); -x_175 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_153, x_98); -if (lean::obj_tag(x_175) == 0) -{ -x_12 = x_175; -x_13 = x_150; -goto block_91; -} -else -{ -if (x_95 == 0) -{ -obj* x_176; uint8 x_177; obj* x_178; obj* x_179; -x_176 = lean::cnstr_get(x_175, 0); -lean::inc(x_176); -x_177 = lean::cnstr_get_scalar(x_175, sizeof(void*)*1); -if (lean::is_exclusive(x_175)) { - lean::cnstr_release(x_175, 0); - x_178 = x_175; -} else { - lean::dec_ref(x_175); - x_178 = lean::box(0); -} -if (lean::is_scalar(x_178)) { - x_179 = lean::alloc_cnstr(1, 1, 1); -} else { - x_179 = x_178; -} -lean::cnstr_set(x_179, 0, x_176); -lean::cnstr_set_scalar(x_179, sizeof(void*)*1, x_177); -x_12 = x_179; -x_13 = x_150; -goto block_91; -} -else -{ -obj* x_180; obj* x_181; obj* x_182; -x_180 = lean::cnstr_get(x_175, 0); -lean::inc(x_180); -if (lean::is_exclusive(x_175)) { - lean::cnstr_release(x_175, 0); - x_181 = x_175; -} else { - lean::dec_ref(x_175); - x_181 = lean::box(0); -} -if (lean::is_scalar(x_181)) { - x_182 = lean::alloc_cnstr(1, 1, 1); -} else { - x_182 = x_181; -} -lean::cnstr_set(x_182, 0, x_180); -lean::cnstr_set_scalar(x_182, sizeof(void*)*1, x_172); -x_12 = x_182; -x_13 = x_150; -goto block_91; -} -} -} -} -else -{ -obj* x_183; obj* x_184; obj* x_185; obj* x_186; uint8 x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; -x_183 = lean::cnstr_get(x_99, 1); -lean::inc(x_183); -lean::dec(x_99); -x_184 = lean::cnstr_get(x_100, 0); -lean::inc(x_184); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - x_185 = x_100; -} else { - lean::dec_ref(x_100); - x_185 = lean::box(0); -} -if (lean::is_scalar(x_185)) { - x_186 = lean::alloc_cnstr(1, 1, 0); -} else { - x_186 = x_185; -} -lean::cnstr_set(x_186, 0, x_184); -x_187 = 1; -x_188 = lean::box(x_187); -x_189 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_189, 0, x_188); -lean::cnstr_set(x_189, 1, x_186); -lean::cnstr_set(x_97, 1, x_183); -lean::cnstr_set(x_97, 0, x_189); -x_190 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_98, 2, x_190); -lean::cnstr_set(x_98, 0, x_97); -x_191 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_153, x_98); -if (lean::obj_tag(x_191) == 0) -{ -x_12 = x_191; -x_13 = x_150; -goto block_91; -} -else -{ -if (x_95 == 0) -{ -obj* x_192; uint8 x_193; obj* x_194; obj* x_195; -x_192 = lean::cnstr_get(x_191, 0); -lean::inc(x_192); -x_193 = lean::cnstr_get_scalar(x_191, sizeof(void*)*1); -if (lean::is_exclusive(x_191)) { - lean::cnstr_release(x_191, 0); - x_194 = x_191; -} else { - lean::dec_ref(x_191); - x_194 = lean::box(0); -} -if (lean::is_scalar(x_194)) { - x_195 = lean::alloc_cnstr(1, 1, 1); -} else { - x_195 = x_194; -} -lean::cnstr_set(x_195, 0, x_192); -lean::cnstr_set_scalar(x_195, sizeof(void*)*1, x_193); -x_12 = x_195; -x_13 = x_150; -goto block_91; -} -else -{ -obj* x_196; obj* x_197; obj* x_198; -x_196 = lean::cnstr_get(x_191, 0); -lean::inc(x_196); -if (lean::is_exclusive(x_191)) { - lean::cnstr_release(x_191, 0); - x_197 = x_191; -} else { - lean::dec_ref(x_191); - x_197 = lean::box(0); -} -if (lean::is_scalar(x_197)) { - x_198 = lean::alloc_cnstr(1, 1, 1); -} else { - x_198 = x_197; -} -lean::cnstr_set(x_198, 0, x_196); -lean::cnstr_set_scalar(x_198, sizeof(void*)*1, x_187); -x_12 = x_198; -x_13 = x_150; -goto block_91; -} -} -} -} -else -{ -obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; uint8 x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; -x_199 = lean::cnstr_get(x_98, 1); -x_200 = lean::cnstr_get(x_98, 2); -lean::inc(x_200); -lean::inc(x_199); -lean::dec(x_98); -x_201 = lean::cnstr_get(x_99, 1); -lean::inc(x_201); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - lean::cnstr_release(x_99, 1); - x_202 = x_99; -} else { - lean::dec_ref(x_99); - x_202 = lean::box(0); -} -x_203 = lean::cnstr_get(x_100, 0); -lean::inc(x_203); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - x_204 = x_100; -} else { - lean::dec_ref(x_100); - x_204 = lean::box(0); -} -if (lean::is_scalar(x_204)) { - x_205 = lean::alloc_cnstr(1, 1, 0); -} else { - x_205 = x_204; -} -lean::cnstr_set(x_205, 0, x_203); -x_206 = 1; -x_207 = lean::box(x_206); -if (lean::is_scalar(x_202)) { - x_208 = lean::alloc_cnstr(0, 2, 0); -} else { - x_208 = x_202; -} -lean::cnstr_set(x_208, 0, x_207); -lean::cnstr_set(x_208, 1, x_205); -lean::cnstr_set(x_97, 1, x_201); -lean::cnstr_set(x_97, 0, x_208); -x_209 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_210 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_210, 0, x_97); -lean::cnstr_set(x_210, 1, x_199); -lean::cnstr_set(x_210, 2, x_209); -x_211 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_200, x_210); -if (lean::obj_tag(x_211) == 0) -{ -x_12 = x_211; -x_13 = x_150; -goto block_91; -} -else -{ -if (x_95 == 0) -{ -obj* x_212; uint8 x_213; obj* x_214; obj* x_215; -x_212 = lean::cnstr_get(x_211, 0); -lean::inc(x_212); -x_213 = lean::cnstr_get_scalar(x_211, sizeof(void*)*1); -if (lean::is_exclusive(x_211)) { - lean::cnstr_release(x_211, 0); - x_214 = x_211; -} else { - lean::dec_ref(x_211); - x_214 = lean::box(0); -} -if (lean::is_scalar(x_214)) { - x_215 = lean::alloc_cnstr(1, 1, 1); -} else { - x_215 = x_214; -} -lean::cnstr_set(x_215, 0, x_212); -lean::cnstr_set_scalar(x_215, sizeof(void*)*1, x_213); -x_12 = x_215; -x_13 = x_150; -goto block_91; -} -else -{ -obj* x_216; obj* x_217; obj* x_218; -x_216 = lean::cnstr_get(x_211, 0); -lean::inc(x_216); -if (lean::is_exclusive(x_211)) { - lean::cnstr_release(x_211, 0); - x_217 = x_211; -} else { - lean::dec_ref(x_211); - x_217 = lean::box(0); -} -if (lean::is_scalar(x_217)) { - x_218 = lean::alloc_cnstr(1, 1, 1); -} else { - x_218 = x_217; -} -lean::cnstr_set(x_218, 0, x_216); -lean::cnstr_set_scalar(x_218, sizeof(void*)*1, x_206); -x_12 = x_218; -x_13 = x_150; -goto block_91; -} -} -} -} -else -{ -obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; uint8 x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; obj* x_233; obj* x_234; -x_219 = lean::cnstr_get(x_97, 1); -lean::inc(x_219); -lean::dec(x_97); -x_220 = lean::cnstr_get(x_98, 1); -lean::inc(x_220); -x_221 = lean::cnstr_get(x_98, 2); -lean::inc(x_221); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - lean::cnstr_release(x_98, 1); - lean::cnstr_release(x_98, 2); - x_222 = x_98; -} else { - lean::dec_ref(x_98); - x_222 = lean::box(0); -} -x_223 = lean::cnstr_get(x_99, 1); -lean::inc(x_223); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - lean::cnstr_release(x_99, 1); - x_224 = x_99; -} else { - lean::dec_ref(x_99); - x_224 = lean::box(0); -} -x_225 = lean::cnstr_get(x_100, 0); -lean::inc(x_225); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - x_226 = x_100; -} else { - lean::dec_ref(x_100); - x_226 = lean::box(0); -} -if (lean::is_scalar(x_226)) { - x_227 = lean::alloc_cnstr(1, 1, 0); -} else { - x_227 = x_226; -} -lean::cnstr_set(x_227, 0, x_225); -x_228 = 1; -x_229 = lean::box(x_228); -if (lean::is_scalar(x_224)) { - x_230 = lean::alloc_cnstr(0, 2, 0); -} else { - x_230 = x_224; -} -lean::cnstr_set(x_230, 0, x_229); -lean::cnstr_set(x_230, 1, x_227); -x_231 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_231, 0, x_230); -lean::cnstr_set(x_231, 1, x_223); -x_232 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_222)) { - x_233 = lean::alloc_cnstr(0, 3, 0); -} else { - x_233 = x_222; -} -lean::cnstr_set(x_233, 0, x_231); -lean::cnstr_set(x_233, 1, x_220); -lean::cnstr_set(x_233, 2, x_232); -x_234 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_221, x_233); -if (lean::obj_tag(x_234) == 0) -{ -x_12 = x_234; -x_13 = x_219; -goto block_91; -} -else -{ -if (x_95 == 0) -{ -obj* x_235; uint8 x_236; obj* x_237; obj* x_238; -x_235 = lean::cnstr_get(x_234, 0); -lean::inc(x_235); -x_236 = lean::cnstr_get_scalar(x_234, sizeof(void*)*1); -if (lean::is_exclusive(x_234)) { - lean::cnstr_release(x_234, 0); - x_237 = x_234; -} else { - lean::dec_ref(x_234); - x_237 = lean::box(0); -} -if (lean::is_scalar(x_237)) { - x_238 = lean::alloc_cnstr(1, 1, 1); -} else { - x_238 = x_237; -} -lean::cnstr_set(x_238, 0, x_235); -lean::cnstr_set_scalar(x_238, sizeof(void*)*1, x_236); -x_12 = x_238; -x_13 = x_219; -goto block_91; -} -else -{ -obj* x_239; obj* x_240; obj* x_241; -x_239 = lean::cnstr_get(x_234, 0); -lean::inc(x_239); -if (lean::is_exclusive(x_234)) { - lean::cnstr_release(x_234, 0); - x_240 = x_234; -} else { - lean::dec_ref(x_234); - x_240 = lean::box(0); -} -if (lean::is_scalar(x_240)) { - x_241 = lean::alloc_cnstr(1, 1, 1); -} else { - x_241 = x_240; -} -lean::cnstr_set(x_241, 0, x_239); -lean::cnstr_set_scalar(x_241, sizeof(void*)*1, x_228); -x_12 = x_241; -x_13 = x_219; -goto block_91; -} -} -} -} -} -else -{ -lean::dec(x_94); -if (x_95 == 0) -{ -obj* x_242; uint8 x_243; -x_242 = lean::cnstr_get(x_97, 1); -lean::inc(x_242); -lean::dec(x_97); -x_243 = !lean::is_exclusive(x_98); -if (x_243 == 0) -{ -x_12 = x_98; -x_13 = x_242; -goto block_91; -} -else -{ -obj* x_244; uint8 x_245; obj* x_246; -x_244 = lean::cnstr_get(x_98, 0); -x_245 = lean::cnstr_get_scalar(x_98, sizeof(void*)*1); -lean::inc(x_244); -lean::dec(x_98); -x_246 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_246, 0, x_244); -lean::cnstr_set_scalar(x_246, sizeof(void*)*1, x_245); -x_12 = x_246; -x_13 = x_242; -goto block_91; -} -} -else -{ -obj* x_247; uint8 x_248; -x_247 = lean::cnstr_get(x_97, 1); -lean::inc(x_247); -lean::dec(x_97); -x_248 = !lean::is_exclusive(x_98); -if (x_248 == 0) -{ -uint8 x_249; -x_249 = 1; -lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_249); -x_12 = x_98; -x_13 = x_247; -goto block_91; -} -else -{ -obj* x_250; uint8 x_251; obj* x_252; -x_250 = lean::cnstr_get(x_98, 0); -lean::inc(x_250); -lean::dec(x_98); -x_251 = 1; -x_252 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_252, 0, x_250); -lean::cnstr_set_scalar(x_252, sizeof(void*)*1, x_251); -x_12 = x_252; -x_13 = x_247; -goto block_91; -} -} -} -} -} -block_588: -{ -obj* x_255; obj* x_256; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; -x_460 = lean::cnstr_get(x_4, 1); -lean::inc(x_460); -x_461 = lean::cnstr_get(x_4, 0); -lean::inc(x_461); -x_462 = l___private_init_lean_parser_module_1__commandWrecAux___main___closed__3; -lean::inc(x_5); -x_463 = l_Lean_Parser_commandParser_run(x_460, x_462, x_461, x_5, x_6); -x_464 = lean::cnstr_get(x_463, 0); -lean::inc(x_464); -if (lean::obj_tag(x_464) == 0) -{ -uint8 x_465; -x_465 = !lean::is_exclusive(x_463); -if (x_465 == 0) -{ -obj* x_466; obj* x_467; uint8 x_468; -x_466 = lean::cnstr_get(x_463, 1); -x_467 = lean::cnstr_get(x_463, 0); -lean::dec(x_467); -x_468 = !lean::is_exclusive(x_464); -if (x_468 == 0) -{ -obj* x_469; obj* x_470; obj* x_471; obj* x_472; -x_469 = lean::cnstr_get(x_464, 0); -x_470 = lean::cnstr_get(x_464, 2); -lean::inc(x_3); -lean::cnstr_set(x_463, 1, x_3); -lean::cnstr_set(x_463, 0, x_469); -x_471 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_464, 2, x_471); -lean::cnstr_set(x_464, 0, x_463); -x_472 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_470, x_464); -if (lean::obj_tag(x_472) == 0) -{ -uint8 x_473; -x_473 = !lean::is_exclusive(x_472); -if (x_473 == 0) -{ -obj* x_474; uint8 x_475; -x_474 = lean::cnstr_get(x_472, 0); -x_475 = !lean::is_exclusive(x_474); -if (x_475 == 0) -{ -obj* x_476; obj* x_477; obj* x_478; obj* x_479; uint8 x_480; obj* x_481; obj* x_482; obj* x_483; obj* x_484; obj* x_485; -x_476 = lean::cnstr_get(x_472, 2); -x_477 = lean::cnstr_get(x_474, 0); -x_478 = lean::cnstr_get(x_474, 1); -x_479 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_479, 0, x_477); -x_480 = 0; -x_481 = lean::box(x_480); -lean::cnstr_set(x_474, 1, x_479); -lean::cnstr_set(x_474, 0, x_481); -x_482 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_482, 0, x_474); -lean::cnstr_set(x_482, 1, x_478); -lean::cnstr_set(x_472, 2, x_471); -lean::cnstr_set(x_472, 0, x_482); -x_483 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_476, x_472); -x_484 = l_Lean_Parser_finishCommentBlock___closed__2; -x_485 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_484, x_483); -x_255 = x_485; -x_256 = x_466; -goto block_459; -} -else -{ -obj* x_486; obj* x_487; obj* x_488; obj* x_489; uint8 x_490; obj* x_491; obj* x_492; obj* x_493; obj* x_494; obj* x_495; obj* x_496; -x_486 = lean::cnstr_get(x_472, 2); -x_487 = lean::cnstr_get(x_474, 0); -x_488 = lean::cnstr_get(x_474, 1); -lean::inc(x_488); -lean::inc(x_487); -lean::dec(x_474); -x_489 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_489, 0, x_487); -x_490 = 0; -x_491 = lean::box(x_490); -x_492 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_492, 0, x_491); -lean::cnstr_set(x_492, 1, x_489); -x_493 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_493, 0, x_492); -lean::cnstr_set(x_493, 1, x_488); -lean::cnstr_set(x_472, 2, x_471); -lean::cnstr_set(x_472, 0, x_493); -x_494 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_486, x_472); -x_495 = l_Lean_Parser_finishCommentBlock___closed__2; -x_496 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_495, x_494); -x_255 = x_496; -x_256 = x_466; -goto block_459; -} -} -else -{ -obj* x_497; obj* x_498; obj* x_499; obj* x_500; obj* x_501; obj* x_502; obj* x_503; uint8 x_504; obj* x_505; obj* x_506; obj* x_507; obj* x_508; obj* x_509; obj* x_510; obj* x_511; -x_497 = lean::cnstr_get(x_472, 0); -x_498 = lean::cnstr_get(x_472, 1); -x_499 = lean::cnstr_get(x_472, 2); -lean::inc(x_499); -lean::inc(x_498); -lean::inc(x_497); -lean::dec(x_472); -x_500 = lean::cnstr_get(x_497, 0); -lean::inc(x_500); -x_501 = lean::cnstr_get(x_497, 1); -lean::inc(x_501); -if (lean::is_exclusive(x_497)) { - lean::cnstr_release(x_497, 0); - lean::cnstr_release(x_497, 1); - x_502 = x_497; -} else { - lean::dec_ref(x_497); - x_502 = lean::box(0); -} -x_503 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_503, 0, x_500); -x_504 = 0; -x_505 = lean::box(x_504); -if (lean::is_scalar(x_502)) { - x_506 = lean::alloc_cnstr(0, 2, 0); -} else { - x_506 = x_502; -} -lean::cnstr_set(x_506, 0, x_505); -lean::cnstr_set(x_506, 1, x_503); -x_507 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_507, 0, x_506); -lean::cnstr_set(x_507, 1, x_501); -x_508 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_508, 0, x_507); -lean::cnstr_set(x_508, 1, x_498); -lean::cnstr_set(x_508, 2, x_471); -x_509 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_499, x_508); -x_510 = l_Lean_Parser_finishCommentBlock___closed__2; -x_511 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_510, x_509); -x_255 = x_511; -x_256 = x_466; -goto block_459; -} -} -else -{ -uint8 x_512; -x_512 = !lean::is_exclusive(x_472); -if (x_512 == 0) -{ -obj* x_513; obj* x_514; -x_513 = l_Lean_Parser_finishCommentBlock___closed__2; -x_514 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_513, x_472); -x_255 = x_514; -x_256 = x_466; -goto block_459; -} -else -{ -obj* x_515; uint8 x_516; obj* x_517; obj* x_518; obj* x_519; -x_515 = lean::cnstr_get(x_472, 0); -x_516 = lean::cnstr_get_scalar(x_472, sizeof(void*)*1); -lean::inc(x_515); -lean::dec(x_472); -x_517 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_517, 0, x_515); -lean::cnstr_set_scalar(x_517, sizeof(void*)*1, x_516); -x_518 = l_Lean_Parser_finishCommentBlock___closed__2; -x_519 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_518, x_517); -x_255 = x_519; -x_256 = x_466; -goto block_459; -} -} -} -else -{ -obj* x_520; obj* x_521; obj* x_522; obj* x_523; obj* x_524; obj* x_525; -x_520 = lean::cnstr_get(x_464, 0); -x_521 = lean::cnstr_get(x_464, 1); -x_522 = lean::cnstr_get(x_464, 2); -lean::inc(x_522); -lean::inc(x_521); -lean::inc(x_520); -lean::dec(x_464); -lean::inc(x_3); -lean::cnstr_set(x_463, 1, x_3); -lean::cnstr_set(x_463, 0, x_520); -x_523 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_524 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_524, 0, x_463); -lean::cnstr_set(x_524, 1, x_521); -lean::cnstr_set(x_524, 2, x_523); -x_525 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_522, x_524); -if (lean::obj_tag(x_525) == 0) -{ -obj* x_526; obj* x_527; obj* x_528; obj* x_529; obj* x_530; obj* x_531; obj* x_532; obj* x_533; uint8 x_534; obj* x_535; obj* x_536; obj* x_537; obj* x_538; obj* x_539; obj* x_540; obj* x_541; -x_526 = lean::cnstr_get(x_525, 0); -lean::inc(x_526); -x_527 = lean::cnstr_get(x_525, 1); -lean::inc(x_527); -x_528 = lean::cnstr_get(x_525, 2); -lean::inc(x_528); -if (lean::is_exclusive(x_525)) { - lean::cnstr_release(x_525, 0); - lean::cnstr_release(x_525, 1); - lean::cnstr_release(x_525, 2); - x_529 = x_525; -} else { - lean::dec_ref(x_525); - x_529 = lean::box(0); -} -x_530 = lean::cnstr_get(x_526, 0); -lean::inc(x_530); -x_531 = lean::cnstr_get(x_526, 1); -lean::inc(x_531); -if (lean::is_exclusive(x_526)) { - lean::cnstr_release(x_526, 0); - lean::cnstr_release(x_526, 1); - x_532 = x_526; -} else { - lean::dec_ref(x_526); - x_532 = lean::box(0); -} -x_533 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_533, 0, x_530); -x_534 = 0; -x_535 = lean::box(x_534); -if (lean::is_scalar(x_532)) { - x_536 = lean::alloc_cnstr(0, 2, 0); -} else { - x_536 = x_532; -} -lean::cnstr_set(x_536, 0, x_535); -lean::cnstr_set(x_536, 1, x_533); -x_537 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_537, 0, x_536); -lean::cnstr_set(x_537, 1, x_531); -if (lean::is_scalar(x_529)) { - x_538 = lean::alloc_cnstr(0, 3, 0); -} else { - x_538 = x_529; -} -lean::cnstr_set(x_538, 0, x_537); -lean::cnstr_set(x_538, 1, x_527); -lean::cnstr_set(x_538, 2, x_523); -x_539 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_528, x_538); -x_540 = l_Lean_Parser_finishCommentBlock___closed__2; -x_541 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_540, x_539); -x_255 = x_541; -x_256 = x_466; -goto block_459; -} -else -{ -obj* x_542; uint8 x_543; obj* x_544; obj* x_545; obj* x_546; obj* x_547; -x_542 = lean::cnstr_get(x_525, 0); -lean::inc(x_542); -x_543 = lean::cnstr_get_scalar(x_525, sizeof(void*)*1); -if (lean::is_exclusive(x_525)) { - lean::cnstr_release(x_525, 0); - x_544 = x_525; -} else { - lean::dec_ref(x_525); - x_544 = lean::box(0); -} -if (lean::is_scalar(x_544)) { - x_545 = lean::alloc_cnstr(1, 1, 1); -} else { - x_545 = x_544; -} -lean::cnstr_set(x_545, 0, x_542); -lean::cnstr_set_scalar(x_545, sizeof(void*)*1, x_543); -x_546 = l_Lean_Parser_finishCommentBlock___closed__2; -x_547 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_546, x_545); -x_255 = x_547; -x_256 = x_466; -goto block_459; -} -} -} -else -{ -obj* x_548; obj* x_549; obj* x_550; obj* x_551; obj* x_552; obj* x_553; obj* x_554; obj* x_555; obj* x_556; -x_548 = lean::cnstr_get(x_463, 1); -lean::inc(x_548); -lean::dec(x_463); -x_549 = lean::cnstr_get(x_464, 0); -lean::inc(x_549); -x_550 = lean::cnstr_get(x_464, 1); -lean::inc(x_550); -x_551 = lean::cnstr_get(x_464, 2); -lean::inc(x_551); -if (lean::is_exclusive(x_464)) { - lean::cnstr_release(x_464, 0); - lean::cnstr_release(x_464, 1); - lean::cnstr_release(x_464, 2); - x_552 = x_464; -} else { - lean::dec_ref(x_464); - x_552 = lean::box(0); -} -lean::inc(x_3); -x_553 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_553, 0, x_549); -lean::cnstr_set(x_553, 1, x_3); -x_554 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_552)) { - x_555 = lean::alloc_cnstr(0, 3, 0); -} else { - x_555 = x_552; -} -lean::cnstr_set(x_555, 0, x_553); -lean::cnstr_set(x_555, 1, x_550); -lean::cnstr_set(x_555, 2, x_554); -x_556 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_551, x_555); -if (lean::obj_tag(x_556) == 0) -{ -obj* x_557; obj* x_558; obj* x_559; obj* x_560; obj* x_561; obj* x_562; obj* x_563; obj* x_564; uint8 x_565; obj* x_566; obj* x_567; obj* x_568; obj* x_569; obj* x_570; obj* x_571; obj* x_572; -x_557 = lean::cnstr_get(x_556, 0); -lean::inc(x_557); -x_558 = lean::cnstr_get(x_556, 1); -lean::inc(x_558); -x_559 = lean::cnstr_get(x_556, 2); -lean::inc(x_559); -if (lean::is_exclusive(x_556)) { - lean::cnstr_release(x_556, 0); - lean::cnstr_release(x_556, 1); - lean::cnstr_release(x_556, 2); - x_560 = x_556; -} else { - lean::dec_ref(x_556); - x_560 = lean::box(0); -} -x_561 = lean::cnstr_get(x_557, 0); -lean::inc(x_561); -x_562 = lean::cnstr_get(x_557, 1); -lean::inc(x_562); -if (lean::is_exclusive(x_557)) { - lean::cnstr_release(x_557, 0); - lean::cnstr_release(x_557, 1); - x_563 = x_557; -} else { - lean::dec_ref(x_557); - x_563 = lean::box(0); -} -x_564 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_564, 0, x_561); -x_565 = 0; -x_566 = lean::box(x_565); -if (lean::is_scalar(x_563)) { - x_567 = lean::alloc_cnstr(0, 2, 0); -} else { - x_567 = x_563; -} -lean::cnstr_set(x_567, 0, x_566); -lean::cnstr_set(x_567, 1, x_564); -x_568 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_568, 0, x_567); -lean::cnstr_set(x_568, 1, x_562); -if (lean::is_scalar(x_560)) { - x_569 = lean::alloc_cnstr(0, 3, 0); -} else { - x_569 = x_560; -} -lean::cnstr_set(x_569, 0, x_568); -lean::cnstr_set(x_569, 1, x_558); -lean::cnstr_set(x_569, 2, x_554); -x_570 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_559, x_569); -x_571 = l_Lean_Parser_finishCommentBlock___closed__2; -x_572 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_571, x_570); -x_255 = x_572; -x_256 = x_548; -goto block_459; -} -else -{ -obj* x_573; uint8 x_574; obj* x_575; obj* x_576; obj* x_577; obj* x_578; -x_573 = lean::cnstr_get(x_556, 0); -lean::inc(x_573); -x_574 = lean::cnstr_get_scalar(x_556, sizeof(void*)*1); -if (lean::is_exclusive(x_556)) { - lean::cnstr_release(x_556, 0); - x_575 = x_556; -} else { - lean::dec_ref(x_556); - x_575 = lean::box(0); -} -if (lean::is_scalar(x_575)) { - x_576 = lean::alloc_cnstr(1, 1, 1); -} else { - x_576 = x_575; -} -lean::cnstr_set(x_576, 0, x_573); -lean::cnstr_set_scalar(x_576, sizeof(void*)*1, x_574); -x_577 = l_Lean_Parser_finishCommentBlock___closed__2; -x_578 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_577, x_576); -x_255 = x_578; -x_256 = x_548; -goto block_459; -} -} -} -else -{ -obj* x_579; uint8 x_580; -x_579 = lean::cnstr_get(x_463, 1); -lean::inc(x_579); -lean::dec(x_463); -x_580 = !lean::is_exclusive(x_464); -if (x_580 == 0) -{ -obj* x_581; obj* x_582; -x_581 = l_Lean_Parser_finishCommentBlock___closed__2; -x_582 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_581, x_464); -x_255 = x_582; -x_256 = x_579; -goto block_459; -} -else -{ -obj* x_583; uint8 x_584; obj* x_585; obj* x_586; obj* x_587; -x_583 = lean::cnstr_get(x_464, 0); -x_584 = lean::cnstr_get_scalar(x_464, sizeof(void*)*1); -lean::inc(x_583); -lean::dec(x_464); -x_585 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_585, 0, x_583); -lean::cnstr_set_scalar(x_585, sizeof(void*)*1, x_584); -x_586 = l_Lean_Parser_finishCommentBlock___closed__2; -x_587 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_586, x_585); -x_255 = x_587; -x_256 = x_579; -goto block_459; -} -} -block_459: -{ -if (lean::obj_tag(x_255) == 0) -{ -lean::dec(x_5); -x_92 = x_255; -x_93 = x_256; -goto block_253; -} -else -{ -obj* x_257; uint8 x_258; obj* x_259; obj* x_260; -x_257 = lean::cnstr_get(x_255, 0); -lean::inc(x_257); -x_258 = lean::cnstr_get_scalar(x_255, sizeof(void*)*1); -if (x_258 == 0) -{ -lean::dec(x_255); -if (x_254 == 0) -{ -obj* x_446; obj* x_447; obj* x_448; obj* x_449; -x_446 = lean::box(0); -lean::inc(x_3); -x_447 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_447, 0, x_446); -lean::cnstr_set(x_447, 1, x_3); -x_448 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_449 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_449, 0, x_447); -lean::cnstr_set(x_449, 1, x_5); -lean::cnstr_set(x_449, 2, x_448); -x_259 = x_449; -x_260 = x_256; -goto block_445; -} -else -{ -obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; -x_450 = l_String_splitAux___main___closed__1; -x_451 = l_Lean_Parser_command_Parser___rarg___closed__1; -x_452 = l_Lean_Parser_ParsecT_MonadFail___rarg___closed__1; -lean::inc(x_5); -x_453 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_453, 0, x_5); -lean::cnstr_set(x_453, 1, x_450); -lean::cnstr_set(x_453, 2, x_451); -lean::cnstr_set(x_453, 3, x_452); -lean::inc(x_3); -x_454 = l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__3(x_453, x_3, x_4, x_5, x_256); -x_455 = lean::cnstr_get(x_454, 0); -lean::inc(x_455); -x_456 = lean::cnstr_get(x_454, 1); -lean::inc(x_456); -lean::dec(x_454); -x_457 = l_Lean_Parser_finishCommentBlock___closed__2; -x_458 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_457, x_455); -x_259 = x_458; -x_260 = x_456; -goto block_445; -} -} -else -{ -lean::dec(x_257); -lean::dec(x_5); -x_92 = x_255; -x_93 = x_256; -goto block_253; -} -block_445: -{ -if (lean::obj_tag(x_259) == 0) -{ -obj* x_261; obj* x_262; obj* x_263; obj* x_264; obj* x_265; obj* x_305; obj* x_306; obj* x_307; obj* x_347; obj* x_348; obj* x_349; obj* x_350; -x_261 = lean::cnstr_get(x_259, 0); -lean::inc(x_261); -x_262 = lean::cnstr_get(x_259, 1); -lean::inc(x_262); -x_263 = lean::cnstr_get(x_259, 2); -lean::inc(x_263); -lean::dec(x_259); -x_305 = lean::cnstr_get(x_261, 1); -lean::inc(x_305); -lean::dec(x_261); -x_347 = lean::cnstr_get(x_4, 0); -lean::inc(x_347); -x_348 = lean::cnstr_get(x_347, 0); -lean::inc(x_348); -lean::dec(x_347); -lean::inc(x_262); -x_349 = l_Lean_Parser_token(x_348, x_262, x_260); -x_350 = lean::cnstr_get(x_349, 0); -lean::inc(x_350); -if (lean::obj_tag(x_350) == 0) -{ -uint8 x_351; -x_351 = !lean::is_exclusive(x_349); -if (x_351 == 0) -{ -obj* x_352; obj* x_353; uint8 x_354; -x_352 = lean::cnstr_get(x_349, 1); -x_353 = lean::cnstr_get(x_349, 0); -lean::dec(x_353); -x_354 = !lean::is_exclusive(x_350); -if (x_354 == 0) -{ -obj* x_355; obj* x_356; obj* x_357; obj* x_358; -x_355 = lean::cnstr_get(x_350, 0); -x_356 = lean::cnstr_get(x_350, 2); -lean::inc(x_305); -lean::cnstr_set(x_349, 1, x_305); -lean::cnstr_set(x_349, 0, x_355); -x_357 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_350, 2, x_357); -lean::cnstr_set(x_350, 0, x_349); -x_358 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_350); -if (lean::obj_tag(x_358) == 0) -{ -uint8 x_359; -x_359 = !lean::is_exclusive(x_358); -if (x_359 == 0) -{ -obj* x_360; uint8 x_361; -x_360 = lean::cnstr_get(x_358, 0); -x_361 = !lean::is_exclusive(x_360); -if (x_361 == 0) -{ -obj* x_362; obj* x_363; obj* x_364; obj* x_365; obj* x_366; -x_362 = lean::cnstr_get(x_358, 2); -x_363 = lean::cnstr_get(x_360, 0); -lean::dec(x_363); -x_364 = lean::box(0); -lean::cnstr_set(x_360, 0, x_364); -lean::cnstr_set(x_358, 2, x_357); -x_365 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_362, x_358); -x_366 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_365); -x_306 = x_366; -x_307 = x_352; -goto block_346; -} -else -{ -obj* x_367; obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_372; -x_367 = lean::cnstr_get(x_358, 2); -x_368 = lean::cnstr_get(x_360, 1); -lean::inc(x_368); -lean::dec(x_360); -x_369 = lean::box(0); -x_370 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_370, 0, x_369); -lean::cnstr_set(x_370, 1, x_368); -lean::cnstr_set(x_358, 2, x_357); -lean::cnstr_set(x_358, 0, x_370); -x_371 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_367, x_358); -x_372 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_371); -x_306 = x_372; -x_307 = x_352; -goto block_346; -} -} -else -{ -obj* x_373; obj* x_374; obj* x_375; obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; -x_373 = lean::cnstr_get(x_358, 0); -x_374 = lean::cnstr_get(x_358, 1); -x_375 = lean::cnstr_get(x_358, 2); -lean::inc(x_375); -lean::inc(x_374); -lean::inc(x_373); -lean::dec(x_358); -x_376 = lean::cnstr_get(x_373, 1); -lean::inc(x_376); -if (lean::is_exclusive(x_373)) { - lean::cnstr_release(x_373, 0); - lean::cnstr_release(x_373, 1); - x_377 = x_373; -} else { - lean::dec_ref(x_373); - x_377 = lean::box(0); -} -x_378 = lean::box(0); -if (lean::is_scalar(x_377)) { - x_379 = lean::alloc_cnstr(0, 2, 0); -} else { - x_379 = x_377; -} -lean::cnstr_set(x_379, 0, x_378); -lean::cnstr_set(x_379, 1, x_376); -x_380 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_380, 0, x_379); -lean::cnstr_set(x_380, 1, x_374); -lean::cnstr_set(x_380, 2, x_357); -x_381 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_375, x_380); -x_382 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_381); -x_306 = x_382; -x_307 = x_352; -goto block_346; -} -} -else -{ -uint8 x_383; -x_383 = !lean::is_exclusive(x_358); -if (x_383 == 0) -{ -uint8 x_384; -x_384 = 0; -lean::cnstr_set_scalar(x_358, sizeof(void*)*1, x_384); -x_306 = x_358; -x_307 = x_352; -goto block_346; -} -else -{ -obj* x_385; uint8 x_386; obj* x_387; -x_385 = lean::cnstr_get(x_358, 0); -lean::inc(x_385); -lean::dec(x_358); -x_386 = 0; -x_387 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_387, 0, x_385); -lean::cnstr_set_scalar(x_387, sizeof(void*)*1, x_386); -x_306 = x_387; -x_307 = x_352; -goto block_346; -} -} -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; -x_388 = lean::cnstr_get(x_350, 0); -x_389 = lean::cnstr_get(x_350, 1); -x_390 = lean::cnstr_get(x_350, 2); -lean::inc(x_390); -lean::inc(x_389); -lean::inc(x_388); -lean::dec(x_350); -lean::inc(x_305); -lean::cnstr_set(x_349, 1, x_305); -lean::cnstr_set(x_349, 0, x_388); -x_391 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_392 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_392, 0, x_349); -lean::cnstr_set(x_392, 1, x_389); -lean::cnstr_set(x_392, 2, x_391); -x_393 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_390, x_392); -if (lean::obj_tag(x_393) == 0) -{ -obj* x_394; obj* x_395; obj* x_396; obj* x_397; obj* x_398; obj* x_399; obj* x_400; obj* x_401; obj* x_402; obj* x_403; obj* x_404; -x_394 = lean::cnstr_get(x_393, 0); -lean::inc(x_394); -x_395 = lean::cnstr_get(x_393, 1); -lean::inc(x_395); -x_396 = lean::cnstr_get(x_393, 2); -lean::inc(x_396); -if (lean::is_exclusive(x_393)) { - lean::cnstr_release(x_393, 0); - lean::cnstr_release(x_393, 1); - lean::cnstr_release(x_393, 2); - x_397 = x_393; -} else { - lean::dec_ref(x_393); - x_397 = lean::box(0); -} -x_398 = lean::cnstr_get(x_394, 1); -lean::inc(x_398); -if (lean::is_exclusive(x_394)) { - lean::cnstr_release(x_394, 0); - lean::cnstr_release(x_394, 1); - x_399 = x_394; -} else { - lean::dec_ref(x_394); - x_399 = lean::box(0); -} -x_400 = lean::box(0); -if (lean::is_scalar(x_399)) { - x_401 = lean::alloc_cnstr(0, 2, 0); -} else { - x_401 = x_399; -} -lean::cnstr_set(x_401, 0, x_400); -lean::cnstr_set(x_401, 1, x_398); -if (lean::is_scalar(x_397)) { - x_402 = lean::alloc_cnstr(0, 3, 0); -} else { - x_402 = x_397; -} -lean::cnstr_set(x_402, 0, x_401); -lean::cnstr_set(x_402, 1, x_395); -lean::cnstr_set(x_402, 2, x_391); -x_403 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_396, x_402); -x_404 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_403); -x_306 = x_404; -x_307 = x_352; -goto block_346; -} -else -{ -obj* x_405; obj* x_406; uint8 x_407; obj* x_408; -x_405 = lean::cnstr_get(x_393, 0); -lean::inc(x_405); -if (lean::is_exclusive(x_393)) { - lean::cnstr_release(x_393, 0); - x_406 = x_393; -} else { - lean::dec_ref(x_393); - x_406 = lean::box(0); -} -x_407 = 0; -if (lean::is_scalar(x_406)) { - x_408 = lean::alloc_cnstr(1, 1, 1); -} else { - x_408 = x_406; -} -lean::cnstr_set(x_408, 0, x_405); -lean::cnstr_set_scalar(x_408, sizeof(void*)*1, x_407); -x_306 = x_408; -x_307 = x_352; -goto block_346; -} -} -} -else -{ -obj* x_409; obj* x_410; obj* x_411; obj* x_412; obj* x_413; obj* x_414; obj* x_415; obj* x_416; obj* x_417; -x_409 = lean::cnstr_get(x_349, 1); -lean::inc(x_409); -lean::dec(x_349); -x_410 = lean::cnstr_get(x_350, 0); -lean::inc(x_410); -x_411 = lean::cnstr_get(x_350, 1); -lean::inc(x_411); -x_412 = lean::cnstr_get(x_350, 2); -lean::inc(x_412); -if (lean::is_exclusive(x_350)) { - lean::cnstr_release(x_350, 0); - lean::cnstr_release(x_350, 1); - lean::cnstr_release(x_350, 2); - x_413 = x_350; -} else { - lean::dec_ref(x_350); - x_413 = lean::box(0); -} -lean::inc(x_305); -x_414 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_414, 0, x_410); -lean::cnstr_set(x_414, 1, x_305); -x_415 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_413)) { - x_416 = lean::alloc_cnstr(0, 3, 0); -} else { - x_416 = x_413; -} -lean::cnstr_set(x_416, 0, x_414); -lean::cnstr_set(x_416, 1, x_411); -lean::cnstr_set(x_416, 2, x_415); -x_417 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_412, x_416); -if (lean::obj_tag(x_417) == 0) -{ -obj* x_418; obj* x_419; obj* x_420; obj* x_421; obj* x_422; obj* x_423; obj* x_424; obj* x_425; obj* x_426; obj* x_427; obj* x_428; -x_418 = lean::cnstr_get(x_417, 0); -lean::inc(x_418); -x_419 = lean::cnstr_get(x_417, 1); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_417, 2); -lean::inc(x_420); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - x_421 = x_417; -} else { - lean::dec_ref(x_417); - x_421 = lean::box(0); -} -x_422 = lean::cnstr_get(x_418, 1); -lean::inc(x_422); -if (lean::is_exclusive(x_418)) { - lean::cnstr_release(x_418, 0); - lean::cnstr_release(x_418, 1); - x_423 = x_418; -} else { - lean::dec_ref(x_418); - x_423 = lean::box(0); -} -x_424 = lean::box(0); -if (lean::is_scalar(x_423)) { - x_425 = lean::alloc_cnstr(0, 2, 0); -} else { - x_425 = x_423; -} -lean::cnstr_set(x_425, 0, x_424); -lean::cnstr_set(x_425, 1, x_422); -if (lean::is_scalar(x_421)) { - x_426 = lean::alloc_cnstr(0, 3, 0); -} else { - x_426 = x_421; -} -lean::cnstr_set(x_426, 0, x_425); -lean::cnstr_set(x_426, 1, x_419); -lean::cnstr_set(x_426, 2, x_415); -x_427 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_420, x_426); -x_428 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_427); -x_306 = x_428; -x_307 = x_409; -goto block_346; -} -else -{ -obj* x_429; obj* x_430; uint8 x_431; obj* x_432; -x_429 = lean::cnstr_get(x_417, 0); -lean::inc(x_429); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - x_430 = x_417; -} else { - lean::dec_ref(x_417); - x_430 = lean::box(0); -} -x_431 = 0; -if (lean::is_scalar(x_430)) { - x_432 = lean::alloc_cnstr(1, 1, 1); -} else { - x_432 = x_430; -} -lean::cnstr_set(x_432, 0, x_429); -lean::cnstr_set_scalar(x_432, sizeof(void*)*1, x_431); -x_306 = x_432; -x_307 = x_409; -goto block_346; -} -} -} -else -{ -obj* x_433; uint8 x_434; -x_433 = lean::cnstr_get(x_349, 1); -lean::inc(x_433); -lean::dec(x_349); -x_434 = !lean::is_exclusive(x_350); -if (x_434 == 0) -{ -uint8 x_435; -x_435 = 0; -lean::cnstr_set_scalar(x_350, sizeof(void*)*1, x_435); -x_306 = x_350; -x_307 = x_433; -goto block_346; -} -else -{ -obj* x_436; uint8 x_437; obj* x_438; -x_436 = lean::cnstr_get(x_350, 0); -lean::inc(x_436); -lean::dec(x_350); -x_437 = 0; -x_438 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_438, 0, x_436); -lean::cnstr_set_scalar(x_438, sizeof(void*)*1, x_437); -x_306 = x_438; -x_307 = x_433; -goto block_346; -} -} -block_304: -{ -if (lean::obj_tag(x_264) == 0) -{ -uint8 x_266; -x_266 = !lean::is_exclusive(x_264); -if (x_266 == 0) -{ -obj* x_267; uint8 x_268; -x_267 = lean::cnstr_get(x_264, 0); -x_268 = !lean::is_exclusive(x_267); -if (x_268 == 0) -{ -obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_273; obj* x_274; obj* x_275; -x_269 = lean::cnstr_get(x_264, 2); -x_270 = lean::cnstr_get(x_267, 0); -lean::dec(x_270); -x_271 = l___private_init_lean_parser_module_1__commandWrecAux___main___closed__2; -lean::cnstr_set(x_267, 0, x_271); -x_272 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_264, 2, x_272); -x_273 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_269, x_264); -x_274 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_263, x_273); -x_275 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_257, x_274); -x_92 = x_275; -x_93 = x_265; -goto block_253; -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; obj* x_283; -x_276 = lean::cnstr_get(x_264, 2); -x_277 = lean::cnstr_get(x_267, 1); -lean::inc(x_277); -lean::dec(x_267); -x_278 = l___private_init_lean_parser_module_1__commandWrecAux___main___closed__2; -x_279 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_279, 0, x_278); -lean::cnstr_set(x_279, 1, x_277); -x_280 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_264, 2, x_280); -lean::cnstr_set(x_264, 0, x_279); -x_281 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_276, x_264); -x_282 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_263, x_281); -x_283 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_257, x_282); -x_92 = x_283; -x_93 = x_265; -goto block_253; -} -} -else -{ -obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; obj* x_294; obj* x_295; -x_284 = lean::cnstr_get(x_264, 0); -x_285 = lean::cnstr_get(x_264, 1); -x_286 = lean::cnstr_get(x_264, 2); -lean::inc(x_286); -lean::inc(x_285); -lean::inc(x_284); -lean::dec(x_264); -x_287 = lean::cnstr_get(x_284, 1); -lean::inc(x_287); -if (lean::is_exclusive(x_284)) { - lean::cnstr_release(x_284, 0); - lean::cnstr_release(x_284, 1); - x_288 = x_284; -} else { - lean::dec_ref(x_284); - x_288 = lean::box(0); -} -x_289 = l___private_init_lean_parser_module_1__commandWrecAux___main___closed__2; -if (lean::is_scalar(x_288)) { - x_290 = lean::alloc_cnstr(0, 2, 0); -} else { - x_290 = x_288; -} -lean::cnstr_set(x_290, 0, x_289); -lean::cnstr_set(x_290, 1, x_287); -x_291 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_292 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_292, 0, x_290); -lean::cnstr_set(x_292, 1, x_285); -lean::cnstr_set(x_292, 2, x_291); -x_293 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_286, x_292); -x_294 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_263, x_293); -x_295 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_257, x_294); -x_92 = x_295; -x_93 = x_265; -goto block_253; -} -} -else -{ -uint8 x_296; -x_296 = !lean::is_exclusive(x_264); -if (x_296 == 0) -{ -obj* x_297; obj* x_298; -x_297 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_263, x_264); -x_298 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_257, x_297); -x_92 = x_298; -x_93 = x_265; -goto block_253; -} -else -{ -obj* x_299; uint8 x_300; obj* x_301; obj* x_302; obj* x_303; -x_299 = lean::cnstr_get(x_264, 0); -x_300 = lean::cnstr_get_scalar(x_264, sizeof(void*)*1); -lean::inc(x_299); -lean::dec(x_264); -x_301 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_301, 0, x_299); -lean::cnstr_set_scalar(x_301, sizeof(void*)*1, x_300); -x_302 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_263, x_301); -x_303 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_257, x_302); -x_92 = x_303; -x_93 = x_265; -goto block_253; -} -} -} -block_346: -{ -if (lean::obj_tag(x_306) == 0) -{ -lean::dec(x_305); -lean::dec(x_262); -x_264 = x_306; -x_265 = x_307; -goto block_304; -} -else -{ -uint8 x_308; -x_308 = lean::cnstr_get_scalar(x_306, sizeof(void*)*1); -if (x_308 == 0) -{ -obj* x_309; obj* x_310; obj* x_311; -x_309 = lean::cnstr_get(x_306, 0); -lean::inc(x_309); -lean::dec(x_306); -x_310 = l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__2(x_305, x_4, x_262, x_307); -x_311 = lean::cnstr_get(x_310, 0); -lean::inc(x_311); -if (lean::obj_tag(x_311) == 0) -{ -obj* x_312; obj* x_313; uint8 x_314; -x_312 = lean::cnstr_get(x_311, 0); -lean::inc(x_312); -x_313 = lean::cnstr_get(x_310, 1); -lean::inc(x_313); -lean::dec(x_310); -x_314 = !lean::is_exclusive(x_311); -if (x_314 == 0) -{ -obj* x_315; obj* x_316; uint8 x_317; -x_315 = lean::cnstr_get(x_311, 2); -x_316 = lean::cnstr_get(x_311, 0); -lean::dec(x_316); -x_317 = !lean::is_exclusive(x_312); -if (x_317 == 0) -{ -obj* x_318; obj* x_319; obj* x_320; obj* x_321; obj* x_322; -x_318 = lean::cnstr_get(x_312, 0); -lean::dec(x_318); -x_319 = lean::box(0); -lean::cnstr_set(x_312, 0, x_319); -x_320 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_311, 2, x_320); -x_321 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_315, x_311); -x_322 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_309, x_321); -x_264 = x_322; -x_265 = x_313; -goto block_304; -} -else -{ -obj* x_323; obj* x_324; obj* x_325; obj* x_326; obj* x_327; obj* x_328; -x_323 = lean::cnstr_get(x_312, 1); -lean::inc(x_323); -lean::dec(x_312); -x_324 = lean::box(0); -x_325 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_325, 0, x_324); -lean::cnstr_set(x_325, 1, x_323); -x_326 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_311, 2, x_326); -lean::cnstr_set(x_311, 0, x_325); -x_327 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_315, x_311); -x_328 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_309, x_327); -x_264 = x_328; -x_265 = x_313; -goto block_304; -} -} -else -{ -obj* x_329; obj* x_330; obj* x_331; obj* x_332; obj* x_333; obj* x_334; obj* x_335; obj* x_336; obj* x_337; obj* x_338; -x_329 = lean::cnstr_get(x_311, 1); -x_330 = lean::cnstr_get(x_311, 2); -lean::inc(x_330); -lean::inc(x_329); -lean::dec(x_311); -x_331 = lean::cnstr_get(x_312, 1); -lean::inc(x_331); -if (lean::is_exclusive(x_312)) { - lean::cnstr_release(x_312, 0); - lean::cnstr_release(x_312, 1); - x_332 = x_312; -} else { - lean::dec_ref(x_312); - x_332 = lean::box(0); -} -x_333 = lean::box(0); -if (lean::is_scalar(x_332)) { - x_334 = lean::alloc_cnstr(0, 2, 0); -} else { - x_334 = x_332; -} -lean::cnstr_set(x_334, 0, x_333); -lean::cnstr_set(x_334, 1, x_331); -x_335 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_336 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_336, 0, x_334); -lean::cnstr_set(x_336, 1, x_329); -lean::cnstr_set(x_336, 2, x_335); -x_337 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_330, x_336); -x_338 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_309, x_337); -x_264 = x_338; -x_265 = x_313; -goto block_304; -} -} -else -{ -obj* x_339; uint8 x_340; -x_339 = lean::cnstr_get(x_310, 1); -lean::inc(x_339); -lean::dec(x_310); -x_340 = !lean::is_exclusive(x_311); -if (x_340 == 0) -{ -obj* x_341; -x_341 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_309, x_311); -x_264 = x_341; -x_265 = x_339; -goto block_304; -} -else -{ -obj* x_342; uint8 x_343; obj* x_344; obj* x_345; -x_342 = lean::cnstr_get(x_311, 0); -x_343 = lean::cnstr_get_scalar(x_311, sizeof(void*)*1); -lean::inc(x_342); -lean::dec(x_311); -x_344 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_344, 0, x_342); -lean::cnstr_set_scalar(x_344, sizeof(void*)*1, x_343); -x_345 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_309, x_344); -x_264 = x_345; -x_265 = x_339; -goto block_304; -} -} -} -else -{ -lean::dec(x_305); -lean::dec(x_262); -x_264 = x_306; -x_265 = x_307; -goto block_304; -} -} -} -} -else -{ -uint8 x_439; -x_439 = !lean::is_exclusive(x_259); -if (x_439 == 0) -{ -obj* x_440; -x_440 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_257, x_259); -x_92 = x_440; -x_93 = x_260; -goto block_253; -} -else -{ -obj* x_441; uint8 x_442; obj* x_443; obj* x_444; -x_441 = lean::cnstr_get(x_259, 0); -x_442 = lean::cnstr_get_scalar(x_259, sizeof(void*)*1); -lean::inc(x_441); -lean::dec(x_259); -x_443 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_443, 0, x_441); -lean::cnstr_set_scalar(x_443, sizeof(void*)*1, x_442); -x_444 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_257, x_443); -x_92 = x_444; -x_93 = x_260; -goto block_253; -} -} -} -} -} -} -} -else -{ -obj* x_670; obj* x_671; obj* x_672; obj* x_673; -x_670 = lean::box(0); -x_671 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_672 = l_mjoin___rarg___closed__1; -x_673 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Module_eoi_Parser___spec__2___rarg(x_671, x_672, x_670, x_670, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -return x_673; -} -} -} -obj* l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__2(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_logMessage___at___private_init_lean_parser_module_1__commandWrecAux___main___spec__3(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l___private_init_lean_parser_module_1__commandWrecAux___main___boxed(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_1); -lean::dec(x_1); -x_8 = l___private_init_lean_parser_module_1__commandWrecAux___main(x_7, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_2); -return x_8; -} -} -obj* l___private_init_lean_parser_module_1__commandWrecAux(uint8 x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l___private_init_lean_parser_module_1__commandWrecAux___main(x_1, x_2, x_3, x_4, x_5, x_6); -return x_7; -} -} -obj* l___private_init_lean_parser_module_1__commandWrecAux___boxed(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_1); -lean::dec(x_1); -x_8 = l___private_init_lean_parser_module_1__commandWrecAux(x_7, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_2); -return x_8; -} -} -obj* l_Lean_Parser_Module_parseCommandWithRecovery(uint8 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; uint8 x_10; -x_6 = l_String_OldIterator_remaining___main(x_4); -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_add(x_6, x_7); -lean::dec(x_6); -x_9 = l___private_init_lean_parser_module_1__commandWrecAux___main(x_1, x_8, x_2, x_3, x_4, x_5); -lean::dec(x_8); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_11); -lean::cnstr_set(x_9, 0, x_13); -return x_9; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_9); -x_16 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_15); -return x_18; -} -} -} -obj* l_Lean_Parser_Module_parseCommandWithRecovery___boxed(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_1); -lean::dec(x_1); -x_7 = l_Lean_Parser_Module_parseCommandWithRecovery(x_6, x_2, x_3, x_4, x_5); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = lean::apply_2(x_1, x_2, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_5, 0, x_10); -return x_5; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_5, 1); -lean::inc(x_11); -lean::dec(x_5); -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_11); -return x_14; -} -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_5); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = lean::cnstr_get(x_5, 0); -lean::dec(x_16); -x_17 = lean::cnstr_get(x_6, 0); -lean::inc(x_17); -lean::dec(x_6); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_5, 0, x_18); -return x_5; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_5, 1); -lean::inc(x_19); -lean::dec(x_5); -x_20 = lean::cnstr_get(x_6, 0); -lean::inc(x_20); -lean::dec(x_6); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_19); -return x_22; -} -} -} -} -obj* l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1___rarg___boxed), 4, 0); -return x_3; -} -} -obj* l_Lean_Parser_resumeModuleParser___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_MessageLog_empty; -x_6 = lean::apply_4(x_1, x_5, x_2, x_3, x_4); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_6, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_7); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; uint8 x_14; -x_12 = lean::cnstr_get(x_7, 2); -x_13 = lean::cnstr_get(x_7, 0); -lean::dec(x_13); -x_14 = !lean::is_exclusive(x_8); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_8, 0); -x_16 = lean::alloc_closure(reinterpret_cast(l_List_zip___rarg___lambda__1), 2, 1); -lean::closure_set(x_16, 0, x_15); -lean::cnstr_set(x_8, 0, x_16); -x_17 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_17); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_7); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; uint8 x_21; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_18, 1); -x_23 = lean::cnstr_get(x_18, 2); -x_24 = lean::cnstr_get(x_20, 0); -lean::inc(x_22); -x_25 = lean::apply_1(x_24, x_22); -lean::cnstr_set(x_20, 0, x_25); -x_26 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -lean::cnstr_set(x_18, 2, x_26); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_18); -lean::cnstr_set(x_6, 0, x_27); -return x_6; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_28 = lean::cnstr_get(x_18, 1); -x_29 = lean::cnstr_get(x_18, 2); -x_30 = lean::cnstr_get(x_20, 0); -x_31 = lean::cnstr_get(x_20, 1); -lean::inc(x_31); -lean::inc(x_30); -lean::dec(x_20); -lean::inc(x_28); -x_32 = lean::apply_1(x_30, x_28); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_31); -x_34 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -lean::cnstr_set(x_18, 2, x_34); -lean::cnstr_set(x_18, 0, x_33); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_18); -lean::cnstr_set(x_6, 0, x_35); -return x_6; -} -} -else -{ -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; -x_36 = lean::cnstr_get(x_18, 0); -x_37 = lean::cnstr_get(x_18, 1); -x_38 = lean::cnstr_get(x_18, 2); -lean::inc(x_38); -lean::inc(x_37); -lean::inc(x_36); -lean::dec(x_18); -x_39 = lean::cnstr_get(x_36, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_36, 1); -lean::inc(x_40); -if (lean::is_exclusive(x_36)) { - lean::cnstr_release(x_36, 0); - lean::cnstr_release(x_36, 1); - x_41 = x_36; -} else { - lean::dec_ref(x_36); - x_41 = lean::box(0); -} -lean::inc(x_37); -x_42 = lean::apply_1(x_39, x_37); -if (lean::is_scalar(x_41)) { - x_43 = lean::alloc_cnstr(0, 2, 0); -} else { - x_43 = x_41; -} -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_40); -x_44 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -x_45 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_37); -lean::cnstr_set(x_45, 2, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_45); -lean::cnstr_set(x_6, 0, x_46); -return x_6; -} -} -else -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_18); -if (x_47 == 0) -{ -lean::cnstr_set(x_6, 0, x_18); -return x_6; -} -else -{ -obj* x_48; uint8 x_49; obj* x_50; -x_48 = lean::cnstr_get(x_18, 0); -x_49 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -lean::inc(x_48); -lean::dec(x_18); -x_50 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_50, 0, x_48); -lean::cnstr_set_scalar(x_50, sizeof(void*)*1, x_49); -lean::cnstr_set(x_6, 0, x_50); -return x_6; -} -} -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_51 = lean::cnstr_get(x_8, 0); -x_52 = lean::cnstr_get(x_8, 1); -lean::inc(x_52); -lean::inc(x_51); -lean::dec(x_8); -x_53 = lean::alloc_closure(reinterpret_cast(l_List_zip___rarg___lambda__1), 2, 1); -lean::closure_set(x_53, 0, x_51); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_52); -x_55 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_55); -lean::cnstr_set(x_7, 0, x_54); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_7); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_56, 2); -lean::inc(x_59); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - lean::cnstr_release(x_56, 1); - lean::cnstr_release(x_56, 2); - x_60 = x_56; -} else { - lean::dec_ref(x_56); - x_60 = lean::box(0); -} -x_61 = lean::cnstr_get(x_57, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_57, 1); -lean::inc(x_62); -if (lean::is_exclusive(x_57)) { - lean::cnstr_release(x_57, 0); - lean::cnstr_release(x_57, 1); - x_63 = x_57; -} else { - lean::dec_ref(x_57); - x_63 = lean::box(0); -} -lean::inc(x_58); -x_64 = lean::apply_1(x_61, x_58); -if (lean::is_scalar(x_63)) { - x_65 = lean::alloc_cnstr(0, 2, 0); -} else { - x_65 = x_63; -} -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_62); -x_66 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -if (lean::is_scalar(x_60)) { - x_67 = lean::alloc_cnstr(0, 3, 0); -} else { - x_67 = x_60; -} -lean::cnstr_set(x_67, 0, x_65); -lean::cnstr_set(x_67, 1, x_58); -lean::cnstr_set(x_67, 2, x_66); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_67); -lean::cnstr_set(x_6, 0, x_68); -return x_6; -} -else -{ -obj* x_69; uint8 x_70; obj* x_71; obj* x_72; -x_69 = lean::cnstr_get(x_56, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get_scalar(x_56, sizeof(void*)*1); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - x_71 = x_56; -} else { - lean::dec_ref(x_56); - x_71 = lean::box(0); -} -if (lean::is_scalar(x_71)) { - x_72 = lean::alloc_cnstr(1, 1, 1); -} else { - x_72 = x_71; -} -lean::cnstr_set(x_72, 0, x_69); -lean::cnstr_set_scalar(x_72, sizeof(void*)*1, x_70); -lean::cnstr_set(x_6, 0, x_72); -return x_6; -} -} -} -else -{ -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; -x_73 = lean::cnstr_get(x_7, 1); -x_74 = lean::cnstr_get(x_7, 2); -lean::inc(x_74); -lean::inc(x_73); -lean::dec(x_7); -x_75 = lean::cnstr_get(x_8, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_8, 1); -lean::inc(x_76); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - x_77 = x_8; -} else { - lean::dec_ref(x_8); - x_77 = lean::box(0); -} -x_78 = lean::alloc_closure(reinterpret_cast(l_List_zip___rarg___lambda__1), 2, 1); -lean::closure_set(x_78, 0, x_75); -if (lean::is_scalar(x_77)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_77; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_76); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_81 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_81, 0, x_79); -lean::cnstr_set(x_81, 1, x_73); -lean::cnstr_set(x_81, 2, x_80); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_74, x_81); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_83 = lean::cnstr_get(x_82, 0); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_82, 1); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_82, 2); -lean::inc(x_85); -if (lean::is_exclusive(x_82)) { - lean::cnstr_release(x_82, 0); - lean::cnstr_release(x_82, 1); - lean::cnstr_release(x_82, 2); - x_86 = x_82; -} else { - lean::dec_ref(x_82); - x_86 = lean::box(0); -} -x_87 = lean::cnstr_get(x_83, 0); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_83, 1); -lean::inc(x_88); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - x_89 = x_83; -} else { - lean::dec_ref(x_83); - x_89 = lean::box(0); -} -lean::inc(x_84); -x_90 = lean::apply_1(x_87, x_84); -if (lean::is_scalar(x_89)) { - x_91 = lean::alloc_cnstr(0, 2, 0); -} else { - x_91 = x_89; -} -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_88); -x_92 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -if (lean::is_scalar(x_86)) { - x_93 = lean::alloc_cnstr(0, 3, 0); -} else { - x_93 = x_86; -} -lean::cnstr_set(x_93, 0, x_91); -lean::cnstr_set(x_93, 1, x_84); -lean::cnstr_set(x_93, 2, x_92); -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_85, x_93); -lean::cnstr_set(x_6, 0, x_94); -return x_6; -} -else -{ -obj* x_95; uint8 x_96; obj* x_97; obj* x_98; -x_95 = lean::cnstr_get(x_82, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get_scalar(x_82, sizeof(void*)*1); -if (lean::is_exclusive(x_82)) { - lean::cnstr_release(x_82, 0); - x_97 = x_82; -} else { - lean::dec_ref(x_82); - x_97 = lean::box(0); -} -if (lean::is_scalar(x_97)) { - x_98 = lean::alloc_cnstr(1, 1, 1); -} else { - x_98 = x_97; -} -lean::cnstr_set(x_98, 0, x_95); -lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96); -lean::cnstr_set(x_6, 0, x_98); -return x_6; -} -} -} -else -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -x_99 = lean::cnstr_get(x_6, 1); -lean::inc(x_99); -lean::dec(x_6); -x_100 = lean::cnstr_get(x_7, 1); -lean::inc(x_100); -x_101 = lean::cnstr_get(x_7, 2); -lean::inc(x_101); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_102 = x_7; -} else { - lean::dec_ref(x_7); - x_102 = lean::box(0); -} -x_103 = lean::cnstr_get(x_8, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_8, 1); -lean::inc(x_104); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - x_105 = x_8; -} else { - lean::dec_ref(x_8); - x_105 = lean::box(0); -} -x_106 = lean::alloc_closure(reinterpret_cast(l_List_zip___rarg___lambda__1), 2, 1); -lean::closure_set(x_106, 0, x_103); -if (lean::is_scalar(x_105)) { - x_107 = lean::alloc_cnstr(0, 2, 0); -} else { - x_107 = x_105; -} -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_107, 1, x_104); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_102)) { - x_109 = lean::alloc_cnstr(0, 3, 0); -} else { - x_109 = x_102; -} -lean::cnstr_set(x_109, 0, x_107); -lean::cnstr_set(x_109, 1, x_100); -lean::cnstr_set(x_109, 2, x_108); -x_110 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_101, x_109); -if (lean::obj_tag(x_110) == 0) -{ -obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; -x_111 = lean::cnstr_get(x_110, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_110, 1); -lean::inc(x_112); -x_113 = lean::cnstr_get(x_110, 2); -lean::inc(x_113); -if (lean::is_exclusive(x_110)) { - lean::cnstr_release(x_110, 0); - lean::cnstr_release(x_110, 1); - lean::cnstr_release(x_110, 2); - x_114 = x_110; -} else { - lean::dec_ref(x_110); - x_114 = lean::box(0); -} -x_115 = lean::cnstr_get(x_111, 0); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_111, 1); -lean::inc(x_116); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - x_117 = x_111; -} else { - lean::dec_ref(x_111); - x_117 = lean::box(0); -} -lean::inc(x_112); -x_118 = lean::apply_1(x_115, x_112); -if (lean::is_scalar(x_117)) { - x_119 = lean::alloc_cnstr(0, 2, 0); -} else { - x_119 = x_117; -} -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_119, 1, x_116); -x_120 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1; -if (lean::is_scalar(x_114)) { - x_121 = lean::alloc_cnstr(0, 3, 0); -} else { - x_121 = x_114; -} -lean::cnstr_set(x_121, 0, x_119); -lean::cnstr_set(x_121, 1, x_112); -lean::cnstr_set(x_121, 2, x_120); -x_122 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_113, x_121); -x_123 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_99); -return x_123; -} -else -{ -obj* x_124; uint8 x_125; obj* x_126; obj* x_127; obj* x_128; -x_124 = lean::cnstr_get(x_110, 0); -lean::inc(x_124); -x_125 = lean::cnstr_get_scalar(x_110, sizeof(void*)*1); -if (lean::is_exclusive(x_110)) { - lean::cnstr_release(x_110, 0); - x_126 = x_110; -} else { - lean::dec_ref(x_110); - x_126 = lean::box(0); -} -if (lean::is_scalar(x_126)) { - x_127 = lean::alloc_cnstr(1, 1, 1); -} else { - x_127 = x_126; -} -lean::cnstr_set(x_127, 0, x_124); -lean::cnstr_set_scalar(x_127, sizeof(void*)*1, x_125); -x_128 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_128, 0, x_127); -lean::cnstr_set(x_128, 1, x_99); -return x_128; -} -} -} -else -{ -uint8 x_129; -x_129 = !lean::is_exclusive(x_6); -if (x_129 == 0) -{ -obj* x_130; uint8 x_131; -x_130 = lean::cnstr_get(x_6, 0); -lean::dec(x_130); -x_131 = !lean::is_exclusive(x_7); -if (x_131 == 0) -{ -return x_6; -} -else -{ -obj* x_132; uint8 x_133; obj* x_134; -x_132 = lean::cnstr_get(x_7, 0); -x_133 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_132); -lean::dec(x_7); -x_134 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_134, 0, x_132); -lean::cnstr_set_scalar(x_134, sizeof(void*)*1, x_133); -lean::cnstr_set(x_6, 0, x_134); -return x_6; -} -} -else -{ -obj* x_135; obj* x_136; uint8 x_137; obj* x_138; obj* x_139; obj* x_140; -x_135 = lean::cnstr_get(x_6, 1); -lean::inc(x_135); -lean::dec(x_6); -x_136 = lean::cnstr_get(x_7, 0); -lean::inc(x_136); -x_137 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_138 = x_7; -} else { - lean::dec_ref(x_7); - x_138 = lean::box(0); -} -if (lean::is_scalar(x_138)) { - x_139 = lean::alloc_cnstr(1, 1, 1); -} else { - x_139 = x_138; -} -lean::cnstr_set(x_139, 0, x_136); -lean::cnstr_set_scalar(x_139, sizeof(void*)*1, x_137); -x_140 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_140, 0, x_139); -lean::cnstr_set(x_140, 1, x_135); -return x_140; -} -} -} -} -obj* l_Lean_Parser_resumeModuleParser___rarg(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_9; uint8 x_10; -lean::inc(x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_resumeModuleParser___rarg___lambda__1), 4, 2); -lean::closure_set(x_5, 0, x_4); -lean::closure_set(x_5, 1, x_1); -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_String_splitAux___main___closed__1; -x_8 = l_Lean_Parser_run___rarg___closed__1; -x_9 = l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1___rarg(x_5, x_6, x_7, x_8); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = lean::cnstr_get(x_9, 1); -lean::dec(x_12); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_13; -lean::dec(x_3); -x_13 = !lean::is_exclusive(x_11); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_11, 0); -x_15 = lean::cnstr_get(x_14, 3); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_1, 0); -lean::inc(x_16); -lean::dec(x_1); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -lean::dec(x_16); -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -lean::dec(x_17); -x_19 = l_Lean_Parser_messageOfParsecMessage___rarg(x_18, x_14); -lean::dec(x_18); -lean::cnstr_set(x_11, 0, x_19); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_20; -x_20 = lean::box(3); -lean::cnstr_set(x_9, 1, x_11); -lean::cnstr_set(x_9, 0, x_20); -return x_9; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_15, 0); -lean::inc(x_21); -lean::dec(x_15); -lean::cnstr_set(x_9, 1, x_11); -lean::cnstr_set(x_9, 0, x_21); -return x_9; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_22 = lean::cnstr_get(x_11, 0); -lean::inc(x_22); -lean::dec(x_11); -x_23 = lean::cnstr_get(x_22, 3); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_1, 0); -lean::inc(x_24); -lean::dec(x_1); -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -lean::dec(x_24); -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::dec(x_25); -x_27 = l_Lean_Parser_messageOfParsecMessage___rarg(x_26, x_22); -lean::dec(x_26); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_29; -x_29 = lean::box(3); -lean::cnstr_set(x_9, 1, x_28); -lean::cnstr_set(x_9, 0, x_29); -return x_9; -} -else -{ -obj* x_30; -x_30 = lean::cnstr_get(x_23, 0); -lean::inc(x_30); -lean::dec(x_23); -lean::cnstr_set(x_9, 1, x_28); -lean::cnstr_set(x_9, 0, x_30); -return x_9; -} -} -} -else -{ -uint8 x_31; -lean::free_heap_obj(x_9); -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_11); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; uint8 x_35; -x_32 = lean::cnstr_get(x_11, 0); -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_32, 1); -lean::inc(x_34); -lean::dec(x_32); -x_35 = !lean::is_exclusive(x_33); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; obj* x_38; uint8 x_39; -x_36 = lean::cnstr_get(x_33, 0); -x_37 = lean::cnstr_get(x_33, 1); -x_38 = lean::apply_1(x_3, x_36); -x_39 = !lean::is_exclusive(x_38); -if (x_39 == 0) -{ -obj* x_40; uint8 x_41; -x_40 = lean::cnstr_get(x_38, 1); -x_41 = !lean::is_exclusive(x_40); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_38, 0); -x_43 = lean::cnstr_get(x_40, 0); -lean::dec(x_43); -lean::cnstr_set(x_40, 0, x_37); -lean::cnstr_set(x_38, 1, x_34); -lean::cnstr_set(x_38, 0, x_40); -lean::cnstr_set(x_11, 0, x_38); -lean::cnstr_set(x_33, 1, x_11); -lean::cnstr_set(x_33, 0, x_42); -return x_33; -} -else -{ -obj* x_44; uint8 x_45; obj* x_46; -x_44 = lean::cnstr_get(x_38, 0); -x_45 = lean::cnstr_get_scalar(x_40, sizeof(void*)*1); -lean::dec(x_40); -x_46 = lean::alloc_cnstr(0, 1, 1); -lean::cnstr_set(x_46, 0, x_37); -lean::cnstr_set_scalar(x_46, sizeof(void*)*1, x_45); -lean::cnstr_set(x_38, 1, x_34); -lean::cnstr_set(x_38, 0, x_46); -lean::cnstr_set(x_11, 0, x_38); -lean::cnstr_set(x_33, 1, x_11); -lean::cnstr_set(x_33, 0, x_44); -return x_33; -} -} -else -{ -obj* x_47; obj* x_48; uint8 x_49; obj* x_50; obj* x_51; obj* x_52; -x_47 = lean::cnstr_get(x_38, 1); -x_48 = lean::cnstr_get(x_38, 0); -lean::inc(x_47); -lean::inc(x_48); -lean::dec(x_38); -x_49 = lean::cnstr_get_scalar(x_47, sizeof(void*)*1); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - x_50 = x_47; -} else { - lean::dec_ref(x_47); - x_50 = lean::box(0); -} -if (lean::is_scalar(x_50)) { - x_51 = lean::alloc_cnstr(0, 1, 1); -} else { - x_51 = x_50; -} -lean::cnstr_set(x_51, 0, x_37); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_49); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_34); -lean::cnstr_set(x_11, 0, x_52); -lean::cnstr_set(x_33, 1, x_11); -lean::cnstr_set(x_33, 0, x_48); -return x_33; -} -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; uint8 x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_53 = lean::cnstr_get(x_33, 0); -x_54 = lean::cnstr_get(x_33, 1); -lean::inc(x_54); -lean::inc(x_53); -lean::dec(x_33); -x_55 = lean::apply_1(x_3, x_53); -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 0); -lean::inc(x_57); -if (lean::is_exclusive(x_55)) { - lean::cnstr_release(x_55, 0); - lean::cnstr_release(x_55, 1); - x_58 = x_55; -} else { - lean::dec_ref(x_55); - x_58 = lean::box(0); -} -x_59 = lean::cnstr_get_scalar(x_56, sizeof(void*)*1); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - x_60 = x_56; -} else { - lean::dec_ref(x_56); - x_60 = lean::box(0); -} -if (lean::is_scalar(x_60)) { - x_61 = lean::alloc_cnstr(0, 1, 1); -} else { - x_61 = x_60; -} -lean::cnstr_set(x_61, 0, x_54); -lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_59); -if (lean::is_scalar(x_58)) { - x_62 = lean::alloc_cnstr(0, 2, 0); -} else { - x_62 = x_58; -} -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_34); -lean::cnstr_set(x_11, 0, x_62); -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_57); -lean::cnstr_set(x_63, 1, x_11); -return x_63; -} -} -else -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_64 = lean::cnstr_get(x_11, 0); -lean::inc(x_64); -lean::dec(x_11); -x_65 = lean::cnstr_get(x_64, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_64, 1); -lean::inc(x_66); -lean::dec(x_64); -x_67 = lean::cnstr_get(x_65, 0); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_65, 1); -lean::inc(x_68); -if (lean::is_exclusive(x_65)) { - lean::cnstr_release(x_65, 0); - lean::cnstr_release(x_65, 1); - x_69 = x_65; -} else { - lean::dec_ref(x_65); - x_69 = lean::box(0); -} -x_70 = lean::apply_1(x_3, x_67); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_70, 0); -lean::inc(x_72); -if (lean::is_exclusive(x_70)) { - lean::cnstr_release(x_70, 0); - lean::cnstr_release(x_70, 1); - x_73 = x_70; -} else { - lean::dec_ref(x_70); - x_73 = lean::box(0); -} -x_74 = lean::cnstr_get_scalar(x_71, sizeof(void*)*1); -if (lean::is_exclusive(x_71)) { - lean::cnstr_release(x_71, 0); - x_75 = x_71; -} else { - lean::dec_ref(x_71); - x_75 = lean::box(0); -} -if (lean::is_scalar(x_75)) { - x_76 = lean::alloc_cnstr(0, 1, 1); -} else { - x_76 = x_75; -} -lean::cnstr_set(x_76, 0, x_68); -lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_74); -if (lean::is_scalar(x_73)) { - x_77 = lean::alloc_cnstr(0, 2, 0); -} else { - x_77 = x_73; -} -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_66); -x_78 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_78, 0, x_77); -if (lean::is_scalar(x_69)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_69; -} -lean::cnstr_set(x_79, 0, x_72); -lean::cnstr_set(x_79, 1, x_78); -return x_79; -} -} -} -else -{ -obj* x_80; -x_80 = lean::cnstr_get(x_9, 0); -lean::inc(x_80); -lean::dec(x_9); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; -lean::dec(x_3); -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - x_82 = x_80; -} else { - lean::dec_ref(x_80); - x_82 = lean::box(0); -} -x_83 = lean::cnstr_get(x_81, 3); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_1, 0); -lean::inc(x_84); -lean::dec(x_1); -x_85 = lean::cnstr_get(x_84, 0); -lean::inc(x_85); -lean::dec(x_84); -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -lean::dec(x_85); -x_87 = l_Lean_Parser_messageOfParsecMessage___rarg(x_86, x_81); -lean::dec(x_86); -if (lean::is_scalar(x_82)) { - x_88 = lean::alloc_cnstr(0, 1, 0); -} else { - x_88 = x_82; -} -lean::cnstr_set(x_88, 0, x_87); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_89; obj* x_90; -x_89 = lean::box(3); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_88); -return x_90; -} -else -{ -obj* x_91; obj* x_92; -x_91 = lean::cnstr_get(x_83, 0); -lean::inc(x_91); -lean::dec(x_83); -x_92 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_88); -return x_92; -} -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; uint8 x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; -lean::dec(x_1); -x_93 = lean::cnstr_get(x_80, 0); -lean::inc(x_93); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - x_94 = x_80; -} else { - lean::dec_ref(x_80); - x_94 = lean::box(0); -} -x_95 = lean::cnstr_get(x_93, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_93, 1); -lean::inc(x_96); -lean::dec(x_93); -x_97 = lean::cnstr_get(x_95, 0); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_95, 1); -lean::inc(x_98); -if (lean::is_exclusive(x_95)) { - lean::cnstr_release(x_95, 0); - lean::cnstr_release(x_95, 1); - x_99 = x_95; -} else { - lean::dec_ref(x_95); - x_99 = lean::box(0); -} -x_100 = lean::apply_1(x_3, x_97); -x_101 = lean::cnstr_get(x_100, 1); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 0); -lean::inc(x_102); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - lean::cnstr_release(x_100, 1); - x_103 = x_100; -} else { - lean::dec_ref(x_100); - x_103 = lean::box(0); -} -x_104 = lean::cnstr_get_scalar(x_101, sizeof(void*)*1); -if (lean::is_exclusive(x_101)) { - lean::cnstr_release(x_101, 0); - x_105 = x_101; -} else { - lean::dec_ref(x_101); - x_105 = lean::box(0); -} -if (lean::is_scalar(x_105)) { - x_106 = lean::alloc_cnstr(0, 1, 1); -} else { - x_106 = x_105; -} -lean::cnstr_set(x_106, 0, x_98); -lean::cnstr_set_scalar(x_106, sizeof(void*)*1, x_104); -if (lean::is_scalar(x_103)) { - x_107 = lean::alloc_cnstr(0, 2, 0); -} else { - x_107 = x_103; -} -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_107, 1, x_96); -if (lean::is_scalar(x_94)) { - x_108 = lean::alloc_cnstr(1, 1, 0); -} else { - x_108 = x_94; -} -lean::cnstr_set(x_108, 0, x_107); -if (lean::is_scalar(x_99)) { - x_109 = lean::alloc_cnstr(0, 2, 0); -} else { - x_109 = x_99; -} -lean::cnstr_set(x_109, 0, x_102); -lean::cnstr_set(x_109, 1, x_108); -return x_109; -} -} -} -} -obj* l_Lean_Parser_resumeModuleParser(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_resumeModuleParser___rarg), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_ParsecT_runFrom___at_Lean_Parser_resumeModuleParser___spec__1___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_3); -return x_5; -} -} -obj* l_StateT_bind___at_Lean_Parser_parseHeader___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_4); -x_7 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint8 x_16; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -lean::dec(x_7); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 2); -lean::inc(x_12); -lean::dec(x_8); -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_9, 1); -lean::inc(x_14); -lean::dec(x_9); -x_15 = lean::apply_5(x_2, x_13, x_14, x_4, x_11, x_10); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 0); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_17); -lean::cnstr_set(x_15, 0, x_18); -return x_15; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_15, 0); -x_20 = lean::cnstr_get(x_15, 1); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_15); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_19); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -return x_22; -} -} -else -{ -uint8 x_23; -lean::dec(x_4); -lean::dec(x_2); -x_23 = !lean::is_exclusive(x_7); -if (x_23 == 0) -{ -obj* x_24; uint8 x_25; -x_24 = lean::cnstr_get(x_7, 0); -lean::dec(x_24); -x_25 = !lean::is_exclusive(x_8); -if (x_25 == 0) -{ -return x_7; -} -else -{ -obj* x_26; uint8 x_27; obj* x_28; -x_26 = lean::cnstr_get(x_8, 0); -x_27 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_26); -lean::dec(x_8); -x_28 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set_scalar(x_28, sizeof(void*)*1, x_27); -lean::cnstr_set(x_7, 0, x_28); -return x_7; -} -} -else -{ -obj* x_29; obj* x_30; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_7, 1); -lean::inc(x_29); -lean::dec(x_7); -x_30 = lean::cnstr_get(x_8, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_32 = x_8; -} else { - lean::dec_ref(x_8); - x_32 = lean::box(0); -} -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(1, 1, 1); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_30); -lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_31); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_29); -return x_34; -} -} -} -} -obj* l_StateT_bind___at_Lean_Parser_parseHeader___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_StateT_bind___at_Lean_Parser_parseHeader___spec__1___rarg), 6, 0); -return x_3; -} -} -obj* l_Lean_Parser_parseHeader___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -return x_3; -} -} -obj* l_Lean_Parser_parseHeader___lambda__2(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; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 0); -x_7 = l_Lean_Parser_whitespace(x_6, x_3, x_4); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; uint8 x_12; -x_10 = lean::cnstr_get(x_7, 1); -x_11 = lean::cnstr_get(x_7, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_8); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_8, 0); -x_14 = lean::cnstr_get(x_8, 2); -lean::cnstr_set(x_7, 1, x_1); -lean::cnstr_set(x_7, 0, x_13); -x_15 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_15); -lean::cnstr_set(x_8, 0, x_7); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_8); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_10); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_18 = lean::cnstr_get(x_8, 0); -x_19 = lean::cnstr_get(x_8, 1); -x_20 = lean::cnstr_get(x_8, 2); -lean::inc(x_20); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_8); -lean::cnstr_set(x_7, 1, x_1); -lean::cnstr_set(x_7, 0, x_18); -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_7); -lean::cnstr_set(x_22, 1, x_19); -lean::cnstr_set(x_22, 2, x_21); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_22); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_10); -return x_24; -} -} -else -{ -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; -x_25 = lean::cnstr_get(x_7, 1); -lean::inc(x_25); -lean::dec(x_7); -x_26 = lean::cnstr_get(x_8, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_8, 1); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_8, 2); -lean::inc(x_28); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_29 = x_8; -} else { - lean::dec_ref(x_8); - x_29 = lean::box(0); -} -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_29)) { - x_32 = lean::alloc_cnstr(0, 3, 0); -} else { - x_32 = x_29; -} -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_27); -lean::cnstr_set(x_32, 2, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_28, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_25); -return x_34; -} -} -else -{ -uint8 x_35; -lean::dec(x_1); -x_35 = !lean::is_exclusive(x_7); -if (x_35 == 0) -{ -obj* x_36; uint8 x_37; -x_36 = lean::cnstr_get(x_7, 0); -lean::dec(x_36); -x_37 = !lean::is_exclusive(x_8); -if (x_37 == 0) -{ -return x_7; -} -else -{ -obj* x_38; uint8 x_39; obj* x_40; -x_38 = lean::cnstr_get(x_8, 0); -x_39 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_38); -lean::dec(x_8); -x_40 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set_scalar(x_40, sizeof(void*)*1, x_39); -lean::cnstr_set(x_7, 0, x_40); -return x_7; -} -} -else -{ -obj* x_41; obj* x_42; uint8 x_43; obj* x_44; obj* x_45; obj* x_46; -x_41 = lean::cnstr_get(x_7, 1); -lean::inc(x_41); -lean::dec(x_7); -x_42 = lean::cnstr_get(x_8, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_44 = x_8; -} else { - lean::dec_ref(x_8); - x_44 = lean::box(0); -} -if (lean::is_scalar(x_44)) { - x_45 = lean::alloc_cnstr(1, 1, 1); -} else { - x_45 = x_44; -} -lean::cnstr_set(x_45, 0, x_42); -lean::cnstr_set_scalar(x_45, sizeof(void*)*1, x_43); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_41); -return x_46; -} -} -} -} -obj* l_Lean_Parser_parseHeader___lambda__3(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; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_Module_header_Parser(x_7, x_4, x_5); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; uint8 x_13; -x_11 = lean::cnstr_get(x_8, 1); -x_12 = lean::cnstr_get(x_8, 0); -lean::dec(x_12); -x_13 = !lean::is_exclusive(x_9); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 2); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set(x_8, 0, x_14); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_9, 2, x_16); -lean::cnstr_set(x_9, 0, x_8); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_9); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_11); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_19 = lean::cnstr_get(x_9, 0); -x_20 = lean::cnstr_get(x_9, 1); -x_21 = lean::cnstr_get(x_9, 2); -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_9); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set(x_8, 0, x_19); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_8); -lean::cnstr_set(x_23, 1, x_20); -lean::cnstr_set(x_23, 2, x_22); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_11); -return x_25; -} -} -else -{ -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; -x_26 = lean::cnstr_get(x_8, 1); -lean::inc(x_26); -lean::dec(x_8); -x_27 = lean::cnstr_get(x_9, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_9, 1); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_9, 2); -lean::inc(x_29); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_30 = x_9; -} else { - lean::dec_ref(x_9); - x_30 = lean::box(0); -} -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_27); -lean::cnstr_set(x_31, 1, x_2); -x_32 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_30)) { - x_33 = lean::alloc_cnstr(0, 3, 0); -} else { - x_33 = x_30; -} -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_28); -lean::cnstr_set(x_33, 2, x_32); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_26); -return x_35; -} -} -else -{ -uint8 x_36; -lean::dec(x_2); -x_36 = !lean::is_exclusive(x_8); -if (x_36 == 0) -{ -obj* x_37; uint8 x_38; -x_37 = lean::cnstr_get(x_8, 0); -lean::dec(x_37); -x_38 = !lean::is_exclusive(x_9); -if (x_38 == 0) -{ -return x_8; -} -else -{ -obj* x_39; uint8 x_40; obj* x_41; -x_39 = lean::cnstr_get(x_9, 0); -x_40 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_39); -lean::dec(x_9); -x_41 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_41, 0, x_39); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_40); -lean::cnstr_set(x_8, 0, x_41); -return x_8; -} -} -else -{ -obj* x_42; obj* x_43; uint8 x_44; obj* x_45; obj* x_46; obj* x_47; -x_42 = lean::cnstr_get(x_8, 1); -lean::inc(x_42); -lean::dec(x_8); -x_43 = lean::cnstr_get(x_9, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_45 = x_9; -} else { - lean::dec_ref(x_9); - x_45 = lean::box(0); -} -if (lean::is_scalar(x_45)) { - x_46 = lean::alloc_cnstr(1, 1, 1); -} else { - x_46 = x_45; -} -lean::cnstr_set(x_46, 0, x_43); -lean::cnstr_set_scalar(x_46, sizeof(void*)*1, x_44); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_42); -return x_47; -} -} -} -} -obj* _init_l_Lean_Parser_parseHeader___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHeader___lambda__2___boxed), 4, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHeader___lambda__3___boxed), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_StateT_bind___at_Lean_Parser_parseHeader___spec__1___rarg), 6, 2); -lean::closure_set(x_3, 0, x_1); -lean::closure_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_parseHeader(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -lean::cnstr_set(x_7, 2, x_6); -x_8 = 0; -x_9 = lean::alloc_cnstr(0, 1, 1); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set_scalar(x_9, sizeof(void*)*1, x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHeader___lambda__1), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = l_Lean_Parser_parseHeader___closed__1; -x_12 = l_Lean_Parser_resumeModuleParser___rarg(x_1, x_9, x_10, x_11); -return x_12; -} -} -obj* l_Lean_Parser_parseHeader___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_parseHeader___lambda__2(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_parseHeader___lambda__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_parseHeader___lambda__3(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_parseCommand___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_1); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; uint8 x_7; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = lean::unbox(x_5); -lean::dec(x_5); -lean::cnstr_set_scalar(x_1, sizeof(void*)*1, x_7); -lean::cnstr_set(x_2, 1, x_1); -lean::cnstr_set(x_2, 0, x_6); -return x_2; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_2, 0); -x_9 = lean::cnstr_get(x_2, 1); -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -lean::dec(x_1); -x_11 = lean::alloc_cnstr(0, 1, 1); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::unbox(x_8); -lean::dec(x_8); -lean::cnstr_set_scalar(x_11, sizeof(void*)*1, x_12); -lean::cnstr_set(x_2, 1, x_11); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; obj* x_19; -x_13 = lean::cnstr_get(x_2, 0); -x_14 = lean::cnstr_get(x_2, 1); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_2); -x_15 = lean::cnstr_get(x_1, 0); -lean::inc(x_15); -if (lean::is_exclusive(x_1)) { - lean::cnstr_release(x_1, 0); - x_16 = x_1; -} else { - lean::dec_ref(x_1); - x_16 = lean::box(0); -} -if (lean::is_scalar(x_16)) { - x_17 = lean::alloc_cnstr(0, 1, 1); -} else { - x_17 = x_16; -} -lean::cnstr_set(x_17, 0, x_15); -x_18 = lean::unbox(x_13); -lean::dec(x_13); -lean::cnstr_set_scalar(x_17, sizeof(void*)*1, x_18); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_14); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -obj* l_Lean_Parser_parseCommand(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; obj* x_5; obj* x_6; obj* x_7; -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseCommand___lambda__1), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); -x_5 = lean::box(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Module_parseCommandWithRecovery___boxed), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = l_Lean_Parser_resumeModuleParser___rarg(x_1, x_2, x_3, x_6); -return x_7; -} -} -obj* initialize_init_lean_parser_command(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_module(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_command(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_ModuleParserM_Monad = _init_l_Lean_Parser_ModuleParserM_Monad(); -lean::mark_persistent(l_Lean_Parser_ModuleParserM_Monad); -l_Lean_Parser_ModuleParserM_Alternative = _init_l_Lean_Parser_ModuleParserM_Alternative(); -lean::mark_persistent(l_Lean_Parser_ModuleParserM_Alternative); -l_Lean_Parser_ModuleParserM_MonadReader = _init_l_Lean_Parser_ModuleParserM_MonadReader(); -lean::mark_persistent(l_Lean_Parser_ModuleParserM_MonadReader); -l_Lean_Parser_ModuleParserM_MonadState = _init_l_Lean_Parser_ModuleParserM_MonadState(); -lean::mark_persistent(l_Lean_Parser_ModuleParserM_MonadState); -l_Lean_Parser_ModuleParserM_Lean_Parser_MonadParsec = _init_l_Lean_Parser_ModuleParserM_Lean_Parser_MonadParsec(); -lean::mark_persistent(l_Lean_Parser_ModuleParserM_Lean_Parser_MonadParsec); -l_Lean_Parser_ModuleParserM_MonadExcept = _init_l_Lean_Parser_ModuleParserM_MonadExcept(); -lean::mark_persistent(l_Lean_Parser_ModuleParserM_MonadExcept); -l_Lean_Parser_ModuleParserM_BasicParserM___closed__1 = _init_l_Lean_Parser_ModuleParserM_BasicParserM___closed__1(); -lean::mark_persistent(l_Lean_Parser_ModuleParserM_BasicParserM___closed__1); -l_Lean_Parser_Module_prelude = _init_l_Lean_Parser_Module_prelude(); -lean::mark_persistent(l_Lean_Parser_Module_prelude); -l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_prelude_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Module_prelude_HasView_x27 = _init_l_Lean_Parser_Module_prelude_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Module_prelude_HasView_x27); -l_Lean_Parser_Module_prelude_HasView = _init_l_Lean_Parser_Module_prelude_HasView(); -lean::mark_persistent(l_Lean_Parser_Module_prelude_HasView); -l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasView); -l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Module_prelude_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Module_prelude_Parser___closed__1 = _init_l_Lean_Parser_Module_prelude_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_prelude_Parser___closed__1); -l_Lean_Parser_Module_importPath = _init_l_Lean_Parser_Module_importPath(); -lean::mark_persistent(l_Lean_Parser_Module_importPath); -l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Module_importPath_HasView_x27 = _init_l_Lean_Parser_Module_importPath_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_HasView_x27); -l_Lean_Parser_Module_importPath_HasView = _init_l_Lean_Parser_Module_importPath_HasView(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_HasView); -l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasView); -l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Module_importPath_Parser___closed__1 = _init_l_Lean_Parser_Module_importPath_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_importPath_Parser___closed__1); -l_Lean_Parser_Module_import = _init_l_Lean_Parser_Module_import(); -lean::mark_persistent(l_Lean_Parser_Module_import); -l_Lean_Parser_Module_import_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Module_import_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_import_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Module_import_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Module_import_HasView_x27 = _init_l_Lean_Parser_Module_import_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Module_import_HasView_x27); -l_Lean_Parser_Module_import_HasView = _init_l_Lean_Parser_Module_import_HasView(); -lean::mark_persistent(l_Lean_Parser_Module_import_HasView); -l_Lean_Parser_Module_import_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Module_import_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Module_import_Parser_Lean_Parser_HasView); -l_Lean_Parser_Module_import_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Module_import_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Module_import_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Module_import_Parser___closed__1 = _init_l_Lean_Parser_Module_import_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_import_Parser___closed__1); -l_Lean_Parser_Module_header = _init_l_Lean_Parser_Module_header(); -lean::mark_persistent(l_Lean_Parser_Module_header); -l_Lean_Parser_Module_header_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Module_header_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__6 = _init_l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView_x27___lambda__1___closed__6); -l_Lean_Parser_Module_header_HasView_x27 = _init_l_Lean_Parser_Module_header_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView_x27); -l_Lean_Parser_Module_header_HasView = _init_l_Lean_Parser_Module_header_HasView(); -lean::mark_persistent(l_Lean_Parser_Module_header_HasView); -l_Lean_Parser_Module_header_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Module_header_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Module_header_Parser_Lean_Parser_HasView); -l_Lean_Parser_Module_header_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Module_header_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Module_header_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Module_header_Parser___closed__1 = _init_l_Lean_Parser_Module_header_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Module_header_Parser___closed__1); -l_Lean_Parser_Module_eoi = _init_l_Lean_Parser_Module_eoi(); -lean::mark_persistent(l_Lean_Parser_Module_eoi); -l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1 = _init_l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_Module_eoi_Parser___spec__1___closed__1); -l___private_init_lean_parser_module_1__commandWrecAux___main___closed__1 = _init_l___private_init_lean_parser_module_1__commandWrecAux___main___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_module_1__commandWrecAux___main___closed__1); -l___private_init_lean_parser_module_1__commandWrecAux___main___closed__2 = _init_l___private_init_lean_parser_module_1__commandWrecAux___main___closed__2(); -lean::mark_persistent(l___private_init_lean_parser_module_1__commandWrecAux___main___closed__2); -l___private_init_lean_parser_module_1__commandWrecAux___main___closed__3 = _init_l___private_init_lean_parser_module_1__commandWrecAux___main___closed__3(); -lean::mark_persistent(l___private_init_lean_parser_module_1__commandWrecAux___main___closed__3); -l_Lean_Parser_parseHeader___closed__1 = _init_l_Lean_Parser_parseHeader___closed__1(); -lean::mark_persistent(l_Lean_Parser_parseHeader___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/notation.cpp b/src/stage0/init/lean/parser/notation.cpp deleted file mode 100644 index 7bd3c336db..0000000000 --- a/src/stage0/init/lean/parser/notation.cpp +++ /dev/null @@ -1,23813 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.notation -// Imports: init.lean.parser.token -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_withTrailing___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_command_reserveMixfix_HasView_x27; -obj* l_Lean_Parser_command_notation_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_transition_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_4__mkStringResult___rarg(obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_mixfix_kind_Parser___closed__1; -obj* l_Lean_Parser_raw_view___rarg(obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_transition_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_precedenceLit; -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_binder; -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_Lean_Parser_command_notation_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder; -obj* l_Lean_Parser_raw_view___rarg___lambda__1___boxed(obj*); -extern obj* l_Lean_Parser_TermParserM_Lean_Parser_MonadRec; -obj* l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasView(obj*); -obj* l_Lean_Parser_command_NotationSpec_transition; -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_command_notationLike_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_reserveNotation_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_tokens___rarg(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView; -obj* l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasView; -obj* l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_notation_Parser_Lean_Parser_HasTokens; -uint8 l_String_isEmpty(obj*); -obj* l_Lean_Parser_command_reserveMixfix; -obj* l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_unquotedSymbol_tokens; -obj* l_Lean_Parser_command_NotationSpec_transition_Parser___closed__1; -obj* l_Lean_Parser_command_mixfix_HasView_x27; -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__7; -obj* l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27; -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_command_NotationSpec_transition_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__4; -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -extern obj* l_Lean_Parser_finishCommentBlock___closed__2; -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_mixfix; -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__6___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_notationLike_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_actionKind_HasView; -obj* l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_foldAction_HasView; -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1; -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_reserveMixfix_HasView; -obj* l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_binders_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_RecT_recurse___at_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__2; -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -obj* l_Function_comp___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj*, obj*); -uint32 l_String_OldIterator_curr___main(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27; -obj* l_List_reverse___rarg(obj*); -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3(obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_scopedAction_HasView; -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___closed__1; -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4(obj*); -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___boxed(obj*); -obj* l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5(obj*, obj*); -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -extern obj* l_Lean_Parser_TermParserM_Alternative; -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedence_Parser___closed__1; -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -obj* l_String_OldIterator_remaining___main(obj*); -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -obj* l_Lean_Parser_command_reserveNotation_Parser___closed__1; -obj* l_List_map___main___rarg(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol; -obj* l_Lean_Parser_Combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_argument_HasView; -obj* l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_notationLike_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_reserveNotation_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens; -extern obj* l_Lean_Parser_number_HasView; -obj* l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_binder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedence; -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView; -obj* l_Lean_Parser_Substring_toString(obj*); -obj* l_Lean_Parser_command_notationLike_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1(obj*); -obj* l_Lean_Parser_command_mixfix_HasView; -obj* l_Lean_Parser_command_NotationSpec_HasView; -obj* l_Lean_Parser_command_reserveNotation_HasView; -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_notationLike; -obj* l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*); -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1___closed__1; -namespace lean { -obj* string_push(obj*, uint32); -} -obj* l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_rule_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27; -obj* l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_scopedAction; -obj* l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasView___closed__1; -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_whitespace(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_HasView; -extern obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_notation_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_foldAction_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_mkRawRes(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_action_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_kind; -obj* l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Combinators_recurse_view___rarg(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_action_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens; -obj* l___private_init_lean_parser_parsec_2__strAux___main(obj*, obj*, obj*); -obj* l_Lean_Parser_command_notation_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote; -obj* l_Lean_Parser_Term_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_action; -obj* l_Lean_Parser_command_mixfix_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__3; -obj* l_ReaderT_orelse___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__2(obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_notationLike_HasView; -obj* l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1; -extern obj* l_Lean_Parser_number; -obj* l_Lean_Parser_command_NotationSpec_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1(obj*); -obj* l_String_OldIterator_next___main(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol; -obj* l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -extern obj* l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_Parser___closed__1; -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_binders_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_foldl___main___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_actionKind; -obj* l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -obj* l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__2; -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__1; -extern obj* l_Lean_Parser_noKind; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_rule_HasView; -obj* l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens; -obj* l_List_append___rarg(obj*, obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4; -extern "C" obj* lean_name_mk_string(obj*, obj*); -extern obj* l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj*, obj*); -uint8 l_String_OldIterator_hasNext___main(obj*); -obj* l_Lean_Parser_Term_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_argument; -obj* l_Lean_Parser_command_notation; -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView; -obj* l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27; -obj* l_Lean_Parser_tokens___rarg(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_View_toNat___main(obj*); -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_Parser(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj*); -obj* l_Lean_Parser_raw_view___rarg___lambda__2___boxed(obj*); -obj* l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat(obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_View_toNat(obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm; -obj* l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___elambda__1(obj*); -obj* l___private_init_lean_parser_token_3__updateTrailing___main(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__2; -namespace lean { -uint8 string_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_command_NotationSpec_rule_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_foldAction_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_label_view___rarg(obj*, obj*, obj*, obj*, obj*); -uint8 l_UInt32_decEq(uint32, uint32); -obj* l_Lean_Parser_command_notation_HasView; -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2(obj*); -obj* l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_mixfix_kind_HasView; -obj* l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_reserveMixfix_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_maxPrec; -obj* l_Lean_Parser_command_NotationSpec_action_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser(obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4(obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__5; -obj* l_Lean_Parser_command_NotationSpec_action_HasView_x27; -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__6(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___boxed(obj*); -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_command_NotationSpec_binders; -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__4; -obj* l_String_trim(obj*); -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__5; -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_transition_HasView; -extern obj* l_Lean_Parser_TermParserM_Monad; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_binder_HasView; -extern "C" obj* lean_name_mk_numeral(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp; -obj* l_Lean_Parser_command_NotationSpec_binders_HasView; -obj* l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_token(obj*, obj*, obj*); -obj* l_Lean_Parser_command_mixfix_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_List_cons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_mixfix_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__4___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_reserveMixfix_Parser___closed__1; -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_notationLike_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -obj* l_ReaderT_orelse___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_NotationSpec_foldAction; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Parser_TermParserM_Lean_Parser_monadBasicParser; -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6; -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser___rarg(obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___elambda__1(obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_notation_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_rule_Parser___closed__1; -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_command_mixfix_kind_Parser(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_TermParserM_MonadExcept; -obj* l_String_quote(obj*); -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_rule; -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Substring_ofString(obj*); -obj* l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -obj* l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7(obj*, uint8, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_notation_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_command_NotationSpec_binder_HasView_x27; -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_command_NotationSpec_unquotedSymbol_View; -obj* l_Lean_Parser_command_reserveNotation; -obj* l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1___rarg(obj*, obj*); -extern obj* l_Lean_Parser_Combinators_many___rarg___closed__1; -obj* l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_precedence_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27; -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_command_NotationSpec; -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed(obj*); -obj* l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView; -obj* l_Lean_Parser_command_reserveMixfix_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_number_View_toNat___main(obj*); -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__2; -extern obj* l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -extern obj* l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_command_NotationSpec_rule_HasView_x27; -obj* l_Lean_Parser_command_NotationSpec_action_HasView; -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__1; -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasTokens; -namespace lean { -obj* string_length(obj*); -} -obj* l_Lean_Parser_RecT_recurse___at_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::apply_5(x_2, x_1, x_3, x_4, x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_Parser_Lean_Parser_HasView___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("Term"); -return x_1; -} -} -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasView(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::inc(x_1); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___at_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = l_Lean_Parser_TermParserM_Lean_Parser_MonadRec; -x_4 = l_Lean_Parser_Combinators_recurse_view___rarg(x_1, x_3); -lean::dec(x_1); -x_5 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_6 = l_Lean_Parser_TermParserM_Alternative; -x_7 = l_Lean_Parser_Term_Parser_Lean_Parser_HasView___closed__1; -x_8 = l_Lean_Parser_Combinators_label_view___rarg(x_5, x_6, x_2, x_7, x_4); -lean::dec(x_2); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("Term"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_Parser(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; -x_7 = lean::apply_5(x_2, x_1, x_3, x_4, x_5, x_6); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = l_Lean_Parser_Term_Parser___closed__1; -x_11 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_9, x_10); -lean::cnstr_set(x_7, 0, x_11); -return x_7; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_7, 0); -x_13 = lean::cnstr_get(x_7, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_7); -x_14 = l_Lean_Parser_Term_Parser___closed__1; -x_15 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_12, x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_13); -return x_16; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceLit() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("precedenceLit"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_number_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_NotationSpec_precedenceLit; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -x_15 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_command_NotationSpec_precedenceLit; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_number_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("precedenceLit"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_27); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = l_Lean_Parser_number_HasView; -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_27); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -else -{ -obj* x_35; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_35 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_35; -} -} -} -} -} -} -} -else -{ -obj* x_36; -lean::dec(x_11); -lean::dec(x_6); -x_36 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1; -return x_36; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceLit_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_1); -x_5 = l_Lean_Parser_token(x_1, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; uint8 x_15; -x_11 = lean::cnstr_get(x_6, 0); -x_12 = lean::cnstr_get(x_6, 1); -x_13 = lean::cnstr_get(x_6, 2); -x_14 = l_Lean_Parser_number; -x_15 = l_Lean_Parser_Syntax_isOfKind___main(x_14, x_11); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::free_heap_obj(x_6); -lean::dec(x_11); -lean::free_heap_obj(x_5); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_3); -x_17 = lean::box(0); -x_18 = l_String_splitAux___main___closed__1; -x_19 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_20 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_18, x_19, x_16, x_17, x_1, x_12, x_8); -lean::dec(x_1); -lean::dec(x_16); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_22); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_23); -x_26 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_25); -lean::cnstr_set(x_20, 0, x_26); -return x_20; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_27 = lean::cnstr_get(x_20, 0); -x_28 = lean::cnstr_get(x_20, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_20); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_27); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_29); -x_32 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_31); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_28); -return x_33; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -lean::dec(x_3); -lean::dec(x_1); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_34); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_6); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_35); -x_37 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_36); -lean::cnstr_set(x_5, 0, x_37); -return x_5; -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; uint8 x_42; -x_38 = lean::cnstr_get(x_6, 0); -x_39 = lean::cnstr_get(x_6, 1); -x_40 = lean::cnstr_get(x_6, 2); -lean::inc(x_40); -lean::inc(x_39); -lean::inc(x_38); -lean::dec(x_6); -x_41 = l_Lean_Parser_number; -x_42 = l_Lean_Parser_Syntax_isOfKind___main(x_41, x_38); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -lean::dec(x_38); -lean::free_heap_obj(x_5); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_3); -x_44 = lean::box(0); -x_45 = l_String_splitAux___main___closed__1; -x_46 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_47 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_45, x_46, x_43, x_44, x_1, x_39, x_8); -lean::dec(x_1); -lean::dec(x_43); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - x_50 = x_47; -} else { - lean::dec_ref(x_47); - x_50 = lean::box(0); -} -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_48); -x_52 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_51); -x_54 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_53); -if (lean::is_scalar(x_50)) { - x_55 = lean::alloc_cnstr(0, 2, 0); -} else { - x_55 = x_50; -} -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_49); -return x_55; -} -else -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_3); -lean::dec(x_1); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_57, 0, x_38); -lean::cnstr_set(x_57, 1, x_39); -lean::cnstr_set(x_57, 2, x_56); -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_58); -x_60 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_59); -lean::cnstr_set(x_5, 0, x_60); -return x_5; -} -} -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; uint8 x_67; -x_61 = lean::cnstr_get(x_5, 1); -lean::inc(x_61); -lean::dec(x_5); -x_62 = lean::cnstr_get(x_6, 0); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_6, 1); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_6, 2); -lean::inc(x_64); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_65 = x_6; -} else { - lean::dec_ref(x_6); - x_65 = lean::box(0); -} -x_66 = l_Lean_Parser_number; -x_67 = l_Lean_Parser_Syntax_isOfKind___main(x_66, x_62); -if (x_67 == 0) -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -lean::dec(x_65); -lean::dec(x_62); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_3); -x_69 = lean::box(0); -x_70 = l_String_splitAux___main___closed__1; -x_71 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_72 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_70, x_71, x_68, x_69, x_1, x_63, x_61); -lean::dec(x_1); -lean::dec(x_68); -x_73 = lean::cnstr_get(x_72, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_72, 1); -lean::inc(x_74); -if (lean::is_exclusive(x_72)) { - lean::cnstr_release(x_72, 0); - lean::cnstr_release(x_72, 1); - x_75 = x_72; -} else { - lean::dec_ref(x_72); - x_75 = lean::box(0); -} -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_73); -x_77 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_78 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_76); -x_79 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_78); -if (lean::is_scalar(x_75)) { - x_80 = lean::alloc_cnstr(0, 2, 0); -} else { - x_80 = x_75; -} -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_74); -return x_80; -} -else -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -lean::dec(x_3); -lean::dec(x_1); -x_81 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_65)) { - x_82 = lean::alloc_cnstr(0, 3, 0); -} else { - x_82 = x_65; -} -lean::cnstr_set(x_82, 0, x_62); -lean::cnstr_set(x_82, 1, x_63); -lean::cnstr_set(x_82, 2, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_82); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_81, x_83); -x_85 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_84); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_61); -return x_86; -} -} -} -else -{ -uint8 x_87; -lean::dec(x_3); -lean::dec(x_1); -x_87 = !lean::is_exclusive(x_5); -if (x_87 == 0) -{ -obj* x_88; uint8 x_89; -x_88 = lean::cnstr_get(x_5, 0); -lean::dec(x_88); -x_89 = !lean::is_exclusive(x_6); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; obj* x_92; -x_90 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_6); -x_92 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_91); -lean::cnstr_set(x_5, 0, x_92); -return x_5; -} -else -{ -obj* x_93; uint8 x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_93 = lean::cnstr_get(x_6, 0); -x_94 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_93); -lean::dec(x_6); -x_95 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_95, 0, x_93); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_94); -x_96 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_96, x_95); -x_98 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_97); -lean::cnstr_set(x_5, 0, x_98); -return x_5; -} -} -else -{ -obj* x_99; obj* x_100; uint8 x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_99 = lean::cnstr_get(x_5, 1); -lean::inc(x_99); -lean::dec(x_5); -x_100 = lean::cnstr_get(x_6, 0); -lean::inc(x_100); -x_101 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_102 = x_6; -} else { - lean::dec_ref(x_6); - x_102 = lean::box(0); -} -if (lean::is_scalar(x_102)) { - x_103 = lean::alloc_cnstr(1, 1, 1); -} else { - x_103 = x_102; -} -lean::cnstr_set(x_103, 0, x_100); -lean::cnstr_set_scalar(x_103, sizeof(void*)*1, x_101); -x_104 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_104, x_103); -x_106 = l_Lean_Parser_ParsecT_tryMkRes___rarg(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_99); -return x_107; -} -} -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_5); -lean::inc(x_3); -x_7 = l_Lean_Parser_token(x_3, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - x_10 = x_7; -} else { - lean::dec_ref(x_7); - x_10 = lean::box(0); -} -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_8, 2); -lean::inc(x_13); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_14 = x_8; -} else { - lean::dec_ref(x_8); - x_14 = lean::box(0); -} -switch (lean::obj_tag(x_11)) { -case 0: -{ -obj* x_91; obj* x_92; obj* x_93; -x_91 = lean::cnstr_get(x_11, 0); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_91, 1); -lean::inc(x_92); -lean::dec(x_91); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_92); -x_15 = x_93; -goto block_90; -} -case 1: -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_94 = lean::cnstr_get(x_11, 0); -lean::inc(x_94); -x_95 = lean::cnstr_get(x_94, 1); -lean::inc(x_95); -lean::dec(x_94); -x_96 = l_Lean_Parser_Substring_toString(x_95); -lean::dec(x_95); -x_97 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_97, 0, x_96); -x_15 = x_97; -goto block_90; -} -default: -{ -obj* x_98; -x_98 = lean::box(0); -x_15 = x_98; -goto block_90; -} -} -block_90: -{ -uint8 x_16; -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_85; -x_85 = 1; -x_16 = x_85; -goto block_84; -} -else -{ -obj* x_86; uint8 x_87; -x_86 = lean::cnstr_get(x_15, 0); -lean::inc(x_86); -lean::dec(x_15); -x_87 = lean::string_dec_eq(x_86, x_1); -lean::dec(x_86); -if (x_87 == 0) -{ -uint8 x_88; -x_88 = 1; -x_16 = x_88; -goto block_84; -} -else -{ -uint8 x_89; -x_89 = 0; -x_16 = x_89; -goto block_84; -} -} -block_84: -{ -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_1); -x_17 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_14)) { - x_18 = lean::alloc_cnstr(0, 3, 0); -} else { - x_18 = x_14; -} -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_12); -lean::cnstr_set(x_18, 2, x_17); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_18); -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_19); -x_22 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_21); -if (lean::is_scalar(x_10)) { - x_23 = lean::alloc_cnstr(0, 2, 0); -} else { - x_23 = x_10; -} -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_9); -return x_23; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_14); -lean::dec(x_10); -x_24 = l_String_quote(x_1); -x_25 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_25, 0, x_24); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_5); -x_27 = lean::box(0); -x_28 = l_String_splitAux___main___closed__1; -x_29 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_28, x_25, x_26, x_27, x_3, x_12, x_9); -lean::dec(x_3); -lean::dec(x_26); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -uint8 x_31; -x_31 = !lean::is_exclusive(x_29); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_29, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_30); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_34 = lean::cnstr_get(x_30, 2); -x_35 = lean::cnstr_get(x_30, 0); -lean::dec(x_35); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_30, 2, x_36); -lean::cnstr_set(x_30, 0, x_11); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_30); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_37); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_38); -x_40 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_39); -lean::cnstr_set(x_29, 0, x_40); -return x_29; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_41 = lean::cnstr_get(x_30, 1); -x_42 = lean::cnstr_get(x_30, 2); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_30); -x_43 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_11); -lean::cnstr_set(x_44, 1, x_41); -lean::cnstr_set(x_44, 2, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_45); -x_47 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_46); -x_48 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_47); -lean::cnstr_set(x_29, 0, x_48); -return x_29; -} -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_49 = lean::cnstr_get(x_29, 1); -lean::inc(x_49); -lean::dec(x_29); -x_50 = lean::cnstr_get(x_30, 1); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_30, 2); -lean::inc(x_51); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - lean::cnstr_release(x_30, 1); - lean::cnstr_release(x_30, 2); - x_52 = x_30; -} else { - lean::dec_ref(x_30); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 3, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_11); -lean::cnstr_set(x_54, 1, x_50); -lean::cnstr_set(x_54, 2, x_53); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_54); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_55); -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_53, x_56); -x_58 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_57); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_49); -return x_59; -} -} -else -{ -uint8 x_60; -lean::dec(x_11); -x_60 = !lean::is_exclusive(x_29); -if (x_60 == 0) -{ -obj* x_61; uint8 x_62; -x_61 = lean::cnstr_get(x_29, 0); -lean::dec(x_61); -x_62 = !lean::is_exclusive(x_30); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_30); -x_64 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_63); -x_66 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_65); -lean::cnstr_set(x_29, 0, x_66); -return x_29; -} -else -{ -obj* x_67; uint8 x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_67 = lean::cnstr_get(x_30, 0); -x_68 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); -lean::inc(x_67); -lean::dec(x_30); -x_69 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_69, 0, x_67); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_68); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_69); -x_71 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_70); -x_73 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_72); -lean::cnstr_set(x_29, 0, x_73); -return x_29; -} -} -else -{ -obj* x_74; obj* x_75; uint8 x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_74 = lean::cnstr_get(x_29, 1); -lean::inc(x_74); -lean::dec(x_29); -x_75 = lean::cnstr_get(x_30, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - x_77 = x_30; -} else { - lean::dec_ref(x_30); - x_77 = lean::box(0); -} -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_75); -lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_78); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_79); -x_82 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_81); -x_83 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_74); -return x_83; -} -} -} -} -} -} -else -{ -uint8 x_99; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_1); -x_99 = !lean::is_exclusive(x_7); -if (x_99 == 0) -{ -obj* x_100; uint8 x_101; -x_100 = lean::cnstr_get(x_7, 0); -lean::dec(x_100); -x_101 = !lean::is_exclusive(x_8); -if (x_101 == 0) -{ -obj* x_102; obj* x_103; obj* x_104; -x_102 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_102, x_8); -x_104 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_103); -lean::cnstr_set(x_7, 0, x_104); -return x_7; -} -else -{ -obj* x_105; uint8 x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -x_105 = lean::cnstr_get(x_8, 0); -x_106 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_105); -lean::dec(x_8); -x_107 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_107, 0, x_105); -lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_106); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_108, x_107); -x_110 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_109); -lean::cnstr_set(x_7, 0, x_110); -return x_7; -} -} -else -{ -obj* x_111; obj* x_112; uint8 x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_111 = lean::cnstr_get(x_7, 1); -lean::inc(x_111); -lean::dec(x_7); -x_112 = lean::cnstr_get(x_8, 0); -lean::inc(x_112); -x_113 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_114 = x_8; -} else { - lean::dec_ref(x_8); - x_114 = lean::box(0); -} -if (lean::is_scalar(x_114)) { - x_115 = lean::alloc_cnstr(1, 1, 1); -} else { - x_115 = x_114; -} -lean::cnstr_set(x_115, 0, x_112); -lean::cnstr_set_scalar(x_115, sizeof(void*)*1, x_113); -x_116 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_117 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_115); -x_118 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_117); -x_119 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_119, 1, x_111); -return x_119; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(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: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_10; uint8 x_11; obj* x_12; obj* x_13; -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -lean::cnstr_set(x_10, 2, x_2); -lean::cnstr_set(x_10, 3, x_4); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_9); -return x_13; -} -else -{ -obj* x_14; obj* x_15; uint8 x_16; obj* x_17; obj* x_18; -lean::dec(x_8); -x_14 = lean::cnstr_get(x_3, 0); -lean::inc(x_14); -x_15 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -lean::cnstr_set(x_15, 2, x_2); -lean::cnstr_set(x_15, 3, x_4); -x_16 = 0; -x_17 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set_scalar(x_17, sizeof(void*)*1, x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -return x_18; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed), 9, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_2); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -x_10 = l_mjoin___rarg___closed__1; -x_11 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_9, x_10, x_8, x_8, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_11; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_1); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_1, 0); -x_14 = lean::cnstr_get(x_1, 1); -x_15 = lean::mk_nat_obj(1u); -x_16 = lean::nat_add(x_2, x_15); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_17 = lean::apply_5(x_13, x_3, x_4, x_5, x_6, x_7); -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_17); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; uint8 x_22; -x_20 = lean::cnstr_get(x_17, 1); -x_21 = lean::cnstr_get(x_17, 0); -lean::dec(x_21); -x_22 = !lean::is_exclusive(x_18); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_23 = lean::cnstr_get(x_18, 0); -x_24 = lean::cnstr_get(x_18, 2); -x_25 = lean::box(0); -x_26 = lean_name_mk_numeral(x_25, x_2); -x_27 = lean::box(0); -lean::cnstr_set(x_1, 1, x_27); -lean::cnstr_set(x_1, 0, x_23); -x_28 = l_Lean_Parser_Syntax_mkNode(x_26, x_1); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_18, 2, x_29); -lean::cnstr_set(x_18, 0, x_28); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_18); -if (lean::obj_tag(x_30) == 0) -{ -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_17, 0, x_30); -return x_17; -} -else -{ -uint8 x_31; -x_31 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; uint8 x_34; -lean::free_heap_obj(x_17); -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(x_14, x_16, x_3, x_4, x_5, x_6, x_20); -x_34 = !lean::is_exclusive(x_33); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_33, 0); -x_36 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_32, x_35); -lean::cnstr_set(x_33, 0, x_36); -return x_33; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_37 = lean::cnstr_get(x_33, 0); -x_38 = lean::cnstr_get(x_33, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_33); -x_39 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_32, x_37); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_38); -return x_40; -} -} -else -{ -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_17, 0, x_30); -return x_17; -} -} -} -else -{ -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; -x_41 = lean::cnstr_get(x_18, 0); -x_42 = lean::cnstr_get(x_18, 1); -x_43 = lean::cnstr_get(x_18, 2); -lean::inc(x_43); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_18); -x_44 = lean::box(0); -x_45 = lean_name_mk_numeral(x_44, x_2); -x_46 = lean::box(0); -lean::cnstr_set(x_1, 1, x_46); -lean::cnstr_set(x_1, 0, x_41); -x_47 = l_Lean_Parser_Syntax_mkNode(x_45, x_1); -x_48 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_49 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_42); -lean::cnstr_set(x_49, 2, x_48); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_49); -if (lean::obj_tag(x_50) == 0) -{ -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_17, 0, x_50); -return x_17; -} -else -{ -uint8 x_51; -x_51 = lean::cnstr_get_scalar(x_50, sizeof(void*)*1); -if (x_51 == 0) -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -lean::free_heap_obj(x_17); -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(x_14, x_16, x_3, x_4, x_5, x_6, x_20); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -if (lean::is_exclusive(x_53)) { - lean::cnstr_release(x_53, 0); - lean::cnstr_release(x_53, 1); - x_56 = x_53; -} else { - lean::dec_ref(x_53); - x_56 = lean::box(0); -} -x_57 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_52, x_54); -if (lean::is_scalar(x_56)) { - x_58 = lean::alloc_cnstr(0, 2, 0); -} else { - x_58 = x_56; -} -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_55); -return x_58; -} -else -{ -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_17, 0, x_50); -return x_17; -} -} -} -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_59 = lean::cnstr_get(x_17, 1); -lean::inc(x_59); -lean::dec(x_17); -x_60 = lean::cnstr_get(x_18, 0); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_18, 1); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_18, 2); -lean::inc(x_62); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - lean::cnstr_release(x_18, 1); - lean::cnstr_release(x_18, 2); - x_63 = x_18; -} else { - lean::dec_ref(x_18); - x_63 = lean::box(0); -} -x_64 = lean::box(0); -x_65 = lean_name_mk_numeral(x_64, x_2); -x_66 = lean::box(0); -lean::cnstr_set(x_1, 1, x_66); -lean::cnstr_set(x_1, 0, x_60); -x_67 = l_Lean_Parser_Syntax_mkNode(x_65, x_1); -x_68 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_63)) { - x_69 = lean::alloc_cnstr(0, 3, 0); -} else { - x_69 = x_63; -} -lean::cnstr_set(x_69, 0, x_67); -lean::cnstr_set(x_69, 1, x_61); -lean::cnstr_set(x_69, 2, x_68); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_69); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_59); -return x_71; -} -else -{ -uint8 x_72; -x_72 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -if (x_72 == 0) -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_73 = lean::cnstr_get(x_70, 0); -lean::inc(x_73); -lean::dec(x_70); -x_74 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(x_14, x_16, x_3, x_4, x_5, x_6, x_59); -x_75 = lean::cnstr_get(x_74, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_74, 1); -lean::inc(x_76); -if (lean::is_exclusive(x_74)) { - lean::cnstr_release(x_74, 0); - lean::cnstr_release(x_74, 1); - x_77 = x_74; -} else { - lean::dec_ref(x_74); - x_77 = lean::box(0); -} -x_78 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_73, x_75); -if (lean::is_scalar(x_77)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_77; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_76); -return x_79; -} -else -{ -obj* x_80; -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_70); -lean::cnstr_set(x_80, 1, x_59); -return x_80; -} -} -} -} -else -{ -uint8 x_81; -lean::free_heap_obj(x_1); -lean::dec(x_2); -x_81 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -if (x_81 == 0) -{ -obj* x_82; obj* x_83; obj* x_84; uint8 x_85; -x_82 = lean::cnstr_get(x_17, 1); -lean::inc(x_82); -lean::dec(x_17); -x_83 = lean::cnstr_get(x_18, 0); -lean::inc(x_83); -lean::dec(x_18); -x_84 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(x_14, x_16, x_3, x_4, x_5, x_6, x_82); -x_85 = !lean::is_exclusive(x_84); -if (x_85 == 0) -{ -obj* x_86; obj* x_87; -x_86 = lean::cnstr_get(x_84, 0); -x_87 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_83, x_86); -lean::cnstr_set(x_84, 0, x_87); -return x_84; -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_88 = lean::cnstr_get(x_84, 0); -x_89 = lean::cnstr_get(x_84, 1); -lean::inc(x_89); -lean::inc(x_88); -lean::dec(x_84); -x_90 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_83, x_88); -x_91 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_89); -return x_91; -} -} -else -{ -uint8 x_92; -lean::dec(x_16); -lean::dec(x_14); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_92 = !lean::is_exclusive(x_17); -if (x_92 == 0) -{ -obj* x_93; uint8 x_94; -x_93 = lean::cnstr_get(x_17, 0); -lean::dec(x_93); -x_94 = !lean::is_exclusive(x_18); -if (x_94 == 0) -{ -return x_17; -} -else -{ -obj* x_95; obj* x_96; -x_95 = lean::cnstr_get(x_18, 0); -lean::inc(x_95); -lean::dec(x_18); -x_96 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_81); -lean::cnstr_set(x_17, 0, x_96); -return x_17; -} -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_97 = lean::cnstr_get(x_17, 1); -lean::inc(x_97); -lean::dec(x_17); -x_98 = lean::cnstr_get(x_18, 0); -lean::inc(x_98); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - x_99 = x_18; -} else { - lean::dec_ref(x_18); - x_99 = lean::box(0); -} -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_98); -lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_81); -x_101 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_97); -return x_101; -} -} -} -} -else -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_102 = lean::cnstr_get(x_1, 0); -x_103 = lean::cnstr_get(x_1, 1); -lean::inc(x_103); -lean::inc(x_102); -lean::dec(x_1); -x_104 = lean::mk_nat_obj(1u); -x_105 = lean::nat_add(x_2, x_104); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_106 = lean::apply_5(x_102, x_3, x_4, x_5, x_6, x_7); -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -if (lean::obj_tag(x_107) == 0) -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_108 = lean::cnstr_get(x_106, 1); -lean::inc(x_108); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - x_109 = x_106; -} else { - lean::dec_ref(x_106); - x_109 = lean::box(0); -} -x_110 = lean::cnstr_get(x_107, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_107, 1); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_107, 2); -lean::inc(x_112); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - lean::cnstr_release(x_107, 2); - x_113 = x_107; -} else { - lean::dec_ref(x_107); - x_113 = lean::box(0); -} -x_114 = lean::box(0); -x_115 = lean_name_mk_numeral(x_114, x_2); -x_116 = lean::box(0); -x_117 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_117, 0, x_110); -lean::cnstr_set(x_117, 1, x_116); -x_118 = l_Lean_Parser_Syntax_mkNode(x_115, x_117); -x_119 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_113)) { - x_120 = lean::alloc_cnstr(0, 3, 0); -} else { - x_120 = x_113; -} -lean::cnstr_set(x_120, 0, x_118); -lean::cnstr_set(x_120, 1, x_111); -lean::cnstr_set(x_120, 2, x_119); -x_121 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_112, x_120); -if (lean::obj_tag(x_121) == 0) -{ -obj* x_122; -lean::dec(x_105); -lean::dec(x_103); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_109)) { - x_122 = lean::alloc_cnstr(0, 2, 0); -} else { - x_122 = x_109; -} -lean::cnstr_set(x_122, 0, x_121); -lean::cnstr_set(x_122, 1, x_108); -return x_122; -} -else -{ -uint8 x_123; -x_123 = lean::cnstr_get_scalar(x_121, sizeof(void*)*1); -if (x_123 == 0) -{ -obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -lean::dec(x_109); -x_124 = lean::cnstr_get(x_121, 0); -lean::inc(x_124); -lean::dec(x_121); -x_125 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(x_103, x_105, x_3, x_4, x_5, x_6, x_108); -x_126 = lean::cnstr_get(x_125, 0); -lean::inc(x_126); -x_127 = lean::cnstr_get(x_125, 1); -lean::inc(x_127); -if (lean::is_exclusive(x_125)) { - lean::cnstr_release(x_125, 0); - lean::cnstr_release(x_125, 1); - x_128 = x_125; -} else { - lean::dec_ref(x_125); - x_128 = lean::box(0); -} -x_129 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_124, x_126); -if (lean::is_scalar(x_128)) { - x_130 = lean::alloc_cnstr(0, 2, 0); -} else { - x_130 = x_128; -} -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_127); -return x_130; -} -else -{ -obj* x_131; -lean::dec(x_105); -lean::dec(x_103); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_109)) { - x_131 = lean::alloc_cnstr(0, 2, 0); -} else { - x_131 = x_109; -} -lean::cnstr_set(x_131, 0, x_121); -lean::cnstr_set(x_131, 1, x_108); -return x_131; -} -} -} -else -{ -uint8 x_132; -lean::dec(x_2); -x_132 = lean::cnstr_get_scalar(x_107, sizeof(void*)*1); -if (x_132 == 0) -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; -x_133 = lean::cnstr_get(x_106, 1); -lean::inc(x_133); -lean::dec(x_106); -x_134 = lean::cnstr_get(x_107, 0); -lean::inc(x_134); -lean::dec(x_107); -x_135 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(x_103, x_105, x_3, x_4, x_5, x_6, x_133); -x_136 = lean::cnstr_get(x_135, 0); -lean::inc(x_136); -x_137 = lean::cnstr_get(x_135, 1); -lean::inc(x_137); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - lean::cnstr_release(x_135, 1); - x_138 = x_135; -} else { - lean::dec_ref(x_135); - x_138 = lean::box(0); -} -x_139 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_134, x_136); -if (lean::is_scalar(x_138)) { - x_140 = lean::alloc_cnstr(0, 2, 0); -} else { - x_140 = x_138; -} -lean::cnstr_set(x_140, 0, x_139); -lean::cnstr_set(x_140, 1, x_137); -return x_140; -} -else -{ -obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; -lean::dec(x_105); -lean::dec(x_103); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_141 = lean::cnstr_get(x_106, 1); -lean::inc(x_141); -if (lean::is_exclusive(x_106)) { - lean::cnstr_release(x_106, 0); - lean::cnstr_release(x_106, 1); - x_142 = x_106; -} else { - lean::dec_ref(x_106); - x_142 = lean::box(0); -} -x_143 = lean::cnstr_get(x_107, 0); -lean::inc(x_143); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - x_144 = x_107; -} else { - lean::dec_ref(x_107); - x_144 = lean::box(0); -} -if (lean::is_scalar(x_144)) { - x_145 = lean::alloc_cnstr(1, 1, 1); -} else { - x_145 = x_144; -} -lean::cnstr_set(x_145, 0, x_143); -lean::cnstr_set_scalar(x_145, sizeof(void*)*1, x_132); -if (lean::is_scalar(x_142)) { - x_146 = lean::alloc_cnstr(0, 2, 0); -} else { - x_146 = x_142; -} -lean::cnstr_set(x_146, 0, x_145); -lean::cnstr_set(x_146, 1, x_141); -return x_146; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_1); -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_2); -lean::dec(x_2); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_1); -lean::dec(x_4); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::mk_string("max"); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 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_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___boxed), 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_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_8, 0, x_6); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_3); -x_10 = l_Lean_Parser_TermParserM_Monad; -x_11 = l_Lean_Parser_TermParserM_MonadExcept; -x_12 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_13 = l_Lean_Parser_TermParserM_Alternative; -x_14 = l_Lean_Parser_command_NotationSpec_precedenceLit; -x_15 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView; -x_16 = l_Lean_Parser_Combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); -lean::dec(x_9); -return x_16; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__2(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_3) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_9 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_9); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_8); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_68; obj* x_69; -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_3, 1); -lean::inc(x_13); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_14 = x_3; -} else { - lean::dec_ref(x_3); - x_14 = lean::box(0); -} -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -x_68 = lean::apply_5(x_12, x_4, x_5, x_6, x_7, x_8); -x_69 = lean::cnstr_get(x_68, 0); -lean::inc(x_69); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -x_70 = lean::cnstr_get(x_68, 1); -lean::inc(x_70); -lean::dec(x_68); -x_15 = x_69; -x_16 = x_70; -goto block_67; -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_71; -x_71 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -if (x_71 == 0) -{ -obj* x_72; uint8 x_73; -x_72 = lean::cnstr_get(x_68, 1); -lean::inc(x_72); -lean::dec(x_68); -x_73 = !lean::is_exclusive(x_69); -if (x_73 == 0) -{ -uint8 x_74; -x_74 = 0; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_74); -x_15 = x_69; -x_16 = x_72; -goto block_67; -} -else -{ -obj* x_75; uint8 x_76; obj* x_77; -x_75 = lean::cnstr_get(x_69, 0); -lean::inc(x_75); -lean::dec(x_69); -x_76 = 0; -x_77 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_77, 0, x_75); -lean::cnstr_set_scalar(x_77, sizeof(void*)*1, x_76); -x_15 = x_77; -x_16 = x_72; -goto block_67; -} -} -else -{ -obj* x_78; uint8 x_79; -x_78 = lean::cnstr_get(x_68, 1); -lean::inc(x_78); -lean::dec(x_68); -x_79 = !lean::is_exclusive(x_69); -if (x_79 == 0) -{ -uint8 x_80; -x_80 = 1; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_80); -x_15 = x_69; -x_16 = x_78; -goto block_67; -} -else -{ -obj* x_81; uint8 x_82; obj* x_83; -x_81 = lean::cnstr_get(x_69, 0); -lean::inc(x_81); -lean::dec(x_69); -x_82 = 1; -x_83 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_83, 0, x_81); -lean::cnstr_set_scalar(x_83, sizeof(void*)*1, x_82); -x_15 = x_83; -x_16 = x_78; -goto block_67; -} -} -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_69, 0); -lean::inc(x_84); -x_85 = lean::cnstr_get(x_84, 3); -lean::inc(x_85); -if (lean::obj_tag(x_85) == 0) -{ -obj* x_86; uint8 x_87; -x_86 = lean::cnstr_get(x_68, 1); -lean::inc(x_86); -lean::dec(x_68); -x_87 = !lean::is_exclusive(x_69); -if (x_87 == 0) -{ -uint8 x_88; obj* x_89; uint8 x_90; -x_88 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -x_89 = lean::cnstr_get(x_69, 0); -lean::dec(x_89); -x_90 = !lean::is_exclusive(x_84); -if (x_90 == 0) -{ -obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_91 = lean::cnstr_get(x_84, 3); -lean::dec(x_91); -x_92 = lean::box(3); -lean::inc(x_2); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set(x_93, 1, x_2); -x_94 = l_List_reverse___rarg(x_93); -lean::inc(x_1); -x_95 = l_Lean_Parser_Syntax_mkNode(x_1, x_94); -x_96 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_84, 3, x_96); -if (x_88 == 0) -{ -uint8 x_97; -x_97 = 0; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_97); -x_15 = x_69; -x_16 = x_86; -goto block_67; -} -else -{ -uint8 x_98; -x_98 = 1; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_98); -x_15 = x_69; -x_16 = x_86; -goto block_67; -} -} -else -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_99 = lean::cnstr_get(x_84, 0); -x_100 = lean::cnstr_get(x_84, 1); -x_101 = lean::cnstr_get(x_84, 2); -lean::inc(x_101); -lean::inc(x_100); -lean::inc(x_99); -lean::dec(x_84); -x_102 = lean::box(3); -lean::inc(x_2); -x_103 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_2); -x_104 = l_List_reverse___rarg(x_103); -lean::inc(x_1); -x_105 = l_Lean_Parser_Syntax_mkNode(x_1, x_104); -x_106 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_106, 0, x_105); -x_107 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_107, 0, x_99); -lean::cnstr_set(x_107, 1, x_100); -lean::cnstr_set(x_107, 2, x_101); -lean::cnstr_set(x_107, 3, x_106); -if (x_88 == 0) -{ -uint8 x_108; -x_108 = 0; -lean::cnstr_set(x_69, 0, x_107); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_108); -x_15 = x_69; -x_16 = x_86; -goto block_67; -} -else -{ -uint8 x_109; -x_109 = 1; -lean::cnstr_set(x_69, 0, x_107); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_109); -x_15 = x_69; -x_16 = x_86; -goto block_67; -} -} -} -else -{ -uint8 x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; -x_110 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -lean::dec(x_69); -x_111 = lean::cnstr_get(x_84, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_84, 1); -lean::inc(x_112); -x_113 = lean::cnstr_get(x_84, 2); -lean::inc(x_113); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - lean::cnstr_release(x_84, 1); - lean::cnstr_release(x_84, 2); - lean::cnstr_release(x_84, 3); - x_114 = x_84; -} else { - lean::dec_ref(x_84); - x_114 = lean::box(0); -} -x_115 = lean::box(3); -lean::inc(x_2); -x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_115); -lean::cnstr_set(x_116, 1, x_2); -x_117 = l_List_reverse___rarg(x_116); -lean::inc(x_1); -x_118 = l_Lean_Parser_Syntax_mkNode(x_1, x_117); -x_119 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_119, 0, x_118); -if (lean::is_scalar(x_114)) { - x_120 = lean::alloc_cnstr(0, 4, 0); -} else { - x_120 = x_114; -} -lean::cnstr_set(x_120, 0, x_111); -lean::cnstr_set(x_120, 1, x_112); -lean::cnstr_set(x_120, 2, x_113); -lean::cnstr_set(x_120, 3, x_119); -if (x_110 == 0) -{ -uint8 x_121; obj* x_122; -x_121 = 0; -x_122 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_122, 0, x_120); -lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_121); -x_15 = x_122; -x_16 = x_86; -goto block_67; -} -else -{ -uint8 x_123; obj* x_124; -x_123 = 1; -x_124 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_124, 0, x_120); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_123); -x_15 = x_124; -x_16 = x_86; -goto block_67; -} -} -} -else -{ -obj* x_125; uint8 x_126; -x_125 = lean::cnstr_get(x_68, 1); -lean::inc(x_125); -lean::dec(x_68); -x_126 = !lean::is_exclusive(x_69); -if (x_126 == 0) -{ -uint8 x_127; obj* x_128; uint8 x_129; -x_127 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -x_128 = lean::cnstr_get(x_69, 0); -lean::dec(x_128); -x_129 = !lean::is_exclusive(x_84); -if (x_129 == 0) -{ -obj* x_130; uint8 x_131; -x_130 = lean::cnstr_get(x_84, 3); -lean::dec(x_130); -x_131 = !lean::is_exclusive(x_85); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; -x_132 = lean::cnstr_get(x_85, 0); -lean::inc(x_2); -x_133 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_133, 0, x_132); -lean::cnstr_set(x_133, 1, x_2); -x_134 = l_List_reverse___rarg(x_133); -lean::inc(x_1); -x_135 = l_Lean_Parser_Syntax_mkNode(x_1, x_134); -lean::cnstr_set(x_85, 0, x_135); -if (x_127 == 0) -{ -uint8 x_136; -x_136 = 0; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_136); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -else -{ -uint8 x_137; -x_137 = 1; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_137); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -} -else -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -x_138 = lean::cnstr_get(x_85, 0); -lean::inc(x_138); -lean::dec(x_85); -lean::inc(x_2); -x_139 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_139, 0, x_138); -lean::cnstr_set(x_139, 1, x_2); -x_140 = l_List_reverse___rarg(x_139); -lean::inc(x_1); -x_141 = l_Lean_Parser_Syntax_mkNode(x_1, x_140); -x_142 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_142, 0, x_141); -lean::cnstr_set(x_84, 3, x_142); -if (x_127 == 0) -{ -uint8 x_143; -x_143 = 0; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_143); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -else -{ -uint8 x_144; -x_144 = 1; -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_144); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -} -} -else -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; -x_145 = lean::cnstr_get(x_84, 0); -x_146 = lean::cnstr_get(x_84, 1); -x_147 = lean::cnstr_get(x_84, 2); -lean::inc(x_147); -lean::inc(x_146); -lean::inc(x_145); -lean::dec(x_84); -x_148 = lean::cnstr_get(x_85, 0); -lean::inc(x_148); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - x_149 = x_85; -} else { - lean::dec_ref(x_85); - x_149 = lean::box(0); -} -lean::inc(x_2); -x_150 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_150, 0, x_148); -lean::cnstr_set(x_150, 1, x_2); -x_151 = l_List_reverse___rarg(x_150); -lean::inc(x_1); -x_152 = l_Lean_Parser_Syntax_mkNode(x_1, x_151); -if (lean::is_scalar(x_149)) { - x_153 = lean::alloc_cnstr(1, 1, 0); -} else { - x_153 = x_149; -} -lean::cnstr_set(x_153, 0, x_152); -x_154 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_154, 0, x_145); -lean::cnstr_set(x_154, 1, x_146); -lean::cnstr_set(x_154, 2, x_147); -lean::cnstr_set(x_154, 3, x_153); -if (x_127 == 0) -{ -uint8 x_155; -x_155 = 0; -lean::cnstr_set(x_69, 0, x_154); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_155); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -else -{ -uint8 x_156; -x_156 = 1; -lean::cnstr_set(x_69, 0, x_154); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_156); -x_15 = x_69; -x_16 = x_125; -goto block_67; -} -} -} -else -{ -uint8 x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; -x_157 = lean::cnstr_get_scalar(x_69, sizeof(void*)*1); -lean::dec(x_69); -x_158 = lean::cnstr_get(x_84, 0); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_84, 1); -lean::inc(x_159); -x_160 = lean::cnstr_get(x_84, 2); -lean::inc(x_160); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - lean::cnstr_release(x_84, 1); - lean::cnstr_release(x_84, 2); - lean::cnstr_release(x_84, 3); - x_161 = x_84; -} else { - lean::dec_ref(x_84); - x_161 = lean::box(0); -} -x_162 = lean::cnstr_get(x_85, 0); -lean::inc(x_162); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - x_163 = x_85; -} else { - lean::dec_ref(x_85); - x_163 = lean::box(0); -} -lean::inc(x_2); -x_164 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_164, 0, x_162); -lean::cnstr_set(x_164, 1, x_2); -x_165 = l_List_reverse___rarg(x_164); -lean::inc(x_1); -x_166 = l_Lean_Parser_Syntax_mkNode(x_1, x_165); -if (lean::is_scalar(x_163)) { - x_167 = lean::alloc_cnstr(1, 1, 0); -} else { - x_167 = x_163; -} -lean::cnstr_set(x_167, 0, x_166); -if (lean::is_scalar(x_161)) { - x_168 = lean::alloc_cnstr(0, 4, 0); -} else { - x_168 = x_161; -} -lean::cnstr_set(x_168, 0, x_158); -lean::cnstr_set(x_168, 1, x_159); -lean::cnstr_set(x_168, 2, x_160); -lean::cnstr_set(x_168, 3, x_167); -if (x_157 == 0) -{ -uint8 x_169; obj* x_170; -x_169 = 0; -x_170 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_170, 0, x_168); -lean::cnstr_set_scalar(x_170, sizeof(void*)*1, x_169); -x_15 = x_170; -x_16 = x_125; -goto block_67; -} -else -{ -uint8 x_171; obj* x_172; -x_171 = 1; -x_172 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_172, 0, x_168); -lean::cnstr_set_scalar(x_172, sizeof(void*)*1, x_171); -x_15 = x_172; -x_16 = x_125; -goto block_67; -} -} -} -} -} -block_67: -{ -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_15); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = lean::cnstr_get(x_15, 0); -x_19 = lean::cnstr_get(x_15, 2); -if (lean::is_scalar(x_14)) { - x_20 = lean::alloc_cnstr(1, 2, 0); -} else { - x_20 = x_14; -} -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_15, 2, x_21); -lean::cnstr_set(x_15, 0, x_20); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_15); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; uint8 x_27; -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_22, 2); -lean::inc(x_25); -lean::dec(x_22); -x_26 = l_List_mfoldl___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__2(x_1, x_23, x_13, x_4, x_5, x_6, x_24, x_16); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_26, 0); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_28); -lean::cnstr_set(x_26, 0, x_29); -return x_26; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = lean::cnstr_get(x_26, 0); -x_31 = lean::cnstr_get(x_26, 1); -lean::inc(x_31); -lean::inc(x_30); -lean::dec(x_26); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_30); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_31); -return x_33; -} -} -else -{ -uint8 x_34; -lean::dec(x_13); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_34 = !lean::is_exclusive(x_22); -if (x_34 == 0) -{ -obj* x_35; -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_22); -lean::cnstr_set(x_35, 1, x_16); -return x_35; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_22, 0); -x_37 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_22); -x_38 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_16); -return x_39; -} -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_40 = lean::cnstr_get(x_15, 0); -x_41 = lean::cnstr_get(x_15, 1); -x_42 = lean::cnstr_get(x_15, 2); -lean::inc(x_42); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_15); -if (lean::is_scalar(x_14)) { - x_43 = lean::alloc_cnstr(1, 2, 0); -} else { - x_43 = x_14; -} -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set(x_43, 1, x_2); -x_44 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_45 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_41); -lean::cnstr_set(x_45, 2, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_45); -if (lean::obj_tag(x_46) == 0) -{ -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; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_46, 2); -lean::inc(x_49); -lean::dec(x_46); -x_50 = l_List_mfoldl___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__2(x_1, x_47, x_13, x_4, x_5, x_6, x_48, x_16); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_50, 1); -lean::inc(x_52); -if (lean::is_exclusive(x_50)) { - lean::cnstr_release(x_50, 0); - lean::cnstr_release(x_50, 1); - x_53 = x_50; -} else { - lean::dec_ref(x_50); - x_53 = lean::box(0); -} -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_49, x_51); -if (lean::is_scalar(x_53)) { - x_55 = lean::alloc_cnstr(0, 2, 0); -} else { - x_55 = x_53; -} -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_52); -return x_55; -} -else -{ -obj* x_56; uint8 x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_13); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_56 = lean::cnstr_get(x_46, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_58 = x_46; -} else { - lean::dec_ref(x_46); - x_58 = lean::box(0); -} -if (lean::is_scalar(x_58)) { - x_59 = lean::alloc_cnstr(1, 1, 1); -} else { - x_59 = x_58; -} -lean::cnstr_set(x_59, 0, x_56); -lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_57); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_16); -return x_60; -} -} -} -else -{ -uint8 x_61; -lean::dec(x_14); -lean::dec(x_13); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_61 = !lean::is_exclusive(x_15); -if (x_61 == 0) -{ -obj* x_62; -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_15); -lean::cnstr_set(x_62, 1, x_16); -return x_62; -} -else -{ -obj* x_63; uint8 x_64; obj* x_65; obj* x_66; -x_63 = lean::cnstr_get(x_15, 0); -x_64 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -lean::inc(x_63); -lean::dec(x_15); -x_65 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_65, 0, x_63); -lean::cnstr_set_scalar(x_65, sizeof(void*)*1, x_64); -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_16); -return x_66; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(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_10; -x_8 = lean::box(0); -lean::inc(x_1); -x_9 = l_List_mfoldl___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__2(x_1, x_8, x_2, x_3, x_4, x_5, x_6, x_7); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; uint8 x_13; -x_12 = lean::cnstr_get(x_9, 0); -lean::dec(x_12); -x_13 = !lean::is_exclusive(x_10); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_10, 0); -x_15 = lean::cnstr_get(x_10, 2); -x_16 = l_List_reverse___rarg(x_14); -x_17 = l_Lean_Parser_Syntax_mkNode(x_1, x_16); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_10, 2, x_18); -lean::cnstr_set(x_10, 0, x_17); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_10); -lean::cnstr_set(x_9, 0, x_19); -return x_9; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_20 = lean::cnstr_get(x_10, 0); -x_21 = lean::cnstr_get(x_10, 1); -x_22 = lean::cnstr_get(x_10, 2); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_10); -x_23 = l_List_reverse___rarg(x_20); -x_24 = l_Lean_Parser_Syntax_mkNode(x_1, x_23); -x_25 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_21); -lean::cnstr_set(x_26, 2, x_25); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_26); -lean::cnstr_set(x_9, 0, x_27); -return x_9; -} -} -else -{ -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; -x_28 = lean::cnstr_get(x_9, 1); -lean::inc(x_28); -lean::dec(x_9); -x_29 = lean::cnstr_get(x_10, 0); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_10, 1); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_10, 2); -lean::inc(x_31); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - lean::cnstr_release(x_10, 2); - x_32 = x_10; -} else { - lean::dec_ref(x_10); - x_32 = lean::box(0); -} -x_33 = l_List_reverse___rarg(x_29); -x_34 = l_Lean_Parser_Syntax_mkNode(x_1, x_33); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_32)) { - x_36 = lean::alloc_cnstr(0, 3, 0); -} else { - x_36 = x_32; -} -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_30); -lean::cnstr_set(x_36, 2, x_35); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_28); -return x_38; -} -} -else -{ -uint8 x_39; -lean::dec(x_1); -x_39 = !lean::is_exclusive(x_9); -if (x_39 == 0) -{ -obj* x_40; uint8 x_41; -x_40 = lean::cnstr_get(x_9, 0); -lean::dec(x_40); -x_41 = !lean::is_exclusive(x_10); -if (x_41 == 0) -{ -return x_9; -} -else -{ -obj* x_42; uint8 x_43; obj* x_44; -x_42 = lean::cnstr_get(x_10, 0); -x_43 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_42); -lean::dec(x_10); -x_44 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set_scalar(x_44, sizeof(void*)*1, x_43); -lean::cnstr_set(x_9, 0, x_44); -return x_9; -} -} -else -{ -obj* x_45; obj* x_46; uint8 x_47; obj* x_48; obj* x_49; obj* x_50; -x_45 = lean::cnstr_get(x_9, 1); -lean::inc(x_45); -lean::dec(x_9); -x_46 = lean::cnstr_get(x_10, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_48 = x_10; -} else { - lean::dec_ref(x_10); - x_48 = lean::box(0); -} -if (lean::is_scalar(x_48)) { - x_49 = lean::alloc_cnstr(1, 1, 1); -} else { - x_49 = x_48; -} -lean::cnstr_set(x_49, 0, x_46); -lean::cnstr_set_scalar(x_49, sizeof(void*)*1, x_47); -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_45); -return x_50; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceLit_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("max"); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 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_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___boxed), 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_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_8, 0, x_6); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_3); -return x_9; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_precedenceLit; -x_7 = l_Lean_Parser_command_NotationSpec_precedenceLit_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_View_toNat___main(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; obj* x_3; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -lean::dec(x_1); -x_3 = l_Lean_Parser_number_View_toNat___main(x_2); -return x_3; -} -else -{ -obj* x_4; -lean::dec(x_1); -x_4 = l_Lean_Parser_maxPrec; -return x_4; -} -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceLit_View_toNat(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_NotationSpec_precedenceLit_View_toNat___main(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("precedenceOffsetOp"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__1; -return x_4; -} -else -{ -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_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("precedenceOffsetOp"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__4; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -lean::dec(x_22); -if (x_30 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_13); -return x_32; -} -else -{ -obj* x_33; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_33 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__1; -return x_33; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_28, 0); -lean::inc(x_34); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_34); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_13); -return x_35; -} -else -{ -obj* x_36; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_36 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__2; -return x_36; -} -} -} -else -{ -obj* x_37; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_37 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_37; -} -} -} -} -} -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_13, 0); -lean::inc(x_38); -lean::dec(x_13); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -switch (lean::obj_tag(x_39)) { -case 0: -{ -obj* x_40; -lean::dec(x_38); -x_40 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_40; -} -case 1: -{ -obj* x_41; -lean::dec(x_39); -lean::dec(x_38); -x_41 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_41; -} -default: -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; uint8 x_46; -x_42 = lean::cnstr_get(x_38, 1); -lean::inc(x_42); -lean::dec(x_38); -x_43 = lean::cnstr_get(x_39, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_39, 1); -lean::inc(x_44); -lean::dec(x_39); -x_45 = lean::box(0); -x_46 = lean_name_dec_eq(x_43, x_45); -lean::dec(x_43); -if (x_46 == 0) -{ -obj* x_47; -lean::dec(x_44); -lean::dec(x_42); -x_47 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_47; -} -else -{ -if (lean::obj_tag(x_42) == 0) -{ -obj* x_48; -lean::dec(x_44); -x_48 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_48; -} -else -{ -obj* x_49; -x_49 = lean::cnstr_get(x_42, 1); -lean::inc(x_49); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; -x_50 = lean::cnstr_get(x_42, 0); -lean::inc(x_50); -lean::dec(x_42); -x_51 = lean::mk_nat_obj(0u); -x_52 = lean::nat_dec_eq(x_44, x_51); -lean::dec(x_44); -if (x_52 == 0) -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::cnstr_get(x_50, 0); -lean::inc(x_53); -lean::dec(x_50); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -else -{ -obj* x_56; -lean::dec(x_50); -x_56 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__1; -return x_56; -} -} -else -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; -x_57 = lean::cnstr_get(x_50, 0); -lean::inc(x_57); -lean::dec(x_50); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -return x_59; -} -else -{ -obj* x_60; -lean::dec(x_50); -x_60 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__2; -return x_60; -} -} -} -else -{ -obj* x_61; -lean::dec(x_49); -lean::dec(x_44); -lean::dec(x_42); -x_61 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_61; -} -} -} -} -} -} -} -} -else -{ -obj* x_62; -lean::dec(x_11); -lean::dec(x_6); -x_62 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3; -return x_62; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffset() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("precedenceOffset"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -lean::dec(x_1); -x_7 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView; -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_3); -x_10 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView; -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_4); -x_13 = l_Lean_Parser_number_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_5); -x_16 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -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_17 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_15); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_12); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_9); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_Lean_Parser_command_NotationSpec_precedenceOffset; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -return x_24; -} -else -{ -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; -x_25 = lean::cnstr_get(x_6, 0); -lean::inc(x_25); -lean::dec(x_6); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_16); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_9); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::box(3); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_30); -x_33 = l_Lean_Parser_command_NotationSpec_precedenceOffset; -x_34 = l_Lean_Parser_Syntax_mkNode(x_33, x_32); -return x_34; -} -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_2, 0); -lean::inc(x_35); -lean::dec(x_2); -x_36 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_37 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_15); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_12); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_9); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_36); -lean::cnstr_set(x_41, 1, x_40); -x_42 = l_Lean_Parser_command_NotationSpec_precedenceOffset; -x_43 = l_Lean_Parser_Syntax_mkNode(x_42, x_41); -return x_43; -} -else -{ -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; -x_44 = lean::cnstr_get(x_6, 0); -lean::inc(x_44); -lean::dec(x_6); -x_45 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_16); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_15); -lean::cnstr_set(x_47, 1, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_12); -lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_9); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_36); -lean::cnstr_set(x_50, 1, x_49); -x_51 = l_Lean_Parser_command_NotationSpec_precedenceOffset; -x_52 = l_Lean_Parser_Syntax_mkNode(x_51, x_50); -return x_52; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_number_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_4); -x_9 = l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_5); -lean::cnstr_set(x_10, 2, x_8); -lean::cnstr_set(x_10, 3, x_9); -lean::cnstr_set(x_10, 4, x_1); -return x_10; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_44; -x_44 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; -x_45 = l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__2; -return x_45; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_44, 0); -lean::inc(x_46); -lean::dec(x_44); -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -lean::dec(x_46); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -x_48 = lean::box(3); -x_2 = x_47; -x_3 = x_48; -goto block_43; -} -else -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_47, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_47, 1); -lean::inc(x_50); -lean::dec(x_47); -x_2 = x_50; -x_3 = x_49; -goto block_43; -} -} -block_43: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_3, 0); -lean::inc(x_40); -lean::dec(x_3); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -x_4 = x_41; -goto block_39; -} -else -{ -obj* x_42; -lean::dec(x_3); -x_42 = lean::box(0); -x_4 = x_42; -goto block_39; -} -block_39: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_36; -x_36 = lean::box(3); -x_5 = x_2; -x_6 = x_36; -goto block_35; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_2, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_2, 1); -lean::inc(x_38); -lean::dec(x_2); -x_5 = x_38; -x_6 = x_37; -goto block_35; -} -block_35: -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_6); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_32; -x_32 = lean::box(3); -x_10 = x_5; -x_11 = x_32; -goto block_31; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_5, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_5, 1); -lean::inc(x_34); -lean::dec(x_5); -x_10 = x_34; -x_11 = x_33; -goto block_31; -} -block_31: -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::box(0); -x_16 = l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_9); -lean::cnstr_set(x_17, 2, x_14); -lean::cnstr_set(x_17, 3, x_16); -lean::cnstr_set(x_17, 4, x_15); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = lean::cnstr_get(x_10, 0); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_10, 1); -lean::inc(x_19); -lean::dec(x_10); -x_20 = l_Lean_Parser_number_HasView; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::apply_1(x_21, x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_24, 0, x_4); -lean::cnstr_set(x_24, 1, x_9); -lean::cnstr_set(x_24, 2, x_14); -lean::cnstr_set(x_24, 3, x_22); -lean::cnstr_set(x_24, 4, x_23); -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_19, 0); -lean::inc(x_25); -lean::dec(x_19); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::dec(x_25); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_9); -lean::cnstr_set(x_28, 2, x_14); -lean::cnstr_set(x_28, 3, x_22); -lean::cnstr_set(x_28, 4, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -lean::dec(x_25); -x_29 = lean::box(0); -x_30 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_30, 0, x_4); -lean::cnstr_set(x_30, 1, x_9); -lean::cnstr_set(x_30, 2, x_14); -lean::cnstr_set(x_30, 3, x_22); -lean::cnstr_set(x_30, 4, x_29); -return x_30; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceTerm() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("precedenceTerm"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_NotationSpec_precedenceTerm; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_NotationSpec_precedenceTerm; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("precedenceTerm"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_command_NotationSpec_precedenceLit_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1(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_9; obj* x_10; obj* x_11; -lean::inc(x_1); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_1); -lean::inc(x_7); -lean::inc(x_5); -x_10 = l_Lean_Parser_token(x_5, x_7, x_8); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; uint8 x_15; -x_13 = lean::cnstr_get(x_10, 1); -x_14 = lean::cnstr_get(x_10, 0); -lean::dec(x_14); -x_15 = !lean::is_exclusive(x_11); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_11, 0); -x_17 = lean::cnstr_get(x_11, 1); -x_18 = lean::cnstr_get(x_11, 2); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; -x_40 = lean::cnstr_get(x_16, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -x_42 = lean::string_dec_eq(x_1, x_41); -lean::dec(x_1); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -lean::free_heap_obj(x_11); -lean::free_heap_obj(x_10); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_7); -x_44 = lean::box(0); -x_45 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_41, x_3, x_43, x_44, x_5, x_17, x_13); -lean::dec(x_5); -lean::dec(x_43); -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_45); -if (x_47 == 0) -{ -obj* x_48; uint8 x_49; -x_48 = lean::cnstr_get(x_45, 0); -lean::dec(x_48); -x_49 = !lean::is_exclusive(x_46); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_50 = lean::cnstr_get(x_46, 2); -x_51 = lean::cnstr_get(x_46, 0); -lean::dec(x_51); -x_52 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_46, 2, x_52); -lean::cnstr_set(x_46, 0, x_16); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_46); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_53); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_54); -x_56 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_55, x_9); -x_57 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_56); -lean::cnstr_set(x_45, 0, x_57); -return x_45; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_58 = lean::cnstr_get(x_46, 1); -x_59 = lean::cnstr_get(x_46, 2); -lean::inc(x_59); -lean::inc(x_58); -lean::dec(x_46); -x_60 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_61 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_61, 0, x_16); -lean::cnstr_set(x_61, 1, x_58); -lean::cnstr_set(x_61, 2, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_60, x_63); -x_65 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_64, x_9); -x_66 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_65); -lean::cnstr_set(x_45, 0, x_66); -return x_45; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_67 = lean::cnstr_get(x_45, 1); -lean::inc(x_67); -lean::dec(x_45); -x_68 = lean::cnstr_get(x_46, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_46, 2); -lean::inc(x_69); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - lean::cnstr_release(x_46, 2); - x_70 = x_46; -} else { - lean::dec_ref(x_46); - x_70 = lean::box(0); -} -x_71 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_70)) { - x_72 = lean::alloc_cnstr(0, 3, 0); -} else { - x_72 = x_70; -} -lean::cnstr_set(x_72, 0, x_16); -lean::cnstr_set(x_72, 1, x_68); -lean::cnstr_set(x_72, 2, x_71); -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_72); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_73); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_74); -x_76 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_75, x_9); -x_77 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_76); -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_67); -return x_78; -} -} -else -{ -uint8 x_79; -lean::dec(x_16); -x_79 = !lean::is_exclusive(x_45); -if (x_79 == 0) -{ -obj* x_80; uint8 x_81; -x_80 = lean::cnstr_get(x_45, 0); -lean::dec(x_80); -x_81 = !lean::is_exclusive(x_46); -if (x_81 == 0) -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_46); -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_82); -x_85 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_84, x_9); -x_86 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_85); -lean::cnstr_set(x_45, 0, x_86); -return x_45; -} -else -{ -obj* x_87; uint8 x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_87 = lean::cnstr_get(x_46, 0); -x_88 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -lean::inc(x_87); -lean::dec(x_46); -x_89 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_89, 0, x_87); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_88); -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_89); -x_91 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_90); -x_93 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_92, x_9); -x_94 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_93); -lean::cnstr_set(x_45, 0, x_94); -return x_45; -} -} -else -{ -obj* x_95; obj* x_96; uint8 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; -x_95 = lean::cnstr_get(x_45, 1); -lean::inc(x_95); -lean::dec(x_45); -x_96 = lean::cnstr_get(x_46, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - x_98 = x_46; -} else { - lean::dec_ref(x_46); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(1, 1, 1); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_96); -lean::cnstr_set_scalar(x_99, sizeof(void*)*1, x_97); -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_99); -x_101 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_101, x_100); -x_103 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_102, x_9); -x_104 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_103); -x_105 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_95); -return x_105; -} -} -} -else -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -lean::dec(x_41); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_3); -x_106 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_11, 2, x_106); -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_11); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_108, x_107); -x_110 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_109, x_9); -x_111 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_110); -lean::cnstr_set(x_10, 0, x_111); -return x_10; -} -} -else -{ -obj* x_112; -lean::free_heap_obj(x_11); -lean::dec(x_16); -lean::free_heap_obj(x_10); -lean::dec(x_1); -x_112 = lean::box(0); -x_19 = x_112; -goto block_39; -} -block_39: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -lean::dec(x_19); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_7); -x_21 = lean::box(0); -x_22 = l_String_splitAux___main___closed__1; -x_23 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_22, x_3, x_20, x_21, x_5, x_17, x_13); -lean::dec(x_5); -lean::dec(x_20); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_23, 0); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_25); -x_27 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_27, x_26); -x_29 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_28, x_9); -x_30 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_29); -lean::cnstr_set(x_23, 0, x_30); -return x_23; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_31 = lean::cnstr_get(x_23, 0); -x_32 = lean::cnstr_get(x_23, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_23); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_31); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_33); -x_36 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_35, x_9); -x_37 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_32); -return x_38; -} -} -} -else -{ -obj* x_113; obj* x_114; obj* x_115; obj* x_116; -x_113 = lean::cnstr_get(x_11, 0); -x_114 = lean::cnstr_get(x_11, 1); -x_115 = lean::cnstr_get(x_11, 2); -lean::inc(x_115); -lean::inc(x_114); -lean::inc(x_113); -lean::dec(x_11); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_131; obj* x_132; uint8 x_133; -x_131 = lean::cnstr_get(x_113, 0); -lean::inc(x_131); -x_132 = lean::cnstr_get(x_131, 1); -lean::inc(x_132); -lean::dec(x_131); -x_133 = lean::string_dec_eq(x_1, x_132); -lean::dec(x_1); -if (x_133 == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; -lean::free_heap_obj(x_10); -x_134 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_134, 0, x_7); -x_135 = lean::box(0); -x_136 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_132, x_3, x_134, x_135, x_5, x_114, x_13); -lean::dec(x_5); -lean::dec(x_134); -x_137 = lean::cnstr_get(x_136, 0); -lean::inc(x_137); -if (lean::obj_tag(x_137) == 0) -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; -x_138 = lean::cnstr_get(x_136, 1); -lean::inc(x_138); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_139 = x_136; -} else { - lean::dec_ref(x_136); - x_139 = lean::box(0); -} -x_140 = lean::cnstr_get(x_137, 1); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_137, 2); -lean::inc(x_141); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - lean::cnstr_release(x_137, 1); - lean::cnstr_release(x_137, 2); - x_142 = x_137; -} else { - lean::dec_ref(x_137); - x_142 = lean::box(0); -} -x_143 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_142)) { - x_144 = lean::alloc_cnstr(0, 3, 0); -} else { - x_144 = x_142; -} -lean::cnstr_set(x_144, 0, x_113); -lean::cnstr_set(x_144, 1, x_140); -lean::cnstr_set(x_144, 2, x_143); -x_145 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_141, x_144); -x_146 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_145); -x_147 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_143, x_146); -x_148 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_147, x_9); -x_149 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_148); -if (lean::is_scalar(x_139)) { - x_150 = lean::alloc_cnstr(0, 2, 0); -} else { - x_150 = x_139; -} -lean::cnstr_set(x_150, 0, x_149); -lean::cnstr_set(x_150, 1, x_138); -return x_150; -} -else -{ -obj* x_151; obj* x_152; obj* x_153; uint8 x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -lean::dec(x_113); -x_151 = lean::cnstr_get(x_136, 1); -lean::inc(x_151); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_152 = x_136; -} else { - lean::dec_ref(x_136); - x_152 = lean::box(0); -} -x_153 = lean::cnstr_get(x_137, 0); -lean::inc(x_153); -x_154 = lean::cnstr_get_scalar(x_137, sizeof(void*)*1); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - x_155 = x_137; -} else { - lean::dec_ref(x_137); - x_155 = lean::box(0); -} -if (lean::is_scalar(x_155)) { - x_156 = lean::alloc_cnstr(1, 1, 1); -} else { - x_156 = x_155; -} -lean::cnstr_set(x_156, 0, x_153); -lean::cnstr_set_scalar(x_156, sizeof(void*)*1, x_154); -x_157 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_156); -x_158 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_159 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_158, x_157); -x_160 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_159, x_9); -x_161 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_160); -if (lean::is_scalar(x_152)) { - x_162 = lean::alloc_cnstr(0, 2, 0); -} else { - x_162 = x_152; -} -lean::cnstr_set(x_162, 0, x_161); -lean::cnstr_set(x_162, 1, x_151); -return x_162; -} -} -else -{ -obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; -lean::dec(x_132); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_3); -x_163 = l_Lean_Parser_finishCommentBlock___closed__2; -x_164 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_164, 0, x_113); -lean::cnstr_set(x_164, 1, x_114); -lean::cnstr_set(x_164, 2, x_163); -x_165 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_164); -x_166 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_167 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_166, x_165); -x_168 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_167, x_9); -x_169 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_168); -lean::cnstr_set(x_10, 0, x_169); -return x_10; -} -} -else -{ -obj* x_170; -lean::dec(x_113); -lean::free_heap_obj(x_10); -lean::dec(x_1); -x_170 = lean::box(0); -x_116 = x_170; -goto block_130; -} -block_130: -{ -obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; -lean::dec(x_116); -x_117 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_117, 0, x_7); -x_118 = lean::box(0); -x_119 = l_String_splitAux___main___closed__1; -x_120 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_119, x_3, x_117, x_118, x_5, x_114, x_13); -lean::dec(x_5); -lean::dec(x_117); -x_121 = lean::cnstr_get(x_120, 0); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_120, 1); -lean::inc(x_122); -if (lean::is_exclusive(x_120)) { - lean::cnstr_release(x_120, 0); - lean::cnstr_release(x_120, 1); - x_123 = x_120; -} else { - lean::dec_ref(x_120); - x_123 = lean::box(0); -} -x_124 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_121); -x_125 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_126 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_125, x_124); -x_127 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_126, x_9); -x_128 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_127); -if (lean::is_scalar(x_123)) { - x_129 = lean::alloc_cnstr(0, 2, 0); -} else { - x_129 = x_123; -} -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_122); -return x_129; -} -} -} -else -{ -obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; -x_171 = lean::cnstr_get(x_10, 1); -lean::inc(x_171); -lean::dec(x_10); -x_172 = lean::cnstr_get(x_11, 0); -lean::inc(x_172); -x_173 = lean::cnstr_get(x_11, 1); -lean::inc(x_173); -x_174 = lean::cnstr_get(x_11, 2); -lean::inc(x_174); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - lean::cnstr_release(x_11, 2); - x_175 = x_11; -} else { - lean::dec_ref(x_11); - x_175 = lean::box(0); -} -if (lean::obj_tag(x_172) == 0) -{ -obj* x_191; obj* x_192; uint8 x_193; -x_191 = lean::cnstr_get(x_172, 0); -lean::inc(x_191); -x_192 = lean::cnstr_get(x_191, 1); -lean::inc(x_192); -lean::dec(x_191); -x_193 = lean::string_dec_eq(x_1, x_192); -lean::dec(x_1); -if (x_193 == 0) -{ -obj* x_194; obj* x_195; obj* x_196; obj* x_197; -lean::dec(x_175); -x_194 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_194, 0, x_7); -x_195 = lean::box(0); -x_196 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_192, x_3, x_194, x_195, x_5, x_173, x_171); -lean::dec(x_5); -lean::dec(x_194); -x_197 = lean::cnstr_get(x_196, 0); -lean::inc(x_197); -if (lean::obj_tag(x_197) == 0) -{ -obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; -x_198 = lean::cnstr_get(x_196, 1); -lean::inc(x_198); -if (lean::is_exclusive(x_196)) { - lean::cnstr_release(x_196, 0); - lean::cnstr_release(x_196, 1); - x_199 = x_196; -} else { - lean::dec_ref(x_196); - x_199 = lean::box(0); -} -x_200 = lean::cnstr_get(x_197, 1); -lean::inc(x_200); -x_201 = lean::cnstr_get(x_197, 2); -lean::inc(x_201); -if (lean::is_exclusive(x_197)) { - lean::cnstr_release(x_197, 0); - lean::cnstr_release(x_197, 1); - lean::cnstr_release(x_197, 2); - x_202 = x_197; -} else { - lean::dec_ref(x_197); - x_202 = lean::box(0); -} -x_203 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_202)) { - x_204 = lean::alloc_cnstr(0, 3, 0); -} else { - x_204 = x_202; -} -lean::cnstr_set(x_204, 0, x_172); -lean::cnstr_set(x_204, 1, x_200); -lean::cnstr_set(x_204, 2, x_203); -x_205 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_201, x_204); -x_206 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_205); -x_207 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_203, x_206); -x_208 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_207, x_9); -x_209 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_208); -if (lean::is_scalar(x_199)) { - x_210 = lean::alloc_cnstr(0, 2, 0); -} else { - x_210 = x_199; -} -lean::cnstr_set(x_210, 0, x_209); -lean::cnstr_set(x_210, 1, x_198); -return x_210; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; -lean::dec(x_172); -x_211 = lean::cnstr_get(x_196, 1); -lean::inc(x_211); -if (lean::is_exclusive(x_196)) { - lean::cnstr_release(x_196, 0); - lean::cnstr_release(x_196, 1); - x_212 = x_196; -} else { - lean::dec_ref(x_196); - x_212 = lean::box(0); -} -x_213 = lean::cnstr_get(x_197, 0); -lean::inc(x_213); -x_214 = lean::cnstr_get_scalar(x_197, sizeof(void*)*1); -if (lean::is_exclusive(x_197)) { - lean::cnstr_release(x_197, 0); - x_215 = x_197; -} else { - lean::dec_ref(x_197); - x_215 = lean::box(0); -} -if (lean::is_scalar(x_215)) { - x_216 = lean::alloc_cnstr(1, 1, 1); -} else { - x_216 = x_215; -} -lean::cnstr_set(x_216, 0, x_213); -lean::cnstr_set_scalar(x_216, sizeof(void*)*1, x_214); -x_217 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_216); -x_218 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_219 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_218, x_217); -x_220 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_219, x_9); -x_221 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_220); -if (lean::is_scalar(x_212)) { - x_222 = lean::alloc_cnstr(0, 2, 0); -} else { - x_222 = x_212; -} -lean::cnstr_set(x_222, 0, x_221); -lean::cnstr_set(x_222, 1, x_211); -return x_222; -} -} -else -{ -obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; -lean::dec(x_192); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_3); -x_223 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_175)) { - x_224 = lean::alloc_cnstr(0, 3, 0); -} else { - x_224 = x_175; -} -lean::cnstr_set(x_224, 0, x_172); -lean::cnstr_set(x_224, 1, x_173); -lean::cnstr_set(x_224, 2, x_223); -x_225 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_224); -x_226 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_227 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_226, x_225); -x_228 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_227, x_9); -x_229 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_228); -x_230 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_230, 0, x_229); -lean::cnstr_set(x_230, 1, x_171); -return x_230; -} -} -else -{ -obj* x_231; -lean::dec(x_175); -lean::dec(x_172); -lean::dec(x_1); -x_231 = lean::box(0); -x_176 = x_231; -goto block_190; -} -block_190: -{ -obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; -lean::dec(x_176); -x_177 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_177, 0, x_7); -x_178 = lean::box(0); -x_179 = l_String_splitAux___main___closed__1; -x_180 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_179, x_3, x_177, x_178, x_5, x_173, x_171); -lean::dec(x_5); -lean::dec(x_177); -x_181 = lean::cnstr_get(x_180, 0); -lean::inc(x_181); -x_182 = lean::cnstr_get(x_180, 1); -lean::inc(x_182); -if (lean::is_exclusive(x_180)) { - lean::cnstr_release(x_180, 0); - lean::cnstr_release(x_180, 1); - x_183 = x_180; -} else { - lean::dec_ref(x_180); - x_183 = lean::box(0); -} -x_184 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_174, x_181); -x_185 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_186 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_185, x_184); -x_187 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_186, x_9); -x_188 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_187); -if (lean::is_scalar(x_183)) { - x_189 = lean::alloc_cnstr(0, 2, 0); -} else { - x_189 = x_183; -} -lean::cnstr_set(x_189, 0, x_188); -lean::cnstr_set(x_189, 1, x_182); -return x_189; -} -} -} -else -{ -uint8 x_232; -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_1); -x_232 = !lean::is_exclusive(x_10); -if (x_232 == 0) -{ -obj* x_233; uint8 x_234; -x_233 = lean::cnstr_get(x_10, 0); -lean::dec(x_233); -x_234 = !lean::is_exclusive(x_11); -if (x_234 == 0) -{ -obj* x_235; obj* x_236; obj* x_237; obj* x_238; -x_235 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_236 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_235, x_11); -x_237 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_236, x_9); -x_238 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_237); -lean::cnstr_set(x_10, 0, x_238); -return x_10; -} -else -{ -obj* x_239; uint8 x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; -x_239 = lean::cnstr_get(x_11, 0); -x_240 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_239); -lean::dec(x_11); -x_241 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_241, 0, x_239); -lean::cnstr_set_scalar(x_241, sizeof(void*)*1, x_240); -x_242 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_243 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_242, x_241); -x_244 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_243, x_9); -x_245 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_244); -lean::cnstr_set(x_10, 0, x_245); -return x_10; -} -} -else -{ -obj* x_246; obj* x_247; uint8 x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; -x_246 = lean::cnstr_get(x_10, 1); -lean::inc(x_246); -lean::dec(x_10); -x_247 = lean::cnstr_get(x_11, 0); -lean::inc(x_247); -x_248 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_249 = x_11; -} else { - lean::dec_ref(x_11); - x_249 = lean::box(0); -} -if (lean::is_scalar(x_249)) { - x_250 = lean::alloc_cnstr(1, 1, 1); -} else { - x_250 = x_249; -} -lean::cnstr_set(x_250, 0, x_247); -lean::cnstr_set_scalar(x_250, sizeof(void*)*1, x_248); -x_251 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_252 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_251, x_250); -x_253 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_252, x_9); -x_254 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_253); -x_255 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_255, 0, x_254); -lean::cnstr_set(x_255, 1, x_246); -return x_255; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -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::dec(x_1); -x_4 = lean::mk_string(" + "); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = lean::mk_string(" - "); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_2); -lean::dec(x_6); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_8); -lean::dec(x_7); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_9); -lean::dec(x_9); -lean::dec(x_5); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_8); -lean::dec(x_11); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -x_14 = lean::mk_string(")"); -x_15 = l_Lean_Parser_symbol_tokens___rarg(x_14, x_2); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_8); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_16); -lean::dec(x_16); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_17); -lean::dec(x_17); -lean::dec(x_13); -x_19 = l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens; -x_20 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_18); -lean::dec(x_18); -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_20); -lean::dec(x_20); -lean::dec(x_3); -x_22 = l_Lean_Parser_tokens___rarg(x_21); -lean::dec(x_21); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_22, x_8); -lean::dec(x_22); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_23); -lean::dec(x_23); -x_25 = l_Lean_Parser_tokens___rarg(x_24); -lean::dec(x_24); -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_25, x_8); -lean::dec(x_25); -x_27 = l_Lean_Parser_tokens___rarg(x_26); -lean::dec(x_26); -return x_27; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed(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_9; -x_9 = l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_2); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(" + "); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::mk_string(" - "); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_4); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_9); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_4); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_14); -x_19 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_18); -x_21 = lean::mk_string(")"); -x_22 = l_String_trim(x_21); -lean::dec(x_21); -lean::inc(x_22); -x_23 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_23, 0, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_4); -lean::closure_set(x_24, 2, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_14); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___boxed), 1, 0); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_20); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceLit_Parser), 5, 0); -lean::inc(x_29); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_5); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_Lean_Parser_command_NotationSpec_precedenceOffset; -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_32); -lean::closure_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_14); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_29); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_36, 0, x_35); -lean::closure_set(x_36, 1, x_4); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_14); -x_38 = l_Lean_Parser_TermParserM_Monad; -x_39 = l_Lean_Parser_TermParserM_MonadExcept; -x_40 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_41 = l_Lean_Parser_TermParserM_Alternative; -x_42 = l_Lean_Parser_command_NotationSpec_precedenceTerm; -x_43 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_44 = l_Lean_Parser_Combinators_node_view___rarg(x_38, x_39, x_40, x_41, x_42, x_37, x_43); -lean::dec(x_37); -return x_44; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(" + "); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::mk_string(" - "); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_4); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_9); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_4); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_14); -x_19 = l_Lean_Parser_command_NotationSpec_precedenceOffsetOp; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_18); -x_21 = lean::mk_string(")"); -x_22 = l_String_trim(x_21); -lean::dec(x_21); -lean::inc(x_22); -x_23 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_23, 0, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_4); -lean::closure_set(x_24, 2, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_14); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___boxed), 1, 0); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_20); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceLit_Parser), 5, 0); -lean::inc(x_29); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_5); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_Lean_Parser_command_NotationSpec_precedenceOffset; -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_32); -lean::closure_set(x_33, 1, x_31); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_14); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_29); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_36, 0, x_35); -lean::closure_set(x_36, 1, x_4); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_14); -return x_37; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_precedenceTerm; -x_7 = l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; obj* x_3; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -lean::dec(x_1); -x_3 = l_Lean_Parser_command_NotationSpec_precedenceLit_View_toNat___main(x_2); -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 2); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -x_7 = l_Lean_Parser_command_NotationSpec_precedenceLit_View_toNat___main(x_6); -x_8 = lean::cnstr_get(x_4, 3); -lean::inc(x_8); -lean::dec(x_4); -x_9 = l_Lean_Parser_number_View_toNat___main(x_8); -x_10 = lean::nat_add(x_7, x_9); -lean::dec(x_9); -lean::dec(x_7); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -lean::dec(x_5); -x_11 = lean::cnstr_get(x_4, 1); -lean::inc(x_11); -x_12 = l_Lean_Parser_command_NotationSpec_precedenceLit_View_toNat___main(x_11); -x_13 = lean::cnstr_get(x_4, 3); -lean::inc(x_13); -lean::dec(x_4); -x_14 = l_Lean_Parser_number_View_toNat___main(x_13); -x_15 = lean::nat_sub(x_12, x_14); -lean::dec(x_14); -lean::dec(x_12); -return x_15; -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_NotationSpec_precedenceTerm_View_toNat___main(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("precedence"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::box(3); -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 = l_Lean_Parser_command_NotationSpec_precedence; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -x_16 = l_Lean_Parser_command_NotationSpec_precedence; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__3; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_2 = x_24; -x_3 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_2 = x_27; -x_3 = x_26; -goto block_20; -} -} -block_20: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -else -{ -lean::dec(x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_13; -x_13 = l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__2; -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::box(0); -x_16 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_15); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_precedence_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string(":"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::mk_string(":"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::box(0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser), 5, 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); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_TermParserM_Monad; -x_11 = l_Lean_Parser_TermParserM_MonadExcept; -x_12 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_13 = l_Lean_Parser_TermParserM_Alternative; -x_14 = l_Lean_Parser_command_NotationSpec_precedence; -x_15 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_16 = l_Lean_Parser_Combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); -lean::dec(x_9); -return x_16; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_precedence_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string(":"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::box(0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser), 5, 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); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_NotationSpec_precedence_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_precedence; -x_7 = l_Lean_Parser_command_NotationSpec_precedence_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint32 x_11; uint8 x_12; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = 96; -x_12 = x_10 == x_11; -if (x_12 == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::string_push(x_2, x_10); -x_14 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_13; -x_3 = x_14; -goto _start; -} -else -{ -obj* x_16; -lean::dec(x_7); -x_16 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_16; -} -} -} -else -{ -obj* x_17; -lean::dec(x_1); -x_17 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_17; -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = l_String_OldIterator_remaining___main(x_1); -x_4 = l_String_splitAux___main___closed__1; -x_5 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__2(x_3, x_4, x_1); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_2); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1___rarg), 2, 0); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; -x_1 = lean::box(0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; uint8 x_5; obj* x_6; -x_1 = l_Lean_Parser_TermParserM_Monad; -x_2 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_3 = l_Lean_Parser_TermParserM_Lean_Parser_monadBasicParser; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1___boxed), 3, 0); -x_5 = 0; -x_6 = l_Lean_Parser_raw_view___rarg(x_1, x_2, x_3, lean::box(0), x_4, x_5); -lean::dec(x_4); -return x_6; -} -} -obj* l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -lean::inc(x_1); -x_3 = l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens___spec__1___rarg(x_1, x_2); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -if (lean::obj_tag(x_4) == 0) -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; uint8 x_7; -x_6 = lean::cnstr_get(x_3, 0); -lean::dec(x_6); -x_7 = !lean::is_exclusive(x_4); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_8 = lean::cnstr_get(x_4, 1); -x_9 = lean::cnstr_get(x_4, 2); -x_10 = lean::cnstr_get(x_4, 0); -lean::dec(x_10); -lean::inc(x_8); -x_11 = l_Lean_Parser_mkRawRes(x_1, x_8); -x_12 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_4, 2, x_12); -lean::cnstr_set(x_4, 0, x_11); -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_4); -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_13); -lean::cnstr_set(x_3, 0, x_15); -return x_3; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_16 = lean::cnstr_get(x_4, 1); -x_17 = lean::cnstr_get(x_4, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_4); -lean::inc(x_16); -x_18 = l_Lean_Parser_mkRawRes(x_1, x_16); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_21); -lean::cnstr_set(x_3, 0, x_23); -return x_3; -} -} -else -{ -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; -x_24 = lean::cnstr_get(x_3, 1); -lean::inc(x_24); -lean::dec(x_3); -x_25 = lean::cnstr_get(x_4, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_4, 2); -lean::inc(x_26); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - lean::cnstr_release(x_4, 2); - x_27 = x_4; -} else { - lean::dec_ref(x_4); - x_27 = lean::box(0); -} -lean::inc(x_25); -x_28 = l_Lean_Parser_mkRawRes(x_1, x_25); -x_29 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_27)) { - x_30 = lean::alloc_cnstr(0, 3, 0); -} else { - x_30 = x_27; -} -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_25); -lean::cnstr_set(x_30, 2, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_30); -x_32 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_31); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_24); -return x_34; -} -} -else -{ -uint8 x_35; -lean::dec(x_1); -x_35 = !lean::is_exclusive(x_3); -if (x_35 == 0) -{ -obj* x_36; uint8 x_37; -x_36 = lean::cnstr_get(x_3, 0); -lean::dec(x_36); -x_37 = !lean::is_exclusive(x_4); -if (x_37 == 0) -{ -obj* x_38; obj* x_39; -x_38 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_4); -lean::cnstr_set(x_3, 0, x_39); -return x_3; -} -else -{ -obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_44; -x_40 = lean::cnstr_get(x_4, 0); -x_41 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::inc(x_40); -lean::dec(x_4); -x_42 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_41); -x_43 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_42); -lean::cnstr_set(x_3, 0, x_44); -return x_3; -} -} -else -{ -obj* x_45; obj* x_46; uint8 x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_45 = lean::cnstr_get(x_3, 1); -lean::inc(x_45); -lean::dec(x_3); -x_46 = lean::cnstr_get(x_4, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - x_48 = x_4; -} else { - lean::dec_ref(x_4); - x_48 = lean::box(0); -} -if (lean::is_scalar(x_48)) { - x_49 = lean::alloc_cnstr(1, 1, 1); -} else { - x_49 = x_48; -} -lean::cnstr_set(x_49, 0, x_46); -lean::cnstr_set_scalar(x_49, sizeof(void*)*1, x_47); -x_50 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_49); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_45); -return x_52; -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("symbolQuote"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::box(3); -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::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -return x_6; -} -} -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_50; obj* x_51; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_94; -x_94 = lean::box(3); -x_7 = x_94; -goto block_49; -} -else -{ -obj* x_95; obj* x_96; -x_95 = lean::cnstr_get(x_3, 0); -lean::inc(x_95); -lean::dec(x_3); -x_96 = lean::box(3); -x_50 = x_96; -x_51 = x_95; -goto block_93; -} -} -else -{ -obj* x_97; obj* x_98; -x_97 = lean::cnstr_get(x_2, 0); -lean::inc(x_97); -lean::dec(x_2); -x_98 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -if (lean::obj_tag(x_3) == 0) -{ -x_7 = x_98; -goto block_49; -} -else -{ -obj* x_99; -x_99 = lean::cnstr_get(x_3, 0); -lean::inc(x_99); -lean::dec(x_3); -x_50 = x_98; -x_51 = x_99; -goto block_93; -} -} -block_49: -{ -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__1; -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_11 = l_Lean_Parser_Syntax_mkNode(x_10, x_9); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_12 = lean::cnstr_get(x_5, 0); -lean::inc(x_12); -lean::dec(x_5); -x_13 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_6); -x_17 = l_Lean_Parser_noKind; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_6); -x_20 = lean::box(3); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -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_7); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_25 = l_Lean_Parser_Syntax_mkNode(x_24, x_23); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_4, 0); -lean::inc(x_26); -lean::dec(x_4); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_28 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::box(3); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_7); -lean::cnstr_set(x_32, 1, x_31); -x_33 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_34 = l_Lean_Parser_Syntax_mkNode(x_33, x_32); -return x_34; -} -else -{ -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_46; obj* x_47; obj* x_48; -x_35 = lean::cnstr_get(x_5, 0); -lean::inc(x_35); -lean::dec(x_5); -x_36 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_37 = lean::cnstr_get(x_36, 1); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_35); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_6); -x_40 = l_Lean_Parser_noKind; -x_41 = l_Lean_Parser_Syntax_mkNode(x_40, x_39); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_6); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_27); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::box(3); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_43); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_7); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_48 = l_Lean_Parser_Syntax_mkNode(x_47, x_46); -return x_48; -} -} -} -block_93: -{ -obj* x_52; -x_52 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_52, 0, x_51); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_53 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__2; -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_50); -lean::cnstr_set(x_55, 1, x_54); -x_56 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_57 = l_Lean_Parser_Syntax_mkNode(x_56, x_55); -return x_57; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_58 = lean::cnstr_get(x_5, 0); -lean::inc(x_58); -lean::dec(x_5); -x_59 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_60 = lean::cnstr_get(x_59, 1); -lean::inc(x_60); -x_61 = lean::apply_1(x_60, x_58); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_6); -x_63 = l_Lean_Parser_noKind; -x_64 = l_Lean_Parser_Syntax_mkNode(x_63, x_62); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_6); -x_66 = lean::box(3); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_65); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_52); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_50); -lean::cnstr_set(x_69, 1, x_68); -x_70 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_71 = l_Lean_Parser_Syntax_mkNode(x_70, x_69); -return x_71; -} -} -else -{ -obj* x_72; obj* x_73; -x_72 = lean::cnstr_get(x_4, 0); -lean::inc(x_72); -lean::dec(x_4); -x_73 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_73, 0, x_72); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_74 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_73); -lean::cnstr_set(x_75, 1, x_74); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_52); -lean::cnstr_set(x_76, 1, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_50); -lean::cnstr_set(x_77, 1, x_76); -x_78 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_79 = l_Lean_Parser_Syntax_mkNode(x_78, x_77); -return x_79; -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_80 = lean::cnstr_get(x_5, 0); -lean::inc(x_80); -lean::dec(x_5); -x_81 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_82 = lean::cnstr_get(x_81, 1); -lean::inc(x_82); -x_83 = lean::apply_1(x_82, x_80); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_6); -x_85 = l_Lean_Parser_noKind; -x_86 = l_Lean_Parser_Syntax_mkNode(x_85, x_84); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_6); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_73); -lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_52); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_50); -lean::cnstr_set(x_90, 1, x_89); -x_91 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_92 = l_Lean_Parser_Syntax_mkNode(x_91, x_90); -return x_92; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_1); -lean::cnstr_set(x_5, 2, x_1); -lean::cnstr_set(x_5, 3, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -lean::free_heap_obj(x_3); -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_1); -lean::cnstr_set(x_9, 3, x_1); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -lean::dec(x_8); -x_12 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -lean::cnstr_set(x_3, 0, x_14); -x_15 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_1); -lean::cnstr_set(x_15, 2, x_1); -lean::cnstr_set(x_15, 3, x_3); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_8); -lean::free_heap_obj(x_3); -x_16 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_1); -lean::cnstr_set(x_17, 2, x_1); -lean::cnstr_set(x_17, 3, x_16); -return x_17; -} -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_3, 0); -lean::inc(x_18); -lean::dec(x_3); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_1); -lean::cnstr_set(x_20, 2, x_1); -lean::cnstr_set(x_20, 3, x_1); -return x_20; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -x_23 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::apply_1(x_24, x_22); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_27, 0, x_1); -lean::cnstr_set(x_27, 1, x_1); -lean::cnstr_set(x_27, 2, x_1); -lean::cnstr_set(x_27, 3, x_26); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -lean::dec(x_21); -lean::dec(x_19); -x_28 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_29 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_29, 0, x_1); -lean::cnstr_set(x_29, 1, x_1); -lean::cnstr_set(x_29, 2, x_1); -lean::cnstr_set(x_29, 3, x_28); -return x_29; -} -} -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_94; -x_94 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_94) == 0) -{ -obj* x_95; -x_95 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__2; -return x_95; -} -else -{ -obj* x_96; obj* x_97; -x_96 = lean::cnstr_get(x_94, 0); -lean::inc(x_96); -lean::dec(x_94); -x_97 = lean::cnstr_get(x_96, 1); -lean::inc(x_97); -lean::dec(x_96); -if (lean::obj_tag(x_97) == 0) -{ -obj* x_98; -x_98 = lean::box(3); -x_2 = x_97; -x_3 = x_98; -goto block_93; -} -else -{ -obj* x_99; obj* x_100; -x_99 = lean::cnstr_get(x_97, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_97, 1); -lean::inc(x_100); -lean::dec(x_97); -x_2 = x_100; -x_3 = x_99; -goto block_93; -} -} -block_93: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_3, 0); -lean::inc(x_90); -lean::dec(x_3); -x_91 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_91, 0, x_90); -x_4 = x_91; -goto block_89; -} -else -{ -obj* x_92; -lean::dec(x_3); -x_92 = lean::box(0); -x_4 = x_92; -goto block_89; -} -block_89: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_86; -x_86 = lean::box(3); -x_5 = x_2; -x_6 = x_86; -goto block_85; -} -else -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_2, 0); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_2, 1); -lean::inc(x_88); -lean::dec(x_2); -x_5 = x_88; -x_6 = x_87; -goto block_85; -} -block_85: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 0) -{ -obj* x_82; obj* x_83; -x_82 = lean::cnstr_get(x_6, 0); -lean::inc(x_82); -lean::dec(x_6); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -x_7 = x_83; -goto block_81; -} -else -{ -obj* x_84; -lean::dec(x_6); -x_84 = lean::box(0); -x_7 = x_84; -goto block_81; -} -block_81: -{ -obj* x_8; obj* x_40; obj* x_41; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_72; -x_72 = lean::box(0); -x_8 = x_72; -goto block_39; -} -else -{ -obj* x_73; -x_73 = lean::cnstr_get(x_5, 0); -lean::inc(x_73); -if (lean::obj_tag(x_73) == 0) -{ -obj* x_74; obj* x_75; obj* x_76; -x_74 = lean::cnstr_get(x_5, 1); -lean::inc(x_74); -lean::dec(x_5); -x_75 = lean::cnstr_get(x_73, 0); -lean::inc(x_75); -lean::dec(x_73); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -if (lean::obj_tag(x_74) == 0) -{ -x_8 = x_76; -goto block_39; -} -else -{ -obj* x_77; -x_77 = lean::cnstr_get(x_74, 0); -lean::inc(x_77); -lean::dec(x_74); -x_40 = x_76; -x_41 = x_77; -goto block_71; -} -} -else -{ -obj* x_78; obj* x_79; -lean::dec(x_73); -x_78 = lean::cnstr_get(x_5, 1); -lean::inc(x_78); -lean::dec(x_5); -x_79 = lean::box(0); -if (lean::obj_tag(x_78) == 0) -{ -x_8 = x_79; -goto block_39; -} -else -{ -obj* x_80; -x_80 = lean::cnstr_get(x_78, 0); -lean::inc(x_80); -lean::dec(x_78); -x_40 = x_79; -x_41 = x_80; -goto block_71; -} -} -} -block_39: -{ -obj* x_9; obj* x_10; -x_9 = lean::box(3); -x_10 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -x_11 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_12 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_7); -lean::cnstr_set(x_12, 2, x_8); -lean::cnstr_set(x_12, 3, x_11); -return x_12; -} -else -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_10); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_10, 0); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; -lean::free_heap_obj(x_10); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_7); -lean::cnstr_set(x_17, 2, x_8); -lean::cnstr_set(x_17, 3, x_16); -return x_17; -} -else -{ -obj* x_18; -x_18 = lean::cnstr_get(x_15, 1); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = lean::cnstr_get(x_15, 0); -lean::inc(x_19); -lean::dec(x_15); -x_20 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::apply_1(x_21, x_19); -lean::cnstr_set(x_10, 0, x_22); -x_23 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_7); -lean::cnstr_set(x_23, 2, x_8); -lean::cnstr_set(x_23, 3, x_10); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -lean::dec(x_18); -lean::dec(x_15); -lean::free_heap_obj(x_10); -x_24 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_7); -lean::cnstr_set(x_25, 2, x_8); -lean::cnstr_set(x_25, 3, x_24); -return x_25; -} -} -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_10, 0); -lean::inc(x_26); -lean::dec(x_10); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::box(0); -x_29 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_8); -lean::cnstr_set(x_29, 3, x_28); -return x_29; -} -else -{ -obj* x_30; -x_30 = lean::cnstr_get(x_27, 1); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_31 = lean::cnstr_get(x_27, 0); -lean::inc(x_31); -lean::dec(x_27); -x_32 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -x_34 = lean::apply_1(x_33, x_31); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -x_36 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_36, 0, x_4); -lean::cnstr_set(x_36, 1, x_7); -lean::cnstr_set(x_36, 2, x_8); -lean::cnstr_set(x_36, 3, x_35); -return x_36; -} -else -{ -obj* x_37; obj* x_38; -lean::dec(x_30); -lean::dec(x_27); -x_37 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_38 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_38, 0, x_4); -lean::cnstr_set(x_38, 1, x_7); -lean::cnstr_set(x_38, 2, x_8); -lean::cnstr_set(x_38, 3, x_37); -return x_38; -} -} -} -} -} -block_71: -{ -obj* x_42; -x_42 = l_Lean_Parser_Syntax_asNode___main(x_41); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; obj* x_44; -x_43 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_44 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_44, 0, x_4); -lean::cnstr_set(x_44, 1, x_7); -lean::cnstr_set(x_44, 2, x_40); -lean::cnstr_set(x_44, 3, x_43); -return x_44; -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_42); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_42, 0); -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -lean::dec(x_46); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; -lean::free_heap_obj(x_42); -x_48 = lean::box(0); -x_49 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_49, 0, x_4); -lean::cnstr_set(x_49, 1, x_7); -lean::cnstr_set(x_49, 2, x_40); -lean::cnstr_set(x_49, 3, x_48); -return x_49; -} -else -{ -obj* x_50; -x_50 = lean::cnstr_get(x_47, 1); -lean::inc(x_50); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_51 = lean::cnstr_get(x_47, 0); -lean::inc(x_51); -lean::dec(x_47); -x_52 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -x_54 = lean::apply_1(x_53, x_51); -lean::cnstr_set(x_42, 0, x_54); -x_55 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_55, 0, x_4); -lean::cnstr_set(x_55, 1, x_7); -lean::cnstr_set(x_55, 2, x_40); -lean::cnstr_set(x_55, 3, x_42); -return x_55; -} -else -{ -obj* x_56; obj* x_57; -lean::dec(x_50); -lean::dec(x_47); -lean::free_heap_obj(x_42); -x_56 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_57 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_57, 0, x_4); -lean::cnstr_set(x_57, 1, x_7); -lean::cnstr_set(x_57, 2, x_40); -lean::cnstr_set(x_57, 3, x_56); -return x_57; -} -} -} -else -{ -obj* x_58; obj* x_59; -x_58 = lean::cnstr_get(x_42, 0); -lean::inc(x_58); -lean::dec(x_42); -x_59 = lean::cnstr_get(x_58, 1); -lean::inc(x_59); -lean::dec(x_58); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; obj* x_61; -x_60 = lean::box(0); -x_61 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_61, 0, x_4); -lean::cnstr_set(x_61, 1, x_7); -lean::cnstr_set(x_61, 2, x_40); -lean::cnstr_set(x_61, 3, x_60); -return x_61; -} -else -{ -obj* x_62; -x_62 = lean::cnstr_get(x_59, 1); -lean::inc(x_62); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_63 = lean::cnstr_get(x_59, 0); -lean::inc(x_63); -lean::dec(x_59); -x_64 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_65 = lean::cnstr_get(x_64, 0); -lean::inc(x_65); -x_66 = lean::apply_1(x_65, x_63); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -x_68 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_68, 0, x_4); -lean::cnstr_set(x_68, 1, x_7); -lean::cnstr_set(x_68, 2, x_40); -lean::cnstr_set(x_68, 3, x_67); -return x_68; -} -else -{ -obj* x_69; obj* x_70; -lean::dec(x_62); -lean::dec(x_59); -x_69 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_70 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_70, 0, x_4); -lean::cnstr_set(x_70, 1, x_7); -lean::cnstr_set(x_70, 2, x_40); -lean::cnstr_set(x_70, 3, x_69); -return x_70; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27; -return x_1; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::apply_2(x_1, x_3, x_4); -return x_5; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::apply_3(x_1, x_3, x_4, x_5); -return x_6; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -return x_7; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__4(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; -x_8 = l_String_isEmpty(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::string_length(x_1); -x_10 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -lean::cnstr_set(x_11, 2, x_10); -lean::inc(x_6); -x_12 = l___private_init_lean_parser_parsec_2__strAux___main(x_9, x_11, x_6); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; uint8 x_16; obj* x_17; obj* x_18; -lean::dec(x_1); -x_13 = lean::box(0); -x_14 = l_String_splitAux___main___closed__1; -x_15 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -lean::cnstr_set(x_15, 2, x_2); -lean::cnstr_set(x_15, 3, x_13); -x_16 = 0; -x_17 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set_scalar(x_17, sizeof(void*)*1, x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_7); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -lean::dec(x_6); -lean::dec(x_2); -x_19 = lean::cnstr_get(x_12, 0); -lean::inc(x_19); -lean::dec(x_12); -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_19); -lean::cnstr_set(x_21, 2, x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_7); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; -lean::dec(x_2); -lean::dec(x_1); -x_23 = l_String_splitAux___main___closed__1; -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_6); -lean::cnstr_set(x_25, 2, x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_7); -return x_26; -} -} -} -obj* l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5___rarg(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; -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_8 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; uint8 x_15; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -lean::dec(x_8); -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_9, 2); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::apply_6(x_2, x_11, x_3, x_4, x_5, x_12, x_10); -x_15 = !lean::is_exclusive(x_14); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_14, 0); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_16); -lean::cnstr_set(x_14, 0, x_17); -return x_14; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_18 = lean::cnstr_get(x_14, 0); -x_19 = lean::cnstr_get(x_14, 1); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_14); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_18); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -return x_21; -} -} -else -{ -uint8 x_22; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_22 = !lean::is_exclusive(x_8); -if (x_22 == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_8, 0); -lean::dec(x_23); -x_24 = !lean::is_exclusive(x_9); -if (x_24 == 0) -{ -return x_8; -} -else -{ -obj* x_25; uint8 x_26; obj* x_27; -x_25 = lean::cnstr_get(x_9, 0); -x_26 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_25); -lean::dec(x_9); -x_27 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_26); -lean::cnstr_set(x_8, 0, x_27); -return x_8; -} -} -else -{ -obj* x_28; obj* x_29; uint8 x_30; obj* x_31; obj* x_32; obj* x_33; -x_28 = lean::cnstr_get(x_8, 1); -lean::inc(x_28); -lean::dec(x_8); -x_29 = lean::cnstr_get(x_9, 0); -lean::inc(x_29); -x_30 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_31 = x_9; -} else { - lean::dec_ref(x_9); - x_31 = lean::box(0); -} -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_29); -lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_30); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_28); -return x_33; -} -} -} -} -obj* l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5___rarg), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__6(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_5); -x_7 = l_Lean_Parser_whitespace(x_3, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_12 = lean::cnstr_get(x_8, 1); -x_13 = lean::cnstr_get(x_8, 2); -x_14 = lean::cnstr_get(x_8, 0); -lean::dec(x_14); -lean::inc(x_12); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_5); -lean::cnstr_set(x_15, 1, x_12); -x_16 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_8, 2, x_16); -lean::cnstr_set(x_8, 0, x_15); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_8); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_17); -if (lean::obj_tag(x_19) == 0) -{ -uint8 x_20; -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = lean::cnstr_get(x_19, 2); -x_23 = l___private_init_lean_parser_token_3__updateTrailing___main(x_21, x_1); -lean::cnstr_set(x_19, 2, x_18); -lean::cnstr_set(x_19, 0, x_23); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_19); -lean::cnstr_set(x_7, 0, x_24); -return x_7; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_19, 0); -x_26 = lean::cnstr_get(x_19, 1); -x_27 = lean::cnstr_get(x_19, 2); -lean::inc(x_27); -lean::inc(x_26); -lean::inc(x_25); -lean::dec(x_19); -x_28 = l___private_init_lean_parser_token_3__updateTrailing___main(x_25, x_1); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_26); -lean::cnstr_set(x_29, 2, x_18); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_27, x_29); -lean::cnstr_set(x_7, 0, x_30); -return x_7; -} -} -else -{ -uint8 x_31; -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_19); -if (x_31 == 0) -{ -lean::cnstr_set(x_7, 0, x_19); -return x_7; -} -else -{ -obj* x_32; uint8 x_33; obj* x_34; -x_32 = lean::cnstr_get(x_19, 0); -x_33 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -lean::inc(x_32); -lean::dec(x_19); -x_34 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set_scalar(x_34, sizeof(void*)*1, x_33); -lean::cnstr_set(x_7, 0, x_34); -return x_7; -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_35 = lean::cnstr_get(x_8, 1); -x_36 = lean::cnstr_get(x_8, 2); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_8); -lean::inc(x_35); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_5); -lean::cnstr_set(x_37, 1, x_35); -x_38 = l_Lean_Parser_finishCommentBlock___closed__2; -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_35); -lean::cnstr_set(x_39, 2, x_38); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_39); -x_41 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_42 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_40); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_42, 1); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_42, 2); -lean::inc(x_45); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - lean::cnstr_release(x_42, 1); - lean::cnstr_release(x_42, 2); - x_46 = x_42; -} else { - lean::dec_ref(x_42); - x_46 = lean::box(0); -} -x_47 = l___private_init_lean_parser_token_3__updateTrailing___main(x_43, x_1); -if (lean::is_scalar(x_46)) { - x_48 = lean::alloc_cnstr(0, 3, 0); -} else { - x_48 = x_46; -} -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_44); -lean::cnstr_set(x_48, 2, x_41); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_48); -lean::cnstr_set(x_7, 0, x_49); -return x_7; -} -else -{ -obj* x_50; uint8 x_51; obj* x_52; obj* x_53; -lean::dec(x_1); -x_50 = lean::cnstr_get(x_42, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get_scalar(x_42, sizeof(void*)*1); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - x_52 = x_42; -} else { - lean::dec_ref(x_42); - x_52 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_53 = lean::alloc_cnstr(1, 1, 1); -} else { - x_53 = x_52; -} -lean::cnstr_set(x_53, 0, x_50); -lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_51); -lean::cnstr_set(x_7, 0, x_53); -return x_7; -} -} -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_54 = lean::cnstr_get(x_7, 1); -lean::inc(x_54); -lean::dec(x_7); -x_55 = lean::cnstr_get(x_8, 1); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_8, 2); -lean::inc(x_56); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_57 = x_8; -} else { - lean::dec_ref(x_8); - x_57 = lean::box(0); -} -lean::inc(x_55); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_5); -lean::cnstr_set(x_58, 1, x_55); -x_59 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_57)) { - x_60 = lean::alloc_cnstr(0, 3, 0); -} else { - x_60 = x_57; -} -lean::cnstr_set(x_60, 0, x_58); -lean::cnstr_set(x_60, 1, x_55); -lean::cnstr_set(x_60, 2, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_60); -x_62 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_61); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_64 = lean::cnstr_get(x_63, 0); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_63, 1); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_63, 2); -lean::inc(x_66); -if (lean::is_exclusive(x_63)) { - lean::cnstr_release(x_63, 0); - lean::cnstr_release(x_63, 1); - lean::cnstr_release(x_63, 2); - x_67 = x_63; -} else { - lean::dec_ref(x_63); - x_67 = lean::box(0); -} -x_68 = l___private_init_lean_parser_token_3__updateTrailing___main(x_64, x_1); -if (lean::is_scalar(x_67)) { - x_69 = lean::alloc_cnstr(0, 3, 0); -} else { - x_69 = x_67; -} -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_65); -lean::cnstr_set(x_69, 2, x_62); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_66, x_69); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_54); -return x_71; -} -else -{ -obj* x_72; uint8 x_73; obj* x_74; obj* x_75; obj* x_76; -lean::dec(x_1); -x_72 = lean::cnstr_get(x_63, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get_scalar(x_63, sizeof(void*)*1); -if (lean::is_exclusive(x_63)) { - lean::cnstr_release(x_63, 0); - x_74 = x_63; -} else { - lean::dec_ref(x_63); - x_74 = lean::box(0); -} -if (lean::is_scalar(x_74)) { - x_75 = lean::alloc_cnstr(1, 1, 1); -} else { - x_75 = x_74; -} -lean::cnstr_set(x_75, 0, x_72); -lean::cnstr_set_scalar(x_75, sizeof(void*)*1, x_73); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_54); -return x_76; -} -} -} -else -{ -uint8 x_77; -lean::dec(x_5); -x_77 = !lean::is_exclusive(x_7); -if (x_77 == 0) -{ -obj* x_78; uint8 x_79; -x_78 = lean::cnstr_get(x_7, 0); -lean::dec(x_78); -x_79 = !lean::is_exclusive(x_8); -if (x_79 == 0) -{ -obj* x_80; obj* x_81; -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_8); -if (lean::obj_tag(x_81) == 0) -{ -uint8 x_82; -x_82 = !lean::is_exclusive(x_81); -if (x_82 == 0) -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_81, 0); -x_84 = lean::cnstr_get(x_81, 2); -x_85 = l___private_init_lean_parser_token_3__updateTrailing___main(x_83, x_1); -lean::cnstr_set(x_81, 2, x_80); -lean::cnstr_set(x_81, 0, x_85); -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_81); -lean::cnstr_set(x_7, 0, x_86); -return x_7; -} -else -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_87 = lean::cnstr_get(x_81, 0); -x_88 = lean::cnstr_get(x_81, 1); -x_89 = lean::cnstr_get(x_81, 2); -lean::inc(x_89); -lean::inc(x_88); -lean::inc(x_87); -lean::dec(x_81); -x_90 = l___private_init_lean_parser_token_3__updateTrailing___main(x_87, x_1); -x_91 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_88); -lean::cnstr_set(x_91, 2, x_80); -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_89, x_91); -lean::cnstr_set(x_7, 0, x_92); -return x_7; -} -} -else -{ -uint8 x_93; -lean::dec(x_1); -x_93 = !lean::is_exclusive(x_81); -if (x_93 == 0) -{ -lean::cnstr_set(x_7, 0, x_81); -return x_7; -} -else -{ -obj* x_94; uint8 x_95; obj* x_96; -x_94 = lean::cnstr_get(x_81, 0); -x_95 = lean::cnstr_get_scalar(x_81, sizeof(void*)*1); -lean::inc(x_94); -lean::dec(x_81); -x_96 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_96, 0, x_94); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_95); -lean::cnstr_set(x_7, 0, x_96); -return x_7; -} -} -} -else -{ -obj* x_97; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; -x_97 = lean::cnstr_get(x_8, 0); -x_98 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_97); -lean::dec(x_8); -x_99 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_99, 0, x_97); -lean::cnstr_set_scalar(x_99, sizeof(void*)*1, x_98); -x_100 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_100, x_99); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_102 = lean::cnstr_get(x_101, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_101, 1); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_101, 2); -lean::inc(x_104); -if (lean::is_exclusive(x_101)) { - lean::cnstr_release(x_101, 0); - lean::cnstr_release(x_101, 1); - lean::cnstr_release(x_101, 2); - x_105 = x_101; -} else { - lean::dec_ref(x_101); - x_105 = lean::box(0); -} -x_106 = l___private_init_lean_parser_token_3__updateTrailing___main(x_102, x_1); -if (lean::is_scalar(x_105)) { - x_107 = lean::alloc_cnstr(0, 3, 0); -} else { - x_107 = x_105; -} -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_107, 1, x_103); -lean::cnstr_set(x_107, 2, x_100); -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_104, x_107); -lean::cnstr_set(x_7, 0, x_108); -return x_7; -} -else -{ -obj* x_109; uint8 x_110; obj* x_111; obj* x_112; -lean::dec(x_1); -x_109 = lean::cnstr_get(x_101, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get_scalar(x_101, sizeof(void*)*1); -if (lean::is_exclusive(x_101)) { - lean::cnstr_release(x_101, 0); - x_111 = x_101; -} else { - lean::dec_ref(x_101); - x_111 = lean::box(0); -} -if (lean::is_scalar(x_111)) { - x_112 = lean::alloc_cnstr(1, 1, 1); -} else { - x_112 = x_111; -} -lean::cnstr_set(x_112, 0, x_109); -lean::cnstr_set_scalar(x_112, sizeof(void*)*1, x_110); -lean::cnstr_set(x_7, 0, x_112); -return x_7; -} -} -} -else -{ -obj* x_113; obj* x_114; uint8 x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_113 = lean::cnstr_get(x_7, 1); -lean::inc(x_113); -lean::dec(x_7); -x_114 = lean::cnstr_get(x_8, 0); -lean::inc(x_114); -x_115 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_116 = x_8; -} else { - lean::dec_ref(x_8); - x_116 = lean::box(0); -} -if (lean::is_scalar(x_116)) { - x_117 = lean::alloc_cnstr(1, 1, 1); -} else { - x_117 = x_116; -} -lean::cnstr_set(x_117, 0, x_114); -lean::cnstr_set_scalar(x_117, sizeof(void*)*1, x_115); -x_118 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_119 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_118, x_117); -if (lean::obj_tag(x_119) == 0) -{ -obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; -x_120 = lean::cnstr_get(x_119, 0); -lean::inc(x_120); -x_121 = lean::cnstr_get(x_119, 1); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_119, 2); -lean::inc(x_122); -if (lean::is_exclusive(x_119)) { - lean::cnstr_release(x_119, 0); - lean::cnstr_release(x_119, 1); - lean::cnstr_release(x_119, 2); - x_123 = x_119; -} else { - lean::dec_ref(x_119); - x_123 = lean::box(0); -} -x_124 = l___private_init_lean_parser_token_3__updateTrailing___main(x_120, x_1); -if (lean::is_scalar(x_123)) { - x_125 = lean::alloc_cnstr(0, 3, 0); -} else { - x_125 = x_123; -} -lean::cnstr_set(x_125, 0, x_124); -lean::cnstr_set(x_125, 1, x_121); -lean::cnstr_set(x_125, 2, x_118); -x_126 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_122, x_125); -x_127 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_113); -return x_127; -} -else -{ -obj* x_128; uint8 x_129; obj* x_130; obj* x_131; obj* x_132; -lean::dec(x_1); -x_128 = lean::cnstr_get(x_119, 0); -lean::inc(x_128); -x_129 = lean::cnstr_get_scalar(x_119, sizeof(void*)*1); -if (lean::is_exclusive(x_119)) { - lean::cnstr_release(x_119, 0); - x_130 = x_119; -} else { - lean::dec_ref(x_119); - x_130 = lean::box(0); -} -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_128); -lean::cnstr_set_scalar(x_131, sizeof(void*)*1, x_129); -x_132 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_132, 0, x_131); -lean::cnstr_set(x_132, 1, x_113); -return x_132; -} -} -} -} -} -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7(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; -if (x_2 == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_95; obj* x_96; -x_54 = lean::box(0); -lean::inc(x_6); -x_95 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -lean::dec(x_95); -x_55 = x_96; -x_56 = x_97; -goto block_94; -} -else -{ -obj* x_98; obj* x_99; -x_98 = lean::cnstr_get(x_96, 0); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_98, 3); -lean::inc(x_99); -if (lean::obj_tag(x_99) == 0) -{ -obj* x_100; uint8 x_101; -x_100 = lean::cnstr_get(x_95, 1); -lean::inc(x_100); -lean::dec(x_95); -x_101 = !lean::is_exclusive(x_96); -if (x_101 == 0) -{ -uint8 x_102; obj* x_103; uint8 x_104; -x_102 = lean::cnstr_get_scalar(x_96, sizeof(void*)*1); -x_103 = lean::cnstr_get(x_96, 0); -lean::dec(x_103); -x_104 = !lean::is_exclusive(x_98); -if (x_104 == 0) -{ -obj* x_105; obj* x_106; -x_105 = lean::cnstr_get(x_98, 3); -lean::dec(x_105); -x_106 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -lean::cnstr_set(x_98, 3, x_106); -if (x_102 == 0) -{ -uint8 x_107; -x_107 = 0; -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_107); -x_55 = x_96; -x_56 = x_100; -goto block_94; -} -else -{ -uint8 x_108; -x_108 = 1; -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_108); -x_55 = x_96; -x_56 = x_100; -goto block_94; -} -} -else -{ -obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_109 = lean::cnstr_get(x_98, 0); -x_110 = lean::cnstr_get(x_98, 1); -x_111 = lean::cnstr_get(x_98, 2); -lean::inc(x_111); -lean::inc(x_110); -lean::inc(x_109); -lean::dec(x_98); -x_112 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -x_113 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_113, 0, x_109); -lean::cnstr_set(x_113, 1, x_110); -lean::cnstr_set(x_113, 2, x_111); -lean::cnstr_set(x_113, 3, x_112); -if (x_102 == 0) -{ -uint8 x_114; -x_114 = 0; -lean::cnstr_set(x_96, 0, x_113); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_114); -x_55 = x_96; -x_56 = x_100; -goto block_94; -} -else -{ -uint8 x_115; -x_115 = 1; -lean::cnstr_set(x_96, 0, x_113); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_115); -x_55 = x_96; -x_56 = x_100; -goto block_94; -} -} -} -else -{ -uint8 x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; -x_116 = lean::cnstr_get_scalar(x_96, sizeof(void*)*1); -lean::dec(x_96); -x_117 = lean::cnstr_get(x_98, 0); -lean::inc(x_117); -x_118 = lean::cnstr_get(x_98, 1); -lean::inc(x_118); -x_119 = lean::cnstr_get(x_98, 2); -lean::inc(x_119); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - lean::cnstr_release(x_98, 1); - lean::cnstr_release(x_98, 2); - lean::cnstr_release(x_98, 3); - x_120 = x_98; -} else { - lean::dec_ref(x_98); - x_120 = lean::box(0); -} -x_121 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -if (lean::is_scalar(x_120)) { - x_122 = lean::alloc_cnstr(0, 4, 0); -} else { - x_122 = x_120; -} -lean::cnstr_set(x_122, 0, x_117); -lean::cnstr_set(x_122, 1, x_118); -lean::cnstr_set(x_122, 2, x_119); -lean::cnstr_set(x_122, 3, x_121); -if (x_116 == 0) -{ -uint8 x_123; obj* x_124; -x_123 = 0; -x_124 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_124, 0, x_122); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_123); -x_55 = x_124; -x_56 = x_100; -goto block_94; -} -else -{ -uint8 x_125; obj* x_126; -x_125 = 1; -x_126 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_126, 0, x_122); -lean::cnstr_set_scalar(x_126, sizeof(void*)*1, x_125); -x_55 = x_126; -x_56 = x_100; -goto block_94; -} -} -} -else -{ -obj* x_127; uint8 x_128; -x_127 = lean::cnstr_get(x_95, 1); -lean::inc(x_127); -lean::dec(x_95); -x_128 = !lean::is_exclusive(x_96); -if (x_128 == 0) -{ -uint8 x_129; obj* x_130; uint8 x_131; -x_129 = lean::cnstr_get_scalar(x_96, sizeof(void*)*1); -x_130 = lean::cnstr_get(x_96, 0); -lean::dec(x_130); -x_131 = !lean::is_exclusive(x_98); -if (x_131 == 0) -{ -obj* x_132; uint8 x_133; -x_132 = lean::cnstr_get(x_98, 3); -lean::dec(x_132); -x_133 = !lean::is_exclusive(x_99); -if (x_133 == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; -x_134 = lean::cnstr_get(x_99, 0); -x_135 = lean::box(0); -x_136 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_136, 0, x_134); -lean::cnstr_set(x_136, 1, x_135); -x_137 = l_Lean_Parser_noKind; -x_138 = l_Lean_Parser_Syntax_mkNode(x_137, x_136); -lean::cnstr_set(x_99, 0, x_138); -if (x_129 == 0) -{ -uint8 x_139; -x_139 = 0; -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_139); -x_55 = x_96; -x_56 = x_127; -goto block_94; -} -else -{ -uint8 x_140; -x_140 = 1; -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_140); -x_55 = x_96; -x_56 = x_127; -goto block_94; -} -} -else -{ -obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; -x_141 = lean::cnstr_get(x_99, 0); -lean::inc(x_141); -lean::dec(x_99); -x_142 = lean::box(0); -x_143 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_143, 0, x_141); -lean::cnstr_set(x_143, 1, x_142); -x_144 = l_Lean_Parser_noKind; -x_145 = l_Lean_Parser_Syntax_mkNode(x_144, x_143); -x_146 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_146, 0, x_145); -lean::cnstr_set(x_98, 3, x_146); -if (x_129 == 0) -{ -uint8 x_147; -x_147 = 0; -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_147); -x_55 = x_96; -x_56 = x_127; -goto block_94; -} -else -{ -uint8 x_148; -x_148 = 1; -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_148); -x_55 = x_96; -x_56 = x_127; -goto block_94; -} -} -} -else -{ -obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; -x_149 = lean::cnstr_get(x_98, 0); -x_150 = lean::cnstr_get(x_98, 1); -x_151 = lean::cnstr_get(x_98, 2); -lean::inc(x_151); -lean::inc(x_150); -lean::inc(x_149); -lean::dec(x_98); -x_152 = lean::cnstr_get(x_99, 0); -lean::inc(x_152); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - x_153 = x_99; -} else { - lean::dec_ref(x_99); - x_153 = lean::box(0); -} -x_154 = lean::box(0); -x_155 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_155, 0, x_152); -lean::cnstr_set(x_155, 1, x_154); -x_156 = l_Lean_Parser_noKind; -x_157 = l_Lean_Parser_Syntax_mkNode(x_156, x_155); -if (lean::is_scalar(x_153)) { - x_158 = lean::alloc_cnstr(1, 1, 0); -} else { - x_158 = x_153; -} -lean::cnstr_set(x_158, 0, x_157); -x_159 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_159, 0, x_149); -lean::cnstr_set(x_159, 1, x_150); -lean::cnstr_set(x_159, 2, x_151); -lean::cnstr_set(x_159, 3, x_158); -if (x_129 == 0) -{ -uint8 x_160; -x_160 = 0; -lean::cnstr_set(x_96, 0, x_159); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_160); -x_55 = x_96; -x_56 = x_127; -goto block_94; -} -else -{ -uint8 x_161; -x_161 = 1; -lean::cnstr_set(x_96, 0, x_159); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_161); -x_55 = x_96; -x_56 = x_127; -goto block_94; -} -} -} -else -{ -uint8 x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; -x_162 = lean::cnstr_get_scalar(x_96, sizeof(void*)*1); -lean::dec(x_96); -x_163 = lean::cnstr_get(x_98, 0); -lean::inc(x_163); -x_164 = lean::cnstr_get(x_98, 1); -lean::inc(x_164); -x_165 = lean::cnstr_get(x_98, 2); -lean::inc(x_165); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - lean::cnstr_release(x_98, 1); - lean::cnstr_release(x_98, 2); - lean::cnstr_release(x_98, 3); - x_166 = x_98; -} else { - lean::dec_ref(x_98); - x_166 = lean::box(0); -} -x_167 = lean::cnstr_get(x_99, 0); -lean::inc(x_167); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - x_168 = x_99; -} else { - lean::dec_ref(x_99); - x_168 = lean::box(0); -} -x_169 = lean::box(0); -x_170 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_170, 0, x_167); -lean::cnstr_set(x_170, 1, x_169); -x_171 = l_Lean_Parser_noKind; -x_172 = l_Lean_Parser_Syntax_mkNode(x_171, x_170); -if (lean::is_scalar(x_168)) { - x_173 = lean::alloc_cnstr(1, 1, 0); -} else { - x_173 = x_168; -} -lean::cnstr_set(x_173, 0, x_172); -if (lean::is_scalar(x_166)) { - x_174 = lean::alloc_cnstr(0, 4, 0); -} else { - x_174 = x_166; -} -lean::cnstr_set(x_174, 0, x_163); -lean::cnstr_set(x_174, 1, x_164); -lean::cnstr_set(x_174, 2, x_165); -lean::cnstr_set(x_174, 3, x_173); -if (x_162 == 0) -{ -uint8 x_175; obj* x_176; -x_175 = 0; -x_176 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_176, 0, x_174); -lean::cnstr_set_scalar(x_176, sizeof(void*)*1, x_175); -x_55 = x_176; -x_56 = x_127; -goto block_94; -} -else -{ -uint8 x_177; obj* x_178; -x_177 = 1; -x_178 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_178, 0, x_174); -lean::cnstr_set_scalar(x_178, sizeof(void*)*1, x_177); -x_55 = x_178; -x_56 = x_127; -goto block_94; -} -} -} -} -block_94: -{ -if (lean::obj_tag(x_55) == 0) -{ -uint8 x_57; -x_57 = !lean::is_exclusive(x_55); -if (x_57 == 0) -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_58 = lean::cnstr_get(x_55, 0); -x_59 = lean::cnstr_get(x_55, 2); -x_60 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_60, 0, x_58); -x_61 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_55, 2, x_61); -lean::cnstr_set(x_55, 0, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_55); -if (lean::obj_tag(x_62) == 0) -{ -lean::dec(x_6); -x_8 = x_62; -x_9 = x_56; -goto block_53; -} -else -{ -uint8 x_63; -x_63 = lean::cnstr_get_scalar(x_62, sizeof(void*)*1); -if (x_63 == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -lean::dec(x_62); -x_65 = lean::cnstr_get(x_64, 2); -lean::inc(x_65); -lean::dec(x_64); -x_66 = l_mjoin___rarg___closed__1; -x_67 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_67, 0, x_65); -lean::closure_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -x_69 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_69, 0, x_54); -lean::cnstr_set(x_69, 1, x_6); -lean::cnstr_set(x_69, 2, x_68); -x_8 = x_69; -x_9 = x_56; -goto block_53; -} -else -{ -lean::dec(x_6); -x_8 = x_62; -x_9 = x_56; -goto block_53; -} -} -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_70 = lean::cnstr_get(x_55, 0); -x_71 = lean::cnstr_get(x_55, 1); -x_72 = lean::cnstr_get(x_55, 2); -lean::inc(x_72); -lean::inc(x_71); -lean::inc(x_70); -lean::dec(x_55); -x_73 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_73, 0, x_70); -x_74 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_75 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_75, 0, x_73); -lean::cnstr_set(x_75, 1, x_71); -lean::cnstr_set(x_75, 2, x_74); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_75); -if (lean::obj_tag(x_76) == 0) -{ -lean::dec(x_6); -x_8 = x_76; -x_9 = x_56; -goto block_53; -} -else -{ -uint8 x_77; -x_77 = lean::cnstr_get_scalar(x_76, sizeof(void*)*1); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_78 = lean::cnstr_get(x_76, 0); -lean::inc(x_78); -lean::dec(x_76); -x_79 = lean::cnstr_get(x_78, 2); -lean::inc(x_79); -lean::dec(x_78); -x_80 = l_mjoin___rarg___closed__1; -x_81 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_81, 0, x_79); -lean::closure_set(x_81, 1, x_80); -x_82 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -x_83 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_83, 0, x_54); -lean::cnstr_set(x_83, 1, x_6); -lean::cnstr_set(x_83, 2, x_82); -x_8 = x_83; -x_9 = x_56; -goto block_53; -} -else -{ -lean::dec(x_6); -x_8 = x_76; -x_9 = x_56; -goto block_53; -} -} -} -} -else -{ -uint8 x_84; -x_84 = lean::cnstr_get_scalar(x_55, sizeof(void*)*1); -if (x_84 == 0) -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_85 = lean::cnstr_get(x_55, 0); -lean::inc(x_85); -lean::dec(x_55); -x_86 = lean::cnstr_get(x_85, 2); -lean::inc(x_86); -lean::dec(x_85); -x_87 = l_mjoin___rarg___closed__1; -x_88 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_88, 0, x_86); -lean::closure_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -x_90 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_90, 0, x_54); -lean::cnstr_set(x_90, 1, x_6); -lean::cnstr_set(x_90, 2, x_89); -x_8 = x_90; -x_9 = x_56; -goto block_53; -} -else -{ -uint8 x_91; -lean::dec(x_6); -x_91 = !lean::is_exclusive(x_55); -if (x_91 == 0) -{ -x_8 = x_55; -x_9 = x_56; -goto block_53; -} -else -{ -obj* x_92; obj* x_93; -x_92 = lean::cnstr_get(x_55, 0); -lean::inc(x_92); -lean::dec(x_55); -x_93 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set_scalar(x_93, sizeof(void*)*1, x_84); -x_8 = x_93; -x_9 = x_56; -goto block_53; -} -} -} -} -} -else -{ -obj* x_179; -x_179 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -return x_179; -} -block_53: -{ -if (lean::obj_tag(x_8) == 0) -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::cnstr_get(x_8, 2); -x_13 = lean::cnstr_get(x_8, 0); -lean::dec(x_13); -x_14 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_15 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_15); -lean::cnstr_set(x_8, 0, x_14); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_8); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_9); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_18 = lean::cnstr_get(x_8, 1); -x_19 = lean::cnstr_get(x_8, 2); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_8); -x_20 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_18); -lean::cnstr_set(x_22, 2, x_21); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_22); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_9); -return x_24; -} -} -else -{ -uint8 x_25; -x_25 = !lean::is_exclusive(x_8); -if (x_25 == 0) -{ -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; -x_26 = lean::cnstr_get(x_8, 2); -x_27 = lean::cnstr_get(x_8, 0); -lean::dec(x_27); -x_28 = lean::cnstr_get(x_10, 0); -lean::inc(x_28); -lean::dec(x_10); -x_29 = lean::box(0); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_noKind; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_33); -lean::cnstr_set(x_8, 0, x_32); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_8); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_9); -return x_35; -} -else -{ -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; -x_36 = lean::cnstr_get(x_8, 1); -x_37 = lean::cnstr_get(x_8, 2); -lean::inc(x_37); -lean::inc(x_36); -lean::dec(x_8); -x_38 = lean::cnstr_get(x_10, 0); -lean::inc(x_38); -lean::dec(x_10); -x_39 = lean::box(0); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_Lean_Parser_noKind; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -x_43 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set(x_44, 1, x_36); -lean::cnstr_set(x_44, 2, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_44); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_9); -return x_46; -} -} -} -else -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_8); -if (x_47 == 0) -{ -obj* x_48; -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_8); -lean::cnstr_set(x_48, 1, x_9); -return x_48; -} -else -{ -obj* x_49; uint8 x_50; obj* x_51; obj* x_52; -x_49 = lean::cnstr_get(x_8, 0); -x_50 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_49); -lean::dec(x_8); -x_51 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_50); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_9); -return x_52; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_tokens___rarg(x_2); -x_4 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_1); -lean::dec(x_3); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_4); -lean::dec(x_4); -x_6 = l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens; -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_5); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__4___boxed(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; -x_8 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_8; -} -} -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__6___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_withTrailing___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__6(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed(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); -lean::dec(x_2); -x_9 = l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7(x_1, x_8, x_3, x_4, x_5, x_6, x_7); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("`"); -return x_1; -} -} -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1(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_10; -x_8 = l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___closed__1; -x_9 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__4(x_8, x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; uint8 x_13; -x_12 = lean::cnstr_get(x_9, 0); -lean::dec(x_12); -x_13 = !lean::is_exclusive(x_10); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_10, 1); -x_15 = lean::cnstr_get(x_10, 2); -x_16 = lean::cnstr_get(x_10, 0); -lean::dec(x_16); -lean::inc(x_14); -x_17 = l_Lean_Parser_mkRawRes(x_2, x_14); -x_18 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_10, 2, x_18); -lean::cnstr_set(x_10, 0, x_17); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_10); -lean::cnstr_set(x_9, 0, x_19); -return x_9; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::cnstr_get(x_10, 1); -x_21 = lean::cnstr_get(x_10, 2); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_10); -lean::inc(x_20); -x_22 = l_Lean_Parser_mkRawRes(x_2, x_20); -x_23 = l_Lean_Parser_finishCommentBlock___closed__2; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_20); -lean::cnstr_set(x_24, 2, x_23); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_24); -lean::cnstr_set(x_9, 0, x_25); -return x_9; -} -} -else -{ -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; -x_26 = lean::cnstr_get(x_9, 1); -lean::inc(x_26); -lean::dec(x_9); -x_27 = lean::cnstr_get(x_10, 1); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_10, 2); -lean::inc(x_28); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - lean::cnstr_release(x_10, 2); - x_29 = x_10; -} else { - lean::dec_ref(x_10); - x_29 = lean::box(0); -} -lean::inc(x_27); -x_30 = l_Lean_Parser_mkRawRes(x_2, x_27); -x_31 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_29)) { - x_32 = lean::alloc_cnstr(0, 3, 0); -} else { - x_32 = x_29; -} -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_27); -lean::cnstr_set(x_32, 2, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_28, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_26); -return x_34; -} -} -else -{ -uint8 x_35; -lean::dec(x_2); -x_35 = !lean::is_exclusive(x_9); -if (x_35 == 0) -{ -obj* x_36; uint8 x_37; -x_36 = lean::cnstr_get(x_9, 0); -lean::dec(x_36); -x_37 = !lean::is_exclusive(x_10); -if (x_37 == 0) -{ -return x_9; -} -else -{ -obj* x_38; uint8 x_39; obj* x_40; -x_38 = lean::cnstr_get(x_10, 0); -x_39 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_38); -lean::dec(x_10); -x_40 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set_scalar(x_40, sizeof(void*)*1, x_39); -lean::cnstr_set(x_9, 0, x_40); -return x_9; -} -} -else -{ -obj* x_41; obj* x_42; uint8 x_43; obj* x_44; obj* x_45; obj* x_46; -x_41 = lean::cnstr_get(x_9, 1); -lean::inc(x_41); -lean::dec(x_9); -x_42 = lean::cnstr_get(x_10, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_44 = x_10; -} else { - lean::dec_ref(x_10); - x_44 = lean::box(0); -} -if (lean::is_scalar(x_44)) { - x_45 = lean::alloc_cnstr(1, 1, 1); -} else { - x_45 = x_44; -} -lean::cnstr_set(x_45, 0, x_42); -lean::cnstr_set_scalar(x_45, sizeof(void*)*1, x_43); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_41); -return x_46; -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__2(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_10; -x_8 = l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___closed__1; -x_9 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__4(x_8, x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint8 x_16; -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::cnstr_get(x_10, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_10, 2); -lean::inc(x_13); -lean::dec(x_10); -lean::inc(x_12); -x_14 = l_Lean_Parser_mkRawRes(x_2, x_12); -x_15 = l_Lean_Parser_withTrailing___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__6(x_14, x_3, x_4, x_5, x_12, x_11); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_15, 0); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_17); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_19); -lean::cnstr_set(x_15, 0, x_20); -return x_15; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_15, 0); -x_22 = lean::cnstr_get(x_15, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_15); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_21); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_22); -return x_26; -} -} -else -{ -uint8 x_27; -lean::dec(x_2); -x_27 = !lean::is_exclusive(x_9); -if (x_27 == 0) -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_9, 0); -lean::dec(x_28); -x_29 = !lean::is_exclusive(x_10); -if (x_29 == 0) -{ -return x_9; -} -else -{ -obj* x_30; uint8 x_31; obj* x_32; -x_30 = lean::cnstr_get(x_10, 0); -x_31 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_30); -lean::dec(x_10); -x_32 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_31); -lean::cnstr_set(x_9, 0, x_32); -return x_9; -} -} -else -{ -obj* x_33; obj* x_34; uint8 x_35; obj* x_36; obj* x_37; obj* x_38; -x_33 = lean::cnstr_get(x_9, 1); -lean::inc(x_33); -lean::dec(x_9); -x_34 = lean::cnstr_get(x_10, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_36 = x_10; -} else { - lean::dec_ref(x_10); - x_36 = lean::box(0); -} -if (lean::is_scalar(x_36)) { - x_37 = lean::alloc_cnstr(1, 1, 1); -} else { - x_37 = x_36; -} -lean::cnstr_set(x_37, 0, x_34); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_35); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_33); -return x_38; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_1 = lean::mk_string("`"); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -lean::inc(x_3); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___boxed), 7, 1); -lean::closure_set(x_8, 0, x_3); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5___rarg), 7, 2); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__2___boxed), 7, 1); -lean::closure_set(x_10, 0, x_3); -x_11 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5___rarg), 7, 2); -lean::closure_set(x_11, 0, x_7); -lean::closure_set(x_11, 1, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedence_Parser), 5, 0); -x_13 = 0; -x_14 = lean::box(x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_15, 0, x_12); -lean::closure_set(x_15, 1, x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser___boxed), 3, 0); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_9); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_TermParserM_Monad; -x_23 = l_Lean_Parser_TermParserM_MonadExcept; -x_24 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_25 = l_Lean_Parser_TermParserM_Alternative; -x_26 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_27 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -x_28 = l_Lean_Parser_Combinators_node_view___rarg(x_22, x_23, x_24, x_25, x_26, x_21, x_27); -lean::dec(x_21); -return x_28; -} -} -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___boxed(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; -x_8 = l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_8; -} -} -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__2___boxed(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; -x_8 = l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_symbolQuote_Parser___closed__1() { -_start: -{ -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; uint8 x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_1 = lean::mk_string("`"); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -lean::inc(x_3); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___boxed), 7, 1); -lean::closure_set(x_8, 0, x_3); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5___rarg), 7, 2); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__2___boxed), 7, 1); -lean::closure_set(x_10, 0, x_3); -x_11 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__5___rarg), 7, 2); -lean::closure_set(x_11, 0, x_7); -lean::closure_set(x_11, 1, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedence_Parser), 5, 0); -x_13 = 0; -x_14 = lean::box(x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_15, 0, x_12); -lean::closure_set(x_15, 1, x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser___boxed), 3, 0); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_9); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -} -obj* l_Lean_Parser_command_NotationSpec_symbolQuote_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_symbolQuote; -x_7 = l_Lean_Parser_command_NotationSpec_symbolQuote_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("symbol"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_4); -lean::inc(x_2); -x_6 = l_Lean_Parser_token(x_2, x_4, x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; -x_9 = lean::cnstr_get(x_6, 1); -x_10 = lean::cnstr_get(x_6, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_7); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_7, 0); -x_13 = lean::cnstr_get(x_7, 1); -x_14 = lean::cnstr_get(x_7, 2); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_4); -lean::dec(x_2); -x_37 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_37); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_7); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_38); -x_40 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_41 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_39, x_40); -x_42 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_41); -lean::cnstr_set(x_6, 0, x_42); -return x_6; -} -else -{ -obj* x_43; -lean::free_heap_obj(x_7); -lean::dec(x_12); -lean::free_heap_obj(x_6); -x_43 = lean::box(0); -x_15 = x_43; -goto block_36; -} -block_36: -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::dec(x_15); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_4); -x_17 = lean::box(0); -x_18 = l_String_splitAux___main___closed__1; -x_19 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_20 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_18, x_19, x_16, x_17, x_1, x_2, x_3, x_13, x_9); -lean::dec(x_2); -lean::dec(x_16); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_22); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_23); -x_26 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_25, x_19); -x_27 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_26); -lean::cnstr_set(x_20, 0, x_27); -return x_20; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_28 = lean::cnstr_get(x_20, 0); -x_29 = lean::cnstr_get(x_20, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_20); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_28); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_30); -x_33 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_32, x_19); -x_34 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_29); -return x_35; -} -} -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_44 = lean::cnstr_get(x_7, 0); -x_45 = lean::cnstr_get(x_7, 1); -x_46 = lean::cnstr_get(x_7, 2); -lean::inc(x_46); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_7); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -lean::dec(x_4); -lean::dec(x_2); -x_63 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_64 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_64, 0, x_44); -lean::cnstr_set(x_64, 1, x_45); -lean::cnstr_set(x_64, 2, x_63); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_46, x_64); -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_65); -x_67 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_68 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_66, x_67); -x_69 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_68); -lean::cnstr_set(x_6, 0, x_69); -return x_6; -} -else -{ -obj* x_70; -lean::dec(x_44); -lean::free_heap_obj(x_6); -x_70 = lean::box(0); -x_47 = x_70; -goto block_62; -} -block_62: -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -lean::dec(x_47); -x_48 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_48, 0, x_4); -x_49 = lean::box(0); -x_50 = l_String_splitAux___main___closed__1; -x_51 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_52 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_50, x_51, x_48, x_49, x_1, x_2, x_3, x_45, x_9); -lean::dec(x_2); -lean::dec(x_48); -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_52, 1); -lean::inc(x_54); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - lean::cnstr_release(x_52, 1); - x_55 = x_52; -} else { - lean::dec_ref(x_52); - x_55 = lean::box(0); -} -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_46, x_53); -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_56); -x_59 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_58, x_51); -x_60 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_59); -if (lean::is_scalar(x_55)) { - x_61 = lean::alloc_cnstr(0, 2, 0); -} else { - x_61 = x_55; -} -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_54); -return x_61; -} -} -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_71 = lean::cnstr_get(x_6, 1); -lean::inc(x_71); -lean::dec(x_6); -x_72 = lean::cnstr_get(x_7, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_7, 1); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_7, 2); -lean::inc(x_74); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_75 = x_7; -} else { - lean::dec_ref(x_7); - x_75 = lean::box(0); -} -if (lean::obj_tag(x_72) == 0) -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -lean::dec(x_4); -lean::dec(x_2); -x_92 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_75)) { - x_93 = lean::alloc_cnstr(0, 3, 0); -} else { - x_93 = x_75; -} -lean::cnstr_set(x_93, 0, x_72); -lean::cnstr_set(x_93, 1, x_73); -lean::cnstr_set(x_93, 2, x_92); -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_74, x_93); -x_95 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_94); -x_96 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_97 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_95, x_96); -x_98 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_97); -x_99 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_71); -return x_99; -} -else -{ -obj* x_100; -lean::dec(x_75); -lean::dec(x_72); -x_100 = lean::box(0); -x_76 = x_100; -goto block_91; -} -block_91: -{ -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; -lean::dec(x_76); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_4); -x_78 = lean::box(0); -x_79 = l_String_splitAux___main___closed__1; -x_80 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_81 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_79, x_80, x_77, x_78, x_1, x_2, x_3, x_73, x_71); -lean::dec(x_2); -lean::dec(x_77); -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_81, 1); -lean::inc(x_83); -if (lean::is_exclusive(x_81)) { - lean::cnstr_release(x_81, 0); - lean::cnstr_release(x_81, 1); - x_84 = x_81; -} else { - lean::dec_ref(x_81); - x_84 = lean::box(0); -} -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_74, x_82); -x_86 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_87 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_86, x_85); -x_88 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_87, x_80); -x_89 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_88); -if (lean::is_scalar(x_84)) { - x_90 = lean::alloc_cnstr(0, 2, 0); -} else { - x_90 = x_84; -} -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_83); -return x_90; -} -} -} -else -{ -uint8 x_101; -lean::dec(x_4); -lean::dec(x_2); -x_101 = !lean::is_exclusive(x_6); -if (x_101 == 0) -{ -obj* x_102; uint8 x_103; -x_102 = lean::cnstr_get(x_6, 0); -lean::dec(x_102); -x_103 = !lean::is_exclusive(x_7); -if (x_103 == 0) -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_104 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_104, x_7); -x_106 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_107 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_105, x_106); -x_108 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_107); -lean::cnstr_set(x_6, 0, x_108); -return x_6; -} -else -{ -obj* x_109; uint8 x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; -x_109 = lean::cnstr_get(x_7, 0); -x_110 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_109); -lean::dec(x_7); -x_111 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_111, 0, x_109); -lean::cnstr_set_scalar(x_111, sizeof(void*)*1, x_110); -x_112 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_112, x_111); -x_114 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_115 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_113, x_114); -x_116 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_115); -lean::cnstr_set(x_6, 0, x_116); -return x_6; -} -} -else -{ -obj* x_117; obj* x_118; uint8 x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; -x_117 = lean::cnstr_get(x_6, 1); -lean::inc(x_117); -lean::dec(x_6); -x_118 = lean::cnstr_get(x_7, 0); -lean::inc(x_118); -x_119 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_120 = x_7; -} else { - lean::dec_ref(x_7); - x_120 = lean::box(0); -} -if (lean::is_scalar(x_120)) { - x_121 = lean::alloc_cnstr(1, 1, 1); -} else { - x_121 = x_120; -} -lean::cnstr_set(x_121, 0, x_118); -lean::cnstr_set_scalar(x_121, sizeof(void*)*1, x_119); -x_122 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_123 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_122, x_121); -x_124 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1; -x_125 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_123, x_124); -x_126 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_125); -x_127 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_117); -return x_127; -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_unquotedSymbol_tokens() { -_start: -{ -obj* x_1; -x_1 = lean::box(0); -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_unquotedSymbol_View() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw_view___rarg___lambda__1___boxed), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw_view___rarg___lambda__2___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_notationSymbol() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("notationSymbol"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_2 = lean::box(0); -x_3 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -x_5 = lean::apply_1(x_4, x_1); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_2); -x_7 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_2); -x_10 = l_Lean_Parser_command_NotationSpec_notationSymbol; -x_11 = l_Lean_Parser_Syntax_mkNode(x_10, x_9); -return x_11; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("notationSymbol"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; uint8 x_22; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::box(0); -x_22 = lean_name_dec_eq(x_20, x_21); -lean::dec(x_20); -if (x_22 == 0) -{ -obj* x_23; -lean::dec(x_19); -x_23 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_23; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_24; -x_24 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_19, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_19, 0); -lean::inc(x_26); -lean::dec(x_19); -x_27 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -return x_29; -} -else -{ -obj* x_30; -lean::dec(x_25); -lean::dec(x_19); -x_30 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_30; -} -} -} -} -} -} -} -else -{ -obj* x_31; -lean::dec(x_11); -lean::dec(x_6); -x_31 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1; -return x_31; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_notationSymbol_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_1); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_1); -lean::dec(x_4); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_5, 0, x_3); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_TermParserM_Monad; -x_8 = l_Lean_Parser_TermParserM_MonadExcept; -x_9 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_10 = l_Lean_Parser_TermParserM_Alternative; -x_11 = l_Lean_Parser_command_NotationSpec_notationSymbol; -x_12 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_13 = l_Lean_Parser_Combinators_node_view___rarg(x_7, x_8, x_9, x_10, x_11, x_6, x_12); -lean::dec(x_6); -return x_13; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_notationSymbol_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_5, 0, x_3); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -return x_6; -} -} -obj* l_Lean_Parser_command_NotationSpec_notationSymbol_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_notationSymbol; -x_7 = l_Lean_Parser_command_NotationSpec_notationSymbol_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("mixfixSymbol"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_NotationSpec_mixfixSymbol; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_NotationSpec_mixfixSymbol; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_NotationSpec_mixfixSymbol; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("mixfixSymbol"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__3; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -lean::dec(x_22); -if (x_30 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_13); -return x_32; -} -else -{ -obj* x_33; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_33 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__1; -return x_33; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -lean::free_heap_obj(x_13); -x_34 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_28); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_38 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_38; -} -} -} -} -} -} -else -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_13, 0); -lean::inc(x_39); -lean::dec(x_13); -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -switch (lean::obj_tag(x_40)) { -case 0: -{ -obj* x_41; -lean::dec(x_39); -x_41 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_41; -} -case 1: -{ -obj* x_42; -lean::dec(x_40); -lean::dec(x_39); -x_42 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_42; -} -default: -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; uint8 x_47; -x_43 = lean::cnstr_get(x_39, 1); -lean::inc(x_43); -lean::dec(x_39); -x_44 = lean::cnstr_get(x_40, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_40, 1); -lean::inc(x_45); -lean::dec(x_40); -x_46 = lean::box(0); -x_47 = lean_name_dec_eq(x_44, x_46); -lean::dec(x_44); -if (x_47 == 0) -{ -obj* x_48; -lean::dec(x_45); -lean::dec(x_43); -x_48 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_48; -} -else -{ -if (lean::obj_tag(x_43) == 0) -{ -obj* x_49; -lean::dec(x_45); -x_49 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_49; -} -else -{ -obj* x_50; -x_50 = lean::cnstr_get(x_43, 1); -lean::inc(x_50); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; uint8 x_53; -x_51 = lean::cnstr_get(x_43, 0); -lean::inc(x_51); -lean::dec(x_43); -x_52 = lean::mk_nat_obj(0u); -x_53 = lean::nat_dec_eq(x_45, x_52); -lean::dec(x_45); -if (x_53 == 0) -{ -if (lean::obj_tag(x_51) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; -x_54 = lean::cnstr_get(x_51, 0); -lean::inc(x_54); -lean::dec(x_51); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -return x_56; -} -else -{ -obj* x_57; -lean::dec(x_51); -x_57 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__1; -return x_57; -} -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_58 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_51); -x_61 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -else -{ -obj* x_62; -lean::dec(x_50); -lean::dec(x_45); -lean::dec(x_43); -x_62 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_62; -} -} -} -} -} -} -} -} -else -{ -obj* x_63; -lean::dec(x_11); -lean::dec(x_6); -x_63 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2; -return x_63; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_command_NotationSpec_unquotedSymbol_tokens; -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_1); -x_4 = l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens; -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_3); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_1); -lean::dec(x_6); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___boxed), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_TermParserM_Monad; -x_10 = l_Lean_Parser_TermParserM_MonadExcept; -x_11 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_12 = l_Lean_Parser_TermParserM_Alternative; -x_13 = l_Lean_Parser_command_NotationSpec_mixfixSymbol; -x_14 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView; -x_15 = l_Lean_Parser_Combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -lean::dec(x_8); -return x_15; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___boxed), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_mixfixSymbol; -x_7 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldActionFolder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("foldActionFolder"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_1, 3); -x_6 = lean::cnstr_get(x_1, 4); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_3); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_3); -lean::inc(x_4); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_4); -x_10 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_11 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_6); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::box(3); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_9); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_8); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_13); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -else -{ -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; -x_20 = lean::cnstr_get(x_7, 0); -lean::inc(x_20); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_10); -lean::inc(x_6); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_6); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::box(3); -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_9); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_8); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_24); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_5, 0); -lean::inc(x_31); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -if (lean::obj_tag(x_7) == 0) -{ -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; -x_33 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_6); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_6); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_32); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_9); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_8); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::box(3); -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 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_41 = l_Lean_Parser_Syntax_mkNode(x_40, x_39); -return x_41; -} -else -{ -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; -x_42 = lean::cnstr_get(x_7, 0); -lean::inc(x_42); -x_43 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_10); -lean::inc(x_6); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_6); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_32); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_9); -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::box(3); -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 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_52 = l_Lean_Parser_Syntax_mkNode(x_51, x_50); -return x_52; -} -} -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_2, 0); -lean::inc(x_53); -x_54 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -if (lean::obj_tag(x_5) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -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; -x_55 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_6); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_6); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::box(3); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_56); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_9); -lean::cnstr_set(x_59, 1, x_58); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_8); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_54); -lean::cnstr_set(x_61, 1, x_60); -x_62 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_63 = l_Lean_Parser_Syntax_mkNode(x_62, x_61); -return x_63; -} -else -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_64 = lean::cnstr_get(x_7, 0); -lean::inc(x_64); -x_65 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_65, 0, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_10); -lean::inc(x_6); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_6); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::box(3); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_67); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_9); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_8); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_54); -lean::cnstr_set(x_72, 1, x_71); -x_73 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_74 = l_Lean_Parser_Syntax_mkNode(x_73, x_72); -return x_74; -} -} -else -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_5, 0); -lean::inc(x_75); -x_76 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -if (lean::obj_tag(x_7) == 0) -{ -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_77 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_6); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_6); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_76); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_9); -lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_8); -lean::cnstr_set(x_81, 1, x_80); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_54); -lean::cnstr_set(x_82, 1, x_81); -x_83 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_84 = l_Lean_Parser_Syntax_mkNode(x_83, x_82); -return x_84; -} -else -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_85 = lean::cnstr_get(x_7, 0); -lean::inc(x_85); -x_86 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_86, 0, x_85); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_10); -lean::inc(x_6); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_6); -lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_76); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_9); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_8); -lean::cnstr_set(x_91, 1, x_90); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_54); -lean::cnstr_set(x_92, 1, x_91); -x_93 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_94 = l_Lean_Parser_Syntax_mkNode(x_93, x_92); -return x_94; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::box(3); -x_4 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_2); -lean::cnstr_set(x_4, 3, x_1); -lean::cnstr_set(x_4, 4, x_3); -lean::cnstr_set(x_4, 5, x_1); -return x_4; -} -} -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_60; -x_60 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; -x_61 = l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1___closed__1; -return x_61; -} -else -{ -obj* x_62; obj* x_63; -x_62 = lean::cnstr_get(x_60, 0); -lean::inc(x_62); -lean::dec(x_60); -x_63 = lean::cnstr_get(x_62, 1); -lean::inc(x_63); -lean::dec(x_62); -if (lean::obj_tag(x_63) == 0) -{ -obj* x_64; -x_64 = lean::box(3); -x_2 = x_63; -x_3 = x_64; -goto block_59; -} -else -{ -obj* x_65; obj* x_66; -x_65 = lean::cnstr_get(x_63, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_63, 1); -lean::inc(x_66); -lean::dec(x_63); -x_2 = x_66; -x_3 = x_65; -goto block_59; -} -} -block_59: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_56; obj* x_57; -x_56 = lean::cnstr_get(x_3, 0); -lean::inc(x_56); -lean::dec(x_3); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_4 = x_57; -goto block_55; -} -else -{ -obj* x_58; -lean::dec(x_3); -x_58 = lean::box(0); -x_4 = x_58; -goto block_55; -} -block_55: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_52; -x_52 = lean::box(3); -x_5 = x_2; -x_6 = x_52; -goto block_51; -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_2, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_2, 1); -lean::inc(x_54); -lean::dec(x_2); -x_5 = x_54; -x_6 = x_53; -goto block_51; -} -block_51: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -obj* x_49; -x_49 = lean::cnstr_get(x_6, 0); -lean::inc(x_49); -lean::dec(x_6); -x_7 = x_49; -goto block_48; -} -else -{ -obj* x_50; -lean::dec(x_6); -x_50 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = x_50; -goto block_48; -} -block_48: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_45; -x_45 = lean::box(3); -x_8 = x_5; -x_9 = x_45; -goto block_44; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_5, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_5, 1); -lean::inc(x_47); -lean::dec(x_5); -x_8 = x_47; -x_9 = x_46; -goto block_44; -} -block_44: -{ -obj* x_10; -if (lean::obj_tag(x_9) == 1) -{ -obj* x_42; -x_42 = lean::cnstr_get(x_9, 0); -lean::inc(x_42); -lean::dec(x_9); -x_10 = x_42; -goto block_41; -} -else -{ -obj* x_43; -lean::dec(x_9); -x_43 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_10 = x_43; -goto block_41; -} -block_41: -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_23; obj* x_24; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_38; -x_38 = lean::box(3); -x_23 = x_8; -x_24 = x_38; -goto block_37; -} -else -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_8, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_8, 1); -lean::inc(x_40); -lean::dec(x_8); -x_23 = x_40; -x_24 = x_39; -goto block_37; -} -block_22: -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_10); -lean::cnstr_set(x_15, 3, x_11); -lean::cnstr_set(x_15, 4, x_12); -lean::cnstr_set(x_15, 5, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_13, 0); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_19, 0, x_4); -lean::cnstr_set(x_19, 1, x_7); -lean::cnstr_set(x_19, 2, x_10); -lean::cnstr_set(x_19, 3, x_11); -lean::cnstr_set(x_19, 4, x_12); -lean::cnstr_set(x_19, 5, x_18); -return x_19; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_7); -lean::cnstr_set(x_21, 2, x_10); -lean::cnstr_set(x_21, 3, x_11); -lean::cnstr_set(x_21, 4, x_12); -lean::cnstr_set(x_21, 5, x_20); -return x_21; -} -} -} -block_37: -{ -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -lean::dec(x_24); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::box(0); -x_28 = lean::box(3); -x_29 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_10); -lean::cnstr_set(x_29, 3, x_26); -lean::cnstr_set(x_29, 4, x_28); -lean::cnstr_set(x_29, 5, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_23, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_23, 1); -lean::inc(x_31); -lean::dec(x_23); -x_11 = x_26; -x_12 = x_30; -x_13 = x_31; -goto block_22; -} -} -else -{ -obj* x_32; -lean::dec(x_24); -x_32 = lean::box(0); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_34, 0, x_4); -lean::cnstr_set(x_34, 1, x_7); -lean::cnstr_set(x_34, 2, x_10); -lean::cnstr_set(x_34, 3, x_32); -lean::cnstr_set(x_34, 4, x_33); -lean::cnstr_set(x_34, 5, x_32); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_23, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_23, 1); -lean::inc(x_36); -lean::dec(x_23); -x_11 = x_32; -x_12 = x_35; -x_13 = x_36; -goto block_22; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldAction() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("foldAction"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 6); -lean::inc(x_8); -lean::dec(x_1); -x_9 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_4); -x_12 = l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView; -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_5); -x_15 = lean::apply_1(x_10, x_7); -x_16 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_8) == 0) -{ -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; -x_17 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_15); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_14); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_11); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_3); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::box(3); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -x_25 = l_Lean_Parser_command_NotationSpec_foldAction; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -else -{ -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_37; obj* x_38; -x_27 = lean::cnstr_get(x_8, 0); -lean::inc(x_27); -lean::dec(x_8); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_16); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_15); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_14); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_11); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_3); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::box(3); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_34); -x_37 = l_Lean_Parser_command_NotationSpec_foldAction; -x_38 = l_Lean_Parser_Syntax_mkNode(x_37, x_36); -return x_38; -} -} -else -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_2, 0); -lean::inc(x_39); -lean::dec(x_2); -x_40 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -if (lean::obj_tag(x_8) == 0) -{ -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; -x_41 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_15); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_6); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_14); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_11); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_3); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_40); -lean::cnstr_set(x_47, 1, x_46); -x_48 = l_Lean_Parser_command_NotationSpec_foldAction; -x_49 = l_Lean_Parser_Syntax_mkNode(x_48, x_47); -return x_49; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_50 = lean::cnstr_get(x_8, 0); -lean::inc(x_50); -lean::dec(x_8); -x_51 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_51, 0, x_50); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_16); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_15); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_6); -lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_14); -lean::cnstr_set(x_55, 1, x_54); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_11); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_3); -lean::cnstr_set(x_57, 1, x_56); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_40); -lean::cnstr_set(x_58, 1, x_57); -x_59 = l_Lean_Parser_command_NotationSpec_foldAction; -x_60 = l_Lean_Parser_Syntax_mkNode(x_59, x_58); -return x_60; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_4); -x_9 = l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_4); -lean::cnstr_set(x_10, 2, x_5); -lean::cnstr_set(x_10, 3, x_8); -lean::cnstr_set(x_10, 4, x_4); -lean::cnstr_set(x_10, 5, x_9); -lean::cnstr_set(x_10, 6, x_1); -return x_10; -} -} -obj* l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_55; -x_55 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; -x_56 = l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__2; -return x_56; -} -else -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_55, 0); -lean::inc(x_57); -lean::dec(x_55); -x_58 = lean::cnstr_get(x_57, 1); -lean::inc(x_58); -lean::dec(x_57); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; -x_59 = lean::box(3); -x_2 = x_58; -x_3 = x_59; -goto block_54; -} -else -{ -obj* x_60; obj* x_61; -x_60 = lean::cnstr_get(x_58, 0); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_58, 1); -lean::inc(x_61); -lean::dec(x_58); -x_2 = x_61; -x_3 = x_60; -goto block_54; -} -} -block_54: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_3, 0); -lean::inc(x_51); -lean::dec(x_3); -x_52 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_52, 0, x_51); -x_4 = x_52; -goto block_50; -} -else -{ -obj* x_53; -lean::dec(x_3); -x_53 = lean::box(0); -x_4 = x_53; -goto block_50; -} -block_50: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_47; -x_47 = lean::box(3); -x_5 = x_2; -x_6 = x_47; -goto block_46; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_2, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_2, 1); -lean::inc(x_49); -lean::dec(x_2); -x_5 = x_49; -x_6 = x_48; -goto block_46; -} -block_46: -{ -obj* x_7; obj* x_8; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_43; -x_43 = lean::box(3); -x_7 = x_5; -x_8 = x_43; -goto block_42; -} -else -{ -obj* x_44; obj* x_45; -x_44 = lean::cnstr_get(x_5, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_5, 1); -lean::inc(x_45); -lean::dec(x_5); -x_7 = x_45; -x_8 = x_44; -goto block_42; -} -block_42: -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_39; -x_39 = lean::box(3); -x_12 = x_7; -x_13 = x_39; -goto block_38; -} -else -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_7, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_7, 1); -lean::inc(x_41); -lean::dec(x_7); -x_12 = x_41; -x_13 = x_40; -goto block_38; -} -block_38: -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_10); -x_17 = lean::box(0); -x_18 = lean::box(3); -x_19 = l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_6); -lean::cnstr_set(x_20, 2, x_11); -lean::cnstr_set(x_20, 3, x_16); -lean::cnstr_set(x_20, 4, x_18); -lean::cnstr_set(x_20, 5, x_19); -lean::cnstr_set(x_20, 6, x_17); -return x_20; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_12, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_10); -x_22 = lean::cnstr_get(x_12, 0); -lean::inc(x_22); -lean::dec(x_12); -x_23 = lean::box(0); -x_24 = l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_6); -lean::cnstr_set(x_25, 2, x_11); -lean::cnstr_set(x_25, 3, x_16); -lean::cnstr_set(x_25, 4, x_22); -lean::cnstr_set(x_25, 5, x_24); -lean::cnstr_set(x_25, 6, x_23); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_12, 0); -lean::inc(x_26); -lean::dec(x_12); -x_27 = lean::cnstr_get(x_21, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_21, 1); -lean::inc(x_28); -lean::dec(x_21); -x_29 = lean::apply_1(x_10, x_27); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::box(0); -x_31 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_6); -lean::cnstr_set(x_31, 2, x_11); -lean::cnstr_set(x_31, 3, x_16); -lean::cnstr_set(x_31, 4, x_26); -lean::cnstr_set(x_31, 5, x_29); -lean::cnstr_set(x_31, 6, x_30); -return x_31; -} -else -{ -obj* x_32; -x_32 = lean::cnstr_get(x_28, 0); -lean::inc(x_32); -lean::dec(x_28); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -lean::dec(x_32); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_35 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_35, 0, x_4); -lean::cnstr_set(x_35, 1, x_6); -lean::cnstr_set(x_35, 2, x_11); -lean::cnstr_set(x_35, 3, x_16); -lean::cnstr_set(x_35, 4, x_26); -lean::cnstr_set(x_35, 5, x_29); -lean::cnstr_set(x_35, 6, x_34); -return x_35; -} -else -{ -obj* x_36; obj* x_37; -lean::dec(x_32); -x_36 = lean::box(0); -x_37 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_6); -lean::cnstr_set(x_37, 2, x_11); -lean::cnstr_set(x_37, 3, x_16); -lean::cnstr_set(x_37, 4, x_26); -lean::cnstr_set(x_37, 5, x_29); -lean::cnstr_set(x_37, 6, x_36); -return x_37; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldAction_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27; -return x_1; -} -} -obj* l_ReaderT_orelse___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__2___rarg(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; -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_8 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; -x_11 = lean::cnstr_get(x_8, 0); -lean::dec(x_11); -return x_8; -} -else -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -lean::dec(x_8); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -else -{ -uint8 x_14; -x_14 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; uint8 x_18; -x_15 = lean::cnstr_get(x_8, 1); -lean::inc(x_15); -lean::dec(x_8); -x_16 = lean::cnstr_get(x_9, 0); -lean::inc(x_16); -lean::dec(x_9); -x_17 = lean::apply_5(x_2, x_3, x_4, x_5, x_6, x_15); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_16, x_19); -lean::cnstr_set(x_17, 0, x_20); -return x_17; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_17, 0); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_17); -x_23 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_16, x_21); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -return x_24; -} -} -else -{ -uint8 x_25; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_25 = !lean::is_exclusive(x_8); -if (x_25 == 0) -{ -obj* x_26; -x_26 = lean::cnstr_get(x_8, 0); -lean::dec(x_26); -return x_8; -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_8, 1); -lean::inc(x_27); -lean::dec(x_8); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_9); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -} -} -} -} -obj* l_ReaderT_orelse___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__2___rarg), 7, 0); -return x_2; -} -} -obj* l_List_foldl___main___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_8; -x_8 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -lean::dec(x_2); -x_11 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__2___rarg), 7, 2); -lean::closure_set(x_11, 0, x_1); -lean::closure_set(x_11, 1, x_9); -x_1 = x_11; -x_2 = x_10; -goto _start; -} -} -} -obj* l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__1(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) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::box(0); -x_8 = l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -x_9 = l_mjoin___rarg___closed__1; -x_10 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_1, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_1, 1); -lean::inc(x_12); -lean::dec(x_1); -x_13 = l_List_foldl___main___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__3(x_11, x_12, x_2, x_3, x_4, x_5, x_6); -return x_13; -} -} -} -obj* _init_l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("identifier"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_1); -x_5 = l_Lean_Parser_token(x_1, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_6, 0); -x_12 = lean::cnstr_get(x_6, 1); -x_13 = lean::cnstr_get(x_6, 2); -if (lean::obj_tag(x_11) == 1) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -lean::dec(x_3); -lean::dec(x_1); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_36); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_6); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_37); -x_39 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_40 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_38, x_39); -x_41 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_40); -lean::cnstr_set(x_5, 0, x_41); -return x_5; -} -else -{ -obj* x_42; -lean::free_heap_obj(x_6); -lean::dec(x_11); -lean::free_heap_obj(x_5); -x_42 = lean::box(0); -x_14 = x_42; -goto block_35; -} -block_35: -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -lean::dec(x_14); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_3); -x_16 = lean::box(0); -x_17 = l_String_splitAux___main___closed__1; -x_18 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_19 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_17, x_18, x_15, x_16, x_1, x_12, x_8); -lean::dec(x_1); -lean::dec(x_15); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_21); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_22); -x_25 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_24, x_18); -x_26 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_25); -lean::cnstr_set(x_19, 0, x_26); -return x_19; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_27 = lean::cnstr_get(x_19, 0); -x_28 = lean::cnstr_get(x_19, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_19); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_27); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_29); -x_32 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_31, x_18); -x_33 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_28); -return x_34; -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_43 = lean::cnstr_get(x_6, 0); -x_44 = lean::cnstr_get(x_6, 1); -x_45 = lean::cnstr_get(x_6, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::inc(x_43); -lean::dec(x_6); -if (lean::obj_tag(x_43) == 1) -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -lean::dec(x_3); -lean::dec(x_1); -x_62 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_63 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_63, 0, x_43); -lean::cnstr_set(x_63, 1, x_44); -lean::cnstr_set(x_63, 2, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_63); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_64); -x_66 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_67 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_65, x_66); -x_68 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_67); -lean::cnstr_set(x_5, 0, x_68); -return x_5; -} -else -{ -obj* x_69; -lean::dec(x_43); -lean::free_heap_obj(x_5); -x_69 = lean::box(0); -x_46 = x_69; -goto block_61; -} -block_61: -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_46); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_3); -x_48 = lean::box(0); -x_49 = l_String_splitAux___main___closed__1; -x_50 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_51 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_49, x_50, x_47, x_48, x_1, x_44, x_8); -lean::dec(x_1); -lean::dec(x_47); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_51, 1); -lean::inc(x_53); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - lean::cnstr_release(x_51, 1); - x_54 = x_51; -} else { - lean::dec_ref(x_51); - x_54 = lean::box(0); -} -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_52); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_55); -x_58 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_57, x_50); -x_59 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_58); -if (lean::is_scalar(x_54)) { - x_60 = lean::alloc_cnstr(0, 2, 0); -} else { - x_60 = x_54; -} -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_53); -return x_60; -} -} -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_70 = lean::cnstr_get(x_5, 1); -lean::inc(x_70); -lean::dec(x_5); -x_71 = lean::cnstr_get(x_6, 0); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_6, 1); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_6, 2); -lean::inc(x_73); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_74 = x_6; -} else { - lean::dec_ref(x_6); - x_74 = lean::box(0); -} -if (lean::obj_tag(x_71) == 1) -{ -obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -lean::dec(x_3); -lean::dec(x_1); -x_91 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_74)) { - x_92 = lean::alloc_cnstr(0, 3, 0); -} else { - x_92 = x_74; -} -lean::cnstr_set(x_92, 0, x_71); -lean::cnstr_set(x_92, 1, x_72); -lean::cnstr_set(x_92, 2, x_91); -x_93 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_73, x_92); -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_93); -x_95 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_96 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_94, x_95); -x_97 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_96); -x_98 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_98, 0, x_97); -lean::cnstr_set(x_98, 1, x_70); -return x_98; -} -else -{ -obj* x_99; -lean::dec(x_74); -lean::dec(x_71); -x_99 = lean::box(0); -x_75 = x_99; -goto block_90; -} -block_90: -{ -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; -lean::dec(x_75); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_3); -x_77 = lean::box(0); -x_78 = l_String_splitAux___main___closed__1; -x_79 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_80 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_78, x_79, x_76, x_77, x_1, x_72, x_70); -lean::dec(x_1); -lean::dec(x_76); -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_80, 1); -lean::inc(x_82); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - lean::cnstr_release(x_80, 1); - x_83 = x_80; -} else { - lean::dec_ref(x_80); - x_83 = lean::box(0); -} -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_73, x_81); -x_85 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_85, x_84); -x_87 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_86, x_79); -x_88 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_87); -if (lean::is_scalar(x_83)) { - x_89 = lean::alloc_cnstr(0, 2, 0); -} else { - x_89 = x_83; -} -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_82); -return x_89; -} -} -} -else -{ -uint8 x_100; -lean::dec(x_3); -lean::dec(x_1); -x_100 = !lean::is_exclusive(x_5); -if (x_100 == 0) -{ -obj* x_101; uint8 x_102; -x_101 = lean::cnstr_get(x_5, 0); -lean::dec(x_101); -x_102 = !lean::is_exclusive(x_6); -if (x_102 == 0) -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_103 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_6); -x_105 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_106 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_104, x_105); -x_107 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_106); -lean::cnstr_set(x_5, 0, x_107); -return x_5; -} -else -{ -obj* x_108; uint8 x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; -x_108 = lean::cnstr_get(x_6, 0); -x_109 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_108); -lean::dec(x_6); -x_110 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_110, 0, x_108); -lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_109); -x_111 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_112 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_111, x_110); -x_113 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_114 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_112, x_113); -x_115 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_114); -lean::cnstr_set(x_5, 0, x_115); -return x_5; -} -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_116 = lean::cnstr_get(x_5, 1); -lean::inc(x_116); -lean::dec(x_5); -x_117 = lean::cnstr_get(x_6, 0); -lean::inc(x_117); -x_118 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_119 = x_6; -} else { - lean::dec_ref(x_6); - x_119 = lean::box(0); -} -if (lean::is_scalar(x_119)) { - x_120 = lean::alloc_cnstr(1, 1, 1); -} else { - x_120 = x_119; -} -lean::cnstr_set(x_120, 0, x_117); -lean::cnstr_set_scalar(x_120, sizeof(void*)*1, x_118); -x_121 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_122 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_121, x_120); -x_123 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_124 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_122, x_123); -x_125 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_124); -x_126 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_126, 0, x_125); -lean::cnstr_set(x_126, 1, x_116); -return x_126; -} -} -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed), 4, 0); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -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::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = lean::mk_string(","); -x_9 = l_Lean_Parser_symbol_tokens___rarg(x_8, x_2); -lean::dec(x_8); -x_10 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_11 = lean::mk_string(")"); -x_12 = l_Lean_Parser_symbol_tokens___rarg(x_11, x_2); -lean::dec(x_11); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_4); -lean::dec(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_13); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_14); -lean::dec(x_14); -lean::dec(x_9); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_15); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_16); -lean::dec(x_16); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_17); -lean::dec(x_17); -x_19 = l_Lean_Parser_tokens___rarg(x_18); -lean::dec(x_18); -x_20 = l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasTokens; -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_13); -lean::dec(x_13); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_21); -lean::dec(x_21); -lean::dec(x_10); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_22); -lean::dec(x_22); -lean::dec(x_19); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_23); -lean::dec(x_23); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_24); -lean::dec(x_24); -lean::dec(x_7); -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_25); -lean::dec(x_25); -lean::dec(x_3); -x_27 = l_Lean_Parser_tokens___rarg(x_26); -lean::dec(x_26); -return x_27; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("foldl"); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string("foldr"); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(","); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_18, 0, x_4); -x_19 = lean::mk_string(")"); -x_20 = l_String_trim(x_19); -lean::dec(x_19); -lean::inc(x_20); -x_21 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_21, 0, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_4); -lean::closure_set(x_22, 2, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_10); -lean::inc(x_23); -lean::inc(x_18); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_17); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -lean::inc(x_26); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -lean::inc(x_5); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_5); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_31, 0, x_30); -lean::closure_set(x_31, 1, x_29); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser), 5, 0); -lean::inc(x_32); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_23); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_18); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_31); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_32); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_13); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_5); -lean::cnstr_set(x_38, 1, x_37); -x_39 = l_Lean_Parser_TermParserM_Monad; -x_40 = l_Lean_Parser_TermParserM_MonadExcept; -x_41 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_42 = l_Lean_Parser_TermParserM_Alternative; -x_43 = l_Lean_Parser_command_NotationSpec_foldAction; -x_44 = l_Lean_Parser_command_NotationSpec_foldAction_HasView; -x_45 = l_Lean_Parser_Combinators_node_view___rarg(x_39, x_40, x_41, x_42, x_43, x_38, x_44); -lean::dec(x_38); -return x_45; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_foldAction_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("foldl"); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string("foldr"); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(","); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_18, 0, x_4); -x_19 = lean::mk_string(")"); -x_20 = l_String_trim(x_19); -lean::dec(x_19); -lean::inc(x_20); -x_21 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_21, 0, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_4); -lean::closure_set(x_22, 2, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_10); -lean::inc(x_23); -lean::inc(x_18); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_17); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -lean::inc(x_26); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -lean::inc(x_5); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_5); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_Lean_Parser_command_NotationSpec_foldActionFolder; -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_31, 0, x_30); -lean::closure_set(x_31, 1, x_29); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser), 5, 0); -lean::inc(x_32); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_23); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_18); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_31); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_32); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_13); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_5); -lean::cnstr_set(x_38, 1, x_37); -return x_38; -} -} -obj* l_Lean_Parser_command_NotationSpec_foldAction_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_foldAction; -x_7 = l_Lean_Parser_command_NotationSpec_foldAction_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_scopedAction() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("scopedAction"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 6); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_3); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_5); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_107; -x_107 = lean::box(3); -x_12 = x_107; -goto block_106; -} -else -{ -obj* x_108; obj* x_109; -x_108 = lean::cnstr_get(x_2, 0); -lean::inc(x_108); -lean::dec(x_2); -x_109 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_109, 0, x_108); -x_12 = x_109; -goto block_106; -} -block_106: -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_10); -x_14 = l_Lean_Parser_noKind; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -if (lean::obj_tag(x_8) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_16 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -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::box(3); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_11); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_15); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_25 = l_Lean_Parser_Syntax_mkNode(x_24, x_23); -return x_25; -} -else -{ -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_37; -x_26 = lean::cnstr_get(x_8, 0); -lean::inc(x_26); -lean::dec(x_8); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_9); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_7); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::box(3); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_11); -lean::cnstr_set(x_32, 1, x_31); -x_33 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_15); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_37 = l_Lean_Parser_Syntax_mkNode(x_36, x_35); -return x_37; -} -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_6, 0); -lean::inc(x_38); -lean::dec(x_6); -x_39 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -if (lean::obj_tag(x_8) == 0) -{ -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; -x_40 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_7); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_39); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_11); -lean::cnstr_set(x_43, 1, x_42); -x_44 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_43); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_15); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_48 = l_Lean_Parser_Syntax_mkNode(x_47, x_46); -return x_48; -} -else -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_49 = lean::cnstr_get(x_8, 0); -lean::inc(x_49); -lean::dec(x_8); -x_50 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_50, 0, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_9); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_7); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_39); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_11); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_54); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_15); -lean::cnstr_set(x_57, 1, x_56); -x_58 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_59 = l_Lean_Parser_Syntax_mkNode(x_58, x_57); -return x_59; -} -} -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_60 = lean::cnstr_get(x_4, 0); -lean::inc(x_60); -lean::dec(x_4); -x_61 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_62 = lean::cnstr_get(x_61, 1); -lean::inc(x_62); -x_63 = lean::apply_1(x_62, x_60); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_9); -x_65 = l_Lean_Parser_Syntax_mkNode(x_14, x_64); -if (lean::obj_tag(x_6) == 0) -{ -if (lean::obj_tag(x_8) == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_66 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_7); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::box(3); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_67); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_11); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_65); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_15); -lean::cnstr_set(x_72, 1, x_71); -x_73 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_74 = l_Lean_Parser_Syntax_mkNode(x_73, x_72); -return x_74; -} -else -{ -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; -x_75 = lean::cnstr_get(x_8, 0); -lean::inc(x_75); -lean::dec(x_8); -x_76 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_9); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_7); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::box(3); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_11); -lean::cnstr_set(x_81, 1, x_80); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_65); -lean::cnstr_set(x_82, 1, x_81); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_15); -lean::cnstr_set(x_83, 1, x_82); -x_84 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_85 = l_Lean_Parser_Syntax_mkNode(x_84, x_83); -return x_85; -} -} -else -{ -obj* x_86; obj* x_87; -x_86 = lean::cnstr_get(x_6, 0); -lean::inc(x_86); -lean::dec(x_6); -x_87 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -x_88 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_7); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_87); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_11); -lean::cnstr_set(x_91, 1, x_90); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_65); -lean::cnstr_set(x_92, 1, x_91); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_15); -lean::cnstr_set(x_93, 1, x_92); -x_94 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_95 = l_Lean_Parser_Syntax_mkNode(x_94, x_93); -return x_95; -} -else -{ -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; -x_96 = lean::cnstr_get(x_8, 0); -lean::inc(x_96); -lean::dec(x_8); -x_97 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_97, 0, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_97); -lean::cnstr_set(x_98, 1, x_9); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_7); -lean::cnstr_set(x_99, 1, x_98); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_87); -lean::cnstr_set(x_100, 1, x_99); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_11); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_65); -lean::cnstr_set(x_102, 1, x_101); -x_103 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_103, 0, x_15); -lean::cnstr_set(x_103, 1, x_102); -x_104 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_105 = l_Lean_Parser_Syntax_mkNode(x_104, x_103); -return x_105; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_5 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_2); -lean::cnstr_set(x_6, 2, x_4); -lean::cnstr_set(x_6, 3, x_5); -lean::cnstr_set(x_6, 4, x_1); -lean::cnstr_set(x_6, 5, x_2); -lean::cnstr_set(x_6, 6, x_1); -return x_6; -} -else -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_3); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_3, 0); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; -lean::free_heap_obj(x_3); -x_10 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_11 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_2); -lean::cnstr_set(x_11, 2, x_1); -lean::cnstr_set(x_11, 3, x_10); -lean::cnstr_set(x_11, 4, x_1); -lean::cnstr_set(x_11, 5, x_2); -lean::cnstr_set(x_11, 6, x_1); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -lean::cnstr_set(x_3, 0, x_16); -x_17 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_18, 0, x_1); -lean::cnstr_set(x_18, 1, x_2); -lean::cnstr_set(x_18, 2, x_3); -lean::cnstr_set(x_18, 3, x_17); -lean::cnstr_set(x_18, 4, x_1); -lean::cnstr_set(x_18, 5, x_2); -lean::cnstr_set(x_18, 6, x_1); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_12); -lean::dec(x_9); -lean::free_heap_obj(x_3); -x_19 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_20 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_21 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_2); -lean::cnstr_set(x_21, 2, x_19); -lean::cnstr_set(x_21, 3, x_20); -lean::cnstr_set(x_21, 4, x_1); -lean::cnstr_set(x_21, 5, x_2); -lean::cnstr_set(x_21, 6, x_1); -return x_21; -} -} -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_3, 0); -lean::inc(x_22); -lean::dec(x_3); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_25, 0, x_1); -lean::cnstr_set(x_25, 1, x_2); -lean::cnstr_set(x_25, 2, x_1); -lean::cnstr_set(x_25, 3, x_24); -lean::cnstr_set(x_25, 4, x_1); -lean::cnstr_set(x_25, 5, x_2); -lean::cnstr_set(x_25, 6, x_1); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_23, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_27 = lean::cnstr_get(x_23, 0); -lean::inc(x_27); -lean::dec(x_23); -x_28 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -x_30 = lean::apply_1(x_29, x_27); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_2); -lean::cnstr_set(x_33, 2, x_31); -lean::cnstr_set(x_33, 3, x_32); -lean::cnstr_set(x_33, 4, x_1); -lean::cnstr_set(x_33, 5, x_2); -lean::cnstr_set(x_33, 6, x_1); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; -lean::dec(x_26); -lean::dec(x_23); -x_34 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_35 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_36, 0, x_1); -lean::cnstr_set(x_36, 1, x_2); -lean::cnstr_set(x_36, 2, x_34); -lean::cnstr_set(x_36, 3, x_35); -lean::cnstr_set(x_36, 4, x_1); -lean::cnstr_set(x_36, 5, x_2); -lean::cnstr_set(x_36, 6, x_1); -return x_36; -} -} -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_86; -x_86 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_86) == 0) -{ -obj* x_87; -x_87 = l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1___closed__1; -return x_87; -} -else -{ -obj* x_88; obj* x_89; -x_88 = lean::cnstr_get(x_86, 0); -lean::inc(x_88); -lean::dec(x_86); -x_89 = lean::cnstr_get(x_88, 1); -lean::inc(x_89); -lean::dec(x_88); -if (lean::obj_tag(x_89) == 0) -{ -obj* x_90; -x_90 = lean::box(3); -x_2 = x_89; -x_3 = x_90; -goto block_85; -} -else -{ -obj* x_91; obj* x_92; obj* x_93; -x_91 = lean::cnstr_get(x_89, 0); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_89, 1); -lean::inc(x_92); -lean::dec(x_89); -x_93 = l_Lean_Parser_Syntax_asNode___main(x_91); -if (lean::obj_tag(x_93) == 0) -{ -if (lean::obj_tag(x_92) == 0) -{ -obj* x_94; -x_94 = lean::box(3); -x_2 = x_92; -x_3 = x_94; -goto block_85; -} -else -{ -obj* x_95; obj* x_96; -x_95 = lean::cnstr_get(x_92, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_92, 1); -lean::inc(x_96); -lean::dec(x_92); -x_2 = x_96; -x_3 = x_95; -goto block_85; -} -} -else -{ -obj* x_97; obj* x_98; obj* x_99; -x_97 = lean::cnstr_get(x_93, 0); -lean::inc(x_97); -lean::dec(x_93); -x_98 = lean::cnstr_get(x_97, 1); -lean::inc(x_98); -lean::dec(x_97); -x_99 = l_List_append___rarg(x_98, x_92); -if (lean::obj_tag(x_99) == 0) -{ -obj* x_100; -x_100 = lean::box(3); -x_2 = x_99; -x_3 = x_100; -goto block_85; -} -else -{ -obj* x_101; obj* x_102; -x_101 = lean::cnstr_get(x_99, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_99, 1); -lean::inc(x_102); -lean::dec(x_99); -x_2 = x_102; -x_3 = x_101; -goto block_85; -} -} -} -} -block_85: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_82; obj* x_83; -x_82 = lean::cnstr_get(x_3, 0); -lean::inc(x_82); -lean::dec(x_3); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -x_4 = x_83; -goto block_81; -} -else -{ -obj* x_84; -lean::dec(x_3); -x_84 = lean::box(0); -x_4 = x_84; -goto block_81; -} -block_81: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_78; -x_78 = lean::box(3); -x_5 = x_2; -x_6 = x_78; -goto block_77; -} -else -{ -obj* x_79; obj* x_80; -x_79 = lean::cnstr_get(x_2, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_2, 1); -lean::inc(x_80); -lean::dec(x_2); -x_5 = x_80; -x_6 = x_79; -goto block_77; -} -block_77: -{ -obj* x_7; obj* x_8; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_74; -x_74 = lean::box(3); -x_7 = x_5; -x_8 = x_74; -goto block_73; -} -else -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_5, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_5, 1); -lean::inc(x_76); -lean::dec(x_5); -x_7 = x_76; -x_8 = x_75; -goto block_73; -} -block_73: -{ -obj* x_9; obj* x_51; -x_51 = l_Lean_Parser_Syntax_asNode___main(x_8); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; -x_52 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_9 = x_52; -goto block_50; -} -else -{ -uint8 x_53; -x_53 = !lean::is_exclusive(x_51); -if (x_53 == 0) -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_51, 0); -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -lean::dec(x_54); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; -lean::free_heap_obj(x_51); -x_56 = lean::box(0); -x_9 = x_56; -goto block_50; -} -else -{ -obj* x_57; -x_57 = lean::cnstr_get(x_55, 1); -lean::inc(x_57); -if (lean::obj_tag(x_57) == 0) -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_58 = lean::cnstr_get(x_55, 0); -lean::inc(x_58); -lean::dec(x_55); -x_59 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -x_61 = lean::apply_1(x_60, x_58); -lean::cnstr_set(x_51, 0, x_61); -x_9 = x_51; -goto block_50; -} -else -{ -obj* x_62; -lean::dec(x_57); -lean::dec(x_55); -lean::free_heap_obj(x_51); -x_62 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_9 = x_62; -goto block_50; -} -} -} -else -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_51, 0); -lean::inc(x_63); -lean::dec(x_51); -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -lean::dec(x_63); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; -x_65 = lean::box(0); -x_9 = x_65; -goto block_50; -} -else -{ -obj* x_66; -x_66 = lean::cnstr_get(x_64, 1); -lean::inc(x_66); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_67 = lean::cnstr_get(x_64, 0); -lean::inc(x_67); -lean::dec(x_64); -x_68 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_69 = lean::cnstr_get(x_68, 0); -lean::inc(x_69); -x_70 = lean::apply_1(x_69, x_67); -x_71 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_71, 0, x_70); -x_9 = x_71; -goto block_50; -} -else -{ -obj* x_72; -lean::dec(x_66); -lean::dec(x_64); -x_72 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_9 = x_72; -goto block_50; -} -} -} -} -block_50: -{ -obj* x_10; obj* x_11; -if (lean::obj_tag(x_7) == 0) -{ -obj* x_47; -x_47 = lean::box(3); -x_10 = x_7; -x_11 = x_47; -goto block_46; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_7, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_7, 1); -lean::inc(x_49); -lean::dec(x_7); -x_10 = x_49; -x_11 = x_48; -goto block_46; -} -block_46: -{ -obj* x_12; -if (lean::obj_tag(x_11) == 1) -{ -obj* x_44; -x_44 = lean::cnstr_get(x_11, 0); -lean::inc(x_44); -lean::dec(x_11); -x_12 = x_44; -goto block_43; -} -else -{ -obj* x_45; -lean::dec(x_11); -x_45 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_12 = x_45; -goto block_43; -} -block_43: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_25; obj* x_26; -if (lean::obj_tag(x_10) == 0) -{ -obj* x_40; -x_40 = lean::box(3); -x_25 = x_10; -x_26 = x_40; -goto block_39; -} -else -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_10, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_10, 1); -lean::inc(x_42); -lean::dec(x_10); -x_25 = x_42; -x_26 = x_41; -goto block_39; -} -block_24: -{ -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_6); -lean::cnstr_set(x_17, 2, x_9); -lean::cnstr_set(x_17, 3, x_12); -lean::cnstr_set(x_17, 4, x_13); -lean::cnstr_set(x_17, 5, x_14); -lean::cnstr_set(x_17, 6, x_16); -return x_17; -} -else -{ -obj* x_18; -x_18 = lean::cnstr_get(x_15, 0); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -x_21 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_6); -lean::cnstr_set(x_21, 2, x_9); -lean::cnstr_set(x_21, 3, x_12); -lean::cnstr_set(x_21, 4, x_13); -lean::cnstr_set(x_21, 5, x_14); -lean::cnstr_set(x_21, 6, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_6); -lean::cnstr_set(x_23, 2, x_9); -lean::cnstr_set(x_23, 3, x_12); -lean::cnstr_set(x_23, 4, x_13); -lean::cnstr_set(x_23, 5, x_14); -lean::cnstr_set(x_23, 6, x_22); -return x_23; -} -} -} -block_39: -{ -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -lean::dec(x_26); -x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::box(0); -x_30 = lean::box(3); -x_31 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_6); -lean::cnstr_set(x_31, 2, x_9); -lean::cnstr_set(x_31, 3, x_12); -lean::cnstr_set(x_31, 4, x_28); -lean::cnstr_set(x_31, 5, x_30); -lean::cnstr_set(x_31, 6, x_29); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_25, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_25, 1); -lean::inc(x_33); -lean::dec(x_25); -x_13 = x_28; -x_14 = x_32; -x_15 = x_33; -goto block_24; -} -} -else -{ -obj* x_34; -lean::dec(x_26); -x_34 = lean::box(0); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::box(3); -x_36 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_36, 0, x_4); -lean::cnstr_set(x_36, 1, x_6); -lean::cnstr_set(x_36, 2, x_9); -lean::cnstr_set(x_36, 3, x_12); -lean::cnstr_set(x_36, 4, x_34); -lean::cnstr_set(x_36, 5, x_35); -lean::cnstr_set(x_36, 6, x_34); -return x_36; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_25, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_25, 1); -lean::inc(x_38); -lean::dec(x_25); -x_13 = x_34; -x_14 = x_37; -x_15 = x_38; -goto block_24; -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_scopedAction_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_actionKind() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("actionKind"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_NotationSpec_actionKind; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -case 1: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -x_15 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_command_NotationSpec_actionKind; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -case 2: -{ -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_20 = lean::cnstr_get(x_1, 0); -lean::inc(x_20); -lean::dec(x_1); -x_21 = l_Lean_Parser_command_NotationSpec_scopedAction_HasView; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_2); -x_25 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_command_NotationSpec_actionKind; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -default: -{ -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; -x_30 = lean::cnstr_get(x_1, 0); -lean::inc(x_30); -lean::dec(x_1); -x_31 = l_Lean_Parser_command_NotationSpec_foldAction_HasView; -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_30); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_2); -x_35 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_2); -x_38 = l_Lean_Parser_command_NotationSpec_actionKind; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -return x_39; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("actionKind"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_dec_eq(x_21, x_30); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::mk_nat_obj(2u); -x_33 = lean::nat_dec_eq(x_21, x_32); -lean::dec(x_21); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_command_NotationSpec_foldAction_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = l_Lean_Parser_command_NotationSpec_scopedAction_HasView; -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::apply_1(x_39, x_27); -x_41 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -return x_41; -} -} -else -{ -obj* x_42; -lean::dec(x_21); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_27); -return x_42; -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_21); -x_43 = l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView; -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -x_45 = lean::apply_1(x_44, x_27); -x_46 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -return x_46; -} -} -else -{ -obj* x_47; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_47 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_47; -} -} -} -} -} -} -} -else -{ -obj* x_48; -lean::dec(x_11); -lean::dec(x_6); -x_48 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1; -return x_48; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_actionKind_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("action"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_action_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_actionKind_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::box(3); -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 = l_Lean_Parser_command_NotationSpec_action; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -x_16 = l_Lean_Parser_command_NotationSpec_action; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_NotationSpec_actionKind_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_NotationSpec_actionKind_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__3; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_2 = x_24; -x_3 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_2 = x_27; -x_3 = x_26; -goto block_20; -} -} -block_20: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l_Lean_Parser_command_NotationSpec_actionKind_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -else -{ -lean::dec(x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_13; -x_13 = l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__2; -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::box(0); -x_16 = l_Lean_Parser_command_NotationSpec_actionKind_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_15); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_action_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; -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::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens; -x_5 = l_Lean_Parser_tokens___rarg(x_4); -x_6 = lean::box(0); -x_7 = lean::mk_string("("); -x_8 = l_Lean_Parser_symbol_tokens___rarg(x_7, x_2); -lean::dec(x_7); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_6); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_9); -lean::dec(x_9); -lean::dec(x_8); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasTokens; -x_14 = l_Lean_Parser_tokens___rarg(x_13); -x_15 = lean::mk_string(", "); -x_16 = l_Lean_Parser_symbol_tokens___rarg(x_15, x_2); -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_18 = lean::mk_string(")"); -x_19 = l_Lean_Parser_symbol_tokens___rarg(x_18, x_2); -lean::dec(x_18); -x_20 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_6); -lean::dec(x_19); -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_17, x_20); -lean::dec(x_20); -lean::dec(x_17); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_16, x_21); -lean::dec(x_21); -lean::dec(x_16); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_22); -lean::dec(x_22); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_23); -lean::dec(x_23); -lean::dec(x_14); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_24); -lean::dec(x_24); -lean::dec(x_12); -x_26 = l_Lean_Parser_tokens___rarg(x_25); -lean::dec(x_25); -x_27 = l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens; -x_28 = l_Lean_Parser_List_cons_tokens___rarg(x_27, x_6); -x_29 = l_Lean_Parser_List_cons_tokens___rarg(x_26, x_28); -lean::dec(x_28); -lean::dec(x_26); -x_30 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_29); -lean::dec(x_29); -x_31 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_30); -lean::dec(x_30); -lean::dec(x_5); -x_32 = l_Lean_Parser_tokens___rarg(x_31); -lean::dec(x_31); -x_33 = l_Lean_Parser_List_cons_tokens___rarg(x_32, x_6); -lean::dec(x_32); -x_34 = l_Lean_Parser_tokens___rarg(x_33); -lean::dec(x_33); -x_35 = l_Lean_Parser_List_cons_tokens___rarg(x_34, x_6); -lean::dec(x_34); -x_36 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_35); -lean::dec(x_35); -lean::dec(x_3); -x_37 = l_Lean_Parser_tokens___rarg(x_36); -lean::dec(x_36); -return x_37; -} -} -obj* l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser(x_1, x_2, x_3, x_4, x_5); -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_8); -lean::cnstr_set(x_6, 0, x_9); -return x_6; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_6, 0); -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_6); -x_12 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_10); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -return x_13; -} -} -} -obj* l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = l_Lean_Parser_noKind; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_7, x_1, x_2, x_3, x_4, x_5, x_6); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_10); -lean::cnstr_set(x_8, 0, x_11); -return x_8; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_8, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_8); -x_14 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_12); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 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_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_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_1 = lean::mk_string(":"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("prev"); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string("("); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_4); -lean::closure_set(x_11, 2, x_10); -x_12 = lean::mk_string("scoped"); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_11); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedence_Parser), 5, 0); -x_19 = 0; -x_20 = lean::box(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_21, 0, x_18); -lean::closure_set(x_21, 1, x_20); -x_22 = lean::mk_string(", "); -x_23 = l_String_trim(x_22); -lean::dec(x_22); -lean::inc(x_23); -x_24 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_24, 0, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_4); -lean::closure_set(x_25, 2, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_26, 0, x_4); -x_27 = lean::mk_string(")"); -x_28 = l_String_trim(x_27); -lean::dec(x_27); -lean::inc(x_28); -x_29 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_29, 0, x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_30, 0, x_28); -lean::closure_set(x_30, 1, x_4); -lean::closure_set(x_30, 2, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_14); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_26); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_25); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 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_21); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_17); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_39, 0, x_38); -lean::closure_set(x_39, 1, x_37); -x_40 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_foldAction_Parser), 5, 0); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_14); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_39); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_7); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__1), 5, 0); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_43); -x_46 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_46, 0, x_45); -lean::closure_set(x_46, 1, x_4); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_14); -x_48 = l_Lean_Parser_command_NotationSpec_actionKind; -x_49 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_49, 0, x_48); -lean::closure_set(x_49, 1, x_47); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_14); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_5); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_Lean_Parser_TermParserM_Monad; -x_53 = l_Lean_Parser_TermParserM_MonadExcept; -x_54 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_55 = l_Lean_Parser_TermParserM_Alternative; -x_56 = l_Lean_Parser_command_NotationSpec_action; -x_57 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_58 = l_Lean_Parser_Combinators_node_view___rarg(x_52, x_53, x_54, x_55, x_56, x_51, x_57); -lean::dec(x_51); -return x_58; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_action_Parser___closed__1() { -_start: -{ -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; uint8 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_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_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_1 = lean::mk_string(":"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("prev"); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string("("); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_4); -lean::closure_set(x_11, 2, x_10); -x_12 = lean::mk_string("scoped"); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_11); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedence_Parser), 5, 0); -x_19 = 0; -x_20 = lean::box(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_21, 0, x_18); -lean::closure_set(x_21, 1, x_20); -x_22 = lean::mk_string(", "); -x_23 = l_String_trim(x_22); -lean::dec(x_22); -lean::inc(x_23); -x_24 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_24, 0, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_4); -lean::closure_set(x_25, 2, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_26, 0, x_4); -x_27 = lean::mk_string(")"); -x_28 = l_String_trim(x_27); -lean::dec(x_27); -lean::inc(x_28); -x_29 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_29, 0, x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_30, 0, x_28); -lean::closure_set(x_30, 1, x_4); -lean::closure_set(x_30, 2, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_14); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_26); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_25); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 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_21); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_17); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_command_NotationSpec_scopedAction; -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_39, 0, x_38); -lean::closure_set(x_39, 1, x_37); -x_40 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_foldAction_Parser), 5, 0); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_14); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_39); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_7); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__1), 5, 0); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_43); -x_46 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_46, 0, x_45); -lean::closure_set(x_46, 1, x_4); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_14); -x_48 = l_Lean_Parser_command_NotationSpec_actionKind; -x_49 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_49, 0, x_48); -lean::closure_set(x_49, 1, x_47); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_14); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_5); -lean::cnstr_set(x_51, 1, x_50); -return x_51; -} -} -obj* l_Lean_Parser_command_NotationSpec_action_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_action; -x_7 = l_Lean_Parser_command_NotationSpec_action_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_binder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("binder"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_binder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_Lean_Parser_command_NotationSpec_binder; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -return x_7; -} -else -{ -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; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_9); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_10); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_8); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_command_NotationSpec_binder; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; -x_3 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_2); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_2, 0); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; -lean::free_heap_obj(x_2); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_7, 0); -lean::inc(x_11); -lean::dec(x_7); -x_12 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -lean::cnstr_set(x_2, 0, x_14); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_2); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_7); -lean::free_heap_obj(x_2); -x_16 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_2, 0); -lean::inc(x_18); -lean::dec(x_2); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_19, 0); -lean::inc(x_23); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_1); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -lean::dec(x_22); -lean::dec(x_19); -x_29 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_1); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_65; -x_65 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; -x_66 = l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1___closed__1; -return x_66; -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_65, 0); -lean::inc(x_67); -lean::dec(x_65); -x_68 = lean::cnstr_get(x_67, 1); -lean::inc(x_68); -lean::dec(x_67); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = lean::box(3); -x_2 = x_68; -x_3 = x_69; -goto block_64; -} -else -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_68, 1); -lean::inc(x_71); -lean::dec(x_68); -x_2 = x_71; -x_3 = x_70; -goto block_64; -} -} -block_64: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::box(3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_3); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_5, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -lean::free_heap_obj(x_5); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_3); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_5, 0, x_17); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_3); -lean::cnstr_set(x_18, 1, x_5); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_10); -lean::free_heap_obj(x_5); -x_19 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_3); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_5, 0); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_3); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_3); -lean::cnstr_set(x_31, 1, x_30); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -lean::dec(x_25); -lean::dec(x_22); -x_32 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_3); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_2, 0); -lean::inc(x_34); -lean::dec(x_2); -x_35 = l_Lean_Parser_Syntax_asNode___main(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; -x_36 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_3); -lean::cnstr_set(x_37, 1, x_36); -return x_37; -} -else -{ -uint8 x_38; -x_38 = !lean::is_exclusive(x_35); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_35, 0); -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -lean::dec(x_39); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_41; obj* x_42; -lean::free_heap_obj(x_35); -x_41 = lean::box(0); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_3); -lean::cnstr_set(x_42, 1, x_41); -return x_42; -} -else -{ -obj* x_43; -x_43 = lean::cnstr_get(x_40, 1); -lean::inc(x_43); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_44 = lean::cnstr_get(x_40, 0); -lean::inc(x_44); -lean::dec(x_40); -x_45 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::apply_1(x_46, x_44); -lean::cnstr_set(x_35, 0, x_47); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_3); -lean::cnstr_set(x_48, 1, x_35); -return x_48; -} -else -{ -obj* x_49; obj* x_50; -lean::dec(x_43); -lean::dec(x_40); -lean::free_heap_obj(x_35); -x_49 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_3); -lean::cnstr_set(x_50, 1, x_49); -return x_50; -} -} -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_35, 0); -lean::inc(x_51); -lean::dec(x_35); -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -lean::dec(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; -x_53 = lean::box(0); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_3); -lean::cnstr_set(x_54, 1, x_53); -return x_54; -} -else -{ -obj* x_55; -x_55 = lean::cnstr_get(x_52, 1); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_56 = lean::cnstr_get(x_52, 0); -lean::inc(x_56); -lean::dec(x_52); -x_57 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_58 = lean::cnstr_get(x_57, 0); -lean::inc(x_58); -x_59 = lean::apply_1(x_58, x_56); -x_60 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_3); -lean::cnstr_set(x_61, 1, x_60); -return x_61; -} -else -{ -obj* x_62; obj* x_63; -lean::dec(x_55); -lean::dec(x_52); -x_62 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_3); -lean::cnstr_set(x_63, 1, x_62); -return x_63; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_binder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_binder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_binder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_binder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_binders() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("binders"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_binders_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_Lean_Parser_command_NotationSpec_binders; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -return x_7; -} -else -{ -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; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_9); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_10); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_8); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_command_NotationSpec_binders; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; -x_3 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_2); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_2, 0); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; -lean::free_heap_obj(x_2); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_7, 0); -lean::inc(x_11); -lean::dec(x_7); -x_12 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -lean::cnstr_set(x_2, 0, x_14); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_2); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_7); -lean::free_heap_obj(x_2); -x_16 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_2, 0); -lean::inc(x_18); -lean::dec(x_2); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_19, 0); -lean::inc(x_23); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_1); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -lean::dec(x_22); -lean::dec(x_19); -x_29 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_1); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_65; -x_65 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; -x_66 = l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1___closed__1; -return x_66; -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_65, 0); -lean::inc(x_67); -lean::dec(x_65); -x_68 = lean::cnstr_get(x_67, 1); -lean::inc(x_68); -lean::dec(x_67); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = lean::box(3); -x_2 = x_68; -x_3 = x_69; -goto block_64; -} -else -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_68, 1); -lean::inc(x_71); -lean::dec(x_68); -x_2 = x_71; -x_3 = x_70; -goto block_64; -} -} -block_64: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::box(3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_3); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_5, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -lean::free_heap_obj(x_5); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_3); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_5, 0, x_17); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_3); -lean::cnstr_set(x_18, 1, x_5); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_10); -lean::free_heap_obj(x_5); -x_19 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_3); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_5, 0); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_3); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_3); -lean::cnstr_set(x_31, 1, x_30); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -lean::dec(x_25); -lean::dec(x_22); -x_32 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_3); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_2, 0); -lean::inc(x_34); -lean::dec(x_2); -x_35 = l_Lean_Parser_Syntax_asNode___main(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; -x_36 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_3); -lean::cnstr_set(x_37, 1, x_36); -return x_37; -} -else -{ -uint8 x_38; -x_38 = !lean::is_exclusive(x_35); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_35, 0); -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -lean::dec(x_39); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_41; obj* x_42; -lean::free_heap_obj(x_35); -x_41 = lean::box(0); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_3); -lean::cnstr_set(x_42, 1, x_41); -return x_42; -} -else -{ -obj* x_43; -x_43 = lean::cnstr_get(x_40, 1); -lean::inc(x_43); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_44 = lean::cnstr_get(x_40, 0); -lean::inc(x_44); -lean::dec(x_40); -x_45 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::apply_1(x_46, x_44); -lean::cnstr_set(x_35, 0, x_47); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_3); -lean::cnstr_set(x_48, 1, x_35); -return x_48; -} -else -{ -obj* x_49; obj* x_50; -lean::dec(x_43); -lean::dec(x_40); -lean::free_heap_obj(x_35); -x_49 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_3); -lean::cnstr_set(x_50, 1, x_49); -return x_50; -} -} -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_35, 0); -lean::inc(x_51); -lean::dec(x_35); -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -lean::dec(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; -x_53 = lean::box(0); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_3); -lean::cnstr_set(x_54, 1, x_53); -return x_54; -} -else -{ -obj* x_55; -x_55 = lean::cnstr_get(x_52, 1); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_56 = lean::cnstr_get(x_52, 0); -lean::inc(x_56); -lean::dec(x_52); -x_57 = l_Lean_Parser_command_NotationSpec_precedence_HasView; -x_58 = lean::cnstr_get(x_57, 0); -lean::inc(x_58); -x_59 = lean::apply_1(x_58, x_56); -x_60 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_3); -lean::cnstr_set(x_61, 1, x_60); -return x_61; -} -else -{ -obj* x_62; obj* x_63; -lean::dec(x_55); -lean::dec(x_52); -x_62 = l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1; -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_3); -lean::cnstr_set(x_63, 1, x_62); -return x_63; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_binders_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_binders_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_binders_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_binders_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_argument() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("argument"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_command_NotationSpec_argument; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -else -{ -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; -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -lean::dec(x_3); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_9); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_10); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_command_NotationSpec_argument; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::box(3); -x_11 = lean::apply_1(x_9, x_10); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_9); -lean::cnstr_set(x_2, 0, x_12); -x_13 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -return x_14; -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::dec(x_6); -lean::free_heap_obj(x_2); -x_15 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1; -return x_15; -} -} -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2; -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 1); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_20 = lean::cnstr_get(x_17, 0); -lean::inc(x_20); -lean::dec(x_17); -x_21 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -return x_26; -} -else -{ -obj* x_27; -lean::dec(x_19); -lean::dec(x_17); -x_27 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1; -return x_27; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__3; -return x_1; -} -} -obj* l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_98; -x_98 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_98) == 0) -{ -obj* x_99; -x_99 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__5; -return x_99; -} -else -{ -obj* x_100; obj* x_101; -x_100 = lean::cnstr_get(x_98, 0); -lean::inc(x_100); -lean::dec(x_98); -x_101 = lean::cnstr_get(x_100, 1); -lean::inc(x_101); -lean::dec(x_100); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; -x_102 = lean::box(3); -x_2 = x_101; -x_3 = x_102; -goto block_97; -} -else -{ -obj* x_103; obj* x_104; -x_103 = lean::cnstr_get(x_101, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_101, 1); -lean::inc(x_104); -lean::dec(x_101); -x_2 = x_104; -x_3 = x_103; -goto block_97; -} -} -block_97: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; -x_34 = lean::cnstr_get(x_3, 0); -lean::inc(x_34); -lean::dec(x_3); -x_35 = lean::box(3); -x_36 = l_Lean_Parser_Syntax_asNode___main(x_35); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; obj* x_38; -x_37 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4; -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_34); -lean::cnstr_set(x_38, 1, x_37); -return x_38; -} -else -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_36, 0); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; -lean::free_heap_obj(x_36); -x_42 = lean::box(0); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_34); -lean::cnstr_set(x_43, 1, x_42); -return x_43; -} -else -{ -obj* x_44; -x_44 = lean::cnstr_get(x_41, 1); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_45 = lean::cnstr_get(x_41, 0); -lean::inc(x_45); -lean::dec(x_41); -x_46 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_45); -lean::cnstr_set(x_36, 0, x_48); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_34); -lean::cnstr_set(x_49, 1, x_36); -return x_49; -} -else -{ -obj* x_50; obj* x_51; -lean::dec(x_44); -lean::dec(x_41); -lean::free_heap_obj(x_36); -x_50 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4; -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_34); -lean::cnstr_set(x_51, 1, x_50); -return x_51; -} -} -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_36, 0); -lean::inc(x_52); -lean::dec(x_36); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; obj* x_55; -x_54 = lean::box(0); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_34); -lean::cnstr_set(x_55, 1, x_54); -return x_55; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_57 = lean::cnstr_get(x_53, 0); -lean::inc(x_57); -lean::dec(x_53); -x_58 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_34); -lean::cnstr_set(x_62, 1, x_61); -return x_62; -} -else -{ -obj* x_63; obj* x_64; -lean::dec(x_56); -lean::dec(x_53); -x_63 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4; -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_34); -lean::cnstr_set(x_64, 1, x_63); -return x_64; -} -} -} -} -} -else -{ -obj* x_65; obj* x_66; obj* x_67; -x_65 = lean::cnstr_get(x_3, 0); -lean::inc(x_65); -lean::dec(x_3); -x_66 = lean::cnstr_get(x_2, 0); -lean::inc(x_66); -lean::dec(x_2); -x_67 = l_Lean_Parser_Syntax_asNode___main(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; -x_68 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4; -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_65); -lean::cnstr_set(x_69, 1, x_68); -return x_69; -} -else -{ -uint8 x_70; -x_70 = !lean::is_exclusive(x_67); -if (x_70 == 0) -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_67, 0); -x_72 = lean::cnstr_get(x_71, 1); -lean::inc(x_72); -lean::dec(x_71); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; obj* x_74; -lean::free_heap_obj(x_67); -x_73 = lean::box(0); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_65); -lean::cnstr_set(x_74, 1, x_73); -return x_74; -} -else -{ -obj* x_75; -x_75 = lean::cnstr_get(x_72, 1); -lean::inc(x_75); -if (lean::obj_tag(x_75) == 0) -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_76 = lean::cnstr_get(x_72, 0); -lean::inc(x_76); -lean::dec(x_72); -x_77 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_78 = lean::cnstr_get(x_77, 0); -lean::inc(x_78); -x_79 = lean::apply_1(x_78, x_76); -lean::cnstr_set(x_67, 0, x_79); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_65); -lean::cnstr_set(x_80, 1, x_67); -return x_80; -} -else -{ -obj* x_81; obj* x_82; -lean::dec(x_75); -lean::dec(x_72); -lean::free_heap_obj(x_67); -x_81 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4; -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_65); -lean::cnstr_set(x_82, 1, x_81); -return x_82; -} -} -} -else -{ -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_67, 0); -lean::inc(x_83); -lean::dec(x_67); -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -lean::dec(x_83); -if (lean::obj_tag(x_84) == 0) -{ -obj* x_85; obj* x_86; -x_85 = lean::box(0); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_65); -lean::cnstr_set(x_86, 1, x_85); -return x_86; -} -else -{ -obj* x_87; -x_87 = lean::cnstr_get(x_84, 1); -lean::inc(x_87); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_88 = lean::cnstr_get(x_84, 0); -lean::inc(x_88); -lean::dec(x_84); -x_89 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_90 = lean::cnstr_get(x_89, 0); -lean::inc(x_90); -x_91 = lean::apply_1(x_90, x_88); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_65); -lean::cnstr_set(x_93, 1, x_92); -return x_93; -} -else -{ -obj* x_94; obj* x_95; -lean::dec(x_87); -lean::dec(x_84); -x_94 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4; -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_65); -lean::cnstr_set(x_95, 1, x_94); -return x_95; -} -} -} -} -} -} -else -{ -obj* x_96; -lean::dec(x_3); -x_96 = lean::box(0); -x_4 = x_96; -goto block_33; -} -block_33: -{ -lean::dec(x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__3; -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1; -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_7, 0); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; -lean::free_heap_obj(x_7); -x_12 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2; -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_11, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_11, 0); -lean::inc(x_14); -lean::dec(x_11); -x_15 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_7, 0, x_17); -x_18 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_7); -return x_19; -} -else -{ -obj* x_20; -lean::dec(x_13); -lean::dec(x_11); -lean::free_heap_obj(x_7); -x_20 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1; -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_7, 0); -lean::inc(x_21); -lean::dec(x_7); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; -x_23 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2; -return x_23; -} -else -{ -obj* x_24; -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_22, 0); -lean::inc(x_25); -lean::dec(x_22); -x_26 = l_Lean_Parser_command_NotationSpec_action_HasView; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::apply_1(x_27, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -return x_31; -} -else -{ -obj* x_32; -lean::dec(x_24); -lean::dec(x_22); -x_32 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1; -return x_32; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_argument_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_argument_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_argument_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_transition() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("transition"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_transition_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_binder_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_NotationSpec_transition; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -case 1: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_command_NotationSpec_binders_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_NotationSpec_transition; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -default: -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -lean::dec(x_1); -x_24 = l_Lean_Parser_command_NotationSpec_argument_HasView; -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_2); -x_31 = l_Lean_Parser_command_NotationSpec_transition; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_NotationSpec_binder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("transition"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_dec_eq(x_21, x_30); -lean::dec(x_21); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_32 = l_Lean_Parser_command_NotationSpec_argument_HasView; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -x_34 = lean::apply_1(x_33, x_27); -x_35 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = l_Lean_Parser_command_NotationSpec_binders_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_27); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -lean::dec(x_21); -x_40 = l_Lean_Parser_command_NotationSpec_binder_HasView; -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::apply_1(x_41, x_27); -x_43 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -else -{ -obj* x_44; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_44 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_44; -} -} -} -} -} -} -} -else -{ -obj* x_45; -lean::dec(x_11); -lean::dec(x_6); -x_45 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1; -return x_45; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_transition_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_transition_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_transition_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_transition_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_tokens___rarg(x_2); -x_4 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_1); -lean::dec(x_3); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_4); -lean::dec(x_4); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasTokens; -x_8 = l_Lean_Parser_tokens___rarg(x_7); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_1); -lean::dec(x_8); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_1); -lean::dec(x_11); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_12); -lean::dec(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_13); -lean::dec(x_13); -lean::dec(x_6); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_1); -lean::dec(x_15); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -return x_17; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; uint8 x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; -x_1 = lean::mk_string("binder"); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedence_Parser), 5, 0); -x_4 = 0; -x_5 = lean::box(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_6, 0, x_3); -lean::closure_set(x_6, 1, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -lean::inc(x_8); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_command_NotationSpec_binder; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_11, 0, x_10); -lean::closure_set(x_11, 1, x_9); -x_12 = lean::mk_string("binders"); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 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_8); -x_15 = l_Lean_Parser_command_NotationSpec_binders; -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_16, 0, x_15); -lean::closure_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser), 5, 0); -x_18 = lean::box(x_4); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_19, 0, x_17); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_7); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_Lean_Parser_command_NotationSpec_argument; -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_7); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_16); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_11); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_7); -x_31 = l_Lean_Parser_TermParserM_Monad; -x_32 = l_Lean_Parser_TermParserM_MonadExcept; -x_33 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_34 = l_Lean_Parser_TermParserM_Alternative; -x_35 = l_Lean_Parser_command_NotationSpec_transition; -x_36 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_37 = l_Lean_Parser_Combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_35, x_30, x_36); -lean::dec(x_30); -return x_37; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_transition_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; uint8 x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_1 = lean::mk_string("binder"); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_precedence_Parser), 5, 0); -x_4 = 0; -x_5 = lean::box(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_6, 0, x_3); -lean::closure_set(x_6, 1, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -lean::inc(x_8); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_command_NotationSpec_binder; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_11, 0, x_10); -lean::closure_set(x_11, 1, x_9); -x_12 = lean::mk_string("binders"); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__2___boxed), 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_8); -x_15 = l_Lean_Parser_command_NotationSpec_binders; -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_16, 0, x_15); -lean::closure_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser), 5, 0); -x_18 = lean::box(x_4); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_19, 0, x_17); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_7); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_Lean_Parser_command_NotationSpec_argument; -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_7); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_16); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_11); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_7); -return x_30; -} -} -obj* l_Lean_Parser_command_NotationSpec_transition_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_transition; -x_7 = l_Lean_Parser_command_NotationSpec_transition_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_rule() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("rule"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_NotationSpec_rule_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = l_Lean_Parser_command_NotationSpec_rule; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -lean::dec(x_3); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_11); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_12); -x_17 = l_Lean_Parser_noKind; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_12); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_6); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_command_NotationSpec_rule; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_5, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -lean::free_heap_obj(x_5); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_5, 0, x_17); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_5); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_10); -lean::free_heap_obj(x_5); -x_19 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_5, 0); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_4); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_30); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -lean::dec(x_25); -lean::dec(x_22); -x_32 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_68; -x_68 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__2; -return x_69; -} -else -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -lean::inc(x_70); -lean::dec(x_68); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -lean::dec(x_70); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -x_72 = lean::box(3); -x_2 = x_71; -x_3 = x_72; -goto block_67; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_71, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_71, 1); -lean::inc(x_74); -lean::dec(x_71); -x_2 = x_74; -x_3 = x_73; -goto block_67; -} -} -block_67: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::box(3); -x_8 = l_Lean_Parser_Syntax_asNode___main(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_6); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; -lean::free_heap_obj(x_8); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_13, 1); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_13, 0); -lean::inc(x_17); -lean::dec(x_13); -x_18 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::apply_1(x_19, x_17); -lean::cnstr_set(x_8, 0, x_20); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_6); -lean::cnstr_set(x_21, 1, x_8); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -lean::dec(x_16); -lean::dec(x_13); -lean::free_heap_obj(x_8); -x_22 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_6); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_8, 0); -lean::inc(x_24); -lean::dec(x_8); -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -lean::dec(x_24); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::box(0); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_26); -return x_27; -} -else -{ -obj* x_28; -x_28 = lean::cnstr_get(x_25, 1); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_25, 0); -lean::inc(x_29); -lean::dec(x_25); -x_30 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_29); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_6); -lean::cnstr_set(x_34, 1, x_33); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_28); -lean::dec(x_25); -x_35 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_6); -lean::cnstr_set(x_36, 1, x_35); -return x_36; -} -} -} -} -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_2, 0); -lean::inc(x_37); -lean::dec(x_2); -x_38 = l_Lean_Parser_Syntax_asNode___main(x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; -x_39 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_6); -lean::cnstr_set(x_40, 1, x_39); -return x_40; -} -else -{ -uint8 x_41; -x_41 = !lean::is_exclusive(x_38); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_38, 0); -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -lean::dec(x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; -lean::free_heap_obj(x_38); -x_44 = lean::box(0); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_6); -lean::cnstr_set(x_45, 1, x_44); -return x_45; -} -else -{ -obj* x_46; -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::apply_1(x_49, x_47); -lean::cnstr_set(x_38, 0, x_50); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_6); -lean::cnstr_set(x_51, 1, x_38); -return x_51; -} -else -{ -obj* x_52; obj* x_53; -lean::dec(x_46); -lean::dec(x_43); -lean::free_heap_obj(x_38); -x_52 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_6); -lean::cnstr_set(x_53, 1, x_52); -return x_53; -} -} -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_38, 0); -lean::inc(x_54); -lean::dec(x_38); -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -lean::dec(x_54); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; -x_56 = lean::box(0); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_6); -lean::cnstr_set(x_57, 1, x_56); -return x_57; -} -else -{ -obj* x_58; -x_58 = lean::cnstr_get(x_55, 1); -lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_59 = lean::cnstr_get(x_55, 0); -lean::inc(x_59); -lean::dec(x_55); -x_60 = l_Lean_Parser_command_NotationSpec_transition_HasView; -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -x_62 = lean::apply_1(x_61, x_59); -x_63 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_63, 0, x_62); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_6); -lean::cnstr_set(x_64, 1, x_63); -return x_64; -} -else -{ -obj* x_65; obj* x_66; -lean::dec(x_58); -lean::dec(x_55); -x_65 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1; -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_6); -lean::cnstr_set(x_66, 1, x_65); -return x_66; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_rule_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_rule_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_rule_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_rule_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = lean::box(0); -x_4 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -lean::dec(x_4); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; uint8 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; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_transition_Parser), 5, 0); -x_2 = 0; -x_3 = lean::box(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser), 5, 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); -x_9 = l_Lean_Parser_TermParserM_Monad; -x_10 = l_Lean_Parser_TermParserM_MonadExcept; -x_11 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_12 = l_Lean_Parser_TermParserM_Alternative; -x_13 = l_Lean_Parser_command_NotationSpec_rule; -x_14 = l_Lean_Parser_command_NotationSpec_rule_HasView; -x_15 = l_Lean_Parser_Combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -lean::dec(x_8); -return x_15; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_rule_Parser___closed__1() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_transition_Parser), 5, 0); -x_2 = 0; -x_3 = lean::box(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser), 5, 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); -return x_8; -} -} -obj* l_Lean_Parser_command_NotationSpec_rule_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec_rule; -x_7 = l_Lean_Parser_command_NotationSpec_rule_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("NotationSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_NotationSpec_rule_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1___closed__1; -x_5 = l_List_map___main___rarg(x_4, x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_command_NotationSpec; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_8); -x_17 = l_Lean_Parser_Syntax_mkNode(x_6, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -x_19 = l_Lean_Parser_command_NotationSpec; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_command_NotationSpec_rule_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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); -return x_6; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_command_NotationSpec_rule_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::box(3); -x_10 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -x_11 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1; -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_10, 0); -lean::inc(x_13); -lean::dec(x_10); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -lean::dec(x_13); -x_15 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2; -x_16 = l_List_map___main___rarg(x_15, x_14); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_8); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2; -x_9 = l_List_map___main___rarg(x_8, x_7); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__6() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 1) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -lean::cnstr_set(x_2, 0, x_10); -x_11 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2; -x_12 = l_List_map___main___rarg(x_11, x_6); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_2); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -else -{ -obj* x_14; -lean::dec(x_9); -lean::dec(x_6); -lean::free_heap_obj(x_2); -x_14 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::dec(x_6); -lean::free_heap_obj(x_2); -x_15 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_15; -} -} -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5; -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 1); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::cnstr_get(x_17, 0); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 1) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -lean::dec(x_20); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -x_23 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2; -x_24 = l_List_map___main___rarg(x_23, x_17); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; -lean::dec(x_20); -lean::dec(x_17); -x_26 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_26; -} -} -else -{ -obj* x_27; -lean::dec(x_19); -lean::dec(x_17); -x_27 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_27; -} -} -} -} -} -} -obj* l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_13; obj* x_14; obj* x_71; -x_71 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -x_72 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__6; -return x_72; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_71, 0); -lean::inc(x_73); -lean::dec(x_71); -x_74 = lean::cnstr_get(x_73, 1); -lean::inc(x_74); -lean::dec(x_73); -if (lean::obj_tag(x_74) == 0) -{ -obj* x_75; -x_75 = lean::box(3); -x_13 = x_74; -x_14 = x_75; -goto block_70; -} -else -{ -obj* x_76; obj* x_77; -x_76 = lean::cnstr_get(x_74, 0); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_74, 1); -lean::inc(x_77); -lean::dec(x_74); -x_13 = x_77; -x_14 = x_76; -goto block_70; -} -} -block_12: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2; -x_10 = l_List_map___main___rarg(x_9, x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_2); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -block_70: -{ -obj* x_15; obj* x_20; -x_20 = l_Lean_Parser_Syntax_asNode___main(x_14); -if (lean::obj_tag(x_20) == 0) -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_21; -x_21 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_21; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_13, 0); -lean::inc(x_22); -lean::dec(x_13); -x_23 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_2 = x_23; -x_3 = x_22; -goto block_12; -} -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_20); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_20, 0); -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -lean::dec(x_25); -if (lean::obj_tag(x_26) == 0) -{ -lean::free_heap_obj(x_20); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_27; -x_27 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5; -return x_27; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_13, 0); -lean::inc(x_28); -lean::dec(x_13); -x_29 = lean::box(0); -x_2 = x_29; -x_3 = x_28; -goto block_12; -} -} -else -{ -obj* x_30; -x_30 = lean::cnstr_get(x_26, 1); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; -x_31 = lean::cnstr_get(x_26, 0); -lean::inc(x_31); -lean::dec(x_26); -if (lean::obj_tag(x_31) == 1) -{ -obj* x_32; -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -lean::dec(x_31); -lean::cnstr_set(x_20, 0, x_32); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::box(3); -x_34 = l_Lean_Parser_Syntax_asNode___main(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; -x_35 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_20); -lean::cnstr_set(x_36, 1, x_35); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = lean::cnstr_get(x_34, 0); -lean::inc(x_37); -lean::dec(x_34); -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -lean::dec(x_37); -x_39 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2; -x_40 = l_List_map___main___rarg(x_39, x_38); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_20); -lean::cnstr_set(x_41, 1, x_40); -return x_41; -} -} -else -{ -obj* x_42; -x_42 = lean::cnstr_get(x_13, 0); -lean::inc(x_42); -lean::dec(x_13); -x_2 = x_20; -x_3 = x_42; -goto block_12; -} -} -else -{ -obj* x_43; -lean::dec(x_31); -lean::free_heap_obj(x_20); -x_43 = lean::box(0); -x_15 = x_43; -goto block_19; -} -} -else -{ -lean::dec(x_30); -lean::dec(x_26); -lean::free_heap_obj(x_20); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_44; -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_13, 0); -lean::inc(x_45); -lean::dec(x_13); -x_46 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_2 = x_46; -x_3 = x_45; -goto block_12; -} -} -} -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_20, 0); -lean::inc(x_47); -lean::dec(x_20); -x_48 = lean::cnstr_get(x_47, 1); -lean::inc(x_48); -lean::dec(x_47); -if (lean::obj_tag(x_48) == 0) -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_49; -x_49 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5; -return x_49; -} -else -{ -obj* x_50; obj* x_51; -x_50 = lean::cnstr_get(x_13, 0); -lean::inc(x_50); -lean::dec(x_13); -x_51 = lean::box(0); -x_2 = x_51; -x_3 = x_50; -goto block_12; -} -} -else -{ -obj* x_52; -x_52 = lean::cnstr_get(x_48, 1); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; -x_53 = lean::cnstr_get(x_48, 0); -lean::inc(x_53); -lean::dec(x_48); -if (lean::obj_tag(x_53) == 1) -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -lean::dec(x_53); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_56; obj* x_57; -x_56 = lean::box(3); -x_57 = l_Lean_Parser_Syntax_asNode___main(x_56); -if (lean::obj_tag(x_57) == 0) -{ -obj* x_58; obj* x_59; -x_58 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1; -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_55); -lean::cnstr_set(x_59, 1, x_58); -return x_59; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_60 = lean::cnstr_get(x_57, 0); -lean::inc(x_60); -lean::dec(x_57); -x_61 = lean::cnstr_get(x_60, 1); -lean::inc(x_61); -lean::dec(x_60); -x_62 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2; -x_63 = l_List_map___main___rarg(x_62, x_61); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_55); -lean::cnstr_set(x_64, 1, x_63); -return x_64; -} -} -else -{ -obj* x_65; -x_65 = lean::cnstr_get(x_13, 0); -lean::inc(x_65); -lean::dec(x_13); -x_2 = x_55; -x_3 = x_65; -goto block_12; -} -} -else -{ -obj* x_66; -lean::dec(x_53); -x_66 = lean::box(0); -x_15 = x_66; -goto block_19; -} -} -else -{ -lean::dec(x_52); -lean::dec(x_48); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_67; -x_67 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_67; -} -else -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_13, 0); -lean::inc(x_68); -lean::dec(x_13); -x_69 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_2 = x_69; -x_3 = x_68; -goto block_12; -} -} -} -} -} -block_19: -{ -lean::dec(x_15); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3; -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_13, 0); -lean::inc(x_17); -lean::dec(x_13); -x_18 = l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4; -x_2 = x_18; -x_3 = x_17; -goto block_12; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_NotationSpec_HasView_x27; -return x_1; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__3(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_9; uint8 x_10; -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::nat_dec_eq(x_3, x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_89; obj* x_90; -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_sub(x_3, x_11); -lean::inc(x_1); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -x_89 = lean::apply_5(x_1, x_4, x_5, x_6, x_7, x_8); -x_90 = lean::cnstr_get(x_89, 0); -lean::inc(x_90); -if (lean::obj_tag(x_90) == 0) -{ -obj* x_91; -x_91 = lean::cnstr_get(x_89, 1); -lean::inc(x_91); -lean::dec(x_89); -x_13 = x_90; -x_14 = x_91; -goto block_88; -} -else -{ -obj* x_92; obj* x_93; -x_92 = lean::cnstr_get(x_90, 0); -lean::inc(x_92); -x_93 = lean::cnstr_get(x_92, 3); -lean::inc(x_93); -if (lean::obj_tag(x_93) == 0) -{ -obj* x_94; uint8 x_95; -x_94 = lean::cnstr_get(x_89, 1); -lean::inc(x_94); -lean::dec(x_89); -x_95 = !lean::is_exclusive(x_90); -if (x_95 == 0) -{ -uint8 x_96; obj* x_97; uint8 x_98; -x_96 = lean::cnstr_get_scalar(x_90, sizeof(void*)*1); -x_97 = lean::cnstr_get(x_90, 0); -lean::dec(x_97); -x_98 = !lean::is_exclusive(x_92); -if (x_98 == 0) -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_99 = lean::cnstr_get(x_92, 3); -lean::dec(x_99); -x_100 = lean::box(3); -lean::inc(x_2); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_2); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_100); -lean::cnstr_set(x_102, 1, x_101); -x_103 = l_List_reverse___rarg(x_102); -x_104 = l_Lean_Parser_noKind; -x_105 = l_Lean_Parser_Syntax_mkNode(x_104, x_103); -x_106 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_106, 0, x_105); -lean::cnstr_set(x_92, 3, x_106); -if (x_96 == 0) -{ -uint8 x_107; -x_107 = 0; -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_107); -x_13 = x_90; -x_14 = x_94; -goto block_88; -} -else -{ -uint8 x_108; -x_108 = 1; -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_108); -x_13 = x_90; -x_14 = x_94; -goto block_88; -} -} -else -{ -obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_109 = lean::cnstr_get(x_92, 0); -x_110 = lean::cnstr_get(x_92, 1); -x_111 = lean::cnstr_get(x_92, 2); -lean::inc(x_111); -lean::inc(x_110); -lean::inc(x_109); -lean::dec(x_92); -x_112 = lean::box(3); -lean::inc(x_2); -x_113 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_113, 0, x_112); -lean::cnstr_set(x_113, 1, x_2); -x_114 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_114, 0, x_112); -lean::cnstr_set(x_114, 1, x_113); -x_115 = l_List_reverse___rarg(x_114); -x_116 = l_Lean_Parser_noKind; -x_117 = l_Lean_Parser_Syntax_mkNode(x_116, x_115); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -x_119 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_119, 0, x_109); -lean::cnstr_set(x_119, 1, x_110); -lean::cnstr_set(x_119, 2, x_111); -lean::cnstr_set(x_119, 3, x_118); -if (x_96 == 0) -{ -uint8 x_120; -x_120 = 0; -lean::cnstr_set(x_90, 0, x_119); -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_120); -x_13 = x_90; -x_14 = x_94; -goto block_88; -} -else -{ -uint8 x_121; -x_121 = 1; -lean::cnstr_set(x_90, 0, x_119); -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_121); -x_13 = x_90; -x_14 = x_94; -goto block_88; -} -} -} -else -{ -uint8 x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; -x_122 = lean::cnstr_get_scalar(x_90, sizeof(void*)*1); -lean::dec(x_90); -x_123 = lean::cnstr_get(x_92, 0); -lean::inc(x_123); -x_124 = lean::cnstr_get(x_92, 1); -lean::inc(x_124); -x_125 = lean::cnstr_get(x_92, 2); -lean::inc(x_125); -if (lean::is_exclusive(x_92)) { - lean::cnstr_release(x_92, 0); - lean::cnstr_release(x_92, 1); - lean::cnstr_release(x_92, 2); - lean::cnstr_release(x_92, 3); - x_126 = x_92; -} else { - lean::dec_ref(x_92); - x_126 = lean::box(0); -} -x_127 = lean::box(3); -lean::inc(x_2); -x_128 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_128, 0, x_127); -lean::cnstr_set(x_128, 1, x_2); -x_129 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_129, 0, x_127); -lean::cnstr_set(x_129, 1, x_128); -x_130 = l_List_reverse___rarg(x_129); -x_131 = l_Lean_Parser_noKind; -x_132 = l_Lean_Parser_Syntax_mkNode(x_131, x_130); -x_133 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_133, 0, x_132); -if (lean::is_scalar(x_126)) { - x_134 = lean::alloc_cnstr(0, 4, 0); -} else { - x_134 = x_126; -} -lean::cnstr_set(x_134, 0, x_123); -lean::cnstr_set(x_134, 1, x_124); -lean::cnstr_set(x_134, 2, x_125); -lean::cnstr_set(x_134, 3, x_133); -if (x_122 == 0) -{ -uint8 x_135; obj* x_136; -x_135 = 0; -x_136 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_136, 0, x_134); -lean::cnstr_set_scalar(x_136, sizeof(void*)*1, x_135); -x_13 = x_136; -x_14 = x_94; -goto block_88; -} -else -{ -uint8 x_137; obj* x_138; -x_137 = 1; -x_138 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_138, 0, x_134); -lean::cnstr_set_scalar(x_138, sizeof(void*)*1, x_137); -x_13 = x_138; -x_14 = x_94; -goto block_88; -} -} -} -else -{ -obj* x_139; uint8 x_140; -x_139 = lean::cnstr_get(x_89, 1); -lean::inc(x_139); -lean::dec(x_89); -x_140 = !lean::is_exclusive(x_90); -if (x_140 == 0) -{ -uint8 x_141; obj* x_142; uint8 x_143; -x_141 = lean::cnstr_get_scalar(x_90, sizeof(void*)*1); -x_142 = lean::cnstr_get(x_90, 0); -lean::dec(x_142); -x_143 = !lean::is_exclusive(x_92); -if (x_143 == 0) -{ -obj* x_144; uint8 x_145; -x_144 = lean::cnstr_get(x_92, 3); -lean::dec(x_144); -x_145 = !lean::is_exclusive(x_93); -if (x_145 == 0) -{ -obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_146 = lean::cnstr_get(x_93, 0); -lean::inc(x_2); -x_147 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_147, 0, x_146); -lean::cnstr_set(x_147, 1, x_2); -x_148 = lean::box(3); -x_149 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_149, 0, x_148); -lean::cnstr_set(x_149, 1, x_147); -x_150 = l_List_reverse___rarg(x_149); -x_151 = l_Lean_Parser_noKind; -x_152 = l_Lean_Parser_Syntax_mkNode(x_151, x_150); -lean::cnstr_set(x_93, 0, x_152); -if (x_141 == 0) -{ -uint8 x_153; -x_153 = 0; -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_153); -x_13 = x_90; -x_14 = x_139; -goto block_88; -} -else -{ -uint8 x_154; -x_154 = 1; -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_154); -x_13 = x_90; -x_14 = x_139; -goto block_88; -} -} -else -{ -obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -x_155 = lean::cnstr_get(x_93, 0); -lean::inc(x_155); -lean::dec(x_93); -lean::inc(x_2); -x_156 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_156, 0, x_155); -lean::cnstr_set(x_156, 1, x_2); -x_157 = lean::box(3); -x_158 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_158, 0, x_157); -lean::cnstr_set(x_158, 1, x_156); -x_159 = l_List_reverse___rarg(x_158); -x_160 = l_Lean_Parser_noKind; -x_161 = l_Lean_Parser_Syntax_mkNode(x_160, x_159); -x_162 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_162, 0, x_161); -lean::cnstr_set(x_92, 3, x_162); -if (x_141 == 0) -{ -uint8 x_163; -x_163 = 0; -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_163); -x_13 = x_90; -x_14 = x_139; -goto block_88; -} -else -{ -uint8 x_164; -x_164 = 1; -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_164); -x_13 = x_90; -x_14 = x_139; -goto block_88; -} -} -} -else -{ -obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; -x_165 = lean::cnstr_get(x_92, 0); -x_166 = lean::cnstr_get(x_92, 1); -x_167 = lean::cnstr_get(x_92, 2); -lean::inc(x_167); -lean::inc(x_166); -lean::inc(x_165); -lean::dec(x_92); -x_168 = lean::cnstr_get(x_93, 0); -lean::inc(x_168); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - x_169 = x_93; -} else { - lean::dec_ref(x_93); - x_169 = lean::box(0); -} -lean::inc(x_2); -x_170 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_170, 0, x_168); -lean::cnstr_set(x_170, 1, x_2); -x_171 = lean::box(3); -x_172 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_172, 0, x_171); -lean::cnstr_set(x_172, 1, x_170); -x_173 = l_List_reverse___rarg(x_172); -x_174 = l_Lean_Parser_noKind; -x_175 = l_Lean_Parser_Syntax_mkNode(x_174, x_173); -if (lean::is_scalar(x_169)) { - x_176 = lean::alloc_cnstr(1, 1, 0); -} else { - x_176 = x_169; -} -lean::cnstr_set(x_176, 0, x_175); -x_177 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_177, 0, x_165); -lean::cnstr_set(x_177, 1, x_166); -lean::cnstr_set(x_177, 2, x_167); -lean::cnstr_set(x_177, 3, x_176); -if (x_141 == 0) -{ -uint8 x_178; -x_178 = 0; -lean::cnstr_set(x_90, 0, x_177); -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_178); -x_13 = x_90; -x_14 = x_139; -goto block_88; -} -else -{ -uint8 x_179; -x_179 = 1; -lean::cnstr_set(x_90, 0, x_177); -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_179); -x_13 = x_90; -x_14 = x_139; -goto block_88; -} -} -} -else -{ -uint8 x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; -x_180 = lean::cnstr_get_scalar(x_90, sizeof(void*)*1); -lean::dec(x_90); -x_181 = lean::cnstr_get(x_92, 0); -lean::inc(x_181); -x_182 = lean::cnstr_get(x_92, 1); -lean::inc(x_182); -x_183 = lean::cnstr_get(x_92, 2); -lean::inc(x_183); -if (lean::is_exclusive(x_92)) { - lean::cnstr_release(x_92, 0); - lean::cnstr_release(x_92, 1); - lean::cnstr_release(x_92, 2); - lean::cnstr_release(x_92, 3); - x_184 = x_92; -} else { - lean::dec_ref(x_92); - x_184 = lean::box(0); -} -x_185 = lean::cnstr_get(x_93, 0); -lean::inc(x_185); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - x_186 = x_93; -} else { - lean::dec_ref(x_93); - x_186 = lean::box(0); -} -lean::inc(x_2); -x_187 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_187, 0, x_185); -lean::cnstr_set(x_187, 1, x_2); -x_188 = lean::box(3); -x_189 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_189, 0, x_188); -lean::cnstr_set(x_189, 1, x_187); -x_190 = l_List_reverse___rarg(x_189); -x_191 = l_Lean_Parser_noKind; -x_192 = l_Lean_Parser_Syntax_mkNode(x_191, x_190); -if (lean::is_scalar(x_186)) { - x_193 = lean::alloc_cnstr(1, 1, 0); -} else { - x_193 = x_186; -} -lean::cnstr_set(x_193, 0, x_192); -if (lean::is_scalar(x_184)) { - x_194 = lean::alloc_cnstr(0, 4, 0); -} else { - x_194 = x_184; -} -lean::cnstr_set(x_194, 0, x_181); -lean::cnstr_set(x_194, 1, x_182); -lean::cnstr_set(x_194, 2, x_183); -lean::cnstr_set(x_194, 3, x_193); -if (x_180 == 0) -{ -uint8 x_195; obj* x_196; -x_195 = 0; -x_196 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_196, 0, x_194); -lean::cnstr_set_scalar(x_196, sizeof(void*)*1, x_195); -x_13 = x_196; -x_14 = x_139; -goto block_88; -} -else -{ -uint8 x_197; obj* x_198; -x_197 = 1; -x_198 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_198, 0, x_194); -lean::cnstr_set_scalar(x_198, sizeof(void*)*1, x_197); -x_13 = x_198; -x_14 = x_139; -goto block_88; -} -} -} -} -block_88: -{ -if (lean::obj_tag(x_13) == 0) -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -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_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_13, 1); -x_18 = lean::cnstr_get(x_13, 2); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_2); -lean::inc(x_19); -x_20 = l_List_reverse___rarg(x_19); -x_21 = l_Lean_Parser_noKind; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -lean::inc(x_17); -x_23 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__3(x_1, x_19, x_12, x_4, x_5, x_6, x_17, x_14); -lean::dec(x_12); -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -uint8 x_25; -lean::dec(x_22); -lean::free_heap_obj(x_13); -lean::dec(x_17); -x_25 = !lean::is_exclusive(x_23); -if (x_25 == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_23, 0); -lean::dec(x_26); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_24); -lean::cnstr_set(x_23, 0, x_27); -return x_23; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_23, 1); -lean::inc(x_28); -lean::dec(x_23); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -return x_30; -} -} -else -{ -uint8 x_31; -x_31 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); -if (x_31 == 0) -{ -uint8 x_32; -x_32 = !lean::is_exclusive(x_23); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_33 = lean::cnstr_get(x_23, 0); -lean::dec(x_33); -x_34 = lean::cnstr_get(x_24, 0); -lean::inc(x_34); -lean::dec(x_24); -x_35 = lean::cnstr_get(x_34, 2); -lean::inc(x_35); -lean::dec(x_34); -x_36 = l_mjoin___rarg___closed__1; -x_37 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_37, 0, x_35); -lean::closure_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_13, 2, x_38); -lean::cnstr_set(x_13, 0, x_22); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_13); -lean::cnstr_set(x_23, 0, x_39); -return x_23; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_40 = lean::cnstr_get(x_23, 1); -lean::inc(x_40); -lean::dec(x_23); -x_41 = lean::cnstr_get(x_24, 0); -lean::inc(x_41); -lean::dec(x_24); -x_42 = lean::cnstr_get(x_41, 2); -lean::inc(x_42); -lean::dec(x_41); -x_43 = l_mjoin___rarg___closed__1; -x_44 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_44, 0, x_42); -lean::closure_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_13, 2, x_45); -lean::cnstr_set(x_13, 0, x_22); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_13); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_40); -return x_47; -} -} -else -{ -uint8 x_48; -lean::dec(x_22); -lean::free_heap_obj(x_13); -lean::dec(x_17); -x_48 = !lean::is_exclusive(x_23); -if (x_48 == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_23, 0); -lean::dec(x_49); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_24); -lean::cnstr_set(x_23, 0, x_50); -return x_23; -} -else -{ -obj* x_51; obj* x_52; obj* x_53; -x_51 = lean::cnstr_get(x_23, 1); -lean::inc(x_51); -lean::dec(x_23); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_24); -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_51); -return x_53; -} -} -} -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_54 = lean::cnstr_get(x_13, 0); -x_55 = lean::cnstr_get(x_13, 1); -x_56 = lean::cnstr_get(x_13, 2); -lean::inc(x_56); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_13); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_54); -lean::cnstr_set(x_57, 1, x_2); -lean::inc(x_57); -x_58 = l_List_reverse___rarg(x_57); -x_59 = l_Lean_Parser_noKind; -x_60 = l_Lean_Parser_Syntax_mkNode(x_59, x_58); -lean::inc(x_55); -x_61 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__3(x_1, x_57, x_12, x_4, x_5, x_6, x_55, x_14); -lean::dec(x_12); -x_62 = lean::cnstr_get(x_61, 0); -lean::inc(x_62); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -lean::dec(x_60); -lean::dec(x_55); -x_63 = lean::cnstr_get(x_61, 1); -lean::inc(x_63); -if (lean::is_exclusive(x_61)) { - lean::cnstr_release(x_61, 0); - lean::cnstr_release(x_61, 1); - x_64 = x_61; -} else { - lean::dec_ref(x_61); - x_64 = lean::box(0); -} -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_62); -if (lean::is_scalar(x_64)) { - x_66 = lean::alloc_cnstr(0, 2, 0); -} else { - x_66 = x_64; -} -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_63); -return x_66; -} -else -{ -uint8 x_67; -x_67 = lean::cnstr_get_scalar(x_62, sizeof(void*)*1); -if (x_67 == 0) -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_68 = lean::cnstr_get(x_61, 1); -lean::inc(x_68); -if (lean::is_exclusive(x_61)) { - lean::cnstr_release(x_61, 0); - lean::cnstr_release(x_61, 1); - x_69 = x_61; -} else { - lean::dec_ref(x_61); - x_69 = lean::box(0); -} -x_70 = lean::cnstr_get(x_62, 0); -lean::inc(x_70); -lean::dec(x_62); -x_71 = lean::cnstr_get(x_70, 2); -lean::inc(x_71); -lean::dec(x_70); -x_72 = l_mjoin___rarg___closed__1; -x_73 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_73, 0, x_71); -lean::closure_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_74, 0, x_73); -x_75 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_75, 0, x_60); -lean::cnstr_set(x_75, 1, x_55); -lean::cnstr_set(x_75, 2, x_74); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_75); -if (lean::is_scalar(x_69)) { - x_77 = lean::alloc_cnstr(0, 2, 0); -} else { - x_77 = x_69; -} -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_68); -return x_77; -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; -lean::dec(x_60); -lean::dec(x_55); -x_78 = lean::cnstr_get(x_61, 1); -lean::inc(x_78); -if (lean::is_exclusive(x_61)) { - lean::cnstr_release(x_61, 0); - lean::cnstr_release(x_61, 1); - x_79 = x_61; -} else { - lean::dec_ref(x_61); - x_79 = lean::box(0); -} -x_80 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_62); -if (lean::is_scalar(x_79)) { - x_81 = lean::alloc_cnstr(0, 2, 0); -} else { - x_81 = x_79; -} -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_78); -return x_81; -} -} -} -} -else -{ -uint8 x_82; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_82 = !lean::is_exclusive(x_13); -if (x_82 == 0) -{ -obj* x_83; -x_83 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_83, 0, x_13); -lean::cnstr_set(x_83, 1, x_14); -return x_83; -} -else -{ -obj* x_84; uint8 x_85; obj* x_86; obj* x_87; -x_84 = lean::cnstr_get(x_13, 0); -x_85 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -lean::inc(x_84); -lean::dec(x_13); -x_86 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_86, 0, x_84); -lean::cnstr_set_scalar(x_86, sizeof(void*)*1, x_85); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_14); -return x_87; -} -} -} -} -else -{ -obj* x_199; obj* x_200; obj* x_201; obj* x_202; -lean::dec(x_2); -lean::dec(x_1); -x_199 = lean::box(0); -x_200 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_201 = l_mjoin___rarg___closed__1; -x_202 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_200, x_201, x_199, x_199, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -return x_202; -} -} -} -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* 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; obj* x_11; uint8 x_12; -x_7 = l_String_OldIterator_remaining___main(x_5); -x_8 = lean::box(0); -x_9 = lean::mk_nat_obj(1u); -x_10 = lean::nat_add(x_7, x_9); -lean::dec(x_7); -x_11 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__3(x_1, x_8, x_10, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_10); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_11, 0); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_13); -lean::cnstr_set(x_11, 0, x_15); -return x_11; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = lean::cnstr_get(x_11, 0); -x_17 = lean::cnstr_get(x_11, 1); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_11); -x_18 = l_Lean_Parser_finishCommentBlock___closed__2; -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_16); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_17); -return x_20; -} -} -} -obj* l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_5); -x_7 = l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -lean::dec(x_5); -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -return x_7; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_7, 1); -lean::inc(x_11); -lean::dec(x_7); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -else -{ -uint8 x_13; -x_13 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (x_13 == 0) -{ -uint8 x_14; -x_14 = !lean::is_exclusive(x_7); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_7, 0); -lean::dec(x_15); -x_16 = lean::cnstr_get(x_8, 0); -lean::inc(x_16); -lean::dec(x_8); -x_17 = lean::cnstr_get(x_16, 2); -lean::inc(x_17); -lean::dec(x_16); -x_18 = l_mjoin___rarg___closed__1; -x_19 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_19, 0, x_17); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -x_21 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_5); -lean::cnstr_set(x_22, 2, x_20); -lean::cnstr_set(x_7, 0, x_22); -return x_7; -} -else -{ -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; -x_23 = lean::cnstr_get(x_7, 1); -lean::inc(x_23); -lean::dec(x_7); -x_24 = lean::cnstr_get(x_8, 0); -lean::inc(x_24); -lean::dec(x_8); -x_25 = lean::cnstr_get(x_24, 2); -lean::inc(x_25); -lean::dec(x_24); -x_26 = l_mjoin___rarg___closed__1; -x_27 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_30 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_5); -lean::cnstr_set(x_30, 2, x_28); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_23); -return x_31; -} -} -else -{ -uint8 x_32; -lean::dec(x_5); -x_32 = !lean::is_exclusive(x_7); -if (x_32 == 0) -{ -obj* x_33; -x_33 = lean::cnstr_get(x_7, 0); -lean::dec(x_33); -return x_7; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_7, 1); -lean::inc(x_34); -lean::dec(x_7); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_8); -lean::cnstr_set(x_35, 1, x_34); -return x_35; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_1); -lean::dec(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_5); -lean::dec(x_5); -lean::dec(x_2); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__3___boxed(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_9; -x_9 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_3); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; uint8 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; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -x_2 = 0; -x_3 = lean::box(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_rule_Parser), 5, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_TermParserM_Monad; -x_11 = l_Lean_Parser_TermParserM_MonadExcept; -x_12 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_13 = l_Lean_Parser_TermParserM_Alternative; -x_14 = l_Lean_Parser_command_NotationSpec; -x_15 = l_Lean_Parser_command_NotationSpec_HasView; -x_16 = l_Lean_Parser_Combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); -lean::dec(x_9); -return x_16; -} -} -obj* _init_l_Lean_Parser_command_NotationSpec_Parser___closed__1() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -x_2 = 0; -x_3 = lean::box(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_rule_Parser), 5, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_NotationSpec_Parser(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; -x_6 = l_Lean_Parser_command_NotationSpec; -x_7 = l_Lean_Parser_command_NotationSpec_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_notation() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("notation"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_noKind; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_command_notation_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_31; obj* x_32; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_command_NotationSpec_HasView; -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -x_10 = lean::apply_1(x_9, x_4); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_6); -lean::cnstr_set(x_11, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_52; -x_52 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_12 = x_52; -goto block_30; -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_3, 0); -lean::inc(x_53); -lean::dec(x_3); -x_54 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_31 = x_54; -x_32 = x_53; -goto block_51; -} -} -else -{ -obj* x_55; -x_55 = lean::cnstr_get(x_2, 0); -lean::inc(x_55); -lean::dec(x_2); -if (lean::obj_tag(x_55) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_56; -x_56 = l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -x_12 = x_56; -goto block_30; -} -else -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_3, 0); -lean::inc(x_57); -lean::dec(x_3); -x_58 = l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -x_31 = x_58; -x_32 = x_57; -goto block_51; -} -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_59 = lean::cnstr_get(x_55, 0); -lean::inc(x_59); -lean::dec(x_55); -x_60 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_7); -x_62 = l_Lean_Parser_noKind; -x_63 = l_Lean_Parser_Syntax_mkNode(x_62, x_61); -if (lean::obj_tag(x_3) == 0) -{ -x_12 = x_63; -goto block_30; -} -else -{ -obj* x_64; -x_64 = lean::cnstr_get(x_3, 0); -lean::inc(x_64); -lean::dec(x_3); -x_31 = x_63; -x_32 = x_64; -goto block_51; -} -} -} -block_30: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -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 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = lean::box(3); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_11); -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_16); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_command_notation; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_23 = lean::cnstr_get(x_5, 0); -lean::inc(x_23); -lean::dec(x_5); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_11); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_10); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_16); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_command_notation; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -} -block_51: -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_33 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_7); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_31); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_noKind; -x_37 = l_Lean_Parser_Syntax_mkNode(x_36, x_35); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_38 = lean::box(3); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_11); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_10); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_37); -lean::cnstr_set(x_41, 1, x_40); -x_42 = l_Lean_Parser_command_notation; -x_43 = l_Lean_Parser_Syntax_mkNode(x_42, x_41); -return x_43; -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_44 = lean::cnstr_get(x_5, 0); -lean::inc(x_44); -lean::dec(x_5); -x_45 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_11); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_10); -lean::cnstr_set(x_47, 1, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_37); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_Lean_Parser_command_notation; -x_50 = l_Lean_Parser_Syntax_mkNode(x_49, x_48); -return x_50; -} -} -} -} -obj* _init_l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_9; obj* x_10; -x_9 = lean::box(3); -x_10 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -x_11 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_11; -goto block_8; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_10, 0); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -lean::dec(x_13); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; -lean::free_heap_obj(x_10); -x_15 = lean::box(0); -x_1 = x_15; -goto block_8; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_14, 1); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; -x_17 = lean::cnstr_get(x_14, 0); -lean::inc(x_17); -lean::dec(x_14); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -lean::dec(x_17); -lean::cnstr_set(x_10, 0, x_18); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_10); -x_1 = x_19; -goto block_8; -} -else -{ -obj* x_20; -lean::dec(x_17); -lean::free_heap_obj(x_10); -x_20 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_20; -goto block_8; -} -} -else -{ -obj* x_21; -lean::dec(x_16); -lean::dec(x_14); -lean::free_heap_obj(x_10); -x_21 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_21; -goto block_8; -} -} -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_10, 0); -lean::inc(x_22); -lean::dec(x_10); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -x_24 = lean::box(0); -x_1 = x_24; -goto block_8; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_23, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -lean::dec(x_23); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -lean::dec(x_26); -x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_1 = x_29; -goto block_8; -} -else -{ -obj* x_30; -lean::dec(x_26); -x_30 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_30; -goto block_8; -} -} -else -{ -obj* x_31; -lean::dec(x_25); -lean::dec(x_23); -x_31 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_31; -goto block_8; -} -} -} -} -block_8: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_2 = lean::box(0); -x_3 = l_Lean_Parser_command_NotationSpec_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::box(3); -x_6 = lean::apply_1(x_4, x_5); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_2); -lean::cnstr_set(x_7, 2, x_6); -lean::cnstr_set(x_7, 3, x_2); -lean::cnstr_set(x_7, 4, x_5); -return x_7; -} -} -} -obj* l_Lean_Parser_command_notation_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_66; -x_66 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; -x_67 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__2; -return x_67; -} -else -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -lean::dec(x_66); -x_69 = lean::cnstr_get(x_68, 1); -lean::inc(x_69); -lean::dec(x_68); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -x_70 = lean::box(3); -x_2 = x_69; -x_3 = x_70; -goto block_65; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; -x_71 = lean::cnstr_get(x_69, 0); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -lean::dec(x_69); -x_73 = l_Lean_Parser_Syntax_asNode___main(x_71); -if (lean::obj_tag(x_73) == 0) -{ -if (lean::obj_tag(x_72) == 0) -{ -obj* x_74; -x_74 = lean::box(3); -x_2 = x_72; -x_3 = x_74; -goto block_65; -} -else -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_72, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_72, 1); -lean::inc(x_76); -lean::dec(x_72); -x_2 = x_76; -x_3 = x_75; -goto block_65; -} -} -else -{ -obj* x_77; obj* x_78; obj* x_79; -x_77 = lean::cnstr_get(x_73, 0); -lean::inc(x_77); -lean::dec(x_73); -x_78 = lean::cnstr_get(x_77, 1); -lean::inc(x_78); -lean::dec(x_77); -x_79 = l_List_append___rarg(x_78, x_72); -if (lean::obj_tag(x_79) == 0) -{ -obj* x_80; -x_80 = lean::box(3); -x_2 = x_79; -x_3 = x_80; -goto block_65; -} -else -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_79, 0); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_79, 1); -lean::inc(x_82); -lean::dec(x_79); -x_2 = x_82; -x_3 = x_81; -goto block_65; -} -} -} -} -block_65: -{ -obj* x_4; obj* x_43; -x_43 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_44; -goto block_42; -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_43); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_43, 0); -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -lean::dec(x_46); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -lean::free_heap_obj(x_43); -x_48 = lean::box(0); -x_4 = x_48; -goto block_42; -} -else -{ -obj* x_49; -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; -x_50 = lean::cnstr_get(x_47, 0); -lean::inc(x_50); -lean::dec(x_47); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -lean::dec(x_50); -lean::cnstr_set(x_43, 0, x_51); -x_52 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_52, 0, x_43); -x_4 = x_52; -goto block_42; -} -else -{ -obj* x_53; -lean::dec(x_50); -lean::free_heap_obj(x_43); -x_53 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_53; -goto block_42; -} -} -else -{ -obj* x_54; -lean::dec(x_49); -lean::dec(x_47); -lean::free_heap_obj(x_43); -x_54 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_54; -goto block_42; -} -} -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_43, 0); -lean::inc(x_55); -lean::dec(x_43); -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -lean::dec(x_55); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -x_57 = lean::box(0); -x_4 = x_57; -goto block_42; -} -else -{ -obj* x_58; -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; -x_59 = lean::cnstr_get(x_56, 0); -lean::inc(x_59); -lean::dec(x_56); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; obj* x_61; obj* x_62; -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -lean::dec(x_59); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -x_62 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_62, 0, x_61); -x_4 = x_62; -goto block_42; -} -else -{ -obj* x_63; -lean::dec(x_59); -x_63 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_63; -goto block_42; -} -} -else -{ -obj* x_64; -lean::dec(x_58); -lean::dec(x_56); -x_64 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_64; -goto block_42; -} -} -} -} -block_42: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_39; -x_39 = lean::box(3); -x_5 = x_2; -x_6 = x_39; -goto block_38; -} -else -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_2, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_2, 1); -lean::inc(x_41); -lean::dec(x_2); -x_5 = x_41; -x_6 = x_40; -goto block_38; -} -block_38: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_6, 0); -lean::inc(x_35); -lean::dec(x_6); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_7 = x_36; -goto block_34; -} -else -{ -obj* x_37; -lean::dec(x_6); -x_37 = lean::box(0); -x_7 = x_37; -goto block_34; -} -block_34: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_31; -x_31 = lean::box(3); -x_8 = x_5; -x_9 = x_31; -goto block_30; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_5, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_5, 1); -lean::inc(x_33); -lean::dec(x_5); -x_8 = x_33; -x_9 = x_32; -goto block_30; -} -block_30: -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = l_Lean_Parser_command_NotationSpec_HasView; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_9); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::box(0); -x_14 = lean::box(3); -x_15 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_12); -lean::cnstr_set(x_15, 3, x_13); -lean::cnstr_set(x_15, 4, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_8, 0); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_8, 1); -lean::inc(x_17); -lean::dec(x_8); -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::box(3); -x_21 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_7); -lean::cnstr_set(x_21, 2, x_12); -lean::cnstr_set(x_21, 3, x_19); -lean::cnstr_set(x_21, 4, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_17, 0); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_7); -lean::cnstr_set(x_23, 2, x_12); -lean::cnstr_set(x_23, 3, x_19); -lean::cnstr_set(x_23, 4, x_22); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; -lean::dec(x_16); -x_24 = lean::cnstr_get(x_8, 1); -lean::inc(x_24); -lean::dec(x_8); -x_25 = lean::box(0); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::box(3); -x_27 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_27, 0, x_4); -lean::cnstr_set(x_27, 1, x_7); -lean::cnstr_set(x_27, 2, x_12); -lean::cnstr_set(x_27, 3, x_25); -lean::cnstr_set(x_27, 4, x_26); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_24, 0); -lean::inc(x_28); -lean::dec(x_24); -x_29 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_12); -lean::cnstr_set(x_29, 3, x_25); -lean::cnstr_set(x_29, 4, x_28); -return x_29; -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_notation_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notation_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notation_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_notation_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_notation_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_notation_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_1 = lean::mk_string("local "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = lean::mk_string("notation"); -x_6 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_2); -lean::dec(x_5); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_7); -lean::dec(x_6); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_8); -lean::dec(x_8); -lean::dec(x_4); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = lean::mk_string(":="); -x_13 = l_Lean_Parser_symbol_tokens___rarg(x_12, x_2); -lean::dec(x_12); -x_14 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_7); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_15); -lean::dec(x_15); -lean::dec(x_13); -x_17 = l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens; -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_17, x_16); -lean::dec(x_16); -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_18); -lean::dec(x_18); -lean::dec(x_11); -x_20 = l_Lean_Parser_tokens___rarg(x_19); -lean::dec(x_19); -return x_20; -} -} -obj* _init_l_Lean_Parser_command_notation_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_1 = lean::mk_string("local "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::mk_string("notation"); -x_10 = l_String_trim(x_9); -lean::dec(x_9); -lean::inc(x_10); -x_11 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_4); -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_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::mk_string(":="); -x_18 = l_String_trim(x_17); -lean::dec(x_17); -lean::inc(x_18); -x_19 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_19, 0, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_4); -lean::closure_set(x_20, 2, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_21, 0, x_4); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_13); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_Parser), 5, 0); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_16); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_Lean_Parser_TermParserM_Monad; -x_28 = l_Lean_Parser_TermParserM_MonadExcept; -x_29 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_30 = l_Lean_Parser_TermParserM_Alternative; -x_31 = l_Lean_Parser_command_notation; -x_32 = l_Lean_Parser_command_notation_HasView; -x_33 = l_Lean_Parser_Combinators_node_view___rarg(x_27, x_28, x_29, x_30, x_31, x_26, x_32); -lean::dec(x_26); -return x_33; -} -} -obj* _init_l_Lean_Parser_command_notation_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_1 = lean::mk_string("local "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::mk_string("notation"); -x_10 = l_String_trim(x_9); -lean::dec(x_9); -lean::inc(x_10); -x_11 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_4); -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_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::mk_string(":="); -x_18 = l_String_trim(x_17); -lean::dec(x_17); -lean::inc(x_18); -x_19 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_19, 0, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_4); -lean::closure_set(x_20, 2, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_21, 0, x_4); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_13); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_Parser), 5, 0); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_16); -lean::cnstr_set(x_26, 1, x_25); -return x_26; -} -} -obj* l_Lean_Parser_command_notation_Parser(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; -x_6 = l_Lean_Parser_command_notation; -x_7 = l_Lean_Parser_command_notation_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_reserveNotation() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("reserveNotation"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -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 = l_Lean_Parser_noKind; -x_6 = l_Lean_Parser_Syntax_mkNode(x_5, x_4); -return x_6; -} -} -obj* l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_command_NotationSpec_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_4); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_5); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_command_reserveNotation; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_14 = lean::cnstr_get(x_3, 0); -lean::inc(x_14); -lean::dec(x_3); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_5); -x_17 = lean::box(3); -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 = l_Lean_Parser_noKind; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_9); -x_22 = l_Lean_Parser_command_reserveNotation; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_2, 0); -lean::inc(x_24); -lean::dec(x_2); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_26 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_noKind; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_9); -x_31 = l_Lean_Parser_command_reserveNotation; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -else -{ -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; -x_33 = lean::cnstr_get(x_3, 0); -lean::inc(x_33); -lean::dec(x_3); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_5); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_25); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Parser_noKind; -x_38 = l_Lean_Parser_Syntax_mkNode(x_37, x_36); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_9); -x_40 = l_Lean_Parser_command_reserveNotation; -x_41 = l_Lean_Parser_Syntax_mkNode(x_40, x_39); -return x_41; -} -} -} -} -obj* _init_l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_NotationSpec_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__1; -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_1); -lean::cnstr_set(x_3, 2, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_33; -x_33 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__2; -return x_34; -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -lean::dec(x_33); -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -lean::dec(x_35); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; -x_37 = lean::box(3); -x_2 = x_36; -x_3 = x_37; -goto block_32; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_36, 1); -lean::inc(x_39); -lean::dec(x_36); -x_40 = l_Lean_Parser_Syntax_asNode___main(x_38); -if (lean::obj_tag(x_40) == 0) -{ -if (lean::obj_tag(x_39) == 0) -{ -obj* x_41; -x_41 = lean::box(3); -x_2 = x_39; -x_3 = x_41; -goto block_32; -} -else -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_39, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_39, 1); -lean::inc(x_43); -lean::dec(x_39); -x_2 = x_43; -x_3 = x_42; -goto block_32; -} -} -else -{ -obj* x_44; obj* x_45; obj* x_46; -x_44 = lean::cnstr_get(x_40, 0); -lean::inc(x_44); -lean::dec(x_40); -x_45 = lean::cnstr_get(x_44, 1); -lean::inc(x_45); -lean::dec(x_44); -x_46 = l_List_append___rarg(x_45, x_39); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; -x_47 = lean::box(3); -x_2 = x_46; -x_3 = x_47; -goto block_32; -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_46, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_46, 1); -lean::inc(x_49); -lean::dec(x_46); -x_2 = x_49; -x_3 = x_48; -goto block_32; -} -} -} -} -block_32: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_3, 0); -lean::inc(x_29); -lean::dec(x_3); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_4 = x_30; -goto block_28; -} -else -{ -obj* x_31; -lean::dec(x_3); -x_31 = lean::box(0); -x_4 = x_31; -goto block_28; -} -block_28: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_5 = x_2; -x_6 = x_25; -goto block_24; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_2, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_2, 1); -lean::inc(x_27); -lean::dec(x_2); -x_5 = x_27; -x_6 = x_26; -goto block_24; -} -block_24: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_8); -lean::cnstr_set(x_10, 2, x_9); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -x_12 = l_Lean_Parser_command_NotationSpec_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_8); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -else -{ -obj* x_16; -lean::dec(x_6); -x_16 = lean::box(0); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_17; obj* x_18; -x_17 = l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_16); -lean::cnstr_set(x_18, 2, x_17); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = lean::cnstr_get(x_5, 0); -lean::inc(x_19); -lean::dec(x_5); -x_20 = l_Lean_Parser_command_NotationSpec_HasView; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::apply_1(x_21, x_19); -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_16); -lean::cnstr_set(x_23, 2, x_22); -return x_23; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_reserveNotation_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_reserveNotation_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_reserveNotation_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::mk_string("reserve"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_string("notation"); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens; -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_6); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_12); -lean::dec(x_12); -lean::dec(x_10); -x_14 = l_Lean_Parser_tokens___rarg(x_13); -lean::dec(x_13); -return x_14; -} -} -obj* _init_l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::mk_string("reserve"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("notation"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_Parser), 5, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_10); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_TermParserM_Monad; -x_18 = l_Lean_Parser_TermParserM_MonadExcept; -x_19 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_20 = l_Lean_Parser_TermParserM_Alternative; -x_21 = l_Lean_Parser_command_reserveNotation; -x_22 = l_Lean_Parser_command_reserveNotation_HasView; -x_23 = l_Lean_Parser_Combinators_node_view___rarg(x_17, x_18, x_19, x_20, x_21, x_16, x_22); -lean::dec(x_16); -return x_23; -} -} -obj* _init_l_Lean_Parser_command_reserveNotation_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("reserve"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("notation"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_Parser), 5, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_10); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -obj* l_Lean_Parser_command_reserveNotation_Parser(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; -x_6 = l_Lean_Parser_command_reserveNotation; -x_7 = l_Lean_Parser_command_reserveNotation_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("mixfix"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("kind"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_mixfix_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_mixfix_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__3() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(2u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_mixfix_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__4() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(3u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_mixfix_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__5() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(4u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_command_mixfix_kind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(4u); -x_3 = lean_name_mk_numeral(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__1; -return x_4; -} -else -{ -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_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_mixfix_kind; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -case 1: -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_mixfix_kind; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -case 2: -{ -obj* x_23; -x_23 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -x_24 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__3; -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_2); -x_31 = l_Lean_Parser_command_mixfix_kind; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -case 3: -{ -obj* x_33; -x_33 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__4; -return x_34; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -x_36 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_2); -x_38 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_2); -x_41 = l_Lean_Parser_command_mixfix_kind; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -} -default: -{ -obj* x_43; -x_43 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -x_44 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__5; -return x_44; -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -x_46 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_2); -x_48 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6; -x_49 = l_Lean_Parser_Syntax_mkNode(x_48, x_47); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_2); -x_51 = l_Lean_Parser_command_mixfix_kind; -x_52 = l_Lean_Parser_Syntax_mkNode(x_51, x_50); -return x_52; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__5; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__7() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("mixfix"); -x_9 = lean_name_mk_string(x_7, x_8); -x_10 = lean::mk_string("kind"); -x_11 = lean_name_mk_string(x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__7; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::mk_nat_obj(1u); -x_32 = lean::nat_dec_eq(x_22, x_31); -if (x_32 == 0) -{ -obj* x_33; uint8 x_34; -x_33 = lean::mk_nat_obj(2u); -x_34 = lean::nat_dec_eq(x_22, x_33); -if (x_34 == 0) -{ -obj* x_35; uint8 x_36; -x_35 = lean::mk_nat_obj(3u); -x_36 = lean::nat_dec_eq(x_22, x_35); -lean::dec(x_22); -if (x_36 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_28, 0); -lean::inc(x_37); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_37); -x_38 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_38, 0, x_13); -return x_38; -} -else -{ -obj* x_39; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_39 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_28, 0); -lean::inc(x_40); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_40); -x_41 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_41, 0, x_13); -return x_41; -} -else -{ -obj* x_42; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_42 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__2; -return x_42; -} -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_28, 0); -lean::inc(x_43); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_43); -x_44 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_44, 0, x_13); -return x_44; -} -else -{ -obj* x_45; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_45 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__3; -return x_45; -} -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_28, 0); -lean::inc(x_46); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_46); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_13); -return x_47; -} -else -{ -obj* x_48; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_48 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__4; -return x_48; -} -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_28, 0); -lean::inc(x_49); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_49); -x_50 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_50, 0, x_13); -return x_50; -} -else -{ -obj* x_51; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_51 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__5; -return x_51; -} -} -} -else -{ -obj* x_52; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_52 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_52; -} -} -} -} -} -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_13, 0); -lean::inc(x_53); -lean::dec(x_13); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -switch (lean::obj_tag(x_54)) { -case 0: -{ -obj* x_55; -lean::dec(x_53); -x_55 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_55; -} -case 1: -{ -obj* x_56; -lean::dec(x_54); -lean::dec(x_53); -x_56 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_56; -} -default: -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; uint8 x_61; -x_57 = lean::cnstr_get(x_53, 1); -lean::inc(x_57); -lean::dec(x_53); -x_58 = lean::cnstr_get(x_54, 0); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_54, 1); -lean::inc(x_59); -lean::dec(x_54); -x_60 = lean::box(0); -x_61 = lean_name_dec_eq(x_58, x_60); -lean::dec(x_58); -if (x_61 == 0) -{ -obj* x_62; -lean::dec(x_59); -lean::dec(x_57); -x_62 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_62; -} -else -{ -if (lean::obj_tag(x_57) == 0) -{ -obj* x_63; -lean::dec(x_59); -x_63 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_63; -} -else -{ -obj* x_64; -x_64 = lean::cnstr_get(x_57, 1); -lean::inc(x_64); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; obj* x_66; uint8 x_67; -x_65 = lean::cnstr_get(x_57, 0); -lean::inc(x_65); -lean::dec(x_57); -x_66 = lean::mk_nat_obj(0u); -x_67 = lean::nat_dec_eq(x_59, x_66); -if (x_67 == 0) -{ -obj* x_68; uint8 x_69; -x_68 = lean::mk_nat_obj(1u); -x_69 = lean::nat_dec_eq(x_59, x_68); -if (x_69 == 0) -{ -obj* x_70; uint8 x_71; -x_70 = lean::mk_nat_obj(2u); -x_71 = lean::nat_dec_eq(x_59, x_70); -if (x_71 == 0) -{ -obj* x_72; uint8 x_73; -x_72 = lean::mk_nat_obj(3u); -x_73 = lean::nat_dec_eq(x_59, x_72); -lean::dec(x_59); -if (x_73 == 0) -{ -if (lean::obj_tag(x_65) == 0) -{ -obj* x_74; obj* x_75; obj* x_76; -x_74 = lean::cnstr_get(x_65, 0); -lean::inc(x_74); -lean::dec(x_65); -x_75 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_75, 0, x_74); -x_76 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -return x_76; -} -else -{ -obj* x_77; -lean::dec(x_65); -x_77 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__1; -return x_77; -} -} -else -{ -if (lean::obj_tag(x_65) == 0) -{ -obj* x_78; obj* x_79; obj* x_80; -x_78 = lean::cnstr_get(x_65, 0); -lean::inc(x_78); -lean::dec(x_65); -x_79 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_79, 0, x_78); -x_80 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_80, 0, x_79); -return x_80; -} -else -{ -obj* x_81; -lean::dec(x_65); -x_81 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__2; -return x_81; -} -} -} -else -{ -lean::dec(x_59); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_82; obj* x_83; obj* x_84; -x_82 = lean::cnstr_get(x_65, 0); -lean::inc(x_82); -lean::dec(x_65); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -x_84 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; -} -else -{ -obj* x_85; -lean::dec(x_65); -x_85 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__3; -return x_85; -} -} -} -else -{ -lean::dec(x_59); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_86; obj* x_87; obj* x_88; -x_86 = lean::cnstr_get(x_65, 0); -lean::inc(x_86); -lean::dec(x_65); -x_87 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -x_88 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_88, 0, x_87); -return x_88; -} -else -{ -obj* x_89; -lean::dec(x_65); -x_89 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__4; -return x_89; -} -} -} -else -{ -lean::dec(x_59); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_90; obj* x_91; obj* x_92; -x_90 = lean::cnstr_get(x_65, 0); -lean::inc(x_90); -lean::dec(x_65); -x_91 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_91, 0, x_90); -x_92 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; -} -else -{ -obj* x_93; -lean::dec(x_65); -x_93 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__5; -return x_93; -} -} -} -else -{ -obj* x_94; -lean::dec(x_64); -lean::dec(x_59); -lean::dec(x_57); -x_94 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_94; -} -} -} -} -} -} -} -} -else -{ -obj* x_95; -lean::dec(x_11); -lean::dec(x_6); -x_95 = l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6; -return x_95; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_mixfix_kind_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_1 = lean::mk_string("prefix"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_string("infix"); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = lean::mk_string("infixl"); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_2); -lean::dec(x_6); -x_8 = lean::mk_string("infixr"); -x_9 = l_Lean_Parser_symbol_tokens___rarg(x_8, x_2); -lean::dec(x_8); -x_10 = lean::mk_string("postfix"); -x_11 = l_Lean_Parser_symbol_tokens___rarg(x_10, x_2); -lean::dec(x_10); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_12); -lean::dec(x_11); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_13); -lean::dec(x_13); -lean::dec(x_9); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_14); -lean::dec(x_14); -lean::dec(x_7); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_15); -lean::dec(x_15); -lean::dec(x_5); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_16); -lean::dec(x_16); -lean::dec(x_3); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_18, x_12); -lean::dec(x_18); -x_20 = l_Lean_Parser_tokens___rarg(x_19); -lean::dec(x_19); -return x_20; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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; -x_1 = lean::mk_string("prefix"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("infix"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::mk_string("infixl"); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_4); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::mk_string("infixr"); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::mk_string("postfix"); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_17); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_9); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_5); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_28, 0, x_27); -lean::closure_set(x_28, 1, x_4); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_22); -x_30 = l_Lean_Parser_TermParserM_Monad; -x_31 = l_Lean_Parser_TermParserM_MonadExcept; -x_32 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_33 = l_Lean_Parser_TermParserM_Alternative; -x_34 = l_Lean_Parser_command_mixfix_kind; -x_35 = l_Lean_Parser_command_mixfix_kind_HasView; -x_36 = l_Lean_Parser_Combinators_node_view___rarg(x_30, x_31, x_32, x_33, x_34, x_29, x_35); -lean::dec(x_29); -return x_36; -} -} -obj* _init_l_Lean_Parser_command_mixfix_kind_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_1 = lean::mk_string("prefix"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("infix"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::mk_string("infixl"); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_4); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::mk_string("infixr"); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::mk_string("postfix"); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_17); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_9); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_5); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_28, 0, x_27); -lean::closure_set(x_28, 1, x_4); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_22); -return x_29; -} -} -obj* l_Lean_Parser_command_mixfix_kind_Parser(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; -x_6 = l_Lean_Parser_command_mixfix_kind; -x_7 = l_Lean_Parser_command_mixfix_kind_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_mixfix() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("mixfix"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_mixfix_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -lean::dec(x_1); -x_7 = l_Lean_Parser_command_mixfix_kind_HasView; -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_3); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView; -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_4); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_10); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_34; -x_34 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_16 = x_34; -goto block_33; -} -else -{ -obj* x_35; -x_35 = lean::cnstr_get(x_2, 0); -lean::inc(x_35); -lean::dec(x_2); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -x_36 = l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -x_16 = x_36; -goto block_33; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = lean::cnstr_get(x_35, 0); -lean::inc(x_37); -lean::dec(x_35); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, 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_10); -x_40 = l_Lean_Parser_noKind; -x_41 = l_Lean_Parser_Syntax_mkNode(x_40, x_39); -x_16 = x_41; -goto block_33; -} -} -block_33: -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_11); -x_18 = l_Lean_Parser_noKind; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::box(3); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_15); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_14); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_19); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_Lean_Parser_command_mixfix; -x_25 = l_Lean_Parser_Syntax_mkNode(x_24, x_23); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_26 = lean::cnstr_get(x_5, 0); -lean::inc(x_26); -lean::dec(x_5); -x_27 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_15); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_14); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_19); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_command_mixfix; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -} -} -obj* _init_l_Lean_Parser_command_mixfix_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_12; obj* x_13; -x_12 = lean::box(3); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_14; -goto block_11; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -lean::free_heap_obj(x_13); -x_18 = lean::box(0); -x_1 = x_18; -goto block_11; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 1); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::cnstr_get(x_17, 0); -lean::inc(x_20); -lean::dec(x_17); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -lean::dec(x_20); -lean::cnstr_set(x_13, 0, x_21); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_13); -x_1 = x_22; -goto block_11; -} -else -{ -obj* x_23; -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_23 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_23; -goto block_11; -} -} -else -{ -obj* x_24; -lean::dec(x_19); -lean::dec(x_17); -lean::free_heap_obj(x_13); -x_24 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_24; -goto block_11; -} -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_13, 0); -lean::inc(x_25); -lean::dec(x_13); -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -lean::dec(x_25); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; -x_27 = lean::box(0); -x_1 = x_27; -goto block_11; -} -else -{ -obj* x_28; -x_28 = lean::cnstr_get(x_26, 1); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; -x_29 = lean::cnstr_get(x_26, 0); -lean::inc(x_29); -lean::dec(x_26); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -lean::dec(x_29); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_1 = x_32; -goto block_11; -} -else -{ -obj* x_33; -lean::dec(x_29); -x_33 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_33; -goto block_11; -} -} -else -{ -obj* x_34; -lean::dec(x_28); -lean::dec(x_26); -x_34 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_1 = x_34; -goto block_11; -} -} -} -} -block_11: -{ -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; -x_2 = l_Lean_Parser_command_mixfix_kind_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_4); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_5); -lean::cnstr_set(x_10, 2, x_8); -lean::cnstr_set(x_10, 3, x_9); -lean::cnstr_set(x_10, 4, x_4); -return x_10; -} -} -} -obj* l_Lean_Parser_command_mixfix_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_64; -x_64 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_64) == 0) -{ -obj* x_65; -x_65 = l_Lean_Parser_command_mixfix_HasView_x27___lambda__1___closed__1; -return x_65; -} -else -{ -obj* x_66; obj* x_67; -x_66 = lean::cnstr_get(x_64, 0); -lean::inc(x_66); -lean::dec(x_64); -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -lean::dec(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; -x_68 = lean::box(3); -x_2 = x_67; -x_3 = x_68; -goto block_63; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; -x_69 = lean::cnstr_get(x_67, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_67, 1); -lean::inc(x_70); -lean::dec(x_67); -x_71 = l_Lean_Parser_Syntax_asNode___main(x_69); -if (lean::obj_tag(x_71) == 0) -{ -if (lean::obj_tag(x_70) == 0) -{ -obj* x_72; -x_72 = lean::box(3); -x_2 = x_70; -x_3 = x_72; -goto block_63; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_70, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_70, 1); -lean::inc(x_74); -lean::dec(x_70); -x_2 = x_74; -x_3 = x_73; -goto block_63; -} -} -else -{ -obj* x_75; obj* x_76; obj* x_77; -x_75 = lean::cnstr_get(x_71, 0); -lean::inc(x_75); -lean::dec(x_71); -x_76 = lean::cnstr_get(x_75, 1); -lean::inc(x_76); -lean::dec(x_75); -x_77 = l_List_append___rarg(x_76, x_70); -if (lean::obj_tag(x_77) == 0) -{ -obj* x_78; -x_78 = lean::box(3); -x_2 = x_77; -x_3 = x_78; -goto block_63; -} -else -{ -obj* x_79; obj* x_80; -x_79 = lean::cnstr_get(x_77, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_77, 1); -lean::inc(x_80); -lean::dec(x_77); -x_2 = x_80; -x_3 = x_79; -goto block_63; -} -} -} -} -block_63: -{ -obj* x_4; obj* x_41; -x_41 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; -x_42 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_42; -goto block_40; -} -else -{ -uint8 x_43; -x_43 = !lean::is_exclusive(x_41); -if (x_43 == 0) -{ -obj* x_44; obj* x_45; -x_44 = lean::cnstr_get(x_41, 0); -x_45 = lean::cnstr_get(x_44, 1); -lean::inc(x_45); -lean::dec(x_44); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; -lean::free_heap_obj(x_41); -x_46 = lean::box(0); -x_4 = x_46; -goto block_40; -} -else -{ -obj* x_47; -x_47 = lean::cnstr_get(x_45, 1); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -x_48 = lean::cnstr_get(x_45, 0); -lean::inc(x_48); -lean::dec(x_45); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -lean::dec(x_48); -lean::cnstr_set(x_41, 0, x_49); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_41); -x_4 = x_50; -goto block_40; -} -else -{ -obj* x_51; -lean::dec(x_48); -lean::free_heap_obj(x_41); -x_51 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_51; -goto block_40; -} -} -else -{ -obj* x_52; -lean::dec(x_47); -lean::dec(x_45); -lean::free_heap_obj(x_41); -x_52 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_52; -goto block_40; -} -} -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_41, 0); -lean::inc(x_53); -lean::dec(x_41); -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -lean::dec(x_53); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; -x_55 = lean::box(0); -x_4 = x_55; -goto block_40; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_54, 1); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -x_57 = lean::cnstr_get(x_54, 0); -lean::inc(x_57); -lean::dec(x_54); -if (lean::obj_tag(x_57) == 0) -{ -obj* x_58; obj* x_59; obj* x_60; -x_58 = lean::cnstr_get(x_57, 0); -lean::inc(x_58); -lean::dec(x_57); -x_59 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -x_60 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -x_4 = x_60; -goto block_40; -} -else -{ -obj* x_61; -lean::dec(x_57); -x_61 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_61; -goto block_40; -} -} -else -{ -obj* x_62; -lean::dec(x_56); -lean::dec(x_54); -x_62 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_62; -goto block_40; -} -} -} -} -block_40: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_37; -x_37 = lean::box(3); -x_5 = x_2; -x_6 = x_37; -goto block_36; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_2, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_2, 1); -lean::inc(x_39); -lean::dec(x_2); -x_5 = x_39; -x_6 = x_38; -goto block_36; -} -block_36: -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = l_Lean_Parser_command_mixfix_kind_HasView; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_6); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_33; -x_33 = lean::box(3); -x_10 = x_5; -x_11 = x_33; -goto block_32; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_5, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_5, 1); -lean::inc(x_35); -lean::dec(x_5); -x_10 = x_35; -x_11 = x_34; -goto block_32; -} -block_32: -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::box(0); -x_16 = lean::box(3); -x_17 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_9); -lean::cnstr_set(x_17, 2, x_14); -lean::cnstr_set(x_17, 3, x_15); -lean::cnstr_set(x_17, 4, x_16); -return x_17; -} -else -{ -obj* x_18; -x_18 = lean::cnstr_get(x_10, 0); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_10, 1); -lean::inc(x_19); -lean::dec(x_10); -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_9); -lean::cnstr_set(x_23, 2, x_14); -lean::cnstr_set(x_23, 3, x_21); -lean::cnstr_set(x_23, 4, x_22); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_19, 0); -lean::inc(x_24); -lean::dec(x_19); -x_25 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_9); -lean::cnstr_set(x_25, 2, x_14); -lean::cnstr_set(x_25, 3, x_21); -lean::cnstr_set(x_25, 4, x_24); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; -lean::dec(x_18); -x_26 = lean::cnstr_get(x_10, 1); -lean::inc(x_26); -lean::dec(x_10); -x_27 = lean::box(0); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::box(3); -x_29 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_9); -lean::cnstr_set(x_29, 2, x_14); -lean::cnstr_set(x_29, 3, x_27); -lean::cnstr_set(x_29, 4, x_28); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_26, 0); -lean::inc(x_30); -lean::dec(x_26); -x_31 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_9); -lean::cnstr_set(x_31, 2, x_14); -lean::cnstr_set(x_31, 3, x_27); -lean::cnstr_set(x_31, 4, x_30); -return x_31; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_mixfix_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_mixfix_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_mixfix_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_1 = lean::mk_string("local "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasTokens; -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_7); -lean::dec(x_7); -lean::dec(x_4); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = lean::mk_string(":="); -x_12 = l_Lean_Parser_symbol_tokens___rarg(x_11, x_2); -lean::dec(x_11); -x_13 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_5); -lean::dec(x_13); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_14); -lean::dec(x_14); -lean::dec(x_12); -x_16 = l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasTokens; -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_16, x_15); -lean::dec(x_15); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_17); -lean::dec(x_17); -lean::dec(x_10); -x_19 = l_Lean_Parser_tokens___rarg(x_18); -lean::dec(x_18); -return x_19; -} -} -obj* _init_l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_1 = lean::mk_string("local "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_kind_Parser), 5, 0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(":="); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_18, 0, x_4); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_9); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_mixfixSymbol_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); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_13); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_Lean_Parser_TermParserM_Monad; -x_25 = l_Lean_Parser_TermParserM_MonadExcept; -x_26 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_27 = l_Lean_Parser_TermParserM_Alternative; -x_28 = l_Lean_Parser_command_mixfix; -x_29 = l_Lean_Parser_command_mixfix_HasView; -x_30 = l_Lean_Parser_Combinators_node_view___rarg(x_24, x_25, x_26, x_27, x_28, x_23, x_29); -lean::dec(x_23); -return x_30; -} -} -obj* _init_l_Lean_Parser_command_mixfix_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::mk_string("local "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_kind_Parser), 5, 0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(":="); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_18, 0, x_4); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_9); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_mixfixSymbol_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); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_13); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -obj* l_Lean_Parser_command_mixfix_Parser(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; -x_6 = l_Lean_Parser_command_mixfix; -x_7 = l_Lean_Parser_command_mixfix_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_notationLike() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("notationLike"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_notationLike_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_command_notation_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_command_notationLike; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_command_mixfix_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_command_notationLike; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_notation_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("notationLike"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_notationLike_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_command_mixfix_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_command_notation_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_command_notationLike_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notationLike_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notationLike_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_notationLike_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_notationLike_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_1); -x_4 = l_Lean_Parser_command_notation_Parser_Lean_Parser_HasTokens; -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_3); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_1); -lean::dec(x_6); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notation_Parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_TermParserM_Monad; -x_10 = l_Lean_Parser_TermParserM_MonadExcept; -x_11 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_12 = l_Lean_Parser_TermParserM_Alternative; -x_13 = l_Lean_Parser_command_notationLike; -x_14 = l_Lean_Parser_command_notationLike_HasView; -x_15 = l_Lean_Parser_Combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -lean::dec(x_8); -return x_15; -} -} -obj* _init_l_Lean_Parser_command_notationLike_Parser___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notation_Parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* l_Lean_Parser_command_notationLike_Parser(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; -x_6 = l_Lean_Parser_command_notationLike; -x_7 = l_Lean_Parser_command_notationLike_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("command"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("reserveMixfix"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_command_reserveMixfix_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_command_mixfix_kind_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_4); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_14 = lean::box(3); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_9); -x_16 = l_Lean_Parser_noKind; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_13); -x_19 = l_Lean_Parser_command_reserveMixfix; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_21 = lean::cnstr_get(x_2, 0); -lean::inc(x_21); -lean::dec(x_2); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_9); -x_24 = l_Lean_Parser_noKind; -x_25 = l_Lean_Parser_Syntax_mkNode(x_24, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_13); -x_27 = l_Lean_Parser_command_reserveMixfix; -x_28 = l_Lean_Parser_Syntax_mkNode(x_27, x_26); -return x_28; -} -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_command_mixfix_kind_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_command_mixfix_kind_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_4); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_16; obj* x_17; obj* x_30; -x_30 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; -x_31 = l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__3; -return x_31; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = lean::box(3); -x_16 = x_33; -x_17 = x_34; -goto block_29; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_33, 1); -lean::inc(x_36); -lean::dec(x_33); -x_37 = l_Lean_Parser_Syntax_asNode___main(x_35); -if (lean::obj_tag(x_37) == 0) -{ -if (lean::obj_tag(x_36) == 0) -{ -obj* x_38; -x_38 = lean::box(3); -x_16 = x_36; -x_17 = x_38; -goto block_29; -} -else -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_36, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_36, 1); -lean::inc(x_40); -lean::dec(x_36); -x_16 = x_40; -x_17 = x_39; -goto block_29; -} -} -else -{ -obj* x_41; obj* x_42; obj* x_43; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -lean::dec(x_41); -x_43 = l_List_append___rarg(x_42, x_36); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -x_44 = lean::box(3); -x_16 = x_43; -x_17 = x_44; -goto block_29; -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -lean::dec(x_43); -x_16 = x_46; -x_17 = x_45; -goto block_29; -} -} -} -} -block_15: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_command_mixfix_kind_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_4, 0); -lean::inc(x_10); -lean::dec(x_4); -x_11 = l_Lean_Parser_command_NotationSpec_notationSymbol_HasView; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_10); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_7); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -} -block_29: -{ -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -lean::dec(x_17); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; -x_20 = l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__1; -x_21 = l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_20); -lean::cnstr_set(x_22, 2, x_21); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_16, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_16, 1); -lean::inc(x_24); -lean::dec(x_16); -x_2 = x_19; -x_3 = x_23; -x_4 = x_24; -goto block_15; -} -} -else -{ -lean::dec(x_17); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_25; -x_25 = l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__2; -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_16, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_16, 1); -lean::inc(x_27); -lean::dec(x_16); -x_28 = lean::box(0); -x_2 = x_28; -x_3 = x_26; -x_4 = x_27; -goto block_15; -} -} -} -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_reserveMixfix_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_command_reserveMixfix_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("reserve"); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasTokens; -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_4); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_11); -lean::dec(x_11); -lean::dec(x_9); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -return x_13; -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_1 = lean::mk_string("reserve"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::box(0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_kind_Parser), 5, 0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser), 5, 0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_6); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Parser_TermParserM_Monad; -x_15 = l_Lean_Parser_TermParserM_MonadExcept; -x_16 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_17 = l_Lean_Parser_TermParserM_Alternative; -x_18 = l_Lean_Parser_command_reserveMixfix; -x_19 = l_Lean_Parser_command_reserveMixfix_HasView; -x_20 = l_Lean_Parser_Combinators_node_view___rarg(x_14, x_15, x_16, x_17, x_18, x_13, x_19); -lean::dec(x_13); -return x_20; -} -} -obj* _init_l_Lean_Parser_command_reserveMixfix_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("reserve"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::box(0); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_mixfix_kind_Parser), 5, 0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser), 5, 0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_6); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -obj* l_Lean_Parser_command_reserveMixfix_Parser(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; -x_6 = l_Lean_Parser_command_reserveMixfix; -x_7 = l_Lean_Parser_command_reserveMixfix_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* initialize_init_lean_parser_token(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_notation(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_token(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___closed__1 = _init_l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens___closed__1); -l_Lean_Parser_Term_Parser_Lean_Parser_HasView___closed__1 = _init_l_Lean_Parser_Term_Parser_Lean_Parser_HasView___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_Parser_Lean_Parser_HasView___closed__1); -l_Lean_Parser_Term_Parser___closed__1 = _init_l_Lean_Parser_Term_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_precedenceLit = _init_l_Lean_Parser_command_NotationSpec_precedenceLit(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceLit); -l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceLit_HasView_x27); -l_Lean_Parser_command_NotationSpec_precedenceLit_HasView = _init_l_Lean_Parser_command_NotationSpec_precedenceLit_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceLit_HasView); -l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_precedenceLit_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedenceLit_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceLit_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView_x27); -l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView = _init_l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffsetOp_HasView); -l_Lean_Parser_command_NotationSpec_precedenceOffset = _init_l_Lean_Parser_command_NotationSpec_precedenceOffset(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffset); -l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView_x27); -l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView = _init_l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceOffset_HasView); -l_Lean_Parser_command_NotationSpec_precedenceTerm = _init_l_Lean_Parser_command_NotationSpec_precedenceTerm(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceTerm); -l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView_x27); -l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView = _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceTerm_HasView); -l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedenceTerm_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_precedence = _init_l_Lean_Parser_command_NotationSpec_precedence(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence); -l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_NotationSpec_precedence_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_precedence_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence_HasView_x27); -l_Lean_Parser_command_NotationSpec_precedence_HasView = _init_l_Lean_Parser_command_NotationSpec_precedence_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence_HasView); -l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_precedence_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_precedence_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_precedence_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_quotedSymbol_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_symbolQuote = _init_l_Lean_Parser_command_NotationSpec_symbolQuote(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote); -l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_HasView_x27); -l_Lean_Parser_command_NotationSpec_symbolQuote_HasView = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_HasView); -l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_symbolQuote_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_symbolQuote_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_symbolQuote_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_unquotedSymbol_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_unquotedSymbol_tokens = _init_l_Lean_Parser_command_NotationSpec_unquotedSymbol_tokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_unquotedSymbol_tokens); -l_Lean_Parser_command_NotationSpec_unquotedSymbol_View = _init_l_Lean_Parser_command_NotationSpec_unquotedSymbol_View(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_unquotedSymbol_View); -l_Lean_Parser_command_NotationSpec_notationSymbol = _init_l_Lean_Parser_command_NotationSpec_notationSymbol(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_notationSymbol); -l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_notationSymbol_HasView_x27); -l_Lean_Parser_command_NotationSpec_notationSymbol_HasView = _init_l_Lean_Parser_command_NotationSpec_notationSymbol_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_notationSymbol_HasView); -l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_notationSymbol_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_notationSymbol_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_notationSymbol_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_mixfixSymbol = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView_x27); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_HasView); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_mixfixSymbol_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_foldActionFolder = _init_l_Lean_Parser_command_NotationSpec_foldActionFolder(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldActionFolder); -l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView_x27); -l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView = _init_l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldActionFolder_HasView); -l_Lean_Parser_command_NotationSpec_foldAction = _init_l_Lean_Parser_command_NotationSpec_foldAction(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldAction); -l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldAction_HasView_x27); -l_Lean_Parser_command_NotationSpec_foldAction_HasView = _init_l_Lean_Parser_command_NotationSpec_foldAction_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldAction_HasView); -l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1 = _init_l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1); -l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_foldAction_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_foldAction_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_foldAction_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_scopedAction = _init_l_Lean_Parser_command_NotationSpec_scopedAction(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_scopedAction); -l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_scopedAction_HasView_x27); -l_Lean_Parser_command_NotationSpec_scopedAction_HasView = _init_l_Lean_Parser_command_NotationSpec_scopedAction_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_scopedAction_HasView); -l_Lean_Parser_command_NotationSpec_actionKind = _init_l_Lean_Parser_command_NotationSpec_actionKind(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_actionKind); -l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_actionKind_HasView_x27); -l_Lean_Parser_command_NotationSpec_actionKind_HasView = _init_l_Lean_Parser_command_NotationSpec_actionKind_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_actionKind_HasView); -l_Lean_Parser_command_NotationSpec_action = _init_l_Lean_Parser_command_NotationSpec_action(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action); -l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_NotationSpec_action_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_action_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action_HasView_x27); -l_Lean_Parser_command_NotationSpec_action_HasView = _init_l_Lean_Parser_command_NotationSpec_action_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action_HasView); -l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_action_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_action_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_action_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_binder = _init_l_Lean_Parser_command_NotationSpec_binder(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_binder); -l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_binder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_binder_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_binder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_binder_HasView_x27); -l_Lean_Parser_command_NotationSpec_binder_HasView = _init_l_Lean_Parser_command_NotationSpec_binder_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_binder_HasView); -l_Lean_Parser_command_NotationSpec_binders = _init_l_Lean_Parser_command_NotationSpec_binders(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_binders); -l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_binders_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_binders_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_binders_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_binders_HasView_x27); -l_Lean_Parser_command_NotationSpec_binders_HasView = _init_l_Lean_Parser_command_NotationSpec_binders_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_binders_HasView); -l_Lean_Parser_command_NotationSpec_argument = _init_l_Lean_Parser_command_NotationSpec_argument(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_argument); -l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_argument_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_command_NotationSpec_argument_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_argument_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_argument_HasView_x27); -l_Lean_Parser_command_NotationSpec_argument_HasView = _init_l_Lean_Parser_command_NotationSpec_argument_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_argument_HasView); -l_Lean_Parser_command_NotationSpec_transition = _init_l_Lean_Parser_command_NotationSpec_transition(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_transition); -l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_transition_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_transition_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_transition_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_transition_HasView_x27); -l_Lean_Parser_command_NotationSpec_transition_HasView = _init_l_Lean_Parser_command_NotationSpec_transition_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_transition_HasView); -l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_transition_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_transition_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_transition_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_transition_Parser___closed__1); -l_Lean_Parser_command_NotationSpec_rule = _init_l_Lean_Parser_command_NotationSpec_rule(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_rule); -l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_rule_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_rule_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_rule_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_rule_HasView_x27); -l_Lean_Parser_command_NotationSpec_rule_HasView = _init_l_Lean_Parser_command_NotationSpec_rule_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_rule_HasView); -l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_rule_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_rule_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_rule_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_rule_Parser___closed__1); -l_Lean_Parser_command_NotationSpec = _init_l_Lean_Parser_command_NotationSpec(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec); -l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__6 = _init_l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView_x27___lambda__1___closed__6); -l_Lean_Parser_command_NotationSpec_HasView_x27 = _init_l_Lean_Parser_command_NotationSpec_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView_x27); -l_Lean_Parser_command_NotationSpec_HasView = _init_l_Lean_Parser_command_NotationSpec_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_HasView); -l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_NotationSpec_Parser___closed__1 = _init_l_Lean_Parser_command_NotationSpec_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_NotationSpec_Parser___closed__1); -l_Lean_Parser_command_notation = _init_l_Lean_Parser_command_notation(); -lean::mark_persistent(l_Lean_Parser_command_notation); -l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_notation_HasView_x27 = _init_l_Lean_Parser_command_notation_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_notation_HasView_x27); -l_Lean_Parser_command_notation_HasView = _init_l_Lean_Parser_command_notation_HasView(); -lean::mark_persistent(l_Lean_Parser_command_notation_HasView); -l_Lean_Parser_command_notation_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_notation_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_notation_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_notation_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_notation_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_notation_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_notation_Parser___closed__1 = _init_l_Lean_Parser_command_notation_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_notation_Parser___closed__1); -l_Lean_Parser_command_reserveNotation = _init_l_Lean_Parser_command_reserveNotation(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation); -l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_reserveNotation_HasView_x27 = _init_l_Lean_Parser_command_reserveNotation_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation_HasView_x27); -l_Lean_Parser_command_reserveNotation_HasView = _init_l_Lean_Parser_command_reserveNotation_HasView(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation_HasView); -l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_reserveNotation_Parser___closed__1 = _init_l_Lean_Parser_command_reserveNotation_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_reserveNotation_Parser___closed__1); -l_Lean_Parser_command_mixfix_kind = _init_l_Lean_Parser_command_mixfix_kind(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind); -l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__3 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__3); -l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__4 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__4); -l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__5 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__5); -l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6); -l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__6); -l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__7 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__7(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27___lambda__1___closed__7); -l_Lean_Parser_command_mixfix_kind_HasView_x27 = _init_l_Lean_Parser_command_mixfix_kind_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView_x27); -l_Lean_Parser_command_mixfix_kind_HasView = _init_l_Lean_Parser_command_mixfix_kind_HasView(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_HasView); -l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_mixfix_kind_Parser___closed__1 = _init_l_Lean_Parser_command_mixfix_kind_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_kind_Parser___closed__1); -l_Lean_Parser_command_mixfix = _init_l_Lean_Parser_command_mixfix(); -lean::mark_persistent(l_Lean_Parser_command_mixfix); -l_Lean_Parser_command_mixfix_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_mixfix_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_mixfix_HasView_x27 = _init_l_Lean_Parser_command_mixfix_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_HasView_x27); -l_Lean_Parser_command_mixfix_HasView = _init_l_Lean_Parser_command_mixfix_HasView(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_HasView); -l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_mixfix_Parser___closed__1 = _init_l_Lean_Parser_command_mixfix_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_mixfix_Parser___closed__1); -l_Lean_Parser_command_notationLike = _init_l_Lean_Parser_command_notationLike(); -lean::mark_persistent(l_Lean_Parser_command_notationLike); -l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_notationLike_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_notationLike_HasView_x27 = _init_l_Lean_Parser_command_notationLike_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_notationLike_HasView_x27); -l_Lean_Parser_command_notationLike_HasView = _init_l_Lean_Parser_command_notationLike_HasView(); -lean::mark_persistent(l_Lean_Parser_command_notationLike_HasView); -l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_notationLike_Parser___closed__1 = _init_l_Lean_Parser_command_notationLike_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_notationLike_Parser___closed__1); -l_Lean_Parser_command_reserveMixfix = _init_l_Lean_Parser_command_reserveMixfix(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix); -l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_command_reserveMixfix_HasView_x27 = _init_l_Lean_Parser_command_reserveMixfix_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix_HasView_x27); -l_Lean_Parser_command_reserveMixfix_HasView = _init_l_Lean_Parser_command_reserveMixfix_HasView(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix_HasView); -l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix_Parser_Lean_Parser_HasView); -l_Lean_Parser_command_reserveMixfix_Parser___closed__1 = _init_l_Lean_Parser_command_reserveMixfix_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_command_reserveMixfix_Parser___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/parsec.cpp b/src/stage0/init/lean/parser/parsec.cpp deleted file mode 100644 index 544b1f6955..0000000000 --- a/src/stage0/init/lean/parser/parsec.cpp +++ /dev/null @@ -1,11101 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.parsec -// Imports: init.data.tostring init.data.string.basic init.data.list.basic init.control.except init.data.repr init.lean.name init.data.dlist init.control.monadfail init.control.combinators init.lean.format -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_MonadParsec_foldlAux___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBySat___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_Message_toString___rarg___closed__3; -uint8 l_List_hasDecEq___main___at_Lean_Parser_Parsec_Message_text___spec__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many_x27___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_HasMonadLift(obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_4__mkStringResult___rarg(obj*, obj*); -extern obj* l_ExceptT_lift___rarg___closed__1; -obj* l_Lean_Parser_ParsecT_labels___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__5(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___main(obj*); -obj* l_Lean_Parser_Lean_Parser_MonadParsec(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___main___boxed(obj*); -obj* l___private_init_lean_parser_parsec_4__mkStringResult(obj*); -obj* l_Lean_Parser_monadParsecTrans___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ensure___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBy___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldrAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil___spec__2___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_runFrom___boxed(obj*); -obj* l_Lean_Parser_ParsecT_run___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithEoi___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_pure(obj*); -obj* l_Lean_Parser_MonadParsec_cond___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldr___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main(obj*); -obj* l_Lean_Parser_ParsecT_bind___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parse(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__4(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___rarg___lambda__1(obj*, obj*, obj*); -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_str___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_failure___boxed(obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_upper___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_orelse___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__11(obj*, obj*, obj*, obj*, obj*, obj*); -namespace lean { -obj* string_utf8_prev(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBy(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldl___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__5(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_pos___rarg___lambda__1(obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___lambda__1(obj*); -uint8 l_String_isEmpty(obj*); -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_take___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_hasNext___main___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_labels___rarg(obj*, obj*, obj*, obj*); -obj* l_String_intercalate(obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_lookahead___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_hidden___boxed(obj*, obj*, obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__3___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeUntil1___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithEoi___rarg___lambda__2(obj*, obj*, obj*); -obj* l_String_OldIterator_remainingBytes___main(obj*); -obj* l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1; -obj* l_String_OldIterator_prevn(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldrAux___main___rarg(obj*, obj*, obj*, obj*, obj*); -uint8 l_Char_isLower(uint32); -obj* l_Lean_Parser_MonadParsec_eoiError(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__6(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2___rarg(obj*, uint8, obj*); -obj* l_Lean_Parser_MonadParsec_any(obj*, obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_labels___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_labelsMkRes(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_String_oldLineColumn(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldrAux___main___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_eps___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Alternative___boxed(obj*); -obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2(obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_HasLift(obj*); -obj* l_Lean_Parser_MonadParsec_lookahead___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_SepBy___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch(obj*, obj*); -obj* l___private_init_lean_parser_parsec_3__takeAux(obj*); -obj* l_Lean_Parser_MonadParsec_fix___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Lean_Parser_MonadParsec___boxed(obj*, obj*); -obj* l_String_OldIterator_remainingToString___main(obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_SepBy___boxed(obj*, obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ensure(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_leftOver___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_HasMonadLift___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -uint8 l_Char_isAlpha(uint32); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___rarg___lambda__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_fixAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__1(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeUntil___boxed(obj*, obj*); -obj* l_Function_comp___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj*, obj*); -uint32 l_String_OldIterator_curr___main(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_bind___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_try___rarg(obj*, obj*, obj*); -obj* l_String_OldIterator_nextn(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBySat___rarg(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_any___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_strCore___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___rarg___lambda__1(obj*, uint32, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_num___rarg___closed__1; -obj* l_Lean_Parser_Parsec_Message_toString___rarg(obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_pure___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_error___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_unexpected___rarg(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_1__oldLineColumnAux___main(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___rarg(obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux(obj*); -obj* l_Lean_Parser_MonadParsec_try___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_lower(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithEoi___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__6(obj*, obj*, obj*, obj*); -obj* l_id___rarg___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux(obj*, obj*); -obj* l_String_OldIterator_remaining___main(obj*); -obj* l_Lean_Parser_MonadParsec_upper___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_digit___rarg___lambda__1(obj*, obj*, obj*); -obj* l_String_OldIterator_forward___main(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__3(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__2; -obj* l_Lean_Parser_MonadParsec_digit___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_try___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_satisfy___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldrAux(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_curr___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_unexpectedAt(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_observing___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_strCore___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeUntil___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Alternative(obj*); -obj* l_Lean_Parser_MonadParsec_hidden___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_try___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_Message_text___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_eoi(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1(obj*, obj*); -uint8 l_String_OldIterator_hasPrev___main(obj*); -obj* l_String_OldIterator_hasNext___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_fixAux___main___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_unexpected(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_fix___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_pos(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_cond___rarg___lambda__1(obj*, obj*, uint8); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3(obj*); -obj* l_Lean_Parser_monadParsecTrans___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_digit___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_eoi___rarg(obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ensure___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1_x27(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__9(obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_remainingBytes___main___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___boxed(obj*); -obj* l_String_OldIterator_nextn___main(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_lexeme___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_lookahead(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldl___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldrAux___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Lean_Parser_MonadParsec___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___boxed(obj*, obj*); -namespace lean { -obj* string_push(obj*, uint32); -} -obj* l_Lean_Parser_MonadParsec_error___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_expect___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_lookahead___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldr___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_fixAux___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_lookahead___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Lean_Parser_MonadParsec___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_monadParsecTrans(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_parse(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error(obj*, obj*, obj*); -obj* l_String_OldIterator_prev___main(obj*); -obj* l_Lean_Parser_ParsecT_Alternative___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Nat_repr(obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeUntil1___boxed(obj*, obj*); -obj* l_String_OldIterator_isPrefixOfRemaining___boxed(obj*, obj*); -obj* l_String_OldIterator_remainingToString___main___boxed(obj*); -obj* l_Lean_Parser_ParsecT_bind_x27___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__4(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_try(obj*); -obj* l_Lean_Parser_MonadParsec_lower___rarg(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__7(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_unexpectedAt___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_observing(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_fixAux___main___rarg___closed__1; -obj* l_Lean_Parser_Parsec_parse___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBySat(obj*, obj*); -obj* l___private_init_lean_parser_parsec_2__strAux___main(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_hidden___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_curr___main___boxed(obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2(obj*, obj*); -uint8 l_String_OldIterator_isPrefixOfRemaining___main(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1_x27___boxed(obj*, obj*); -obj* l_String_OldIterator_setCurr___main___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithLeftOver(obj*, obj*); -obj* l_Lean_Parser_Parsec_Message_text(obj*); -obj* l_Lean_Parser_ParsecT_eps___boxed(obj*); -obj* l_Lean_Parser_ParsecT_run___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__2(obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_MonadParsec_num___boxed(obj*, obj*); -obj* l_String_OldIterator_next(obj*); -obj* l_Lean_Parser_MonadParsec_ch(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_lower___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many_x27___boxed(obj*, obj*); -obj* l_String_OldIterator_toString___main___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_satisfy___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_bind_x27___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_cond___rarg___lambda__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_fixAux___main___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_remaining___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_upper___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_lookahead___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_fixAux(obj*, obj*); -obj* l_Lean_Parser_ParsecT_expect(obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_Lean_Parser_ParsecT_run___boxed(obj*); -obj* l_Lean_Parser_ParsecT_MonadFail___rarg(obj*, obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__3(obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_next___main(obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg(obj*, obj*); -obj* l_String_OldIterator_remainingToString___boxed(obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__2(obj*, uint8, obj*); -extern obj* l_List_reprAux___main___rarg___closed__1; -obj* l_Lean_Parser_ParsecT_failure___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_pos___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_bind(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_label___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_bind_x27___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_sepBy1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_any___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_SepBy(obj*, obj*); -namespace lean { -uint8 nat_dec_lt(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_lexeme(obj*, obj*); -obj* l_String_OldIterator_remainingBytes___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_fix___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__11(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_labels(obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBySat___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___boxed(obj*, obj*); -obj* l_String_OldIterator_toString___boxed(obj*); -extern obj* l_Char_HasRepr___closed__1; -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main(obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_Message_toString___rarg___closed__2; -obj* l_Lean_Parser_ParsecT_try___boxed(obj*); -uint8 l_Char_isUpper(uint32); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__14(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_toString(obj*); -obj* l_Lean_Parser_Parsec_Result_mkEps___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_labels___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_append___rarg(obj*, obj*); -obj* l_Lean_Parser_ParsecT_HasMonadLift___rarg___lambda__1(obj*, obj*, obj*); -obj* l_String_toNat___boxed(obj*); -obj* l_String_OldIterator_toEnd___main(obj*); -obj* l_String_OldIterator_remainingToString(obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Char_quoteCore(uint32); -obj* l_Lean_Parser_MonadParsec_satisfy(obj*, obj*); -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj*, obj*); -uint8 l_String_OldIterator_hasNext___main(obj*); -obj* l_Lean_Parser_ParsecT_labels___boxed(obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___rarg(obj*, obj*, uint8, obj*); -obj* l_Lean_Parser_MonadParsec_num(obj*, obj*); -obj* l_Lean_Parser_ParsecT_merge(obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l___private_init_lean_parser_parsec_2__strAux(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_runFrom___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_num___spec__3___rarg(obj*, obj*, obj*); -obj* l_String_OldIterator_remaining___main___boxed(obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27(obj*); -obj* l_Lean_Parser_MonadParsec_upper(obj*, obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_Parsec_Message_toString(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_label(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg___lambda__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_unexpectedAt___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_alpha(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeUntil___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_run(obj*); -obj* l_ExceptT_Monad___rarg___lambda__8___boxed(obj*, obj*); -obj* l_String_OldIterator_remaining___boxed(obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__3(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj*); -obj* l_Lean_Parser_ParsecT_runFrom___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_1__oldLineColumnAux(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_whitespace___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Parsec_Message_text___rarg(obj*); -obj* l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(uint8, obj*); -obj* l_Lean_Parser_MonadParsec_lower___boxed(obj*, obj*); -uint8 l_String_OldIterator_isPrefixOfRemaining(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__8(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_pure___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_fixAux___main(obj*, obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27(obj*); -obj* l_Lean_Parser_MonadParsec_try___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_error___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__3(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_fix(obj*, obj*); -namespace lean { -uint32 string_utf8_get(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_leftOver(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_remaining___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_whitespace___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldr___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_runFrom(obj*); -obj* l_String_OldIterator_toString___main(obj*); -namespace lean { -uint8 string_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_alpha___rarg(obj*, obj*); -obj* l_Lean_Parser_ParsecT_orelse___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_lexeme___rarg(obj*, obj*, obj*, obj*); -uint8 l_UInt32_decEq(uint32, uint32); -obj* l_Lean_Parser_Parsec_HasToString(obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2(obj*); -obj* l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1(obj*, uint32, obj*); -obj* l_Lean_Parser_Parsec_expected_toString(obj*); -obj* l_Lean_Parser_MonadParsec_foldrAux___main(obj*, obj*, obj*); -obj* l_String_OldIterator_hasPrev___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1(obj*, obj*); -obj* l_DList_toList___main___rarg(obj*); -obj* l_Lean_Parser_ParsecT_Monad(obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg(obj*, obj*, obj*); -obj* l_String_OldIterator_toEnd(obj*); -obj* l_Lean_Parser_MonadParsec_many_x27(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_cond(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_try___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_alpha___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___boxed(obj*); -uint8 l_String_OldIterator_hasPrev(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldl___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_cond___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_curr___rarg___closed__1; -uint8 l_Char_isDigit(uint32); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil___spec__2(obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main(obj*); -obj* l_Lean_Parser_MonadParsec_ch___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_curr___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_any___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_bind___boxed(obj*); -obj* l_Lean_Parser_ParsecT_Alternative___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1(obj*, obj*); -obj* l_Lean_Parser_monadParsecTrans___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeUntil(obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithEoi(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1_x27___boxed(obj*, obj*); -obj* l_String_OldIterator_setCurr___main(obj*, uint32); -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil1___spec__3___rarg(obj*, obj*, obj*, obj*); -obj* l_List_hasDecEq___main___at_Lean_Parser_Parsec_Message_text___spec__1___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__1___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_sepBy1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldr___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Lean_Parser_MonadParsec___rarg(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead(obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__9(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj*, obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___rarg(obj*, obj*, uint8, obj*); -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__4(obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_expected_toString___main(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__4(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1; -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__7(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_num___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_try(obj*, obj*, obj*); -obj* l_String_OldIterator_prevn___main(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1_x27(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1_x27___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeUntil1(obj*, obj*); -obj* l_Lean_Parser_Parsec_Result_mkEps(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_whitespace___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_leftOver___rarg___lambda__1(obj*); -obj* l_Lean_Parser_ParsecT_eps(obj*); -obj* l___private_init_lean_parser_parsec_6__mkConsumedResult(obj*); -obj* l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -obj* l_Lean_Parser_Parsec_Message_toString___rarg___closed__1; -obj* l_Lean_Parser_monadParsecTrans___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_labels(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_labels___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__10(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__10(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__13(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_fixAux___boxed(obj*, obj*); -obj* l_Lean_Parser_Parsec_expected_toString___main___closed__1; -obj* l_Lean_Parser_MonadParsec_digit(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_eoi___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___rarg___lambda__1(obj*, obj*, uint32); -obj* l_Lean_Parser_ParsecT_parseWithEoi___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBySat___boxed(obj*, obj*); -uint8 l_Char_isWhitespace(uint32); -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1(obj*); -obj* l_Lean_Parser_MonadParsec_fix___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_bindMkRes(obj*, obj*); -uint32 l_String_OldIterator_curr(obj*); -obj* l_String_OldIterator_remaining(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__2(obj*, obj*, obj*, uint32); -obj* l_Lean_Parser_Parsec_Message_text___rarg___closed__3; -obj* l_Lean_Parser_MonadParsec_strCore(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg(obj*, obj*); -obj* l_String_OldIterator_isPrefixOfRemaining___main___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_remainingBytes(obj*); -obj* l_Lean_Parser_MonadParsec_strCore___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_curr(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_pos___rarg___closed__1; -obj* l_String_OldIterator_setCurr___boxed(obj*, obj*); -obj* l_String_OldIterator_prev(obj*); -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__12(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_curr___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_leftOver___rarg(obj*); -obj* l_String_OldIterator_extract___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__3(obj*, obj*); -namespace lean { -obj* string_utf8_next(obj*, obj*); -} -obj* l_Lean_Parser_ParsecT_bind_x27(obj*); -extern uint8 l_True_Decidable; -obj* l_Lean_Parser_ParsecT_parse___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Alternative___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_tryMkRes(obj*, obj*); -obj* l_String_OldIterator_hasPrev___main___boxed(obj*); -obj* l_Lean_Parser_monadParsecTrans___rarg___lambda__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__3(obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_Message_text___rarg___closed__2; -obj* l_Lean_Parser_MonadParsec_foldrAux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldl___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_hidden___rarg___closed__1; -namespace lean { -uint8 nat_dec_le(obj*, obj*); -} -namespace lean { -obj* string_utf8_extract(obj*, obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_whitespace(obj*, obj*); -obj* l_Lean_Parser_Parsec_parse___rarg___boxed(obj*, obj*, obj*); -extern obj* l_List_mmap___main___rarg___closed__1; -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_num___spec__3(obj*); -obj* l_Lean_Parser_MonadParsec_foldl(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_sepBy1___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_parse___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_hidden___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_observing___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_fixAux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg(obj*); -obj* l_Lean_Parser_MonadParsec_observing___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -namespace lean { -obj* string_utf8_byte_size(obj*); -} -obj* l_Lean_Parser_MonadParsec_fix___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_3__takeAux___main___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_pos___rarg___lambda__1___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___rarg___lambda__1___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil1___spec__3(obj*); -obj* l_Lean_Parser_MonadParsec_eoiError___rarg(obj*); -obj* l_String_OldIterator_extract___main(obj*, obj*); -obj* l_Lean_Parser_ParsecT_try___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parse___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_str___boxed(obj*, obj*); -obj* l_String_quote(obj*); -obj* l_String_OldIterator_extract___main___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_observing___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_String_OldIterator_extract(obj*, obj*); -obj* l_Lean_Parser_ParsecT_MonadFail(obj*); -obj* l_Lean_Parser_MonadParsec_foldr(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_orelse(obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___boxed(obj*, obj*); -obj* l_String_OldIterator_setCurr(obj*, uint32); -obj* l_Lean_Parser_ParsecT_merge___rarg(obj*, obj*); -uint8 l_String_OldIterator_hasNext(obj*); -obj* l___private_init_lean_parser_parsec_3__takeAux___rarg(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_failure___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_hidden(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_label___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_alpha___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_remaining(obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_List_zip___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27(obj*, obj*, obj*, obj*, obj*); -extern obj* l_IO_println___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhile1_x27___rarg(obj*, obj*, obj*); -obj* l_String_mkOldIterator(obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_orelseMkRes(obj*, obj*); -obj* l_Lean_Parser_ParsecT_orelse___rarg___lambda__1(obj*, obj*, obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__8(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_parseWithEoi___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_take(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_take___boxed(obj*, obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Parsec_HasToString___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhile1___boxed(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg(obj*, obj*); -obj* l_String_OldIterator_forward(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_pos___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_str(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___rarg(obj*, obj*, uint32); -obj* l_Lean_Parser_ParsecT_MonadFail___rarg___closed__1; -extern obj* l_String_lineColumn___closed__1; -obj* l_Lean_Parser_ParsecT_HasMonadLift___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_ParsecT_MonadExcept(obj*); -obj* l_Lean_Parser_MonadParsec_unexpected___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___rarg(obj*, obj*); -obj* l___private_init_lean_parser_parsec_3__takeAux___main(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___boxed(obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___rarg(obj*, obj*); -obj* l_Lean_Parser_ParsecT_orelse___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldrAux___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux(obj*, obj*); -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg___lambda__1(obj*, obj*, uint32); -extern obj* l_String_splitAux___main___closed__1; -namespace lean { -obj* string_utf8_set(obj*, obj*, uint32); -} -obj* l_Lean_Parser_MonadParsec_hidden___rarg___lambda__1(obj*, obj*); -namespace lean { -obj* string_length(obj*); -} -obj* l_Lean_Parser_ParsecT_failure(obj*); -obj* l_String_mkOldIterator(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = lean::mk_nat_obj(0u); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -lean::cnstr_set(x_3, 2, x_2); -return x_3; -} -} -obj* l_String_OldIterator_remaining___main(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::string_length(x_2); -x_5 = lean::nat_sub(x_4, x_3); -lean::dec(x_4); -return x_5; -} -} -obj* l_String_OldIterator_remaining___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remaining___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_String_OldIterator_remaining(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remaining___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_remaining___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remaining(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_String_OldIterator_toString___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* l_String_OldIterator_toString___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_toString___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_String_OldIterator_toString(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_toString___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_toString___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_toString(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_String_OldIterator_remainingBytes___main(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 2); -x_4 = lean::string_utf8_byte_size(x_2); -x_5 = lean::nat_sub(x_4, x_3); -lean::dec(x_4); -return x_5; -} -} -obj* l_String_OldIterator_remainingBytes___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remainingBytes___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_String_OldIterator_remainingBytes(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remainingBytes___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_remainingBytes___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remainingBytes(x_1); -lean::dec(x_1); -return x_2; -} -} -uint32 l_String_OldIterator_curr___main(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; uint32 x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 2); -x_4 = lean::string_utf8_get(x_2, x_3); -return x_4; -} -} -obj* l_String_OldIterator_curr___main___boxed(obj* x_1) { -_start: -{ -uint32 x_2; obj* x_3; -x_2 = l_String_OldIterator_curr___main(x_1); -lean::dec(x_1); -x_3 = lean::box_uint32(x_2); -return x_3; -} -} -uint32 l_String_OldIterator_curr(obj* x_1) { -_start: -{ -uint32 x_2; -x_2 = l_String_OldIterator_curr___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_curr___boxed(obj* x_1) { -_start: -{ -uint32 x_2; obj* x_3; -x_2 = l_String_OldIterator_curr(x_1); -lean::dec(x_1); -x_3 = lean::box_uint32(x_2); -return x_3; -} -} -obj* l_String_OldIterator_next___main(obj* x_1) { -_start: -{ -uint8 x_2; -x_2 = !lean::is_exclusive(x_1); -if (x_2 == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::cnstr_get(x_1, 1); -x_5 = lean::cnstr_get(x_1, 2); -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_add(x_4, x_6); -lean::dec(x_4); -x_8 = lean::string_utf8_next(x_3, x_5); -lean::dec(x_5); -lean::cnstr_set(x_1, 2, x_8); -lean::cnstr_set(x_1, 1, x_7); -return x_1; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_1, 2); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_1); -x_12 = lean::mk_nat_obj(1u); -x_13 = lean::nat_add(x_10, x_12); -lean::dec(x_10); -x_14 = lean::string_utf8_next(x_9, x_11); -lean::dec(x_11); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_9); -lean::cnstr_set(x_15, 1, x_13); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -obj* l_String_OldIterator_next(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_next___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_prev___main(obj* x_1) { -_start: -{ -uint8 x_2; -x_2 = !lean::is_exclusive(x_1); -if (x_2 == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::cnstr_get(x_1, 1); -x_5 = lean::cnstr_get(x_1, 2); -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_4, x_6); -lean::dec(x_4); -x_8 = lean::string_utf8_prev(x_3, x_5); -lean::dec(x_5); -lean::cnstr_set(x_1, 2, x_8); -lean::cnstr_set(x_1, 1, x_7); -return x_1; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_1, 2); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_1); -x_12 = lean::mk_nat_obj(1u); -x_13 = lean::nat_sub(x_10, x_12); -lean::dec(x_10); -x_14 = lean::string_utf8_prev(x_9, x_11); -lean::dec(x_11); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_9); -lean::cnstr_set(x_15, 1, x_13); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -obj* l_String_OldIterator_prev(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_prev___main(x_1); -return x_2; -} -} -uint8 l_String_OldIterator_hasNext___main(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; uint8 x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 2); -x_4 = lean::string_utf8_byte_size(x_2); -x_5 = lean::nat_dec_lt(x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_String_OldIterator_hasNext___main___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = l_String_OldIterator_hasNext___main(x_1); -lean::dec(x_1); -x_3 = lean::box(x_2); -return x_3; -} -} -uint8 l_String_OldIterator_hasNext(obj* x_1) { -_start: -{ -uint8 x_2; -x_2 = l_String_OldIterator_hasNext___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_hasNext___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = l_String_OldIterator_hasNext(x_1); -lean::dec(x_1); -x_3 = lean::box(x_2); -return x_3; -} -} -uint8 l_String_OldIterator_hasPrev___main(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; uint8 x_4; -x_2 = lean::cnstr_get(x_1, 2); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_lt(x_3, x_2); -return x_4; -} -} -obj* l_String_OldIterator_hasPrev___main___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = l_String_OldIterator_hasPrev___main(x_1); -lean::dec(x_1); -x_3 = lean::box(x_2); -return x_3; -} -} -uint8 l_String_OldIterator_hasPrev(obj* x_1) { -_start: -{ -uint8 x_2; -x_2 = l_String_OldIterator_hasPrev___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_hasPrev___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = l_String_OldIterator_hasPrev(x_1); -lean::dec(x_1); -x_3 = lean::box(x_2); -return x_3; -} -} -obj* l_String_OldIterator_setCurr___main(obj* x_1, uint32 x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 2); -x_6 = lean::string_utf8_set(x_4, x_5, x_2); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_1, 0); -x_8 = lean::cnstr_get(x_1, 1); -x_9 = lean::cnstr_get(x_1, 2); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -lean::dec(x_1); -x_10 = lean::string_utf8_set(x_7, x_9, x_2); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_8); -lean::cnstr_set(x_11, 2, x_9); -return x_11; -} -} -} -obj* l_String_OldIterator_setCurr___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_String_OldIterator_setCurr___main(x_1, x_3); -return x_4; -} -} -obj* l_String_OldIterator_setCurr(obj* x_1, uint32 x_2) { -_start: -{ -obj* x_3; -x_3 = l_String_OldIterator_setCurr___main(x_1, x_2); -return x_3; -} -} -obj* l_String_OldIterator_setCurr___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_String_OldIterator_setCurr(x_1, x_3); -return x_4; -} -} -obj* l_String_OldIterator_toEnd___main(obj* x_1) { -_start: -{ -uint8 x_2; -x_2 = !lean::is_exclusive(x_1); -if (x_2 == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::cnstr_get(x_1, 2); -lean::dec(x_4); -x_5 = lean::cnstr_get(x_1, 1); -lean::dec(x_5); -x_6 = lean::string_length(x_3); -x_7 = lean::string_utf8_byte_size(x_3); -lean::cnstr_set(x_1, 2, x_7); -lean::cnstr_set(x_1, 1, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::string_length(x_8); -x_10 = lean::string_utf8_byte_size(x_8); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_9); -lean::cnstr_set(x_11, 2, x_10); -return x_11; -} -} -} -obj* l_String_OldIterator_toEnd(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_toEnd___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_extract___main(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 2); -x_7 = lean::string_dec_eq(x_3, x_5); -if (x_7 == 0) -{ -obj* x_8; -x_8 = l_String_splitAux___main___closed__1; -return x_8; -} -else -{ -uint8 x_9; -x_9 = lean::nat_dec_lt(x_6, x_4); -if (x_9 == 0) -{ -obj* x_10; -x_10 = lean::string_utf8_extract(x_3, x_4, x_6); -return x_10; -} -else -{ -obj* x_11; -x_11 = l_String_splitAux___main___closed__1; -return x_11; -} -} -} -} -obj* l_String_OldIterator_extract___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_String_OldIterator_extract___main(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_String_OldIterator_extract(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_String_OldIterator_extract___main(x_1, x_2); -return x_3; -} -} -obj* l_String_OldIterator_extract___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_String_OldIterator_extract(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_String_OldIterator_forward___main(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_2, x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::mk_nat_obj(1u); -x_6 = lean::nat_sub(x_2, x_5); -lean::dec(x_2); -x_7 = l_String_OldIterator_next___main(x_1); -x_1 = x_7; -x_2 = x_6; -goto _start; -} -else -{ -lean::dec(x_2); -return x_1; -} -} -} -obj* l_String_OldIterator_forward(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_String_OldIterator_forward___main(x_1, x_2); -return x_3; -} -} -obj* l_String_OldIterator_remainingToString___main(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 2); -x_4 = lean::string_utf8_byte_size(x_2); -x_5 = lean::string_utf8_extract(x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_String_OldIterator_remainingToString___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remainingToString___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_String_OldIterator_remainingToString(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remainingToString___main(x_1); -return x_2; -} -} -obj* l_String_OldIterator_remainingToString___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_String_OldIterator_remainingToString(x_1); -lean::dec(x_1); -return x_2; -} -} -uint8 l_String_OldIterator_isPrefixOfRemaining___main(obj* x_1, obj* x_2) { -_start: -{ -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; uint8 x_12; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 2); -x_7 = lean::string_utf8_byte_size(x_3); -x_8 = lean::string_utf8_extract(x_3, x_4, x_7); -x_9 = lean::nat_sub(x_7, x_4); -lean::dec(x_7); -x_10 = lean::nat_add(x_6, x_9); -lean::dec(x_9); -x_11 = lean::string_utf8_extract(x_5, x_6, x_10); -lean::dec(x_10); -x_12 = lean::string_dec_eq(x_8, x_11); -lean::dec(x_11); -lean::dec(x_8); -return x_12; -} -} -obj* l_String_OldIterator_isPrefixOfRemaining___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_String_OldIterator_isPrefixOfRemaining___main(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_String_OldIterator_isPrefixOfRemaining(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = l_String_OldIterator_isPrefixOfRemaining___main(x_1, x_2); -return x_3; -} -} -obj* l_String_OldIterator_isPrefixOfRemaining___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_String_OldIterator_isPrefixOfRemaining(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -obj* l_String_OldIterator_nextn___main(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_2, x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::mk_nat_obj(1u); -x_6 = lean::nat_sub(x_2, x_5); -lean::dec(x_2); -x_7 = l_String_OldIterator_next___main(x_1); -x_1 = x_7; -x_2 = x_6; -goto _start; -} -else -{ -lean::dec(x_2); -return x_1; -} -} -} -obj* l_String_OldIterator_nextn(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_String_OldIterator_nextn___main(x_1, x_2); -return x_3; -} -} -obj* l_String_OldIterator_prevn___main(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_2, x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::mk_nat_obj(1u); -x_6 = lean::nat_sub(x_2, x_5); -lean::dec(x_2); -x_7 = l_String_OldIterator_prev___main(x_1); -x_1 = x_7; -x_2 = x_6; -goto _start; -} -else -{ -lean::dec(x_2); -return x_1; -} -} -} -obj* l_String_OldIterator_prevn(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_String_OldIterator_prevn___main(x_1, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_1__oldLineColumnAux___main(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; uint8 x_10; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_3, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_3, 1); -lean::inc(x_9); -x_10 = l_String_OldIterator_hasNext___main(x_2); -if (x_10 == 0) -{ -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -return x_3; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_3); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; uint32 x_14; uint32 x_15; uint8 x_16; -x_12 = lean::cnstr_get(x_3, 1); -lean::dec(x_12); -x_13 = lean::cnstr_get(x_3, 0); -lean::dec(x_13); -x_14 = l_String_OldIterator_curr___main(x_2); -x_15 = 10; -x_16 = x_14 == x_15; -if (x_16 == 0) -{ -obj* x_17; obj* x_18; -x_17 = l_String_OldIterator_next___main(x_2); -x_18 = lean::nat_add(x_9, x_6); -lean::dec(x_9); -lean::cnstr_set(x_3, 1, x_18); -x_1 = x_7; -x_2 = x_17; -goto _start; -} -else -{ -obj* x_20; obj* x_21; -lean::dec(x_9); -x_20 = l_String_OldIterator_next___main(x_2); -x_21 = lean::nat_add(x_8, x_6); -lean::dec(x_8); -lean::cnstr_set(x_3, 1, x_4); -lean::cnstr_set(x_3, 0, x_21); -x_1 = x_7; -x_2 = x_20; -goto _start; -} -} -else -{ -uint32 x_23; uint32 x_24; uint8 x_25; -lean::dec(x_3); -x_23 = l_String_OldIterator_curr___main(x_2); -x_24 = 10; -x_25 = x_23 == x_24; -if (x_25 == 0) -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = l_String_OldIterator_next___main(x_2); -x_27 = lean::nat_add(x_9, x_6); -lean::dec(x_9); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_8); -lean::cnstr_set(x_28, 1, x_27); -x_1 = x_7; -x_2 = x_26; -x_3 = x_28; -goto _start; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; -lean::dec(x_9); -x_30 = l_String_OldIterator_next___main(x_2); -x_31 = lean::nat_add(x_8, x_6); -lean::dec(x_8); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_4); -x_1 = x_7; -x_2 = x_30; -x_3 = x_32; -goto _start; -} -} -} -} -else -{ -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -} -obj* l___private_init_lean_parser_parsec_1__oldLineColumnAux(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_parsec_1__oldLineColumnAux___main(x_1, x_2, x_3); -return x_4; -} -} -obj* l_String_oldLineColumn(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -lean::cnstr_set(x_4, 2, x_3); -x_5 = l_String_lineColumn___closed__1; -x_6 = l___private_init_lean_parser_parsec_1__oldLineColumnAux___main(x_2, x_4, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Parsec_expected_toString___main___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(" or "); -return x_1; -} -} -obj* l_Lean_Parser_Parsec_expected_toString___main(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_String_splitAux___main___closed__1; -return x_2; -} -else -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_3, 0); -lean::inc(x_7); -lean::dec(x_3); -x_8 = l_Lean_Parser_Parsec_expected_toString___main___closed__1; -x_9 = lean::string_append(x_6, x_8); -x_10 = lean::string_append(x_9, x_7); -lean::dec(x_7); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -lean::dec(x_5); -x_11 = lean::cnstr_get(x_1, 0); -lean::inc(x_11); -lean::dec(x_1); -x_12 = l_List_reprAux___main___rarg___closed__1; -x_13 = lean::string_append(x_11, x_12); -x_14 = l_Lean_Parser_Parsec_expected_toString___main(x_3); -x_15 = lean::string_append(x_13, x_14); -lean::dec(x_14); -return x_15; -} -} -} -} -} -obj* l_Lean_Parser_Parsec_expected_toString(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Parsec_expected_toString___main(x_1); -return x_2; -} -} -uint8 l_List_hasDecEq___main___at_Lean_Parser_Parsec_Message_text___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_3; -x_3 = 1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = 0; -return x_4; -} -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_5; -x_5 = 0; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; uint8 x_10; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = lean::cnstr_get(x_1, 1); -x_8 = lean::cnstr_get(x_2, 0); -x_9 = lean::cnstr_get(x_2, 1); -x_10 = lean::string_dec_eq(x_6, x_8); -if (x_10 == 0) -{ -uint8 x_11; -x_11 = 0; -return x_11; -} -else -{ -uint8 x_12; -x_12 = l_List_hasDecEq___main___at_Lean_Parser_Parsec_Message_text___spec__1(x_7, x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = 0; -return x_13; -} -else -{ -uint8 x_14; -x_14 = 1; -return x_14; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Parsec_Message_text___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("unexpected "); -return x_1; -} -} -obj* _init_l_Lean_Parser_Parsec_Message_text___rarg___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("expected "); -return x_1; -} -} -obj* _init_l_Lean_Parser_Parsec_Message_text___rarg___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = l_List_append___rarg(x_1, x_1); -x_3 = lean::mk_string("\n"); -x_4 = l_String_intercalate(x_3, x_2); -return x_4; -} -} -obj* l_Lean_Parser_Parsec_Message_text___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; uint8 x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -x_3 = l_String_splitAux___main___closed__1; -x_4 = lean::string_dec_eq(x_2, x_3); -x_5 = lean::cnstr_get(x_1, 2); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_DList_toList___main___rarg(x_5); -x_7 = lean::box(0); -x_8 = l_List_hasDecEq___main___at_Lean_Parser_Parsec_Message_text___spec__1(x_6, x_7); -if (x_4 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = l_Lean_Parser_Parsec_Message_text___rarg___closed__1; -x_10 = lean::string_append(x_9, x_2); -lean::dec(x_2); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_7); -if (x_8 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_12 = l_Lean_Parser_Parsec_expected_toString___main(x_6); -x_13 = l_Lean_Parser_Parsec_Message_text___rarg___closed__2; -x_14 = lean::string_append(x_13, x_12); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_7); -x_16 = l_List_append___rarg(x_11, x_15); -x_17 = l_IO_println___rarg___closed__1; -x_18 = l_String_intercalate(x_17, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_6); -x_19 = l_List_append___rarg(x_11, x_7); -x_20 = l_IO_println___rarg___closed__1; -x_21 = l_String_intercalate(x_20, x_19); -return x_21; -} -} -else -{ -lean::dec(x_2); -if (x_8 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_22 = l_Lean_Parser_Parsec_expected_toString___main(x_6); -x_23 = l_Lean_Parser_Parsec_Message_text___rarg___closed__2; -x_24 = lean::string_append(x_23, x_22); -lean::dec(x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_7); -x_26 = l_List_append___rarg(x_7, x_25); -x_27 = l_IO_println___rarg___closed__1; -x_28 = l_String_intercalate(x_27, x_26); -return x_28; -} -else -{ -obj* x_29; -lean::dec(x_6); -x_29 = l_Lean_Parser_Parsec_Message_text___rarg___closed__3; -return x_29; -} -} -} -} -obj* l_Lean_Parser_Parsec_Message_text(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Parsec_Message_text___rarg), 1, 0); -return x_2; -} -} -obj* l_List_hasDecEq___main___at_Lean_Parser_Parsec_Message_text___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_List_hasDecEq___main___at_Lean_Parser_Parsec_Message_text___spec__1(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_Parsec_Message_toString___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("error at line "); -return x_1; -} -} -obj* _init_l_Lean_Parser_Parsec_Message_toString___rarg___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(", column "); -return x_1; -} -} -obj* _init_l_Lean_Parser_Parsec_Message_toString___rarg___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(":\n"); -return x_1; -} -} -obj* l_Lean_Parser_Parsec_Message_toString___rarg(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = l_String_OldIterator_toString___main(x_2); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = l_String_oldLineColumn(x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -lean::dec(x_5); -x_8 = l_Nat_repr(x_6); -x_9 = l_Lean_Parser_Parsec_Message_toString___rarg___closed__1; -x_10 = lean::string_append(x_9, x_8); -lean::dec(x_8); -x_11 = l_Lean_Parser_Parsec_Message_toString___rarg___closed__2; -x_12 = lean::string_append(x_10, x_11); -x_13 = l_Nat_repr(x_7); -x_14 = lean::string_append(x_12, x_13); -lean::dec(x_13); -x_15 = l_Lean_Parser_Parsec_Message_toString___rarg___closed__3; -x_16 = lean::string_append(x_14, x_15); -x_17 = l_Lean_Parser_Parsec_Message_text___rarg(x_1); -x_18 = lean::string_append(x_16, x_17); -lean::dec(x_17); -return x_18; -} -} -obj* l_Lean_Parser_Parsec_Message_toString(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Parsec_Message_toString___rarg), 1, 0); -return x_2; -} -} -obj* _init_l_Lean_Parser_Parsec_HasToString___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Parsec_Message_toString___rarg), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_Parsec_HasToString(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Parsec_HasToString___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Parsec_HasLift(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Parsec_HasToString___closed__1; -return x_2; -} -} -obj* _init_l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Parsec_Result_mkEps___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Parsec_Result_mkEps(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Parsec_Result_mkEps___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::apply_2(x_4, lean::box(0), x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::apply_2(x_9, lean::box(0), x_11); -return x_12; -} -} -} -obj* l_Lean_Parser_ParsecT_run___rarg(obj* x_1, obj* 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; obj* x_11; obj* x_12; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_8); -x_10 = lean::apply_1(x_4, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_11, 0, x_1); -x_12 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_10, x_11); -return x_12; -} -} -obj* l_Lean_Parser_ParsecT_run(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_run___rarg___lambda__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParsecT_run___rarg___lambda__1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_ParsecT_run___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_run___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_run(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_runFrom___rarg(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_5); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_9, 0, x_1); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_runFrom(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_runFrom___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_runFrom___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_ParsecT_runFrom___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_runFrom___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_runFrom(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_pure___rarg(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_10; -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 2, x_8); -x_10 = lean::apply_2(x_7, lean::box(0), x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_pure(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_pure___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_pure___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_pure(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_eps___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_7); -x_9 = lean::apply_2(x_5, lean::box(0), x_8); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_eps(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_eps___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_eps___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_eps(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_ParsecT_failure___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("failure"); -return x_1; -} -} -obj* l_Lean_Parser_ParsecT_failure___rarg(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_9; obj* x_10; uint8 x_11; obj* x_12; obj* x_13; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_ParsecT_failure___rarg___closed__1; -x_9 = l_mjoin___rarg___closed__1; -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_8); -lean::cnstr_set(x_10, 2, x_9); -lean::cnstr_set(x_10, 3, x_7); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -x_13 = lean::apply_2(x_6, lean::box(0), x_12); -return x_13; -} -} -obj* l_Lean_Parser_ParsecT_failure(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_failure___rarg), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_failure___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_failure(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_merge___rarg(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_2, 2); -lean::inc(x_5); -lean::dec(x_2); -x_6 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_6, 0, x_4); -lean::closure_set(x_6, 1, x_5); -lean::cnstr_set(x_1, 2, x_6); -return x_1; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_7 = lean::cnstr_get(x_1, 0); -x_8 = lean::cnstr_get(x_1, 1); -x_9 = lean::cnstr_get(x_1, 2); -x_10 = lean::cnstr_get(x_1, 3); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -lean::dec(x_1); -x_11 = lean::cnstr_get(x_2, 2); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_12, 0, x_9); -lean::closure_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_8); -lean::cnstr_set(x_13, 2, x_12); -lean::cnstr_set(x_13, 3, x_10); -return x_13; -} -} -} -obj* l_Lean_Parser_ParsecT_merge(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_merge___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; -x_4 = lean::cnstr_get(x_2, 2); -lean::dec(x_4); -lean::cnstr_set(x_2, 2, x_1); -return x_2; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_6); -lean::inc(x_5); -lean::dec(x_2); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -lean::cnstr_set(x_7, 2, x_1); -return x_7; -} -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_2); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = 1; -lean::cnstr_set_scalar(x_2, sizeof(void*)*1, x_9); -return x_2; -} -else -{ -obj* x_10; uint8 x_11; obj* x_12; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -lean::dec(x_2); -x_11 = 1; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -return x_12; -} -} -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_13; -x_13 = lean::cnstr_get(x_2, 2); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -lean::dec(x_1); -return x_2; -} -else -{ -obj* x_14; uint8 x_15; -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = !lean::is_exclusive(x_2); -if (x_15 == 0) -{ -obj* x_16; uint8 x_17; -x_16 = lean::cnstr_get(x_2, 2); -lean::dec(x_16); -x_17 = !lean::is_exclusive(x_13); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_13, 0); -x_19 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_19, 0, x_14); -lean::closure_set(x_19, 1, x_18); -lean::cnstr_set(x_13, 0, x_19); -return x_2; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; -x_20 = lean::cnstr_get(x_13, 0); -lean::inc(x_20); -lean::dec(x_13); -x_21 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_21, 0, x_14); -lean::closure_set(x_21, 1, x_20); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_2, 2, x_22); -return x_2; -} -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_23 = lean::cnstr_get(x_2, 0); -x_24 = lean::cnstr_get(x_2, 1); -lean::inc(x_24); -lean::inc(x_23); -lean::dec(x_2); -x_25 = lean::cnstr_get(x_13, 0); -lean::inc(x_25); -if (lean::is_exclusive(x_13)) { - lean::cnstr_release(x_13, 0); - x_26 = x_13; -} else { - lean::dec_ref(x_13); - x_26 = lean::box(0); -} -x_27 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_27, 0, x_14); -lean::closure_set(x_27, 1, x_25); -if (lean::is_scalar(x_26)) { - x_28 = lean::alloc_cnstr(1, 1, 0); -} else { - x_28 = x_26; -} -lean::cnstr_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_23); -lean::cnstr_set(x_29, 1, x_24); -lean::cnstr_set(x_29, 2, x_28); -return x_29; -} -} -} -else -{ -uint8 x_30; -x_30 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); -if (x_30 == 0) -{ -uint8 x_31; -x_31 = !lean::is_exclusive(x_2); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; uint8 x_34; -x_32 = lean::cnstr_get(x_2, 0); -x_33 = lean::cnstr_get(x_1, 0); -lean::inc(x_33); -lean::dec(x_1); -x_34 = !lean::is_exclusive(x_32); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_32, 2); -x_36 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_36, 0, x_33); -lean::closure_set(x_36, 1, x_35); -lean::cnstr_set(x_32, 2, x_36); -return x_2; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_32, 0); -x_38 = lean::cnstr_get(x_32, 1); -x_39 = lean::cnstr_get(x_32, 2); -x_40 = lean::cnstr_get(x_32, 3); -lean::inc(x_40); -lean::inc(x_39); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_32); -x_41 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_41, 0, x_33); -lean::closure_set(x_41, 1, x_39); -x_42 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_42, 0, x_37); -lean::cnstr_set(x_42, 1, x_38); -lean::cnstr_set(x_42, 2, x_41); -lean::cnstr_set(x_42, 3, x_40); -lean::cnstr_set(x_2, 0, x_42); -return x_2; -} -} -else -{ -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; -x_43 = lean::cnstr_get(x_2, 0); -lean::inc(x_43); -lean::dec(x_2); -x_44 = lean::cnstr_get(x_1, 0); -lean::inc(x_44); -lean::dec(x_1); -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_43, 2); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_43, 3); -lean::inc(x_48); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - lean::cnstr_release(x_43, 1); - lean::cnstr_release(x_43, 2); - lean::cnstr_release(x_43, 3); - x_49 = x_43; -} else { - lean::dec_ref(x_43); - x_49 = lean::box(0); -} -x_50 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_50, 0, x_44); -lean::closure_set(x_50, 1, x_47); -if (lean::is_scalar(x_49)) { - x_51 = lean::alloc_cnstr(0, 4, 0); -} else { - x_51 = x_49; -} -lean::cnstr_set(x_51, 0, x_45); -lean::cnstr_set(x_51, 1, x_46); -lean::cnstr_set(x_51, 2, x_50); -lean::cnstr_set(x_51, 3, x_48); -x_52 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set_scalar(x_52, sizeof(void*)*1, x_30); -return x_52; -} -} -else -{ -lean::dec(x_1); -return x_2; -} -} -} -} -} -obj* l_Lean_Parser_ParsecT_bindMkRes(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_bind___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -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_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_3, 2); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_10, 0, x_6); -x_11 = lean::apply_2(x_2, x_4, x_5); -x_12 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_10, x_11); -return x_12; -} -else -{ -uint8 x_13; -lean::dec(x_2); -x_13 = !lean::is_exclusive(x_3); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::apply_2(x_15, lean::box(0), x_3); -return x_16; -} -else -{ -obj* x_17; uint8 x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = lean::cnstr_get(x_3, 0); -x_18 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_17); -lean::dec(x_3); -x_19 = lean::cnstr_get(x_1, 0); -lean::inc(x_19); -lean::dec(x_1); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -x_21 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_21, 0, x_17); -lean::cnstr_set_scalar(x_21, sizeof(void*)*1, x_18); -x_22 = lean::apply_2(x_20, lean::box(0), x_21); -return x_22; -} -} -} -} -obj* l_Lean_Parser_ParsecT_bind___rarg(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_10; obj* x_11; -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_5, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bind___rarg___lambda__1), 3, 2); -lean::closure_set(x_10, 0, x_1); -lean::closure_set(x_10, 1, x_6); -x_11 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_ParsecT_bind(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bind___rarg), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_bind___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_bind(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_bind_x27___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -lean::dec(x_2); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -lean::dec(x_3); -x_6 = lean::apply_2(x_1, x_4, x_5); -return x_6; -} -else -{ -uint8 x_7; -lean::dec(x_1); -x_7 = !lean::is_exclusive(x_3); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::apply_2(x_9, lean::box(0), x_3); -return x_10; -} -else -{ -obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_11); -lean::dec(x_3); -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -lean::dec(x_13); -x_15 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_15, 0, x_11); -lean::cnstr_set_scalar(x_15, sizeof(void*)*1, x_12); -x_16 = lean::apply_2(x_14, lean::box(0), x_15); -return x_16; -} -} -} -} -obj* l_Lean_Parser_ParsecT_bind_x27___rarg(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_10; obj* x_11; -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_5, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bind_x27___rarg___lambda__1), 3, 2); -lean::closure_set(x_10, 0, x_6); -lean::closure_set(x_10, 1, x_1); -x_11 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_ParsecT_bind_x27(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bind_x27___rarg), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_bind_x27___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_bind_x27(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_5 = lean::cnstr_get(x_3, 0); -x_6 = lean::cnstr_get(x_3, 2); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_10, 0, x_6); -x_11 = lean::apply_1(x_2, x_5); -x_12 = lean::cnstr_get(x_7, 1); -lean::inc(x_12); -lean::dec(x_7); -x_13 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_3, 2, x_13); -lean::cnstr_set(x_3, 0, x_11); -x_14 = lean::apply_2(x_12, lean::box(0), x_3); -x_15 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_10, x_14); -return x_15; -} -else -{ -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; -x_16 = lean::cnstr_get(x_3, 0); -x_17 = lean::cnstr_get(x_3, 1); -x_18 = lean::cnstr_get(x_3, 2); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_3); -x_19 = lean::cnstr_get(x_1, 0); -lean::inc(x_19); -lean::dec(x_1); -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -lean::dec(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_22, 0, x_18); -x_23 = lean::apply_1(x_2, x_16); -x_24 = lean::cnstr_get(x_19, 1); -lean::inc(x_24); -lean::dec(x_19); -x_25 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_23); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_25); -x_27 = lean::apply_2(x_24, lean::box(0), x_26); -x_28 = lean::apply_4(x_21, lean::box(0), lean::box(0), x_22, x_27); -return x_28; -} -} -else -{ -uint8 x_29; -lean::dec(x_2); -x_29 = !lean::is_exclusive(x_3); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; -x_30 = lean::cnstr_get(x_1, 0); -lean::inc(x_30); -lean::dec(x_1); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -x_32 = lean::apply_2(x_31, lean::box(0), x_3); -return x_32; -} -else -{ -obj* x_33; uint8 x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_33 = lean::cnstr_get(x_3, 0); -x_34 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_33); -lean::dec(x_3); -x_35 = lean::cnstr_get(x_1, 0); -lean::inc(x_35); -lean::dec(x_1); -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -lean::dec(x_35); -x_37 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_37, 0, x_33); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_34); -x_38 = lean::apply_2(x_36, lean::box(0), x_37); -return x_38; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__2(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_5, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__1), 3, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_4); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_5 = lean::cnstr_get(x_3, 2); -x_6 = lean::cnstr_get(x_3, 0); -lean::dec(x_6); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_10, 0, x_5); -x_11 = lean::cnstr_get(x_7, 1); -lean::inc(x_11); -lean::dec(x_7); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_3, 2, x_12); -lean::cnstr_set(x_3, 0, x_2); -x_13 = lean::apply_2(x_11, lean::box(0), x_3); -x_14 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_10, x_13); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_15 = lean::cnstr_get(x_3, 1); -x_16 = lean::cnstr_get(x_3, 2); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_3); -x_17 = lean::cnstr_get(x_1, 0); -lean::inc(x_17); -lean::dec(x_1); -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_20, 0, x_16); -x_21 = lean::cnstr_get(x_17, 1); -lean::inc(x_21); -lean::dec(x_17); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_2); -lean::cnstr_set(x_23, 1, x_15); -lean::cnstr_set(x_23, 2, x_22); -x_24 = lean::apply_2(x_21, lean::box(0), x_23); -x_25 = lean::apply_4(x_19, lean::box(0), lean::box(0), x_20, x_24); -return x_25; -} -} -else -{ -uint8 x_26; -lean::dec(x_2); -x_26 = !lean::is_exclusive(x_3); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_1, 0); -lean::inc(x_27); -lean::dec(x_1); -x_28 = lean::cnstr_get(x_27, 1); -lean::inc(x_28); -lean::dec(x_27); -x_29 = lean::apply_2(x_28, lean::box(0), x_3); -return x_29; -} -else -{ -obj* x_30; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_30 = lean::cnstr_get(x_3, 0); -x_31 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_30); -lean::dec(x_3); -x_32 = lean::cnstr_get(x_1, 0); -lean::inc(x_32); -lean::dec(x_1); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -x_34 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_34, 0, x_30); -lean::cnstr_set_scalar(x_34, sizeof(void*)*1, x_31); -x_35 = lean::apply_2(x_33, lean::box(0), x_34); -return x_35; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__4(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_5, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__3), 3, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_4); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__5(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_9; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_3); -lean::cnstr_set(x_8, 1, x_4); -lean::cnstr_set(x_8, 2, x_7); -x_9 = lean::apply_2(x_6, lean::box(0), x_8); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__6(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_6 = lean::cnstr_get(x_4, 0); -x_7 = lean::cnstr_get(x_4, 2); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::apply_1(x_1, x_6); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -lean::dec(x_2); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_4, 2, x_11); -lean::cnstr_set(x_4, 0, x_9); -x_12 = lean::apply_2(x_10, lean::box(0), x_4); -x_13 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_8, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_14 = lean::cnstr_get(x_4, 0); -x_15 = lean::cnstr_get(x_4, 1); -x_16 = lean::cnstr_get(x_4, 2); -lean::inc(x_16); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_4); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::apply_1(x_1, x_14); -x_19 = lean::cnstr_get(x_2, 1); -lean::inc(x_19); -lean::dec(x_2); -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_18); -lean::cnstr_set(x_21, 1, x_15); -lean::cnstr_set(x_21, 2, x_20); -x_22 = lean::apply_2(x_19, lean::box(0), x_21); -x_23 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_17, x_22); -return x_23; -} -} -else -{ -uint8 x_24; -lean::dec(x_3); -lean::dec(x_1); -x_24 = !lean::is_exclusive(x_4); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 1); -lean::inc(x_25); -lean::dec(x_2); -x_26 = lean::apply_2(x_25, lean::box(0), x_4); -return x_26; -} -else -{ -obj* x_27; uint8 x_28; obj* x_29; obj* x_30; obj* x_31; -x_27 = lean::cnstr_get(x_4, 0); -x_28 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::inc(x_27); -lean::dec(x_4); -x_29 = lean::cnstr_get(x_2, 1); -lean::inc(x_29); -lean::dec(x_2); -x_30 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set_scalar(x_30, sizeof(void*)*1, x_28); -x_31 = lean::apply_2(x_29, lean::box(0), x_30); -return x_31; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__7(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_4, 2); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_11, 0, x_7); -x_12 = lean::apply_1(x_2, x_6); -lean::inc(x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__6), 4, 3); -lean::closure_set(x_13, 0, x_5); -lean::closure_set(x_13, 1, x_8); -lean::closure_set(x_13, 2, x_10); -x_14 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_12, x_13); -x_15 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_11, x_14); -return x_15; -} -else -{ -uint8 x_16; -lean::dec(x_3); -lean::dec(x_2); -x_16 = !lean::is_exclusive(x_4); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_1, 0); -lean::inc(x_17); -lean::dec(x_1); -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -lean::dec(x_17); -x_19 = lean::apply_2(x_18, lean::box(0), x_4); -return x_19; -} -else -{ -obj* x_20; uint8 x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::cnstr_get(x_4, 0); -x_21 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::inc(x_20); -lean::dec(x_4); -x_22 = lean::cnstr_get(x_1, 0); -lean::inc(x_22); -lean::dec(x_1); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -x_24 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_24, 0, x_20); -lean::cnstr_set_scalar(x_24, sizeof(void*)*1, x_21); -x_25 = lean::apply_2(x_23, lean::box(0), x_24); -return x_25; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__8(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__7), 4, 3); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_5); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__9(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_4, 2); -x_7 = lean::cnstr_get(x_4, 0); -lean::dec(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_8, 0, x_6); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::dec(x_1); -x_10 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_4, 2, x_10); -lean::cnstr_set(x_4, 0, x_2); -x_11 = lean::apply_2(x_9, lean::box(0), x_4); -x_12 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_8, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = lean::cnstr_get(x_4, 1); -x_14 = lean::cnstr_get(x_4, 2); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_4); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::cnstr_get(x_1, 1); -lean::inc(x_16); -lean::dec(x_1); -x_17 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_2); -lean::cnstr_set(x_18, 1, x_13); -lean::cnstr_set(x_18, 2, x_17); -x_19 = lean::apply_2(x_16, lean::box(0), x_18); -x_20 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_15, x_19); -return x_20; -} -} -else -{ -uint8 x_21; -lean::dec(x_3); -lean::dec(x_2); -x_21 = !lean::is_exclusive(x_4); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_1, 1); -lean::inc(x_22); -lean::dec(x_1); -x_23 = lean::apply_2(x_22, lean::box(0), x_4); -return x_23; -} -else -{ -obj* x_24; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -x_24 = lean::cnstr_get(x_4, 0); -x_25 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::inc(x_24); -lean::dec(x_4); -x_26 = lean::cnstr_get(x_1, 1); -lean::inc(x_26); -lean::dec(x_1); -x_27 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); -x_28 = lean::apply_2(x_26, lean::box(0), x_27); -return x_28; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__10(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_4, 2); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_11, 0, x_7); -x_12 = lean::apply_1(x_2, x_6); -lean::inc(x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__9), 4, 3); -lean::closure_set(x_13, 0, x_8); -lean::closure_set(x_13, 1, x_5); -lean::closure_set(x_13, 2, x_10); -x_14 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_12, x_13); -x_15 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_11, x_14); -return x_15; -} -else -{ -uint8 x_16; -lean::dec(x_3); -lean::dec(x_2); -x_16 = !lean::is_exclusive(x_4); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_1, 0); -lean::inc(x_17); -lean::dec(x_1); -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -lean::dec(x_17); -x_19 = lean::apply_2(x_18, lean::box(0), x_4); -return x_19; -} -else -{ -obj* x_20; uint8 x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::cnstr_get(x_4, 0); -x_21 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::inc(x_20); -lean::dec(x_4); -x_22 = lean::cnstr_get(x_1, 0); -lean::inc(x_22); -lean::dec(x_1); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -x_24 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_24, 0, x_20); -lean::cnstr_set_scalar(x_24, sizeof(void*)*1, x_21); -x_25 = lean::apply_2(x_23, lean::box(0), x_24); -return x_25; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__11(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__10), 4, 3); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_5); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__12(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_3, 2); -lean::inc(x_5); -lean::dec(x_3); -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_9, 0, x_5); -x_10 = lean::apply_1(x_2, x_4); -x_11 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -else -{ -uint8 x_12; -lean::dec(x_2); -x_12 = !lean::is_exclusive(x_3); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -lean::dec(x_13); -x_15 = lean::apply_2(x_14, lean::box(0), x_3); -return x_15; -} -else -{ -obj* x_16; uint8 x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_3, 0); -x_17 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_16); -lean::dec(x_3); -x_18 = lean::cnstr_get(x_1, 0); -lean::inc(x_18); -lean::dec(x_1); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_20, 0, x_16); -lean::cnstr_set_scalar(x_20, sizeof(void*)*1, x_17); -x_21 = lean::apply_2(x_19, lean::box(0), x_20); -return x_21; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__13(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__12), 3, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_5); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg___lambda__14(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bind___rarg___lambda__1), 3, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_5); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad___rarg(obj* x_1, obj* x_2) { -_start: -{ -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; -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__2), 6, 1); -lean::closure_set(x_3, 0, x_1); -lean::inc(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__4), 6, 1); -lean::closure_set(x_4, 0, x_1); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -lean::inc(x_1); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__5), 4, 1); -lean::closure_set(x_6, 0, x_1); -lean::inc(x_1); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__8), 6, 1); -lean::closure_set(x_7, 0, x_1); -lean::inc(x_1); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__11), 6, 1); -lean::closure_set(x_8, 0, x_1); -lean::inc(x_1); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__13), 6, 1); -lean::closure_set(x_9, 0, x_1); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_6); -lean::cnstr_set(x_10, 2, x_7); -lean::cnstr_set(x_10, 3, x_8); -lean::cnstr_set(x_10, 4, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__14), 6, 1); -lean::closure_set(x_11, 0, x_1); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -obj* l_Lean_Parser_ParsecT_Monad(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_Monad___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_Monad(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_5 = lean::cnstr_get(x_3, 0); -x_6 = lean::cnstr_get(x_3, 2); -lean::dec(x_6); -x_7 = lean::apply_1(x_1, x_5); -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_3, 2, x_10); -lean::cnstr_set(x_3, 0, x_7); -x_11 = lean::apply_2(x_9, lean::box(0), x_3); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_12 = lean::cnstr_get(x_3, 0); -x_13 = lean::cnstr_get(x_3, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_3); -x_14 = lean::apply_1(x_1, x_12); -x_15 = lean::cnstr_get(x_2, 0); -lean::inc(x_15); -lean::dec(x_2); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -lean::dec(x_15); -x_17 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_14); -lean::cnstr_set(x_18, 1, x_13); -lean::cnstr_set(x_18, 2, x_17); -x_19 = lean::apply_2(x_16, lean::box(0), x_18); -return x_19; -} -} -else -{ -uint8 x_20; -lean::dec(x_1); -x_20 = !lean::is_exclusive(x_3); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::cnstr_get(x_2, 0); -lean::inc(x_21); -lean::dec(x_2); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::apply_2(x_22, lean::box(0), x_3); -return x_23; -} -else -{ -obj* x_24; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_24 = lean::cnstr_get(x_3, 0); -x_25 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_24); -lean::dec(x_3); -x_26 = lean::cnstr_get(x_2, 0); -lean::inc(x_26); -lean::dec(x_2); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -lean::dec(x_26); -x_28 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_28, 0, x_24); -lean::cnstr_set_scalar(x_28, sizeof(void*)*1, x_25); -x_29 = lean::apply_2(x_27, lean::box(0), x_28); -return x_29; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__2(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_5, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__1), 3, 2); -lean::closure_set(x_9, 0, x_4); -lean::closure_set(x_9, 1, x_1); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_5 = lean::cnstr_get(x_3, 2); -lean::dec(x_5); -x_6 = lean::cnstr_get(x_3, 0); -lean::dec(x_6); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_3, 2, x_9); -lean::cnstr_set(x_3, 0, x_2); -x_10 = lean::apply_2(x_8, lean::box(0), x_3); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_3, 1); -lean::inc(x_11); -lean::dec(x_3); -x_12 = lean::cnstr_get(x_1, 0); -lean::inc(x_12); -lean::dec(x_1); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_11); -lean::cnstr_set(x_15, 2, x_14); -x_16 = lean::apply_2(x_13, lean::box(0), x_15); -return x_16; -} -} -else -{ -uint8 x_17; -lean::dec(x_2); -x_17 = !lean::is_exclusive(x_3); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_1, 0); -lean::inc(x_18); -lean::dec(x_1); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::apply_2(x_19, lean::box(0), x_3); -return x_20; -} -else -{ -obj* x_21; uint8 x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_3, 0); -x_22 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_21); -lean::dec(x_3); -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -lean::dec(x_1); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -x_25 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_25, 0, x_21); -lean::cnstr_set_scalar(x_25, sizeof(void*)*1, x_22); -x_26 = lean::apply_2(x_24, lean::box(0), x_25); -return x_26; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__4(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_5, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__3), 3, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_4); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__5(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = lean::apply_1(x_1, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__1), 3, 2); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_2); -x_9 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -else -{ -uint8 x_10; -lean::dec(x_3); -lean::dec(x_1); -x_10 = !lean::is_exclusive(x_4); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::apply_2(x_12, lean::box(0), x_4); -return x_13; -} -else -{ -obj* x_14; uint8 x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_4, 0); -x_15 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::inc(x_14); -lean::dec(x_4); -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_18, 0, x_14); -lean::cnstr_set_scalar(x_18, sizeof(void*)*1, x_15); -x_19 = lean::apply_2(x_17, lean::box(0), x_18); -return x_19; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__6(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__5), 4, 3); -lean::closure_set(x_9, 0, x_5); -lean::closure_set(x_9, 1, x_1); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__7(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = lean::apply_1(x_1, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__3), 3, 2); -lean::closure_set(x_8, 0, x_2); -lean::closure_set(x_8, 1, x_5); -x_9 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -else -{ -uint8 x_10; -lean::dec(x_3); -lean::dec(x_1); -x_10 = !lean::is_exclusive(x_4); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::apply_2(x_12, lean::box(0), x_4); -return x_13; -} -else -{ -obj* x_14; uint8 x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_4, 0); -x_15 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::inc(x_14); -lean::dec(x_4); -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_18, 0, x_14); -lean::cnstr_set_scalar(x_18, sizeof(void*)*1, x_15); -x_19 = lean::apply_2(x_17, lean::box(0), x_18); -return x_19; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__8(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__7), 4, 3); -lean::closure_set(x_9, 0, x_5); -lean::closure_set(x_9, 1, x_1); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__9(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -lean::dec(x_2); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::apply_1(x_1, x_4); -return x_5; -} -else -{ -uint8 x_6; -lean::dec(x_1); -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -lean::dec(x_2); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::apply_2(x_8, lean::box(0), x_3); -return x_9; -} -else -{ -obj* x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_3, 0); -x_11 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_10); -lean::dec(x_3); -x_12 = lean::cnstr_get(x_2, 0); -lean::inc(x_12); -lean::dec(x_2); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -x_14 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_14, 0, x_10); -lean::cnstr_set_scalar(x_14, sizeof(void*)*1, x_11); -x_15 = lean::apply_2(x_13, lean::box(0), x_14); -return x_15; -} -} -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__10(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__9), 3, 2); -lean::closure_set(x_9, 0, x_5); -lean::closure_set(x_9, 1, x_1); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__11(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bind_x27___rarg___lambda__1), 3, 2); -lean::closure_set(x_9, 0, x_5); -lean::closure_set(x_9, 1, x_1); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___rarg(obj* x_1, obj* x_2) { -_start: -{ -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; -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__2), 6, 1); -lean::closure_set(x_3, 0, x_1); -lean::inc(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__4), 6, 1); -lean::closure_set(x_4, 0, x_1); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -lean::inc(x_1); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__5), 4, 1); -lean::closure_set(x_6, 0, x_1); -lean::inc(x_1); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__6), 6, 1); -lean::closure_set(x_7, 0, x_1); -lean::inc(x_1); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__8), 6, 1); -lean::closure_set(x_8, 0, x_1); -lean::inc(x_1); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__10), 6, 1); -lean::closure_set(x_9, 0, x_1); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_6); -lean::cnstr_set(x_10, 2, x_7); -lean::cnstr_set(x_10, 3, x_8); -lean::cnstr_set(x_10, 4, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg___lambda__11), 6, 1); -lean::closure_set(x_11, 0, x_1); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad_x27___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_Monad_x27___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_Monad_x27(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_ParsecT_MonadFail___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_MonadFail___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; -x_3 = l_mjoin___rarg___closed__1; -x_4 = l_Lean_Parser_ParsecT_MonadFail___rarg___closed__1; -x_5 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::cnstr_set(x_5, 1, x_1); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 3, x_4); -x_6 = 0; -x_7 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set_scalar(x_7, sizeof(void*)*1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_MonadFail(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_MonadFail___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; uint8 x_7; obj* x_8; obj* x_9; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = 0; -x_8 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_8, 0, x_3); -lean::cnstr_set_scalar(x_8, sizeof(void*)*1, x_7); -x_9 = lean::apply_2(x_6, lean::box(0), x_8); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__2(obj* x_1, uint8 x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::apply_2(x_5, lean::box(0), x_3); -return x_6; -} -else -{ -if (x_2 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = !lean::is_exclusive(x_3); -if (x_9 == 0) -{ -obj* x_10; -x_10 = lean::apply_2(x_8, lean::box(0), x_3); -return x_10; -} -else -{ -obj* x_11; uint8 x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_3, 0); -x_12 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_11); -lean::dec(x_3); -x_13 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set_scalar(x_13, sizeof(void*)*1, x_12); -x_14 = lean::apply_2(x_8, lean::box(0), x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; uint8 x_17; -x_15 = lean::cnstr_get(x_1, 0); -lean::inc(x_15); -lean::dec(x_1); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -lean::dec(x_15); -x_17 = !lean::is_exclusive(x_3); -if (x_17 == 0) -{ -uint8 x_18; obj* x_19; -x_18 = 1; -lean::cnstr_set_scalar(x_3, sizeof(void*)*1, x_18); -x_19 = lean::apply_2(x_16, lean::box(0), x_3); -return x_19; -} -else -{ -obj* x_20; uint8 x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_3, 0); -lean::inc(x_20); -lean::dec(x_3); -x_21 = 1; -x_22 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set_scalar(x_22, sizeof(void*)*1, x_21); -x_23 = lean::apply_2(x_16, lean::box(0), x_22); -return x_23; -} -} -} -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::apply_2(x_6, lean::box(0), x_4); -return x_7; -} -else -{ -obj* x_8; uint8 x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::dec(x_4); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::apply_2(x_2, x_8, x_10); -x_12 = lean::box(x_9); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__2___boxed), 3, 2); -lean::closure_set(x_13, 0, x_1); -lean::closure_set(x_13, 1, x_12); -x_14 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_11, x_13); -return x_14; -} -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__4(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; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_3, x_5); -lean::inc(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__3), 4, 3); -lean::closure_set(x_8, 0, x_1); -lean::closure_set(x_8, 1, x_4); -lean::closure_set(x_8, 2, x_6); -x_9 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__1___boxed), 4, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__4), 5, 1); -lean::closure_set(x_4, 0, x_1); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_MonadExcept___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_2); -lean::dec(x_2); -x_5 = l_Lean_Parser_ParsecT_MonadExcept___rarg___lambda__2(x_1, x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_ParsecT_MonadExcept___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_MonadExcept(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_HasMonadLift___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_3); -lean::cnstr_set(x_7, 1, x_2); -lean::cnstr_set(x_7, 2, x_6); -x_8 = lean::apply_2(x_5, lean::box(0), x_7); -return x_8; -} -} -obj* l_Lean_Parser_ParsecT_HasMonadLift___rarg(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; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_HasMonadLift___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_1); -lean::closure_set(x_7, 1, x_5); -x_8 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_4, x_7); -return x_8; -} -} -obj* l_Lean_Parser_ParsecT_HasMonadLift(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_HasMonadLift___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_HasMonadLift___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_HasMonadLift(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_expect___rarg(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_1, 2); -lean::dec(x_4); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_2); -lean::cnstr_set(x_1, 2, x_5); -return x_1; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = lean::cnstr_get(x_1, 1); -x_8 = lean::cnstr_get(x_1, 3); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); -lean::dec(x_1); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_2); -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_6); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_9); -lean::cnstr_set(x_10, 3, x_8); -return x_10; -} -} -} -obj* l_Lean_Parser_ParsecT_expect(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_expect___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 2); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -lean::dec(x_2); -return x_1; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -obj* x_5; uint8 x_6; -x_5 = lean::cnstr_get(x_3, 0); -lean::dec(x_5); -x_6 = !lean::is_exclusive(x_1); -if (x_6 == 0) -{ -obj* x_7; -x_7 = lean::cnstr_get(x_1, 2); -lean::dec(x_7); -lean::cnstr_set(x_3, 0, x_2); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -lean::cnstr_set(x_3, 0, x_2); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_3); -return x_10; -} -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -lean::dec(x_3); -x_11 = lean::cnstr_get(x_1, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_1, 1); -lean::inc(x_12); -if (lean::is_exclusive(x_1)) { - lean::cnstr_release(x_1, 0); - lean::cnstr_release(x_1, 1); - lean::cnstr_release(x_1, 2); - x_13 = x_1; -} else { - lean::dec_ref(x_1); - x_13 = lean::box(0); -} -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_2); -if (lean::is_scalar(x_13)) { - x_15 = lean::alloc_cnstr(0, 3, 0); -} else { - x_15 = x_13; -} -lean::cnstr_set(x_15, 0, x_11); -lean::cnstr_set(x_15, 1, x_12); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -else -{ -uint8 x_16; -x_16 = lean::cnstr_get_scalar(x_1, sizeof(void*)*1); -if (x_16 == 0) -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_1); -if (x_17 == 0) -{ -obj* x_18; uint8 x_19; -x_18 = lean::cnstr_get(x_1, 0); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; -x_20 = lean::cnstr_get(x_18, 2); -lean::dec(x_20); -lean::cnstr_set(x_18, 2, x_2); -return x_1; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_18, 0); -x_22 = lean::cnstr_get(x_18, 1); -x_23 = lean::cnstr_get(x_18, 3); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_18); -x_24 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_22); -lean::cnstr_set(x_24, 2, x_2); -lean::cnstr_set(x_24, 3, x_23); -lean::cnstr_set(x_1, 0, x_24); -return x_1; -} -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_1, 0); -lean::inc(x_25); -lean::dec(x_1); -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_25, 1); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_25, 3); -lean::inc(x_28); -if (lean::is_exclusive(x_25)) { - lean::cnstr_release(x_25, 0); - lean::cnstr_release(x_25, 1); - lean::cnstr_release(x_25, 2); - lean::cnstr_release(x_25, 3); - x_29 = x_25; -} else { - lean::dec_ref(x_25); - x_29 = lean::box(0); -} -if (lean::is_scalar(x_29)) { - x_30 = lean::alloc_cnstr(0, 4, 0); -} else { - x_30 = x_29; -} -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_27); -lean::cnstr_set(x_30, 2, x_2); -lean::cnstr_set(x_30, 3, x_28); -x_31 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set_scalar(x_31, sizeof(void*)*1, x_16); -return x_31; -} -} -else -{ -lean::dec(x_2); -return x_1; -} -} -} -} -obj* l_Lean_Parser_ParsecT_labelsMkRes(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_labelsMkRes___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_labels___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_3, x_2); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_labels___rarg(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_4, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_labels___rarg___lambda__1), 3, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_5); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_labels(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_labels___rarg), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_labels___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_labels(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -return x_1; -} -else -{ -uint8 x_2; -x_2 = !lean::is_exclusive(x_1); -if (x_2 == 0) -{ -uint8 x_3; -x_3 = 0; -lean::cnstr_set_scalar(x_1, sizeof(void*)*1, x_3); -return x_1; -} -else -{ -obj* x_4; uint8 x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = 0; -x_6 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set_scalar(x_6, sizeof(void*)*1, x_5); -return x_6; -} -} -} -} -obj* l_Lean_Parser_ParsecT_tryMkRes(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_tryMkRes___rarg), 1, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_try___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_2); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -return x_6; -} -} -obj* l_Lean_Parser_ParsecT_try___rarg(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; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_4, x_5); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_try___rarg___lambda__1), 2, 1); -lean::closure_set(x_8, 0, x_1); -x_9 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_try(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_try___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_try___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_try(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_2, 2); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -lean::dec(x_1); -return x_2; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; uint8 x_6; -x_5 = lean::cnstr_get(x_2, 2); -lean::dec(x_5); -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_1, 2); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_9, 0, x_8); -lean::closure_set(x_9, 1, x_7); -lean::cnstr_set(x_3, 0, x_9); -return x_2; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_3, 0); -lean::inc(x_10); -lean::dec(x_3); -x_11 = lean::cnstr_get(x_1, 2); -lean::inc(x_11); -lean::dec(x_1); -x_12 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_12, 0, x_11); -lean::closure_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_2, 2, x_13); -return x_2; -} -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_14 = lean::cnstr_get(x_2, 0); -x_15 = lean::cnstr_get(x_2, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_2); -x_16 = lean::cnstr_get(x_3, 0); -lean::inc(x_16); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - x_17 = x_3; -} else { - lean::dec_ref(x_3); - x_17 = lean::box(0); -} -x_18 = lean::cnstr_get(x_1, 2); -lean::inc(x_18); -lean::dec(x_1); -x_19 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_19, 0, x_18); -lean::closure_set(x_19, 1, x_16); -if (lean::is_scalar(x_17)) { - x_20 = lean::alloc_cnstr(1, 1, 0); -} else { - x_20 = x_17; -} -lean::cnstr_set(x_20, 0, x_19); -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_14); -lean::cnstr_set(x_21, 1, x_15); -lean::cnstr_set(x_21, 2, x_20); -return x_21; -} -} -} -else -{ -uint8 x_22; -x_22 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); -if (x_22 == 0) -{ -uint8 x_23; -x_23 = !lean::is_exclusive(x_2); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_2, 0); -x_25 = l_Lean_Parser_ParsecT_merge___rarg(x_1, x_24); -lean::cnstr_set(x_2, 0, x_25); -return x_2; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_2, 0); -lean::inc(x_26); -lean::dec(x_2); -x_27 = l_Lean_Parser_ParsecT_merge___rarg(x_1, x_26); -x_28 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set_scalar(x_28, sizeof(void*)*1, x_22); -return x_28; -} -} -else -{ -lean::dec(x_1); -return x_2; -} -} -} -} -obj* l_Lean_Parser_ParsecT_orelseMkRes(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_orelseMkRes___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_orelse___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_2, x_3); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_orelse___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_11; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_11 = lean::box(0); -x_6 = x_11; -goto block_10; -} -else -{ -uint8 x_12; -x_12 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = lean::cnstr_get(x_5, 0); -lean::inc(x_13); -lean::dec(x_5); -x_14 = lean::apply_1(x_2, x_3); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_orelse___rarg___lambda__1), 3, 2); -lean::closure_set(x_15, 0, x_1); -lean::closure_set(x_15, 1, x_13); -x_16 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_14, x_15); -return x_16; -} -else -{ -obj* x_17; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_17 = lean::box(0); -x_6 = x_17; -goto block_10; -} -} -block_10: -{ -obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_6); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::apply_2(x_8, lean::box(0), x_5); -return x_9; -} -} -} -obj* l_Lean_Parser_ParsecT_orelse___rarg(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -lean::inc(x_6); -x_8 = lean::apply_1(x_4, x_6); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_orelse___rarg___lambda__2), 5, 4); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_5); -lean::closure_set(x_9, 2, x_6); -lean::closure_set(x_9, 3, x_7); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_ParsecT_orelse(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_orelse___rarg), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_orelse___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_orelse(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_Alternative___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_ParsecT_failure___rarg(x_1, lean::box(0), lean::box(0), x_3); -return x_4; -} -} -obj* l_Lean_Parser_ParsecT_Alternative___rarg___lambda__2(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; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -lean::inc(x_5); -x_7 = lean::apply_1(x_3, x_5); -lean::inc(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_orelse___rarg___lambda__2), 5, 4); -lean::closure_set(x_8, 0, x_1); -lean::closure_set(x_8, 1, x_4); -lean::closure_set(x_8, 2, x_5); -lean::closure_set(x_8, 3, x_6); -x_9 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_Alternative___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -lean::inc(x_1); -x_3 = l_Lean_Parser_ParsecT_Monad___rarg(x_1, lean::box(0)); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -lean::inc(x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Alternative___rarg___lambda__1), 3, 1); -lean::closure_set(x_5, 0, x_1); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Alternative___rarg___lambda__2), 5, 1); -lean::closure_set(x_6, 0, x_1); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_Alternative(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Alternative___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_Alternative___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_Alternative(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; uint8 x_6; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::cnstr_get(x_3, 2); -lean::dec(x_7); -x_8 = lean::cnstr_get(x_3, 1); -lean::dec(x_8); -x_9 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_3, 2, x_9); -lean::cnstr_set(x_3, 1, x_2); -x_10 = lean::apply_2(x_5, lean::box(0), x_3); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -lean::dec(x_3); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_2); -lean::cnstr_set(x_13, 2, x_12); -x_14 = lean::apply_2(x_5, lean::box(0), x_13); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_2); -x_15 = lean::cnstr_get(x_1, 0); -lean::inc(x_15); -lean::dec(x_1); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -lean::dec(x_15); -x_17 = lean::apply_2(x_16, lean::box(0), x_3); -return x_17; -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___rarg(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; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -lean::inc(x_5); -x_7 = lean::apply_1(x_4, x_5); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_lookahead___rarg___lambda__1), 3, 2); -lean::closure_set(x_8, 0, x_1); -lean::closure_set(x_8, 1, x_5); -x_9 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_lookahead(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_lookahead___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_lookahead(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Lean_Parser_MonadParsec___rarg___lambda__1(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; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::apply_1(x_3, x_4); -x_8 = lean::apply_2(x_6, lean::box(0), x_7); -return x_8; -} -} -obj* l_Lean_Parser_Lean_Parser_MonadParsec___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::apply_5(x_3, lean::box(0), x_1, lean::box(0), x_4, x_5); -return x_6; -} -} -obj* l_Lean_Parser_Lean_Parser_MonadParsec___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -lean::inc(x_1); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Lean_Parser_MonadParsec___rarg___lambda__1), 4, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Lean_Parser_MonadParsec___rarg___lambda__2), 5, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Lean_Parser_MonadParsec(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Lean_Parser_MonadParsec___rarg), 1, 0); -return x_3; -} -} -obj* l_Lean_Parser_Lean_Parser_MonadParsec___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Lean_Parser_MonadParsec(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_monadParsecTrans___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::apply_2(x_5, lean::box(0), x_4); -x_7 = lean::apply_2(x_2, lean::box(0), x_6); -return x_7; -} -} -obj* l_Lean_Parser_monadParsecTrans___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::apply_3(x_5, lean::box(0), x_2, x_4); -return x_6; -} -} -obj* l_Lean_Parser_monadParsecTrans___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_monadParsecTrans___rarg___lambda__2), 4, 2); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -x_7 = lean::apply_3(x_2, lean::box(0), x_6, x_5); -return x_7; -} -} -obj* l_Lean_Parser_monadParsecTrans___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -lean::inc(x_3); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_monadParsecTrans___rarg___lambda__1), 4, 2); -lean::closure_set(x_4, 0, x_3); -lean::closure_set(x_4, 1, x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_monadParsecTrans___rarg___lambda__3), 5, 2); -lean::closure_set(x_5, 0, x_3); -lean::closure_set(x_5, 1, x_2); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* l_Lean_Parser_monadParsecTrans(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_monadParsecTrans___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_monadParsecTrans___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_monadParsecTrans(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_error___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_6; uint8 x_7; obj* x_8; -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_2); -lean::cnstr_set(x_6, 2, x_3); -lean::cnstr_set(x_6, 3, x_4); -x_7 = 0; -x_8 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set_scalar(x_8, sizeof(void*)*1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; uint8 x_11; obj* x_12; -lean::dec(x_5); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -lean::cnstr_set(x_10, 2, x_3); -lean::cnstr_set(x_10, 3, x_4); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -return x_12; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_4); -lean::closure_set(x_8, 3, x_6); -x_9 = lean::apply_2(x_7, lean::box(0), x_8); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_error(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___rarg), 6, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_error___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_error___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_error___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_error(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_leftOver___rarg___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_1); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_1); -lean::cnstr_set(x_3, 2, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_leftOver___rarg___lambda__1), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_leftOver___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -lean::dec(x_1); -x_3 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_4 = lean::apply_2(x_2, lean::box(0), x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_leftOver(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_leftOver___rarg), 1, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_leftOver___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_leftOver(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* _init_l_Lean_Parser_MonadParsec_remaining___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_String_OldIterator_remaining___boxed), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_remaining___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_8 = lean::apply_2(x_6, lean::box(0), x_7); -x_9 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_10 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_remaining(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_remaining___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_remaining___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_remaining(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_labels___rarg___lambda__1(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_3, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_5, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_labels___rarg___lambda__1), 3, 2); -lean::closure_set(x_9, 0, x_3); -lean::closure_set(x_9, 1, x_1); -x_10 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_labels___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::apply_3(x_5, lean::box(0), x_6, x_3); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_labels(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_labels___rarg), 4, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_labels___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_labels___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_labels(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_label___rarg(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; -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed), 6, 1); -lean::closure_set(x_7, 0, x_5); -x_8 = lean::apply_3(x_6, lean::box(0), x_7, x_3); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_label(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_label___rarg), 4, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_label___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_label(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_hidden___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = l_mjoin___rarg___closed__1; -x_6 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_2, x_5); -x_7 = lean::apply_2(x_4, lean::box(0), x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_hidden___rarg___lambda__2(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; -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_4, x_5); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_hidden___rarg___lambda__1), 2, 1); -lean::closure_set(x_8, 0, x_2); -x_9 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_MonadParsec_hidden___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_hidden___rarg___lambda__2___boxed), 5, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_hidden___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_MonadParsec_hidden___rarg___closed__1; -x_6 = lean::apply_3(x_4, lean::box(0), x_5, x_3); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_hidden(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_hidden___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_hidden___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_hidden___rarg___lambda__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_hidden___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_hidden(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_try___rarg___lambda__1(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; -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_4, x_5); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_try___rarg___lambda__1), 2, 1); -lean::closure_set(x_8, 0, x_2); -x_9 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_MonadParsec_try___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_try___rarg___lambda__1___boxed), 5, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_try___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_MonadParsec_try___rarg___closed__1; -x_6 = lean::apply_3(x_4, lean::box(0), x_5, x_3); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_try(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_try___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_try___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_try___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_try___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_try(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_lookahead___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_ParsecT_lookahead___rarg(x_2, lean::box(0), lean::box(0), x_4, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_MonadParsec_lookahead___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_lookahead___rarg___lambda__1___boxed), 5, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_lookahead___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_MonadParsec_lookahead___rarg___closed__1; -x_6 = lean::apply_3(x_4, lean::box(0), x_5, x_3); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_lookahead(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_lookahead___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_lookahead___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_lookahead___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_lookahead___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_lookahead(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBySat___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = l_String_OldIterator_hasNext___main(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_3); -lean::dec(x_2); -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::box(0); -x_9 = lean::apply_2(x_7, lean::box(0), x_8); -return x_9; -} -else -{ -uint32 x_10; obj* x_11; obj* x_12; uint8 x_13; -x_10 = l_String_OldIterator_curr___main(x_4); -x_11 = lean::box_uint32(x_10); -x_12 = lean::apply_1(x_2, x_11); -x_13 = lean::unbox(x_12); -lean::dec(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_3); -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::box(0); -x_17 = lean::apply_2(x_15, lean::box(0), x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -lean::dec(x_1); -x_18 = l_Char_quoteCore(x_10); -x_19 = l_Char_HasRepr___closed__1; -x_20 = lean::string_append(x_19, x_18); -lean::dec(x_18); -x_21 = lean::string_append(x_20, x_19); -x_22 = lean::box(0); -x_23 = l_mjoin___rarg___closed__1; -x_24 = l_Lean_Parser_MonadParsec_error___rarg(x_3, lean::box(0), x_21, x_23, x_22, x_22); -return x_24; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBySat___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_notFollowedBySat___rarg___lambda__1___boxed), 4, 3); -lean::closure_set(x_8, 0, x_1); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_2); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBySat(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_notFollowedBySat___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBySat___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_notFollowedBySat___rarg___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBySat___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_notFollowedBySat(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("end of input"); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_eoiError___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; -x_2 = lean::box(0); -x_3 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_4 = l_mjoin___rarg___closed__1; -x_5 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_3); -lean::cnstr_set(x_5, 2, x_4); -lean::cnstr_set(x_5, 3, x_2); -x_6 = 0; -x_7 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set_scalar(x_7, sizeof(void*)*1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_eoiError(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_eoiError___rarg), 1, 0); -return x_3; -} -} -obj* _init_l_Lean_Parser_MonadParsec_curr___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_String_OldIterator_curr___boxed), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_curr___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_8 = lean::apply_2(x_6, lean::box(0), x_7); -x_9 = l_Lean_Parser_MonadParsec_curr___rarg___closed__1; -x_10 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_curr(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_curr___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_curr___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_curr(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_cond___rarg___lambda__1(obj* x_1, obj* x_2, uint8 x_3) { -_start: -{ -if (x_3 == 0) -{ -lean::inc(x_1); -return x_1; -} -else -{ -lean::inc(x_2); -return x_2; -} -} -} -obj* l_Lean_Parser_MonadParsec_cond___rarg(obj* x_1, obj* 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; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_Lean_Parser_MonadParsec_curr___rarg(x_1, x_2); -x_12 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_4, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_cond___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_13, 0, x_6); -lean::closure_set(x_13, 1, x_5); -x_14 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_12, x_13); -return x_14; -} -} -obj* l_Lean_Parser_MonadParsec_cond(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_cond___rarg), 6, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_cond___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_MonadParsec_cond___rarg___lambda__1(x_1, x_2, x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_cond___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_cond(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1(obj* x_1, uint32 x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = l_String_OldIterator_next___main(x_1); -x_5 = lean::box(0); -x_6 = lean::box_uint32(x_2); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_4); -lean::cnstr_set(x_7, 2, x_5); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = l_String_OldIterator_hasNext___main(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_7, x_8, x_6, x_6); -return x_9; -} -else -{ -uint32 x_10; obj* x_11; obj* x_12; uint8 x_13; -x_10 = l_String_OldIterator_curr___main(x_4); -x_11 = lean::box_uint32(x_10); -x_12 = lean::apply_1(x_2, x_11); -x_13 = lean::unbox(x_12); -lean::dec(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_4); -lean::dec(x_3); -x_14 = l_Char_quoteCore(x_10); -x_15 = l_Char_HasRepr___closed__1; -x_16 = lean::string_append(x_15, x_14); -lean::dec(x_14); -x_17 = lean::string_append(x_16, x_15); -x_18 = lean::box(0); -x_19 = l_mjoin___rarg___closed__1; -x_20 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_17, x_19, x_18, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_1); -x_21 = lean::box_uint32(x_10); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_22, 0, x_4); -lean::closure_set(x_22, 1, x_21); -x_23 = lean::apply_2(x_3, lean::box(0), x_22); -return x_23; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_satisfy___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_5); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__2), 4, 3); -lean::closure_set(x_8, 0, x_2); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_5); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_satisfy(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_5 = l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1(x_1, x_4, x_3); -lean::dec(x_3); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_satisfy___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_satisfy(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_ch___rarg___lambda__1(obj* x_1, uint32 x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = l_String_OldIterator_hasNext___main(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_4); -lean::dec(x_3); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_7, x_8, x_6, x_6); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_4); -x_11 = x_10 == x_2; -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_4); -lean::dec(x_3); -x_12 = l_Char_quoteCore(x_10); -x_13 = l_Char_HasRepr___closed__1; -x_14 = lean::string_append(x_13, x_12); -lean::dec(x_12); -x_15 = lean::string_append(x_14, x_13); -x_16 = lean::box(0); -x_17 = l_mjoin___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_15, x_17, x_16, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_1); -x_19 = lean::box_uint32(x_10); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_20, 0, x_4); -lean::closure_set(x_20, 1, x_19); -x_21 = lean::apply_2(x_3, lean::box(0), x_20); -return x_21; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_ch___rarg(obj* x_1, obj* x_2, uint32 x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_5); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -x_8 = lean::box_uint32(x_3); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_ch___rarg___lambda__1___boxed), 4, 3); -lean::closure_set(x_9, 0, x_2); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_5); -x_10 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_9); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_ch(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_ch___rarg___boxed), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_ch___rarg___lambda__1___boxed(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_2); -lean::dec(x_2); -x_6 = l_Lean_Parser_MonadParsec_ch___rarg___lambda__1(x_1, x_5, x_3, x_4); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_ch___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_MonadParsec_ch___rarg(x_1, x_2, x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_ch___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_ch(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_alpha___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = l_Char_isAlpha(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_3); -lean::dec(x_2); -x_11 = l_Char_quoteCore(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_12, x_11); -lean::dec(x_11); -x_14 = lean::string_append(x_13, x_12); -x_15 = lean::box(0); -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_14, x_16, x_15, x_15); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_1); -x_18 = lean::box_uint32(x_9); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_19, 0, x_3); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::apply_2(x_2, lean::box(0), x_19); -return x_20; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_alpha___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_4); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_alpha___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_4); -x_8 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_alpha(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_alpha___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_alpha___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_alpha(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_digit___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = l_Char_isDigit(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_3); -lean::dec(x_2); -x_11 = l_Char_quoteCore(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_12, x_11); -lean::dec(x_11); -x_14 = lean::string_append(x_13, x_12); -x_15 = lean::box(0); -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_14, x_16, x_15, x_15); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_1); -x_18 = lean::box_uint32(x_9); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_19, 0, x_3); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::apply_2(x_2, lean::box(0), x_19); -return x_20; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_digit___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_4); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_digit___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_4); -x_8 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_digit(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_digit___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_digit___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_digit(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_upper___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = l_Char_isUpper(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_3); -lean::dec(x_2); -x_11 = l_Char_quoteCore(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_12, x_11); -lean::dec(x_11); -x_14 = lean::string_append(x_13, x_12); -x_15 = lean::box(0); -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_14, x_16, x_15, x_15); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_1); -x_18 = lean::box_uint32(x_9); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_19, 0, x_3); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::apply_2(x_2, lean::box(0), x_19); -return x_20; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_upper___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_4); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_upper___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_4); -x_8 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_upper(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_upper___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_upper___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_upper(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_lower___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = l_Char_isLower(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_3); -lean::dec(x_2); -x_11 = l_Char_quoteCore(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_12, x_11); -lean::dec(x_11); -x_14 = lean::string_append(x_13, x_12); -x_15 = lean::box(0); -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_14, x_16, x_15, x_15); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_1); -x_18 = lean::box_uint32(x_9); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_19, 0, x_3); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::apply_2(x_2, lean::box(0), x_19); -return x_20; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_lower___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_4); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_lower___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_4); -x_8 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_lower(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_lower___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_lower___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_lower(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_any___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = l_True_Decidable; -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -lean::dec(x_3); -lean::dec(x_2); -x_11 = l_Char_quoteCore(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_12, x_11); -lean::dec(x_11); -x_14 = lean::string_append(x_13, x_12); -x_15 = lean::box(0); -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_14, x_16, x_15, x_15); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_1); -x_18 = lean::box_uint32(x_9); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_19, 0, x_3); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::apply_2(x_2, lean::box(0), x_19); -return x_20; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_any___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_4); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_any___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_4); -x_8 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_any(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_any___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_any___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_any(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_2__strAux___main(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -lean::dec(x_3); -lean::dec(x_2); -x_9 = lean::box(0); -return x_9; -} -else -{ -uint32 x_10; uint32 x_11; uint8 x_12; -x_10 = l_String_OldIterator_curr___main(x_2); -x_11 = l_String_OldIterator_curr___main(x_3); -x_12 = x_10 == x_11; -if (x_12 == 0) -{ -obj* x_13; -lean::dec(x_7); -lean::dec(x_3); -lean::dec(x_2); -x_13 = lean::box(0); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -x_14 = l_String_OldIterator_next___main(x_2); -x_15 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_14; -x_3 = x_15; -goto _start; -} -} -} -else -{ -obj* x_17; -lean::dec(x_2); -lean::dec(x_1); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_3); -return x_17; -} -} -} -obj* l___private_init_lean_parser_parsec_2__strAux(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_parsec_2__strAux___main(x_1, x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::string_length(x_1); -x_5 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_5); -lean::inc(x_3); -x_7 = l___private_init_lean_parser_parsec_2__strAux___main(x_4, x_6, x_3); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; uint8 x_11; obj* x_12; -lean::dec(x_1); -x_8 = lean::box(0); -x_9 = l_String_splitAux___main___closed__1; -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_3); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_2); -lean::cnstr_set(x_10, 3, x_8); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; -lean::dec(x_3); -lean::dec(x_2); -x_13 = lean::cnstr_get(x_7, 0); -lean::inc(x_13); -lean::dec(x_7); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_13); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -obj* l_Lean_Parser_MonadParsec_strCore___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = l_String_isEmpty(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_1); -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_strCore___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_3); -lean::closure_set(x_7, 1, x_4); -x_8 = lean::apply_2(x_6, lean::box(0), x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -lean::dec(x_1); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_String_splitAux___main___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -return x_12; -} -} -} -obj* l_Lean_Parser_MonadParsec_strCore(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_strCore___rarg), 4, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_strCore(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_str___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -lean::inc(x_3); -x_4 = l_String_quote(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = l_Lean_Parser_MonadParsec_strCore___rarg(x_1, x_2, x_3, x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_str(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_str___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_str___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_str(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_3__takeAux___main___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -lean::dec(x_2); -x_9 = l_Lean_Parser_MonadParsec_eoiError___rarg(x_3); -return x_9; -} -else -{ -uint32 x_10; obj* x_11; obj* x_12; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = lean::string_push(x_2, x_10); -x_12 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_11; -x_3 = x_12; -goto _start; -} -} -else -{ -obj* x_14; obj* x_15; -lean::dec(x_1); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_3); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -obj* l___private_init_lean_parser_parsec_3__takeAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_3__takeAux___main___rarg), 3, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parsec_3__takeAux___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_parsec_3__takeAux___main___rarg(x_1, x_2, x_3); -return x_4; -} -} -obj* l___private_init_lean_parser_parsec_3__takeAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_3__takeAux___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_take___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_3, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_1); -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_String_splitAux___main___closed__1; -x_8 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_3__takeAux___rarg), 3, 2); -lean::closure_set(x_8, 0, x_3); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::apply_2(x_6, lean::box(0), x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -lean::dec(x_3); -lean::dec(x_2); -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -lean::dec(x_1); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -x_12 = l_String_splitAux___main___closed__1; -x_13 = lean::apply_2(x_11, lean::box(0), x_12); -return x_13; -} -} -} -obj* l_Lean_Parser_MonadParsec_take(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_take___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_take___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_take(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_4__mkStringResult___rarg(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = l_String_isEmpty(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::box(0); -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_2); -lean::cnstr_set(x_7, 2, x_6); -return x_7; -} -} -} -obj* l___private_init_lean_parser_parsec_4__mkStringResult(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_4__mkStringResult___rarg), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_2, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_2, x_7); -lean::dec(x_2); -x_9 = l_String_OldIterator_hasNext___main(x_4); -if (x_9 == 0) -{ -obj* x_10; -lean::dec(x_8); -lean::dec(x_1); -x_10 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_10; -} -else -{ -uint32 x_11; obj* x_12; obj* x_13; uint8 x_14; -x_11 = l_String_OldIterator_curr___main(x_4); -x_12 = lean::box_uint32(x_11); -lean::inc(x_1); -x_13 = lean::apply_1(x_1, x_12); -x_14 = lean::unbox(x_13); -lean::dec(x_13); -if (x_14 == 0) -{ -obj* x_15; -lean::dec(x_8); -lean::dec(x_1); -x_15 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::string_push(x_3, x_11); -x_17 = l_String_OldIterator_next___main(x_4); -x_2 = x_8; -x_3 = x_16; -x_4 = x_17; -goto _start; -} -} -} -else -{ -obj* x_19; -lean::dec(x_2); -lean::dec(x_1); -x_19 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_19; -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_5__takeWhileAux___main___rarg), 4, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___rarg(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_5__takeWhileAux___rarg), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_String_OldIterator_remaining___main(x_2); -x_4 = l_String_splitAux___main___closed__1; -x_5 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___rarg(x_1, x_3, x_4, x_2); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile___rarg___lambda__1), 2, 1); -lean::closure_set(x_4, 0, x_2); -x_5 = lean::apply_2(x_3, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = l_String_OldIterator_remaining___main(x_3); -x_5 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___rarg(x_1, x_4, x_2, x_3); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___rarg___lambda__1), 3, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_3); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhileCont(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___rarg___lambda__1(obj* x_1, obj* x_2, uint32 x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_String_splitAux___main___closed__1; -x_5 = lean::string_push(x_4, x_3); -x_6 = l_Lean_Parser_MonadParsec_takeWhileCont___rarg(x_1, x_2, x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_5); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -lean::inc(x_3); -lean::inc(x_2); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__2), 4, 3); -lean::closure_set(x_8, 0, x_2); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_5); -lean::inc(x_4); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_10, 0, x_2); -lean::closure_set(x_10, 1, x_3); -x_11 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_MonadParsec_takeWhile1___rarg___lambda__1(x_1, x_2, x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_takeWhile1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_2, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_2, x_7); -lean::dec(x_2); -x_9 = l_String_OldIterator_hasNext___main(x_4); -if (x_9 == 0) -{ -obj* x_10; -lean::dec(x_8); -lean::dec(x_1); -x_10 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_10; -} -else -{ -uint32 x_11; obj* x_12; obj* x_13; uint8 x_14; -x_11 = l_String_OldIterator_curr___main(x_4); -x_12 = lean::box_uint32(x_11); -lean::inc(x_1); -x_13 = lean::apply_1(x_1, x_12); -x_14 = lean::unbox(x_13); -lean::dec(x_13); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::string_push(x_3, x_11); -x_16 = l_String_OldIterator_next___main(x_4); -x_2 = x_8; -x_3 = x_15; -x_4 = x_16; -goto _start; -} -else -{ -obj* x_18; -lean::dec(x_8); -lean::dec(x_1); -x_18 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_18; -} -} -} -else -{ -obj* x_19; -lean::dec(x_2); -lean::dec(x_1); -x_19 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_19; -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil___spec__2___rarg), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_String_OldIterator_remaining___main(x_2); -x_4 = l_String_splitAux___main___closed__1; -x_5 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil___spec__2___rarg(x_1, x_3, x_4, x_2); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___rarg___lambda__1), 2, 1); -lean::closure_set(x_4, 0, x_2); -x_5 = lean::apply_2(x_3, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeUntil___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___rarg(x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeUntil(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeUntil___rarg___boxed), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_MonadParsec_takeUntil___spec__1(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeUntil___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeUntil___rarg(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeUntil___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_takeUntil(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil1___spec__3___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_2, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_2, x_7); -lean::dec(x_2); -x_9 = l_String_OldIterator_hasNext___main(x_4); -if (x_9 == 0) -{ -obj* x_10; -lean::dec(x_8); -lean::dec(x_1); -x_10 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_10; -} -else -{ -uint32 x_11; obj* x_12; obj* x_13; uint8 x_14; -x_11 = l_String_OldIterator_curr___main(x_4); -x_12 = lean::box_uint32(x_11); -lean::inc(x_1); -x_13 = lean::apply_1(x_1, x_12); -x_14 = lean::unbox(x_13); -lean::dec(x_13); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::string_push(x_3, x_11); -x_16 = l_String_OldIterator_next___main(x_4); -x_2 = x_8; -x_3 = x_15; -x_4 = x_16; -goto _start; -} -else -{ -obj* x_18; -lean::dec(x_8); -lean::dec(x_1); -x_18 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_18; -} -} -} -else -{ -obj* x_19; -lean::dec(x_2); -lean::dec(x_1); -x_19 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_19; -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil1___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil1___spec__3___rarg), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = l_String_OldIterator_remaining___main(x_3); -x_5 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_takeUntil1___spec__3___rarg(x_1, x_4, x_2, x_3); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___rarg___lambda__1), 3, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_3); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = l_String_OldIterator_hasNext___main(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_7, x_8, x_6, x_6); -return x_9; -} -else -{ -uint32 x_10; obj* x_11; obj* x_12; uint8 x_13; -x_10 = l_String_OldIterator_curr___main(x_4); -x_11 = lean::box_uint32(x_10); -x_12 = lean::apply_1(x_2, x_11); -x_13 = lean::unbox(x_12); -lean::dec(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -lean::dec(x_1); -x_14 = lean::box_uint32(x_10); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_15, 0, x_4); -lean::closure_set(x_15, 1, x_14); -x_16 = lean::apply_2(x_3, lean::box(0), x_15); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_4); -lean::dec(x_3); -x_17 = l_Char_quoteCore(x_10); -x_18 = l_Char_HasRepr___closed__1; -x_19 = lean::string_append(x_18, x_17); -lean::dec(x_17); -x_20 = lean::string_append(x_19, x_18); -x_21 = lean::box(0); -x_22 = l_mjoin___rarg___closed__1; -x_23 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_20, x_22, x_21, x_21); -return x_23; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, uint32 x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_String_splitAux___main___closed__1; -x_6 = lean::string_push(x_5, x_4); -x_7 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___rarg(x_2, x_3, x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_5); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -lean::inc(x_3); -lean::inc(x_2); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__1), 4, 3); -lean::closure_set(x_8, 0, x_2); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_5); -lean::inc(x_4); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__2___boxed), 4, 3); -lean::closure_set(x_10, 0, x_1); -lean::closure_set(x_10, 1, x_2); -lean::closure_set(x_10, 2, x_3); -x_11 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeUntil1___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg(x_1, x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeUntil1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeUntil1___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_takeUntil1___spec__2(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__2___boxed(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_4); -lean::dec(x_4); -x_6 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___rarg___lambda__2(x_1, x_2, x_3, x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_takeUntil1___spec__1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeUntil1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_takeUntil1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(uint8 x_1, obj* x_2) { -_start: -{ -if (x_1 == 0) -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::box(0); -x_4 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::box(0); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set(x_8, 2, x_6); -return x_8; -} -} -} -obj* l___private_init_lean_parser_parsec_6__mkConsumedResult(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = lean::unbox(x_1); -lean::dec(x_1); -x_4 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_3, x_2); -return x_4; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___rarg(obj* x_1, obj* x_2, uint8 x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_2, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_2, x_7); -lean::dec(x_2); -x_9 = l_String_OldIterator_hasNext___main(x_4); -if (x_9 == 0) -{ -obj* x_10; -lean::dec(x_8); -lean::dec(x_1); -x_10 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_3, x_4); -return x_10; -} -else -{ -uint32 x_11; obj* x_12; obj* x_13; uint8 x_14; -x_11 = l_String_OldIterator_curr___main(x_4); -x_12 = lean::box_uint32(x_11); -lean::inc(x_1); -x_13 = lean::apply_1(x_1, x_12); -x_14 = lean::unbox(x_13); -lean::dec(x_13); -if (x_14 == 0) -{ -obj* x_15; -lean::dec(x_8); -lean::dec(x_1); -x_15 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_3, x_4); -return x_15; -} -else -{ -obj* x_16; uint8 x_17; -x_16 = l_String_OldIterator_next___main(x_4); -x_17 = 1; -x_2 = x_8; -x_3 = x_17; -x_4 = x_16; -goto _start; -} -} -} -else -{ -obj* x_19; -lean::dec(x_2); -lean::dec(x_1); -x_19 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_3, x_4); -return x_19; -} -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; obj* x_6; -x_5 = lean::unbox(x_3); -lean::dec(x_3); -x_6 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___rarg(x_1, x_2, x_5, x_4); -return x_6; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___rarg(obj* x_1, obj* x_2, uint8 x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___rarg(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_7__takeWhileAux_x27___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; obj* x_6; -x_5 = lean::unbox(x_3); -lean::dec(x_3); -x_6 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___rarg(x_1, x_2, x_5, x_4); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; obj* x_5; -x_3 = l_String_OldIterator_remaining___main(x_2); -x_4 = 0; -x_5 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___rarg(x_1, x_3, x_4, x_2); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile_x27___rarg___lambda__1), 2, 1); -lean::closure_set(x_4, 0, x_2); -x_5 = lean::apply_2(x_3, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile_x27___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile_x27(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1_x27___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_4, 4); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -x_8 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_7); -x_9 = lean::apply_2(x_7, lean::box(0), x_8); -lean::inc(x_3); -lean::inc(x_2); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__2), 4, 3); -lean::closure_set(x_10, 0, x_2); -lean::closure_set(x_10, 1, x_3); -lean::closure_set(x_10, 2, x_7); -x_11 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_9, x_10); -x_12 = l_Lean_Parser_MonadParsec_takeWhile_x27___rarg(x_2, x_3); -x_13 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_11, x_12); -return x_13; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1_x27(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1_x27___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1_x27___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_takeWhile1_x27(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2___rarg(obj* x_1, uint8 x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Char_isWhitespace(x_10); -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_12; -} -else -{ -obj* x_13; uint8 x_14; -x_13 = l_String_OldIterator_next___main(x_3); -x_14 = 1; -x_1 = x_7; -x_2 = x_14; -x_3 = x_13; -goto _start; -} -} -} -else -{ -obj* x_16; -lean::dec(x_1); -x_16 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_16; -} -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; uint8 x_3; obj* x_4; -x_2 = l_String_OldIterator_remaining___main(x_1); -x_3 = 0; -x_4 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2___rarg(x_2, x_3, x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___lambda__1), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -lean::dec(x_1); -x_3 = l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___closed__1; -x_4 = lean::apply_2(x_2, lean::box(0), x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg), 1, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_whitespace___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_whitespace(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_whitespace___rarg___boxed), 2, 0); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_2); -lean::dec(x_2); -x_5 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at_Lean_Parser_MonadParsec_whitespace___spec__2___rarg(x_1, x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_whitespace___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_whitespace___rarg(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_whitespace___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_whitespace(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_lexeme___rarg(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; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_5, 3); -lean::inc(x_6); -lean::dec(x_5); -x_7 = l_Lean_Parser_MonadParsec_whitespace___rarg(x_1, x_2); -lean::dec(x_1); -x_8 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_4, x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_lexeme(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_lexeme___rarg), 4, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_lexeme___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_lexeme(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_num___spec__3___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Char_isDigit(x_10); -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::string_push(x_2, x_10); -x_14 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_13; -x_3 = x_14; -goto _start; -} -} -} -else -{ -obj* x_16; -lean::dec(x_1); -x_16 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_16; -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_num___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_num___spec__3___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_String_OldIterator_remaining___main(x_2); -x_4 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_MonadParsec_num___spec__3___rarg(x_3, x_1, x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___rarg___lambda__1), 2, 1); -lean::closure_set(x_4, 0, x_2); -x_5 = lean::apply_2(x_3, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg___lambda__1(obj* x_1, obj* x_2, uint32 x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_String_splitAux___main___closed__1; -x_5 = lean::string_push(x_4, x_3); -x_6 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___rarg(x_2, x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_4); -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -lean::inc(x_2); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_digit___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_4); -lean::inc(x_3); -x_8 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_6, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_2); -x_10 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg), 2, 0); -return x_3; -} -} -obj* _init_l_Lean_Parser_MonadParsec_num___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_String_toNat___boxed), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_num___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg(x_1, x_2); -x_7 = l_Lean_Parser_MonadParsec_num___rarg___closed__1; -x_8 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_7, x_6); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_num(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_num___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_MonadParsec_num___spec__2(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___rarg___lambda__1(x_1, x_2, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_MonadParsec_num___spec__1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_num___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_num(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("at least "); -return x_1; -} -} -obj* _init_l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string(" characters"); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = l_String_OldIterator_remaining___main(x_4); -x_6 = lean::nat_dec_le(x_1, x_5); -lean::dec(x_5); -if (x_6 == 0) -{ -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; -lean::dec(x_3); -x_7 = l_Nat_repr(x_1); -x_8 = l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__1; -x_9 = lean::string_append(x_8, x_7); -lean::dec(x_7); -x_10 = l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__2; -x_11 = lean::string_append(x_9, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::box(0); -x_14 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_15 = l_Lean_Parser_MonadParsec_error___rarg(x_2, lean::box(0), x_14, x_12, x_13, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -lean::dec(x_2); -lean::dec(x_1); -x_16 = lean::cnstr_get(x_3, 0); -lean::inc(x_16); -lean::dec(x_3); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = lean::box(0); -x_19 = lean::apply_2(x_17, lean::box(0), x_18); -return x_19; -} -} -} -obj* l_Lean_Parser_MonadParsec_ensure___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___boxed), 4, 3); -lean::closure_set(x_8, 0, x_3); -lean::closure_set(x_8, 1, x_2); -lean::closure_set(x_8, 2, x_1); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_ensure(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_ensure___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_ensure___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_ensure(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_pos___rarg___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_MonadParsec_pos___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_pos___rarg___lambda__1___boxed), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_pos___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_8 = lean::apply_2(x_6, lean::box(0), x_7); -x_9 = l_Lean_Parser_MonadParsec_pos___rarg___closed__1; -x_10 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_pos(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_pos___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_pos___rarg___lambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_MonadParsec_pos___rarg___lambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_pos___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_pos(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; obj* x_5; -x_3 = 1; -x_4 = lean::box(x_3); -x_5 = lean::apply_2(x_1, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, uint8 x_5) { -_start: -{ -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_4); -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_1); -x_7 = lean::box(0); -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___rarg(x_2, lean::box(0), x_3, x_8, x_6, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_10 = lean::box(0); -x_11 = lean::apply_2(x_4, lean::box(0), x_10); -return x_11; -} -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__3(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_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::cnstr_get(x_9, 4); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -x_12 = 0; -x_13 = lean::box(x_12); -lean::inc(x_11); -x_14 = lean::apply_2(x_11, lean::box(0), x_13); -x_15 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_3, x_14); -lean::inc(x_11); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_16, 0, x_11); -x_17 = lean::apply_3(x_8, lean::box(0), x_15, x_16); -x_18 = lean::cnstr_get(x_4, 1); -lean::inc(x_18); -x_19 = l_Lean_Parser_MonadParsec_lookahead___rarg___closed__1; -x_20 = lean::apply_3(x_18, lean::box(0), x_19, x_17); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__2___boxed), 5, 4); -lean::closure_set(x_21, 0, x_7); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_5); -lean::closure_set(x_21, 3, x_11); -x_22 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_20, x_21); -return x_22; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg(obj* x_1, obj* 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; obj* x_11; obj* x_12; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -x_9 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_10 = lean::apply_2(x_8, lean::box(0), x_9); -lean::inc(x_7); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__3), 7, 6); -lean::closure_set(x_11, 0, x_4); -lean::closure_set(x_11, 1, x_1); -lean::closure_set(x_11, 2, x_5); -lean::closure_set(x_11, 3, x_2); -lean::closure_set(x_11, 4, x_6); -lean::closure_set(x_11, 5, x_7); -x_12 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_10, x_11); -return x_12; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBy(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_notFollowedBy___rarg), 6, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__2___boxed(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); -lean::dec(x_5); -x_7 = l_Lean_Parser_MonadParsec_notFollowedBy___rarg___lambda__2(x_1, x_2, x_3, x_4, x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_notFollowedBy___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_notFollowedBy(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("end of input"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; uint8 x_6; -x_4 = l_String_OldIterator_remaining___main(x_3); -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_4, x_5); -lean::dec(x_4); -if (x_6 == 0) -{ -uint32 x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -lean::dec(x_2); -x_7 = l_String_OldIterator_curr___main(x_3); -x_8 = l_Char_quoteCore(x_7); -x_9 = l_Char_HasRepr___closed__1; -x_10 = lean::string_append(x_9, x_8); -lean::dec(x_8); -x_11 = lean::string_append(x_10, x_9); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1; -x_14 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_11, x_13, x_12, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_1); -x_15 = lean::cnstr_get(x_2, 0); -lean::inc(x_15); -lean::dec(x_2); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -lean::dec(x_15); -x_17 = lean::box(0); -x_18 = lean::apply_2(x_16, lean::box(0), x_17); -return x_18; -} -} -} -obj* l_Lean_Parser_MonadParsec_eoi___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_6 = lean::apply_2(x_4, lean::box(0), x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_1); -x_8 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_eoi(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_eoi___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_eoi___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_eoi(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::apply_2(x_2, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__2(obj* x_1, obj* 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; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_7 = lean::cnstr_get(x_1, 2); -lean::inc(x_7); -lean::inc(x_1); -x_8 = l_Lean_Parser_MonadParsec_many1Aux___main___rarg(x_2, lean::box(0), x_1, x_3, x_4); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -lean::dec(x_1); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::box(0); -lean::inc(x_10); -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = lean::apply_3(x_7, lean::box(0), x_8, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__1), 3, 2); -lean::closure_set(x_14, 0, x_6); -lean::closure_set(x_14, 1, x_10); -x_15 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_13, x_14); -return x_15; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__3(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::apply_2(x_4, lean::box(0), x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_5, x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_sub(x_5, x_8); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -lean::inc(x_10); -lean::inc(x_4); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__2___boxed), 6, 5); -lean::closure_set(x_11, 0, x_3); -lean::closure_set(x_11, 1, x_1); -lean::closure_set(x_11, 2, x_4); -lean::closure_set(x_11, 3, x_9); -lean::closure_set(x_11, 4, x_10); -x_12 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_4, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_1, 1); -lean::inc(x_13); -lean::dec(x_1); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__3), 2, 1); -lean::closure_set(x_14, 0, x_3); -x_15 = lean::apply_4(x_13, lean::box(0), lean::box(0), x_4, x_14); -return x_15; -} -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux___main___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_many1Aux___main___rarg___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_many1Aux___main___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_MonadParsec_many1Aux___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_many1Aux___main___rarg(x_1, lean::box(0), x_4, x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux___rarg___boxed), 6, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_many1Aux___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_many1Aux(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many1___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -lean::dec(x_2); -x_11 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_14 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_13, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux___main___rarg___boxed), 5, 4); -lean::closure_set(x_15, 0, x_1); -lean::closure_set(x_15, 1, lean::box(0)); -lean::closure_set(x_15, 2, x_4); -lean::closure_set(x_15, 3, x_5); -x_16 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_14, x_15); -return x_16; -} -} -obj* l_Lean_Parser_MonadParsec_many1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1___rarg), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_many1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many___rarg(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_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_4, 2); -lean::inc(x_6); -lean::inc(x_4); -x_7 = l_Lean_Parser_MonadParsec_many1___rarg(x_1, x_2, lean::box(0), x_4, x_5); -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::box(0); -x_11 = lean::apply_2(x_9, lean::box(0), x_10); -x_12 = lean::apply_3(x_6, lean::box(0), x_7, x_11); -return x_12; -} -} -obj* l_Lean_Parser_MonadParsec_many(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many___rarg), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_many(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_3, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_3, x_6); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 4); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_1, 2); -lean::inc(x_10); -lean::inc(x_2); -x_11 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg(x_1, x_2, x_7); -lean::dec(x_7); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -lean::dec(x_8); -x_13 = lean::box(0); -x_14 = lean::apply_2(x_12, lean::box(0), x_13); -x_15 = lean::apply_3(x_10, lean::box(0), x_11, x_14); -x_16 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_2, x_15); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = lean::cnstr_get(x_1, 0); -lean::inc(x_17); -lean::dec(x_1); -x_18 = lean::cnstr_get(x_17, 4); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_17, 1); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::box(0); -x_21 = lean::apply_2(x_19, lean::box(0), x_20); -x_22 = lean::apply_4(x_18, lean::box(0), lean::box(0), x_2, x_21); -return x_22; -} -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg___boxed), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_many1Aux_x27___main(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg(x_1, x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux_x27___rarg___boxed), 3, 0); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_many1Aux_x27___rarg(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_many1Aux_x27(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_many1_x27___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -lean::dec(x_2); -x_11 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_14 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_13, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg___boxed), 3, 2); -lean::closure_set(x_15, 0, x_4); -lean::closure_set(x_15, 1, x_5); -x_16 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_14, x_15); -return x_16; -} -} -obj* l_Lean_Parser_MonadParsec_many1_x27(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1_x27___rarg), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many1_x27___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_many1_x27(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many_x27___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_6 = lean::cnstr_get(x_4, 2); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_13 = lean::apply_2(x_11, lean::box(0), x_12); -x_14 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_15 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_14, x_13); -lean::inc(x_4); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many1Aux_x27___main___rarg___boxed), 3, 2); -lean::closure_set(x_16, 0, x_4); -lean::closure_set(x_16, 1, x_5); -x_17 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_15, x_16); -x_18 = lean::cnstr_get(x_4, 0); -lean::inc(x_18); -lean::dec(x_4); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::box(0); -x_21 = lean::apply_2(x_19, lean::box(0), x_20); -x_22 = lean::apply_3(x_6, lean::box(0), x_17, x_21); -return x_22; -} -} -obj* l_Lean_Parser_MonadParsec_many_x27(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_many_x27___rarg), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_many_x27___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_many_x27(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_sepBy1___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 2); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -lean::dec(x_10); -x_12 = l_List_mmap___main___rarg___closed__1; -lean::inc(x_6); -x_13 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_12, x_6); -x_14 = lean::cnstr_get(x_8, 4); -lean::inc(x_14); -lean::dec(x_8); -x_15 = lean::apply_4(x_14, lean::box(0), lean::box(0), x_7, x_6); -x_16 = l_Lean_Parser_MonadParsec_many___rarg(x_1, x_2, lean::box(0), x_5, x_15); -x_17 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_13, x_16); -return x_17; -} -} -obj* l_Lean_Parser_MonadParsec_sepBy1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_sepBy1___rarg), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_sepBy1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_sepBy1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_SepBy___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_8 = lean::cnstr_get(x_5, 2); -lean::inc(x_8); -lean::inc(x_5); -x_9 = l_Lean_Parser_MonadParsec_sepBy1___rarg(x_1, x_2, lean::box(0), lean::box(0), x_5, x_6, x_7); -x_10 = lean::cnstr_get(x_5, 0); -lean::inc(x_10); -lean::dec(x_5); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::box(0); -x_13 = lean::apply_2(x_11, lean::box(0), x_12); -x_14 = lean::apply_3(x_8, lean::box(0), x_9, x_13); -return x_14; -} -} -obj* l_Lean_Parser_MonadParsec_SepBy(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_SepBy___rarg), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_SepBy___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_SepBy(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_MonadParsec_fixAux___main___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("fixAux: no progress"); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_fixAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_5, x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_sub(x_5, x_8); -lean::inc(x_4); -x_10 = l_Lean_Parser_MonadParsec_fixAux___main___rarg(x_1, x_2, lean::box(0), x_4, x_9); -lean::dec(x_9); -x_11 = lean::apply_1(x_4, x_10); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -lean::dec(x_4); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_MonadParsec_fixAux___main___rarg___closed__1; -x_14 = l_mjoin___rarg___closed__1; -x_15 = l_Lean_Parser_MonadParsec_error___rarg(x_2, lean::box(0), x_13, x_14, x_12, x_12); -return x_15; -} -} -} -obj* l_Lean_Parser_MonadParsec_fixAux___main(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_fixAux___main___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_fixAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_fixAux___main___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_fixAux___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_fixAux___main(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_fixAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_fixAux___main___rarg(x_1, x_2, lean::box(0), x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_fixAux(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_fixAux___rarg___boxed), 6, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_fixAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_fixAux___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_fixAux___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_fixAux(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_fix___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::mk_nat_obj(1u); -x_6 = lean::nat_add(x_4, x_5); -x_7 = l_Lean_Parser_MonadParsec_fixAux___main___rarg(x_1, x_2, lean::box(0), x_3, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_fix___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_14 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_13, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_fix___rarg___lambda__1___boxed), 4, 3); -lean::closure_set(x_15, 0, x_1); -lean::closure_set(x_15, 1, x_2); -lean::closure_set(x_15, 2, x_5); -x_16 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_14, x_15); -return x_16; -} -} -obj* l_Lean_Parser_MonadParsec_fix(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_fix___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_fix___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_fix___rarg___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_fix___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_fix___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_fix___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_fix(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_foldrAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_5, x_6); -if (x_7 == 0) -{ -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; -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_sub(x_5, x_8); -x_10 = lean::cnstr_get(x_1, 2); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_1, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_11, 2); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -lean::dec(x_13); -lean::inc(x_3); -lean::inc(x_2); -x_15 = lean::apply_4(x_14, lean::box(0), lean::box(0), x_2, x_3); -lean::inc(x_4); -x_16 = l_Lean_Parser_MonadParsec_foldrAux___main___rarg(x_1, x_2, x_3, x_4, x_9); -lean::dec(x_9); -x_17 = lean::apply_4(x_12, lean::box(0), lean::box(0), x_15, x_16); -x_18 = lean::cnstr_get(x_11, 1); -lean::inc(x_18); -lean::dec(x_11); -x_19 = lean::apply_2(x_18, lean::box(0), x_4); -x_20 = lean::apply_3(x_10, lean::box(0), x_17, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_3); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_1, 0); -lean::inc(x_21); -lean::dec(x_1); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::apply_2(x_22, lean::box(0), x_4); -return x_23; -} -} -} -obj* l_Lean_Parser_MonadParsec_foldrAux___main(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldrAux___main___rarg___boxed), 5, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_foldrAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_foldrAux___main___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_foldrAux___main___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_foldrAux___main(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_foldrAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_foldrAux___main___rarg(x_1, x_2, x_3, x_4, x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_foldrAux(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldrAux___rarg___boxed), 5, 0); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_foldrAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_foldrAux___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_foldrAux___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_foldrAux(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_foldr___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = l_String_OldIterator_remaining___main(x_5); -x_7 = l_Lean_Parser_MonadParsec_foldrAux___main___rarg(x_1, x_2, x_3, x_4, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_foldr___rarg(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_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::dec(x_1); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -lean::dec(x_2); -x_11 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldr___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_13, 0, x_5); -lean::closure_set(x_13, 1, x_6); -lean::closure_set(x_13, 2, x_7); -lean::closure_set(x_13, 3, x_8); -x_14 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_12, x_13); -return x_14; -} -} -obj* l_Lean_Parser_MonadParsec_foldr(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldr___rarg), 8, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_foldr___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_foldr___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_foldr___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_foldr(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___rarg___lambda__1(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; -lean::inc(x_1); -x_8 = lean::apply_2(x_1, x_2, x_7); -x_9 = l_Lean_Parser_MonadParsec_foldlAux___main___rarg(x_3, lean::box(0), lean::box(0), x_4, x_1, x_5, x_8, x_6); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___rarg(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_9; uint8 x_10; -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::nat_dec_eq(x_8, x_9); -if (x_10 == 0) -{ -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; -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_sub(x_8, x_11); -x_13 = lean::cnstr_get(x_4, 2); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_1, 1); -lean::inc(x_14); -lean::inc(x_6); -lean::inc(x_4); -lean::inc(x_7); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldlAux___main___rarg___lambda__1___boxed), 7, 6); -lean::closure_set(x_15, 0, x_5); -lean::closure_set(x_15, 1, x_7); -lean::closure_set(x_15, 2, x_1); -lean::closure_set(x_15, 3, x_4); -lean::closure_set(x_15, 4, x_6); -lean::closure_set(x_15, 5, x_12); -x_16 = lean::apply_4(x_14, lean::box(0), lean::box(0), x_6, x_15); -x_17 = lean::cnstr_get(x_4, 0); -lean::inc(x_17); -lean::dec(x_4); -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -lean::dec(x_17); -x_19 = lean::apply_2(x_18, lean::box(0), x_7); -x_20 = lean::apply_3(x_13, lean::box(0), x_16, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_21 = lean::cnstr_get(x_4, 0); -lean::inc(x_21); -lean::dec(x_4); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::apply_2(x_22, lean::box(0), x_7); -return x_23; -} -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldlAux___main___rarg___boxed), 8, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___rarg___lambda__1___boxed(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; -x_8 = l_Lean_Parser_MonadParsec_foldlAux___main___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_6); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___rarg___boxed(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_9; -x_9 = l_Lean_Parser_MonadParsec_foldlAux___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_8); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_MonadParsec_foldlAux___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___rarg(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_MonadParsec_foldlAux___main___rarg(x_1, lean::box(0), lean::box(0), x_5, x_6, x_7, x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldlAux___rarg___boxed), 9, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___rarg___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_MonadParsec_foldlAux___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_9); -lean::dec(x_2); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_foldlAux(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = l_String_OldIterator_remaining___main(x_6); -x_8 = l_Lean_Parser_MonadParsec_foldlAux___main___rarg(x_1, lean::box(0), lean::box(0), x_2, x_3, x_4, x_5, x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___rarg(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_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -lean::dec(x_2); -x_11 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldl___rarg___lambda__1___boxed), 6, 5); -lean::closure_set(x_13, 0, x_1); -lean::closure_set(x_13, 1, x_5); -lean::closure_set(x_13, 2, x_6); -lean::closure_set(x_13, 3, x_8); -lean::closure_set(x_13, 4, x_7); -x_14 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_12, x_13); -return x_14; -} -} -obj* l_Lean_Parser_MonadParsec_foldl(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_foldl___rarg), 8, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_foldl___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_foldl___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_foldl(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_unexpected___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::box(0); -x_5 = l_mjoin___rarg___closed__1; -x_6 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_3, x_5, x_4, x_4); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_unexpected(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_unexpected___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_unexpected___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_unexpected(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt___rarg(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; -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = lean::box(0); -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_3, x_7, x_5, x_6); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_unexpectedAt___rarg), 4, 0); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_unexpectedAt(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_6; uint8 x_7; obj* x_8; -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -lean::cnstr_set(x_6, 2, x_2); -lean::cnstr_set(x_6, 3, x_4); -x_7 = 0; -x_8 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set_scalar(x_8, sizeof(void*)*1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; uint8 x_11; obj* x_12; -lean::dec(x_5); -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_1); -lean::cnstr_set(x_10, 2, x_2); -lean::cnstr_set(x_10, 3, x_4); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -return x_12; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_14; -x_14 = lean::cnstr_get(x_3, 2); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_3, 1); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_4, 1); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_16, 1); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::nat_dec_lt(x_17, x_18); -if (x_19 == 0) -{ -uint8 x_20; -x_20 = !lean::is_exclusive(x_3); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_21 = lean::cnstr_get(x_3, 2); -lean::dec(x_21); -x_22 = lean::cnstr_get(x_3, 1); -lean::dec(x_22); -x_23 = lean::cnstr_get(x_3, 0); -lean::dec(x_23); -x_24 = lean::nat_dec_lt(x_18, x_17); -lean::dec(x_17); -lean::dec(x_18); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_2); -lean::cnstr_set(x_25, 1, x_15); -lean::cnstr_set(x_3, 1, x_4); -lean::cnstr_set(x_3, 0, x_25); -x_26 = lean::apply_2(x_6, lean::box(0), x_3); -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -lean::dec(x_15); -x_27 = lean::box(0); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_2); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_3, 1, x_4); -lean::cnstr_set(x_3, 0, x_28); -x_29 = lean::apply_2(x_6, lean::box(0), x_3); -return x_29; -} -} -else -{ -uint8 x_30; -lean::dec(x_3); -x_30 = lean::nat_dec_lt(x_18, x_17); -lean::dec(x_17); -lean::dec(x_18); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_2); -lean::cnstr_set(x_31, 1, x_15); -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_4); -lean::cnstr_set(x_32, 2, x_14); -x_33 = lean::apply_2(x_6, lean::box(0), x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -lean::dec(x_15); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_2); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_4); -lean::cnstr_set(x_36, 2, x_14); -x_37 = lean::apply_2(x_6, lean::box(0), x_36); -return x_37; -} -} -} -else -{ -obj* x_38; -lean::dec(x_18); -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_4); -lean::dec(x_2); -x_38 = lean::apply_2(x_6, lean::box(0), x_3); -return x_38; -} -} -else -{ -obj* x_39; -lean::dec(x_14); -lean::dec(x_3); -x_39 = lean::box(0); -x_7 = x_39; -goto block_13; -} -} -else -{ -obj* x_40; -lean::dec(x_3); -x_40 = lean::box(0); -x_7 = x_40; -goto block_13; -} -block_13: -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_7); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_4); -lean::cnstr_set(x_11, 2, x_10); -x_12 = lean::apply_2(x_6, lean::box(0), x_11); -return x_12; -} -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = lean::alloc_closure(reinterpret_cast(l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__1), 4, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_5); -lean::closure_set(x_6, 2, x_2); -x_7 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_4, x_6); -return x_7; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_4); -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::apply_2(x_6, lean::box(0), x_2); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; uint8 x_15; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_4, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::cnstr_get(x_10, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -lean::dec(x_13); -x_15 = lean::nat_dec_lt(x_12, x_14); -if (x_15 == 0) -{ -uint8 x_16; -x_16 = !lean::is_exclusive(x_2); -if (x_16 == 0) -{ -obj* x_17; uint8 x_18; -x_17 = lean::cnstr_get(x_2, 0); -lean::dec(x_17); -x_18 = lean::nat_dec_lt(x_14, x_12); -lean::dec(x_14); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; uint8 x_21; obj* x_22; -x_19 = l_Lean_Parser_ParsecT_merge___rarg(x_4, x_10); -x_20 = lean::cnstr_get(x_3, 1); -x_21 = lean::nat_dec_lt(x_20, x_12); -lean::dec(x_12); -lean::cnstr_set(x_2, 0, x_19); -lean::cnstr_set_scalar(x_2, sizeof(void*)*1, x_21); -x_22 = lean::apply_2(x_9, lean::box(0), x_2); -return x_22; -} -else -{ -uint8 x_23; obj* x_24; -lean::dec(x_12); -lean::dec(x_10); -x_23 = 1; -lean::cnstr_set(x_2, 0, x_4); -lean::cnstr_set_scalar(x_2, sizeof(void*)*1, x_23); -x_24 = lean::apply_2(x_9, lean::box(0), x_2); -return x_24; -} -} -else -{ -uint8 x_25; -lean::dec(x_2); -x_25 = lean::nat_dec_lt(x_14, x_12); -lean::dec(x_14); -if (x_25 == 0) -{ -obj* x_26; obj* x_27; uint8 x_28; obj* x_29; obj* x_30; -x_26 = l_Lean_Parser_ParsecT_merge___rarg(x_4, x_10); -x_27 = lean::cnstr_get(x_3, 1); -x_28 = lean::nat_dec_lt(x_27, x_12); -lean::dec(x_12); -x_29 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_29, 0, x_26); -lean::cnstr_set_scalar(x_29, sizeof(void*)*1, x_28); -x_30 = lean::apply_2(x_9, lean::box(0), x_29); -return x_30; -} -else -{ -uint8 x_31; obj* x_32; obj* x_33; -lean::dec(x_12); -lean::dec(x_10); -x_31 = 1; -x_32 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_32, 0, x_4); -lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_31); -x_33 = lean::apply_2(x_9, lean::box(0), x_32); -return x_33; -} -} -} -else -{ -obj* x_34; -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_10); -lean::dec(x_4); -x_34 = lean::apply_2(x_9, lean::box(0), x_2); -return x_34; -} -} -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__4(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_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::dec(x_1); -lean::inc(x_3); -lean::inc(x_8); -lean::inc(x_2); -x_10 = lean::alloc_closure(reinterpret_cast(l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__2), 5, 4); -lean::closure_set(x_10, 0, x_2); -lean::closure_set(x_10, 1, x_8); -lean::closure_set(x_10, 2, x_3); -lean::closure_set(x_10, 3, x_4); -x_11 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_5, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__3___boxed), 4, 3); -lean::closure_set(x_12, 0, x_2); -lean::closure_set(x_12, 1, x_8); -lean::closure_set(x_12, 2, x_6); -x_13 = lean::apply_3(x_9, lean::box(0), x_11, x_12); -x_14 = lean::cnstr_get(x_7, 1); -lean::inc(x_14); -lean::dec(x_7); -x_15 = l_Lean_Parser_MonadParsec_lookahead___rarg___closed__1; -x_16 = lean::apply_3(x_14, lean::box(0), x_15, x_13); -return x_16; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg(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: -{ -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -lean::dec(x_1); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::apply_2(x_11, lean::box(0), x_8); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_9, 1); -lean::inc(x_14); -lean::dec(x_9); -x_15 = lean::cnstr_get(x_1, 1); -lean::inc(x_15); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_2); -lean::inc(x_1); -x_16 = l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg(x_1, x_2, lean::box(0), x_4, x_5, x_6, x_7, x_8, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__4), 8, 7); -lean::closure_set(x_17, 0, x_4); -lean::closure_set(x_17, 1, x_1); -lean::closure_set(x_17, 2, x_5); -lean::closure_set(x_17, 3, x_6); -lean::closure_set(x_17, 4, x_13); -lean::closure_set(x_17, 5, x_7); -lean::closure_set(x_17, 6, x_2); -x_18 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_16, x_17); -return x_18; -} -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg), 9, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = lean::alloc_closure(reinterpret_cast(l_ExceptT_Monad___rarg___lambda__8___boxed), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::apply_2(x_1, lean::box(0), x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("longestMatch: Empty List"); -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2(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_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::box(0); -x_10 = l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1; -x_11 = l_mjoin___rarg___closed__1; -lean::inc(x_8); -x_12 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1___rarg(x_10, x_11, x_9, x_9, x_8); -lean::inc(x_4); -x_13 = l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg(x_1, x_2, lean::box(0), x_3, x_4, x_5, x_8, x_12, x_6); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__1), 2, 1); -lean::closure_set(x_14, 0, x_7); -x_15 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_13, x_14); -return x_15; -} -} -obj* l_Lean_Parser_MonadParsec_longestMatch___rarg(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_10; obj* x_11; -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -x_8 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_7); -x_9 = lean::apply_2(x_7, lean::box(0), x_8); -lean::inc(x_9); -lean::inc(x_6); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2), 8, 7); -lean::closure_set(x_10, 0, x_1); -lean::closure_set(x_10, 1, x_2); -lean::closure_set(x_10, 2, x_4); -lean::closure_set(x_10, 3, x_6); -lean::closure_set(x_10, 4, x_9); -lean::closure_set(x_10, 5, x_5); -lean::closure_set(x_10, 6, x_7); -x_11 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_9, x_10); -return x_11; -} -} -obj* l_Lean_Parser_MonadParsec_longestMatch(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_longestMatch___rarg), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_MonadParsec_longestMatch___spec__1___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___rarg___lambda__3(x_1, x_2, x_3, x_4); -lean::dec(x_3); -return x_5; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_mfoldr___main___at_Lean_Parser_MonadParsec_longestMatch___spec__2(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_longestMatch___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_longestMatch(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_observing___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_4, 0, x_2); -x_5 = lean::apply_2(x_3, lean::box(0), x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_observing___rarg(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_10; obj* x_11; obj* x_12; obj* x_13; -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = l_ExceptT_lift___rarg___closed__1; -x_11 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_10, x_5); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_observing___rarg___lambda__1), 2, 1); -lean::closure_set(x_12, 0, x_7); -x_13 = lean::apply_3(x_6, lean::box(0), x_11, x_12); -return x_13; -} -} -obj* l_Lean_Parser_MonadParsec_observing(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_observing___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_observing___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_observing___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_observing___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_observing(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_parse___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_ParsecT_run___rarg(x_1, lean::box(0), lean::box(0), x_3, x_4, x_5); -return x_6; -} -} -obj* l_Lean_Parser_ParsecT_parse(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parse___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_parse___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_ParsecT_parse___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_ParsecT_parse___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParsecT_parse(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; uint8 x_11; obj* x_12; obj* x_13; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_3); -lean::cnstr_set(x_10, 2, x_4); -lean::cnstr_set(x_10, 3, x_6); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -x_13 = lean::apply_2(x_9, lean::box(0), x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; obj* x_19; obj* x_20; -lean::dec(x_7); -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::cnstr_get(x_5, 0); -lean::inc(x_16); -x_17 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_3); -lean::cnstr_set(x_17, 2, x_4); -lean::cnstr_set(x_17, 3, x_6); -x_18 = 0; -x_19 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set_scalar(x_19, sizeof(void*)*1, x_18); -x_20 = lean::apply_2(x_15, lean::box(0), x_19); -return x_20; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___rarg___boxed), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; uint8 x_15; -x_7 = lean::cnstr_get(x_5, 0); -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 2); -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -lean::dec(x_1); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_12, 0, x_9); -x_13 = l_String_OldIterator_remaining___main(x_7); -x_14 = lean::mk_nat_obj(0u); -x_15 = lean::nat_dec_eq(x_13, x_14); -lean::dec(x_13); -if (x_15 == 0) -{ -uint32 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; -lean::free_heap_obj(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_16 = l_String_OldIterator_curr___main(x_7); -lean::dec(x_7); -x_17 = l_Char_quoteCore(x_16); -x_18 = l_Char_HasRepr___closed__1; -x_19 = lean::string_append(x_18, x_17); -lean::dec(x_17); -x_20 = lean::string_append(x_19, x_18); -x_21 = lean::box(0); -x_22 = l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1; -x_23 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___rarg(x_2, lean::box(0), x_20, x_22, x_21, x_21, x_8); -x_24 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_12, x_23); -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; -lean::dec(x_7); -lean::dec(x_2); -x_25 = lean::box(0); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 0, x_25); -x_26 = lean::apply_2(x_4, lean::box(0), x_5); -x_27 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_12, x_26); -return x_27; -} -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; uint8 x_36; -x_28 = lean::cnstr_get(x_5, 0); -x_29 = lean::cnstr_get(x_5, 1); -x_30 = lean::cnstr_get(x_5, 2); -lean::inc(x_30); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_5); -x_31 = lean::cnstr_get(x_1, 0); -lean::inc(x_31); -lean::dec(x_1); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -lean::dec(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_33, 0, x_30); -x_34 = l_String_OldIterator_remaining___main(x_28); -x_35 = lean::mk_nat_obj(0u); -x_36 = lean::nat_dec_eq(x_34, x_35); -lean::dec(x_34); -if (x_36 == 0) -{ -uint32 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; -lean::dec(x_4); -lean::dec(x_3); -x_37 = l_String_OldIterator_curr___main(x_28); -lean::dec(x_28); -x_38 = l_Char_quoteCore(x_37); -x_39 = l_Char_HasRepr___closed__1; -x_40 = lean::string_append(x_39, x_38); -lean::dec(x_38); -x_41 = lean::string_append(x_40, x_39); -x_42 = lean::box(0); -x_43 = l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1; -x_44 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___rarg(x_2, lean::box(0), x_41, x_43, x_42, x_42, x_29); -x_45 = lean::apply_4(x_32, lean::box(0), lean::box(0), x_33, x_44); -return x_45; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -lean::dec(x_28); -lean::dec(x_2); -x_46 = lean::box(0); -x_47 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_29); -lean::cnstr_set(x_47, 2, x_3); -x_48 = lean::apply_2(x_4, lean::box(0), x_47); -x_49 = lean::apply_4(x_32, lean::box(0), lean::box(0), x_33, x_48); -return x_49; -} -} -} -else -{ -uint8 x_50; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_50 = !lean::is_exclusive(x_5); -if (x_50 == 0) -{ -obj* x_51; -x_51 = lean::apply_2(x_4, lean::box(0), x_5); -return x_51; -} -else -{ -obj* x_52; uint8 x_53; obj* x_54; obj* x_55; -x_52 = lean::cnstr_get(x_5, 0); -x_53 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_52); -lean::dec(x_5); -x_54 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_53); -x_55 = lean::apply_2(x_4, lean::box(0), x_54); -return x_55; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_2); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_2); -lean::cnstr_set(x_7, 1, x_2); -lean::cnstr_set(x_7, 2, x_6); -lean::inc(x_5); -x_8 = lean::apply_2(x_5, lean::box(0), x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___rarg___lambda__1), 5, 4); -lean::closure_set(x_9, 0, x_4); -lean::closure_set(x_9, 1, x_1); -lean::closure_set(x_9, 2, x_6); -lean::closure_set(x_9, 3, x_5); -x_10 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___rarg), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___rarg(obj* x_1, obj* 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; obj* x_11; obj* x_12; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_8); -x_10 = lean::apply_1(x_4, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_11, 0, x_1); -x_12 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_10, x_11); -return x_12; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_parseWithEoi___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_3, 2); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_10, 0, x_6); -x_11 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___rarg(x_1, x_5); -lean::inc(x_9); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_Monad___rarg___lambda__9), 4, 3); -lean::closure_set(x_12, 0, x_7); -lean::closure_set(x_12, 1, x_4); -lean::closure_set(x_12, 2, x_9); -x_13 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_11, x_12); -x_14 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_10, x_13); -return x_14; -} -else -{ -uint8 x_15; -lean::dec(x_2); -x_15 = !lean::is_exclusive(x_3); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = lean::cnstr_get(x_1, 0); -lean::inc(x_16); -lean::dec(x_1); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = lean::apply_2(x_17, lean::box(0), x_3); -return x_18; -} -else -{ -obj* x_19; uint8 x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_19 = lean::cnstr_get(x_3, 0); -x_20 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_19); -lean::dec(x_3); -x_21 = lean::cnstr_get(x_1, 0); -lean::inc(x_21); -lean::dec(x_1); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_23, 0, x_19); -lean::cnstr_set_scalar(x_23, sizeof(void*)*1, x_20); -x_24 = lean::apply_2(x_22, lean::box(0), x_23); -return x_24; -} -} -} -} -obj* l_Lean_Parser_ParsecT_parseWithEoi___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = lean::apply_1(x_2, x_3); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithEoi___rarg___lambda__1), 3, 2); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -x_7 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_parseWithEoi___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_1); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithEoi___rarg___lambda__2), 3, 2); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_3); -x_7 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___rarg(x_1, lean::box(0), lean::box(0), x_6, x_4, x_5); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_parseWithEoi(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithEoi___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___rarg___boxed(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; -x_8 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_ParsecT_parseWithEoi___spec__2(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_eoi___at_Lean_Parser_ParsecT_parseWithEoi___spec__1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithEoi___spec__3(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_parseWithEoi___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_ParsecT_parseWithEoi___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_ParsecT_parseWithEoi___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParsecT_parseWithEoi(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___rarg(obj* x_1, obj* 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; obj* x_11; obj* x_12; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_8); -x_10 = lean::apply_1(x_4, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_11, 0, x_1); -x_12 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_10, x_11); -return x_12; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_4 = lean::cnstr_get(x_2, 0); -x_5 = lean::cnstr_get(x_2, 2); -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_9, 0, x_5); -x_10 = lean::alloc_closure(reinterpret_cast(l_List_zip___rarg___lambda__1), 2, 1); -lean::closure_set(x_10, 0, x_4); -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -lean::dec(x_6); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_2, 2, x_12); -lean::cnstr_set(x_2, 0, x_10); -x_13 = lean::apply_2(x_11, lean::box(0), x_2); -x_14 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_9, x_13); -return x_14; -} -else -{ -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; -x_15 = lean::cnstr_get(x_2, 0); -x_16 = lean::cnstr_get(x_2, 1); -x_17 = lean::cnstr_get(x_2, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_2); -x_18 = lean::cnstr_get(x_1, 0); -lean::inc(x_18); -lean::dec(x_1); -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -lean::dec(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_21, 0, x_17); -x_22 = lean::alloc_closure(reinterpret_cast(l_List_zip___rarg___lambda__1), 2, 1); -lean::closure_set(x_22, 0, x_15); -x_23 = lean::cnstr_get(x_18, 1); -lean::inc(x_23); -lean::dec(x_18); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_16); -lean::cnstr_set(x_25, 2, x_24); -x_26 = lean::apply_2(x_23, lean::box(0), x_25); -x_27 = lean::apply_4(x_20, lean::box(0), lean::box(0), x_21, x_26); -return x_27; -} -} -else -{ -uint8 x_28; -x_28 = !lean::is_exclusive(x_2); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::cnstr_get(x_1, 0); -lean::inc(x_29); -lean::dec(x_1); -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -x_31 = lean::apply_2(x_30, lean::box(0), x_2); -return x_31; -} -else -{ -obj* x_32; uint8 x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_32 = lean::cnstr_get(x_2, 0); -x_33 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); -lean::inc(x_32); -lean::dec(x_2); -x_34 = lean::cnstr_get(x_1, 0); -lean::inc(x_34); -lean::dec(x_1); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_32); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_33); -x_37 = lean::apply_2(x_35, lean::box(0), x_36); -return x_37; -} -} -} -} -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_7 = lean::cnstr_get(x_5, 0); -x_8 = lean::cnstr_get(x_5, 2); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::apply_1(x_1, x_7); -lean::cnstr_set(x_5, 2, x_2); -lean::cnstr_set(x_5, 0, x_10); -x_11 = lean::apply_2(x_3, lean::box(0), x_5); -x_12 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_9, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = lean::cnstr_get(x_5, 0); -x_14 = lean::cnstr_get(x_5, 1); -x_15 = lean::cnstr_get(x_5, 2); -lean::inc(x_15); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_5); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::apply_1(x_1, x_13); -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_14); -lean::cnstr_set(x_18, 2, x_2); -x_19 = lean::apply_2(x_3, lean::box(0), x_18); -x_20 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_16, x_19); -return x_20; -} -} -else -{ -uint8 x_21; -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_21 = !lean::is_exclusive(x_5); -if (x_21 == 0) -{ -obj* x_22; -x_22 = lean::apply_2(x_3, lean::box(0), x_5); -return x_22; -} -else -{ -obj* x_23; uint8 x_24; obj* x_25; obj* x_26; -x_23 = lean::cnstr_get(x_5, 0); -x_24 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_23); -lean::dec(x_5); -x_25 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set_scalar(x_25, sizeof(void*)*1, x_24); -x_26 = lean::apply_2(x_3, lean::box(0), x_25); -return x_26; -} -} -} -} -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_3); -if (x_4 == 0) -{ -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; -x_5 = lean::cnstr_get(x_3, 0); -x_6 = lean::cnstr_get(x_3, 1); -x_7 = lean::cnstr_get(x_3, 2); -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_11, 0, x_7); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -lean::dec(x_8); -x_13 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_6); -lean::cnstr_set(x_3, 2, x_13); -lean::cnstr_set(x_3, 0, x_6); -lean::inc(x_12); -x_14 = lean::apply_2(x_12, lean::box(0), x_3); -lean::inc(x_10); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__2), 5, 4); -lean::closure_set(x_15, 0, x_5); -lean::closure_set(x_15, 1, x_13); -lean::closure_set(x_15, 2, x_12); -lean::closure_set(x_15, 3, x_10); -x_16 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_14, x_15); -x_17 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_11, x_16); -return x_17; -} -else -{ -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_31; -x_18 = lean::cnstr_get(x_3, 0); -x_19 = lean::cnstr_get(x_3, 1); -x_20 = lean::cnstr_get(x_3, 2); -lean::inc(x_20); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_3); -x_21 = lean::cnstr_get(x_1, 0); -lean::inc(x_21); -lean::dec(x_1); -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -lean::dec(x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_bindMkRes___rarg), 2, 1); -lean::closure_set(x_24, 0, x_20); -x_25 = lean::cnstr_get(x_21, 1); -lean::inc(x_25); -lean::dec(x_21); -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_19); -x_27 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_27, 0, x_19); -lean::cnstr_set(x_27, 1, x_19); -lean::cnstr_set(x_27, 2, x_26); -lean::inc(x_25); -x_28 = lean::apply_2(x_25, lean::box(0), x_27); -lean::inc(x_23); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__2), 5, 4); -lean::closure_set(x_29, 0, x_18); -lean::closure_set(x_29, 1, x_26); -lean::closure_set(x_29, 2, x_25); -lean::closure_set(x_29, 3, x_23); -x_30 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_28, x_29); -x_31 = lean::apply_4(x_23, lean::box(0), lean::box(0), x_24, x_30); -return x_31; -} -} -else -{ -uint8 x_32; -lean::dec(x_2); -x_32 = !lean::is_exclusive(x_3); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_1, 0); -lean::inc(x_33); -lean::dec(x_1); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -x_35 = lean::apply_2(x_34, lean::box(0), x_3); -return x_35; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_36 = lean::cnstr_get(x_3, 0); -x_37 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_3); -x_38 = lean::cnstr_get(x_1, 0); -lean::inc(x_38); -lean::dec(x_1); -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -lean::dec(x_38); -x_40 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_40, 0, x_36); -lean::cnstr_set_scalar(x_40, sizeof(void*)*1, x_37); -x_41 = lean::apply_2(x_39, lean::box(0), x_40); -return x_41; -} -} -} -} -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__4(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = lean::apply_1(x_2, x_3); -lean::inc(x_1); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__1), 2, 1); -lean::closure_set(x_6, 0, x_1); -lean::inc(x_4); -x_7 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_5, x_6); -lean::inc(x_4); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__3), 3, 2); -lean::closure_set(x_8, 0, x_1); -lean::closure_set(x_8, 1, x_4); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_1); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___lambda__4), 3, 2); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_3); -x_7 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___rarg(x_1, lean::box(0), lean::box(0), x_6, x_4, x_5); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_parseWithLeftOver(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_ParsecT_parseWithLeftOver___spec__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_ParsecT_parseWithLeftOver___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_ParsecT_parseWithLeftOver___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ParsecT_parseWithLeftOver(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_4); -x_6 = lean::apply_1(x_1, x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg___boxed), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_Parsec_parse___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg(x_1, x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Parsec_parse(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Parsec_parse___rarg___boxed), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_Lean_Parser_Parsec_parse___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Parsec_parse___rarg(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* initialize_init_data_tostring(obj*); -obj* initialize_init_data_string_basic(obj*); -obj* initialize_init_data_list_basic(obj*); -obj* initialize_init_control_except(obj*); -obj* initialize_init_data_repr(obj*); -obj* initialize_init_lean_name(obj*); -obj* initialize_init_data_dlist(obj*); -obj* initialize_init_control_monadfail(obj*); -obj* initialize_init_control_combinators(obj*); -obj* initialize_init_lean_format(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_parsec(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_data_tostring(w); -if (io_result_is_error(w)) return w; -w = initialize_init_data_string_basic(w); -if (io_result_is_error(w)) return w; -w = initialize_init_data_list_basic(w); -if (io_result_is_error(w)) return w; -w = initialize_init_control_except(w); -if (io_result_is_error(w)) return w; -w = initialize_init_data_repr(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_name(w); -if (io_result_is_error(w)) return w; -w = initialize_init_data_dlist(w); -if (io_result_is_error(w)) return w; -w = initialize_init_control_monadfail(w); -if (io_result_is_error(w)) return w; -w = initialize_init_control_combinators(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_format(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_Parsec_expected_toString___main___closed__1 = _init_l_Lean_Parser_Parsec_expected_toString___main___closed__1(); -lean::mark_persistent(l_Lean_Parser_Parsec_expected_toString___main___closed__1); -l_Lean_Parser_Parsec_Message_text___rarg___closed__1 = _init_l_Lean_Parser_Parsec_Message_text___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_Parsec_Message_text___rarg___closed__1); -l_Lean_Parser_Parsec_Message_text___rarg___closed__2 = _init_l_Lean_Parser_Parsec_Message_text___rarg___closed__2(); -lean::mark_persistent(l_Lean_Parser_Parsec_Message_text___rarg___closed__2); -l_Lean_Parser_Parsec_Message_text___rarg___closed__3 = _init_l_Lean_Parser_Parsec_Message_text___rarg___closed__3(); -lean::mark_persistent(l_Lean_Parser_Parsec_Message_text___rarg___closed__3); -l_Lean_Parser_Parsec_Message_toString___rarg___closed__1 = _init_l_Lean_Parser_Parsec_Message_toString___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_Parsec_Message_toString___rarg___closed__1); -l_Lean_Parser_Parsec_Message_toString___rarg___closed__2 = _init_l_Lean_Parser_Parsec_Message_toString___rarg___closed__2(); -lean::mark_persistent(l_Lean_Parser_Parsec_Message_toString___rarg___closed__2); -l_Lean_Parser_Parsec_Message_toString___rarg___closed__3 = _init_l_Lean_Parser_Parsec_Message_toString___rarg___closed__3(); -lean::mark_persistent(l_Lean_Parser_Parsec_Message_toString___rarg___closed__3); -l_Lean_Parser_Parsec_HasToString___closed__1 = _init_l_Lean_Parser_Parsec_HasToString___closed__1(); -lean::mark_persistent(l_Lean_Parser_Parsec_HasToString___closed__1); -l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1 = _init_l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1); -l_Lean_Parser_ParsecT_failure___rarg___closed__1 = _init_l_Lean_Parser_ParsecT_failure___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_ParsecT_failure___rarg___closed__1); -l_Lean_Parser_ParsecT_MonadFail___rarg___closed__1 = _init_l_Lean_Parser_ParsecT_MonadFail___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_ParsecT_MonadFail___rarg___closed__1); -l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1); -l_Lean_Parser_MonadParsec_remaining___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_remaining___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_remaining___rarg___closed__1); -l_Lean_Parser_MonadParsec_hidden___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_hidden___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_hidden___rarg___closed__1); -l_Lean_Parser_MonadParsec_try___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_try___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_try___rarg___closed__1); -l_Lean_Parser_MonadParsec_lookahead___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_lookahead___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_lookahead___rarg___closed__1); -l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1); -l_Lean_Parser_MonadParsec_curr___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_curr___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_curr___rarg___closed__1); -l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_takeWhile_x27___at_Lean_Parser_MonadParsec_whitespace___spec__1___rarg___closed__1); -l_Lean_Parser_MonadParsec_num___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_num___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_num___rarg___closed__1); -l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__1); -l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__2 = _init_l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_ensure___rarg___lambda__1___closed__2); -l_Lean_Parser_MonadParsec_pos___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_pos___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_pos___rarg___closed__1); -l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_eoi___rarg___lambda__1___closed__1); -l_Lean_Parser_MonadParsec_fixAux___main___rarg___closed__1 = _init_l_Lean_Parser_MonadParsec_fixAux___main___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_fixAux___main___rarg___closed__1); -l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1 = _init_l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/pratt.cpp b/src/stage0/init/lean/parser/pratt.cpp deleted file mode 100644 index a834de886a..0000000000 --- a/src/stage0/init/lean/parser/pratt.cpp +++ /dev/null @@ -1,947 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.pratt -// Imports: init.lean.parser.token -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_prattParser_View___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_indexed___rarg___closed__1; -obj* l_fixCore___rarg___boxed(obj*, obj*, obj*); -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_Lean_Parser_Trie_oldMatchPrefix___rarg(obj*, obj*); -obj* l_Lean_Parser_prattParser_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3(obj*, obj*); -obj* l_Lean_Parser_prattParser_View___boxed(obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___boxed(obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___boxed(obj*, obj*); -obj* l_Lean_Parser_currLbp(obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main(obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_currLbp___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_prattParser_View___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_currLbp___boxed(obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop(obj*); -extern obj* l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___boxed(obj*, obj*); -obj* l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -namespace lean { -uint8 nat_dec_lt(obj*, obj*); -} -extern obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -obj* l_List_append___rarg(obj*, obj*); -obj* l_Lean_Parser_currLbp___rarg(obj*, obj*, obj*, obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_Lean_Parser_prattParser___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___boxed(obj*); -obj* l_Lean_Parser_currLbp___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_prattParser___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_currLbp___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_maxPrec; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2(obj*, obj*); -obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1___boxed(obj*, obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -obj* l_Lean_Parser_prattParser_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_currLbp___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser(obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___boxed(obj*, obj*); -obj* l_Lean_Parser_prattParser___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_currLbp___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___boxed(obj*, obj*); -obj* l_Lean_Parser_prattParser_View(obj*); -obj* l_Lean_Parser_prattParser_tokens(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___rarg(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_10; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_4); -lean::closure_set(x_8, 3, x_6); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -lean::dec(x_1); -x_10 = lean::apply_2(x_9, lean::box(0), x_8); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___rarg___boxed), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___rarg(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_10; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_4); -lean::closure_set(x_8, 3, x_6); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -lean::dec(x_1); -x_10 = lean::apply_2(x_9, lean::box(0), x_8); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___rarg___boxed), 7, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___rarg(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_10; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_4); -lean::closure_set(x_8, 3, x_6); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -lean::dec(x_1); -x_10 = lean::apply_2(x_9, lean::box(0), x_8); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___rarg___boxed), 7, 0); -return x_3; -} -} -obj* _init_l_Lean_Parser_currLbp___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("currLbp: unreachable"); -return x_1; -} -} -obj* l_Lean_Parser_currLbp___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_currLbp___rarg___lambda__1___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___rarg(x_2, lean::box(0), x_7, x_8, x_6, x_6, x_3); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -lean::dec(x_2); -x_10 = lean::cnstr_get(x_5, 0); -lean::inc(x_10); -lean::dec(x_5); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::apply_2(x_4, lean::box(0), x_12); -return x_13; -} -} -} -obj* l_Lean_Parser_currLbp___rarg___lambda__2(obj* x_1, obj* 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; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_8); -x_10 = l_Lean_Parser_Trie_oldMatchPrefix___rarg(x_7, x_9); -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -lean::inc(x_12); -x_13 = lean::apply_2(x_12, lean::box(0), x_10); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_currLbp___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_14, 0, x_2); -lean::closure_set(x_14, 1, x_3); -lean::closure_set(x_14, 2, x_4); -lean::closure_set(x_14, 3, x_12); -x_15 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_13, x_14); -return x_15; -} -} -obj* _init_l_Lean_Parser_currLbp___rarg___lambda__3___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("stringLit"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_currLbp___rarg___lambda__3___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("currLbp: unknown token kind"); -return x_1; -} -} -obj* l_Lean_Parser_currLbp___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::apply_2(x_8, lean::box(0), x_9); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 0); -lean::inc(x_11); -lean::dec(x_6); -switch (lean::obj_tag(x_11)) { -case 0: -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_currLbp___rarg___lambda__2), 6, 5); -lean::closure_set(x_14, 0, x_13); -lean::closure_set(x_14, 1, x_1); -lean::closure_set(x_14, 2, x_2); -lean::closure_set(x_14, 3, x_3); -lean::closure_set(x_14, 4, x_4); -x_15 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_5, x_14); -return x_15; -} -case 1: -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -lean::dec(x_11); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_16 = lean::cnstr_get(x_1, 0); -lean::inc(x_16); -lean::dec(x_1); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = l_Lean_Parser_maxPrec; -x_19 = lean::apply_2(x_17, lean::box(0), x_18); -return x_19; -} -case 2: -{ -obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -lean::dec(x_5); -lean::dec(x_4); -x_20 = lean::cnstr_get(x_11, 0); -lean::inc(x_20); -lean::dec(x_11); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -lean::dec(x_20); -x_22 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_23 = lean_name_dec_eq(x_21, x_22); -if (x_23 == 0) -{ -obj* x_24; uint8 x_25; -x_24 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -x_25 = lean_name_dec_eq(x_21, x_24); -lean::dec(x_21); -if (x_25 == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -lean::dec(x_1); -x_26 = lean::box(0); -x_27 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_28 = l_mjoin___rarg___closed__1; -x_29 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___rarg(x_2, lean::box(0), x_27, x_28, x_26, x_26, x_3); -lean::dec(x_3); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -lean::dec(x_3); -lean::dec(x_2); -x_30 = lean::cnstr_get(x_1, 0); -lean::inc(x_30); -lean::dec(x_1); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -x_32 = l_Lean_Parser_maxPrec; -x_33 = lean::apply_2(x_31, lean::box(0), x_32); -return x_33; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -lean::dec(x_21); -lean::dec(x_3); -lean::dec(x_2); -x_34 = lean::cnstr_get(x_1, 0); -lean::inc(x_34); -lean::dec(x_1); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -x_36 = l_Lean_Parser_maxPrec; -x_37 = lean::apply_2(x_35, lean::box(0), x_36); -return x_37; -} -} -default: -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_38 = lean::box(0); -x_39 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_40 = l_mjoin___rarg___closed__1; -x_41 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___rarg(x_2, lean::box(0), x_39, x_40, x_38, x_38, x_3); -lean::dec(x_3); -return x_41; -} -} -} -} -} -obj* l_Lean_Parser_currLbp___rarg(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_10; -x_6 = l_Lean_Parser_indexed___rarg___closed__1; -x_7 = lean::apply_2(x_2, lean::box(0), x_6); -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_currLbp___rarg___lambda__3), 6, 5); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_3); -lean::closure_set(x_9, 2, x_5); -lean::closure_set(x_9, 3, x_8); -lean::closure_set(x_9, 4, x_4); -x_10 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_7, x_9); -return x_10; -} -} -obj* l_Lean_Parser_currLbp(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_currLbp___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___rarg___boxed(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; -x_8 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__1(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___rarg___boxed(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; -x_8 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__2(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___rarg___boxed(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; -x_8 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_currLbp___spec__3(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_currLbp___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_currLbp___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_currLbp___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_currLbp(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___rarg(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_10; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_4); -lean::closure_set(x_8, 3, x_6); -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -lean::dec(x_1); -x_10 = lean::apply_2(x_9, lean::box(0), x_8); -return x_10; -} -} -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___rarg___boxed), 7, 0); -return x_3; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__1(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: -{ -obj* x_10; -x_10 = l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_9, x_8); -return x_10; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__2(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) { -_start: -{ -uint8 x_12; -x_12 = lean::nat_dec_lt(x_1, x_11); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -lean::dec(x_10); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -lean::dec(x_13); -x_15 = lean::apply_2(x_14, lean::box(0), x_3); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; -lean::inc(x_4); -lean::inc(x_5); -x_16 = lean::apply_2(x_4, x_3, x_5); -x_17 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__1___boxed), 9, 8); -lean::closure_set(x_17, 0, x_2); -lean::closure_set(x_17, 1, x_6); -lean::closure_set(x_17, 2, x_7); -lean::closure_set(x_17, 3, x_8); -lean::closure_set(x_17, 4, x_4); -lean::closure_set(x_17, 5, x_1); -lean::closure_set(x_17, 6, x_9); -lean::closure_set(x_17, 7, x_5); -x_18 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_16, x_17); -return x_18; -} -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg(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: -{ -obj* x_10; uint8 x_11; -x_10 = lean::mk_nat_obj(0u); -x_11 = lean::nat_dec_eq(x_7, x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::mk_nat_obj(1u); -x_13 = lean::nat_sub(x_7, x_12); -x_14 = lean::cnstr_get(x_1, 1); -lean::inc(x_14); -lean::inc(x_9); -lean::inc(x_4); -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_15 = l_Lean_Parser_currLbp___rarg(x_1, x_2, x_3, x_4, x_9); -lean::inc(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__2___boxed), 11, 10); -lean::closure_set(x_16, 0, x_6); -lean::closure_set(x_16, 1, x_1); -lean::closure_set(x_16, 2, x_8); -lean::closure_set(x_16, 3, x_5); -lean::closure_set(x_16, 4, x_9); -lean::closure_set(x_16, 5, x_2); -lean::closure_set(x_16, 6, x_3); -lean::closure_set(x_16, 7, x_4); -lean::closure_set(x_16, 8, x_13); -lean::closure_set(x_16, 9, x_14); -x_17 = lean::apply_4(x_14, lean::box(0), lean::box(0), x_15, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_18 = lean::box(0); -x_19 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_20 = l_mjoin___rarg___closed__1; -x_21 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___rarg(x_3, lean::box(0), x_19, x_20, x_18, x_18, x_9); -lean::dec(x_9); -return x_21; -} -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___boxed), 9, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___rarg___boxed(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; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_pratt_1__trailingLoop___main___spec__1(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__1___boxed(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: -{ -obj* x_10; -x_10 = l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_7); -return x_10; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__2___boxed(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) { -_start: -{ -obj* x_12; -x_12 = l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); -lean::dec(x_11); -return x_12; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg___boxed(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: -{ -obj* x_10; -x_10 = l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_7); -return x_10; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l___private_init_lean_parser_pratt_1__trailingLoop___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___rarg(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: -{ -obj* x_10; -x_10 = l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -return x_10; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_pratt_1__trailingLoop___rarg___boxed), 9, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___rarg___boxed(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: -{ -obj* x_10; -x_10 = l___private_init_lean_parser_pratt_1__trailingLoop___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_7); -return x_10; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l___private_init_lean_parser_pratt_1__trailingLoop(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_prattParser___rarg___lambda__1(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: -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::mk_nat_obj(1u); -x_11 = lean::nat_add(x_9, x_10); -x_12 = l___private_init_lean_parser_pratt_1__trailingLoop___main___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_11, x_7, x_8); -lean::dec(x_11); -return x_12; -} -} -obj* l_Lean_Parser_prattParser___rarg___lambda__2(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: -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_10 = lean::cnstr_get(x_1, 0); -lean::inc(x_10); -x_11 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -lean::dec(x_13); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_17 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_16, x_12); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser___rarg___lambda__1___boxed), 9, 8); -lean::closure_set(x_18, 0, x_2); -lean::closure_set(x_18, 1, x_3); -lean::closure_set(x_18, 2, x_1); -lean::closure_set(x_18, 3, x_4); -lean::closure_set(x_18, 4, x_5); -lean::closure_set(x_18, 5, x_6); -lean::closure_set(x_18, 6, x_9); -lean::closure_set(x_18, 7, x_7); -x_19 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_17, x_18); -return x_19; -} -} -obj* l_Lean_Parser_prattParser___rarg___lambda__3(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_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_7); -x_10 = lean::apply_1(x_2, x_7); -lean::inc(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser___rarg___lambda__2), 9, 8); -lean::closure_set(x_11, 0, x_3); -lean::closure_set(x_11, 1, x_1); -lean::closure_set(x_11, 2, x_4); -lean::closure_set(x_11, 3, x_5); -lean::closure_set(x_11, 4, x_6); -lean::closure_set(x_11, 5, x_8); -lean::closure_set(x_11, 6, x_7); -lean::closure_set(x_11, 7, x_9); -x_12 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_10, x_11); -return x_12; -} -} -obj* l_Lean_Parser_prattParser___rarg(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: -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -lean::inc(x_3); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_runParsec___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_10, 0, x_3); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser___rarg___lambda__3), 8, 6); -lean::closure_set(x_11, 0, x_1); -lean::closure_set(x_11, 1, x_7); -lean::closure_set(x_11, 2, x_3); -lean::closure_set(x_11, 3, x_2); -lean::closure_set(x_11, 4, x_4); -lean::closure_set(x_11, 5, x_8); -x_12 = lean::alloc_closure(reinterpret_cast(l_fixCore___rarg___boxed), 3, 2); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_11); -x_13 = lean::apply_1(x_9, x_12); -return x_13; -} -} -obj* l_Lean_Parser_prattParser(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser___rarg___boxed), 9, 0); -return x_2; -} -} -obj* l_Lean_Parser_prattParser___rarg___lambda__1___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_prattParser___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_9); -return x_10; -} -} -obj* l_Lean_Parser_prattParser___rarg___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_prattParser___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_6); -lean::dec(x_5); -return x_10; -} -} -obj* l_Lean_Parser_prattParser___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_prattParser(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_prattParser_tokens___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_append___rarg(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_prattParser_tokens(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_11; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser_tokens___rarg), 2, 0); -return x_11; -} -} -obj* l_Lean_Parser_prattParser_tokens___boxed(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_11; -x_11 = l_Lean_Parser_prattParser_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -lean::dec(x_10); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_11; -} -} -obj* l_Lean_Parser_prattParser_View___rarg(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: -{ -obj* x_10; obj* x_11; -x_10 = l_mjoin___rarg___closed__1; -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -obj* l_Lean_Parser_prattParser_View(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser_View___rarg___boxed), 9, 0); -return x_2; -} -} -obj* l_Lean_Parser_prattParser_View___rarg___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_prattParser_View___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_10; -} -} -obj* l_Lean_Parser_prattParser_View___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_prattParser_View(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* initialize_init_lean_parser_token(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_pratt(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_token(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_currLbp___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_currLbp___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_currLbp___rarg___lambda__1___closed__1); -l_Lean_Parser_currLbp___rarg___lambda__3___closed__1 = _init_l_Lean_Parser_currLbp___rarg___lambda__3___closed__1(); -lean::mark_persistent(l_Lean_Parser_currLbp___rarg___lambda__3___closed__1); -l_Lean_Parser_currLbp___rarg___lambda__3___closed__2 = _init_l_Lean_Parser_currLbp___rarg___lambda__3___closed__2(); -lean::mark_persistent(l_Lean_Parser_currLbp___rarg___lambda__3___closed__2); -return w; -} diff --git a/src/stage0/init/lean/parser/rec.cpp b/src/stage0/init/lean/parser/rec.cpp deleted file mode 100644 index ad46bfa700..0000000000 --- a/src/stage0/init/lean/parser/rec.cpp +++ /dev/null @@ -1,436 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.rec -// Imports: init.control.reader init.lean.parser.parsec init.fix -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_RecT_Alternative(obj*, obj*, obj*); -obj* l_fixCore___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_monadParsecTrans___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadRec_base(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_MonadRec_trans___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadRec_trans___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_MonadExcept___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_HasMonadLift___boxed(obj*, obj*, obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_RecT_MonadFunctor(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_HasMonadLift___rarg(obj*); -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadRec_base___closed__1; -obj* l_Lean_Parser_RecT_run(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadRec_base___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_Monad___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_RecT_MonadExcept___rarg(obj*); -obj* l_ReaderT_Monad___rarg(obj*); -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadRec_trans(obj*, obj*, obj*, obj*); -obj* l_StateT_MonadExcept___rarg___lambda__2(obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_Alternative___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_run___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_runParsec___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_HasMonadLift(obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_runParsec(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadRec_trans___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_Alternative___rarg(obj*, obj*); -obj* l_ReaderT_MonadFunctor___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_runParsec___rarg(obj*, obj*, obj*); -obj* l_ReaderT_MonadExcept___rarg(obj*); -obj* l_Lean_Parser_RecT_recurse___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_run___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_MonadFunctor___rarg(obj*); -obj* l_Lean_Parser_RecT_recurse___rarg(obj*, obj*); -obj* l_Lean_Parser_RecT_Monad(obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_recurse(obj*, obj*, obj*, obj*); -obj* l_ReaderT_Alternative___rarg(obj*, obj*); -obj* l_Lean_Parser_RecT_MonadExcept(obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_Monad___rarg(obj*); -obj* l_Lean_Parser_RecT_MonadFunctor___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_recurse___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::apply_1(x_2, x_1); -return x_3; -} -} -obj* l_Lean_Parser_RecT_recurse(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___rarg), 2, 0); -return x_5; -} -} -obj* l_Lean_Parser_RecT_recurse___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_RecT_recurse(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_RecT_run___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::alloc_closure(reinterpret_cast(l_StateT_MonadExcept___rarg___lambda__2), 3, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_fixCore___rarg___boxed), 3, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::apply_1(x_1, x_5); -return x_6; -} -} -obj* l_Lean_Parser_RecT_run(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_run___rarg), 3, 0); -return x_6; -} -} -obj* l_Lean_Parser_RecT_run___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_RecT_run(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("RecT.runParsec: no progress"); -return x_1; -} -} -obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::box(0); -x_4 = l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1; -x_5 = l_mjoin___rarg___closed__1; -x_6 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_4, x_5, x_3, x_3); -return x_6; -} -} -obj* l_Lean_Parser_RecT_runParsec___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_runParsec___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_4, 0, x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_StateT_MonadExcept___rarg___lambda__2), 3, 1); -lean::closure_set(x_5, 0, x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_fixCore___rarg___boxed), 3, 2); -lean::closure_set(x_6, 0, x_4); -lean::closure_set(x_6, 1, x_5); -x_7 = lean::apply_1(x_2, x_6); -return x_7; -} -} -obj* l_Lean_Parser_RecT_runParsec(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_runParsec___rarg), 3, 0); -return x_7; -} -} -obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_RecT_runParsec___rarg___lambda__1(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_RecT_runParsec___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_RecT_runParsec(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_5); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_RecT_Monad___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_ReaderT_Monad___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_RecT_Monad(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_Monad___rarg), 1, 0); -return x_4; -} -} -obj* l_Lean_Parser_RecT_Monad___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_RecT_Monad(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_RecT_Alternative___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_ReaderT_Alternative___rarg(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_RecT_Alternative(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_Alternative___rarg), 2, 0); -return x_4; -} -} -obj* l_Lean_Parser_RecT_Alternative___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_RecT_Alternative(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_RecT_HasMonadLift___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 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_1); -return x_2; -} -} -obj* l_Lean_Parser_RecT_HasMonadLift(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_HasMonadLift___rarg), 1, 0); -return x_4; -} -} -obj* l_Lean_Parser_RecT_HasMonadLift___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_RecT_HasMonadLift(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_RecT_MonadExcept___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_ReaderT_MonadExcept___rarg(x_1); -return x_2; -} -} -obj* l_Lean_Parser_RecT_MonadExcept(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_MonadExcept___rarg), 1, 0); -return x_6; -} -} -obj* l_Lean_Parser_RecT_MonadExcept___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_RecT_MonadExcept(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -lean::inc(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___boxed), 4, 3); -lean::closure_set(x_4, 0, lean::box(0)); -lean::closure_set(x_4, 1, lean::box(0)); -lean::closure_set(x_4, 2, x_1); -lean::inc(x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_MonadFunctor___boxed), 6, 5); -lean::closure_set(x_5, 0, lean::box(0)); -lean::closure_set(x_5, 1, lean::box(0)); -lean::closure_set(x_5, 2, lean::box(0)); -lean::closure_set(x_5, 3, x_1); -lean::closure_set(x_5, 4, x_1); -x_6 = l_Lean_Parser_monadParsecTrans___rarg(x_4, x_5, x_3); -return x_6; -} -} -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg), 3, 0); -return x_4; -} -} -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_RecT_Lean_Parser_MonadParsec(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_RecT_MonadFunctor___rarg(obj* x_1) { -_start: -{ -obj* x_2; -lean::inc(x_1); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_MonadFunctor___boxed), 6, 5); -lean::closure_set(x_2, 0, lean::box(0)); -lean::closure_set(x_2, 1, lean::box(0)); -lean::closure_set(x_2, 2, lean::box(0)); -lean::closure_set(x_2, 3, x_1); -lean::closure_set(x_2, 4, x_1); -return x_2; -} -} -obj* l_Lean_Parser_RecT_MonadFunctor(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_MonadFunctor___rarg), 1, 0); -return x_5; -} -} -obj* l_Lean_Parser_RecT_MonadFunctor___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_RecT_MonadFunctor(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_MonadRec_trans___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = lean::apply_1(x_2, x_4); -x_6 = lean::apply_2(x_1, lean::box(0), x_5); -return x_6; -} -} -obj* l_Lean_Parser_MonadRec_trans(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadRec_trans___rarg___boxed), 4, 0); -return x_5; -} -} -obj* l_Lean_Parser_MonadRec_trans___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadRec_trans___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_3); -return x_5; -} -} -obj* l_Lean_Parser_MonadRec_trans___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadRec_trans(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -return x_5; -} -} -obj* _init_l_Lean_Parser_MonadRec_base___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___rarg), 2, 0); -return x_1; -} -} -obj* l_Lean_Parser_MonadRec_base(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadRec_base___closed__1; -return x_5; -} -} -obj* l_Lean_Parser_MonadRec_base___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadRec_base(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -return x_5; -} -} -obj* initialize_init_control_reader(obj*); -obj* initialize_init_lean_parser_parsec(obj*); -obj* initialize_init_fix(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_rec(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_control_reader(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_parsec(w); -if (io_result_is_error(w)) return w; -w = initialize_init_fix(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1); -l_Lean_Parser_MonadRec_base___closed__1 = _init_l_Lean_Parser_MonadRec_base___closed__1(); -lean::mark_persistent(l_Lean_Parser_MonadRec_base___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/stringliteral.cpp b/src/stage0/init/lean/parser/stringliteral.cpp deleted file mode 100644 index 1497a3fea6..0000000000 --- a/src/stage0/init/lean/parser/stringliteral.cpp +++ /dev/null @@ -1,1085 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.stringliteral -// Imports: init.lean.parser.parsec -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, uint32); -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__1(obj*, uint32); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__7(obj*, obj*, obj*, obj*, obj*, uint32); -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__3___boxed(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed(obj*, obj*, obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_parseStringLiteralAux(obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteral___boxed(obj*, obj*); -uint32 l_String_OldIterator_curr___main(obj*); -obj* l_Lean_Parser_MonadParsec_any___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteral(obj*, obj*); -obj* l_Lean_Parser_parseStringLiteral___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_digit___rarg(obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar(obj*, obj*); -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__2(obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__1___boxed(obj*, obj*); -namespace lean { -obj* string_push(obj*, uint32); -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___boxed(obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__3(obj*, uint32); -obj* l_Lean_Parser_parseStringLiteralAux___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1; -extern obj* l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -obj* l_Lean_Parser_parseHexDigit___boxed(obj*, obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -uint8 l_UInt32_decLe(uint32, uint32); -uint32 l_Char_ofNat(obj*); -extern obj* l_Char_HasRepr___closed__1; -obj* l_Lean_Parser_parseStringLiteral___rarg___lambda__2(obj*, obj*, obj*, obj*, uint32); -obj* l_Lean_Parser_parseStringLiteral___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___boxed(obj*, obj*); -obj* l_Char_quoteCore(uint32); -uint8 l_String_OldIterator_hasNext___main(obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___boxed(obj*, obj*); -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__4(obj*, obj*, obj*); -obj* l_Lean_Parser_parseHexDigit(obj*, obj*); -uint8 l_UInt32_decEq(uint32, uint32); -obj* l_Lean_Parser_parseHexDigit___rarg___closed__1; -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__4(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, uint32); -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__5___boxed(obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__5___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteral___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -obj* l_Lean_Parser_parseStringLiteral___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main(obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__8(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__6(obj*, obj*, obj*, obj*); -namespace lean { -obj* uint32_to_nat(uint32); -} -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__5(obj*, uint32); -namespace lean { -obj* nat_mul(obj*, obj*); -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__5(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___rarg(obj*, obj*, uint32); -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Parser_parseHexDigit___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__1(obj* x_1, uint32 x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::uint32_to_nat(x_2); -x_6 = lean::mk_nat_obj(48u); -x_7 = lean::nat_sub(x_5, x_6); -lean::dec(x_5); -x_8 = lean::apply_2(x_4, lean::box(0), x_7); -return x_8; -} -} -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint32 x_10; uint8 x_11; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = 97; -x_11 = x_10 <= x_9; -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_3); -lean::dec(x_2); -x_12 = l_Char_quoteCore(x_9); -x_13 = l_Char_HasRepr___closed__1; -x_14 = lean::string_append(x_13, x_12); -lean::dec(x_12); -x_15 = lean::string_append(x_14, x_13); -x_16 = lean::box(0); -x_17 = l_mjoin___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_15, x_17, x_16, x_16); -return x_18; -} -else -{ -uint32 x_19; uint8 x_20; -x_19 = 102; -x_20 = x_9 <= x_19; -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -lean::dec(x_3); -lean::dec(x_2); -x_21 = l_Char_quoteCore(x_9); -x_22 = l_Char_HasRepr___closed__1; -x_23 = lean::string_append(x_22, x_21); -lean::dec(x_21); -x_24 = lean::string_append(x_23, x_22); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; -x_27 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_1); -x_28 = lean::box_uint32(x_9); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_29, 0, x_3); -lean::closure_set(x_29, 1, x_28); -x_30 = lean::apply_2(x_2, lean::box(0), x_29); -return x_30; -} -} -} -} -} -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__3(obj* x_1, uint32 x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::uint32_to_nat(x_2); -x_6 = lean::mk_nat_obj(97u); -x_7 = lean::nat_sub(x_5, x_6); -lean::dec(x_5); -x_8 = lean::mk_nat_obj(10u); -x_9 = lean::nat_add(x_8, x_7); -lean::dec(x_7); -x_10 = lean::apply_2(x_4, lean::box(0), x_9); -return x_10; -} -} -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__4(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_3); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_3); -lean::dec(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_8; -} -else -{ -uint32 x_9; uint32 x_10; uint8 x_11; -x_9 = l_String_OldIterator_curr___main(x_3); -x_10 = 65; -x_11 = x_10 <= x_9; -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_3); -lean::dec(x_2); -x_12 = l_Char_quoteCore(x_9); -x_13 = l_Char_HasRepr___closed__1; -x_14 = lean::string_append(x_13, x_12); -lean::dec(x_12); -x_15 = lean::string_append(x_14, x_13); -x_16 = lean::box(0); -x_17 = l_mjoin___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_15, x_17, x_16, x_16); -return x_18; -} -else -{ -uint32 x_19; uint8 x_20; -x_19 = 70; -x_20 = x_9 <= x_19; -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -lean::dec(x_3); -lean::dec(x_2); -x_21 = l_Char_quoteCore(x_9); -x_22 = l_Char_HasRepr___closed__1; -x_23 = lean::string_append(x_22, x_21); -lean::dec(x_21); -x_24 = lean::string_append(x_23, x_22); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; -x_27 = l_Lean_Parser_MonadParsec_error___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_1); -x_28 = lean::box_uint32(x_9); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_29, 0, x_3); -lean::closure_set(x_29, 1, x_28); -x_30 = lean::apply_2(x_2, lean::box(0), x_29); -return x_30; -} -} -} -} -} -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__5(obj* x_1, uint32 x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::uint32_to_nat(x_2); -x_6 = lean::mk_nat_obj(65u); -x_7 = lean::nat_sub(x_5, x_6); -lean::dec(x_5); -x_8 = lean::mk_nat_obj(10u); -x_9 = lean::nat_add(x_8, x_7); -lean::dec(x_7); -x_10 = lean::apply_2(x_4, lean::box(0), x_9); -return x_10; -} -} -obj* _init_l_Lean_Parser_parseHexDigit___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("hexadecimal"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_labels___rarg___lambda__1___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_Lean_Parser_parseHexDigit___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_4 = lean::cnstr_get(x_3, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::inc(x_2); -x_6 = l_Lean_Parser_MonadParsec_digit___rarg(x_1, x_2); -lean::inc(x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHexDigit___rarg___lambda__1___boxed), 2, 1); -lean::closure_set(x_7, 0, x_3); -lean::inc(x_5); -x_8 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_6, x_7); -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -lean::inc(x_9); -x_11 = lean::apply_2(x_9, lean::box(0), x_10); -lean::inc(x_9); -lean::inc(x_2); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHexDigit___rarg___lambda__2), 3, 2); -lean::closure_set(x_12, 0, x_2); -lean::closure_set(x_12, 1, x_9); -lean::inc(x_5); -lean::inc(x_11); -x_13 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_11, x_12); -lean::inc(x_3); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHexDigit___rarg___lambda__3___boxed), 2, 1); -lean::closure_set(x_14, 0, x_3); -lean::inc(x_5); -x_15 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_13, x_14); -lean::inc(x_2); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHexDigit___rarg___lambda__4), 3, 2); -lean::closure_set(x_16, 0, x_2); -lean::closure_set(x_16, 1, x_9); -lean::inc(x_5); -x_17 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_11, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHexDigit___rarg___lambda__5___boxed), 2, 1); -lean::closure_set(x_18, 0, x_3); -x_19 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_17, x_18); -lean::inc(x_4); -x_20 = lean::apply_3(x_4, lean::box(0), x_15, x_19); -x_21 = lean::apply_3(x_4, lean::box(0), x_8, x_20); -x_22 = lean::cnstr_get(x_2, 1); -lean::inc(x_22); -lean::dec(x_2); -x_23 = l_Lean_Parser_parseHexDigit___rarg___closed__1; -x_24 = lean::apply_3(x_22, lean::box(0), x_23, x_21); -return x_24; -} -} -obj* l_Lean_Parser_parseHexDigit(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseHexDigit___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_Lean_Parser_parseHexDigit___rarg___lambda__1(x_1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__3___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_Lean_Parser_parseHexDigit___rarg___lambda__3(x_1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_parseHexDigit___rarg___lambda__5___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_Lean_Parser_parseHexDigit___rarg___lambda__5(x_1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_parseHexDigit___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_parseHexDigit(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__1(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; uint32 x_15; obj* x_16; obj* x_17; -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::mk_nat_obj(16u); -x_9 = lean::nat_mul(x_8, x_2); -x_10 = lean::nat_add(x_9, x_3); -lean::dec(x_9); -x_11 = lean::nat_mul(x_8, x_10); -lean::dec(x_10); -x_12 = lean::nat_add(x_11, x_4); -lean::dec(x_11); -x_13 = lean::nat_mul(x_8, x_12); -lean::dec(x_12); -x_14 = lean::nat_add(x_13, x_5); -lean::dec(x_13); -x_15 = l_Char_ofNat(x_14); -lean::dec(x_14); -x_16 = lean::box_uint32(x_15); -x_17 = lean::apply_2(x_7, lean::box(0), x_16); -return x_17; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg___lambda__1___boxed), 5, 4); -lean::closure_set(x_7, 0, x_1); -lean::closure_set(x_7, 1, x_2); -lean::closure_set(x_7, 2, x_3); -lean::closure_set(x_7, 3, x_6); -x_8 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_5, x_7); -return x_8; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_4); -lean::inc(x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg___lambda__2), 6, 5); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_2); -lean::closure_set(x_6, 2, x_5); -lean::closure_set(x_6, 3, x_3); -lean::closure_set(x_6, 4, x_4); -x_7 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_4, x_6); -return x_7; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__4(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_2); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg___lambda__3), 5, 4); -lean::closure_set(x_5, 0, x_1); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_2); -lean::closure_set(x_5, 3, x_3); -x_6 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_3, x_5); -return x_6; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__5(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint32 x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::mk_nat_obj(16u); -x_7 = lean::nat_mul(x_6, x_2); -x_8 = lean::nat_add(x_7, x_3); -lean::dec(x_7); -x_9 = l_Char_ofNat(x_8); -lean::dec(x_8); -x_10 = lean::box_uint32(x_9); -x_11 = lean::apply_2(x_5, lean::box(0), x_10); -return x_11; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__6(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg___lambda__5___boxed), 3, 2); -lean::closure_set(x_5, 0, x_1); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_3, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("quoted character"); -return x_1; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__7(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, uint32 x_6) { -_start: -{ -uint32 x_7; uint8 x_8; -x_7 = 92; -x_8 = x_6 == x_7; -if (x_8 == 0) -{ -uint32 x_9; uint8 x_10; -x_9 = 34; -x_10 = x_6 == x_9; -if (x_10 == 0) -{ -uint32 x_11; uint8 x_12; -x_11 = 39; -x_12 = x_6 == x_11; -if (x_12 == 0) -{ -uint32 x_13; uint8 x_14; -x_13 = 110; -x_14 = x_6 == x_13; -if (x_14 == 0) -{ -uint32 x_15; uint8 x_16; -x_15 = 116; -x_16 = x_6 == x_15; -if (x_16 == 0) -{ -uint32 x_17; uint8 x_18; -x_17 = 120; -x_18 = x_6 == x_17; -if (x_18 == 0) -{ -uint32 x_19; uint8 x_20; -x_19 = 117; -x_20 = x_6 == x_19; -if (x_20 == 0) -{ -obj* x_21; obj* x_22; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_21 = l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1; -x_22 = l_Lean_Parser_MonadParsec_unexpectedAt___rarg(x_1, lean::box(0), x_21, x_2); -return x_22; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_2); -lean::inc(x_4); -x_23 = l_Lean_Parser_parseHexDigit___rarg(x_3, x_1, x_4); -lean::inc(x_23); -lean::inc(x_5); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg___lambda__4), 4, 3); -lean::closure_set(x_24, 0, x_4); -lean::closure_set(x_24, 1, x_5); -lean::closure_set(x_24, 2, x_23); -x_25 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_23, x_24); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -lean::dec(x_2); -lean::inc(x_4); -x_26 = l_Lean_Parser_parseHexDigit___rarg(x_3, x_1, x_4); -lean::inc(x_26); -lean::inc(x_5); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg___lambda__6), 4, 3); -lean::closure_set(x_27, 0, x_4); -lean::closure_set(x_27, 1, x_5); -lean::closure_set(x_27, 2, x_26); -x_28 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_26, x_27); -return x_28; -} -} -else -{ -obj* x_29; obj* x_30; uint32 x_31; obj* x_32; obj* x_33; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_29 = lean::cnstr_get(x_4, 0); -lean::inc(x_29); -lean::dec(x_4); -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -x_31 = 9; -x_32 = lean::box_uint32(x_31); -x_33 = lean::apply_2(x_30, lean::box(0), x_32); -return x_33; -} -} -else -{ -obj* x_34; obj* x_35; uint32 x_36; obj* x_37; obj* x_38; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_34 = lean::cnstr_get(x_4, 0); -lean::inc(x_34); -lean::dec(x_4); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -x_36 = 10; -x_37 = lean::box_uint32(x_36); -x_38 = lean::apply_2(x_35, lean::box(0), x_37); -return x_38; -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_39 = lean::cnstr_get(x_4, 0); -lean::inc(x_39); -lean::dec(x_4); -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -lean::dec(x_39); -x_41 = lean::box_uint32(x_11); -x_42 = lean::apply_2(x_40, lean::box(0), x_41); -return x_42; -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_43 = lean::cnstr_get(x_4, 0); -lean::inc(x_43); -lean::dec(x_4); -x_44 = lean::cnstr_get(x_43, 1); -lean::inc(x_44); -lean::dec(x_43); -x_45 = lean::box_uint32(x_9); -x_46 = lean::apply_2(x_44, lean::box(0), x_45); -return x_46; -} -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_47 = lean::cnstr_get(x_4, 0); -lean::inc(x_47); -lean::dec(x_4); -x_48 = lean::cnstr_get(x_47, 1); -lean::inc(x_48); -lean::dec(x_47); -x_49 = lean::box_uint32(x_7); -x_50 = lean::apply_2(x_48, lean::box(0), x_49); -return x_50; -} -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__8(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; -lean::inc(x_2); -lean::inc(x_1); -x_6 = l_Lean_Parser_MonadParsec_any___rarg(x_1, x_2); -lean::inc(x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg___lambda__7___boxed), 6, 5); -lean::closure_set(x_7, 0, x_2); -lean::closure_set(x_7, 1, x_5); -lean::closure_set(x_7, 2, x_1); -lean::closure_set(x_7, 3, x_3); -lean::closure_set(x_7, 4, x_4); -x_8 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -lean::inc(x_4); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg___lambda__8), 5, 4); -lean::closure_set(x_8, 0, x_1); -lean::closure_set(x_8, 1, x_2); -lean::closure_set(x_8, 2, x_3); -lean::closure_set(x_8, 3, x_4); -x_9 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_parseQuotedChar(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseQuotedChar___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_parseQuotedChar___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__5___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_parseQuotedChar___rarg___lambda__5(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__7___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -uint32 x_7; obj* x_8; -x_7 = lean::unbox_uint32(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_parseQuotedChar___rarg___lambda__7(x_1, x_2, x_3, x_4, x_5, x_7); -return x_8; -} -} -obj* l_Lean_Parser_parseQuotedChar___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_parseQuotedChar(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, uint32 x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = lean::string_push(x_1, x_6); -x_8 = l_Lean_Parser_parseStringLiteralAux___main___rarg(x_2, x_3, x_4, x_5, x_7); -return x_8; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint32 x_7) { -_start: -{ -uint32 x_8; uint8 x_9; -x_8 = 92; -x_9 = x_7 == x_8; -if (x_9 == 0) -{ -uint32 x_10; uint8 x_11; -lean::dec(x_6); -x_10 = 34; -x_11 = x_7 == x_10; -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::string_push(x_1, x_7); -x_13 = l_Lean_Parser_parseStringLiteralAux___main___rarg(x_2, x_3, x_4, x_5, x_12); -lean::dec(x_5); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -x_14 = lean::cnstr_get(x_4, 0); -lean::inc(x_14); -lean::dec(x_4); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::apply_2(x_15, lean::box(0), x_1); -return x_16; -} -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -lean::inc(x_4); -lean::inc(x_3); -lean::inc(x_2); -x_17 = l_Lean_Parser_parseQuotedChar___rarg(x_2, x_3, x_4); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__1___boxed), 6, 5); -lean::closure_set(x_18, 0, x_1); -lean::closure_set(x_18, 1, x_2); -lean::closure_set(x_18, 2, x_3); -lean::closure_set(x_18, 3, x_4); -lean::closure_set(x_18, 4, x_5); -x_19 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_17, x_18); -return x_19; -} -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_4, x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_sub(x_4, x_8); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -lean::inc(x_2); -lean::inc(x_1); -x_11 = l_Lean_Parser_MonadParsec_any___rarg(x_1, x_2); -lean::inc(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__2___boxed), 7, 6); -lean::closure_set(x_12, 0, x_5); -lean::closure_set(x_12, 1, x_1); -lean::closure_set(x_12, 2, x_2); -lean::closure_set(x_12, 3, x_3); -lean::closure_set(x_12, 4, x_9); -lean::closure_set(x_12, 5, x_10); -x_13 = lean::apply_4(x_10, lean::box(0), lean::box(0), x_11, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; uint32 x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_14 = lean::cnstr_get(x_3, 0); -lean::inc(x_14); -lean::dec(x_3); -x_15 = lean::cnstr_get(x_14, 4); -lean::inc(x_15); -x_16 = 34; -x_17 = l_Lean_Parser_MonadParsec_ch___rarg(x_1, x_2, x_16); -x_18 = lean::cnstr_get(x_14, 1); -lean::inc(x_18); -lean::dec(x_14); -x_19 = lean::apply_2(x_18, lean::box(0), x_5); -x_20 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_17, x_19); -return x_20; -} -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseStringLiteralAux___main___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -uint32 x_7; obj* x_8; -x_7 = lean::unbox_uint32(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_7); -lean::dec(x_5); -return x_8; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -uint32 x_8; obj* x_9; -x_8 = lean::unbox_uint32(x_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_parseStringLiteralAux___main___rarg___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_8); -return x_9; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_parseStringLiteralAux___main___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -return x_6; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_parseStringLiteralAux___main(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_parseStringLiteralAux___main___rarg(x_1, x_2, x_3, x_4, x_5); -return x_6; -} -} -obj* l_Lean_Parser_parseStringLiteralAux(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseStringLiteralAux___rarg___boxed), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_parseStringLiteralAux___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -return x_6; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_parseStringLiteralAux(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_parseStringLiteral___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_String_splitAux___main___closed__1; -x_6 = l_Lean_Parser_parseStringLiteralAux___main___rarg(x_1, x_2, x_3, x_4, x_5); -return x_6; -} -} -obj* l_Lean_Parser_parseStringLiteral___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, uint32 x_5) { -_start: -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_11 = lean::apply_2(x_9, lean::box(0), x_10); -x_12 = l_Lean_Parser_MonadParsec_remaining___rarg___closed__1; -x_13 = lean::apply_4(x_8, lean::box(0), lean::box(0), x_12, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseStringLiteral___rarg___lambda__1___boxed), 4, 3); -lean::closure_set(x_14, 0, x_1); -lean::closure_set(x_14, 1, x_2); -lean::closure_set(x_14, 2, x_3); -x_15 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_13, x_14); -return x_15; -} -} -obj* l_Lean_Parser_parseStringLiteral___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint32 x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -x_5 = 34; -lean::inc(x_2); -lean::inc(x_1); -x_6 = l_Lean_Parser_MonadParsec_ch___rarg(x_1, x_2, x_5); -lean::inc(x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseStringLiteral___rarg___lambda__2___boxed), 5, 4); -lean::closure_set(x_7, 0, x_1); -lean::closure_set(x_7, 1, x_2); -lean::closure_set(x_7, 2, x_3); -lean::closure_set(x_7, 3, x_4); -x_8 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -obj* l_Lean_Parser_parseStringLiteral(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseStringLiteral___rarg), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_parseStringLiteral___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_parseStringLiteral___rarg___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_Lean_Parser_parseStringLiteral___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; obj* x_7; -x_6 = lean::unbox_uint32(x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_parseStringLiteral___rarg___lambda__2(x_1, x_2, x_3, x_4, x_6); -return x_7; -} -} -obj* l_Lean_Parser_parseStringLiteral___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_parseStringLiteral(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* initialize_init_lean_parser_parsec(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_stringliteral(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_parsec(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_parseHexDigit___rarg___closed__1 = _init_l_Lean_Parser_parseHexDigit___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_parseHexDigit___rarg___closed__1); -l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1 = _init_l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1(); -lean::mark_persistent(l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/syntax.cpp b/src/stage0/init/lean/parser/syntax.cpp deleted file mode 100644 index 17eb750904..0000000000 --- a/src/stage0/init/lean/parser/syntax.cpp +++ /dev/null @@ -1,3813 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.syntax -// Imports: init.lean.name init.lean.parser.parsec -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_Syntax_format___main___closed__7; -obj* l_Lean_Parser_Syntax_replace(obj*, obj*); -obj* l_Lean_Parser_Syntax_format___main___closed__3; -uint8 l_List_foldr___main___at_Lean_Parser_Syntax_reprint___main___spec__2(obj*, uint8, obj*); -obj* l_List_mmap___main___at_Lean_Parser_Syntax_updateLeading___spec__2(obj*, obj*, obj*); -obj* l_Lean_Parser_macroScopes_flip___main___boxed(obj*, obj*); -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_Lean_Parser_Syntax_flipScopes___main(obj*, obj*); -obj* l_Lean_Parser_macroScopes_flip___main(obj*, obj*); -obj* l_Lean_Parser_Syntax_mreplace___main___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_Syntax_getHeadInfo___boxed(obj*); -obj* l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6___boxed(obj*, obj*); -extern obj* l_Lean_Format_paren___closed__2; -obj* l_List_map___main___at_Lean_Parser_Syntax_asNode___main___spec__1(obj*, obj*); -obj* l_List_foldr___main___at_Lean_Parser_Syntax_getHeadInfo___main___spec__1(obj*, obj*); -obj* l_Lean_Parser_Syntax_updateLeading___closed__1; -obj* l_Lean_Parser_Syntax_Lean_HasFormat; -obj* l_Lean_Parser_MacroScope_DecidableEq; -obj* l_Lean_Format_group___main(obj*); -obj* l_Lean_Parser_Syntax_isOfKind___boxed(obj*, obj*); -obj* l_Lean_Parser_Syntax_isOfKind___main___boxed(obj*, obj*); -obj* l_Lean_Parser_choice; -obj* l_Lean_Parser_Syntax_format___main___closed__5; -obj* l_Lean_Parser_Syntax_kind___boxed(obj*); -obj* l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__5(obj*); -obj* l_Lean_Parser_Substring_HasToString; -obj* l_Function_comp___rarg(obj*, obj*, obj*); -obj* l_Lean_fmt___at_Lean_Parser_Syntax_HasToString___spec__1(obj*); -obj* l_Lean_Parser_MacroScope_Lean_HasFormat; -obj* l_List_reverse___rarg(obj*); -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l_List_foldr___main___at_Lean_Parser_Syntax_reprint___main___spec__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_format___main___closed__4; -obj* l_Lean_Name_toStringWithSep___main(obj*, obj*); -obj* l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__1(obj*); -extern obj* l_Lean_Format_sbracket___closed__1; -obj* l_Lean_Parser_Syntax_format___main___closed__8; -obj* l_Lean_Parser_Syntax_getHeadInfo___main(obj*); -obj* l___private_init_lean_parser_syntax_1__updateLeadingAux___main(obj*, obj*); -obj* l_Lean_Parser_Substring_toString(obj*); -obj* l_Lean_Parser_Syntax_mreplace___main(obj*); -obj* l_Nat_decEq___boxed(obj*, obj*); -obj* l_String_OldIterator_nextn___main(obj*, obj*); -obj* l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Nat_repr(obj*); -obj* l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_mreplace(obj*); -extern obj* l_Lean_Format_sbracket___closed__2; -obj* l_Lean_Parser_Syntax_getHeadInfo___main___boxed(obj*); -obj* l_List_mmap___main___at_Lean_Parser_Syntax_replace___spec__2(obj*, obj*); -obj* l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__8(obj*, obj*); -obj* l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1(obj*); -obj* l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(obj*, obj*); -obj* l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1(obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_Lean_Parser_Syntax_mreplace___main___boxed(obj*); -obj* l_Lean_Parser_Syntax_list(obj*); -obj* l_Lean_Parser_Syntax_mreplace___boxed(obj*); -extern obj* l_Lean_Format_paren___closed__1; -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__3(obj*); -obj* l_Lean_Parser_Syntax_kind(obj*); -obj* l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__4(obj*); -obj* l_Lean_Parser_Syntax_getPos(obj*); -obj* l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__2(obj*); -obj* l_Lean_Parser_noKind; -obj* l_Lean_Parser_Syntax_reprintAtom___main(obj*); -obj* l_List_foldr___main___at_Lean_Parser_Syntax_getHeadInfo___main___spec__1___boxed(obj*, obj*); -obj* l_List_append___rarg(obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_String_OldIterator_toEnd___main(obj*); -obj* l_Lean_natHasFormat(obj*); -extern obj* l_Lean_Format_paren___closed__3; -obj* l_Lean_Parser_Syntax_getPos___boxed(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_Syntax_reprint___main___closed__1; -obj* l_Lean_Parser_Syntax_reprintAtom(obj*); -obj* l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_updateLeading___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_reprint(obj*); -namespace lean { -uint8 string_dec_eq(obj*, obj*); -} -obj* l_Lean_HasRepr___lambda__1(obj*); -obj* l_Lean_Parser_Syntax_updateLeading(obj*, obj*); -obj* l_Lean_Parser_Syntax_kind___main___boxed(obj*); -obj* l___private_init_lean_parser_syntax_1__updateLeadingAux(obj*, obj*); -obj* l_Lean_Parser_Syntax_format___main___closed__6; -obj* l_Lean_Name_replacePrefix___main(obj*, obj*, obj*); -extern obj* l_Lean_Format_sbracket___closed__3; -extern obj* l_Lean_formatKVMap___closed__1; -obj* l_Lean_Parser_Syntax_format___main(obj*); -obj* l_Lean_Parser_Syntax_HasToString; -obj* l_Lean_Parser_Syntax_reprintAtom___boxed(obj*); -obj* l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Substring_toString___boxed(obj*); -obj* l_Lean_Parser_Syntax_getHeadInfo(obj*); -obj* l_Lean_Parser_Inhabited; -obj* l_Lean_Parser_macroScopes_flip(obj*, obj*); -obj* l_Lean_Parser_Syntax_format___main___closed__1; -obj* l_Lean_Parser_Syntax_reprintAtom___main___boxed(obj*); -obj* l_Lean_Parser_Syntax_asNode(obj*); -extern obj* l_Lean_Name_toString___closed__1; -obj* l_Lean_Parser_Syntax_flipScopes(obj*, obj*); -extern obj* l_List_mmap___main___rarg___closed__1; -obj* l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(obj*); -obj* l_Lean_Parser_Syntax_kind___main(obj*); -obj* l_Lean_Parser_macroScopes_flip___boxed(obj*, obj*); -obj* l_String_OldIterator_extract___main(obj*, obj*); -obj* l_Lean_Parser_Syntax_reprint___main(obj*); -obj* l_List_foldl___main___at_String_join___spec__1(obj*, obj*); -obj* l_String_quote(obj*); -obj* l_Lean_Parser_Syntax_format(obj*); -obj* l_Lean_Parser_Substring_ofString(obj*); -uint8 l_Lean_Parser_Syntax_isOfKind(obj*, obj*); -obj* l_Lean_Parser_Syntax_format___main___closed__2; -obj* l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1___closed__1; -extern obj* l_String_splitAux___main___closed__1; -obj* l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1___boxed(obj*); -obj* l_Lean_Parser_Syntax_mreplace___rarg(obj*, obj*, obj*); -namespace lean { -obj* string_length(obj*); -} -obj* _init_l_Lean_Parser_choice() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("choice"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_noKind() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("noKind"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_MacroScope_DecidableEq() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Nat_decEq___boxed), 2, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_MacroScope_Lean_HasFormat() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_natHasFormat), 1, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_Inhabited() { -_start: -{ -obj* x_1; -x_1 = lean::box(3); -return x_1; -} -} -obj* l_Lean_Parser_Substring_toString(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = l_String_OldIterator_extract___main(x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Substring_toString___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Substring_toString(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Substring_ofString(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::mk_nat_obj(0u); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -lean::cnstr_set(x_3, 2, x_2); -lean::inc(x_3); -x_4 = l_String_OldIterator_toEnd___main(x_3); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Substring_HasToString() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Substring_toString___boxed), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_macroScopes_flip___main(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -lean::inc(x_1); -return x_1; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_2, 0); -x_5 = lean::cnstr_get(x_2, 1); -x_6 = l_Lean_Parser_macroScopes_flip___main(x_1, x_5); -if (lean::obj_tag(x_6) == 0) -{ -lean::cnstr_set(x_2, 1, x_6); -return x_2; -} -else -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -x_9 = lean::nat_dec_eq(x_4, x_7); -lean::dec(x_7); -if (x_9 == 0) -{ -lean::dec(x_8); -lean::cnstr_set(x_2, 1, x_6); -return x_2; -} -else -{ -lean::dec(x_6); -lean::free_heap_obj(x_2); -lean::dec(x_4); -return x_8; -} -} -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_2, 0); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_2); -x_12 = l_Lean_Parser_macroScopes_flip___main(x_1, x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; uint8 x_16; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_12, 1); -lean::inc(x_15); -x_16 = lean::nat_dec_eq(x_10, x_14); -lean::dec(x_14); -if (x_16 == 0) -{ -obj* x_17; -lean::dec(x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_10); -lean::cnstr_set(x_17, 1, x_12); -return x_17; -} -else -{ -lean::dec(x_12); -lean::dec(x_10); -return x_15; -} -} -} -} -} -} -obj* l_Lean_Parser_macroScopes_flip___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_macroScopes_flip___main(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_macroScopes_flip(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_macroScopes_flip___main(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_macroScopes_flip___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_macroScopes_flip(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Syntax_flipScopes___main(obj* x_1, obj* x_2) { -_start: -{ -switch (lean::obj_tag(x_2)) { -case 0: -{ -lean::dec(x_1); -return x_2; -} -case 1: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; uint8 x_5; -x_4 = lean::cnstr_get(x_2, 0); -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_4, 4); -x_7 = l_Lean_Parser_macroScopes_flip___main(x_6, x_1); -lean::dec(x_6); -lean::cnstr_set(x_4, 4, x_7); -return x_2; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_8 = lean::cnstr_get(x_4, 0); -x_9 = lean::cnstr_get(x_4, 1); -x_10 = lean::cnstr_get(x_4, 2); -x_11 = lean::cnstr_get(x_4, 3); -x_12 = lean::cnstr_get(x_4, 4); -lean::inc(x_12); -lean::inc(x_11); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_4); -x_13 = l_Lean_Parser_macroScopes_flip___main(x_12, x_1); -lean::dec(x_12); -x_14 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_14, 0, x_8); -lean::cnstr_set(x_14, 1, x_9); -lean::cnstr_set(x_14, 2, x_10); -lean::cnstr_set(x_14, 3, x_11); -lean::cnstr_set(x_14, 4, x_13); -lean::cnstr_set(x_2, 0, x_14); -return x_2; -} -} -else -{ -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_15 = lean::cnstr_get(x_2, 0); -lean::inc(x_15); -lean::dec(x_2); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_15, 2); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_15, 3); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_15, 4); -lean::inc(x_20); -if (lean::is_exclusive(x_15)) { - lean::cnstr_release(x_15, 0); - lean::cnstr_release(x_15, 1); - lean::cnstr_release(x_15, 2); - lean::cnstr_release(x_15, 3); - lean::cnstr_release(x_15, 4); - x_21 = x_15; -} else { - lean::dec_ref(x_15); - x_21 = lean::box(0); -} -x_22 = l_Lean_Parser_macroScopes_flip___main(x_20, x_1); -lean::dec(x_20); -if (lean::is_scalar(x_21)) { - x_23 = lean::alloc_cnstr(0, 5, 0); -} else { - x_23 = x_21; -} -lean::cnstr_set(x_23, 0, x_16); -lean::cnstr_set(x_23, 1, x_17); -lean::cnstr_set(x_23, 2, x_18); -lean::cnstr_set(x_23, 3, x_19); -lean::cnstr_set(x_23, 4, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -return x_24; -} -} -case 2: -{ -uint8 x_25; -x_25 = !lean::is_exclusive(x_2); -if (x_25 == 0) -{ -obj* x_26; uint8 x_27; -x_26 = lean::cnstr_get(x_2, 0); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_26, 2); -x_29 = l_Lean_Parser_macroScopes_flip___main(x_28, x_1); -lean::dec(x_28); -lean::cnstr_set(x_26, 2, x_29); -return x_2; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_30 = lean::cnstr_get(x_26, 0); -x_31 = lean::cnstr_get(x_26, 1); -x_32 = lean::cnstr_get(x_26, 2); -lean::inc(x_32); -lean::inc(x_31); -lean::inc(x_30); -lean::dec(x_26); -x_33 = l_Lean_Parser_macroScopes_flip___main(x_32, x_1); -lean::dec(x_32); -x_34 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_34, 0, x_30); -lean::cnstr_set(x_34, 1, x_31); -lean::cnstr_set(x_34, 2, x_33); -lean::cnstr_set(x_2, 0, x_34); -return x_2; -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_35 = lean::cnstr_get(x_2, 0); -lean::inc(x_35); -lean::dec(x_2); -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_35, 1); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 2); -lean::inc(x_38); -if (lean::is_exclusive(x_35)) { - lean::cnstr_release(x_35, 0); - lean::cnstr_release(x_35, 1); - lean::cnstr_release(x_35, 2); - x_39 = x_35; -} else { - lean::dec_ref(x_35); - x_39 = lean::box(0); -} -x_40 = l_Lean_Parser_macroScopes_flip___main(x_38, x_1); -lean::dec(x_38); -if (lean::is_scalar(x_39)) { - x_41 = lean::alloc_cnstr(0, 3, 0); -} else { - x_41 = x_39; -} -lean::cnstr_set(x_41, 0, x_36); -lean::cnstr_set(x_41, 1, x_37); -lean::cnstr_set(x_41, 2, x_40); -x_42 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -return x_42; -} -} -default: -{ -lean::dec(x_1); -return x_2; -} -} -} -} -obj* l_Lean_Parser_Syntax_flipScopes(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Syntax_flipScopes___main(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Syntax_mkNode(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = lean::box(0); -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_3); -x_5 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* l_List_map___main___at_Lean_Parser_Syntax_asNode___main___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -x_7 = lean::cnstr_get(x_1, 2); -lean::inc(x_7); -x_8 = l_Lean_Parser_Syntax_flipScopes___main(x_7, x_5); -x_9 = l_List_map___main___at_Lean_Parser_Syntax_asNode___main___spec__1(x_1, x_6); -lean::cnstr_set(x_2, 1, x_9); -lean::cnstr_set(x_2, 0, x_8); -return x_2; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_2, 0); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_1, 2); -lean::inc(x_12); -x_13 = l_Lean_Parser_Syntax_flipScopes___main(x_12, x_10); -x_14 = l_List_map___main___at_Lean_Parser_Syntax_asNode___main___spec__1(x_1, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -} -} -} -obj* l_Lean_Parser_Syntax_asNode___main(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 2) -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -lean::dec(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::inc(x_2); -x_5 = l_List_map___main___at_Lean_Parser_Syntax_asNode___main___spec__1(x_2, x_4); -x_6 = !lean::is_exclusive(x_2); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_2, 2); -lean::dec(x_7); -x_8 = lean::cnstr_get(x_2, 1); -lean::dec(x_8); -x_9 = lean::cnstr_get(x_2, 0); -lean::dec(x_9); -x_10 = lean::box(0); -lean::cnstr_set(x_2, 2, x_10); -lean::cnstr_set(x_2, 1, x_5); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_2); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; -lean::dec(x_2); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_3); -lean::cnstr_set(x_13, 1, x_5); -lean::cnstr_set(x_13, 2, x_12); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_1); -x_15 = lean::box(0); -return x_15; -} -} -} -obj* l_Lean_Parser_Syntax_asNode(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_list(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -return x_3; -} -} -obj* l_Lean_Parser_Syntax_kind___main(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 2) -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::box(0); -return x_5; -} -} -} -obj* l_Lean_Parser_Syntax_kind___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_kind___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_kind(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_kind___main(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_kind___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_kind(x_1); -lean::dec(x_1); -return x_2; -} -} -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 2) -{ -obj* x_3; obj* x_4; uint8 x_5; -x_3 = lean::cnstr_get(x_2, 0); -x_4 = lean::cnstr_get(x_3, 0); -x_5 = lean_name_dec_eq(x_1, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = 0; -return x_6; -} -} -} -obj* l_Lean_Parser_Syntax_isOfKind___main___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_Lean_Parser_Syntax_isOfKind___main(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -uint8 l_Lean_Parser_Syntax_isOfKind(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = l_Lean_Parser_Syntax_isOfKind___main(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Syntax_isOfKind___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; obj* x_4; -x_3 = l_Lean_Parser_Syntax_isOfKind(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -x_4 = lean::box(x_3); -return x_4; -} -} -obj* l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_2); -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -return x_7; -} -else -{ -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; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_3, 1); -lean::inc(x_10); -lean::dec(x_3); -x_11 = lean::cnstr_get(x_8, 2); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 0); -lean::inc(x_12); -lean::dec(x_8); -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -lean::dec(x_12); -lean::inc(x_2); -lean::inc(x_1); -x_14 = l_Lean_Parser_Syntax_mreplace___main___rarg(x_1, x_2, x_9); -x_15 = l_List_mmap___main___rarg___closed__1; -x_16 = lean::apply_4(x_13, lean::box(0), lean::box(0), x_15, x_14); -x_17 = l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1___rarg(x_1, x_2, x_10); -x_18 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_16, x_17); -return x_18; -} -} -} -obj* l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::apply_2(x_5, lean::box(0), x_2); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_2); -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -lean::dec(x_3); -x_10 = lean::apply_2(x_8, lean::box(0), x_9); -return x_10; -} -} -} -obj* l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__2(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; -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::dec(x_1); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 2, x_3); -x_7 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -x_8 = lean::apply_2(x_5, lean::box(0), x_7); -return x_8; -} -} -obj* l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_2, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_2, 2); -lean::inc(x_9); -lean::dec(x_2); -x_10 = l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1___rarg(x_1, x_3, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__2), 4, 3); -lean::closure_set(x_11, 0, x_6); -lean::closure_set(x_11, 1, x_7); -lean::closure_set(x_11, 2, x_9); -x_12 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_10, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_13 = lean::cnstr_get(x_5, 0); -lean::inc(x_13); -lean::dec(x_5); -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::apply_2(x_15, lean::box(0), x_13); -return x_16; -} -} -} -obj* l_Lean_Parser_Syntax_mreplace___main___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 2) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_3, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_1, 1); -lean::inc(x_11); -lean::inc(x_2); -x_12 = lean::apply_1(x_2, x_3); -lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__3), 5, 4); -lean::closure_set(x_13, 0, x_1); -lean::closure_set(x_13, 1, x_10); -lean::closure_set(x_13, 2, x_2); -lean::closure_set(x_13, 3, x_11); -x_14 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_12, x_13); -return x_14; -} -else -{ -obj* x_15; -x_15 = lean::box(0); -x_4 = x_15; -goto block_9; -} -block_9: -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_4); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::inc(x_3); -x_6 = lean::apply_1(x_2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Syntax_mreplace___main___rarg___lambda__1), 3, 2); -lean::closure_set(x_7, 0, x_1); -lean::closure_set(x_7, 1, x_3); -x_8 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_6, x_7); -return x_8; -} -} -} -obj* l_Lean_Parser_Syntax_mreplace___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Syntax_mreplace___main___rarg), 3, 0); -return x_2; -} -} -obj* l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_List_mmap___main___at_Lean_Parser_Syntax_mreplace___main___spec__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_mreplace___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_mreplace___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_mreplace___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_mreplace___main___rarg(x_1, x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Syntax_mreplace(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Syntax_mreplace___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_mreplace___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_mreplace(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_List_mmap___main___at_Lean_Parser_Syntax_replace___spec__2(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -lean::dec(x_1); -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_1); -x_7 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_1, x_5); -x_8 = l_List_mmap___main___at_Lean_Parser_Syntax_replace___spec__2(x_1, x_6); -lean::cnstr_set(x_2, 1, x_8); -lean::cnstr_set(x_2, 0, x_7); -return x_2; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_2, 0); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -lean::inc(x_9); -lean::dec(x_2); -lean::inc(x_1); -x_11 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_1, x_9); -x_12 = l_List_mmap___main___at_Lean_Parser_Syntax_replace___spec__2(x_1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -} -} -obj* l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -if (lean::obj_tag(x_2) == 2) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -lean::inc(x_1); -lean::inc(x_2); -x_8 = lean::apply_1(x_1, x_2); -x_9 = !lean::is_exclusive(x_2); -if (x_9 == 0) -{ -obj* x_10; -x_10 = lean::cnstr_get(x_2, 0); -lean::dec(x_10); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_7); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_7, 1); -x_13 = l_List_mmap___main___at_Lean_Parser_Syntax_replace___spec__2(x_1, x_12); -lean::cnstr_set(x_7, 1, x_13); -return x_2; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_7, 0); -x_15 = lean::cnstr_get(x_7, 1); -x_16 = lean::cnstr_get(x_7, 2); -lean::inc(x_16); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_7); -x_17 = l_List_mmap___main___at_Lean_Parser_Syntax_replace___spec__2(x_1, x_15); -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_14); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_18, 2, x_16); -lean::cnstr_set(x_2, 0, x_18); -return x_2; -} -} -else -{ -obj* x_19; -lean::free_heap_obj(x_2); -lean::dec(x_7); -lean::dec(x_1); -x_19 = lean::cnstr_get(x_8, 0); -lean::inc(x_19); -lean::dec(x_8); -return x_19; -} -} -else -{ -lean::dec(x_2); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_20 = lean::cnstr_get(x_7, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_7, 1); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_7, 2); -lean::inc(x_22); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_23 = x_7; -} else { - lean::dec_ref(x_7); - x_23 = lean::box(0); -} -x_24 = l_List_mmap___main___at_Lean_Parser_Syntax_replace___spec__2(x_1, x_21); -if (lean::is_scalar(x_23)) { - x_25 = lean::alloc_cnstr(0, 3, 0); -} else { - x_25 = x_23; -} -lean::cnstr_set(x_25, 0, x_20); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_25, 2, x_22); -x_26 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -return x_26; -} -else -{ -obj* x_27; -lean::dec(x_7); -lean::dec(x_1); -x_27 = lean::cnstr_get(x_8, 0); -lean::inc(x_27); -lean::dec(x_8); -return x_27; -} -} -} -else -{ -obj* x_28; -x_28 = lean::box(0); -x_3 = x_28; -goto block_6; -} -block_6: -{ -obj* x_4; -lean::dec(x_3); -lean::inc(x_2); -x_4 = lean::apply_1(x_1, x_2); -if (lean::obj_tag(x_4) == 0) -{ -return x_2; -} -else -{ -obj* x_5; -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -lean::dec(x_4); -return x_5; -} -} -} -} -obj* l_Lean_Parser_Syntax_replace(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_replace___spec__1(x_1, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_syntax_1__updateLeadingAux___main(obj* x_1, obj* x_2) { -_start: -{ -switch (lean::obj_tag(x_1)) { -case 0: -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -lean::free_heap_obj(x_1); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; -x_9 = lean::cnstr_get(x_5, 0); -x_10 = lean::cnstr_get(x_9, 2); -lean::inc(x_10); -x_11 = !lean::is_exclusive(x_4); -if (x_11 == 0) -{ -obj* x_12; uint8 x_13; -x_12 = lean::cnstr_get(x_4, 0); -lean::dec(x_12); -x_13 = !lean::is_exclusive(x_9); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_14 = lean::cnstr_get(x_9, 1); -x_15 = lean::cnstr_get(x_9, 2); -lean::dec(x_15); -x_16 = lean::cnstr_get(x_9, 0); -lean::dec(x_16); -x_17 = lean::cnstr_get(x_10, 1); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_2, 1); -lean::inc(x_18); -x_19 = lean::nat_sub(x_14, x_18); -lean::dec(x_18); -lean::inc(x_2); -x_20 = l_String_OldIterator_nextn___main(x_2, x_19); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_2); -lean::cnstr_set(x_21, 1, x_20); -lean::cnstr_set(x_9, 0, x_21); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_1); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_17); -return x_23; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_24 = lean::cnstr_get(x_9, 1); -lean::inc(x_24); -lean::dec(x_9); -x_25 = lean::cnstr_get(x_10, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_2, 1); -lean::inc(x_26); -x_27 = lean::nat_sub(x_24, x_26); -lean::dec(x_26); -lean::inc(x_2); -x_28 = l_String_OldIterator_nextn___main(x_2, x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_2); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_24); -lean::cnstr_set(x_30, 2, x_10); -lean::cnstr_set(x_5, 0, x_30); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_1); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_25); -return x_32; -} -} -else -{ -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; -x_33 = lean::cnstr_get(x_4, 1); -lean::inc(x_33); -lean::dec(x_4); -x_34 = lean::cnstr_get(x_9, 1); -lean::inc(x_34); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_35 = x_9; -} else { - lean::dec_ref(x_9); - x_35 = lean::box(0); -} -x_36 = lean::cnstr_get(x_10, 1); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_2, 1); -lean::inc(x_37); -x_38 = lean::nat_sub(x_34, x_37); -lean::dec(x_37); -lean::inc(x_2); -x_39 = l_String_OldIterator_nextn___main(x_2, x_38); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_2); -lean::cnstr_set(x_40, 1, x_39); -if (lean::is_scalar(x_35)) { - x_41 = lean::alloc_cnstr(0, 3, 0); -} else { - x_41 = x_35; -} -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_34); -lean::cnstr_set(x_41, 2, x_10); -lean::cnstr_set(x_5, 0, x_41); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_5); -lean::cnstr_set(x_42, 1, x_33); -lean::cnstr_set(x_1, 0, x_42); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_1); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_36); -return x_44; -} -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_45 = lean::cnstr_get(x_5, 0); -lean::inc(x_45); -lean::dec(x_5); -x_46 = lean::cnstr_get(x_45, 2); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_4, 1); -lean::inc(x_47); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - x_48 = x_4; -} else { - lean::dec_ref(x_4); - x_48 = lean::box(0); -} -x_49 = lean::cnstr_get(x_45, 1); -lean::inc(x_49); -if (lean::is_exclusive(x_45)) { - lean::cnstr_release(x_45, 0); - lean::cnstr_release(x_45, 1); - lean::cnstr_release(x_45, 2); - x_50 = x_45; -} else { - lean::dec_ref(x_45); - x_50 = lean::box(0); -} -x_51 = lean::cnstr_get(x_46, 1); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_2, 1); -lean::inc(x_52); -x_53 = lean::nat_sub(x_49, x_52); -lean::dec(x_52); -lean::inc(x_2); -x_54 = l_String_OldIterator_nextn___main(x_2, x_53); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_2); -lean::cnstr_set(x_55, 1, x_54); -if (lean::is_scalar(x_50)) { - x_56 = lean::alloc_cnstr(0, 3, 0); -} else { - x_56 = x_50; -} -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_49); -lean::cnstr_set(x_56, 2, x_46); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -if (lean::is_scalar(x_48)) { - x_58 = lean::alloc_cnstr(0, 2, 0); -} else { - x_58 = x_48; -} -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_47); -lean::cnstr_set(x_1, 0, x_58); -x_59 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_59, 0, x_1); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_51); -return x_60; -} -} -} -else -{ -obj* x_61; obj* x_62; -x_61 = lean::cnstr_get(x_1, 0); -lean::inc(x_61); -lean::dec(x_1); -x_62 = lean::cnstr_get(x_61, 0); -lean::inc(x_62); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; -lean::dec(x_61); -x_63 = lean::box(0); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_2); -return x_64; -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_65 = lean::cnstr_get(x_62, 0); -lean::inc(x_65); -if (lean::is_exclusive(x_62)) { - lean::cnstr_release(x_62, 0); - x_66 = x_62; -} else { - lean::dec_ref(x_62); - x_66 = lean::box(0); -} -x_67 = lean::cnstr_get(x_65, 2); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_61, 1); -lean::inc(x_68); -if (lean::is_exclusive(x_61)) { - lean::cnstr_release(x_61, 0); - lean::cnstr_release(x_61, 1); - x_69 = x_61; -} else { - lean::dec_ref(x_61); - x_69 = lean::box(0); -} -x_70 = lean::cnstr_get(x_65, 1); -lean::inc(x_70); -if (lean::is_exclusive(x_65)) { - lean::cnstr_release(x_65, 0); - lean::cnstr_release(x_65, 1); - lean::cnstr_release(x_65, 2); - x_71 = x_65; -} else { - lean::dec_ref(x_65); - x_71 = lean::box(0); -} -x_72 = lean::cnstr_get(x_67, 1); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_2, 1); -lean::inc(x_73); -x_74 = lean::nat_sub(x_70, x_73); -lean::dec(x_73); -lean::inc(x_2); -x_75 = l_String_OldIterator_nextn___main(x_2, x_74); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_2); -lean::cnstr_set(x_76, 1, x_75); -if (lean::is_scalar(x_71)) { - x_77 = lean::alloc_cnstr(0, 3, 0); -} else { - x_77 = x_71; -} -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_70); -lean::cnstr_set(x_77, 2, x_67); -if (lean::is_scalar(x_66)) { - x_78 = lean::alloc_cnstr(1, 1, 0); -} else { - x_78 = x_66; -} -lean::cnstr_set(x_78, 0, x_77); -if (lean::is_scalar(x_69)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_69; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_68); -x_80 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_80, 0, x_79); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_72); -return x_82; -} -} -} -case 1: -{ -uint8 x_83; -x_83 = !lean::is_exclusive(x_1); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_1, 0); -x_85 = lean::cnstr_get(x_84, 0); -lean::inc(x_85); -if (lean::obj_tag(x_85) == 0) -{ -obj* x_86; obj* x_87; -lean::free_heap_obj(x_1); -lean::dec(x_84); -x_86 = lean::box(0); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_2); -return x_87; -} -else -{ -uint8 x_88; -x_88 = !lean::is_exclusive(x_85); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; uint8 x_91; -x_89 = lean::cnstr_get(x_85, 0); -x_90 = lean::cnstr_get(x_89, 2); -lean::inc(x_90); -x_91 = !lean::is_exclusive(x_84); -if (x_91 == 0) -{ -obj* x_92; uint8 x_93; -x_92 = lean::cnstr_get(x_84, 0); -lean::dec(x_92); -x_93 = !lean::is_exclusive(x_89); -if (x_93 == 0) -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_94 = lean::cnstr_get(x_89, 1); -x_95 = lean::cnstr_get(x_89, 2); -lean::dec(x_95); -x_96 = lean::cnstr_get(x_89, 0); -lean::dec(x_96); -x_97 = lean::cnstr_get(x_90, 1); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_2, 1); -lean::inc(x_98); -x_99 = lean::nat_sub(x_94, x_98); -lean::dec(x_98); -lean::inc(x_2); -x_100 = l_String_OldIterator_nextn___main(x_2, x_99); -x_101 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_101, 0, x_2); -lean::cnstr_set(x_101, 1, x_100); -lean::cnstr_set(x_89, 0, x_101); -x_102 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_102, 0, x_1); -x_103 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_97); -return x_103; -} -else -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_104 = lean::cnstr_get(x_89, 1); -lean::inc(x_104); -lean::dec(x_89); -x_105 = lean::cnstr_get(x_90, 1); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_2, 1); -lean::inc(x_106); -x_107 = lean::nat_sub(x_104, x_106); -lean::dec(x_106); -lean::inc(x_2); -x_108 = l_String_OldIterator_nextn___main(x_2, x_107); -x_109 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_109, 0, x_2); -lean::cnstr_set(x_109, 1, x_108); -x_110 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_110, 0, x_109); -lean::cnstr_set(x_110, 1, x_104); -lean::cnstr_set(x_110, 2, x_90); -lean::cnstr_set(x_85, 0, x_110); -x_111 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_111, 0, x_1); -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_105); -return x_112; -} -} -else -{ -obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; -x_113 = lean::cnstr_get(x_84, 1); -x_114 = lean::cnstr_get(x_84, 2); -x_115 = lean::cnstr_get(x_84, 3); -x_116 = lean::cnstr_get(x_84, 4); -lean::inc(x_116); -lean::inc(x_115); -lean::inc(x_114); -lean::inc(x_113); -lean::dec(x_84); -x_117 = lean::cnstr_get(x_89, 1); -lean::inc(x_117); -if (lean::is_exclusive(x_89)) { - lean::cnstr_release(x_89, 0); - lean::cnstr_release(x_89, 1); - lean::cnstr_release(x_89, 2); - x_118 = x_89; -} else { - lean::dec_ref(x_89); - x_118 = lean::box(0); -} -x_119 = lean::cnstr_get(x_90, 1); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_2, 1); -lean::inc(x_120); -x_121 = lean::nat_sub(x_117, x_120); -lean::dec(x_120); -lean::inc(x_2); -x_122 = l_String_OldIterator_nextn___main(x_2, x_121); -x_123 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_123, 0, x_2); -lean::cnstr_set(x_123, 1, x_122); -if (lean::is_scalar(x_118)) { - x_124 = lean::alloc_cnstr(0, 3, 0); -} else { - x_124 = x_118; -} -lean::cnstr_set(x_124, 0, x_123); -lean::cnstr_set(x_124, 1, x_117); -lean::cnstr_set(x_124, 2, x_90); -lean::cnstr_set(x_85, 0, x_124); -x_125 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_125, 0, x_85); -lean::cnstr_set(x_125, 1, x_113); -lean::cnstr_set(x_125, 2, x_114); -lean::cnstr_set(x_125, 3, x_115); -lean::cnstr_set(x_125, 4, x_116); -lean::cnstr_set(x_1, 0, x_125); -x_126 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_126, 0, x_1); -x_127 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_119); -return x_127; -} -} -else -{ -obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; -x_128 = lean::cnstr_get(x_85, 0); -lean::inc(x_128); -lean::dec(x_85); -x_129 = lean::cnstr_get(x_128, 2); -lean::inc(x_129); -x_130 = lean::cnstr_get(x_84, 1); -lean::inc(x_130); -x_131 = lean::cnstr_get(x_84, 2); -lean::inc(x_131); -x_132 = lean::cnstr_get(x_84, 3); -lean::inc(x_132); -x_133 = lean::cnstr_get(x_84, 4); -lean::inc(x_133); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - lean::cnstr_release(x_84, 1); - lean::cnstr_release(x_84, 2); - lean::cnstr_release(x_84, 3); - lean::cnstr_release(x_84, 4); - x_134 = x_84; -} else { - lean::dec_ref(x_84); - x_134 = lean::box(0); -} -x_135 = lean::cnstr_get(x_128, 1); -lean::inc(x_135); -if (lean::is_exclusive(x_128)) { - lean::cnstr_release(x_128, 0); - lean::cnstr_release(x_128, 1); - lean::cnstr_release(x_128, 2); - x_136 = x_128; -} else { - lean::dec_ref(x_128); - x_136 = lean::box(0); -} -x_137 = lean::cnstr_get(x_129, 1); -lean::inc(x_137); -x_138 = lean::cnstr_get(x_2, 1); -lean::inc(x_138); -x_139 = lean::nat_sub(x_135, x_138); -lean::dec(x_138); -lean::inc(x_2); -x_140 = l_String_OldIterator_nextn___main(x_2, x_139); -x_141 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_141, 0, x_2); -lean::cnstr_set(x_141, 1, x_140); -if (lean::is_scalar(x_136)) { - x_142 = lean::alloc_cnstr(0, 3, 0); -} else { - x_142 = x_136; -} -lean::cnstr_set(x_142, 0, x_141); -lean::cnstr_set(x_142, 1, x_135); -lean::cnstr_set(x_142, 2, x_129); -x_143 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_143, 0, x_142); -if (lean::is_scalar(x_134)) { - x_144 = lean::alloc_cnstr(0, 5, 0); -} else { - x_144 = x_134; -} -lean::cnstr_set(x_144, 0, x_143); -lean::cnstr_set(x_144, 1, x_130); -lean::cnstr_set(x_144, 2, x_131); -lean::cnstr_set(x_144, 3, x_132); -lean::cnstr_set(x_144, 4, x_133); -lean::cnstr_set(x_1, 0, x_144); -x_145 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_145, 0, x_1); -x_146 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_146, 0, x_145); -lean::cnstr_set(x_146, 1, x_137); -return x_146; -} -} -} -else -{ -obj* x_147; obj* x_148; -x_147 = lean::cnstr_get(x_1, 0); -lean::inc(x_147); -lean::dec(x_1); -x_148 = lean::cnstr_get(x_147, 0); -lean::inc(x_148); -if (lean::obj_tag(x_148) == 0) -{ -obj* x_149; obj* x_150; -lean::dec(x_147); -x_149 = lean::box(0); -x_150 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_150, 0, x_149); -lean::cnstr_set(x_150, 1, x_2); -return x_150; -} -else -{ -obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; -x_151 = lean::cnstr_get(x_148, 0); -lean::inc(x_151); -if (lean::is_exclusive(x_148)) { - lean::cnstr_release(x_148, 0); - x_152 = x_148; -} else { - lean::dec_ref(x_148); - x_152 = lean::box(0); -} -x_153 = lean::cnstr_get(x_151, 2); -lean::inc(x_153); -x_154 = lean::cnstr_get(x_147, 1); -lean::inc(x_154); -x_155 = lean::cnstr_get(x_147, 2); -lean::inc(x_155); -x_156 = lean::cnstr_get(x_147, 3); -lean::inc(x_156); -x_157 = lean::cnstr_get(x_147, 4); -lean::inc(x_157); -if (lean::is_exclusive(x_147)) { - lean::cnstr_release(x_147, 0); - lean::cnstr_release(x_147, 1); - lean::cnstr_release(x_147, 2); - lean::cnstr_release(x_147, 3); - lean::cnstr_release(x_147, 4); - x_158 = x_147; -} else { - lean::dec_ref(x_147); - x_158 = lean::box(0); -} -x_159 = lean::cnstr_get(x_151, 1); -lean::inc(x_159); -if (lean::is_exclusive(x_151)) { - lean::cnstr_release(x_151, 0); - lean::cnstr_release(x_151, 1); - lean::cnstr_release(x_151, 2); - x_160 = x_151; -} else { - lean::dec_ref(x_151); - x_160 = lean::box(0); -} -x_161 = lean::cnstr_get(x_153, 1); -lean::inc(x_161); -x_162 = lean::cnstr_get(x_2, 1); -lean::inc(x_162); -x_163 = lean::nat_sub(x_159, x_162); -lean::dec(x_162); -lean::inc(x_2); -x_164 = l_String_OldIterator_nextn___main(x_2, x_163); -x_165 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_165, 0, x_2); -lean::cnstr_set(x_165, 1, x_164); -if (lean::is_scalar(x_160)) { - x_166 = lean::alloc_cnstr(0, 3, 0); -} else { - x_166 = x_160; -} -lean::cnstr_set(x_166, 0, x_165); -lean::cnstr_set(x_166, 1, x_159); -lean::cnstr_set(x_166, 2, x_153); -if (lean::is_scalar(x_152)) { - x_167 = lean::alloc_cnstr(1, 1, 0); -} else { - x_167 = x_152; -} -lean::cnstr_set(x_167, 0, x_166); -if (lean::is_scalar(x_158)) { - x_168 = lean::alloc_cnstr(0, 5, 0); -} else { - x_168 = x_158; -} -lean::cnstr_set(x_168, 0, x_167); -lean::cnstr_set(x_168, 1, x_154); -lean::cnstr_set(x_168, 2, x_155); -lean::cnstr_set(x_168, 3, x_156); -lean::cnstr_set(x_168, 4, x_157); -x_169 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_169, 0, x_168); -x_170 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_170, 0, x_169); -x_171 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_171, 0, x_170); -lean::cnstr_set(x_171, 1, x_161); -return x_171; -} -} -} -default: -{ -obj* x_172; obj* x_173; -lean::dec(x_1); -x_172 = lean::box(0); -x_173 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_173, 0, x_172); -lean::cnstr_set(x_173, 1, x_2); -return x_173; -} -} -} -} -obj* l___private_init_lean_parser_syntax_1__updateLeadingAux(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l___private_init_lean_parser_syntax_1__updateLeadingAux___main(x_1, x_2); -return x_3; -} -} -obj* l_List_mmap___main___at_Lean_Parser_Syntax_updateLeading___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_4; obj* x_5; -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_2); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint8 x_13; -x_7 = lean::cnstr_get(x_2, 0); -x_8 = lean::cnstr_get(x_2, 1); -lean::inc(x_1); -x_9 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_updateLeading___spec__1(x_1, x_7, x_3); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -x_12 = l_List_mmap___main___at_Lean_Parser_Syntax_updateLeading___spec__2(x_1, x_8, x_11); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; -x_14 = lean::cnstr_get(x_12, 0); -lean::cnstr_set(x_2, 1, x_14); -lean::cnstr_set(x_2, 0, x_10); -lean::cnstr_set(x_12, 0, x_2); -return x_12; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_12, 0); -x_16 = lean::cnstr_get(x_12, 1); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_12); -lean::cnstr_set(x_2, 1, x_15); -lean::cnstr_set(x_2, 0, x_10); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_2); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -else -{ -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; -x_18 = lean::cnstr_get(x_2, 0); -x_19 = lean::cnstr_get(x_2, 1); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_2); -lean::inc(x_1); -x_20 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_updateLeading___spec__1(x_1, x_18, x_3); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = l_List_mmap___main___at_Lean_Parser_Syntax_updateLeading___spec__2(x_1, x_19, x_22); -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_23, 1); -lean::inc(x_25); -if (lean::is_exclusive(x_23)) { - lean::cnstr_release(x_23, 0); - lean::cnstr_release(x_23, 1); - x_26 = x_23; -} else { - lean::dec_ref(x_23); - x_26 = lean::box(0); -} -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_21); -lean::cnstr_set(x_27, 1, x_24); -if (lean::is_scalar(x_26)) { - x_28 = lean::alloc_cnstr(0, 2, 0); -} else { - x_28 = x_26; -} -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_25); -return x_28; -} -} -} -} -obj* l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_updateLeading___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -if (lean::obj_tag(x_2) == 2) -{ -obj* x_18; obj* x_19; uint8 x_20; -x_18 = lean::cnstr_get(x_2, 0); -lean::inc(x_18); -lean::inc(x_1); -lean::inc(x_2); -x_19 = lean::apply_2(x_1, x_2, x_3); -x_20 = !lean::is_exclusive(x_2); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_2, 0); -lean::dec(x_21); -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_19, 1); -lean::inc(x_23); -lean::dec(x_19); -x_24 = !lean::is_exclusive(x_18); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; uint8 x_27; -x_25 = lean::cnstr_get(x_18, 1); -x_26 = l_List_mmap___main___at_Lean_Parser_Syntax_updateLeading___spec__2(x_1, x_25, x_23); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; -x_28 = lean::cnstr_get(x_26, 0); -lean::cnstr_set(x_18, 1, x_28); -lean::cnstr_set(x_26, 0, x_2); -return x_26; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::cnstr_get(x_26, 0); -x_30 = lean::cnstr_get(x_26, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_26); -lean::cnstr_set(x_18, 1, x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_2); -lean::cnstr_set(x_31, 1, x_30); -return x_31; -} -} -else -{ -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; -x_32 = lean::cnstr_get(x_18, 0); -x_33 = lean::cnstr_get(x_18, 1); -x_34 = lean::cnstr_get(x_18, 2); -lean::inc(x_34); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_18); -x_35 = l_List_mmap___main___at_Lean_Parser_Syntax_updateLeading___spec__2(x_1, x_33, x_23); -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_35, 1); -lean::inc(x_37); -if (lean::is_exclusive(x_35)) { - lean::cnstr_release(x_35, 0); - lean::cnstr_release(x_35, 1); - x_38 = x_35; -} else { - lean::dec_ref(x_35); - x_38 = lean::box(0); -} -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_32); -lean::cnstr_set(x_39, 1, x_36); -lean::cnstr_set(x_39, 2, x_34); -lean::cnstr_set(x_2, 0, x_39); -if (lean::is_scalar(x_38)) { - x_40 = lean::alloc_cnstr(0, 2, 0); -} else { - x_40 = x_38; -} -lean::cnstr_set(x_40, 0, x_2); -lean::cnstr_set(x_40, 1, x_37); -return x_40; -} -} -else -{ -uint8 x_41; -lean::free_heap_obj(x_2); -lean::dec(x_18); -lean::dec(x_1); -x_41 = !lean::is_exclusive(x_19); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_19, 0); -lean::dec(x_42); -x_43 = lean::cnstr_get(x_22, 0); -lean::inc(x_43); -lean::dec(x_22); -lean::cnstr_set(x_19, 0, x_43); -return x_19; -} -else -{ -obj* x_44; obj* x_45; obj* x_46; -x_44 = lean::cnstr_get(x_19, 1); -lean::inc(x_44); -lean::dec(x_19); -x_45 = lean::cnstr_get(x_22, 0); -lean::inc(x_45); -lean::dec(x_22); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_44); -return x_46; -} -} -} -else -{ -obj* x_47; -lean::dec(x_2); -x_47 = lean::cnstr_get(x_19, 0); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_48 = lean::cnstr_get(x_19, 1); -lean::inc(x_48); -lean::dec(x_19); -x_49 = lean::cnstr_get(x_18, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_18, 1); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_18, 2); -lean::inc(x_51); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - lean::cnstr_release(x_18, 1); - lean::cnstr_release(x_18, 2); - x_52 = x_18; -} else { - lean::dec_ref(x_18); - x_52 = lean::box(0); -} -x_53 = l_List_mmap___main___at_Lean_Parser_Syntax_updateLeading___spec__2(x_1, x_50, x_48); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -if (lean::is_exclusive(x_53)) { - lean::cnstr_release(x_53, 0); - lean::cnstr_release(x_53, 1); - x_56 = x_53; -} else { - lean::dec_ref(x_53); - x_56 = lean::box(0); -} -if (lean::is_scalar(x_52)) { - x_57 = lean::alloc_cnstr(0, 3, 0); -} else { - x_57 = x_52; -} -lean::cnstr_set(x_57, 0, x_49); -lean::cnstr_set(x_57, 1, x_54); -lean::cnstr_set(x_57, 2, x_51); -x_58 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -if (lean::is_scalar(x_56)) { - x_59 = lean::alloc_cnstr(0, 2, 0); -} else { - x_59 = x_56; -} -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_55); -return x_59; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; -lean::dec(x_18); -lean::dec(x_1); -x_60 = lean::cnstr_get(x_19, 1); -lean::inc(x_60); -if (lean::is_exclusive(x_19)) { - lean::cnstr_release(x_19, 0); - lean::cnstr_release(x_19, 1); - x_61 = x_19; -} else { - lean::dec_ref(x_19); - x_61 = lean::box(0); -} -x_62 = lean::cnstr_get(x_47, 0); -lean::inc(x_62); -lean::dec(x_47); -if (lean::is_scalar(x_61)) { - x_63 = lean::alloc_cnstr(0, 2, 0); -} else { - x_63 = x_61; -} -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_60); -return x_63; -} -} -} -else -{ -obj* x_64; -x_64 = lean::box(0); -x_4 = x_64; -goto block_17; -} -block_17: -{ -obj* x_5; obj* x_6; -lean::dec(x_4); -lean::inc(x_2); -x_5 = lean::apply_2(x_1, x_2, x_3); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -lean::cnstr_set(x_5, 0, x_2); -return x_5; -} -else -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_5, 1); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -else -{ -uint8 x_11; -lean::dec(x_2); -x_11 = !lean::is_exclusive(x_5); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_5, 0); -lean::dec(x_12); -x_13 = lean::cnstr_get(x_6, 0); -lean::inc(x_13); -lean::dec(x_6); -lean::cnstr_set(x_5, 0, x_13); -return x_5; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_5, 1); -lean::inc(x_14); -lean::dec(x_5); -x_15 = lean::cnstr_get(x_6, 0); -lean::inc(x_15); -lean::dec(x_6); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_14); -return x_16; -} -} -} -} -} -obj* _init_l_Lean_Parser_Syntax_updateLeading___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_syntax_1__updateLeadingAux), 2, 0); -return x_1; -} -} -obj* l_Lean_Parser_Syntax_updateLeading(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -lean::cnstr_set(x_4, 2, x_3); -x_5 = l_Lean_Parser_Syntax_updateLeading___closed__1; -x_6 = l_Lean_Parser_Syntax_mreplace___main___at_Lean_Parser_Syntax_updateLeading___spec__1(x_5, x_2, x_4); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -return x_7; -} -} -obj* l_List_foldr___main___at_Lean_Parser_Syntax_getHeadInfo___main___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -lean::inc(x_1); -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::cnstr_get(x_2, 0); -x_4 = lean::cnstr_get(x_2, 1); -x_5 = l_List_foldr___main___at_Lean_Parser_Syntax_getHeadInfo___main___spec__1(x_1, x_4); -x_6 = l_Lean_Parser_Syntax_getHeadInfo___main(x_3); -if (lean::obj_tag(x_6) == 0) -{ -return x_5; -} -else -{ -lean::dec(x_5); -return x_6; -} -} -} -} -obj* l_Lean_Parser_Syntax_getHeadInfo___main(obj* x_1) { -_start: -{ -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_2; obj* x_3; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -return x_3; -} -case 1: -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -return x_5; -} -case 2: -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = lean::box(0); -x_8 = lean::cnstr_get(x_6, 1); -x_9 = l_List_foldr___main___at_Lean_Parser_Syntax_getHeadInfo___main___spec__1(x_7, x_8); -return x_9; -} -default: -{ -obj* x_10; -x_10 = lean::box(0); -return x_10; -} -} -} -} -obj* l_List_foldr___main___at_Lean_Parser_Syntax_getHeadInfo___main___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_foldr___main___at_Lean_Parser_Syntax_getHeadInfo___main___spec__1(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Syntax_getHeadInfo___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_getHeadInfo___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_getHeadInfo(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_getHeadInfo___main(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_getHeadInfo___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_getHeadInfo(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_getPos(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_getHeadInfo___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -lean::cnstr_set(x_2, 0, x_6); -return x_2; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -lean::dec(x_2); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; -} -} -} -} -obj* l_Lean_Parser_Syntax_getPos___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_getPos(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_reprintAtom___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_1, 1); -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 0); -x_7 = l_Lean_Parser_Substring_toString(x_6); -x_8 = lean::string_append(x_7, x_4); -x_9 = lean::cnstr_get(x_5, 2); -x_10 = l_Lean_Parser_Substring_toString(x_9); -x_11 = lean::string_append(x_8, x_10); -lean::dec(x_10); -return x_11; -} -} -} -obj* l_Lean_Parser_Syntax_reprintAtom___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_reprintAtom___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_reprintAtom(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_reprintAtom___main(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_reprintAtom___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_reprintAtom(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1___closed__1; -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_Lean_Parser_Syntax_reprint___main(x_4); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_1); -lean::dec(x_5); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -x_9 = l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1(x_5); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; -lean::dec(x_8); -lean::free_heap_obj(x_1); -x_10 = lean::box(0); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; -x_12 = lean::cnstr_get(x_9, 0); -lean::cnstr_set(x_1, 1, x_12); -lean::cnstr_set(x_1, 0, x_8); -lean::cnstr_set(x_9, 0, x_1); -return x_9; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -lean::cnstr_set(x_1, 1, x_13); -lean::cnstr_set(x_1, 0, x_8); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_1); -return x_14; -} -} -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::cnstr_get(x_1, 0); -x_16 = lean::cnstr_get(x_1, 1); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_1); -x_17 = l_Lean_Parser_Syntax_reprint___main(x_15); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -lean::dec(x_16); -x_18 = lean::box(0); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -lean::dec(x_17); -x_20 = l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1(x_16); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; -lean::dec(x_19); -x_21 = lean::box(0); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_20, 0); -lean::inc(x_22); -if (lean::is_exclusive(x_20)) { - lean::cnstr_release(x_20, 0); - x_23 = x_20; -} else { - lean::dec_ref(x_20); - x_23 = lean::box(0); -} -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_19); -lean::cnstr_set(x_24, 1, x_22); -if (lean::is_scalar(x_23)) { - x_25 = lean::alloc_cnstr(1, 1, 0); -} else { - x_25 = x_23; -} -lean::cnstr_set(x_25, 0, x_24); -return x_25; -} -} -} -} -} -} -uint8 l_List_foldr___main___at_Lean_Parser_Syntax_reprint___main___spec__2(obj* x_1, uint8 x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -return x_2; -} -else -{ -obj* x_4; obj* x_5; uint8 x_6; uint8 x_7; -x_4 = lean::cnstr_get(x_3, 0); -x_5 = lean::cnstr_get(x_3, 1); -x_6 = l_List_foldr___main___at_Lean_Parser_Syntax_reprint___main___spec__2(x_1, x_2, x_5); -x_7 = lean::string_dec_eq(x_4, x_1); -if (x_7 == 0) -{ -uint8 x_8; -x_8 = 0; -return x_8; -} -else -{ -return x_6; -} -} -} -} -obj* _init_l_Lean_Parser_Syntax_reprint___main___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string(""); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_reprint___main(obj* x_1) { -_start: -{ -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_2; obj* x_3; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -lean::dec(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -else -{ -obj* x_6; uint8 x_7; -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_6); -lean::dec(x_2); -x_7 = !lean::is_exclusive(x_3); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_8 = lean::cnstr_get(x_3, 0); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = l_Lean_Parser_Substring_toString(x_9); -lean::dec(x_9); -x_11 = lean::string_append(x_10, x_6); -lean::dec(x_6); -x_12 = lean::cnstr_get(x_8, 2); -lean::inc(x_12); -lean::dec(x_8); -x_13 = l_Lean_Parser_Substring_toString(x_12); -lean::dec(x_12); -x_14 = lean::string_append(x_11, x_13); -lean::dec(x_13); -lean::cnstr_set(x_3, 0, x_14); -return x_3; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = l_Lean_Parser_Substring_toString(x_16); -lean::dec(x_16); -x_18 = lean::string_append(x_17, x_6); -lean::dec(x_6); -x_19 = lean::cnstr_get(x_15, 2); -lean::inc(x_19); -lean::dec(x_15); -x_20 = l_Lean_Parser_Substring_toString(x_19); -lean::dec(x_19); -x_21 = lean::string_append(x_18, x_20); -lean::dec(x_20); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; -} -} -} -case 1: -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -lean::dec(x_1); -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; -x_25 = lean::cnstr_get(x_23, 1); -lean::inc(x_25); -lean::dec(x_23); -x_26 = l_Lean_Parser_Substring_toString(x_25); -lean::dec(x_25); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; -} -else -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_23, 1); -lean::inc(x_28); -lean::dec(x_23); -x_29 = !lean::is_exclusive(x_24); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_30 = lean::cnstr_get(x_24, 0); -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = l_Lean_Parser_Substring_toString(x_31); -lean::dec(x_31); -x_33 = l_Lean_Parser_Substring_toString(x_28); -lean::dec(x_28); -x_34 = lean::string_append(x_32, x_33); -lean::dec(x_33); -x_35 = lean::cnstr_get(x_30, 2); -lean::inc(x_35); -lean::dec(x_30); -x_36 = l_Lean_Parser_Substring_toString(x_35); -lean::dec(x_35); -x_37 = lean::string_append(x_34, x_36); -lean::dec(x_36); -lean::cnstr_set(x_24, 0, x_37); -return x_24; -} -else -{ -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_38 = lean::cnstr_get(x_24, 0); -lean::inc(x_38); -lean::dec(x_24); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = l_Lean_Parser_Substring_toString(x_39); -lean::dec(x_39); -x_41 = l_Lean_Parser_Substring_toString(x_28); -lean::dec(x_28); -x_42 = lean::string_append(x_40, x_41); -lean::dec(x_41); -x_43 = lean::cnstr_get(x_38, 2); -lean::inc(x_43); -lean::dec(x_38); -x_44 = l_Lean_Parser_Substring_toString(x_43); -lean::dec(x_43); -x_45 = lean::string_append(x_42, x_44); -lean::dec(x_44); -x_46 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -return x_46; -} -} -} -case 2: -{ -obj* x_47; obj* x_48; obj* x_49; uint8 x_50; -x_47 = lean::cnstr_get(x_1, 0); -lean::inc(x_47); -lean::dec(x_1); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = l_Lean_Parser_choice; -x_50 = lean_name_dec_eq(x_48, x_49); -lean::dec(x_48); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_47, 1); -lean::inc(x_51); -lean::dec(x_47); -x_52 = l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; -x_53 = lean::box(0); -return x_53; -} -else -{ -uint8 x_54; -x_54 = !lean::is_exclusive(x_52); -if (x_54 == 0) -{ -obj* x_55; obj* x_56; obj* x_57; -x_55 = lean::cnstr_get(x_52, 0); -x_56 = l_String_splitAux___main___closed__1; -x_57 = l_List_foldl___main___at_String_join___spec__1(x_56, x_55); -lean::dec(x_55); -lean::cnstr_set(x_52, 0, x_57); -return x_52; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_58 = lean::cnstr_get(x_52, 0); -lean::inc(x_58); -lean::dec(x_52); -x_59 = l_String_splitAux___main___closed__1; -x_60 = l_List_foldl___main___at_String_join___spec__1(x_59, x_58); -lean::dec(x_58); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -} -else -{ -obj* x_62; -x_62 = lean::cnstr_get(x_47, 1); -lean::inc(x_62); -lean::dec(x_47); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; -x_63 = lean::box(0); -return x_63; -} -else -{ -obj* x_64; obj* x_65; obj* x_66; -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_62, 1); -lean::inc(x_65); -lean::dec(x_62); -x_66 = l_Lean_Parser_Syntax_reprint___main(x_64); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; -lean::dec(x_65); -x_67 = lean::box(0); -return x_67; -} -else -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -lean::dec(x_66); -x_69 = l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1(x_65); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -lean::dec(x_68); -x_70 = lean::box(0); -return x_70; -} -else -{ -uint8 x_71; -x_71 = !lean::is_exclusive(x_69); -if (x_71 == 0) -{ -obj* x_72; uint8 x_73; uint8 x_74; -x_72 = lean::cnstr_get(x_69, 0); -x_73 = 1; -x_74 = l_List_foldr___main___at_Lean_Parser_Syntax_reprint___main___spec__2(x_68, x_73, x_72); -lean::dec(x_72); -if (x_74 == 0) -{ -obj* x_75; -lean::free_heap_obj(x_69); -lean::dec(x_68); -x_75 = lean::box(0); -return x_75; -} -else -{ -lean::cnstr_set(x_69, 0, x_68); -return x_69; -} -} -else -{ -obj* x_76; uint8 x_77; uint8 x_78; -x_76 = lean::cnstr_get(x_69, 0); -lean::inc(x_76); -lean::dec(x_69); -x_77 = 1; -x_78 = l_List_foldr___main___at_Lean_Parser_Syntax_reprint___main___spec__2(x_68, x_77, x_76); -lean::dec(x_76); -if (x_78 == 0) -{ -obj* x_79; -lean::dec(x_68); -x_79 = lean::box(0); -return x_79; -} -else -{ -obj* x_80; -x_80 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_80, 0, x_68); -return x_80; -} -} -} -} -} -} -} -default: -{ -obj* x_81; -x_81 = l_Lean_Parser_Syntax_reprint___main___closed__1; -return x_81; -} -} -} -} -obj* l_List_foldr___main___at_Lean_Parser_Syntax_reprint___main___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; uint8 x_5; obj* x_6; -x_4 = lean::unbox(x_2); -lean::dec(x_2); -x_5 = l_List_foldr___main___at_Lean_Parser_Syntax_reprint___main___spec__2(x_1, x_4, x_3); -lean::dec(x_3); -lean::dec(x_1); -x_6 = lean::box(x_5); -return x_6; -} -} -obj* l_Lean_Parser_Syntax_reprint(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_reprint___main(x_1); -return x_2; -} -} -obj* l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__2(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = l_Lean_Name_toString___closed__1; -x_3 = l_Lean_Name_toStringWithSep___main(x_2, x_1); -x_4 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -obj* l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__3(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__2(x_4); -x_7 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__3(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__2(x_8); -x_11 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__3(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_11); -return x_12; -} -} -} -} -obj* l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__4(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Nat_repr(x_1); -x_3 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__5(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__4(x_4); -x_7 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__5(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__4(x_8); -x_11 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__5(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_11); -return x_12; -} -} -} -} -obj* l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -lean::dec(x_2); -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; -x_4 = lean::cnstr_get(x_1, 1); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; -lean::dec(x_2); -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -return x_5; -} -else -{ -obj* x_6; uint8 x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = 0; -lean::inc(x_2); -lean::inc(x_6); -x_8 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set_scalar(x_8, sizeof(void*)*2, x_7); -x_9 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_4, x_2); -x_10 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set_scalar(x_10, sizeof(void*)*2, x_7); -return x_10; -} -} -} -} -obj* l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_Lean_Parser_Syntax_format___main(x_4); -x_7 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = l_Lean_Parser_Syntax_format___main(x_8); -x_11 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(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_11); -return x_12; -} -} -} -} -obj* l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__8(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -lean::dec(x_2); -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -lean::dec(x_2); -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_Nat_repr(x_5); -x_7 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = l_Nat_repr(x_8); -x_10 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -x_11 = 0; -lean::inc(x_2); -x_12 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_2); -lean::cnstr_set_scalar(x_12, sizeof(void*)*2, x_11); -x_13 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__8(x_4, x_2); -x_14 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -lean::cnstr_set_scalar(x_14, sizeof(void*)*2, x_11); -return x_14; -} -} -} -} -obj* _init_l_Lean_Parser_Syntax_format___main___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("`"); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Syntax_format___main___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string(""); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Syntax_format___main___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("{"); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Syntax_format___main___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("}"); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Syntax_format___main___closed__5() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("{"); -x_2 = lean::string_length(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Syntax_format___main___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("noKind"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_Syntax_format___main___closed__7() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Syntax_format___main___closed__8() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string(""); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Syntax_format___main(obj* x_1) { -_start: -{ -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -lean::dec(x_1); -x_3 = lean::cnstr_get(x_2, 1); -lean::inc(x_3); -lean::dec(x_2); -x_4 = l_String_quote(x_3); -x_5 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -case 1: -{ -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; uint8 x_15; obj* x_16; obj* x_17; -x_6 = lean::cnstr_get(x_1, 0); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::cnstr_get(x_6, 3); -lean::inc(x_7); -x_8 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__3(x_7); -x_9 = lean::cnstr_get(x_6, 4); -lean::inc(x_9); -x_10 = l_List_reverse___rarg(x_9); -x_11 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__5(x_10); -x_12 = l_List_append___rarg(x_8, x_11); -x_13 = lean::cnstr_get(x_6, 2); -lean::inc(x_13); -lean::dec(x_6); -x_14 = l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__2(x_13); -x_15 = 0; -x_16 = l_Lean_Parser_Syntax_format___main___closed__1; -x_17 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_14); -lean::cnstr_set_scalar(x_17, sizeof(void*)*2, x_15); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_18; obj* x_19; -x_18 = l_Lean_Parser_Syntax_format___main___closed__2; -x_19 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_15); -return x_19; -} -else -{ -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_20 = l_Lean_formatKVMap___closed__1; -x_21 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_12, x_20); -lean::dec(x_12); -x_22 = l_Lean_Parser_Syntax_format___main___closed__3; -x_23 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_21); -lean::cnstr_set_scalar(x_23, sizeof(void*)*2, x_15); -x_24 = l_Lean_Parser_Syntax_format___main___closed__4; -x_25 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set_scalar(x_25, sizeof(void*)*2, x_15); -x_26 = l_Lean_Parser_Syntax_format___main___closed__5; -x_27 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -x_28 = l_Lean_Format_group___main(x_27); -x_29 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_29, 0, x_17); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set_scalar(x_29, sizeof(void*)*2, x_15); -return x_29; -} -} -case 2: -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; uint8 x_34; -x_30 = lean::cnstr_get(x_1, 0); -lean::inc(x_30); -lean::dec(x_1); -x_31 = lean::cnstr_get(x_30, 2); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -x_33 = l_Lean_Parser_Syntax_format___main___closed__6; -x_34 = lean_name_dec_eq(x_32, x_33); -if (lean::obj_tag(x_31) == 0) -{ -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_35 = l_Lean_Parser_Syntax_format___main___closed__7; -x_36 = lean::box(0); -x_37 = l_Lean_Name_replacePrefix___main(x_32, x_35, x_36); -x_38 = l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__2(x_37); -x_39 = 0; -x_40 = l_Lean_Parser_Syntax_format___main___closed__2; -x_41 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set(x_41, 1, x_40); -lean::cnstr_set_scalar(x_41, sizeof(void*)*2, x_39); -x_42 = lean::cnstr_get(x_30, 1); -lean::inc(x_42); -lean::dec(x_30); -x_43 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_41); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::box(1); -x_46 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_44, x_45); -lean::dec(x_44); -x_47 = l_Lean_Format_paren___closed__1; -x_48 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_46); -lean::cnstr_set_scalar(x_48, sizeof(void*)*2, x_39); -x_49 = l_Lean_Format_paren___closed__2; -x_50 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_50, 0, x_48); -lean::cnstr_set(x_50, 1, x_49); -lean::cnstr_set_scalar(x_50, sizeof(void*)*2, x_39); -x_51 = l_Lean_Format_paren___closed__3; -x_52 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_50); -x_53 = l_Lean_Format_group___main(x_52); -return x_53; -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -lean::dec(x_32); -x_54 = lean::cnstr_get(x_30, 1); -lean::inc(x_54); -lean::dec(x_30); -x_55 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(x_54); -x_56 = lean::box(1); -x_57 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_55, x_56); -lean::dec(x_55); -x_58 = 0; -x_59 = l_Lean_Parser_Syntax_format___main___closed__2; -x_60 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_57); -lean::cnstr_set_scalar(x_60, sizeof(void*)*2, x_58); -x_61 = l_Lean_Format_sbracket___closed__1; -x_62 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_60); -lean::cnstr_set_scalar(x_62, sizeof(void*)*2, x_58); -x_63 = l_Lean_Format_sbracket___closed__2; -x_64 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set(x_64, 1, x_63); -lean::cnstr_set_scalar(x_64, sizeof(void*)*2, x_58); -x_65 = l_Lean_Format_sbracket___closed__3; -x_66 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_64); -x_67 = l_Lean_Format_group___main(x_66); -return x_67; -} -} -else -{ -obj* x_68; uint8 x_69; -lean::inc(x_31); -x_68 = l_List_reverse___rarg(x_31); -x_69 = !lean::is_exclusive(x_31); -if (x_69 == 0) -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_70 = lean::cnstr_get(x_31, 1); -lean::dec(x_70); -x_71 = lean::cnstr_get(x_31, 0); -lean::dec(x_71); -x_72 = l_Lean_formatKVMap___closed__1; -x_73 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__8(x_68, x_72); -x_74 = 0; -x_75 = l_Lean_Parser_Syntax_format___main___closed__3; -x_76 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_73); -lean::cnstr_set_scalar(x_76, sizeof(void*)*2, x_74); -x_77 = l_Lean_Parser_Syntax_format___main___closed__4; -x_78 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_78, 0, x_76); -lean::cnstr_set(x_78, 1, x_77); -lean::cnstr_set_scalar(x_78, sizeof(void*)*2, x_74); -x_79 = l_Lean_Parser_Syntax_format___main___closed__5; -x_80 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_78); -x_81 = l_Lean_Format_group___main(x_80); -if (x_34 == 0) -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_82 = l_Lean_Parser_Syntax_format___main___closed__7; -x_83 = lean::box(0); -x_84 = l_Lean_Name_replacePrefix___main(x_32, x_82, x_83); -x_85 = l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__2(x_84); -x_86 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_81); -lean::cnstr_set_scalar(x_86, sizeof(void*)*2, x_74); -x_87 = lean::cnstr_get(x_30, 1); -lean::inc(x_87); -lean::dec(x_30); -x_88 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(x_87); -lean::cnstr_set(x_31, 1, x_88); -lean::cnstr_set(x_31, 0, x_86); -x_89 = lean::box(1); -x_90 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_31, x_89); -lean::dec(x_31); -x_91 = l_Lean_Format_paren___closed__1; -x_92 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_90); -lean::cnstr_set_scalar(x_92, sizeof(void*)*2, x_74); -x_93 = l_Lean_Format_paren___closed__2; -x_94 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set(x_94, 1, x_93); -lean::cnstr_set_scalar(x_94, sizeof(void*)*2, x_74); -x_95 = l_Lean_Format_paren___closed__3; -x_96 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_94); -x_97 = l_Lean_Format_group___main(x_96); -return x_97; -} -else -{ -obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; -lean::free_heap_obj(x_31); -lean::dec(x_32); -x_98 = lean::cnstr_get(x_30, 1); -lean::inc(x_98); -lean::dec(x_30); -x_99 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(x_98); -x_100 = lean::box(1); -x_101 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_99, x_100); -lean::dec(x_99); -x_102 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_102, 0, x_81); -lean::cnstr_set(x_102, 1, x_101); -lean::cnstr_set_scalar(x_102, sizeof(void*)*2, x_74); -x_103 = l_Lean_Format_sbracket___closed__1; -x_104 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_102); -lean::cnstr_set_scalar(x_104, sizeof(void*)*2, x_74); -x_105 = l_Lean_Format_sbracket___closed__2; -x_106 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_106, 0, x_104); -lean::cnstr_set(x_106, 1, x_105); -lean::cnstr_set_scalar(x_106, sizeof(void*)*2, x_74); -x_107 = l_Lean_Format_sbracket___closed__3; -x_108 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_108, 0, x_107); -lean::cnstr_set(x_108, 1, x_106); -x_109 = l_Lean_Format_group___main(x_108); -return x_109; -} -} -else -{ -obj* x_110; obj* x_111; uint8 x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -lean::dec(x_31); -x_110 = l_Lean_formatKVMap___closed__1; -x_111 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__8(x_68, x_110); -x_112 = 0; -x_113 = l_Lean_Parser_Syntax_format___main___closed__3; -x_114 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_114, 0, x_113); -lean::cnstr_set(x_114, 1, x_111); -lean::cnstr_set_scalar(x_114, sizeof(void*)*2, x_112); -x_115 = l_Lean_Parser_Syntax_format___main___closed__4; -x_116 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_116, 0, x_114); -lean::cnstr_set(x_116, 1, x_115); -lean::cnstr_set_scalar(x_116, sizeof(void*)*2, x_112); -x_117 = l_Lean_Parser_Syntax_format___main___closed__5; -x_118 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_118, 0, x_117); -lean::cnstr_set(x_118, 1, x_116); -x_119 = l_Lean_Format_group___main(x_118); -if (x_34 == 0) -{ -obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; -x_120 = l_Lean_Parser_Syntax_format___main___closed__7; -x_121 = lean::box(0); -x_122 = l_Lean_Name_replacePrefix___main(x_32, x_120, x_121); -x_123 = l_Lean_fmt___at_Lean_Parser_Syntax_format___main___spec__2(x_122); -x_124 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_124, 0, x_123); -lean::cnstr_set(x_124, 1, x_119); -lean::cnstr_set_scalar(x_124, sizeof(void*)*2, x_112); -x_125 = lean::cnstr_get(x_30, 1); -lean::inc(x_125); -lean::dec(x_30); -x_126 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(x_125); -x_127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_127, 0, x_124); -lean::cnstr_set(x_127, 1, x_126); -x_128 = lean::box(1); -x_129 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_127, x_128); -lean::dec(x_127); -x_130 = l_Lean_Format_paren___closed__1; -x_131 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_129); -lean::cnstr_set_scalar(x_131, sizeof(void*)*2, x_112); -x_132 = l_Lean_Format_paren___closed__2; -x_133 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_133, 0, x_131); -lean::cnstr_set(x_133, 1, x_132); -lean::cnstr_set_scalar(x_133, sizeof(void*)*2, x_112); -x_134 = l_Lean_Format_paren___closed__3; -x_135 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_135, 0, x_134); -lean::cnstr_set(x_135, 1, x_133); -x_136 = l_Lean_Format_group___main(x_135); -return x_136; -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; -lean::dec(x_32); -x_137 = lean::cnstr_get(x_30, 1); -lean::inc(x_137); -lean::dec(x_30); -x_138 = l_List_map___main___at_Lean_Parser_Syntax_format___main___spec__7(x_137); -x_139 = lean::box(1); -x_140 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_138, x_139); -lean::dec(x_138); -x_141 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_141, 0, x_119); -lean::cnstr_set(x_141, 1, x_140); -lean::cnstr_set_scalar(x_141, sizeof(void*)*2, x_112); -x_142 = l_Lean_Format_sbracket___closed__1; -x_143 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_143, 0, x_142); -lean::cnstr_set(x_143, 1, x_141); -lean::cnstr_set_scalar(x_143, sizeof(void*)*2, x_112); -x_144 = l_Lean_Format_sbracket___closed__2; -x_145 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_145, 0, x_143); -lean::cnstr_set(x_145, 1, x_144); -lean::cnstr_set_scalar(x_145, sizeof(void*)*2, x_112); -x_146 = l_Lean_Format_sbracket___closed__3; -x_147 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_147, 0, x_146); -lean::cnstr_set(x_147, 1, x_145); -x_148 = l_Lean_Format_group___main(x_147); -return x_148; -} -} -} -} -default: -{ -obj* x_149; -x_149 = l_Lean_Parser_Syntax_format___main___closed__8; -return x_149; -} -} -} -} -obj* l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Format_joinSep___main___at_Lean_Parser_Syntax_format___main___spec__6(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_Syntax_format(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_format___main(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Syntax_Lean_HasFormat() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Syntax_format), 1, 0); -return x_1; -} -} -obj* l_Lean_fmt___at_Lean_Parser_Syntax_HasToString___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_format___main(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Syntax_HasToString() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_HasRepr___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_fmt___at_Lean_Parser_Syntax_HasToString___spec__1), 1, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_3, 0, x_1); -lean::closure_set(x_3, 1, x_2); -return x_3; -} -} -obj* initialize_init_lean_name(obj*); -obj* initialize_init_lean_parser_parsec(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_syntax(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_name(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_parsec(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_choice = _init_l_Lean_Parser_choice(); -lean::mark_persistent(l_Lean_Parser_choice); -l_Lean_Parser_noKind = _init_l_Lean_Parser_noKind(); -lean::mark_persistent(l_Lean_Parser_noKind); -l_Lean_Parser_MacroScope_DecidableEq = _init_l_Lean_Parser_MacroScope_DecidableEq(); -lean::mark_persistent(l_Lean_Parser_MacroScope_DecidableEq); -l_Lean_Parser_MacroScope_Lean_HasFormat = _init_l_Lean_Parser_MacroScope_Lean_HasFormat(); -lean::mark_persistent(l_Lean_Parser_MacroScope_Lean_HasFormat); -l_Lean_Parser_Inhabited = _init_l_Lean_Parser_Inhabited(); -lean::mark_persistent(l_Lean_Parser_Inhabited); -l_Lean_Parser_Substring_HasToString = _init_l_Lean_Parser_Substring_HasToString(); -lean::mark_persistent(l_Lean_Parser_Substring_HasToString); -l_Lean_Parser_Syntax_updateLeading___closed__1 = _init_l_Lean_Parser_Syntax_updateLeading___closed__1(); -lean::mark_persistent(l_Lean_Parser_Syntax_updateLeading___closed__1); -l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1___closed__1 = _init_l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1___closed__1(); -lean::mark_persistent(l_List_mmap___main___at_Lean_Parser_Syntax_reprint___main___spec__1___closed__1); -l_Lean_Parser_Syntax_reprint___main___closed__1 = _init_l_Lean_Parser_Syntax_reprint___main___closed__1(); -lean::mark_persistent(l_Lean_Parser_Syntax_reprint___main___closed__1); -l_Lean_Parser_Syntax_format___main___closed__1 = _init_l_Lean_Parser_Syntax_format___main___closed__1(); -lean::mark_persistent(l_Lean_Parser_Syntax_format___main___closed__1); -l_Lean_Parser_Syntax_format___main___closed__2 = _init_l_Lean_Parser_Syntax_format___main___closed__2(); -lean::mark_persistent(l_Lean_Parser_Syntax_format___main___closed__2); -l_Lean_Parser_Syntax_format___main___closed__3 = _init_l_Lean_Parser_Syntax_format___main___closed__3(); -lean::mark_persistent(l_Lean_Parser_Syntax_format___main___closed__3); -l_Lean_Parser_Syntax_format___main___closed__4 = _init_l_Lean_Parser_Syntax_format___main___closed__4(); -lean::mark_persistent(l_Lean_Parser_Syntax_format___main___closed__4); -l_Lean_Parser_Syntax_format___main___closed__5 = _init_l_Lean_Parser_Syntax_format___main___closed__5(); -lean::mark_persistent(l_Lean_Parser_Syntax_format___main___closed__5); -l_Lean_Parser_Syntax_format___main___closed__6 = _init_l_Lean_Parser_Syntax_format___main___closed__6(); -lean::mark_persistent(l_Lean_Parser_Syntax_format___main___closed__6); -l_Lean_Parser_Syntax_format___main___closed__7 = _init_l_Lean_Parser_Syntax_format___main___closed__7(); -lean::mark_persistent(l_Lean_Parser_Syntax_format___main___closed__7); -l_Lean_Parser_Syntax_format___main___closed__8 = _init_l_Lean_Parser_Syntax_format___main___closed__8(); -lean::mark_persistent(l_Lean_Parser_Syntax_format___main___closed__8); -l_Lean_Parser_Syntax_Lean_HasFormat = _init_l_Lean_Parser_Syntax_Lean_HasFormat(); -lean::mark_persistent(l_Lean_Parser_Syntax_Lean_HasFormat); -l_Lean_Parser_Syntax_HasToString = _init_l_Lean_Parser_Syntax_HasToString(); -lean::mark_persistent(l_Lean_Parser_Syntax_HasToString); -return w; -} diff --git a/src/stage0/init/lean/parser/term.cpp b/src/stage0/init/lean/parser/term.cpp deleted file mode 100644 index 7070831164..0000000000 --- a/src/stage0/init/lean/parser/term.cpp +++ /dev/null @@ -1,53942 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.term -// Imports: init.lean.parser.level init.lean.parser.notation init.lean.expr -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinder_HasView___boxed(obj*); -obj* l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_withTrailing___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_optIdent_HasView_x27; -obj* l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_app_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_instImplicitBinderContent_HasView; -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___boxed(obj*); -obj* l_Lean_Parser_Term_structInst_Parser___closed__1; -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sort_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_parenContent_HasView; -obj* l_Lean_Parser_Term_arrow; -obj* l_Lean_Parser_Term_sort_HasView_x27; -obj* l_Lean_Parser_Term_structInstSource; -obj* l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_paren_HasView_x27; -obj* l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_show_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_stringLit; -obj* l_fixCore___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderDefault_HasView_x27; -obj* l_Lean_Parser_Term_lambda_HasView_x27; -obj* l_Lean_Parser_Term_borrowed; -obj* l_Lean_Parser_Term_simpleExplicitBinder; -obj* l_Lean_Parser_identUnivs_Parser(obj*, obj*, obj*, obj*, obj*); -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_Lean_Parser_Term_anonymousConstructor_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___boxed(obj*); -obj* l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, uint8, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_projection_Parser___closed__1; -extern obj* l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -obj* l_Lean_Parser_Term_optIdent_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___elambda__1___boxed(obj*); -extern obj* l_Lean_Parser_BasicParserM_Alternative; -obj* l___private_init_lean_parser_term_1__trailing___closed__1; -obj* l_Lean_Parser_Term_binderContent_HasView_x27___boxed(obj*); -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Term_assume_Parser___closed__1; -obj* l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Trie_oldMatchPrefix___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_hole_Parser___closed__1; -obj* l_Lean_Parser_Term_builtinTrailingParsers_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main___boxed(obj*); -obj* l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1; -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_command_notationLike_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_structInstField_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_typed_HasView; -obj* l_Lean_Parser_Term_pi_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_builtinLeadingParsers; -obj* l_Lean_Parser_Term_hole_HasView; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_tokens___rarg(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4(obj*); -obj* l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_binderDefault_HasView; -obj* l_Lean_Parser_Term_structInstItem_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4(obj*); -obj* l_Lean_Parser_Term_paren_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_typed_HasView_x27; -obj* l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Combinators_longestChoice___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -uint8 l_String_isEmpty(obj*); -obj* l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_mixedBinder_HasView_x27; -obj* l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_optType_Parser___closed__1; -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_assumeAnonymous_HasView; -obj* l_Lean_Parser_Term_letLhsId; -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__1; -extern obj* l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -obj* l_Lean_Parser_Term_matchEquation_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_depArrow_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_mixedBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_projection; -obj* l_Lean_Parser_Term_optIdent_Parser___closed__1; -obj* l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_lambda_Parser___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2(obj*); -obj* l_Lean_Parser_Combinators_sepBy1_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_pi_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Term_simpleInstImplicitBinder; -obj* l_Lean_Parser_Term_assumeBinders_HasView_x27; -obj* l_Lean_Parser_Term_sort_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_let; -obj* l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(obj*); -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -obj* l_Lean_Parser_Term_structInstType_HasView_x27; -obj* l_Lean_Parser_Term_parenSpecial; -obj* l_List_map___main___at_Lean_Parser_Term_match_HasView_x27___elambda__1___spec__1(obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_Term_matchEquation; -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27(uint8); -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_projection_tokens; -obj* l_Lean_Parser_Term_hole; -obj* l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Parser_choice; -obj* l_Lean_Parser_Term_assume_HasView; -obj* l_Lean_Parser_Term_have; -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -obj* l_Lean_Parser_Term_borrowed_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_anonymousConstructor; -extern obj* l_Lean_Parser_finishCommentBlock___closed__2; -obj* l_Lean_Parser_Term_structInst_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_letLhsId_HasView; -obj* l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__2; -obj* l_List_foldr___main___at___private_init_lean_parser_term_2__leading___spec__6(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_termParser_run(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinder___closed__1; -extern obj* l_Lean_Parser_BasicParserM_Monad; -obj* l_Lean_Parser_Term_let_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_arrow_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3; -obj* l_List_mfoldl___main___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_arrow_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_hole_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_implicitBinder_HasView_x27; -obj* l___private_init_lean_parser_term_1__trailing___closed__2; -obj* l_Lean_Parser_Term_binderContent_Parser(uint8, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27; -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__3; -obj* l_Lean_Parser_Term_inaccessible_Parser___closed__1; -obj* l_Lean_Parser_Term_arrow_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_hole_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_parenContent_HasView_x27; -obj* l_Lean_Parser_Combinators_anyOf___at___private_init_lean_parser_term_1__trailing___spec__10(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_match_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sortApp; -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView; -obj* l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_inaccessible_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_have_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2(obj*, obj*); -obj* l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_structInstItem; -obj* l_Lean_Parser_Term_structInstSource_HasView; -obj* l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_from_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8(obj*); -obj* l_Lean_Parser_Term_tuple; -obj* l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3(obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4___rarg(obj*, obj*); -obj* l_Lean_Parser_identUnivs_HasView_x27; -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -obj* l_Function_comp___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Term_let_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_explicit_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_haveProof_HasView_x27; -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_projectionSpec; -obj* l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__2; -obj* l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(obj*, obj*); -obj* l_List_reverse___rarg(obj*); -obj* l_Lean_Parser_Term_let_HasView_x27; -obj* l_Lean_Parser_Term_Lean_Parser_HasTokens; -obj* l_List_map___main___at_Lean_Parser_Term_structInst_HasView_x27___elambda__1___spec__1(obj*); -obj* l_Lean_Parser_Term_binderDefaultVal_HasView; -obj* l_Lean_Parser_Term_explicitBinderContent___closed__1; -obj* l_Lean_Parser_Term_implicitBinder_HasView; -obj* l_Lean_Parser_Term_strictImplicitBinder_HasView_x27; -obj* l_Lean_Parser_Term_simpleBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_ReaderT_orelse___at___private_init_lean_parser_term_1__trailing___spec__11(obj*); -obj* l_Lean_Parser_Term_projection_HasView_x27; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(obj*, obj*, obj*); -extern obj* l_Lean_Parser_indexed___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27___elambda__1(obj*, obj*); -obj* l_Lean_Parser_Term_sort_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3; -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l___private_init_lean_parser_term_1__trailing___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4(obj*); -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_paren_Parser___closed__1; -obj* l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_assume_HasView_x27; -extern obj* l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___elambda__1(obj*); -obj* l___private_init_lean_parser_term_2__leading___closed__1; -extern obj* l_Lean_Parser_TermParserM_Alternative; -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__2; -obj* l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_haveProof_HasView; -obj* l_Lean_Parser_Term_have_HasView; -obj* l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_Subtype_HasView_x27; -obj* l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1___closed__1; -obj* l_id___rarg___boxed(obj*); -obj* l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderContent_HasView_x27(uint8); -obj* l_Lean_Parser_Term_borrowed_HasView_x27; -obj* l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4___rarg___boxed(obj*, obj*); -obj* l_String_OldIterator_remaining___main(obj*); -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(obj*); -extern obj* l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_explicitBinderContent___boxed(obj*); -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27; -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_explicitModifier; -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__3; -obj* l_Lean_Parser_Term_structInst_HasView; -obj* l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__2; -obj* l_List_map___main___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27; -obj* l_Lean_Parser_Term_instImplicitBinder; -obj* l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_explicitBinderContent_HasView___boxed(obj*); -obj* l_Lean_Parser_Combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_app_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_Subtype_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_implicitBinder; -obj* l_Lean_Parser_Term_binderIdent_Parser___closed__1; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3(obj*); -obj* l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_structInstType_HasView; -obj* l_Lean_Parser_Term_explicitBinder_HasView(uint8); -obj* l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__5; -obj* l_List_foldr___main___at___private_init_lean_parser_term_1__trailing___spec__13(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__1; -extern obj* l_Lean_Parser_number_HasView; -obj* l_Lean_Parser_Term_have_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_bracketedBinders; -obj* l_Lean_Parser_Term_sorry_HasView_x27___elambda__1(obj*); -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_structInstSource_HasView_x27; -obj* l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_instImplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_pi_HasView_x27; -obj* l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_bindersTypes_HasView_x27; -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8___boxed(obj*); -obj* l_Lean_Parser_Term_match_Parser___closed__1; -obj* l_Lean_Parser_Term_explicitBinder_HasView___boxed(obj*); -obj* l_Lean_Parser_Term_hole_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_haveFrom; -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens(uint8); -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__2; -obj* l_Lean_Parser_Term_app_HasView_x27; -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_structInst; -obj* l_Lean_Parser_Term_show_HasView_x27; -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27(uint8); -obj* l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_binderIdent_HasView_x27; -obj* l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_haveTerm; -obj* l_Lean_Parser_Term_borrowed_Parser___closed__1; -extern obj* l_Lean_Parser_currLbp___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_Term_hole_HasView_x27; -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_match_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_mkApp(obj*, obj*); -extern obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_instImplicitNamedBinder; -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_if_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*); -obj* l_Lean_Parser_Term_if_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_strictImplicitBinder; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2(obj*); -obj* l_Lean_Parser_Term_app_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_binderIdent_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_from_Parser(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Term_projectionSpec_HasView; -obj* l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_identUnivSpec_HasView; -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_simpleBinder_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_haveProof; -obj* l_Lean_Parser_Term_matchEquation_HasView; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_haveFrom_HasView; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27___elambda__1(obj*, obj*); -obj* l_Lean_Parser_Term_from_HasView_x27___elambda__1(obj*); -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4___boxed(obj*); -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_depArrow; -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_structInstField_HasView_x27; -obj* l_Lean_Parser_Term_from_HasView_x27; -obj* l_Lean_Parser_mkRawRes(obj*, obj*); -obj* l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Term_if_HasView_x27; -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__6; -obj* l_Lean_Parser_Term_let_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_borrowed_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_explicitModifier_HasView; -obj* l_Lean_Parser_Term_structInst_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Level_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_letLhs; -obj* l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_explicitBinderContent(uint8); -obj* l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_have_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_match_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binderDefaultTac_HasView_x27; -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_binderDefaultVal; -obj* l_List_enumFrom___main___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5(obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_bracketedBinder___boxed(obj*); -obj* l___private_init_lean_parser_parsec_2__strAux___main(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_sepBy_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_from_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_sortApp_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_borrowPrec; -obj* l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_paren_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder; -obj* l_Lean_Parser_Term_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasTokens; -obj* l___private_init_lean_parser_term_2__leading___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinder_Parser(uint8, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_try_view___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_structInstType_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_structInstType_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1(obj*); -obj* l_Lean_Parser_Term_binders_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__1; -obj* l_ReaderT_bind___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderIdent; -obj* l_Lean_Parser_Term_simpleBinder_HasView_x27; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27(uint8); -obj* l_Lean_Parser_Term_binder; -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__2; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2(obj*, obj*, obj*); -obj* l_Lean_Parser_Term_show_HasView; -obj* l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_command_notationLike_HasView; -obj* l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__2(obj*); -obj* l_List_join___main___rarg(obj*); -obj* l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_strictImplicitBinder_HasView; -obj* l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens___boxed(obj*); -obj* l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_structInstItem_HasView; -obj* l_Lean_Parser_Term_binderContent___closed__1; -extern obj* l_Lean_Parser_number; -obj* l_Lean_Parser_Term_arrow_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens(uint8); -obj* l_ReaderT_bind___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*); -obj* l_Lean_Parser_Term_letLhs_HasView; -obj* l_Lean_Parser_Term_binderDefaultTac_HasView; -extern obj* l_Lean_Parser_TrailingTermParserM_Alternative; -obj* l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3(obj*); -obj* l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_haveFrom_HasView_x27; -obj* l_Lean_Parser_Term_binderDefault_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(obj*, obj*); -obj* l_Lean_Parser_Term_from_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___boxed(obj*, obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_inaccessible_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_tuple_HasView_x27; -obj* l_Lean_Parser_Term_assume_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_have_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_inaccessible_HasView_x27; -obj* l_Lean_Parser_Term_if; -obj* l_Lean_Parser_Term_tuple_HasView; -obj* l_Lean_Parser_Term_bracketedBinder_Parser___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binder_HasView; -extern obj* l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -extern obj* l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -obj* l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_arrow_HasView_x27; -obj* l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens(obj*); -obj* l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_explicit_HasView; -obj* l_Lean_Parser_Term_anonymousInaccessible_Parser___closed__1; -obj* l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27; -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_orelse___at___private_init_lean_parser_term_1__trailing___spec__11___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView_x27; -obj* l_Lean_Parser_Term_simpleBinder; -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_typed_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_projection_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_explicit_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_binderDefault_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -namespace lean { -uint8 nat_dec_lt(obj*, obj*); -} -obj* l_Lean_Parser_Term_depArrow_HasView; -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView; -obj* l_Lean_Parser_Term_instImplicitBinder_HasView_x27; -obj* l_Lean_Parser_Term_simpleBinder_Parser___closed__1; -obj* l_Lean_Parser_Term_pi_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1(obj*, obj*, uint8, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_typeSpec_HasView_x27; -obj* l_Lean_Parser_Term_structInstWith_HasView; -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView; -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_if_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1(obj*); -extern obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_inaccessible_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_depArrow_HasView_x27; -obj* l_Lean_Parser_Term_binderContent_HasView_x27___closed__1; -obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_letLhsId_HasView_x27; -obj* l_Lean_Parser_Term_anonymousInaccessible; -extern obj* l_Lean_Parser_noKind; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__1; -obj* l_Lean_Parser_Term_lambda_HasView; -obj* l_Lean_Parser_Term_app_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_haveFrom_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_app_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_sortApp_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__4; -obj* l_Lean_Parser_Combinators_longestMatch___at___private_init_lean_parser_term_1__trailing___spec__6(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasView; -obj* l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bindersExt; -obj* l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_explicit_HasView_x27; -extern obj* l_Lean_Parser_matchToken___closed__1; -obj* l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_paren; -obj* l_List_append___rarg(obj*, obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__1; -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sort; -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3; -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___boxed(obj*); -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_Term_mixedBinder; -obj* l_Lean_Parser_Term_arrow_Parser___closed__1; -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderIdent_HasView; -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_identUnivSpec_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_binderContent_HasView(uint8); -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_structInst_HasView_x27; -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Parser_Term_let_HasView_x27___lambda__1___closed__1; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4(obj*); -obj* l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_typeSpec_Parser___closed__1; -obj* l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_sorry; -obj* l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Term_match; -obj* l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_explicitBinder___closed__1; -obj* l_Lean_Parser_Term_sort_Parser___closed__1; -obj* l_Lean_Parser_tokens___rarg(obj*); -obj* l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Term_borrowed_Parser(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -extern obj* l_Lean_Parser_peekToken___closed__1; -obj* l_Lean_Parser_Term_parenSpecial_HasView_x27; -obj* l_Lean_Parser_Term_assumeAnonymous_HasView_x27; -obj* l_Lean_Parser_Term_Subtype; -obj* l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj*); -obj* l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_assumeBinders_HasView; -obj* l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_let_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bindersRemainder; -obj* l_Lean_Parser_Term_binder_Parser___closed__1; -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView(uint8); -obj* l_Lean_Parser_Term_binders_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_sorry_HasView_x27___elambda__2(obj*); -obj* l_List_foldl___main___at___private_init_lean_parser_term_1__trailing___spec__12(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_identUnivs; -obj* l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_optType_Parser(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec; -obj* l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_sorry_HasView_x27; -obj* l_Lean_Parser_Term_parenSpecial_HasView; -obj* l_Lean_Parser_Term_show_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_sortApp_Parser___closed__1; -obj* l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_binderContent_HasView___boxed(obj*); -obj* l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_Subtype_HasView; -obj* l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_identUnivs_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binderDefaultVal_HasView_x27; -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___boxed(obj*); -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView(uint8); -obj* l_Lean_Parser_Term_parenContent; -obj* l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_match_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___closed__1; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_parenContent_HasView_x27___elambda__1(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Term_bindersExt_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_seqRight_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_structInst_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_let_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_if_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_simpleImplicitBinder; -obj* l_Lean_Parser_Term_binders; -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Term_from_Parser___closed__1; -obj* l_Lean_Parser_Term_if_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_haveTerm_HasView; -obj* l_Lean_Parser_Term_typed; -obj* l_Lean_Parser_Term_app_HasView; -obj* l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_assume; -obj* l_Lean_Parser_Term_bracketedBinders_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___at___private_init_lean_parser_term_1__trailing___spec__7(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_from_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27; -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_pi_Parser___closed__1; -obj* l_Lean_Parser_Term_from_HasView; -obj* l_Lean_Parser_Combinators_longestMatch___at___private_init_lean_parser_term_2__leading___spec__7(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_projection_HasView; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5___rarg(obj*, obj*); -extern obj* l_Lean_Parser_maxPrec; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__5; -obj* l_List_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27; -obj* l_Lean_Parser_Term_Subtype_Parser___closed__1; -obj* l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__3; -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_identUnivSpec; -obj* l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_arrow_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_instImplicitAnonymousBinder; -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_sorry_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_binders_Parser___closed__1; -obj* l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_letLhs_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_bindersTypes_HasView; -obj* l_Lean_Parser_Term_sortApp_HasView; -obj* l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_anonymousConstructor_Parser___closed__1; -obj* l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__1___boxed(obj*); -extern obj* l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2; -obj* l_Lean_Parser_Term_structInstItem_HasView_x27; -obj* l_Lean_Parser_Term_optIdent_HasView; -obj* l_Lean_Parser_Term_assumeBinders_HasView_x27___elambda__1(obj*); -obj* l_String_trim(obj*); -obj* l___private_init_lean_parser_term_1__trailing(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_assume_HasView_x27___lambda__1(obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__5___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_let_Parser___closed__1; -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__3; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_Term_letLhsId_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_sorry_HasView; -obj* l_Lean_Parser_Term_binderDefault; -obj* l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_from; -obj* l_Lean_Parser_Term_bracketedBinder_HasView(uint8); -obj* l_Lean_Parser_Term_tuple_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_anonymousConstructor_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView; -obj* l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__2; -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -obj* l_Lean_Parser_Term_structInstType; -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27; -obj* l_Lean_Parser_Term_show; -obj* l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__2; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4___rarg(obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1; -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_explicitBinder(uint8); -obj* l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasView; -extern obj* l_Lean_Parser_TermParserM_Monad; -obj* l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -uint8 l_Lean_Name_quickLt(obj*, obj*); -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo(obj*); -obj* l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_lambda_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_sorry_Parser___closed__1; -obj* l_Lean_Parser_Term_bracketedBinders_HasView; -extern "C" obj* lean_name_mk_numeral(obj*, obj*); -obj* l_Lean_Parser_Term_Subtype_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___closed__1; -obj* l_Lean_Parser_Term_if_Parser___closed__1; -obj* l_Lean_Parser_Term_assumeAnonymous; -obj* l_Lean_Parser_Term_show_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_lambda_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binderIdent_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1(obj*); -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_currLbp___at_Lean_Parser_termParser_run___spec__5(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_match_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_show_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_show_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_token(obj*, obj*, obj*); -obj* l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_anonymousConstructor_HasView; -obj* l_Lean_Parser_Term_binderDefaultTac; -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_bindersRemainder_HasView; -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27; -obj* l_Lean_Parser_Term_parenSpecial_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27; -obj* l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_List_cons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_match_HasView_x27; -obj* l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_structInstWith_HasView_x27; -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_haveProof_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_bracketedBinders_Parser___closed__1; -obj* l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_hole_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_simpleBinder_HasView; -obj* l_Lean_Parser_Term_depArrow_Parser___closed__1; -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_have_Parser___closed__1; -obj* l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_binder_HasView_x27; -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__4; -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView; -obj* l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_inaccessible; -extern obj* l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_borrowed_HasView; -obj* l_Lean_Parser_Term_binders_HasView_x27; -obj* l_Lean_Parser_Term_projection_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__5; -obj* l_Lean_Parser_Term_anonymousConstructor_HasView_x27; -obj* l_Lean_Parser_currLbp___at_Lean_Parser_termParser_run___spec__5___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_assume_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_levelParser_run(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -obj* l_Lean_Parser_Term_hole_HasView_x27___elambda__1___boxed(obj*); -obj* l_ReaderT_orelse___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_optType_viewDefault; -obj* l_Lean_Parser_Term_anonymousInaccessible_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_tokenMapCons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27___boxed(obj*); -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___boxed(obj*); -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_explicit; -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27___closed__1; -obj* l_Lean_Parser_Term_binderContent___boxed(obj*); -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_Term_arrow_HasView; -obj* l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27___elambda__1(obj*); -extern obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_optIdent_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bindersExt_HasView; -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_instImplicitBinderContent; -obj* l_Lean_Parser_Term_paren_HasView; -obj* l_Lean_Parser_Term_bindersTypes; -obj* l_Lean_Parser_Term_lambda; -obj* l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -obj* l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2(obj*); -obj* l_Lean_Parser_Term_explicit_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3; -extern obj* l_Lean_Name_toString___closed__1; -obj* l_Lean_Parser_Term_optIdent; -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens; -obj* l_Lean_Parser_identUnivs_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_builtinTrailingParsers; -obj* l_Lean_Parser_Term_instImplicitBinder_HasView; -obj* l_Lean_Parser_Term_binderContent_Parser___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bindersExt_Parser___closed__1; -obj* l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_bracketedBinder(uint8); -extern obj* l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6; -obj* l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_lambda_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5(obj*); -obj* l_Lean_Parser_Term_matchEquation_HasView_x27; -obj* l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_structInstWith; -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27; -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_show_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_typeSpec_HasView; -obj* l_Lean_Parser_Term_explicitBinder___boxed(obj*); -obj* l_Lean_Parser_Term_pi_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__2; -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_binder_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_typed_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_explicitBinderContent_HasView(uint8); -obj* l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_app_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_pi; -obj* l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27___boxed(obj*); -obj* l_Lean_Parser_Term_mixedBinder_HasView; -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_TrailingTermParserM_Monad; -obj* l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_identUnivSpec_Parser(obj*, obj*, obj*); -obj* l_Lean_Parser_identUnivSpec_HasView_x27; -obj* l_Lean_Parser_Term_paren_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_assume_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_sortApp_Parser(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_explicit_Parser___closed__1; -obj* l_Lean_Parser_Term_tuple_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_identUnivSpec_Parser___closed__1; -obj* l_Lean_Parser_Term_show_Parser___closed__1; -obj* l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_Term_projection_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2___closed__1; -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, uint8, uint8, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_depArrow_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -obj* l___private_init_lean_parser_term_2__leading(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_inaccessible_HasView; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_bindersExt_HasView_x27; -extern obj* l_Lean_Parser_TermParserM_MonadExcept; -obj* l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens; -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1(obj*, obj*, obj*); -obj* l_String_quote(obj*); -obj* l_Lean_Parser_identUnivs_Parser___closed__1; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_app_Parser___closed__1; -obj* l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_match_HasView; -obj* l_Lean_Parser_Term_getLeading___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__1; -obj* l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_typeSpec_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_Term_getLeading(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__7; -obj* l_Lean_Parser_Substring_ofString(obj*); -obj* l_Lean_Parser_Term_structInstField; -obj* l_Lean_Parser_Term_sortApp_HasView_x27; -obj* l_Lean_Parser_Term_binderContent_HasView_x27___closed__2; -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7(obj*, uint8, obj*, obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(obj*); -extern obj* l_Lean_Parser_TrailingTermParserM_MonadExcept; -extern obj* l_Lean_Parser_BasicParserM_MonadExcept; -obj* l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_sort_HasView; -obj* l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27; -obj* l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(obj*); -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_identUnivs_HasView; -obj* l_Lean_Parser_Term_if_HasView; -obj* l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_haveTerm_HasView_x27; -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2(obj*); -extern obj* l_Lean_Parser_Combinators_many___rarg___closed__1; -obj* l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Term_structInstField_HasView; -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView; -extern obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_List_mfoldr___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__5(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_letLhs_HasView_x27; -obj* l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__2; -obj* l_Lean_Parser_TokenMap_ofList___main___rarg(obj*); -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___boxed(obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___boxed(obj*, obj*); -obj* l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_typeSpec; -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_Term_optIdent_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1(obj*); -obj* l_Lean_Parser_Term_binderContent(uint8); -obj* l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_if_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5(obj*); -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView; -obj* l_Lean_Parser_Term_have_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_implicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed(obj*); -obj* l_Lean_Parser_Term_binders_HasView; -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_let_HasView; -obj* l_Lean_Parser_Term_sort_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_Combinators_optional_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_binders_Parser(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27___closed__1; -obj* l_Lean_Parser_Term_have_HasView_x27; -obj* l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__2; -extern obj* l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -obj* l_Lean_Parser_Term_binderDefault_Parser___closed__1; -obj* l_Lean_Parser_Term_pi_HasView; -obj* l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__1; -extern obj* l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_Term_lambda_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_typed_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Term_structInstField_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___closed__1; -obj* l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2(obj*); -obj* l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_assumeBinders; -obj* l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView; -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__4; -extern obj* l_String_splitAux___main___closed__1; -obj* l_List_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3___rarg(obj*, obj*); -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__5; -namespace lean { -obj* string_length(obj*); -} -obj* l_Lean_Parser_Term_app; -obj* _init_l_Lean_Parser_identUnivSpec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("identUnivSpec"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_1, 1); -x_5 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_4); -lean::cnstr_set(x_1, 1, x_5); -return x_1; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -lean::inc(x_6); -lean::dec(x_1); -x_8 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_6); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -} -} -obj* l_Lean_Parser_identUnivSpec_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_identUnivSpec; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_identUnivSpec; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_2, 0); -lean::inc(x_23); -lean::dec(x_2); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_identUnivSpec; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_4, 0); -lean::inc(x_30); -lean::dec(x_4); -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_7); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_identUnivSpec; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -} -obj* _init_l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_1); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_7); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_1); -return x_9; -} -} -} -obj* l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_50; -x_50 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; -x_51 = l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1___closed__1; -return x_51; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = lean::box(3); -x_2 = x_53; -x_3 = x_54; -goto block_49; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -lean::dec(x_53); -x_2 = x_56; -x_3 = x_55; -goto block_49; -} -} -block_49: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_3, 0); -lean::inc(x_46); -lean::dec(x_3); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -x_4 = x_47; -goto block_45; -} -else -{ -obj* x_48; -lean::dec(x_3); -x_48 = lean::box(0); -x_4 = x_48; -goto block_45; -} -block_45: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_42; -x_42 = lean::box(3); -x_5 = x_2; -x_6 = x_42; -goto block_41; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_2, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_2, 1); -lean::inc(x_44); -lean::dec(x_2); -x_5 = x_44; -x_6 = x_43; -goto block_41; -} -block_41: -{ -obj* x_7; -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::box(0); -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_8); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_14); -lean::cnstr_set(x_15, 2, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_11); -x_16 = lean::box(0); -x_17 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_18, 2, x_16); -return x_18; -} -} -} -else -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_7); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; -x_20 = lean::cnstr_get(x_7, 0); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -x_22 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_21); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_23; obj* x_24; -lean::free_heap_obj(x_7); -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_4); -lean::cnstr_set(x_24, 1, x_22); -lean::cnstr_set(x_24, 2, x_23); -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_5, 0); -lean::inc(x_25); -lean::dec(x_5); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::dec(x_25); -lean::cnstr_set(x_7, 0, x_26); -x_27 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_27, 0, x_4); -lean::cnstr_set(x_27, 1, x_22); -lean::cnstr_set(x_27, 2, x_7); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -lean::dec(x_25); -lean::free_heap_obj(x_7); -x_28 = lean::box(0); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_22); -lean::cnstr_set(x_29, 2, x_28); -return x_29; -} -} -} -else -{ -obj* x_30; obj* x_31; obj* x_32; -x_30 = lean::cnstr_get(x_7, 0); -lean::inc(x_30); -lean::dec(x_7); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -x_32 = l_List_map___main___at_Lean_Parser_identUnivSpec_HasView_x27___elambda__1___spec__1(x_31); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::box(0); -x_34 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_34, 0, x_4); -lean::cnstr_set(x_34, 1, x_32); -lean::cnstr_set(x_34, 2, x_33); -return x_34; -} -else -{ -obj* x_35; -x_35 = lean::cnstr_get(x_5, 0); -lean::inc(x_35); -lean::dec(x_5); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; obj* x_38; -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -lean::dec(x_35); -x_37 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -x_38 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_38, 0, x_4); -lean::cnstr_set(x_38, 1, x_32); -lean::cnstr_set(x_38, 2, x_37); -return x_38; -} -else -{ -obj* x_39; obj* x_40; -lean::dec(x_35); -x_39 = lean::box(0); -x_40 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_40, 0, x_4); -lean::cnstr_set(x_40, 1, x_32); -lean::cnstr_set(x_40, 2, x_39); -return x_40; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_identUnivSpec_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivSpec_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_identUnivSpec_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_identUnivSpec_HasView_x27; -return x_1; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__2(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; -x_7 = lean::mk_nat_obj(0u); -x_8 = lean::nat_dec_eq(x_3, x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_87; obj* x_88; -x_9 = lean::mk_nat_obj(1u); -x_10 = lean::nat_sub(x_3, x_9); -lean::inc(x_1); -lean::inc(x_4); -x_87 = lean::apply_3(x_1, x_4, x_5, x_6); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -lean::dec(x_87); -x_11 = x_88; -x_12 = x_89; -goto block_86; -} -else -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_88, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_90, 3); -lean::inc(x_91); -if (lean::obj_tag(x_91) == 0) -{ -obj* x_92; uint8 x_93; -x_92 = lean::cnstr_get(x_87, 1); -lean::inc(x_92); -lean::dec(x_87); -x_93 = !lean::is_exclusive(x_88); -if (x_93 == 0) -{ -uint8 x_94; obj* x_95; uint8 x_96; -x_94 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -x_95 = lean::cnstr_get(x_88, 0); -lean::dec(x_95); -x_96 = !lean::is_exclusive(x_90); -if (x_96 == 0) -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_97 = lean::cnstr_get(x_90, 3); -lean::dec(x_97); -x_98 = lean::box(3); -lean::inc(x_2); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_2); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_98); -lean::cnstr_set(x_100, 1, x_99); -x_101 = l_List_reverse___rarg(x_100); -x_102 = l_Lean_Parser_noKind; -x_103 = l_Lean_Parser_Syntax_mkNode(x_102, x_101); -x_104 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_90, 3, x_104); -if (x_94 == 0) -{ -uint8 x_105; -x_105 = 0; -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_105); -x_11 = x_88; -x_12 = x_92; -goto block_86; -} -else -{ -uint8 x_106; -x_106 = 1; -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_106); -x_11 = x_88; -x_12 = x_92; -goto block_86; -} -} -else -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; -x_107 = lean::cnstr_get(x_90, 0); -x_108 = lean::cnstr_get(x_90, 1); -x_109 = lean::cnstr_get(x_90, 2); -lean::inc(x_109); -lean::inc(x_108); -lean::inc(x_107); -lean::dec(x_90); -x_110 = lean::box(3); -lean::inc(x_2); -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_2); -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_110); -lean::cnstr_set(x_112, 1, x_111); -x_113 = l_List_reverse___rarg(x_112); -x_114 = l_Lean_Parser_noKind; -x_115 = l_Lean_Parser_Syntax_mkNode(x_114, x_113); -x_116 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_116, 0, x_115); -x_117 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_117, 0, x_107); -lean::cnstr_set(x_117, 1, x_108); -lean::cnstr_set(x_117, 2, x_109); -lean::cnstr_set(x_117, 3, x_116); -if (x_94 == 0) -{ -uint8 x_118; -x_118 = 0; -lean::cnstr_set(x_88, 0, x_117); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_118); -x_11 = x_88; -x_12 = x_92; -goto block_86; -} -else -{ -uint8 x_119; -x_119 = 1; -lean::cnstr_set(x_88, 0, x_117); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_119); -x_11 = x_88; -x_12 = x_92; -goto block_86; -} -} -} -else -{ -uint8 x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; -x_120 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -lean::dec(x_88); -x_121 = lean::cnstr_get(x_90, 0); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_90, 1); -lean::inc(x_122); -x_123 = lean::cnstr_get(x_90, 2); -lean::inc(x_123); -if (lean::is_exclusive(x_90)) { - lean::cnstr_release(x_90, 0); - lean::cnstr_release(x_90, 1); - lean::cnstr_release(x_90, 2); - lean::cnstr_release(x_90, 3); - x_124 = x_90; -} else { - lean::dec_ref(x_90); - x_124 = lean::box(0); -} -x_125 = lean::box(3); -lean::inc(x_2); -x_126 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_126, 0, x_125); -lean::cnstr_set(x_126, 1, x_2); -x_127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_127, 0, x_125); -lean::cnstr_set(x_127, 1, x_126); -x_128 = l_List_reverse___rarg(x_127); -x_129 = l_Lean_Parser_noKind; -x_130 = l_Lean_Parser_Syntax_mkNode(x_129, x_128); -x_131 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_131, 0, x_130); -if (lean::is_scalar(x_124)) { - x_132 = lean::alloc_cnstr(0, 4, 0); -} else { - x_132 = x_124; -} -lean::cnstr_set(x_132, 0, x_121); -lean::cnstr_set(x_132, 1, x_122); -lean::cnstr_set(x_132, 2, x_123); -lean::cnstr_set(x_132, 3, x_131); -if (x_120 == 0) -{ -uint8 x_133; obj* x_134; -x_133 = 0; -x_134 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_134, 0, x_132); -lean::cnstr_set_scalar(x_134, sizeof(void*)*1, x_133); -x_11 = x_134; -x_12 = x_92; -goto block_86; -} -else -{ -uint8 x_135; obj* x_136; -x_135 = 1; -x_136 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_136, 0, x_132); -lean::cnstr_set_scalar(x_136, sizeof(void*)*1, x_135); -x_11 = x_136; -x_12 = x_92; -goto block_86; -} -} -} -else -{ -obj* x_137; uint8 x_138; -x_137 = lean::cnstr_get(x_87, 1); -lean::inc(x_137); -lean::dec(x_87); -x_138 = !lean::is_exclusive(x_88); -if (x_138 == 0) -{ -uint8 x_139; obj* x_140; uint8 x_141; -x_139 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -x_140 = lean::cnstr_get(x_88, 0); -lean::dec(x_140); -x_141 = !lean::is_exclusive(x_90); -if (x_141 == 0) -{ -obj* x_142; uint8 x_143; -x_142 = lean::cnstr_get(x_90, 3); -lean::dec(x_142); -x_143 = !lean::is_exclusive(x_91); -if (x_143 == 0) -{ -obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; -x_144 = lean::cnstr_get(x_91, 0); -lean::inc(x_2); -x_145 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_145, 0, x_144); -lean::cnstr_set(x_145, 1, x_2); -x_146 = lean::box(3); -x_147 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_147, 0, x_146); -lean::cnstr_set(x_147, 1, x_145); -x_148 = l_List_reverse___rarg(x_147); -x_149 = l_Lean_Parser_noKind; -x_150 = l_Lean_Parser_Syntax_mkNode(x_149, x_148); -lean::cnstr_set(x_91, 0, x_150); -if (x_139 == 0) -{ -uint8 x_151; -x_151 = 0; -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_151); -x_11 = x_88; -x_12 = x_137; -goto block_86; -} -else -{ -uint8 x_152; -x_152 = 1; -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_152); -x_11 = x_88; -x_12 = x_137; -goto block_86; -} -} -else -{ -obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; -x_153 = lean::cnstr_get(x_91, 0); -lean::inc(x_153); -lean::dec(x_91); -lean::inc(x_2); -x_154 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_154, 0, x_153); -lean::cnstr_set(x_154, 1, x_2); -x_155 = lean::box(3); -x_156 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_156, 0, x_155); -lean::cnstr_set(x_156, 1, x_154); -x_157 = l_List_reverse___rarg(x_156); -x_158 = l_Lean_Parser_noKind; -x_159 = l_Lean_Parser_Syntax_mkNode(x_158, x_157); -x_160 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_160, 0, x_159); -lean::cnstr_set(x_90, 3, x_160); -if (x_139 == 0) -{ -uint8 x_161; -x_161 = 0; -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_161); -x_11 = x_88; -x_12 = x_137; -goto block_86; -} -else -{ -uint8 x_162; -x_162 = 1; -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_162); -x_11 = x_88; -x_12 = x_137; -goto block_86; -} -} -} -else -{ -obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; -x_163 = lean::cnstr_get(x_90, 0); -x_164 = lean::cnstr_get(x_90, 1); -x_165 = lean::cnstr_get(x_90, 2); -lean::inc(x_165); -lean::inc(x_164); -lean::inc(x_163); -lean::dec(x_90); -x_166 = lean::cnstr_get(x_91, 0); -lean::inc(x_166); -if (lean::is_exclusive(x_91)) { - lean::cnstr_release(x_91, 0); - x_167 = x_91; -} else { - lean::dec_ref(x_91); - x_167 = lean::box(0); -} -lean::inc(x_2); -x_168 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_168, 0, x_166); -lean::cnstr_set(x_168, 1, x_2); -x_169 = lean::box(3); -x_170 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_170, 0, x_169); -lean::cnstr_set(x_170, 1, x_168); -x_171 = l_List_reverse___rarg(x_170); -x_172 = l_Lean_Parser_noKind; -x_173 = l_Lean_Parser_Syntax_mkNode(x_172, x_171); -if (lean::is_scalar(x_167)) { - x_174 = lean::alloc_cnstr(1, 1, 0); -} else { - x_174 = x_167; -} -lean::cnstr_set(x_174, 0, x_173); -x_175 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_175, 0, x_163); -lean::cnstr_set(x_175, 1, x_164); -lean::cnstr_set(x_175, 2, x_165); -lean::cnstr_set(x_175, 3, x_174); -if (x_139 == 0) -{ -uint8 x_176; -x_176 = 0; -lean::cnstr_set(x_88, 0, x_175); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_176); -x_11 = x_88; -x_12 = x_137; -goto block_86; -} -else -{ -uint8 x_177; -x_177 = 1; -lean::cnstr_set(x_88, 0, x_175); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_177); -x_11 = x_88; -x_12 = x_137; -goto block_86; -} -} -} -else -{ -uint8 x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; -x_178 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -lean::dec(x_88); -x_179 = lean::cnstr_get(x_90, 0); -lean::inc(x_179); -x_180 = lean::cnstr_get(x_90, 1); -lean::inc(x_180); -x_181 = lean::cnstr_get(x_90, 2); -lean::inc(x_181); -if (lean::is_exclusive(x_90)) { - lean::cnstr_release(x_90, 0); - lean::cnstr_release(x_90, 1); - lean::cnstr_release(x_90, 2); - lean::cnstr_release(x_90, 3); - x_182 = x_90; -} else { - lean::dec_ref(x_90); - x_182 = lean::box(0); -} -x_183 = lean::cnstr_get(x_91, 0); -lean::inc(x_183); -if (lean::is_exclusive(x_91)) { - lean::cnstr_release(x_91, 0); - x_184 = x_91; -} else { - lean::dec_ref(x_91); - x_184 = lean::box(0); -} -lean::inc(x_2); -x_185 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_185, 0, x_183); -lean::cnstr_set(x_185, 1, x_2); -x_186 = lean::box(3); -x_187 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_187, 0, x_186); -lean::cnstr_set(x_187, 1, x_185); -x_188 = l_List_reverse___rarg(x_187); -x_189 = l_Lean_Parser_noKind; -x_190 = l_Lean_Parser_Syntax_mkNode(x_189, x_188); -if (lean::is_scalar(x_184)) { - x_191 = lean::alloc_cnstr(1, 1, 0); -} else { - x_191 = x_184; -} -lean::cnstr_set(x_191, 0, x_190); -if (lean::is_scalar(x_182)) { - x_192 = lean::alloc_cnstr(0, 4, 0); -} else { - x_192 = x_182; -} -lean::cnstr_set(x_192, 0, x_179); -lean::cnstr_set(x_192, 1, x_180); -lean::cnstr_set(x_192, 2, x_181); -lean::cnstr_set(x_192, 3, x_191); -if (x_178 == 0) -{ -uint8 x_193; obj* x_194; -x_193 = 0; -x_194 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_194, 0, x_192); -lean::cnstr_set_scalar(x_194, sizeof(void*)*1, x_193); -x_11 = x_194; -x_12 = x_137; -goto block_86; -} -else -{ -uint8 x_195; obj* x_196; -x_195 = 1; -x_196 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_196, 0, x_192); -lean::cnstr_set_scalar(x_196, sizeof(void*)*1, x_195); -x_11 = x_196; -x_12 = x_137; -goto block_86; -} -} -} -} -block_86: -{ -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_11); -if (x_13 == 0) -{ -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; -x_14 = lean::cnstr_get(x_11, 0); -x_15 = lean::cnstr_get(x_11, 1); -x_16 = lean::cnstr_get(x_11, 2); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_14); -lean::cnstr_set(x_17, 1, x_2); -lean::inc(x_17); -x_18 = l_List_reverse___rarg(x_17); -x_19 = l_Lean_Parser_noKind; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -lean::inc(x_15); -x_21 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_17, x_10, x_4, x_15, x_12); -lean::dec(x_10); -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -uint8 x_23; -lean::dec(x_20); -lean::free_heap_obj(x_11); -lean::dec(x_15); -x_23 = !lean::is_exclusive(x_21); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_21, 0); -lean::dec(x_24); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -lean::cnstr_set(x_21, 0, x_25); -return x_21; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_21, 1); -lean::inc(x_26); -lean::dec(x_21); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_26); -return x_28; -} -} -else -{ -uint8 x_29; -x_29 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -if (x_29 == 0) -{ -uint8 x_30; -x_30 = !lean::is_exclusive(x_21); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_31 = lean::cnstr_get(x_21, 0); -lean::dec(x_31); -x_32 = lean::cnstr_get(x_22, 0); -lean::inc(x_32); -lean::dec(x_22); -x_33 = lean::cnstr_get(x_32, 2); -lean::inc(x_33); -lean::dec(x_32); -x_34 = l_mjoin___rarg___closed__1; -x_35 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_35, 0, x_33); -lean::closure_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_11, 2, x_36); -lean::cnstr_set(x_11, 0, x_20); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_11); -lean::cnstr_set(x_21, 0, x_37); -return x_21; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_38 = lean::cnstr_get(x_21, 1); -lean::inc(x_38); -lean::dec(x_21); -x_39 = lean::cnstr_get(x_22, 0); -lean::inc(x_39); -lean::dec(x_22); -x_40 = lean::cnstr_get(x_39, 2); -lean::inc(x_40); -lean::dec(x_39); -x_41 = l_mjoin___rarg___closed__1; -x_42 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_42, 0, x_40); -lean::closure_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_11, 2, x_43); -lean::cnstr_set(x_11, 0, x_20); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_11); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_38); -return x_45; -} -} -else -{ -uint8 x_46; -lean::dec(x_20); -lean::free_heap_obj(x_11); -lean::dec(x_15); -x_46 = !lean::is_exclusive(x_21); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_21, 0); -lean::dec(x_47); -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -lean::cnstr_set(x_21, 0, x_48); -return x_21; -} -else -{ -obj* x_49; obj* x_50; obj* x_51; -x_49 = lean::cnstr_get(x_21, 1); -lean::inc(x_49); -lean::dec(x_21); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_49); -return x_51; -} -} -} -} -else -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_52 = lean::cnstr_get(x_11, 0); -x_53 = lean::cnstr_get(x_11, 1); -x_54 = lean::cnstr_get(x_11, 2); -lean::inc(x_54); -lean::inc(x_53); -lean::inc(x_52); -lean::dec(x_11); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_52); -lean::cnstr_set(x_55, 1, x_2); -lean::inc(x_55); -x_56 = l_List_reverse___rarg(x_55); -x_57 = l_Lean_Parser_noKind; -x_58 = l_Lean_Parser_Syntax_mkNode(x_57, x_56); -lean::inc(x_53); -x_59 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_55, x_10, x_4, x_53, x_12); -lean::dec(x_10); -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; -lean::dec(x_58); -lean::dec(x_53); -x_61 = lean::cnstr_get(x_59, 1); -lean::inc(x_61); -if (lean::is_exclusive(x_59)) { - lean::cnstr_release(x_59, 0); - lean::cnstr_release(x_59, 1); - x_62 = x_59; -} else { - lean::dec_ref(x_59); - x_62 = lean::box(0); -} -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_54, x_60); -if (lean::is_scalar(x_62)) { - x_64 = lean::alloc_cnstr(0, 2, 0); -} else { - x_64 = x_62; -} -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_61); -return x_64; -} -else -{ -uint8 x_65; -x_65 = lean::cnstr_get_scalar(x_60, sizeof(void*)*1); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_66 = lean::cnstr_get(x_59, 1); -lean::inc(x_66); -if (lean::is_exclusive(x_59)) { - lean::cnstr_release(x_59, 0); - lean::cnstr_release(x_59, 1); - x_67 = x_59; -} else { - lean::dec_ref(x_59); - x_67 = lean::box(0); -} -x_68 = lean::cnstr_get(x_60, 0); -lean::inc(x_68); -lean::dec(x_60); -x_69 = lean::cnstr_get(x_68, 2); -lean::inc(x_69); -lean::dec(x_68); -x_70 = l_mjoin___rarg___closed__1; -x_71 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_71, 0, x_69); -lean::closure_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -x_73 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_73, 0, x_58); -lean::cnstr_set(x_73, 1, x_53); -lean::cnstr_set(x_73, 2, x_72); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_54, x_73); -if (lean::is_scalar(x_67)) { - x_75 = lean::alloc_cnstr(0, 2, 0); -} else { - x_75 = x_67; -} -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_66); -return x_75; -} -else -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; -lean::dec(x_58); -lean::dec(x_53); -x_76 = lean::cnstr_get(x_59, 1); -lean::inc(x_76); -if (lean::is_exclusive(x_59)) { - lean::cnstr_release(x_59, 0); - lean::cnstr_release(x_59, 1); - x_77 = x_59; -} else { - lean::dec_ref(x_59); - x_77 = lean::box(0); -} -x_78 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_54, x_60); -if (lean::is_scalar(x_77)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_77; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_76); -return x_79; -} -} -} -} -else -{ -uint8 x_80; -lean::dec(x_10); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_80 = !lean::is_exclusive(x_11); -if (x_80 == 0) -{ -obj* x_81; -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_11); -lean::cnstr_set(x_81, 1, x_12); -return x_81; -} -else -{ -obj* x_82; uint8 x_83; obj* x_84; obj* x_85; -x_82 = lean::cnstr_get(x_11, 0); -x_83 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_82); -lean::dec(x_11); -x_84 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_84, 0, x_82); -lean::cnstr_set_scalar(x_84, sizeof(void*)*1, x_83); -x_85 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_12); -return x_85; -} -} -} -} -else -{ -obj* x_197; obj* x_198; obj* x_199; obj* x_200; -lean::dec(x_2); -lean::dec(x_1); -x_197 = lean::box(0); -x_198 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_199 = l_mjoin___rarg___closed__1; -x_200 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_198, x_199, x_197, x_197, x_4, x_5, x_6); -lean::dec(x_4); -return x_200; -} -} -} -obj* l_Lean_Parser_Combinators_many1___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__1(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_9; uint8 x_10; -x_5 = l_String_OldIterator_remaining___main(x_3); -x_6 = lean::box(0); -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_add(x_5, x_7); -lean::dec(x_5); -x_9 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_6, x_8, x_2, x_3, x_4); -lean::dec(x_8); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = l_Lean_Parser_finishCommentBlock___closed__2; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_11); -lean::cnstr_set(x_9, 0, x_13); -return x_9; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_9); -x_16 = l_Lean_Parser_finishCommentBlock___closed__2; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_15); -return x_18; -} -} -} -obj* _init_l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -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::dec(x_1); -x_4 = l_Lean_Parser_Level_Parser_Lean_Parser_HasTokens(x_2); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -lean::dec(x_4); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -x_7 = lean::mk_string("}"); -x_8 = l_Lean_Parser_symbol_tokens___rarg(x_7, x_2); -lean::dec(x_7); -x_9 = lean::box(0); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_9); -lean::dec(x_8); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_10); -lean::dec(x_10); -lean::dec(x_6); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_11); -lean::dec(x_11); -lean::dec(x_3); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -return x_13; -} -} -obj* l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l___private_init_lean_parser_combinators_1__many1Aux___main___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_3); -return x_7; -} -} -obj* _init_l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::mk_string(".{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_5, 0, x_2); -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_Level_Parser), 5, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_levelParser_run), 4, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__1), 4, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::mk_string("}"); -x_10 = l_String_trim(x_9); -lean::dec(x_9); -lean::inc(x_10); -x_11 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_4); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_BasicParserM_Monad; -x_18 = l_Lean_Parser_BasicParserM_MonadExcept; -x_19 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_20 = l_Lean_Parser_BasicParserM_Alternative; -x_21 = l_Lean_Parser_identUnivSpec; -x_22 = l_Lean_Parser_identUnivSpec_HasView; -x_23 = l_Lean_Parser_Combinators_node_view___rarg(x_17, x_18, x_19, x_20, x_21, x_16, x_22); -lean::dec(x_16); -return x_23; -} -} -obj* _init_l_Lean_Parser_identUnivSpec_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string(".{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_5, 0, x_2); -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_Level_Parser), 5, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_levelParser_run), 4, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens___spec__1), 4, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::mk_string("}"); -x_10 = l_String_trim(x_9); -lean::dec(x_9); -lean::inc(x_10); -x_11 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_4); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -obj* l_Lean_Parser_identUnivSpec_Parser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_identUnivSpec; -x_5 = l_Lean_Parser_identUnivSpec_Parser___closed__1; -x_6 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(x_4, x_5, x_1, x_2, x_3); -return x_6; -} -} -obj* _init_l_Lean_Parser_identUnivs() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("identUnivs"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_identUnivs_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_identUnivs; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -else -{ -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; -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -lean::dec(x_3); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_identUnivSpec_HasView; -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_9); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_10); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_identUnivs; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = l_Lean_Parser_identUnivSpec_HasView; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_10 = lean::box(3); -x_11 = lean::apply_1(x_9, x_10); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -obj* _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = l_Lean_Parser_identUnivSpec_HasView; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_9); -lean::cnstr_set(x_2, 0, x_12); -x_13 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -return x_14; -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::dec(x_6); -lean::free_heap_obj(x_2); -x_15 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1; -return x_15; -} -} -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2; -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 1); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_20 = lean::cnstr_get(x_17, 0); -lean::inc(x_20); -lean::dec(x_17); -x_21 = l_Lean_Parser_identUnivSpec_HasView; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -return x_26; -} -else -{ -obj* x_27; -lean::dec(x_19); -lean::dec(x_17); -x_27 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1; -return x_27; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_identUnivSpec_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__3; -return x_1; -} -} -obj* l_Lean_Parser_identUnivs_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_98; -x_98 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_98) == 0) -{ -obj* x_99; -x_99 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__5; -return x_99; -} -else -{ -obj* x_100; obj* x_101; -x_100 = lean::cnstr_get(x_98, 0); -lean::inc(x_100); -lean::dec(x_98); -x_101 = lean::cnstr_get(x_100, 1); -lean::inc(x_101); -lean::dec(x_100); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; -x_102 = lean::box(3); -x_2 = x_101; -x_3 = x_102; -goto block_97; -} -else -{ -obj* x_103; obj* x_104; -x_103 = lean::cnstr_get(x_101, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_101, 1); -lean::inc(x_104); -lean::dec(x_101); -x_2 = x_104; -x_3 = x_103; -goto block_97; -} -} -block_97: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; -x_34 = lean::cnstr_get(x_3, 0); -lean::inc(x_34); -lean::dec(x_3); -x_35 = lean::box(3); -x_36 = l_Lean_Parser_Syntax_asNode___main(x_35); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; obj* x_38; -x_37 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4; -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_34); -lean::cnstr_set(x_38, 1, x_37); -return x_38; -} -else -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_36, 0); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; -lean::free_heap_obj(x_36); -x_42 = lean::box(0); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_34); -lean::cnstr_set(x_43, 1, x_42); -return x_43; -} -else -{ -obj* x_44; -x_44 = lean::cnstr_get(x_41, 1); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_45 = lean::cnstr_get(x_41, 0); -lean::inc(x_45); -lean::dec(x_41); -x_46 = l_Lean_Parser_identUnivSpec_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_45); -lean::cnstr_set(x_36, 0, x_48); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_34); -lean::cnstr_set(x_49, 1, x_36); -return x_49; -} -else -{ -obj* x_50; obj* x_51; -lean::dec(x_44); -lean::dec(x_41); -lean::free_heap_obj(x_36); -x_50 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4; -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_34); -lean::cnstr_set(x_51, 1, x_50); -return x_51; -} -} -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_36, 0); -lean::inc(x_52); -lean::dec(x_36); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; obj* x_55; -x_54 = lean::box(0); -x_55 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_55, 0, x_34); -lean::cnstr_set(x_55, 1, x_54); -return x_55; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_57 = lean::cnstr_get(x_53, 0); -lean::inc(x_57); -lean::dec(x_53); -x_58 = l_Lean_Parser_identUnivSpec_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_34); -lean::cnstr_set(x_62, 1, x_61); -return x_62; -} -else -{ -obj* x_63; obj* x_64; -lean::dec(x_56); -lean::dec(x_53); -x_63 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4; -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_34); -lean::cnstr_set(x_64, 1, x_63); -return x_64; -} -} -} -} -} -else -{ -obj* x_65; obj* x_66; obj* x_67; -x_65 = lean::cnstr_get(x_3, 0); -lean::inc(x_65); -lean::dec(x_3); -x_66 = lean::cnstr_get(x_2, 0); -lean::inc(x_66); -lean::dec(x_2); -x_67 = l_Lean_Parser_Syntax_asNode___main(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; -x_68 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4; -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_65); -lean::cnstr_set(x_69, 1, x_68); -return x_69; -} -else -{ -uint8 x_70; -x_70 = !lean::is_exclusive(x_67); -if (x_70 == 0) -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_67, 0); -x_72 = lean::cnstr_get(x_71, 1); -lean::inc(x_72); -lean::dec(x_71); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; obj* x_74; -lean::free_heap_obj(x_67); -x_73 = lean::box(0); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_65); -lean::cnstr_set(x_74, 1, x_73); -return x_74; -} -else -{ -obj* x_75; -x_75 = lean::cnstr_get(x_72, 1); -lean::inc(x_75); -if (lean::obj_tag(x_75) == 0) -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_76 = lean::cnstr_get(x_72, 0); -lean::inc(x_76); -lean::dec(x_72); -x_77 = l_Lean_Parser_identUnivSpec_HasView; -x_78 = lean::cnstr_get(x_77, 0); -lean::inc(x_78); -x_79 = lean::apply_1(x_78, x_76); -lean::cnstr_set(x_67, 0, x_79); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_65); -lean::cnstr_set(x_80, 1, x_67); -return x_80; -} -else -{ -obj* x_81; obj* x_82; -lean::dec(x_75); -lean::dec(x_72); -lean::free_heap_obj(x_67); -x_81 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4; -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_65); -lean::cnstr_set(x_82, 1, x_81); -return x_82; -} -} -} -else -{ -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_67, 0); -lean::inc(x_83); -lean::dec(x_67); -x_84 = lean::cnstr_get(x_83, 1); -lean::inc(x_84); -lean::dec(x_83); -if (lean::obj_tag(x_84) == 0) -{ -obj* x_85; obj* x_86; -x_85 = lean::box(0); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_65); -lean::cnstr_set(x_86, 1, x_85); -return x_86; -} -else -{ -obj* x_87; -x_87 = lean::cnstr_get(x_84, 1); -lean::inc(x_87); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_88 = lean::cnstr_get(x_84, 0); -lean::inc(x_88); -lean::dec(x_84); -x_89 = l_Lean_Parser_identUnivSpec_HasView; -x_90 = lean::cnstr_get(x_89, 0); -lean::inc(x_90); -x_91 = lean::apply_1(x_90, x_88); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_65); -lean::cnstr_set(x_93, 1, x_92); -return x_93; -} -else -{ -obj* x_94; obj* x_95; -lean::dec(x_87); -lean::dec(x_84); -x_94 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4; -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_65); -lean::cnstr_set(x_95, 1, x_94); -return x_95; -} -} -} -} -} -} -else -{ -obj* x_96; -lean::dec(x_3); -x_96 = lean::box(0); -x_4 = x_96; -goto block_33; -} -block_33: -{ -lean::dec(x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__3; -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1; -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_7, 0); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; -lean::free_heap_obj(x_7); -x_12 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2; -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_11, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_11, 0); -lean::inc(x_14); -lean::dec(x_11); -x_15 = l_Lean_Parser_identUnivSpec_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_7, 0, x_17); -x_18 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_7); -return x_19; -} -else -{ -obj* x_20; -lean::dec(x_13); -lean::dec(x_11); -lean::free_heap_obj(x_7); -x_20 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1; -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_7, 0); -lean::inc(x_21); -lean::dec(x_7); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; -x_23 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2; -return x_23; -} -else -{ -obj* x_24; -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_22, 0); -lean::inc(x_25); -lean::dec(x_22); -x_26 = l_Lean_Parser_identUnivSpec_HasView; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::apply_1(x_27, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -return x_31; -} -else -{ -obj* x_32; -lean::dec(x_24); -lean::dec(x_22); -x_32 = l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1; -return x_32; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_identUnivs_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivs_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivs_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_identUnivs_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_identUnivs_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_tokens___rarg(x_2); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_1); -lean::dec(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -return x_7; -} -} -obj* l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_identUnivSpec_Parser(x_1, x_3, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* 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* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView___lambda__1___boxed), 4, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = 0; -x_4 = lean::box(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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); -x_10 = l_Lean_Parser_TermParserM_Monad; -x_11 = l_Lean_Parser_TermParserM_MonadExcept; -x_12 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_13 = l_Lean_Parser_TermParserM_Alternative; -x_14 = l_Lean_Parser_identUnivs; -x_15 = l_Lean_Parser_identUnivs_HasView; -x_16 = l_Lean_Parser_Combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); -lean::dec(x_9); -return x_16; -} -} -obj* l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Parser_identUnivs_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; uint8 x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView___lambda__1___boxed), 4, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = 0; -x_4 = lean::box(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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); -return x_9; -} -} -obj* l_Lean_Parser_identUnivs_Parser(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; -x_6 = l_Lean_Parser_identUnivs; -x_7 = l_Lean_Parser_identUnivs_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* l_Lean_Parser_Term_getLeading(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_1); -lean::cnstr_set(x_8, 1, x_5); -lean::cnstr_set(x_8, 2, x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_6); -return x_9; -} -} -obj* l_Lean_Parser_Term_getLeading___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Term_getLeading(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; -x_1 = lean::box(0); -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -lean::inc(x_1); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_tuple() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("tuple"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(x_5); -x_7 = lean::cnstr_get(x_4, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = lean::box(0); -lean::cnstr_set(x_1, 1, x_9); -lean::cnstr_set(x_1, 0, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_6); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_7, 0); -lean::inc(x_11); -lean::dec(x_7); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_4, 0); -lean::inc(x_12); -lean::dec(x_4); -x_13 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::cnstr_set(x_1, 1, x_13); -lean::cnstr_set(x_1, 0, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_1); -lean::cnstr_set(x_14, 1, x_6); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::cnstr_get(x_11, 0); -lean::inc(x_16); -lean::dec(x_11); -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_1, 1, x_17); -lean::cnstr_set(x_1, 0, x_18); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_15); -lean::cnstr_set(x_19, 1, x_1); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_6); -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_1, 0); -x_22 = lean::cnstr_get(x_1, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_1); -x_23 = l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(x_22); -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_25 = lean::cnstr_get(x_21, 0); -lean::inc(x_25); -lean::dec(x_21); -x_26 = lean::box(0); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_23); -return x_28; -} -else -{ -obj* x_29; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = lean::cnstr_get(x_21, 0); -lean::inc(x_30); -lean::dec(x_21); -x_31 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_23); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_34 = lean::cnstr_get(x_21, 0); -lean::inc(x_34); -lean::dec(x_21); -x_35 = lean::cnstr_get(x_29, 0); -lean::inc(x_35); -lean::dec(x_29); -x_36 = lean::box(0); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_35); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_36); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_34); -lean::cnstr_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_23); -return x_40; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_tuple_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(x_3); -x_5 = l_List_join___main___rarg(x_4); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_Term_tuple; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_9); -x_17 = l_Lean_Parser_Term_tuple; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -lean::dec(x_8); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(0); -lean::cnstr_set(x_3, 1, x_11); -lean::cnstr_set(x_3, 0, x_10); -return x_3; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -lean::dec(x_3); -x_13 = lean::box(0); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -else -{ -obj* x_17; uint8 x_18; -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = !lean::is_exclusive(x_5); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_5, 0); -x_20 = lean::cnstr_get(x_5, 1); -x_21 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_1, x_2, x_20); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_17); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_5, 1, x_21); -lean::cnstr_set(x_5, 0, x_25); -return x_5; -} -else -{ -obj* x_26; obj* x_27; -lean::dec(x_19); -x_26 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_17); -lean::cnstr_set(x_27, 1, x_26); -lean::cnstr_set(x_5, 1, x_21); -lean::cnstr_set(x_5, 0, x_27); -return x_5; -} -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_5, 0); -x_29 = lean::cnstr_get(x_5, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_5); -x_30 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_1, x_2, x_29); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_17); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_30); -return x_35; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; -lean::dec(x_28); -x_36 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_17); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_30); -return x_38; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::box(0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_nat_obj(0u); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::mk_string(", "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_9 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_10 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_8, x_9, x_7); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -obj* _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__4; -return x_1; -} -} -obj* l_Lean_Parser_Term_tuple_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_33; -x_33 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__5; -return x_34; -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -lean::dec(x_33); -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -lean::dec(x_35); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; -x_37 = lean::box(3); -x_2 = x_36; -x_3 = x_37; -goto block_32; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_36, 1); -lean::inc(x_39); -lean::dec(x_36); -x_2 = x_39; -x_3 = x_38; -goto block_32; -} -} -block_32: -{ -obj* x_4; obj* x_5; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_3, 0); -lean::inc(x_16); -lean::dec(x_3); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_18; obj* x_19; -x_18 = lean::box(3); -x_19 = l_Lean_Parser_Syntax_asNode___main(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_17); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -x_24 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_25 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_26 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_24, x_25, x_23); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_17); -lean::cnstr_set(x_27, 1, x_26); -return x_27; -} -} -else -{ -obj* x_28; -x_28 = lean::cnstr_get(x_2, 0); -lean::inc(x_28); -lean::dec(x_2); -x_4 = x_17; -x_5 = x_28; -goto block_15; -} -} -else -{ -lean::dec(x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_29; -x_29 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__4; -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_2, 0); -lean::inc(x_30); -lean::dec(x_2); -x_31 = lean::box(0); -x_4 = x_31; -x_5 = x_30; -goto block_15; -} -} -block_15: -{ -obj* x_6; -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_12 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_13 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_11, x_12, x_10); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_4); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_tuple_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_tuple_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_tuple_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_Term_tuple_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_tuple_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_typed() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("typed"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_typed_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_typed; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_typed; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_typed_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_typed_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_typed_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_typed_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_typed_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_typed_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_typed_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_typed_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_parenSpecial() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("parenSpecial"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_parenSpecial_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_tuple_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_parenSpecial; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_typed_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_parenSpecial; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_tuple_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("parenSpecial"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_typed_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Term_tuple_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_parenSpecial_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_parenSpecial_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_parenSpecial_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_parenSpecial_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_parenContent() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("parenContent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_parenContent_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_Lean_Parser_Term_parenContent; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -return x_7; -} -else -{ -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; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -lean::dec(x_2); -x_10 = lean::box(0); -x_11 = l_Lean_Parser_Term_parenSpecial_HasView; -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_9); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -x_15 = l_Lean_Parser_noKind; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_10); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_8); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Term_parenContent; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_parenSpecial_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; -x_3 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_2); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_2, 0); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; -lean::free_heap_obj(x_2); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_7, 0); -lean::inc(x_11); -lean::dec(x_7); -x_12 = l_Lean_Parser_Term_parenSpecial_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -lean::cnstr_set(x_2, 0, x_14); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_2); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_7); -lean::free_heap_obj(x_2); -x_16 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_16); -return x_17; -} -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_2, 0); -lean::inc(x_18); -lean::dec(x_2); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_19, 0); -lean::inc(x_23); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_parenSpecial_HasView; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_1); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -lean::dec(x_22); -lean::dec(x_19); -x_29 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_1); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_65; -x_65 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; -x_66 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__2; -return x_66; -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_65, 0); -lean::inc(x_67); -lean::dec(x_65); -x_68 = lean::cnstr_get(x_67, 1); -lean::inc(x_68); -lean::dec(x_67); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = lean::box(3); -x_2 = x_68; -x_3 = x_69; -goto block_64; -} -else -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_68, 1); -lean::inc(x_71); -lean::dec(x_68); -x_2 = x_71; -x_3 = x_70; -goto block_64; -} -} -block_64: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::box(3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_3); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_5, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -lean::free_heap_obj(x_5); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_3); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = l_Lean_Parser_Term_parenSpecial_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_5, 0, x_17); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_3); -lean::cnstr_set(x_18, 1, x_5); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_10); -lean::free_heap_obj(x_5); -x_19 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_3); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_5, 0); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_3); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = l_Lean_Parser_Term_parenSpecial_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_3); -lean::cnstr_set(x_31, 1, x_30); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -lean::dec(x_25); -lean::dec(x_22); -x_32 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_3); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_2, 0); -lean::inc(x_34); -lean::dec(x_2); -x_35 = l_Lean_Parser_Syntax_asNode___main(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; -x_36 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_3); -lean::cnstr_set(x_37, 1, x_36); -return x_37; -} -else -{ -uint8 x_38; -x_38 = !lean::is_exclusive(x_35); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_35, 0); -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -lean::dec(x_39); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_41; obj* x_42; -lean::free_heap_obj(x_35); -x_41 = lean::box(0); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_3); -lean::cnstr_set(x_42, 1, x_41); -return x_42; -} -else -{ -obj* x_43; -x_43 = lean::cnstr_get(x_40, 1); -lean::inc(x_43); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_44 = lean::cnstr_get(x_40, 0); -lean::inc(x_44); -lean::dec(x_40); -x_45 = l_Lean_Parser_Term_parenSpecial_HasView; -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::apply_1(x_46, x_44); -lean::cnstr_set(x_35, 0, x_47); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_3); -lean::cnstr_set(x_48, 1, x_35); -return x_48; -} -else -{ -obj* x_49; obj* x_50; -lean::dec(x_43); -lean::dec(x_40); -lean::free_heap_obj(x_35); -x_49 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_3); -lean::cnstr_set(x_50, 1, x_49); -return x_50; -} -} -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_35, 0); -lean::inc(x_51); -lean::dec(x_35); -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -lean::dec(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; -x_53 = lean::box(0); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_3); -lean::cnstr_set(x_54, 1, x_53); -return x_54; -} -else -{ -obj* x_55; -x_55 = lean::cnstr_get(x_52, 1); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_56 = lean::cnstr_get(x_52, 0); -lean::inc(x_56); -lean::dec(x_52); -x_57 = l_Lean_Parser_Term_parenSpecial_HasView; -x_58 = lean::cnstr_get(x_57, 0); -lean::inc(x_58); -x_59 = lean::apply_1(x_58, x_56); -x_60 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_3); -lean::cnstr_set(x_61, 1, x_60); -return x_61; -} -else -{ -obj* x_62; obj* x_63; -lean::dec(x_55); -lean::dec(x_52); -x_62 = l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1; -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_3); -lean::cnstr_set(x_63, 1, x_62); -return x_63; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_parenContent_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_parenContent_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_parenContent_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_parenContent_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_paren() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("paren"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -x_4 = lean::box(3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_1); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_6); -x_8 = l_Lean_Parser_Term_paren; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -x_4 = lean::box(3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_1); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* l_Lean_Parser_Term_paren_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__1; -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_5); -x_10 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::box(3); -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 = l_Lean_Parser_Term_paren; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_16 = lean::cnstr_get(x_3, 0); -lean::inc(x_16); -lean::dec(x_3); -x_17 = l_Lean_Parser_Term_parenContent_HasView; -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -x_19 = lean::apply_1(x_18, x_16); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_5); -x_21 = l_Lean_Parser_noKind; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::box(3); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -x_27 = l_Lean_Parser_Term_paren; -x_28 = l_Lean_Parser_Syntax_mkNode(x_27, x_26); -return x_28; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_29 = lean::cnstr_get(x_4, 0); -lean::inc(x_29); -lean::dec(x_4); -x_30 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_5); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_22); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -x_35 = l_Lean_Parser_Term_paren; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_2, 0); -lean::inc(x_37); -lean::dec(x_2); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_39 = l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__2; -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_Lean_Parser_Term_paren; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_43 = lean::cnstr_get(x_4, 0); -lean::inc(x_43); -lean::dec(x_4); -x_44 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_5); -x_46 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_45); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_38); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_Lean_Parser_Term_paren; -x_50 = l_Lean_Parser_Syntax_mkNode(x_49, x_48); -return x_50; -} -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_51 = lean::cnstr_get(x_3, 0); -lean::inc(x_51); -lean::dec(x_3); -x_52 = l_Lean_Parser_Term_parenContent_HasView; -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -x_54 = lean::apply_1(x_53, x_51); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_5); -x_56 = l_Lean_Parser_noKind; -x_57 = l_Lean_Parser_Syntax_mkNode(x_56, x_55); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_58 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_57); -lean::cnstr_set(x_59, 1, x_58); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_38); -lean::cnstr_set(x_60, 1, x_59); -x_61 = l_Lean_Parser_Term_paren; -x_62 = l_Lean_Parser_Syntax_mkNode(x_61, x_60); -return x_62; -} -else -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_63 = lean::cnstr_get(x_4, 0); -lean::inc(x_63); -lean::dec(x_4); -x_64 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_64, 0, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_5); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_57); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_38); -lean::cnstr_set(x_67, 1, x_66); -x_68 = l_Lean_Parser_Term_paren; -x_69 = l_Lean_Parser_Syntax_mkNode(x_68, x_67); -return x_69; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_parenContent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_1); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -lean::free_heap_obj(x_3); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_1); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -lean::dec(x_8); -x_12 = l_Lean_Parser_Term_parenContent_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -lean::cnstr_set(x_3, 0, x_14); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_3); -lean::cnstr_set(x_15, 2, x_1); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_8); -lean::free_heap_obj(x_3); -x_16 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_16); -lean::cnstr_set(x_17, 2, x_1); -return x_17; -} -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_3, 0); -lean::inc(x_18); -lean::dec(x_3); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_1); -lean::cnstr_set(x_20, 2, x_1); -return x_20; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -x_23 = l_Lean_Parser_Term_parenContent_HasView; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::apply_1(x_24, x_22); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_27, 0, x_1); -lean::cnstr_set(x_27, 1, x_26); -lean::cnstr_set(x_27, 2, x_1); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -lean::dec(x_21); -lean::dec(x_19); -x_28 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_1); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_29, 2, x_1); -return x_29; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_paren_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_68; -x_68 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__2; -return x_69; -} -else -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -lean::inc(x_70); -lean::dec(x_68); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -lean::dec(x_70); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -x_72 = lean::box(3); -x_2 = x_71; -x_3 = x_72; -goto block_67; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_71, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_71, 1); -lean::inc(x_74); -lean::dec(x_71); -x_2 = x_74; -x_3 = x_73; -goto block_67; -} -} -block_67: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_64; obj* x_65; -x_64 = lean::cnstr_get(x_3, 0); -lean::inc(x_64); -lean::dec(x_3); -x_65 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_65, 0, x_64); -x_4 = x_65; -goto block_63; -} -else -{ -obj* x_66; -lean::dec(x_3); -x_66 = lean::box(0); -x_4 = x_66; -goto block_63; -} -block_63: -{ -obj* x_5; obj* x_6; obj* x_13; obj* x_14; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_60; -x_60 = lean::box(3); -x_13 = x_2; -x_14 = x_60; -goto block_59; -} -else -{ -obj* x_61; obj* x_62; -x_61 = lean::cnstr_get(x_2, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_2, 1); -lean::inc(x_62); -lean::dec(x_2); -x_13 = x_62; -x_14 = x_61; -goto block_59; -} -block_12: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_5); -lean::cnstr_set(x_11, 2, x_10); -return x_11; -} -} -block_59: -{ -obj* x_15; -x_15 = l_Lean_Parser_Syntax_asNode___main(x_14); -if (lean::obj_tag(x_15) == 0) -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = lean::box(0); -x_17 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_18, 2, x_16); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_13, 0); -lean::inc(x_19); -lean::dec(x_13); -x_20 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_5 = x_20; -x_6 = x_19; -goto block_12; -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_15); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_15, 0); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -lean::free_heap_obj(x_15); -x_24 = lean::box(0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_25; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_25, 2, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_13, 0); -lean::inc(x_26); -lean::dec(x_13); -x_5 = x_24; -x_6 = x_26; -goto block_12; -} -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::cnstr_get(x_23, 0); -lean::inc(x_28); -lean::dec(x_23); -x_29 = l_Lean_Parser_Term_parenContent_HasView; -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::apply_1(x_30, x_28); -lean::cnstr_set(x_15, 0, x_31); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_32; obj* x_33; -x_32 = lean::box(0); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_15); -lean::cnstr_set(x_33, 2, x_32); -return x_33; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_13, 0); -lean::inc(x_34); -lean::dec(x_13); -x_5 = x_15; -x_6 = x_34; -goto block_12; -} -} -else -{ -lean::dec(x_27); -lean::dec(x_23); -lean::free_heap_obj(x_15); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::box(0); -x_36 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_36); -lean::cnstr_set(x_37, 2, x_35); -return x_37; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_13, 0); -lean::inc(x_38); -lean::dec(x_13); -x_39 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_5 = x_39; -x_6 = x_38; -goto block_12; -} -} -} -} -else -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_15, 0); -lean::inc(x_40); -lean::dec(x_15); -x_41 = lean::cnstr_get(x_40, 1); -lean::inc(x_41); -lean::dec(x_40); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; -x_42 = lean::box(0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_43; -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_42); -lean::cnstr_set(x_43, 2, x_42); -return x_43; -} -else -{ -obj* x_44; -x_44 = lean::cnstr_get(x_13, 0); -lean::inc(x_44); -lean::dec(x_13); -x_5 = x_42; -x_6 = x_44; -goto block_12; -} -} -else -{ -obj* x_45; -x_45 = lean::cnstr_get(x_41, 1); -lean::inc(x_45); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_46 = lean::cnstr_get(x_41, 0); -lean::inc(x_46); -lean::dec(x_41); -x_47 = l_Lean_Parser_Term_parenContent_HasView; -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::apply_1(x_48, x_46); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_49); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_51; obj* x_52; -x_51 = lean::box(0); -x_52 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_52, 0, x_4); -lean::cnstr_set(x_52, 1, x_50); -lean::cnstr_set(x_52, 2, x_51); -return x_52; -} -else -{ -obj* x_53; -x_53 = lean::cnstr_get(x_13, 0); -lean::inc(x_53); -lean::dec(x_13); -x_5 = x_50; -x_6 = x_53; -goto block_12; -} -} -else -{ -lean::dec(x_45); -lean::dec(x_41); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; -x_54 = lean::box(0); -x_55 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_56 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_56, 0, x_4); -lean::cnstr_set(x_56, 1, x_55); -lean::cnstr_set(x_56, 2, x_54); -return x_56; -} -else -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_13, 0); -lean::inc(x_57); -lean::dec(x_13); -x_58 = l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1; -x_5 = x_58; -x_6 = x_57; -goto block_12; -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_paren_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_paren_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_paren_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_paren_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_paren_HasView_x27; -return x_1; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, uint8 x_3, uint8 x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8, obj* x_9, obj* x_10, obj* x_11) { -_start: -{ -obj* x_12; uint8 x_13; -x_12 = lean::mk_nat_obj(0u); -x_13 = lean::nat_dec_eq(x_6, x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_266; obj* x_267; -x_14 = lean::mk_nat_obj(1u); -x_15 = lean::nat_sub(x_6, x_14); -if (x_4 == 0) -{ -obj* x_374; obj* x_375; -lean::inc(x_1); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -x_374 = lean::apply_5(x_1, x_7, x_8, x_9, x_10, x_11); -x_375 = lean::cnstr_get(x_374, 0); -lean::inc(x_375); -if (lean::obj_tag(x_375) == 0) -{ -obj* x_376; uint8 x_377; -x_376 = lean::cnstr_get(x_374, 1); -lean::inc(x_376); -lean::dec(x_374); -x_377 = !lean::is_exclusive(x_375); -if (x_377 == 0) -{ -obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; -x_378 = lean::cnstr_get(x_375, 0); -x_379 = lean::cnstr_get(x_375, 2); -x_380 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_380, 0, x_378); -x_381 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_375, 2, x_381); -lean::cnstr_set(x_375, 0, x_380); -x_382 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_379, x_375); -x_266 = x_382; -x_267 = x_376; -goto block_373; -} -else -{ -obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; obj* x_388; obj* x_389; -x_383 = lean::cnstr_get(x_375, 0); -x_384 = lean::cnstr_get(x_375, 1); -x_385 = lean::cnstr_get(x_375, 2); -lean::inc(x_385); -lean::inc(x_384); -lean::inc(x_383); -lean::dec(x_375); -x_386 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_386, 0, x_383); -x_387 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_388 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_388, 0, x_386); -lean::cnstr_set(x_388, 1, x_384); -lean::cnstr_set(x_388, 2, x_387); -x_389 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_385, x_388); -x_266 = x_389; -x_267 = x_376; -goto block_373; -} -} -else -{ -obj* x_390; uint8 x_391; -x_390 = lean::cnstr_get(x_374, 1); -lean::inc(x_390); -lean::dec(x_374); -x_391 = !lean::is_exclusive(x_375); -if (x_391 == 0) -{ -x_266 = x_375; -x_267 = x_390; -goto block_373; -} -else -{ -obj* x_392; uint8 x_393; obj* x_394; -x_392 = lean::cnstr_get(x_375, 0); -x_393 = lean::cnstr_get_scalar(x_375, sizeof(void*)*1); -lean::inc(x_392); -lean::dec(x_375); -x_394 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_394, 0, x_392); -lean::cnstr_set_scalar(x_394, sizeof(void*)*1, x_393); -x_266 = x_394; -x_267 = x_390; -goto block_373; -} -} -} -else -{ -obj* x_395; obj* x_396; obj* x_397; -x_395 = lean::box(0); -lean::inc(x_1); -lean::inc(x_10); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -x_396 = lean::apply_5(x_1, x_7, x_8, x_9, x_10, x_11); -x_397 = lean::cnstr_get(x_396, 0); -lean::inc(x_397); -if (lean::obj_tag(x_397) == 0) -{ -obj* x_398; uint8 x_399; -x_398 = lean::cnstr_get(x_396, 1); -lean::inc(x_398); -lean::dec(x_396); -x_399 = !lean::is_exclusive(x_397); -if (x_399 == 0) -{ -obj* x_400; obj* x_401; obj* x_402; obj* x_403; obj* x_404; -x_400 = lean::cnstr_get(x_397, 0); -x_401 = lean::cnstr_get(x_397, 2); -x_402 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_402, 0, x_400); -x_403 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_397, 2, x_403); -lean::cnstr_set(x_397, 0, x_402); -x_404 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_401, x_397); -if (lean::obj_tag(x_404) == 0) -{ -lean::dec(x_10); -x_266 = x_404; -x_267 = x_398; -goto block_373; -} -else -{ -uint8 x_405; -x_405 = lean::cnstr_get_scalar(x_404, sizeof(void*)*1); -if (x_405 == 0) -{ -obj* x_406; obj* x_407; obj* x_408; obj* x_409; obj* x_410; obj* x_411; -x_406 = lean::cnstr_get(x_404, 0); -lean::inc(x_406); -lean::dec(x_404); -x_407 = lean::cnstr_get(x_406, 2); -lean::inc(x_407); -lean::dec(x_406); -x_408 = l_mjoin___rarg___closed__1; -x_409 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_409, 0, x_407); -lean::closure_set(x_409, 1, x_408); -x_410 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_410, 0, x_409); -x_411 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_411, 0, x_395); -lean::cnstr_set(x_411, 1, x_10); -lean::cnstr_set(x_411, 2, x_410); -x_266 = x_411; -x_267 = x_398; -goto block_373; -} -else -{ -lean::dec(x_10); -x_266 = x_404; -x_267 = x_398; -goto block_373; -} -} -} -else -{ -obj* x_412; obj* x_413; obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; -x_412 = lean::cnstr_get(x_397, 0); -x_413 = lean::cnstr_get(x_397, 1); -x_414 = lean::cnstr_get(x_397, 2); -lean::inc(x_414); -lean::inc(x_413); -lean::inc(x_412); -lean::dec(x_397); -x_415 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_415, 0, x_412); -x_416 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_417 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_417, 0, x_415); -lean::cnstr_set(x_417, 1, x_413); -lean::cnstr_set(x_417, 2, x_416); -x_418 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_414, x_417); -if (lean::obj_tag(x_418) == 0) -{ -lean::dec(x_10); -x_266 = x_418; -x_267 = x_398; -goto block_373; -} -else -{ -uint8 x_419; -x_419 = lean::cnstr_get_scalar(x_418, sizeof(void*)*1); -if (x_419 == 0) -{ -obj* x_420; obj* x_421; obj* x_422; obj* x_423; obj* x_424; obj* x_425; -x_420 = lean::cnstr_get(x_418, 0); -lean::inc(x_420); -lean::dec(x_418); -x_421 = lean::cnstr_get(x_420, 2); -lean::inc(x_421); -lean::dec(x_420); -x_422 = l_mjoin___rarg___closed__1; -x_423 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_423, 0, x_421); -lean::closure_set(x_423, 1, x_422); -x_424 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_424, 0, x_423); -x_425 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_425, 0, x_395); -lean::cnstr_set(x_425, 1, x_10); -lean::cnstr_set(x_425, 2, x_424); -x_266 = x_425; -x_267 = x_398; -goto block_373; -} -else -{ -lean::dec(x_10); -x_266 = x_418; -x_267 = x_398; -goto block_373; -} -} -} -} -else -{ -uint8 x_426; -x_426 = lean::cnstr_get_scalar(x_397, sizeof(void*)*1); -if (x_426 == 0) -{ -obj* x_427; obj* x_428; obj* x_429; obj* x_430; obj* x_431; obj* x_432; obj* x_433; -x_427 = lean::cnstr_get(x_396, 1); -lean::inc(x_427); -lean::dec(x_396); -x_428 = lean::cnstr_get(x_397, 0); -lean::inc(x_428); -lean::dec(x_397); -x_429 = lean::cnstr_get(x_428, 2); -lean::inc(x_429); -lean::dec(x_428); -x_430 = l_mjoin___rarg___closed__1; -x_431 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_431, 0, x_429); -lean::closure_set(x_431, 1, x_430); -x_432 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_432, 0, x_431); -x_433 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_433, 0, x_395); -lean::cnstr_set(x_433, 1, x_10); -lean::cnstr_set(x_433, 2, x_432); -x_266 = x_433; -x_267 = x_427; -goto block_373; -} -else -{ -obj* x_434; uint8 x_435; -lean::dec(x_10); -x_434 = lean::cnstr_get(x_396, 1); -lean::inc(x_434); -lean::dec(x_396); -x_435 = !lean::is_exclusive(x_397); -if (x_435 == 0) -{ -x_266 = x_397; -x_267 = x_434; -goto block_373; -} -else -{ -obj* x_436; obj* x_437; -x_436 = lean::cnstr_get(x_397, 0); -lean::inc(x_436); -lean::dec(x_397); -x_437 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_437, 0, x_436); -lean::cnstr_set_scalar(x_437, sizeof(void*)*1, x_426); -x_266 = x_437; -x_267 = x_434; -goto block_373; -} -} -} -} -block_265: -{ -if (lean::obj_tag(x_16) == 0) -{ -obj* x_18; -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -lean::dec(x_1); -x_19 = !lean::is_exclusive(x_16); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_20 = lean::cnstr_get(x_16, 2); -x_21 = lean::cnstr_get(x_16, 0); -lean::dec(x_21); -x_22 = l_List_reverse___rarg(x_5); -x_23 = l_Lean_Parser_noKind; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -x_25 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_16, 2, x_25); -lean::cnstr_set(x_16, 0, x_24); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_16); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_17); -return x_27; -} -else -{ -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; -x_28 = lean::cnstr_get(x_16, 1); -x_29 = lean::cnstr_get(x_16, 2); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_16); -x_30 = l_List_reverse___rarg(x_5); -x_31 = l_Lean_Parser_noKind; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_34 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_28); -lean::cnstr_set(x_34, 2, x_33); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_34); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_17); -return x_36; -} -} -else -{ -uint8 x_37; -x_37 = !lean::is_exclusive(x_16); -if (x_37 == 0) -{ -obj* x_38; obj* x_39; obj* x_40; uint8 x_41; -x_38 = lean::cnstr_get(x_16, 1); -x_39 = lean::cnstr_get(x_16, 2); -x_40 = lean::cnstr_get(x_16, 0); -lean::dec(x_40); -x_41 = !lean::is_exclusive(x_18); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_42 = lean::cnstr_get(x_18, 0); -x_92 = lean::box(0); -lean::inc(x_2); -lean::inc(x_38); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -x_93 = lean::apply_5(x_2, x_7, x_8, x_9, x_38, x_17); -x_94 = lean::cnstr_get(x_93, 0); -lean::inc(x_94); -x_95 = lean::cnstr_get(x_93, 1); -lean::inc(x_95); -lean::dec(x_93); -x_96 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_94); -if (lean::obj_tag(x_96) == 0) -{ -uint8 x_97; -x_97 = !lean::is_exclusive(x_96); -if (x_97 == 0) -{ -obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_98 = lean::cnstr_get(x_96, 0); -x_99 = lean::cnstr_get(x_96, 2); -lean::cnstr_set(x_18, 0, x_98); -x_100 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_96, 2, x_100); -lean::cnstr_set(x_96, 0, x_18); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_99, x_96); -if (lean::obj_tag(x_101) == 0) -{ -lean::free_heap_obj(x_16); -lean::dec(x_38); -x_43 = x_101; -x_44 = x_95; -goto block_91; -} -else -{ -uint8 x_102; -x_102 = lean::cnstr_get_scalar(x_101, sizeof(void*)*1); -if (x_102 == 0) -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_103 = lean::cnstr_get(x_101, 0); -lean::inc(x_103); -lean::dec(x_101); -x_104 = lean::cnstr_get(x_103, 2); -lean::inc(x_104); -lean::dec(x_103); -x_105 = l_mjoin___rarg___closed__1; -x_106 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_106, 0, x_104); -lean::closure_set(x_106, 1, x_105); -x_107 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_16, 2, x_107); -lean::cnstr_set(x_16, 0, x_92); -x_43 = x_16; -x_44 = x_95; -goto block_91; -} -else -{ -lean::free_heap_obj(x_16); -lean::dec(x_38); -x_43 = x_101; -x_44 = x_95; -goto block_91; -} -} -} -else -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_108 = lean::cnstr_get(x_96, 0); -x_109 = lean::cnstr_get(x_96, 1); -x_110 = lean::cnstr_get(x_96, 2); -lean::inc(x_110); -lean::inc(x_109); -lean::inc(x_108); -lean::dec(x_96); -lean::cnstr_set(x_18, 0, x_108); -x_111 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_112 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_112, 0, x_18); -lean::cnstr_set(x_112, 1, x_109); -lean::cnstr_set(x_112, 2, x_111); -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_110, x_112); -if (lean::obj_tag(x_113) == 0) -{ -lean::free_heap_obj(x_16); -lean::dec(x_38); -x_43 = x_113; -x_44 = x_95; -goto block_91; -} -else -{ -uint8 x_114; -x_114 = lean::cnstr_get_scalar(x_113, sizeof(void*)*1); -if (x_114 == 0) -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_115 = lean::cnstr_get(x_113, 0); -lean::inc(x_115); -lean::dec(x_113); -x_116 = lean::cnstr_get(x_115, 2); -lean::inc(x_116); -lean::dec(x_115); -x_117 = l_mjoin___rarg___closed__1; -x_118 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_118, 0, x_116); -lean::closure_set(x_118, 1, x_117); -x_119 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_16, 2, x_119); -lean::cnstr_set(x_16, 0, x_92); -x_43 = x_16; -x_44 = x_95; -goto block_91; -} -else -{ -lean::free_heap_obj(x_16); -lean::dec(x_38); -x_43 = x_113; -x_44 = x_95; -goto block_91; -} -} -} -} -else -{ -uint8 x_120; -x_120 = lean::cnstr_get_scalar(x_96, sizeof(void*)*1); -if (x_120 == 0) -{ -obj* x_121; obj* x_122; obj* x_123; obj* x_124; -x_121 = lean::cnstr_get(x_96, 0); -lean::inc(x_121); -lean::dec(x_96); -x_122 = lean::cnstr_get(x_121, 2); -lean::inc(x_122); -lean::dec(x_121); -x_123 = l_mjoin___rarg___closed__1; -x_124 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_124, 0, x_122); -lean::closure_set(x_124, 1, x_123); -lean::cnstr_set(x_18, 0, x_124); -lean::cnstr_set(x_16, 2, x_18); -lean::cnstr_set(x_16, 0, x_92); -x_43 = x_16; -x_44 = x_95; -goto block_91; -} -else -{ -uint8 x_125; -lean::free_heap_obj(x_18); -lean::free_heap_obj(x_16); -lean::dec(x_38); -x_125 = !lean::is_exclusive(x_96); -if (x_125 == 0) -{ -x_43 = x_96; -x_44 = x_95; -goto block_91; -} -else -{ -obj* x_126; obj* x_127; -x_126 = lean::cnstr_get(x_96, 0); -lean::inc(x_126); -lean::dec(x_96); -x_127 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set_scalar(x_127, sizeof(void*)*1, x_120); -x_43 = x_127; -x_44 = x_95; -goto block_91; -} -} -} -block_91: -{ -if (lean::obj_tag(x_43) == 0) -{ -obj* x_45; -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -if (lean::obj_tag(x_45) == 0) -{ -uint8 x_46; -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -lean::dec(x_1); -x_46 = !lean::is_exclusive(x_43); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_47 = lean::cnstr_get(x_43, 2); -x_48 = lean::cnstr_get(x_43, 0); -lean::dec(x_48); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_42); -lean::cnstr_set(x_49, 1, x_5); -x_50 = l_List_reverse___rarg(x_49); -x_51 = l_Lean_Parser_noKind; -x_52 = l_Lean_Parser_Syntax_mkNode(x_51, x_50); -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_43, 2, x_53); -lean::cnstr_set(x_43, 0, x_52); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_47, x_43); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_54); -x_56 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_44); -return x_56; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_57 = lean::cnstr_get(x_43, 1); -x_58 = lean::cnstr_get(x_43, 2); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_43); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_42); -lean::cnstr_set(x_59, 1, x_5); -x_60 = l_List_reverse___rarg(x_59); -x_61 = l_Lean_Parser_noKind; -x_62 = l_Lean_Parser_Syntax_mkNode(x_61, x_60); -x_63 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_64 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set(x_64, 1, x_57); -lean::cnstr_set(x_64, 2, x_63); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_64); -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_65); -x_67 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_44); -return x_67; -} -} -else -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; -x_68 = lean::cnstr_get(x_43, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_43, 2); -lean::inc(x_69); -lean::dec(x_43); -x_70 = lean::cnstr_get(x_45, 0); -lean::inc(x_70); -lean::dec(x_45); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_42); -lean::cnstr_set(x_71, 1, x_5); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_70); -lean::cnstr_set(x_72, 1, x_71); -x_73 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_3, x_72, x_15, x_7, x_8, x_9, x_68, x_44); -lean::dec(x_15); -x_74 = !lean::is_exclusive(x_73); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; obj* x_77; -x_75 = lean::cnstr_get(x_73, 0); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_75); -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_76); -lean::cnstr_set(x_73, 0, x_77); -return x_73; -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_78 = lean::cnstr_get(x_73, 0); -x_79 = lean::cnstr_get(x_73, 1); -lean::inc(x_79); -lean::inc(x_78); -lean::dec(x_73); -x_80 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_78); -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_80); -x_82 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_79); -return x_82; -} -} -} -else -{ -uint8 x_83; -lean::dec(x_42); -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_83 = !lean::is_exclusive(x_43); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_43); -x_85 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_44); -return x_85; -} -else -{ -obj* x_86; uint8 x_87; obj* x_88; obj* x_89; obj* x_90; -x_86 = lean::cnstr_get(x_43, 0); -x_87 = lean::cnstr_get_scalar(x_43, sizeof(void*)*1); -lean::inc(x_86); -lean::dec(x_43); -x_88 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_88, 0, x_86); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_87); -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_88); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_44); -return x_90; -} -} -} -} -else -{ -obj* x_128; obj* x_129; obj* x_130; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; -x_128 = lean::cnstr_get(x_18, 0); -lean::inc(x_128); -lean::dec(x_18); -x_163 = lean::box(0); -lean::inc(x_2); -lean::inc(x_38); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -x_164 = lean::apply_5(x_2, x_7, x_8, x_9, x_38, x_17); -x_165 = lean::cnstr_get(x_164, 0); -lean::inc(x_165); -x_166 = lean::cnstr_get(x_164, 1); -lean::inc(x_166); -lean::dec(x_164); -x_167 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_165); -if (lean::obj_tag(x_167) == 0) -{ -obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; -x_168 = lean::cnstr_get(x_167, 0); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_167, 1); -lean::inc(x_169); -x_170 = lean::cnstr_get(x_167, 2); -lean::inc(x_170); -if (lean::is_exclusive(x_167)) { - lean::cnstr_release(x_167, 0); - lean::cnstr_release(x_167, 1); - lean::cnstr_release(x_167, 2); - x_171 = x_167; -} else { - lean::dec_ref(x_167); - x_171 = lean::box(0); -} -x_172 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_172, 0, x_168); -x_173 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_171)) { - x_174 = lean::alloc_cnstr(0, 3, 0); -} else { - x_174 = x_171; -} -lean::cnstr_set(x_174, 0, x_172); -lean::cnstr_set(x_174, 1, x_169); -lean::cnstr_set(x_174, 2, x_173); -x_175 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_170, x_174); -if (lean::obj_tag(x_175) == 0) -{ -lean::free_heap_obj(x_16); -lean::dec(x_38); -x_129 = x_175; -x_130 = x_166; -goto block_162; -} -else -{ -uint8 x_176; -x_176 = lean::cnstr_get_scalar(x_175, sizeof(void*)*1); -if (x_176 == 0) -{ -obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; -x_177 = lean::cnstr_get(x_175, 0); -lean::inc(x_177); -lean::dec(x_175); -x_178 = lean::cnstr_get(x_177, 2); -lean::inc(x_178); -lean::dec(x_177); -x_179 = l_mjoin___rarg___closed__1; -x_180 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_180, 0, x_178); -lean::closure_set(x_180, 1, x_179); -x_181 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_181, 0, x_180); -lean::cnstr_set(x_16, 2, x_181); -lean::cnstr_set(x_16, 0, x_163); -x_129 = x_16; -x_130 = x_166; -goto block_162; -} -else -{ -lean::free_heap_obj(x_16); -lean::dec(x_38); -x_129 = x_175; -x_130 = x_166; -goto block_162; -} -} -} -else -{ -uint8 x_182; -x_182 = lean::cnstr_get_scalar(x_167, sizeof(void*)*1); -if (x_182 == 0) -{ -obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; -x_183 = lean::cnstr_get(x_167, 0); -lean::inc(x_183); -lean::dec(x_167); -x_184 = lean::cnstr_get(x_183, 2); -lean::inc(x_184); -lean::dec(x_183); -x_185 = l_mjoin___rarg___closed__1; -x_186 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_186, 0, x_184); -lean::closure_set(x_186, 1, x_185); -x_187 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_187, 0, x_186); -lean::cnstr_set(x_16, 2, x_187); -lean::cnstr_set(x_16, 0, x_163); -x_129 = x_16; -x_130 = x_166; -goto block_162; -} -else -{ -obj* x_188; obj* x_189; obj* x_190; -lean::free_heap_obj(x_16); -lean::dec(x_38); -x_188 = lean::cnstr_get(x_167, 0); -lean::inc(x_188); -if (lean::is_exclusive(x_167)) { - lean::cnstr_release(x_167, 0); - x_189 = x_167; -} else { - lean::dec_ref(x_167); - x_189 = lean::box(0); -} -if (lean::is_scalar(x_189)) { - x_190 = lean::alloc_cnstr(1, 1, 1); -} else { - x_190 = x_189; -} -lean::cnstr_set(x_190, 0, x_188); -lean::cnstr_set_scalar(x_190, sizeof(void*)*1, x_182); -x_129 = x_190; -x_130 = x_166; -goto block_162; -} -} -block_162: -{ -if (lean::obj_tag(x_129) == 0) -{ -obj* x_131; -x_131 = lean::cnstr_get(x_129, 0); -lean::inc(x_131); -if (lean::obj_tag(x_131) == 0) -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -lean::dec(x_1); -x_132 = lean::cnstr_get(x_129, 1); -lean::inc(x_132); -x_133 = lean::cnstr_get(x_129, 2); -lean::inc(x_133); -if (lean::is_exclusive(x_129)) { - lean::cnstr_release(x_129, 0); - lean::cnstr_release(x_129, 1); - lean::cnstr_release(x_129, 2); - x_134 = x_129; -} else { - lean::dec_ref(x_129); - x_134 = lean::box(0); -} -x_135 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_135, 0, x_128); -lean::cnstr_set(x_135, 1, x_5); -x_136 = l_List_reverse___rarg(x_135); -x_137 = l_Lean_Parser_noKind; -x_138 = l_Lean_Parser_Syntax_mkNode(x_137, x_136); -x_139 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_134)) { - x_140 = lean::alloc_cnstr(0, 3, 0); -} else { - x_140 = x_134; -} -lean::cnstr_set(x_140, 0, x_138); -lean::cnstr_set(x_140, 1, x_132); -lean::cnstr_set(x_140, 2, x_139); -x_141 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_133, x_140); -x_142 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_141); -x_143 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_143, 0, x_142); -lean::cnstr_set(x_143, 1, x_130); -return x_143; -} -else -{ -obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; -x_144 = lean::cnstr_get(x_129, 1); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_129, 2); -lean::inc(x_145); -lean::dec(x_129); -x_146 = lean::cnstr_get(x_131, 0); -lean::inc(x_146); -lean::dec(x_131); -x_147 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_147, 0, x_128); -lean::cnstr_set(x_147, 1, x_5); -x_148 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_148, 0, x_146); -lean::cnstr_set(x_148, 1, x_147); -x_149 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_3, x_148, x_15, x_7, x_8, x_9, x_144, x_130); -lean::dec(x_15); -x_150 = lean::cnstr_get(x_149, 0); -lean::inc(x_150); -x_151 = lean::cnstr_get(x_149, 1); -lean::inc(x_151); -if (lean::is_exclusive(x_149)) { - lean::cnstr_release(x_149, 0); - lean::cnstr_release(x_149, 1); - x_152 = x_149; -} else { - lean::dec_ref(x_149); - x_152 = lean::box(0); -} -x_153 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_145, x_150); -x_154 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_153); -if (lean::is_scalar(x_152)) { - x_155 = lean::alloc_cnstr(0, 2, 0); -} else { - x_155 = x_152; -} -lean::cnstr_set(x_155, 0, x_154); -lean::cnstr_set(x_155, 1, x_151); -return x_155; -} -} -else -{ -obj* x_156; uint8 x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; -lean::dec(x_128); -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_156 = lean::cnstr_get(x_129, 0); -lean::inc(x_156); -x_157 = lean::cnstr_get_scalar(x_129, sizeof(void*)*1); -if (lean::is_exclusive(x_129)) { - lean::cnstr_release(x_129, 0); - x_158 = x_129; -} else { - lean::dec_ref(x_129); - x_158 = lean::box(0); -} -if (lean::is_scalar(x_158)) { - x_159 = lean::alloc_cnstr(1, 1, 1); -} else { - x_159 = x_158; -} -lean::cnstr_set(x_159, 0, x_156); -lean::cnstr_set_scalar(x_159, sizeof(void*)*1, x_157); -x_160 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_159); -x_161 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_161, 0, x_160); -lean::cnstr_set(x_161, 1, x_130); -return x_161; -} -} -} -} -else -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; obj* x_229; obj* x_230; obj* x_231; obj* x_232; obj* x_233; -x_191 = lean::cnstr_get(x_16, 1); -x_192 = lean::cnstr_get(x_16, 2); -lean::inc(x_192); -lean::inc(x_191); -lean::dec(x_16); -x_193 = lean::cnstr_get(x_18, 0); -lean::inc(x_193); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - x_194 = x_18; -} else { - lean::dec_ref(x_18); - x_194 = lean::box(0); -} -x_229 = lean::box(0); -lean::inc(x_2); -lean::inc(x_191); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -x_230 = lean::apply_5(x_2, x_7, x_8, x_9, x_191, x_17); -x_231 = lean::cnstr_get(x_230, 0); -lean::inc(x_231); -x_232 = lean::cnstr_get(x_230, 1); -lean::inc(x_232); -lean::dec(x_230); -x_233 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_231); -if (lean::obj_tag(x_233) == 0) -{ -obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; obj* x_241; -x_234 = lean::cnstr_get(x_233, 0); -lean::inc(x_234); -x_235 = lean::cnstr_get(x_233, 1); -lean::inc(x_235); -x_236 = lean::cnstr_get(x_233, 2); -lean::inc(x_236); -if (lean::is_exclusive(x_233)) { - lean::cnstr_release(x_233, 0); - lean::cnstr_release(x_233, 1); - lean::cnstr_release(x_233, 2); - x_237 = x_233; -} else { - lean::dec_ref(x_233); - x_237 = lean::box(0); -} -if (lean::is_scalar(x_194)) { - x_238 = lean::alloc_cnstr(1, 1, 0); -} else { - x_238 = x_194; -} -lean::cnstr_set(x_238, 0, x_234); -x_239 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_237)) { - x_240 = lean::alloc_cnstr(0, 3, 0); -} else { - x_240 = x_237; -} -lean::cnstr_set(x_240, 0, x_238); -lean::cnstr_set(x_240, 1, x_235); -lean::cnstr_set(x_240, 2, x_239); -x_241 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_236, x_240); -if (lean::obj_tag(x_241) == 0) -{ -lean::dec(x_191); -x_195 = x_241; -x_196 = x_232; -goto block_228; -} -else -{ -uint8 x_242; -x_242 = lean::cnstr_get_scalar(x_241, sizeof(void*)*1); -if (x_242 == 0) -{ -obj* x_243; obj* x_244; obj* x_245; obj* x_246; obj* x_247; obj* x_248; -x_243 = lean::cnstr_get(x_241, 0); -lean::inc(x_243); -lean::dec(x_241); -x_244 = lean::cnstr_get(x_243, 2); -lean::inc(x_244); -lean::dec(x_243); -x_245 = l_mjoin___rarg___closed__1; -x_246 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_246, 0, x_244); -lean::closure_set(x_246, 1, x_245); -x_247 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_247, 0, x_246); -x_248 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_248, 0, x_229); -lean::cnstr_set(x_248, 1, x_191); -lean::cnstr_set(x_248, 2, x_247); -x_195 = x_248; -x_196 = x_232; -goto block_228; -} -else -{ -lean::dec(x_191); -x_195 = x_241; -x_196 = x_232; -goto block_228; -} -} -} -else -{ -uint8 x_249; -x_249 = lean::cnstr_get_scalar(x_233, sizeof(void*)*1); -if (x_249 == 0) -{ -obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; -x_250 = lean::cnstr_get(x_233, 0); -lean::inc(x_250); -lean::dec(x_233); -x_251 = lean::cnstr_get(x_250, 2); -lean::inc(x_251); -lean::dec(x_250); -x_252 = l_mjoin___rarg___closed__1; -x_253 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_253, 0, x_251); -lean::closure_set(x_253, 1, x_252); -if (lean::is_scalar(x_194)) { - x_254 = lean::alloc_cnstr(1, 1, 0); -} else { - x_254 = x_194; -} -lean::cnstr_set(x_254, 0, x_253); -x_255 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_255, 0, x_229); -lean::cnstr_set(x_255, 1, x_191); -lean::cnstr_set(x_255, 2, x_254); -x_195 = x_255; -x_196 = x_232; -goto block_228; -} -else -{ -obj* x_256; obj* x_257; obj* x_258; -lean::dec(x_194); -lean::dec(x_191); -x_256 = lean::cnstr_get(x_233, 0); -lean::inc(x_256); -if (lean::is_exclusive(x_233)) { - lean::cnstr_release(x_233, 0); - x_257 = x_233; -} else { - lean::dec_ref(x_233); - x_257 = lean::box(0); -} -if (lean::is_scalar(x_257)) { - x_258 = lean::alloc_cnstr(1, 1, 1); -} else { - x_258 = x_257; -} -lean::cnstr_set(x_258, 0, x_256); -lean::cnstr_set_scalar(x_258, sizeof(void*)*1, x_249); -x_195 = x_258; -x_196 = x_232; -goto block_228; -} -} -block_228: -{ -if (lean::obj_tag(x_195) == 0) -{ -obj* x_197; -x_197 = lean::cnstr_get(x_195, 0); -lean::inc(x_197); -if (lean::obj_tag(x_197) == 0) -{ -obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_2); -lean::dec(x_1); -x_198 = lean::cnstr_get(x_195, 1); -lean::inc(x_198); -x_199 = lean::cnstr_get(x_195, 2); -lean::inc(x_199); -if (lean::is_exclusive(x_195)) { - lean::cnstr_release(x_195, 0); - lean::cnstr_release(x_195, 1); - lean::cnstr_release(x_195, 2); - x_200 = x_195; -} else { - lean::dec_ref(x_195); - x_200 = lean::box(0); -} -x_201 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_201, 0, x_193); -lean::cnstr_set(x_201, 1, x_5); -x_202 = l_List_reverse___rarg(x_201); -x_203 = l_Lean_Parser_noKind; -x_204 = l_Lean_Parser_Syntax_mkNode(x_203, x_202); -x_205 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_200)) { - x_206 = lean::alloc_cnstr(0, 3, 0); -} else { - x_206 = x_200; -} -lean::cnstr_set(x_206, 0, x_204); -lean::cnstr_set(x_206, 1, x_198); -lean::cnstr_set(x_206, 2, x_205); -x_207 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_199, x_206); -x_208 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_192, x_207); -x_209 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_209, 0, x_208); -lean::cnstr_set(x_209, 1, x_196); -return x_209; -} -else -{ -obj* x_210; obj* x_211; obj* x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; -x_210 = lean::cnstr_get(x_195, 1); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_195, 2); -lean::inc(x_211); -lean::dec(x_195); -x_212 = lean::cnstr_get(x_197, 0); -lean::inc(x_212); -lean::dec(x_197); -x_213 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_213, 0, x_193); -lean::cnstr_set(x_213, 1, x_5); -x_214 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_214, 0, x_212); -lean::cnstr_set(x_214, 1, x_213); -x_215 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_3, x_214, x_15, x_7, x_8, x_9, x_210, x_196); -lean::dec(x_15); -x_216 = lean::cnstr_get(x_215, 0); -lean::inc(x_216); -x_217 = lean::cnstr_get(x_215, 1); -lean::inc(x_217); -if (lean::is_exclusive(x_215)) { - lean::cnstr_release(x_215, 0); - lean::cnstr_release(x_215, 1); - x_218 = x_215; -} else { - lean::dec_ref(x_215); - x_218 = lean::box(0); -} -x_219 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_211, x_216); -x_220 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_192, x_219); -if (lean::is_scalar(x_218)) { - x_221 = lean::alloc_cnstr(0, 2, 0); -} else { - x_221 = x_218; -} -lean::cnstr_set(x_221, 0, x_220); -lean::cnstr_set(x_221, 1, x_217); -return x_221; -} -} -else -{ -obj* x_222; uint8 x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; -lean::dec(x_193); -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_222 = lean::cnstr_get(x_195, 0); -lean::inc(x_222); -x_223 = lean::cnstr_get_scalar(x_195, sizeof(void*)*1); -if (lean::is_exclusive(x_195)) { - lean::cnstr_release(x_195, 0); - x_224 = x_195; -} else { - lean::dec_ref(x_195); - x_224 = lean::box(0); -} -if (lean::is_scalar(x_224)) { - x_225 = lean::alloc_cnstr(1, 1, 1); -} else { - x_225 = x_224; -} -lean::cnstr_set(x_225, 0, x_222); -lean::cnstr_set_scalar(x_225, sizeof(void*)*1, x_223); -x_226 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_192, x_225); -x_227 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_227, 0, x_226); -lean::cnstr_set(x_227, 1, x_196); -return x_227; -} -} -} -} -} -else -{ -uint8 x_259; -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_259 = !lean::is_exclusive(x_16); -if (x_259 == 0) -{ -obj* x_260; -x_260 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_260, 0, x_16); -lean::cnstr_set(x_260, 1, x_17); -return x_260; -} -else -{ -obj* x_261; uint8 x_262; obj* x_263; obj* x_264; -x_261 = lean::cnstr_get(x_16, 0); -x_262 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); -lean::inc(x_261); -lean::dec(x_16); -x_263 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_263, 0, x_261); -lean::cnstr_set_scalar(x_263, sizeof(void*)*1, x_262); -x_264 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_264, 0, x_263); -lean::cnstr_set(x_264, 1, x_17); -return x_264; -} -} -} -block_373: -{ -if (lean::obj_tag(x_266) == 0) -{ -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -else -{ -obj* x_268; obj* x_269; -x_268 = lean::cnstr_get(x_266, 0); -lean::inc(x_268); -x_269 = lean::cnstr_get(x_268, 3); -lean::inc(x_269); -if (lean::obj_tag(x_269) == 0) -{ -uint8 x_270; -x_270 = !lean::is_exclusive(x_266); -if (x_270 == 0) -{ -uint8 x_271; obj* x_272; uint8 x_273; -x_271 = lean::cnstr_get_scalar(x_266, sizeof(void*)*1); -x_272 = lean::cnstr_get(x_266, 0); -lean::dec(x_272); -x_273 = !lean::is_exclusive(x_268); -if (x_273 == 0) -{ -obj* x_274; obj* x_275; obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; -x_274 = lean::cnstr_get(x_268, 3); -lean::dec(x_274); -x_275 = lean::box(3); -lean::inc(x_5); -x_276 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_276, 0, x_275); -lean::cnstr_set(x_276, 1, x_5); -x_277 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_277, 0, x_275); -lean::cnstr_set(x_277, 1, x_276); -x_278 = l_List_reverse___rarg(x_277); -x_279 = l_Lean_Parser_noKind; -x_280 = l_Lean_Parser_Syntax_mkNode(x_279, x_278); -x_281 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_281, 0, x_280); -lean::cnstr_set(x_268, 3, x_281); -if (x_271 == 0) -{ -uint8 x_282; -x_282 = 0; -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_282); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -else -{ -uint8 x_283; -x_283 = 1; -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_283); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -} -else -{ -obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; obj* x_294; -x_284 = lean::cnstr_get(x_268, 0); -x_285 = lean::cnstr_get(x_268, 1); -x_286 = lean::cnstr_get(x_268, 2); -lean::inc(x_286); -lean::inc(x_285); -lean::inc(x_284); -lean::dec(x_268); -x_287 = lean::box(3); -lean::inc(x_5); -x_288 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_288, 0, x_287); -lean::cnstr_set(x_288, 1, x_5); -x_289 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_289, 0, x_287); -lean::cnstr_set(x_289, 1, x_288); -x_290 = l_List_reverse___rarg(x_289); -x_291 = l_Lean_Parser_noKind; -x_292 = l_Lean_Parser_Syntax_mkNode(x_291, x_290); -x_293 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_293, 0, x_292); -x_294 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_294, 0, x_284); -lean::cnstr_set(x_294, 1, x_285); -lean::cnstr_set(x_294, 2, x_286); -lean::cnstr_set(x_294, 3, x_293); -if (x_271 == 0) -{ -uint8 x_295; -x_295 = 0; -lean::cnstr_set(x_266, 0, x_294); -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_295); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -else -{ -uint8 x_296; -x_296 = 1; -lean::cnstr_set(x_266, 0, x_294); -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_296); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -} -} -else -{ -uint8 x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; obj* x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; -x_297 = lean::cnstr_get_scalar(x_266, sizeof(void*)*1); -lean::dec(x_266); -x_298 = lean::cnstr_get(x_268, 0); -lean::inc(x_298); -x_299 = lean::cnstr_get(x_268, 1); -lean::inc(x_299); -x_300 = lean::cnstr_get(x_268, 2); -lean::inc(x_300); -if (lean::is_exclusive(x_268)) { - lean::cnstr_release(x_268, 0); - lean::cnstr_release(x_268, 1); - lean::cnstr_release(x_268, 2); - lean::cnstr_release(x_268, 3); - x_301 = x_268; -} else { - lean::dec_ref(x_268); - x_301 = lean::box(0); -} -x_302 = lean::box(3); -lean::inc(x_5); -x_303 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_303, 0, x_302); -lean::cnstr_set(x_303, 1, x_5); -x_304 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_304, 0, x_302); -lean::cnstr_set(x_304, 1, x_303); -x_305 = l_List_reverse___rarg(x_304); -x_306 = l_Lean_Parser_noKind; -x_307 = l_Lean_Parser_Syntax_mkNode(x_306, x_305); -x_308 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_308, 0, x_307); -if (lean::is_scalar(x_301)) { - x_309 = lean::alloc_cnstr(0, 4, 0); -} else { - x_309 = x_301; -} -lean::cnstr_set(x_309, 0, x_298); -lean::cnstr_set(x_309, 1, x_299); -lean::cnstr_set(x_309, 2, x_300); -lean::cnstr_set(x_309, 3, x_308); -if (x_297 == 0) -{ -uint8 x_310; obj* x_311; -x_310 = 0; -x_311 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_311, 0, x_309); -lean::cnstr_set_scalar(x_311, sizeof(void*)*1, x_310); -x_16 = x_311; -x_17 = x_267; -goto block_265; -} -else -{ -uint8 x_312; obj* x_313; -x_312 = 1; -x_313 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_313, 0, x_309); -lean::cnstr_set_scalar(x_313, sizeof(void*)*1, x_312); -x_16 = x_313; -x_17 = x_267; -goto block_265; -} -} -} -else -{ -uint8 x_314; -x_314 = !lean::is_exclusive(x_266); -if (x_314 == 0) -{ -uint8 x_315; obj* x_316; uint8 x_317; -x_315 = lean::cnstr_get_scalar(x_266, sizeof(void*)*1); -x_316 = lean::cnstr_get(x_266, 0); -lean::dec(x_316); -x_317 = !lean::is_exclusive(x_268); -if (x_317 == 0) -{ -obj* x_318; uint8 x_319; -x_318 = lean::cnstr_get(x_268, 3); -lean::dec(x_318); -x_319 = !lean::is_exclusive(x_269); -if (x_319 == 0) -{ -obj* x_320; obj* x_321; obj* x_322; obj* x_323; obj* x_324; obj* x_325; obj* x_326; -x_320 = lean::cnstr_get(x_269, 0); -lean::inc(x_5); -x_321 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_321, 0, x_320); -lean::cnstr_set(x_321, 1, x_5); -x_322 = lean::box(3); -x_323 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_323, 0, x_322); -lean::cnstr_set(x_323, 1, x_321); -x_324 = l_List_reverse___rarg(x_323); -x_325 = l_Lean_Parser_noKind; -x_326 = l_Lean_Parser_Syntax_mkNode(x_325, x_324); -lean::cnstr_set(x_269, 0, x_326); -if (x_315 == 0) -{ -uint8 x_327; -x_327 = 0; -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_327); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -else -{ -uint8 x_328; -x_328 = 1; -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_328); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -} -else -{ -obj* x_329; obj* x_330; obj* x_331; obj* x_332; obj* x_333; obj* x_334; obj* x_335; obj* x_336; -x_329 = lean::cnstr_get(x_269, 0); -lean::inc(x_329); -lean::dec(x_269); -lean::inc(x_5); -x_330 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_330, 0, x_329); -lean::cnstr_set(x_330, 1, x_5); -x_331 = lean::box(3); -x_332 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_332, 0, x_331); -lean::cnstr_set(x_332, 1, x_330); -x_333 = l_List_reverse___rarg(x_332); -x_334 = l_Lean_Parser_noKind; -x_335 = l_Lean_Parser_Syntax_mkNode(x_334, x_333); -x_336 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_336, 0, x_335); -lean::cnstr_set(x_268, 3, x_336); -if (x_315 == 0) -{ -uint8 x_337; -x_337 = 0; -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_337); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -else -{ -uint8 x_338; -x_338 = 1; -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_338); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -} -} -else -{ -obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; obj* x_344; obj* x_345; obj* x_346; obj* x_347; obj* x_348; obj* x_349; obj* x_350; obj* x_351; -x_339 = lean::cnstr_get(x_268, 0); -x_340 = lean::cnstr_get(x_268, 1); -x_341 = lean::cnstr_get(x_268, 2); -lean::inc(x_341); -lean::inc(x_340); -lean::inc(x_339); -lean::dec(x_268); -x_342 = lean::cnstr_get(x_269, 0); -lean::inc(x_342); -if (lean::is_exclusive(x_269)) { - lean::cnstr_release(x_269, 0); - x_343 = x_269; -} else { - lean::dec_ref(x_269); - x_343 = lean::box(0); -} -lean::inc(x_5); -x_344 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_344, 0, x_342); -lean::cnstr_set(x_344, 1, x_5); -x_345 = lean::box(3); -x_346 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_346, 0, x_345); -lean::cnstr_set(x_346, 1, x_344); -x_347 = l_List_reverse___rarg(x_346); -x_348 = l_Lean_Parser_noKind; -x_349 = l_Lean_Parser_Syntax_mkNode(x_348, x_347); -if (lean::is_scalar(x_343)) { - x_350 = lean::alloc_cnstr(1, 1, 0); -} else { - x_350 = x_343; -} -lean::cnstr_set(x_350, 0, x_349); -x_351 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_351, 0, x_339); -lean::cnstr_set(x_351, 1, x_340); -lean::cnstr_set(x_351, 2, x_341); -lean::cnstr_set(x_351, 3, x_350); -if (x_315 == 0) -{ -uint8 x_352; -x_352 = 0; -lean::cnstr_set(x_266, 0, x_351); -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_352); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -else -{ -uint8 x_353; -x_353 = 1; -lean::cnstr_set(x_266, 0, x_351); -lean::cnstr_set_scalar(x_266, sizeof(void*)*1, x_353); -x_16 = x_266; -x_17 = x_267; -goto block_265; -} -} -} -else -{ -uint8 x_354; obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; obj* x_364; obj* x_365; obj* x_366; obj* x_367; obj* x_368; -x_354 = lean::cnstr_get_scalar(x_266, sizeof(void*)*1); -lean::dec(x_266); -x_355 = lean::cnstr_get(x_268, 0); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_268, 1); -lean::inc(x_356); -x_357 = lean::cnstr_get(x_268, 2); -lean::inc(x_357); -if (lean::is_exclusive(x_268)) { - lean::cnstr_release(x_268, 0); - lean::cnstr_release(x_268, 1); - lean::cnstr_release(x_268, 2); - lean::cnstr_release(x_268, 3); - x_358 = x_268; -} else { - lean::dec_ref(x_268); - x_358 = lean::box(0); -} -x_359 = lean::cnstr_get(x_269, 0); -lean::inc(x_359); -if (lean::is_exclusive(x_269)) { - lean::cnstr_release(x_269, 0); - x_360 = x_269; -} else { - lean::dec_ref(x_269); - x_360 = lean::box(0); -} -lean::inc(x_5); -x_361 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_361, 0, x_359); -lean::cnstr_set(x_361, 1, x_5); -x_362 = lean::box(3); -x_363 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_363, 0, x_362); -lean::cnstr_set(x_363, 1, x_361); -x_364 = l_List_reverse___rarg(x_363); -x_365 = l_Lean_Parser_noKind; -x_366 = l_Lean_Parser_Syntax_mkNode(x_365, x_364); -if (lean::is_scalar(x_360)) { - x_367 = lean::alloc_cnstr(1, 1, 0); -} else { - x_367 = x_360; -} -lean::cnstr_set(x_367, 0, x_366); -if (lean::is_scalar(x_358)) { - x_368 = lean::alloc_cnstr(0, 4, 0); -} else { - x_368 = x_358; -} -lean::cnstr_set(x_368, 0, x_355); -lean::cnstr_set(x_368, 1, x_356); -lean::cnstr_set(x_368, 2, x_357); -lean::cnstr_set(x_368, 3, x_367); -if (x_354 == 0) -{ -uint8 x_369; obj* x_370; -x_369 = 0; -x_370 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_370, 0, x_368); -lean::cnstr_set_scalar(x_370, sizeof(void*)*1, x_369); -x_16 = x_370; -x_17 = x_267; -goto block_265; -} -else -{ -uint8 x_371; obj* x_372; -x_371 = 1; -x_372 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_372, 0, x_368); -lean::cnstr_set_scalar(x_372, sizeof(void*)*1, x_371); -x_16 = x_372; -x_17 = x_267; -goto block_265; -} -} -} -} -} -} -else -{ -obj* x_438; obj* x_439; obj* x_440; obj* x_441; -lean::dec(x_5); -lean::dec(x_2); -lean::dec(x_1); -x_438 = lean::box(0); -x_439 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_440 = l_mjoin___rarg___closed__1; -x_441 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_439, x_440, x_438, x_438, x_7, x_8, x_9, x_10, x_11); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -return x_441; -} -} -} -obj* l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, uint8 x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { -_start: -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint8 x_13; obj* x_14; uint8 x_15; -x_9 = l_String_OldIterator_remaining___main(x_7); -x_10 = lean::box(0); -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_add(x_9, x_11); -lean::dec(x_9); -x_13 = 1; -x_14 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_13, x_10, x_12, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_12); -x_15 = !lean::is_exclusive(x_14); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = lean::cnstr_get(x_14, 0); -x_17 = l_Lean_Parser_finishCommentBlock___closed__2; -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_16); -lean::cnstr_set(x_14, 0, x_18); -return x_14; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = lean::cnstr_get(x_14, 0); -x_20 = lean::cnstr_get(x_14, 1); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_14); -x_21 = l_Lean_Parser_finishCommentBlock___closed__2; -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_19); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_20); -return x_23; -} -} -} -obj* _init_l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_1 = lean::mk_string("("); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_nat_obj(0u); -x_5 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_4); -x_6 = lean::mk_string(", "); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_4); -lean::dec(x_6); -x_8 = l_Lean_Parser_Combinators_sepBy_tokens___rarg(x_5, x_7); -x_9 = lean::box(0); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_9); -lean::dec(x_8); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_10); -lean::dec(x_10); -lean::dec(x_7); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = lean::mk_string(" : "); -x_14 = l_Lean_Parser_symbol_tokens___rarg(x_13, x_4); -lean::dec(x_13); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_9); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_15); -lean::dec(x_15); -lean::dec(x_14); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_17, x_9); -lean::dec(x_17); -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_18); -lean::dec(x_18); -lean::dec(x_12); -x_20 = l_Lean_Parser_tokens___rarg(x_19); -lean::dec(x_19); -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_9); -lean::dec(x_20); -x_22 = l_Lean_Parser_tokens___rarg(x_21); -lean::dec(x_21); -x_23 = l_Lean_Parser_tokens___rarg(x_22); -lean::dec(x_22); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_23, x_9); -lean::dec(x_23); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_24); -lean::dec(x_24); -lean::dec(x_5); -x_26 = l_Lean_Parser_tokens___rarg(x_25); -lean::dec(x_25); -x_27 = l_Lean_Parser_tokens___rarg(x_26); -lean::dec(x_26); -x_28 = lean::mk_string(")"); -x_29 = l_Lean_Parser_symbol_tokens___rarg(x_28, x_4); -lean::dec(x_28); -x_30 = l_Lean_Parser_List_cons_tokens___rarg(x_29, x_9); -lean::dec(x_29); -x_31 = l_Lean_Parser_List_cons_tokens___rarg(x_27, x_30); -lean::dec(x_30); -lean::dec(x_27); -x_32 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_31); -lean::dec(x_31); -lean::dec(x_3); -x_33 = l_Lean_Parser_tokens___rarg(x_32); -lean::dec(x_32); -return x_33; -} -} -obj* l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2___boxed(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) { -_start: -{ -uint8 x_12; uint8 x_13; obj* x_14; -x_12 = lean::unbox(x_3); -lean::dec(x_3); -x_13 = lean::unbox(x_4); -lean::dec(x_4); -x_14 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_12, x_13, x_5, x_6, x_7, x_8, x_9, x_10, x_11); -lean::dec(x_6); -return x_14; -} -} -obj* l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed(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: -{ -uint8 x_9; obj* x_10; -x_9 = lean::unbox(x_3); -lean::dec(x_3); -x_10 = l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_9, x_4, x_5, x_6, x_7, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_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; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string(", "); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_6); -lean::closure_set(x_11, 2, x_10); -x_12 = 0; -x_13 = lean::box(x_12); -lean::inc(x_11); -lean::inc(x_7); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_14, 0, x_7); -lean::closure_set(x_14, 1, x_11); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_11); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_Term_tuple; -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_19, 0, x_18); -lean::closure_set(x_19, 1, x_17); -x_20 = lean::mk_string(" : "); -x_21 = l_String_trim(x_20); -lean::dec(x_20); -lean::inc(x_21); -x_22 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_22, 0, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_6); -lean::closure_set(x_23, 2, x_22); -lean::inc(x_7); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_7); -lean::cnstr_set(x_24, 1, x_15); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_Term_typed; -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_15); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_19); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_30, 0, x_29); -lean::closure_set(x_30, 1, x_6); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_15); -x_32 = l_Lean_Parser_Term_parenSpecial; -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_32); -lean::closure_set(x_33, 1, x_31); -x_34 = lean::box(x_12); -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_35, 0, x_33); -lean::closure_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_15); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_7); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_Term_parenContent; -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_39, 0, x_38); -lean::closure_set(x_39, 1, x_37); -x_40 = lean::box(x_12); -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_41, 0, x_39); -lean::closure_set(x_41, 1, x_40); -x_42 = lean::mk_string(")"); -x_43 = l_String_trim(x_42); -lean::dec(x_42); -lean::inc(x_43); -x_44 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_44, 0, x_43); -x_45 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_45, 0, x_43); -lean::closure_set(x_45, 1, x_6); -lean::closure_set(x_45, 2, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_15); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_41); -lean::cnstr_set(x_47, 1, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_5); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_Lean_Parser_TermParserM_Monad; -x_50 = l_Lean_Parser_TermParserM_MonadExcept; -x_51 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_52 = l_Lean_Parser_TermParserM_Alternative; -x_53 = l_Lean_Parser_Term_paren; -x_54 = l_Lean_Parser_Term_paren_HasView; -x_55 = l_Lean_Parser_Combinators_node_view___rarg(x_49, x_50, x_51, x_52, x_53, x_48, x_54); -lean::dec(x_48); -return x_55; -} -} -obj* _init_l_Lean_Parser_Term_paren_Parser___closed__1() { -_start: -{ -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; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string(", "); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_6); -lean::closure_set(x_11, 2, x_10); -x_12 = 0; -x_13 = lean::box(x_12); -lean::inc(x_11); -lean::inc(x_7); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_14, 0, x_7); -lean::closure_set(x_14, 1, x_11); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_11); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_Term_tuple; -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_19, 0, x_18); -lean::closure_set(x_19, 1, x_17); -x_20 = lean::mk_string(" : "); -x_21 = l_String_trim(x_20); -lean::dec(x_20); -lean::inc(x_21); -x_22 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_22, 0, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_6); -lean::closure_set(x_23, 2, x_22); -lean::inc(x_7); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_7); -lean::cnstr_set(x_24, 1, x_15); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_Term_typed; -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_15); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_19); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_30, 0, x_29); -lean::closure_set(x_30, 1, x_6); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_15); -x_32 = l_Lean_Parser_Term_parenSpecial; -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_32); -lean::closure_set(x_33, 1, x_31); -x_34 = lean::box(x_12); -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_35, 0, x_33); -lean::closure_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_15); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_7); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_Term_parenContent; -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_39, 0, x_38); -lean::closure_set(x_39, 1, x_37); -x_40 = lean::box(x_12); -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_41, 0, x_39); -lean::closure_set(x_41, 1, x_40); -x_42 = lean::mk_string(")"); -x_43 = l_String_trim(x_42); -lean::dec(x_42); -lean::inc(x_43); -x_44 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_44, 0, x_43); -x_45 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_45, 0, x_43); -lean::closure_set(x_45, 1, x_6); -lean::closure_set(x_45, 2, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_15); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_41); -lean::cnstr_set(x_47, 1, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_5); -lean::cnstr_set(x_48, 1, x_47); -return x_48; -} -} -obj* l_Lean_Parser_Term_paren_Parser(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; -x_6 = l_Lean_Parser_Term_paren; -x_7 = l_Lean_Parser_Term_paren_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_hole() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("hole"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_hole_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_Term_hole; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_Term_hole_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_hole_HasView_x27___elambda__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = l_Lean_Parser_Term_hole; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -} -obj* l_Lean_Parser_Term_hole_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_10; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -return x_10; -} -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; -x_13 = lean::box(0); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -else -{ -obj* x_17; -lean::dec(x_14); -x_17 = lean::box(0); -return x_17; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_hole_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_hole_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_hole_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_hole_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_hole_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_hole_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_hole_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::mk_string("_"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::mk_string("_"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = l_Lean_Parser_TermParserM_Monad; -x_9 = l_Lean_Parser_TermParserM_MonadExcept; -x_10 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_11 = l_Lean_Parser_TermParserM_Alternative; -x_12 = l_Lean_Parser_Term_hole; -x_13 = l_Lean_Parser_Term_hole_HasView; -x_14 = l_Lean_Parser_Combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); -lean::dec(x_7); -return x_14; -} -} -obj* _init_l_Lean_Parser_Term_hole_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::mk_string("_"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_Term_hole_Parser(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; -x_6 = l_Lean_Parser_Term_hole; -x_7 = l_Lean_Parser_Term_hole_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_sort() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("sort"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_Term_sort; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_Term_sort; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_Term_sort_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__1; -return x_4; -} -else -{ -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_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_sort; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_sort; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -} -obj* _init_l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("sort"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_sort_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__4; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -lean::dec(x_22); -if (x_30 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_13); -return x_32; -} -else -{ -obj* x_33; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_33 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__1; -return x_33; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_28, 0); -lean::inc(x_34); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_34); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_13); -return x_35; -} -else -{ -obj* x_36; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_36 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__2; -return x_36; -} -} -} -else -{ -obj* x_37; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_37 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_37; -} -} -} -} -} -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_13, 0); -lean::inc(x_38); -lean::dec(x_13); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -switch (lean::obj_tag(x_39)) { -case 0: -{ -obj* x_40; -lean::dec(x_38); -x_40 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_40; -} -case 1: -{ -obj* x_41; -lean::dec(x_39); -lean::dec(x_38); -x_41 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_41; -} -default: -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; uint8 x_46; -x_42 = lean::cnstr_get(x_38, 1); -lean::inc(x_42); -lean::dec(x_38); -x_43 = lean::cnstr_get(x_39, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_39, 1); -lean::inc(x_44); -lean::dec(x_39); -x_45 = lean::box(0); -x_46 = lean_name_dec_eq(x_43, x_45); -lean::dec(x_43); -if (x_46 == 0) -{ -obj* x_47; -lean::dec(x_44); -lean::dec(x_42); -x_47 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_47; -} -else -{ -if (lean::obj_tag(x_42) == 0) -{ -obj* x_48; -lean::dec(x_44); -x_48 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_48; -} -else -{ -obj* x_49; -x_49 = lean::cnstr_get(x_42, 1); -lean::inc(x_49); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; -x_50 = lean::cnstr_get(x_42, 0); -lean::inc(x_50); -lean::dec(x_42); -x_51 = lean::mk_nat_obj(0u); -x_52 = lean::nat_dec_eq(x_44, x_51); -lean::dec(x_44); -if (x_52 == 0) -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::cnstr_get(x_50, 0); -lean::inc(x_53); -lean::dec(x_50); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -else -{ -obj* x_56; -lean::dec(x_50); -x_56 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__1; -return x_56; -} -} -else -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; -x_57 = lean::cnstr_get(x_50, 0); -lean::inc(x_57); -lean::dec(x_50); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -return x_59; -} -else -{ -obj* x_60; -lean::dec(x_50); -x_60 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__2; -return x_60; -} -} -} -else -{ -obj* x_61; -lean::dec(x_49); -lean::dec(x_44); -lean::dec(x_42); -x_61 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_61; -} -} -} -} -} -} -} -} -else -{ -obj* x_62; -lean::dec(x_11); -lean::dec(x_6); -x_62 = l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3; -return x_62; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_sort_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sort_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sort_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_sort_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_sort_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_sort_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_sort_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = lean::mk_string("Sort"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_string("Type"); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_6); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string("Sort"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("Type"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::mk_nat_obj(0u); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_10); -x_16 = l_Lean_Parser_TermParserM_Monad; -x_17 = l_Lean_Parser_TermParserM_MonadExcept; -x_18 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_19 = l_Lean_Parser_TermParserM_Alternative; -x_20 = l_Lean_Parser_Term_sort; -x_21 = l_Lean_Parser_Term_sort_HasView; -x_22 = l_Lean_Parser_Combinators_node_view___rarg(x_16, x_17, x_18, x_19, x_20, x_15, x_21); -lean::dec(x_15); -return x_22; -} -} -obj* _init_l_Lean_Parser_Term_sort_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("Sort"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("Type"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::mk_nat_obj(0u); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_10); -return x_15; -} -} -obj* l_Lean_Parser_Term_sort_Parser(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; -x_6 = l_Lean_Parser_Term_sort; -x_7 = l_Lean_Parser_Term_sort_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_typeSpec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("typeSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_typeSpec; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_typeSpec; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_typeSpec_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_typeSpec_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_typeSpec_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string(" : "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::mk_string(" : "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_TermParserM_Monad; -x_11 = l_Lean_Parser_TermParserM_MonadExcept; -x_12 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_13 = l_Lean_Parser_TermParserM_Alternative; -x_14 = l_Lean_Parser_Term_typeSpec; -x_15 = l_Lean_Parser_Term_typeSpec_HasView; -x_16 = l_Lean_Parser_Combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); -lean::dec(x_9); -return x_16; -} -} -obj* _init_l_Lean_Parser_Term_typeSpec_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string(" : "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_typeSpec_Parser(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; -x_6 = l_Lean_Parser_Term_typeSpec; -x_7 = l_Lean_Parser_Term_typeSpec_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; obj* x_8; -x_1 = l_Lean_Parser_TermParserM_Monad; -x_2 = l_Lean_Parser_TermParserM_MonadExcept; -x_3 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_4 = l_Lean_Parser_TermParserM_Alternative; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_typeSpec_Parser), 5, 0); -x_6 = l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasView; -x_7 = 0; -x_8 = l_Lean_Parser_Combinators_optional_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_optType_Parser___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_typeSpec_Parser), 5, 0); -return x_1; -} -} -obj* l_Lean_Parser_Term_optType_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; obj* x_8; -x_6 = l_Lean_Parser_Term_optType_Parser___closed__1; -x_7 = 0; -x_8 = l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_optType_viewDefault() { -_start: -{ -obj* x_1; -x_1 = lean::box(0); -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binderIdent() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binderIdent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binderIdent_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_2); -x_6 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_2); -x_9 = l_Lean_Parser_Term_binderIdent; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -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; -x_11 = lean::cnstr_get(x_1, 0); -lean::inc(x_11); -lean::dec(x_1); -x_12 = l_Lean_Parser_Term_hole_HasView; -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_2); -x_16 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_2); -x_19 = l_Lean_Parser_Term_binderIdent; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binderIdent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__4; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_hole_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -if (lean::obj_tag(x_27) == 1) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_27, 0); -lean::inc(x_34); -lean::dec(x_27); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -else -{ -obj* x_36; -lean::dec(x_27); -x_36 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__2; -return x_36; -} -} -} -else -{ -obj* x_37; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_37 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_37; -} -} -} -} -} -} -} -else -{ -obj* x_38; -lean::dec(x_11); -lean::dec(x_6); -x_38 = l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3; -return x_38; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderIdent_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_binderIdent_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_1); -x_4 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -lean::dec(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_1); -lean::dec(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_hole_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_TermParserM_Monad; -x_10 = l_Lean_Parser_TermParserM_MonadExcept; -x_11 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_12 = l_Lean_Parser_TermParserM_Alternative; -x_13 = l_Lean_Parser_Term_binderIdent; -x_14 = l_Lean_Parser_Term_binderIdent_HasView; -x_15 = l_Lean_Parser_Combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -lean::dec(x_8); -return x_15; -} -} -obj* _init_l_Lean_Parser_Term_binderIdent_Parser___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_hole_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* l_Lean_Parser_Term_binderIdent_Parser(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; -x_6 = l_Lean_Parser_Term_binderIdent; -x_7 = l_Lean_Parser_Term_binderIdent_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_binderDefaultVal() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binderDefaultVal"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_binderDefaultVal; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_binderDefaultVal; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_binderDefaultVal_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_binderDefaultVal_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_binderDefaultVal_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binderDefaultTac() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binderDefaultTac"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_binderDefaultTac; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_binderDefaultTac; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_binderDefaultTac_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_binderDefaultTac_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_binderDefaultTac_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binderDefault() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binderDefault"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binderDefault_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_binderDefaultVal_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_binderDefault; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_binderDefaultTac_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_binderDefault; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_binderDefaultVal_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binderDefault"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_binderDefaultTac_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Term_binderDefaultVal_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_binderDefault_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefault_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_binderDefault_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_binderDefault_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -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::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -x_9 = lean::mk_string("."); -x_10 = l_Lean_Parser_symbol_tokens___rarg(x_9, x_2); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_6); -lean::dec(x_6); -lean::dec(x_10); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_5); -lean::dec(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_13); -lean::dec(x_13); -lean::dec(x_8); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_5); -lean::dec(x_15); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -return x_17; -} -} -obj* _init_l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_1 = lean::mk_string(":="); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -lean::inc(x_8); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_Term_binderDefaultVal; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_11, 0, x_10); -lean::closure_set(x_11, 1, x_9); -x_12 = lean::mk_string("."); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_4); -lean::closure_set(x_15, 2, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_8); -x_17 = l_Lean_Parser_Term_binderDefaultTac; -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_18, 0, x_17); -lean::closure_set(x_18, 1, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_7); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_11); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_21, 0, x_20); -lean::closure_set(x_21, 1, x_4); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_7); -x_23 = l_Lean_Parser_TermParserM_Monad; -x_24 = l_Lean_Parser_TermParserM_MonadExcept; -x_25 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_26 = l_Lean_Parser_TermParserM_Alternative; -x_27 = l_Lean_Parser_Term_binderDefault; -x_28 = l_Lean_Parser_Term_binderDefault_HasView; -x_29 = l_Lean_Parser_Combinators_node_view___rarg(x_23, x_24, x_25, x_26, x_27, x_22, x_28); -lean::dec(x_22); -return x_29; -} -} -obj* _init_l_Lean_Parser_Term_binderDefault_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string(":="); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -lean::inc(x_8); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_Term_binderDefaultVal; -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_11, 0, x_10); -lean::closure_set(x_11, 1, x_9); -x_12 = lean::mk_string("."); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_4); -lean::closure_set(x_15, 2, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_8); -x_17 = l_Lean_Parser_Term_binderDefaultTac; -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_18, 0, x_17); -lean::closure_set(x_18, 1, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_7); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_11); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_21, 0, x_20); -lean::closure_set(x_21, 1, x_4); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_7); -return x_22; -} -} -obj* l_Lean_Parser_Term_binderDefault_Parser(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; -x_6 = l_Lean_Parser_Term_binderDefault; -x_7 = l_Lean_Parser_Term_binderDefault_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_binderContent___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binderContent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binderContent(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_binderContent___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Term_binderContent___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_binderContent(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Term_binderIdent_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -lean::inc(x_3); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3() { -_start: -{ -uint8 x_1; obj* x_2; -x_1 = 0; -x_2 = l_Lean_Parser_Term_binderContent(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__1; -x_6 = l_List_map___main___rarg(x_5, x_2); -x_7 = l_Lean_Parser_noKind; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::box(0); -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_14 = lean::cnstr_get(x_4, 0); -lean::inc(x_14); -lean::dec(x_4); -x_15 = l_Lean_Parser_Term_binderDefault_HasView; -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -x_19 = l_Lean_Parser_Syntax_mkNode(x_7, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_9); -x_21 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_8); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3; -x_25 = l_Lean_Parser_Syntax_mkNode(x_24, x_23); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_3, 0); -lean::inc(x_26); -lean::dec(x_3); -x_27 = l_Lean_Parser_Term_typeSpec_HasView; -x_28 = lean::cnstr_get(x_27, 1); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_9); -x_31 = l_Lean_Parser_Syntax_mkNode(x_7, x_30); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_8); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -else -{ -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; -x_37 = lean::cnstr_get(x_4, 0); -lean::inc(x_37); -lean::dec(x_4); -x_38 = l_Lean_Parser_Term_binderDefault_HasView; -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -x_40 = lean::apply_1(x_39, x_37); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_9); -x_42 = l_Lean_Parser_Syntax_mkNode(x_7, 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_9); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_31); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_8); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3; -x_47 = l_Lean_Parser_Syntax_mkNode(x_46, x_45); -return x_47; -} -} -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_binderDefault_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_typeSpec_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_Term_binderIdent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Term_binderIdent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_58; obj* x_59; -x_58 = lean::box(3); -x_59 = l_Lean_Parser_Syntax_asNode___main(x_58); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; -x_60 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3; -x_1 = x_60; -goto block_57; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_61 = lean::cnstr_get(x_59, 0); -lean::inc(x_61); -lean::dec(x_59); -x_62 = lean::cnstr_get(x_61, 1); -lean::inc(x_62); -lean::dec(x_61); -x_63 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4; -x_64 = l_List_map___main___rarg(x_63, x_62); -x_1 = x_64; -goto block_57; -} -block_57: -{ -obj* x_2; obj* x_34; obj* x_35; -x_34 = lean::box(3); -x_35 = l_Lean_Parser_Syntax_asNode___main(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -x_36 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_2 = x_36; -goto block_33; -} -else -{ -uint8 x_37; -x_37 = !lean::is_exclusive(x_35); -if (x_37 == 0) -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_35, 0); -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -lean::dec(x_38); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; -lean::free_heap_obj(x_35); -x_40 = lean::box(0); -x_2 = x_40; -goto block_33; -} -else -{ -obj* x_41; -x_41 = lean::cnstr_get(x_39, 1); -lean::inc(x_41); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_42 = lean::cnstr_get(x_39, 0); -lean::inc(x_42); -lean::dec(x_39); -x_43 = l_Lean_Parser_Term_typeSpec_HasView; -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -x_45 = lean::apply_1(x_44, x_42); -lean::cnstr_set(x_35, 0, x_45); -x_2 = x_35; -goto block_33; -} -else -{ -obj* x_46; -lean::dec(x_41); -lean::dec(x_39); -lean::free_heap_obj(x_35); -x_46 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_2 = x_46; -goto block_33; -} -} -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_35, 0); -lean::inc(x_47); -lean::dec(x_35); -x_48 = lean::cnstr_get(x_47, 1); -lean::inc(x_48); -lean::dec(x_47); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_49; -x_49 = lean::box(0); -x_2 = x_49; -goto block_33; -} -else -{ -obj* x_50; -x_50 = lean::cnstr_get(x_48, 1); -lean::inc(x_50); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_51 = lean::cnstr_get(x_48, 0); -lean::inc(x_51); -lean::dec(x_48); -x_52 = l_Lean_Parser_Term_typeSpec_HasView; -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -x_54 = lean::apply_1(x_53, x_51); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -x_2 = x_55; -goto block_33; -} -else -{ -obj* x_56; -lean::dec(x_50); -lean::dec(x_48); -x_56 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_2 = x_56; -goto block_33; -} -} -} -} -block_33: -{ -obj* x_3; obj* x_4; -x_3 = lean::box(3); -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_2); -lean::cnstr_set(x_6, 2, x_5); -return x_6; -} -else -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_4); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_4, 0); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; -lean::free_heap_obj(x_4); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_2); -lean::cnstr_set(x_11, 2, x_10); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = l_Lean_Parser_Term_binderDefault_HasView; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -lean::cnstr_set(x_4, 0, x_16); -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_2); -lean::cnstr_set(x_17, 2, x_4); -return x_17; -} -else -{ -obj* x_18; obj* x_19; -lean::dec(x_12); -lean::dec(x_9); -lean::free_heap_obj(x_4); -x_18 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_1); -lean::cnstr_set(x_19, 1, x_2); -lean::cnstr_set(x_19, 2, x_18); -return x_19; -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_4, 0); -lean::inc(x_20); -lean::dec(x_4); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_1); -lean::cnstr_set(x_23, 1, x_2); -lean::cnstr_set(x_23, 2, x_22); -return x_23; -} -else -{ -obj* x_24; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_21, 0); -lean::inc(x_25); -lean::dec(x_21); -x_26 = l_Lean_Parser_Term_binderDefault_HasView; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::apply_1(x_27, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_30, 0, x_1); -lean::cnstr_set(x_30, 1, x_2); -lean::cnstr_set(x_30, 2, x_29); -return x_30; -} -else -{ -obj* x_31; obj* x_32; -lean::dec(x_24); -lean::dec(x_21); -x_31 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_1); -lean::cnstr_set(x_32, 1, x_2); -lean::cnstr_set(x_32, 2, x_31); -return x_32; -} -} -} -} -} -} -} -} -obj* l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_115; -x_115 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_115) == 0) -{ -obj* x_116; -x_116 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__5; -return x_116; -} -else -{ -obj* x_117; obj* x_118; -x_117 = lean::cnstr_get(x_115, 0); -lean::inc(x_117); -lean::dec(x_115); -x_118 = lean::cnstr_get(x_117, 1); -lean::inc(x_118); -lean::dec(x_117); -if (lean::obj_tag(x_118) == 0) -{ -obj* x_119; -x_119 = lean::box(3); -x_2 = x_118; -x_3 = x_119; -goto block_114; -} -else -{ -obj* x_120; obj* x_121; -x_120 = lean::cnstr_get(x_118, 0); -lean::inc(x_120); -x_121 = lean::cnstr_get(x_118, 1); -lean::inc(x_121); -lean::dec(x_118); -x_2 = x_121; -x_3 = x_120; -goto block_114; -} -} -block_114: -{ -obj* x_4; obj* x_108; -x_108 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_108) == 0) -{ -obj* x_109; -x_109 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3; -x_4 = x_109; -goto block_107; -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_110 = lean::cnstr_get(x_108, 0); -lean::inc(x_110); -lean::dec(x_108); -x_111 = lean::cnstr_get(x_110, 1); -lean::inc(x_111); -lean::dec(x_110); -x_112 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4; -x_113 = l_List_map___main___rarg(x_112, x_111); -x_4 = x_113; -goto block_107; -} -block_107: -{ -obj* x_5; obj* x_37; obj* x_38; obj* x_69; obj* x_70; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_104; -x_104 = lean::box(3); -x_69 = x_2; -x_70 = x_104; -goto block_103; -} -else -{ -obj* x_105; obj* x_106; -x_105 = lean::cnstr_get(x_2, 0); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_2, 1); -lean::inc(x_106); -lean::dec(x_2); -x_69 = x_106; -x_70 = x_105; -goto block_103; -} -block_36: -{ -obj* x_6; obj* x_7; -x_6 = lean::box(3); -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; -x_8 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_7); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_7, 0); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; -lean::free_heap_obj(x_7); -x_13 = lean::box(0); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_4); -lean::cnstr_set(x_14, 1, x_5); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -else -{ -obj* x_15; -x_15 = lean::cnstr_get(x_12, 1); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = lean::cnstr_get(x_12, 0); -lean::inc(x_16); -lean::dec(x_12); -x_17 = l_Lean_Parser_Term_binderDefault_HasView; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -x_19 = lean::apply_1(x_18, x_16); -lean::cnstr_set(x_7, 0, x_19); -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_5); -lean::cnstr_set(x_20, 2, x_7); -return x_20; -} -else -{ -obj* x_21; obj* x_22; -lean::dec(x_15); -lean::dec(x_12); -lean::free_heap_obj(x_7); -x_21 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_4); -lean::cnstr_set(x_22, 1, x_5); -lean::cnstr_set(x_22, 2, x_21); -return x_22; -} -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_7, 0); -lean::inc(x_23); -lean::dec(x_7); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::box(0); -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_5); -lean::cnstr_set(x_26, 2, x_25); -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_28 = lean::cnstr_get(x_24, 0); -lean::inc(x_28); -lean::dec(x_24); -x_29 = l_Lean_Parser_Term_binderDefault_HasView; -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::apply_1(x_30, x_28); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_5); -lean::cnstr_set(x_33, 2, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; -lean::dec(x_27); -lean::dec(x_24); -x_34 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_35 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_35, 0, x_4); -lean::cnstr_set(x_35, 1, x_5); -lean::cnstr_set(x_35, 2, x_34); -return x_35; -} -} -} -} -} -block_68: -{ -obj* x_39; -x_39 = l_Lean_Parser_Syntax_asNode___main(x_38); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; -x_40 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_4); -lean::cnstr_set(x_41, 1, x_37); -lean::cnstr_set(x_41, 2, x_40); -return x_41; -} -else -{ -uint8 x_42; -x_42 = !lean::is_exclusive(x_39); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_39, 0); -x_44 = lean::cnstr_get(x_43, 1); -lean::inc(x_44); -lean::dec(x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; -lean::free_heap_obj(x_39); -x_45 = lean::box(0); -x_46 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_46, 0, x_4); -lean::cnstr_set(x_46, 1, x_37); -lean::cnstr_set(x_46, 2, x_45); -return x_46; -} -else -{ -obj* x_47; -x_47 = lean::cnstr_get(x_44, 1); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_48 = lean::cnstr_get(x_44, 0); -lean::inc(x_48); -lean::dec(x_44); -x_49 = l_Lean_Parser_Term_binderDefault_HasView; -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_51 = lean::apply_1(x_50, x_48); -lean::cnstr_set(x_39, 0, x_51); -x_52 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_52, 0, x_4); -lean::cnstr_set(x_52, 1, x_37); -lean::cnstr_set(x_52, 2, x_39); -return x_52; -} -else -{ -obj* x_53; obj* x_54; -lean::dec(x_47); -lean::dec(x_44); -lean::free_heap_obj(x_39); -x_53 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_54 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_54, 0, x_4); -lean::cnstr_set(x_54, 1, x_37); -lean::cnstr_set(x_54, 2, x_53); -return x_54; -} -} -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_39, 0); -lean::inc(x_55); -lean::dec(x_39); -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -lean::dec(x_55); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; -x_57 = lean::box(0); -x_58 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_58, 0, x_4); -lean::cnstr_set(x_58, 1, x_37); -lean::cnstr_set(x_58, 2, x_57); -return x_58; -} -else -{ -obj* x_59; -x_59 = lean::cnstr_get(x_56, 1); -lean::inc(x_59); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_60 = lean::cnstr_get(x_56, 0); -lean::inc(x_60); -lean::dec(x_56); -x_61 = l_Lean_Parser_Term_binderDefault_HasView; -x_62 = lean::cnstr_get(x_61, 0); -lean::inc(x_62); -x_63 = lean::apply_1(x_62, x_60); -x_64 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_64, 0, x_63); -x_65 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_65, 0, x_4); -lean::cnstr_set(x_65, 1, x_37); -lean::cnstr_set(x_65, 2, x_64); -return x_65; -} -else -{ -obj* x_66; obj* x_67; -lean::dec(x_59); -lean::dec(x_56); -x_66 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1; -x_67 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_67, 0, x_4); -lean::cnstr_set(x_67, 1, x_37); -lean::cnstr_set(x_67, 2, x_66); -return x_67; -} -} -} -} -} -block_103: -{ -obj* x_71; -x_71 = l_Lean_Parser_Syntax_asNode___main(x_70); -if (lean::obj_tag(x_71) == 0) -{ -if (lean::obj_tag(x_69) == 0) -{ -obj* x_72; -x_72 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_5 = x_72; -goto block_36; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_69, 0); -lean::inc(x_73); -lean::dec(x_69); -x_74 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_37 = x_74; -x_38 = x_73; -goto block_68; -} -} -else -{ -uint8 x_75; -x_75 = !lean::is_exclusive(x_71); -if (x_75 == 0) -{ -obj* x_76; obj* x_77; -x_76 = lean::cnstr_get(x_71, 0); -x_77 = lean::cnstr_get(x_76, 1); -lean::inc(x_77); -lean::dec(x_76); -if (lean::obj_tag(x_77) == 0) -{ -obj* x_78; -lean::free_heap_obj(x_71); -x_78 = lean::box(0); -if (lean::obj_tag(x_69) == 0) -{ -x_5 = x_78; -goto block_36; -} -else -{ -obj* x_79; -x_79 = lean::cnstr_get(x_69, 0); -lean::inc(x_79); -lean::dec(x_69); -x_37 = x_78; -x_38 = x_79; -goto block_68; -} -} -else -{ -obj* x_80; -x_80 = lean::cnstr_get(x_77, 1); -lean::inc(x_80); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; -x_81 = lean::cnstr_get(x_77, 0); -lean::inc(x_81); -lean::dec(x_77); -x_82 = l_Lean_Parser_Term_typeSpec_HasView; -x_83 = lean::cnstr_get(x_82, 0); -lean::inc(x_83); -x_84 = lean::apply_1(x_83, x_81); -lean::cnstr_set(x_71, 0, x_84); -if (lean::obj_tag(x_69) == 0) -{ -x_5 = x_71; -goto block_36; -} -else -{ -obj* x_85; -x_85 = lean::cnstr_get(x_69, 0); -lean::inc(x_85); -lean::dec(x_69); -x_37 = x_71; -x_38 = x_85; -goto block_68; -} -} -else -{ -lean::dec(x_80); -lean::dec(x_77); -lean::free_heap_obj(x_71); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_86; -x_86 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_5 = x_86; -goto block_36; -} -else -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_69, 0); -lean::inc(x_87); -lean::dec(x_69); -x_88 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_37 = x_88; -x_38 = x_87; -goto block_68; -} -} -} -} -else -{ -obj* x_89; obj* x_90; -x_89 = lean::cnstr_get(x_71, 0); -lean::inc(x_89); -lean::dec(x_71); -x_90 = lean::cnstr_get(x_89, 1); -lean::inc(x_90); -lean::dec(x_89); -if (lean::obj_tag(x_90) == 0) -{ -obj* x_91; -x_91 = lean::box(0); -if (lean::obj_tag(x_69) == 0) -{ -x_5 = x_91; -goto block_36; -} -else -{ -obj* x_92; -x_92 = lean::cnstr_get(x_69, 0); -lean::inc(x_92); -lean::dec(x_69); -x_37 = x_91; -x_38 = x_92; -goto block_68; -} -} -else -{ -obj* x_93; -x_93 = lean::cnstr_get(x_90, 1); -lean::inc(x_93); -if (lean::obj_tag(x_93) == 0) -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_94 = lean::cnstr_get(x_90, 0); -lean::inc(x_94); -lean::dec(x_90); -x_95 = l_Lean_Parser_Term_typeSpec_HasView; -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::apply_1(x_96, x_94); -x_98 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -if (lean::obj_tag(x_69) == 0) -{ -x_5 = x_98; -goto block_36; -} -else -{ -obj* x_99; -x_99 = lean::cnstr_get(x_69, 0); -lean::inc(x_99); -lean::dec(x_69); -x_37 = x_98; -x_38 = x_99; -goto block_68; -} -} -else -{ -lean::dec(x_93); -lean::dec(x_90); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_100; -x_100 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_5 = x_100; -goto block_36; -} -else -{ -obj* x_101; obj* x_102; -x_101 = lean::cnstr_get(x_69, 0); -lean::inc(x_101); -lean::dec(x_69); -x_102 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_37 = x_102; -x_38 = x_101; -goto block_68; -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1), 1, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_HasView_x27___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_Term_binderContent_HasView_x27(uint8 x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = l_Lean_Parser_Term_binderContent_HasView_x27___closed__1; -x_3 = l_Lean_Parser_Term_binderContent_HasView_x27___closed__2; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Term_binderContent_HasView_x27___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_binderContent_HasView_x27(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_binderContent_HasView(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_binderContent_HasView_x27(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_binderContent_HasView___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_binderContent_HasView(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens; -x_4 = l_Lean_Parser_tokens___rarg(x_3); -x_5 = l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_tokens___rarg(x_5); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_7); -lean::dec(x_6); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_8); -lean::dec(x_8); -lean::dec(x_4); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_9); -lean::dec(x_9); -lean::dec(x_2); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -return x_11; -} -} -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__1() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderDefault_Parser), 5, 0); -x_2 = 0; -x_3 = lean::box(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderIdent_Parser), 5, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__2), 6, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__3() { -_start: -{ -uint8 x_1; obj* x_2; -x_1 = 0; -x_2 = l_Lean_Parser_Term_binderContent_HasView_x27(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView(uint8 x_1) { -_start: -{ -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; -x_2 = l_Lean_Parser_Term_optType_Parser___closed__1; -x_3 = lean::box(x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -x_5 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__1; -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__2; -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_6); -x_9 = l_Lean_Parser_TermParserM_Monad; -x_10 = l_Lean_Parser_TermParserM_MonadExcept; -x_11 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_12 = l_Lean_Parser_TermParserM_Alternative; -x_13 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3; -x_14 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__3; -x_15 = l_Lean_Parser_Combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -lean::dec(x_8); -return x_15; -} -} -obj* l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_binderContent_Parser(uint8 x_1, obj* 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; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_7 = l_Lean_Parser_Term_optType_Parser___closed__1; -x_8 = lean::box(x_1); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__1; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__2; -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 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3; -x_15 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_14, x_13, x_2, x_3, x_4, x_5, x_6); -return x_15; -} -} -obj* l_Lean_Parser_Term_binderContent_Parser___boxed(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_1); -lean::dec(x_1); -x_8 = l_Lean_Parser_Term_binderContent_Parser(x_7, x_2, x_3, x_4, x_5, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_simpleExplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("simpleExplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_1, 3); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -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_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_simpleExplicitBinder; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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; -x_17 = lean::cnstr_get(x_6, 0); -lean::inc(x_17); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_8); -lean::inc(x_5); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_5); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_7); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Term_simpleExplicitBinder; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_4, 0); -lean::inc(x_27); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_29 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_5); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_7); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -x_35 = l_Lean_Parser_Term_simpleExplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -else -{ -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; -x_37 = lean::cnstr_get(x_6, 0); -lean::inc(x_37); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, 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_8); -lean::inc(x_5); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_5); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_28); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_7); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::box(3); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_42); -x_45 = l_Lean_Parser_Term_simpleExplicitBinder; -x_46 = l_Lean_Parser_Syntax_mkNode(x_45, x_44); -return x_46; -} -} -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_2, 0); -lean::inc(x_47); -x_48 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_48, 0, x_47); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_49 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_5); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::box(3); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_50); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_7); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_48); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_Term_simpleExplicitBinder; -x_56 = l_Lean_Parser_Syntax_mkNode(x_55, x_54); -return x_56; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_57 = lean::cnstr_get(x_6, 0); -lean::inc(x_57); -x_58 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_8); -lean::inc(x_5); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_5); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::box(3); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_60); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_7); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_48); -lean::cnstr_set(x_64, 1, x_63); -x_65 = l_Lean_Parser_Term_simpleExplicitBinder; -x_66 = l_Lean_Parser_Syntax_mkNode(x_65, x_64); -return x_66; -} -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_4, 0); -lean::inc(x_67); -x_68 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_5); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_68); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_7); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_48); -lean::cnstr_set(x_73, 1, x_72); -x_74 = l_Lean_Parser_Term_simpleExplicitBinder; -x_75 = l_Lean_Parser_Syntax_mkNode(x_74, x_73); -return x_75; -} -else -{ -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_76 = lean::cnstr_get(x_6, 0); -lean::inc(x_76); -x_77 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_77, 0, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_8); -lean::inc(x_5); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_5); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_68); -lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_7); -lean::cnstr_set(x_81, 1, x_80); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_48); -lean::cnstr_set(x_82, 1, x_81); -x_83 = l_Lean_Parser_Term_simpleExplicitBinder; -x_84 = l_Lean_Parser_Syntax_mkNode(x_83, x_82); -return x_84; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::box(3); -x_4 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_1); -lean::cnstr_set(x_4, 3, x_3); -lean::cnstr_set(x_4, 4, x_1); -return x_4; -} -} -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_50; -x_50 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; -x_51 = l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1___closed__1; -return x_51; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = lean::box(3); -x_2 = x_53; -x_3 = x_54; -goto block_49; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -lean::dec(x_53); -x_2 = x_56; -x_3 = x_55; -goto block_49; -} -} -block_49: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_3, 0); -lean::inc(x_46); -lean::dec(x_3); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -x_4 = x_47; -goto block_45; -} -else -{ -obj* x_48; -lean::dec(x_3); -x_48 = lean::box(0); -x_4 = x_48; -goto block_45; -} -block_45: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_42; -x_42 = lean::box(3); -x_5 = x_2; -x_6 = x_42; -goto block_41; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_2, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_2, 1); -lean::inc(x_44); -lean::dec(x_2); -x_5 = x_44; -x_6 = x_43; -goto block_41; -} -block_41: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -obj* x_39; -x_39 = lean::cnstr_get(x_6, 0); -lean::inc(x_39); -lean::dec(x_6); -x_7 = x_39; -goto block_38; -} -else -{ -obj* x_40; -lean::dec(x_6); -x_40 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = x_40; -goto block_38; -} -block_38: -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_20; obj* x_21; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_20 = x_5; -x_21 = x_35; -goto block_34; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_5, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_20 = x_37; -x_21 = x_36; -goto block_34; -} -block_19: -{ -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_7); -lean::cnstr_set(x_12, 2, x_8); -lean::cnstr_set(x_12, 3, x_9); -lean::cnstr_set(x_12, 4, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_7); -lean::cnstr_set(x_16, 2, x_8); -lean::cnstr_set(x_16, 3, x_9); -lean::cnstr_set(x_16, 4, x_15); -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_7); -lean::cnstr_set(x_18, 2, x_8); -lean::cnstr_set(x_18, 3, x_9); -lean::cnstr_set(x_18, 4, x_17); -return x_18; -} -} -} -block_34: -{ -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::box(0); -x_25 = lean::box(3); -x_26 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_23); -lean::cnstr_set(x_26, 3, x_25); -lean::cnstr_set(x_26, 4, x_24); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_20, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_20, 1); -lean::inc(x_28); -lean::dec(x_20); -x_8 = x_23; -x_9 = x_27; -x_10 = x_28; -goto block_19; -} -} -else -{ -obj* x_29; -lean::dec(x_21); -x_29 = lean::box(0); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::box(3); -x_31 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_29); -lean::cnstr_set(x_31, 3, x_30); -lean::cnstr_set(x_31, 4, x_29); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_20, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_20, 1); -lean::inc(x_33); -lean::dec(x_20); -x_8 = x_29; -x_9 = x_32; -x_10 = x_33; -goto block_19; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_simpleExplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_simpleImplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("simpleImplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_1, 3); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -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_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_simpleImplicitBinder; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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; -x_17 = lean::cnstr_get(x_6, 0); -lean::inc(x_17); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_8); -lean::inc(x_5); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_5); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_7); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Term_simpleImplicitBinder; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_4, 0); -lean::inc(x_27); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_29 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_5); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_7); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -x_35 = l_Lean_Parser_Term_simpleImplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -else -{ -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; -x_37 = lean::cnstr_get(x_6, 0); -lean::inc(x_37); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, 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_8); -lean::inc(x_5); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_5); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_28); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_7); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::box(3); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_42); -x_45 = l_Lean_Parser_Term_simpleImplicitBinder; -x_46 = l_Lean_Parser_Syntax_mkNode(x_45, x_44); -return x_46; -} -} -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_2, 0); -lean::inc(x_47); -x_48 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_48, 0, x_47); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_49 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_5); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::box(3); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_50); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_7); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_48); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_Term_simpleImplicitBinder; -x_56 = l_Lean_Parser_Syntax_mkNode(x_55, x_54); -return x_56; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_57 = lean::cnstr_get(x_6, 0); -lean::inc(x_57); -x_58 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_8); -lean::inc(x_5); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_5); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::box(3); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_60); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_7); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_48); -lean::cnstr_set(x_64, 1, x_63); -x_65 = l_Lean_Parser_Term_simpleImplicitBinder; -x_66 = l_Lean_Parser_Syntax_mkNode(x_65, x_64); -return x_66; -} -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_4, 0); -lean::inc(x_67); -x_68 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_5); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_68); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_7); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_48); -lean::cnstr_set(x_73, 1, x_72); -x_74 = l_Lean_Parser_Term_simpleImplicitBinder; -x_75 = l_Lean_Parser_Syntax_mkNode(x_74, x_73); -return x_75; -} -else -{ -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_76 = lean::cnstr_get(x_6, 0); -lean::inc(x_76); -x_77 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_77, 0, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_8); -lean::inc(x_5); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_5); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_68); -lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_7); -lean::cnstr_set(x_81, 1, x_80); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_48); -lean::cnstr_set(x_82, 1, x_81); -x_83 = l_Lean_Parser_Term_simpleImplicitBinder; -x_84 = l_Lean_Parser_Syntax_mkNode(x_83, x_82); -return x_84; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::box(3); -x_4 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_1); -lean::cnstr_set(x_4, 3, x_3); -lean::cnstr_set(x_4, 4, x_1); -return x_4; -} -} -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_50; -x_50 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; -x_51 = l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_51; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = lean::box(3); -x_2 = x_53; -x_3 = x_54; -goto block_49; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -lean::dec(x_53); -x_2 = x_56; -x_3 = x_55; -goto block_49; -} -} -block_49: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_3, 0); -lean::inc(x_46); -lean::dec(x_3); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -x_4 = x_47; -goto block_45; -} -else -{ -obj* x_48; -lean::dec(x_3); -x_48 = lean::box(0); -x_4 = x_48; -goto block_45; -} -block_45: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_42; -x_42 = lean::box(3); -x_5 = x_2; -x_6 = x_42; -goto block_41; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_2, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_2, 1); -lean::inc(x_44); -lean::dec(x_2); -x_5 = x_44; -x_6 = x_43; -goto block_41; -} -block_41: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -obj* x_39; -x_39 = lean::cnstr_get(x_6, 0); -lean::inc(x_39); -lean::dec(x_6); -x_7 = x_39; -goto block_38; -} -else -{ -obj* x_40; -lean::dec(x_6); -x_40 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = x_40; -goto block_38; -} -block_38: -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_20; obj* x_21; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_20 = x_5; -x_21 = x_35; -goto block_34; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_5, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_20 = x_37; -x_21 = x_36; -goto block_34; -} -block_19: -{ -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_7); -lean::cnstr_set(x_12, 2, x_8); -lean::cnstr_set(x_12, 3, x_9); -lean::cnstr_set(x_12, 4, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_7); -lean::cnstr_set(x_16, 2, x_8); -lean::cnstr_set(x_16, 3, x_9); -lean::cnstr_set(x_16, 4, x_15); -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_7); -lean::cnstr_set(x_18, 2, x_8); -lean::cnstr_set(x_18, 3, x_9); -lean::cnstr_set(x_18, 4, x_17); -return x_18; -} -} -} -block_34: -{ -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::box(0); -x_25 = lean::box(3); -x_26 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_23); -lean::cnstr_set(x_26, 3, x_25); -lean::cnstr_set(x_26, 4, x_24); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_20, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_20, 1); -lean::inc(x_28); -lean::dec(x_20); -x_8 = x_23; -x_9 = x_27; -x_10 = x_28; -goto block_19; -} -} -else -{ -obj* x_29; -lean::dec(x_21); -x_29 = lean::box(0); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::box(3); -x_31 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_29); -lean::cnstr_set(x_31, 3, x_30); -lean::cnstr_set(x_31, 4, x_29); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_20, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_20, 1); -lean::inc(x_33); -lean::dec(x_20); -x_8 = x_29; -x_9 = x_32; -x_10 = x_33; -goto block_19; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_simpleImplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_simpleStrictImplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("simpleStrictImplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_1, 3); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -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_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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; -x_17 = lean::cnstr_get(x_6, 0); -lean::inc(x_17); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_8); -lean::inc(x_5); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_5); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_7); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_4, 0); -lean::inc(x_27); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_29 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_5); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_7); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -x_35 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -else -{ -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; -x_37 = lean::cnstr_get(x_6, 0); -lean::inc(x_37); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, 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_8); -lean::inc(x_5); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_5); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_28); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_7); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::box(3); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_42); -x_45 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_46 = l_Lean_Parser_Syntax_mkNode(x_45, x_44); -return x_46; -} -} -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_2, 0); -lean::inc(x_47); -x_48 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_48, 0, x_47); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_49 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_5); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::box(3); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_50); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_7); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_48); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_56 = l_Lean_Parser_Syntax_mkNode(x_55, x_54); -return x_56; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_57 = lean::cnstr_get(x_6, 0); -lean::inc(x_57); -x_58 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_8); -lean::inc(x_5); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_5); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::box(3); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_60); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_7); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_48); -lean::cnstr_set(x_64, 1, x_63); -x_65 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_66 = l_Lean_Parser_Syntax_mkNode(x_65, x_64); -return x_66; -} -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_4, 0); -lean::inc(x_67); -x_68 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_5); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_68); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_7); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_48); -lean::cnstr_set(x_73, 1, x_72); -x_74 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_75 = l_Lean_Parser_Syntax_mkNode(x_74, x_73); -return x_75; -} -else -{ -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_76 = lean::cnstr_get(x_6, 0); -lean::inc(x_76); -x_77 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_77, 0, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_8); -lean::inc(x_5); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_5); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_68); -lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_7); -lean::cnstr_set(x_81, 1, x_80); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_48); -lean::cnstr_set(x_82, 1, x_81); -x_83 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_84 = l_Lean_Parser_Syntax_mkNode(x_83, x_82); -return x_84; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::box(3); -x_4 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_1); -lean::cnstr_set(x_4, 3, x_3); -lean::cnstr_set(x_4, 4, x_1); -return x_4; -} -} -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_50; -x_50 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; -x_51 = l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_51; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = lean::box(3); -x_2 = x_53; -x_3 = x_54; -goto block_49; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -lean::dec(x_53); -x_2 = x_56; -x_3 = x_55; -goto block_49; -} -} -block_49: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_3, 0); -lean::inc(x_46); -lean::dec(x_3); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -x_4 = x_47; -goto block_45; -} -else -{ -obj* x_48; -lean::dec(x_3); -x_48 = lean::box(0); -x_4 = x_48; -goto block_45; -} -block_45: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_42; -x_42 = lean::box(3); -x_5 = x_2; -x_6 = x_42; -goto block_41; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_2, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_2, 1); -lean::inc(x_44); -lean::dec(x_2); -x_5 = x_44; -x_6 = x_43; -goto block_41; -} -block_41: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -obj* x_39; -x_39 = lean::cnstr_get(x_6, 0); -lean::inc(x_39); -lean::dec(x_6); -x_7 = x_39; -goto block_38; -} -else -{ -obj* x_40; -lean::dec(x_6); -x_40 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = x_40; -goto block_38; -} -block_38: -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_20; obj* x_21; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_20 = x_5; -x_21 = x_35; -goto block_34; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_5, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_20 = x_37; -x_21 = x_36; -goto block_34; -} -block_19: -{ -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_7); -lean::cnstr_set(x_12, 2, x_8); -lean::cnstr_set(x_12, 3, x_9); -lean::cnstr_set(x_12, 4, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_7); -lean::cnstr_set(x_16, 2, x_8); -lean::cnstr_set(x_16, 3, x_9); -lean::cnstr_set(x_16, 4, x_15); -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_7); -lean::cnstr_set(x_18, 2, x_8); -lean::cnstr_set(x_18, 3, x_9); -lean::cnstr_set(x_18, 4, x_17); -return x_18; -} -} -} -block_34: -{ -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::box(0); -x_25 = lean::box(3); -x_26 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_23); -lean::cnstr_set(x_26, 3, x_25); -lean::cnstr_set(x_26, 4, x_24); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_20, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_20, 1); -lean::inc(x_28); -lean::dec(x_20); -x_8 = x_23; -x_9 = x_27; -x_10 = x_28; -goto block_19; -} -} -else -{ -obj* x_29; -lean::dec(x_21); -x_29 = lean::box(0); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::box(3); -x_31 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_29); -lean::cnstr_set(x_31, 3, x_30); -lean::cnstr_set(x_31, 4, x_29); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_20, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_20, 1); -lean::inc(x_33); -lean::dec(x_20); -x_8 = x_29; -x_9 = x_32; -x_10 = x_33; -goto block_19; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_simpleInstImplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("simpleInstImplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::cnstr_get(x_1, 3); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_3); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -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_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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; -x_17 = lean::cnstr_get(x_6, 0); -lean::inc(x_17); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_8); -lean::inc(x_5); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_5); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_7); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_4, 0); -lean::inc(x_27); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_29 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_5); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_7); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -x_35 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -else -{ -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; -x_37 = lean::cnstr_get(x_6, 0); -lean::inc(x_37); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, 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_8); -lean::inc(x_5); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_5); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_28); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_7); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::box(3); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_42); -x_45 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_46 = l_Lean_Parser_Syntax_mkNode(x_45, x_44); -return x_46; -} -} -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_2, 0); -lean::inc(x_47); -x_48 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_48, 0, x_47); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_49 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_5); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::box(3); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_50); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_7); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_48); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_56 = l_Lean_Parser_Syntax_mkNode(x_55, x_54); -return x_56; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_57 = lean::cnstr_get(x_6, 0); -lean::inc(x_57); -x_58 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_8); -lean::inc(x_5); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_5); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::box(3); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_60); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_7); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_48); -lean::cnstr_set(x_64, 1, x_63); -x_65 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_66 = l_Lean_Parser_Syntax_mkNode(x_65, x_64); -return x_66; -} -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_4, 0); -lean::inc(x_67); -x_68 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_5); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_5); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_68); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_7); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_48); -lean::cnstr_set(x_73, 1, x_72); -x_74 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_75 = l_Lean_Parser_Syntax_mkNode(x_74, x_73); -return x_75; -} -else -{ -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_76 = lean::cnstr_get(x_6, 0); -lean::inc(x_76); -x_77 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_77, 0, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_8); -lean::inc(x_5); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_5); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_68); -lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_7); -lean::cnstr_set(x_81, 1, x_80); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_48); -lean::cnstr_set(x_82, 1, x_81); -x_83 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_84 = l_Lean_Parser_Syntax_mkNode(x_83, x_82); -return x_84; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_3 = lean::box(3); -x_4 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_1); -lean::cnstr_set(x_4, 3, x_3); -lean::cnstr_set(x_4, 4, x_1); -return x_4; -} -} -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_50; -x_50 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; -x_51 = l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_51; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = lean::cnstr_get(x_52, 1); -lean::inc(x_53); -lean::dec(x_52); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = lean::box(3); -x_2 = x_53; -x_3 = x_54; -goto block_49; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -lean::dec(x_53); -x_2 = x_56; -x_3 = x_55; -goto block_49; -} -} -block_49: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_3, 0); -lean::inc(x_46); -lean::dec(x_3); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -x_4 = x_47; -goto block_45; -} -else -{ -obj* x_48; -lean::dec(x_3); -x_48 = lean::box(0); -x_4 = x_48; -goto block_45; -} -block_45: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_42; -x_42 = lean::box(3); -x_5 = x_2; -x_6 = x_42; -goto block_41; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_2, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_2, 1); -lean::inc(x_44); -lean::dec(x_2); -x_5 = x_44; -x_6 = x_43; -goto block_41; -} -block_41: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -obj* x_39; -x_39 = lean::cnstr_get(x_6, 0); -lean::inc(x_39); -lean::dec(x_6); -x_7 = x_39; -goto block_38; -} -else -{ -obj* x_40; -lean::dec(x_6); -x_40 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = x_40; -goto block_38; -} -block_38: -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_20; obj* x_21; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_20 = x_5; -x_21 = x_35; -goto block_34; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_5, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_20 = x_37; -x_21 = x_36; -goto block_34; -} -block_19: -{ -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_7); -lean::cnstr_set(x_12, 2, x_8); -lean::cnstr_set(x_12, 3, x_9); -lean::cnstr_set(x_12, 4, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -x_16 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_7); -lean::cnstr_set(x_16, 2, x_8); -lean::cnstr_set(x_16, 3, x_9); -lean::cnstr_set(x_16, 4, x_15); -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_7); -lean::cnstr_set(x_18, 2, x_8); -lean::cnstr_set(x_18, 3, x_9); -lean::cnstr_set(x_18, 4, x_17); -return x_18; -} -} -} -block_34: -{ -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::box(0); -x_25 = lean::box(3); -x_26 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_23); -lean::cnstr_set(x_26, 3, x_25); -lean::cnstr_set(x_26, 4, x_24); -return x_26; -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_20, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_20, 1); -lean::inc(x_28); -lean::dec(x_20); -x_8 = x_23; -x_9 = x_27; -x_10 = x_28; -goto block_19; -} -} -else -{ -obj* x_29; -lean::dec(x_21); -x_29 = lean::box(0); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::box(3); -x_31 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_29); -lean::cnstr_set(x_31, 3, x_30); -lean::cnstr_set(x_31, 4, x_29); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_20, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_20, 1); -lean::inc(x_33); -lean::dec(x_20); -x_8 = x_29; -x_9 = x_32; -x_10 = x_33; -goto block_19; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_simpleInstImplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_simpleBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("simpleBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_simpleBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_simpleExplicitBinder_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_simpleBinder; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -case 1: -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_simpleImplicitBinder_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_simpleBinder; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -case 2: -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -lean::dec(x_1); -x_24 = l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView; -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -x_26 = lean::apply_1(x_25, x_23); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_2); -x_31 = l_Lean_Parser_Term_simpleBinder; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -default: -{ -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; -x_33 = lean::cnstr_get(x_1, 0); -lean::inc(x_33); -lean::dec(x_1); -x_34 = l_Lean_Parser_Term_simpleInstImplicitBinder_HasView; -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_33); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_2); -x_38 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_2); -x_41 = l_Lean_Parser_Term_simpleBinder; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_simpleExplicitBinder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("simpleBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_dec_eq(x_21, x_30); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::mk_nat_obj(2u); -x_33 = lean::nat_dec_eq(x_21, x_32); -lean::dec(x_21); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Term_simpleInstImplicitBinder_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView; -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::apply_1(x_39, x_27); -x_41 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_41, 0, x_40); -return x_41; -} -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -lean::dec(x_21); -x_42 = l_Lean_Parser_Term_simpleImplicitBinder_HasView; -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::apply_1(x_43, x_27); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -return x_45; -} -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -lean::dec(x_21); -x_46 = l_Lean_Parser_Term_simpleExplicitBinder_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_27); -x_49 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -return x_49; -} -} -else -{ -obj* x_50; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_50 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_50; -} -} -} -} -} -} -} -else -{ -obj* x_51; -lean::dec(x_11); -lean::dec(x_6); -x_51 = l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1; -return x_51; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_simpleBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_simpleBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_simpleBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -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::dec(x_1); -x_4 = lean::box(0); -x_5 = lean::mk_string(" : "); -x_6 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_2); -lean::dec(x_5); -x_7 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_8 = lean::mk_string(")"); -x_9 = l_Lean_Parser_symbol_tokens___rarg(x_8, x_2); -lean::dec(x_8); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_4); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_12); -lean::dec(x_12); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_13); -lean::dec(x_13); -lean::dec(x_3); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -x_16 = lean::mk_string("{"); -x_17 = l_Lean_Parser_symbol_tokens___rarg(x_16, x_2); -lean::dec(x_16); -x_18 = lean::mk_string("}"); -x_19 = l_Lean_Parser_symbol_tokens___rarg(x_18, x_2); -lean::dec(x_18); -x_20 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_4); -lean::dec(x_19); -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_20); -lean::dec(x_20); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_21); -lean::dec(x_21); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_22); -lean::dec(x_22); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_17, x_23); -lean::dec(x_23); -lean::dec(x_17); -x_25 = l_Lean_Parser_tokens___rarg(x_24); -lean::dec(x_24); -x_26 = lean::mk_string("⦃"); -x_27 = l_Lean_Parser_symbol_tokens___rarg(x_26, x_2); -lean::dec(x_26); -x_28 = lean::mk_string("⦄"); -x_29 = l_Lean_Parser_symbol_tokens___rarg(x_28, x_2); -lean::dec(x_28); -x_30 = l_Lean_Parser_List_cons_tokens___rarg(x_29, x_4); -lean::dec(x_29); -x_31 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_30); -lean::dec(x_30); -x_32 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_31); -lean::dec(x_31); -x_33 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_32); -lean::dec(x_32); -x_34 = l_Lean_Parser_List_cons_tokens___rarg(x_27, x_33); -lean::dec(x_33); -lean::dec(x_27); -x_35 = l_Lean_Parser_tokens___rarg(x_34); -lean::dec(x_34); -x_36 = lean::mk_string("["); -x_37 = l_Lean_Parser_symbol_tokens___rarg(x_36, x_2); -lean::dec(x_36); -x_38 = lean::mk_string("]"); -x_39 = l_Lean_Parser_symbol_tokens___rarg(x_38, x_2); -lean::dec(x_38); -x_40 = l_Lean_Parser_List_cons_tokens___rarg(x_39, x_4); -lean::dec(x_39); -x_41 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_40); -lean::dec(x_40); -lean::dec(x_7); -x_42 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_41); -lean::dec(x_41); -lean::dec(x_6); -x_43 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_42); -lean::dec(x_42); -x_44 = l_Lean_Parser_List_cons_tokens___rarg(x_37, x_43); -lean::dec(x_43); -lean::dec(x_37); -x_45 = l_Lean_Parser_tokens___rarg(x_44); -lean::dec(x_44); -x_46 = l_Lean_Parser_List_cons_tokens___rarg(x_45, x_4); -lean::dec(x_45); -x_47 = l_Lean_Parser_List_cons_tokens___rarg(x_35, x_46); -lean::dec(x_46); -lean::dec(x_35); -x_48 = l_Lean_Parser_List_cons_tokens___rarg(x_25, x_47); -lean::dec(x_47); -lean::dec(x_25); -x_49 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_48); -lean::dec(x_48); -lean::dec(x_15); -x_50 = l_Lean_Parser_tokens___rarg(x_49); -lean::dec(x_49); -x_51 = l_Lean_Parser_List_cons_tokens___rarg(x_50, x_4); -lean::dec(x_50); -x_52 = l_Lean_Parser_tokens___rarg(x_51); -lean::dec(x_51); -return x_52; -} -} -obj* _init_l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(" : "); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_10, 0, x_4); -x_11 = lean::mk_string(")"); -x_12 = l_String_trim(x_11); -lean::dec(x_11); -lean::inc(x_12); -x_13 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_4); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -lean::inc(x_10); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_10); -lean::cnstr_set(x_17, 1, x_16); -lean::inc(x_9); -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_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -lean::inc(x_19); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_5); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_Term_simpleExplicitBinder; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_22); -lean::closure_set(x_23, 1, x_21); -x_24 = lean::mk_string("{"); -x_25 = l_String_trim(x_24); -lean::dec(x_24); -lean::inc(x_25); -x_26 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_4); -lean::closure_set(x_27, 2, x_26); -x_28 = lean::mk_string("}"); -x_29 = l_String_trim(x_28); -lean::dec(x_28); -lean::inc(x_29); -x_30 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_30, 0, x_29); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_31, 0, x_29); -lean::closure_set(x_31, 1, x_4); -lean::closure_set(x_31, 2, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_15); -lean::inc(x_10); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_10); -lean::cnstr_set(x_33, 1, x_32); -lean::inc(x_9); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_9); -lean::cnstr_set(x_34, 1, x_33); -lean::inc(x_19); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_19); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_27); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Parser_Term_simpleImplicitBinder; -x_38 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_38, 0, x_37); -lean::closure_set(x_38, 1, x_36); -x_39 = lean::mk_string("⦃"); -x_40 = l_String_trim(x_39); -lean::dec(x_39); -lean::inc(x_40); -x_41 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_41, 0, x_40); -x_42 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_42, 0, x_40); -lean::closure_set(x_42, 1, x_4); -lean::closure_set(x_42, 2, x_41); -x_43 = lean::mk_string("⦄"); -x_44 = l_String_trim(x_43); -lean::dec(x_43); -lean::inc(x_44); -x_45 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_45, 0, x_44); -x_46 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_46, 0, x_44); -lean::closure_set(x_46, 1, x_4); -lean::closure_set(x_46, 2, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_15); -lean::inc(x_10); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_10); -lean::cnstr_set(x_48, 1, x_47); -lean::inc(x_9); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_9); -lean::cnstr_set(x_49, 1, x_48); -lean::inc(x_19); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_19); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_42); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_53, 0, x_52); -lean::closure_set(x_53, 1, x_51); -x_54 = lean::mk_string("["); -x_55 = l_String_trim(x_54); -lean::dec(x_54); -lean::inc(x_55); -x_56 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_56, 0, x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_57, 0, x_55); -lean::closure_set(x_57, 1, x_4); -lean::closure_set(x_57, 2, x_56); -x_58 = lean::mk_string("]"); -x_59 = l_String_trim(x_58); -lean::dec(x_58); -lean::inc(x_59); -x_60 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_60, 0, x_59); -x_61 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_61, 0, x_59); -lean::closure_set(x_61, 1, x_4); -lean::closure_set(x_61, 2, x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_15); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_10); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_9); -lean::cnstr_set(x_64, 1, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_19); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_57); -lean::cnstr_set(x_66, 1, x_65); -x_67 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_68 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_68, 0, x_67); -lean::closure_set(x_68, 1, x_66); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_15); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_53); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_38); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_23); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_73, 0, x_72); -lean::closure_set(x_73, 1, x_4); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_15); -x_75 = l_Lean_Parser_TermParserM_Monad; -x_76 = l_Lean_Parser_TermParserM_MonadExcept; -x_77 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_78 = l_Lean_Parser_TermParserM_Alternative; -x_79 = l_Lean_Parser_Term_simpleBinder; -x_80 = l_Lean_Parser_Term_simpleBinder_HasView; -x_81 = l_Lean_Parser_Combinators_node_view___rarg(x_75, x_76, x_77, x_78, x_79, x_74, x_80); -lean::dec(x_74); -return x_81; -} -} -obj* _init_l_Lean_Parser_Term_simpleBinder_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(" : "); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_10, 0, x_4); -x_11 = lean::mk_string(")"); -x_12 = l_String_trim(x_11); -lean::dec(x_11); -lean::inc(x_12); -x_13 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_4); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -lean::inc(x_10); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_10); -lean::cnstr_set(x_17, 1, x_16); -lean::inc(x_9); -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_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -lean::inc(x_19); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_5); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_Term_simpleExplicitBinder; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_22); -lean::closure_set(x_23, 1, x_21); -x_24 = lean::mk_string("{"); -x_25 = l_String_trim(x_24); -lean::dec(x_24); -lean::inc(x_25); -x_26 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_4); -lean::closure_set(x_27, 2, x_26); -x_28 = lean::mk_string("}"); -x_29 = l_String_trim(x_28); -lean::dec(x_28); -lean::inc(x_29); -x_30 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_30, 0, x_29); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_31, 0, x_29); -lean::closure_set(x_31, 1, x_4); -lean::closure_set(x_31, 2, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_15); -lean::inc(x_10); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_10); -lean::cnstr_set(x_33, 1, x_32); -lean::inc(x_9); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_9); -lean::cnstr_set(x_34, 1, x_33); -lean::inc(x_19); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_19); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_27); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Parser_Term_simpleImplicitBinder; -x_38 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_38, 0, x_37); -lean::closure_set(x_38, 1, x_36); -x_39 = lean::mk_string("⦃"); -x_40 = l_String_trim(x_39); -lean::dec(x_39); -lean::inc(x_40); -x_41 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_41, 0, x_40); -x_42 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_42, 0, x_40); -lean::closure_set(x_42, 1, x_4); -lean::closure_set(x_42, 2, x_41); -x_43 = lean::mk_string("⦄"); -x_44 = l_String_trim(x_43); -lean::dec(x_43); -lean::inc(x_44); -x_45 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_45, 0, x_44); -x_46 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_46, 0, x_44); -lean::closure_set(x_46, 1, x_4); -lean::closure_set(x_46, 2, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_15); -lean::inc(x_10); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_10); -lean::cnstr_set(x_48, 1, x_47); -lean::inc(x_9); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_9); -lean::cnstr_set(x_49, 1, x_48); -lean::inc(x_19); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_19); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_42); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_Lean_Parser_Term_simpleStrictImplicitBinder; -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_53, 0, x_52); -lean::closure_set(x_53, 1, x_51); -x_54 = lean::mk_string("["); -x_55 = l_String_trim(x_54); -lean::dec(x_54); -lean::inc(x_55); -x_56 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_56, 0, x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_57, 0, x_55); -lean::closure_set(x_57, 1, x_4); -lean::closure_set(x_57, 2, x_56); -x_58 = lean::mk_string("]"); -x_59 = l_String_trim(x_58); -lean::dec(x_58); -lean::inc(x_59); -x_60 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_60, 0, x_59); -x_61 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_61, 0, x_59); -lean::closure_set(x_61, 1, x_4); -lean::closure_set(x_61, 2, x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_15); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_10); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_9); -lean::cnstr_set(x_64, 1, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_19); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_57); -lean::cnstr_set(x_66, 1, x_65); -x_67 = l_Lean_Parser_Term_simpleInstImplicitBinder; -x_68 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_68, 0, x_67); -lean::closure_set(x_68, 1, x_66); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_15); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_53); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_38); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_23); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_73, 0, x_72); -lean::closure_set(x_73, 1, x_4); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_15); -return x_74; -} -} -obj* l_Lean_Parser_Term_simpleBinder_Parser(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; -x_6 = l_Lean_Parser_Term_simpleBinder; -x_7 = l_Lean_Parser_Term_simpleBinder_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(obj* x_1) { -_start: -{ -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_2, 1); -x_4 = lean::cnstr_get(x_2, 3); -lean::inc(x_4); -lean::inc(x_3); -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 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_5); -return x_8; -} -case 1: -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint8 x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_9, 1); -x_11 = lean::cnstr_get(x_9, 3); -lean::inc(x_11); -lean::inc(x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = 1; -x_14 = lean::box(x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_12); -return x_15; -} -case 2: -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; obj* x_21; obj* x_22; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = lean::cnstr_get(x_16, 1); -x_18 = lean::cnstr_get(x_16, 3); -lean::inc(x_18); -lean::inc(x_17); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = 2; -x_21 = lean::box(x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_19); -return x_22; -} -default: -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; uint8 x_27; obj* x_28; obj* x_29; -x_23 = lean::cnstr_get(x_1, 0); -x_24 = lean::cnstr_get(x_23, 1); -x_25 = lean::cnstr_get(x_23, 3); -lean::inc(x_25); -lean::inc(x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_25); -x_27 = 3; -x_28 = lean::box(x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_26); -return x_29; -} -} -} -} -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___main(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_simpleBinder_View_toBinderInfo___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_simpleBinder_View_toBinderInfo(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_anonymousConstructor() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("anonymousConstructor"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_anonymousConstructor_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(x_3); -x_6 = l_List_join___main___rarg(x_5); -x_7 = l_Lean_Parser_noKind; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::box(3); -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 = l_Lean_Parser_Term_anonymousConstructor; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_16 = lean::cnstr_get(x_4, 0); -lean::inc(x_16); -lean::dec(x_4); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_8); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::box(3); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -x_22 = l_Lean_Parser_Term_anonymousConstructor; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_2, 0); -lean::inc(x_24); -lean::dec(x_2); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_8); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_25); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_Term_anonymousConstructor; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_31 = lean::cnstr_get(x_4, 0); -lean::inc(x_31); -lean::dec(x_4); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, 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_9); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_8); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_25); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_Term_anonymousConstructor; -x_37 = l_Lean_Parser_Syntax_mkNode(x_36, x_35); -return x_37; -} -} -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -lean::dec(x_8); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(0); -lean::cnstr_set(x_3, 1, x_11); -lean::cnstr_set(x_3, 0, x_10); -return x_3; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -lean::dec(x_3); -x_13 = lean::box(0); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -else -{ -obj* x_17; uint8 x_18; -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = !lean::is_exclusive(x_5); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_5, 0); -x_20 = lean::cnstr_get(x_5, 1); -x_21 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1(x_1, x_2, x_20); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_17); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_5, 1, x_21); -lean::cnstr_set(x_5, 0, x_25); -return x_5; -} -else -{ -obj* x_26; obj* x_27; -lean::dec(x_19); -x_26 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_17); -lean::cnstr_set(x_27, 1, x_26); -lean::cnstr_set(x_5, 1, x_21); -lean::cnstr_set(x_5, 0, x_27); -return x_5; -} -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_5, 0); -x_29 = lean::cnstr_get(x_5, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_5); -x_30 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1(x_1, x_2, x_29); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_17); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_30); -return x_35; -} -else -{ -obj* x_36; obj* x_37; obj* x_38; -lean::dec(x_28); -x_36 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_17); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_30); -return x_38; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::mk_string(","); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_1); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -lean::dec(x_3); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_9 = l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__1; -x_10 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1(x_8, x_9, x_7); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -lean::cnstr_set(x_11, 2, x_1); -return x_11; -} -} -} -obj* l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_53; -x_53 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; -x_54 = l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__2; -return x_54; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_53, 0); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -lean::dec(x_55); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -x_57 = lean::box(3); -x_2 = x_56; -x_3 = x_57; -goto block_52; -} -else -{ -obj* x_58; obj* x_59; -x_58 = lean::cnstr_get(x_56, 0); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_56, 1); -lean::inc(x_59); -lean::dec(x_56); -x_2 = x_59; -x_3 = x_58; -goto block_52; -} -} -block_52: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_3, 0); -lean::inc(x_49); -lean::dec(x_3); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_49); -x_4 = x_50; -goto block_48; -} -else -{ -obj* x_51; -lean::dec(x_3); -x_51 = lean::box(0); -x_4 = x_51; -goto block_48; -} -block_48: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_45; -x_45 = lean::box(3); -x_5 = x_2; -x_6 = x_45; -goto block_44; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_2, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_2, 1); -lean::inc(x_47); -lean::dec(x_2); -x_5 = x_47; -x_6 = x_46; -goto block_44; -} -block_44: -{ -obj* x_7; -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = lean::box(0); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_8); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_14); -lean::cnstr_set(x_15, 2, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_11); -x_16 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_16); -lean::cnstr_set(x_17, 2, x_8); -return x_17; -} -} -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_7); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = lean::cnstr_get(x_7, 0); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -x_21 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_22 = l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__1; -x_23 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1(x_21, x_22, x_20); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_24; obj* x_25; -lean::free_heap_obj(x_7); -x_24 = lean::box(0); -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_23); -lean::cnstr_set(x_25, 2, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_5, 0); -lean::inc(x_26); -lean::dec(x_5); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -lean::dec(x_26); -lean::cnstr_set(x_7, 0, x_27); -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_7); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -lean::dec(x_26); -lean::free_heap_obj(x_7); -x_29 = lean::box(0); -x_30 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_30, 0, x_4); -lean::cnstr_set(x_30, 1, x_23); -lean::cnstr_set(x_30, 2, x_29); -return x_30; -} -} -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_7, 0); -lean::inc(x_31); -lean::dec(x_7); -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -lean::dec(x_31); -x_33 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_34 = l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__1; -x_35 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1(x_33, x_34, x_32); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_36; obj* x_37; -x_36 = lean::box(0); -x_37 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_35); -lean::cnstr_set(x_37, 2, x_36); -return x_37; -} -else -{ -obj* x_38; -x_38 = lean::cnstr_get(x_5, 0); -lean::inc(x_38); -lean::dec(x_5); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; obj* x_41; -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -lean::dec(x_38); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_4); -lean::cnstr_set(x_41, 1, x_35); -lean::cnstr_set(x_41, 2, x_40); -return x_41; -} -else -{ -obj* x_42; obj* x_43; -lean::dec(x_38); -x_42 = lean::box(0); -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_35); -lean::cnstr_set(x_43, 2, x_42); -return x_43; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_anonymousConstructor_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_anonymousConstructor_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_anonymousConstructor_HasView_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_Term_anonymousConstructor_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_anonymousConstructor_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("⟨"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_nat_obj(0u); -x_5 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_4); -x_6 = lean::mk_string(","); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_4); -lean::dec(x_6); -x_8 = l_Lean_Parser_Combinators_sepBy_tokens___rarg(x_5, x_7); -lean::dec(x_7); -lean::dec(x_5); -x_9 = lean::mk_string("⟩"); -x_10 = l_Lean_Parser_symbol_tokens___rarg(x_9, x_4); -lean::dec(x_9); -x_11 = lean::box(0); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_11); -lean::dec(x_10); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_12); -lean::dec(x_12); -lean::dec(x_8); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_13); -lean::dec(x_13); -lean::dec(x_3); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -return x_15; -} -} -obj* _init_l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_1 = lean::mk_string("⟨"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string(","); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_6); -lean::closure_set(x_11, 2, x_10); -x_12 = 1; -x_13 = lean::box(x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_14, 0, x_7); -lean::closure_set(x_14, 1, x_11); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::mk_string("⟩"); -x_16 = l_String_trim(x_15); -lean::dec(x_15); -lean::inc(x_16); -x_17 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_6); -lean::closure_set(x_18, 2, x_17); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_5); -lean::cnstr_set(x_22, 1, x_21); -x_23 = l_Lean_Parser_TermParserM_Monad; -x_24 = l_Lean_Parser_TermParserM_MonadExcept; -x_25 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_26 = l_Lean_Parser_TermParserM_Alternative; -x_27 = l_Lean_Parser_Term_anonymousConstructor; -x_28 = l_Lean_Parser_Term_anonymousConstructor_HasView; -x_29 = l_Lean_Parser_Combinators_node_view___rarg(x_23, x_24, x_25, x_26, x_27, x_22, x_28); -lean::dec(x_22); -return x_29; -} -} -obj* _init_l_Lean_Parser_Term_anonymousConstructor_Parser___closed__1() { -_start: -{ -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; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string("⟨"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string(","); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_6); -lean::closure_set(x_11, 2, x_10); -x_12 = 1; -x_13 = lean::box(x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_14, 0, x_7); -lean::closure_set(x_14, 1, x_11); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::mk_string("⟩"); -x_16 = l_String_trim(x_15); -lean::dec(x_15); -lean::inc(x_16); -x_17 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_6); -lean::closure_set(x_18, 2, x_17); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_5); -lean::cnstr_set(x_22, 1, x_21); -return x_22; -} -} -obj* l_Lean_Parser_Term_anonymousConstructor_Parser(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; -x_6 = l_Lean_Parser_Term_anonymousConstructor; -x_7 = l_Lean_Parser_Term_anonymousConstructor_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_explicitBinderContent___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("explicitBinderContent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_explicitBinderContent(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_explicitBinderContent___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Term_explicitBinderContent___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_explicitBinderContent(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27___elambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -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_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = l_Lean_Parser_command_notationLike_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_4); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_3); -x_9 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_3); -x_12 = l_Lean_Parser_Syntax_mkNode(x_1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1(x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_3); -x_16 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_3); -x_19 = l_Lean_Parser_Syntax_mkNode(x_1, x_18); -return x_19; -} -} -} -obj* _init_l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_command_notationLike_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_explicitBinderContent___closed__1; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -uint8 x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_30 = 0; -x_31 = l_Lean_Parser_Term_binderContent_HasView_x27(x_30); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -lean::dec(x_31); -x_33 = lean::apply_1(x_32, x_27); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_35 = l_Lean_Parser_command_notationLike_HasView; -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -x_37 = lean::apply_1(x_36, x_27); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -return x_38; -} -} -else -{ -obj* x_39; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_39 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -} -else -{ -obj* x_40; -lean::dec(x_11); -lean::dec(x_6); -x_40 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_40; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_explicitBinderContent_HasView_x27___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27(uint8 x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = l_Lean_Parser_Term_explicitBinderContent(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicitBinderContent_HasView_x27___elambda__1), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -return x_5; -} -} -obj* l_Lean_Parser_Term_explicitBinderContent_HasView_x27___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_explicitBinderContent_HasView(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_explicitBinderContent_HasView___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_explicitBinderContent_HasView(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_explicitBinder___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("explicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_explicitBinder(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_explicitBinder___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Term_explicitBinder___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_explicitBinder(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; -x_1 = 0; -x_2 = l_Lean_Parser_Term_explicitBinder(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; uint8 x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = 0; -x_6 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27(x_5); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::apply_1(x_7, x_3); -x_9 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::box(3); -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 = l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_16 = lean::cnstr_get(x_4, 0); -lean::inc(x_16); -lean::dec(x_4); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_8); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::box(3); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -x_22 = l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_2, 0); -lean::inc(x_24); -lean::dec(x_2); -x_25 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_8); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_25); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_31 = lean::cnstr_get(x_4, 0); -lean::inc(x_31); -lean::dec(x_4); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, 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_9); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_8); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_25); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1; -x_37 = l_Lean_Parser_Syntax_mkNode(x_36, x_35); -return x_37; -} -} -} -} -obj* _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = 0; -x_2 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = 0; -x_3 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27(x_2); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::box(3); -x_6 = lean::apply_1(x_4, x_5); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_6); -lean::cnstr_set(x_7, 2, x_1); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_18; obj* x_19; obj* x_32; -x_32 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -x_33 = l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__3; -return x_33; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -x_36 = lean::box(3); -x_18 = x_35; -x_19 = x_36; -goto block_31; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_35, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 1); -lean::inc(x_38); -lean::dec(x_35); -x_18 = x_38; -x_19 = x_37; -goto block_31; -} -} -block_17: -{ -uint8 x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = 0; -x_6 = l_Lean_Parser_Term_explicitBinderContent_HasView_x27(x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::apply_1(x_7, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_8); -lean::cnstr_set(x_10, 2, x_9); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_8); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_16, 0, x_2); -lean::cnstr_set(x_16, 1, x_8); -lean::cnstr_set(x_16, 2, x_15); -return x_16; -} -} -} -block_31: -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -lean::dec(x_19); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::box(0); -x_23 = l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -lean::cnstr_set(x_24, 2, x_22); -return x_24; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_18, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_18, 1); -lean::inc(x_26); -lean::dec(x_18); -x_2 = x_21; -x_3 = x_25; -x_4 = x_26; -goto block_17; -} -} -else -{ -lean::dec(x_19); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_27; -x_27 = l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__2; -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_18, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_18, 1); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::box(0); -x_2 = x_30; -x_3 = x_28; -x_4 = x_29; -goto block_17; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1), 1, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27(uint8 x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__1; -x_3 = l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__2; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Term_explicitBinder_HasView_x27___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_explicitBinder_HasView_x27(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_explicitBinder_HasView(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_explicitBinder_HasView_x27(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_explicitBinder_HasView___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_explicitBinder_HasView(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_implicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("implicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_implicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1(x_3); -x_6 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_7 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_5); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::box(3); -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 = l_Lean_Parser_Term_implicitBinder; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = lean::cnstr_get(x_4, 0); -lean::inc(x_13); -lean::dec(x_4); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_6); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::box(3); -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 = l_Lean_Parser_Term_implicitBinder; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_2, 0); -lean::inc(x_21); -lean::dec(x_2); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_23 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_5); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_Term_implicitBinder; -x_27 = l_Lean_Parser_Syntax_mkNode(x_26, x_25); -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_28 = lean::cnstr_get(x_4, 0); -lean::inc(x_28); -lean::dec(x_4); -x_29 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_6); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_5); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_22); -lean::cnstr_set(x_32, 1, x_31); -x_33 = l_Lean_Parser_Term_implicitBinder; -x_34 = l_Lean_Parser_Syntax_mkNode(x_33, x_32); -return x_34; -} -} -} -} -obj* _init_l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = 0; -x_2 = l_Lean_Parser_Term_binderContent_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = 0; -x_3 = l_Lean_Parser_Term_binderContent_HasView_x27(x_2); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::box(3); -x_6 = lean::apply_1(x_4, x_5); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_6); -lean::cnstr_set(x_7, 2, x_1); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_18; obj* x_19; obj* x_32; -x_32 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -x_33 = l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__3; -return x_33; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -x_36 = lean::box(3); -x_18 = x_35; -x_19 = x_36; -goto block_31; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_35, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 1); -lean::inc(x_38); -lean::dec(x_35); -x_18 = x_38; -x_19 = x_37; -goto block_31; -} -} -block_17: -{ -uint8 x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = 0; -x_6 = l_Lean_Parser_Term_binderContent_HasView_x27(x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::apply_1(x_7, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_8); -lean::cnstr_set(x_10, 2, x_9); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_8); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_16, 0, x_2); -lean::cnstr_set(x_16, 1, x_8); -lean::cnstr_set(x_16, 2, x_15); -return x_16; -} -} -} -block_31: -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -lean::dec(x_19); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::box(0); -x_23 = l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -lean::cnstr_set(x_24, 2, x_22); -return x_24; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_18, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_18, 1); -lean::inc(x_26); -lean::dec(x_18); -x_2 = x_21; -x_3 = x_25; -x_4 = x_26; -goto block_17; -} -} -else -{ -lean::dec(x_19); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_27; -x_27 = l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__2; -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_18, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_18, 1); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::box(0); -x_2 = x_30; -x_3 = x_28; -x_4 = x_29; -goto block_17; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_implicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_implicitBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_implicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_implicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_strictImplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("strictImplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1(x_3); -x_6 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_7 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_5); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::box(3); -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 = l_Lean_Parser_Term_strictImplicitBinder; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = lean::cnstr_get(x_4, 0); -lean::inc(x_13); -lean::dec(x_4); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_6); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::box(3); -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 = l_Lean_Parser_Term_strictImplicitBinder; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_2, 0); -lean::inc(x_21); -lean::dec(x_2); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_23 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_5); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_Term_strictImplicitBinder; -x_27 = l_Lean_Parser_Syntax_mkNode(x_26, x_25); -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_28 = lean::cnstr_get(x_4, 0); -lean::inc(x_28); -lean::dec(x_4); -x_29 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_6); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_5); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_22); -lean::cnstr_set(x_32, 1, x_31); -x_33 = l_Lean_Parser_Term_strictImplicitBinder; -x_34 = l_Lean_Parser_Syntax_mkNode(x_33, x_32); -return x_34; -} -} -} -} -obj* _init_l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = 0; -x_3 = l_Lean_Parser_Term_binderContent_HasView_x27(x_2); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::box(3); -x_6 = lean::apply_1(x_4, x_5); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_6); -lean::cnstr_set(x_7, 2, x_1); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_18; obj* x_19; obj* x_32; -x_32 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -x_33 = l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__2; -return x_33; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -x_36 = lean::box(3); -x_18 = x_35; -x_19 = x_36; -goto block_31; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_35, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 1); -lean::inc(x_38); -lean::dec(x_35); -x_18 = x_38; -x_19 = x_37; -goto block_31; -} -} -block_17: -{ -uint8 x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = 0; -x_6 = l_Lean_Parser_Term_binderContent_HasView_x27(x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::apply_1(x_7, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_8); -lean::cnstr_set(x_10, 2, x_9); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_8); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_16, 0, x_2); -lean::cnstr_set(x_16, 1, x_8); -lean::cnstr_set(x_16, 2, x_15); -return x_16; -} -} -} -block_31: -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -lean::dec(x_19); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::box(0); -x_23 = l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -lean::cnstr_set(x_24, 2, x_22); -return x_24; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_18, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_18, 1); -lean::inc(x_26); -lean::dec(x_18); -x_2 = x_21; -x_3 = x_25; -x_4 = x_26; -goto block_17; -} -} -else -{ -lean::dec(x_19); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_27; -x_27 = l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__1; -return x_27; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_18, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_18, 1); -lean::inc(x_29); -lean::dec(x_18); -x_30 = lean::box(0); -x_2 = x_30; -x_3 = x_28; -x_4 = x_29; -goto block_17; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_strictImplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_strictImplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_strictImplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitNamedBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("instImplicitNamedBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_2); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_2); -x_6 = lean::box(0); -lean::inc(x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_6); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::box(3); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_Term_instImplicitNamedBinder; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_7); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_Term_instImplicitNamedBinder; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -} -} -obj* _init_l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::box(3); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_44; -x_44 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; -x_45 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__2; -return x_45; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_44, 0); -lean::inc(x_46); -lean::dec(x_44); -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -lean::dec(x_46); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -x_48 = lean::box(3); -x_2 = x_47; -x_3 = x_48; -goto block_43; -} -else -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_47, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_47, 1); -lean::inc(x_50); -lean::dec(x_47); -x_2 = x_50; -x_3 = x_49; -goto block_43; -} -} -block_43: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_3, 0); -lean::inc(x_22); -lean::dec(x_3); -x_23 = lean::box(0); -x_24 = lean::box(3); -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_23); -lean::cnstr_set(x_25, 2, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_2, 0); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_3, 0); -lean::inc(x_27); -lean::dec(x_3); -x_28 = lean::cnstr_get(x_2, 1); -lean::inc(x_28); -lean::dec(x_2); -x_29 = lean::cnstr_get(x_26, 0); -lean::inc(x_29); -lean::dec(x_26); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::box(3); -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_27); -lean::cnstr_set(x_32, 1, x_30); -lean::cnstr_set(x_32, 2, x_31); -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_28, 0); -lean::inc(x_33); -lean::dec(x_28); -x_34 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_34, 0, x_27); -lean::cnstr_set(x_34, 1, x_30); -lean::cnstr_set(x_34, 2, x_33); -return x_34; -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -lean::dec(x_26); -x_35 = lean::cnstr_get(x_3, 0); -lean::inc(x_35); -lean::dec(x_3); -x_36 = lean::cnstr_get(x_2, 1); -lean::inc(x_36); -lean::dec(x_2); -x_37 = lean::box(0); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_38; obj* x_39; -x_38 = lean::box(3); -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_35); -lean::cnstr_set(x_39, 1, x_37); -lean::cnstr_set(x_39, 2, x_38); -return x_39; -} -else -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_36, 0); -lean::inc(x_40); -lean::dec(x_36); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_35); -lean::cnstr_set(x_41, 1, x_37); -lean::cnstr_set(x_41, 2, x_40); -return x_41; -} -} -} -} -else -{ -obj* x_42; -lean::dec(x_3); -x_42 = lean::box(0); -x_4 = x_42; -goto block_21; -} -block_21: -{ -lean::dec(x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_2, 1); -lean::inc(x_7); -lean::dec(x_2); -x_8 = lean::box(0); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_12 = lean::box(3); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_7, 0); -lean::inc(x_14); -lean::dec(x_7); -x_15 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_16 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_10); -lean::cnstr_set(x_16, 2, x_14); -return x_16; -} -} -else -{ -lean::dec(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_17; -x_17 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__1; -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_7, 0); -lean::inc(x_18); -lean::dec(x_7); -x_19 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_8); -lean::cnstr_set(x_20, 2, x_18); -return x_20; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitNamedBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitAnonymousBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("instImplicitAnonymousBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::box(0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -x_4 = l_Lean_Parser_Term_instImplicitAnonymousBinder; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(3); -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = lean::box(3); -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -lean::dec(x_5); -return x_7; -} -} -} -} -obj* _init_l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinderContent() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("instImplicitBinderContent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_instImplicitBinderContent; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_instImplicitBinderContent; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("instImplicitBinderContent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Term_instImplicitNamedBinder_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinderContent_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("instImplicitBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_instImplicitBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_Term_instImplicitBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_7); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_Term_instImplicitBinder; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_Term_instImplicitBinder; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_2, 0); -lean::inc(x_23); -lean::dec(x_2); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_Term_instImplicitBinder; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_4, 0); -lean::inc(x_30); -lean::dec(x_4); -x_31 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_8); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_7); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_Term_instImplicitBinder; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -} -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Term_instImplicitBinderContent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_instImplicitBinderContent_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_17; obj* x_18; obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__3; -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_17 = x_34; -x_18 = x_35; -goto block_30; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -lean::dec(x_34); -x_17 = x_37; -x_18 = x_36; -goto block_30; -} -} -block_16: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_Term_instImplicitBinderContent_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_2); -lean::cnstr_set(x_13, 1, x_7); -lean::cnstr_set(x_13, 2, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -} -} -block_30: -{ -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -lean::dec(x_18); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::box(0); -x_22 = l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -lean::cnstr_set(x_23, 2, x_21); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_17, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_17, 1); -lean::inc(x_25); -lean::dec(x_17); -x_2 = x_20; -x_3 = x_24; -x_4 = x_25; -goto block_16; -} -} -else -{ -lean::dec(x_18); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_26; -x_26 = l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__2; -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_17, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_17, 1); -lean::inc(x_28); -lean::dec(x_17); -x_29 = lean::box(0); -x_2 = x_29; -x_3 = x_27; -x_4 = x_28; -goto block_16; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_instImplicitBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_instImplicitBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_instImplicitBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("bracketedBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_bracketedBinder(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_bracketedBinder___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Term_bracketedBinder___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_bracketedBinder(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27___elambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::box(0); -switch (lean::obj_tag(x_2)) { -case 0: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1(x_4); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -x_7 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_3); -x_10 = l_Lean_Parser_Syntax_mkNode(x_1, x_9); -return x_10; -} -case 1: -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = l_Lean_Parser_Term_implicitBinder_HasView; -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_3); -x_16 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_3); -x_19 = l_Lean_Parser_Syntax_mkNode(x_1, x_18); -return x_19; -} -case 2: -{ -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; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = l_Lean_Parser_Term_strictImplicitBinder_HasView; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_3); -x_25 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_3); -x_28 = l_Lean_Parser_Syntax_mkNode(x_1, x_27); -return x_28; -} -case 3: -{ -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; -x_29 = lean::cnstr_get(x_2, 0); -lean::inc(x_29); -lean::dec(x_2); -x_30 = l_Lean_Parser_Term_instImplicitBinder_HasView; -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, 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_3); -x_34 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_35 = l_Lean_Parser_Syntax_mkNode(x_34, x_33); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_3); -x_37 = l_Lean_Parser_Syntax_mkNode(x_1, x_36); -return x_37; -} -default: -{ -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_38 = lean::cnstr_get(x_2, 0); -lean::inc(x_38); -lean::dec(x_2); -x_39 = l_Lean_Parser_Term_anonymousConstructor_HasView; -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_38); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_3); -x_43 = l_Lean_Parser_command_mixfix_kind_HasView_x27___elambda__1___closed__6; -x_44 = l_Lean_Parser_Syntax_mkNode(x_43, x_42); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_3); -x_46 = l_Lean_Parser_Syntax_mkNode(x_1, x_45); -return x_46; -} -} -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = 0; -x_2 = l_Lean_Parser_Term_explicitBinder_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_bracketedBinder___closed__1; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_dec_eq(x_21, x_30); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::mk_nat_obj(2u); -x_33 = lean::nat_dec_eq(x_21, x_32); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::mk_nat_obj(3u); -x_35 = lean::nat_dec_eq(x_21, x_34); -lean::dec(x_21); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = l_Lean_Parser_Term_anonymousConstructor_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_27); -x_39 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_40 = l_Lean_Parser_Term_instImplicitBinder_HasView; -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::apply_1(x_41, x_27); -x_43 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; -lean::dec(x_21); -x_44 = l_Lean_Parser_Term_strictImplicitBinder_HasView; -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -x_46 = lean::apply_1(x_45, x_27); -x_47 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -return x_47; -} -} -else -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; -lean::dec(x_21); -x_48 = l_Lean_Parser_Term_implicitBinder_HasView; -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::apply_1(x_49, x_27); -x_51 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_51, 0, x_50); -return x_51; -} -} -else -{ -uint8 x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -lean::dec(x_21); -x_52 = 0; -x_53 = l_Lean_Parser_Term_explicitBinder_HasView_x27(x_52); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -lean::dec(x_53); -x_55 = lean::apply_1(x_54, x_27); -x_56 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -return x_56; -} -} -else -{ -obj* x_57; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_57 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_57; -} -} -} -} -} -} -} -else -{ -obj* x_58; -lean::dec(x_11); -lean::dec(x_6); -x_58 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1; -return x_58; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_HasView_x27___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27(uint8 x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = l_Lean_Parser_Term_bracketedBinder(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_HasView_x27___elambda__1), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_Term_bracketedBinder_HasView_x27___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -return x_5; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_HasView_x27___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_HasView(uint8 x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_HasView___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_bracketedBinder_HasView(x_2); -return x_3; -} -} -obj* l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2___lambda__1(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::apply_5(x_8, x_2, x_3, x_4, x_5, x_6); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; uint8 x_13; -x_12 = lean::cnstr_get(x_9, 0); -lean::dec(x_12); -x_13 = !lean::is_exclusive(x_10); -if (x_13 == 0) -{ -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; -x_14 = lean::cnstr_get(x_10, 0); -x_15 = lean::cnstr_get(x_10, 2); -x_16 = lean::box(0); -x_17 = lean_name_mk_numeral(x_16, x_7); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_14); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_Syntax_mkNode(x_17, x_19); -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_10, 2, x_21); -lean::cnstr_set(x_10, 0, x_20); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_10); -lean::cnstr_set(x_9, 0, x_22); -return x_9; -} -else -{ -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; -x_23 = lean::cnstr_get(x_10, 0); -x_24 = lean::cnstr_get(x_10, 1); -x_25 = lean::cnstr_get(x_10, 2); -lean::inc(x_25); -lean::inc(x_24); -lean::inc(x_23); -lean::dec(x_10); -x_26 = lean::box(0); -x_27 = lean_name_mk_numeral(x_26, x_7); -x_28 = lean::box(0); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_23); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_Lean_Parser_Syntax_mkNode(x_27, x_29); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_24); -lean::cnstr_set(x_32, 2, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_32); -lean::cnstr_set(x_9, 0, x_33); -return x_9; -} -} -else -{ -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_46; obj* x_47; -x_34 = lean::cnstr_get(x_9, 1); -lean::inc(x_34); -lean::dec(x_9); -x_35 = lean::cnstr_get(x_10, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_10, 1); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_10, 2); -lean::inc(x_37); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - lean::cnstr_release(x_10, 2); - x_38 = x_10; -} else { - lean::dec_ref(x_10); - x_38 = lean::box(0); -} -x_39 = lean::box(0); -x_40 = lean_name_mk_numeral(x_39, x_7); -x_41 = lean::box(0); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_35); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_Syntax_mkNode(x_40, x_42); -x_44 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_38)) { - x_45 = lean::alloc_cnstr(0, 3, 0); -} else { - x_45 = x_38; -} -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_36); -lean::cnstr_set(x_45, 2, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_45); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_34); -return x_47; -} -} -else -{ -uint8 x_48; -lean::dec(x_7); -x_48 = !lean::is_exclusive(x_9); -if (x_48 == 0) -{ -obj* x_49; uint8 x_50; -x_49 = lean::cnstr_get(x_9, 0); -lean::dec(x_49); -x_50 = !lean::is_exclusive(x_10); -if (x_50 == 0) -{ -return x_9; -} -else -{ -obj* x_51; uint8 x_52; obj* x_53; -x_51 = lean::cnstr_get(x_10, 0); -x_52 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_51); -lean::dec(x_10); -x_53 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_53, 0, x_51); -lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_52); -lean::cnstr_set(x_9, 0, x_53); -return x_9; -} -} -else -{ -obj* x_54; obj* x_55; uint8 x_56; obj* x_57; obj* x_58; obj* x_59; -x_54 = lean::cnstr_get(x_9, 1); -lean::inc(x_54); -lean::dec(x_9); -x_55 = lean::cnstr_get(x_10, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_57 = x_10; -} else { - lean::dec_ref(x_10); - x_57 = lean::box(0); -} -if (lean::is_scalar(x_57)) { - x_58 = lean::alloc_cnstr(1, 1, 1); -} else { - x_58 = x_57; -} -lean::cnstr_set(x_58, 0, x_55); -lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_54); -return x_59; -} -} -} -} -obj* l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2___lambda__1), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2___lambda__1), 6, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2(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_11); -return x_12; -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4___rarg(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: -{ -obj* x_10; obj* x_11; obj* x_23; obj* x_24; obj* x_29; obj* x_30; -lean::inc(x_8); -x_29 = lean::apply_5(x_3, x_5, x_6, x_7, x_8, x_9); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -lean::dec(x_29); -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_30, 1); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_30, 2); -lean::inc(x_34); -if (lean::is_exclusive(x_30)) { - lean::cnstr_release(x_30, 0); - lean::cnstr_release(x_30, 1); - lean::cnstr_release(x_30, 2); - x_35 = x_30; -} else { - lean::dec_ref(x_30); - x_35 = lean::box(0); -} -if (lean::obj_tag(x_4) == 0) -{ -obj* x_46; -x_46 = lean::cnstr_get(x_4, 2); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; uint8 x_51; -lean::dec(x_35); -x_47 = lean::cnstr_get(x_4, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_4, 1); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_33, 1); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_48, 1); -lean::inc(x_50); -lean::dec(x_48); -x_51 = lean::nat_dec_lt(x_49, x_50); -if (x_51 == 0) -{ -uint8 x_52; -x_52 = lean::nat_dec_lt(x_50, x_49); -lean::dec(x_49); -lean::dec(x_50); -if (x_52 == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_32); -lean::cnstr_set(x_53, 1, x_47); -lean::inc(x_33); -x_54 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_33); -lean::cnstr_set(x_54, 2, x_46); -lean::inc(x_1); -x_55 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_55, 0, x_1); -lean::closure_set(x_55, 1, x_1); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -x_57 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_57, 0, x_54); -lean::cnstr_set(x_57, 1, x_33); -lean::cnstr_set(x_57, 2, x_56); -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_57); -x_23 = x_58; -x_24 = x_31; -goto block_28; -} -else -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -lean::dec(x_47); -x_59 = lean::box(0); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_32); -lean::cnstr_set(x_60, 1, x_59); -lean::inc(x_33); -x_61 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_33); -lean::cnstr_set(x_61, 2, x_46); -lean::inc(x_1); -x_62 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_62, 0, x_1); -lean::closure_set(x_62, 1, x_1); -x_63 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_63, 0, x_62); -x_64 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_64, 0, x_61); -lean::cnstr_set(x_64, 1, x_33); -lean::cnstr_set(x_64, 2, x_63); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_64); -x_23 = x_65; -x_24 = x_31; -goto block_28; -} -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; -lean::dec(x_50); -lean::dec(x_49); -lean::dec(x_47); -lean::dec(x_32); -lean::inc(x_1); -x_66 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_66, 0, x_1); -lean::closure_set(x_66, 1, x_1); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::inc(x_4); -x_68 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_68, 0, x_4); -lean::cnstr_set(x_68, 1, x_33); -lean::cnstr_set(x_68, 2, x_67); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_68); -x_23 = x_69; -x_24 = x_31; -goto block_28; -} -} -else -{ -obj* x_70; -lean::dec(x_46); -x_70 = lean::box(0); -x_36 = x_70; -goto block_45; -} -} -else -{ -obj* x_71; -x_71 = lean::box(0); -x_36 = x_71; -goto block_45; -} -block_45: -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -lean::dec(x_36); -x_37 = lean::box(0); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_32); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::box(0); -lean::inc(x_33); -if (lean::is_scalar(x_35)) { - x_40 = lean::alloc_cnstr(0, 3, 0); -} else { - x_40 = x_35; -} -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_33); -lean::cnstr_set(x_40, 2, x_39); -lean::inc(x_1); -x_41 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_41, 0, x_1); -lean::closure_set(x_41, 1, x_1); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set(x_43, 1, x_33); -lean::cnstr_set(x_43, 2, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_43); -x_23 = x_44; -x_24 = x_31; -goto block_28; -} -} -else -{ -obj* x_72; uint8 x_73; -lean::dec(x_1); -x_72 = lean::cnstr_get(x_29, 1); -lean::inc(x_72); -lean::dec(x_29); -x_73 = !lean::is_exclusive(x_30); -if (x_73 == 0) -{ -x_23 = x_30; -x_24 = x_72; -goto block_28; -} -else -{ -obj* x_74; uint8 x_75; obj* x_76; -x_74 = lean::cnstr_get(x_30, 0); -x_75 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); -lean::inc(x_74); -lean::dec(x_30); -x_76 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_76, 0, x_74); -lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_75); -x_23 = x_76; -x_24 = x_72; -goto block_28; -} -} -block_22: -{ -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = lean::cnstr_get(x_10, 2); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_10, 1); -lean::dec(x_14); -x_15 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_10, 2, x_15); -lean::cnstr_set(x_10, 1, x_8); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_10); -lean::cnstr_set(x_16, 1, x_11); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_10, 0); -lean::inc(x_17); -lean::dec(x_10); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_8); -lean::cnstr_set(x_19, 2, x_18); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_11); -return x_20; -} -} -else -{ -obj* x_21; -lean::dec(x_8); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_10); -lean::cnstr_set(x_21, 1, x_11); -return x_21; -} -} -block_28: -{ -if (lean::obj_tag(x_23) == 0) -{ -lean::dec(x_4); -lean::dec(x_2); -x_10 = x_23; -x_11 = x_24; -goto block_22; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::dec(x_25); -x_27 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_27, 0, x_4); -lean::cnstr_set(x_27, 1, x_26); -lean::cnstr_set(x_27, 2, x_2); -x_10 = x_27; -x_11 = x_24; -goto block_22; -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4___rarg), 9, 0); -return x_2; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__5(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: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_2); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_12 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_9); -lean::cnstr_set(x_12, 2, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_10); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::cnstr_get(x_5, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_5, 1); -lean::inc(x_15); -lean::dec(x_5); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_3); -lean::inc(x_2); -x_16 = l_List_mfoldr___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__5(x_1, x_2, x_3, x_4, x_15, x_6, x_7, x_8, x_9, x_10); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_18 = lean::cnstr_get(x_16, 1); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::cnstr_get(x_17, 0); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_17, 1); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_17, 2); -lean::inc(x_21); -lean::dec(x_17); -x_22 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_2, x_3, x_14, x_19, x_6, x_7, x_8, x_20, x_18); -x_23 = !lean::is_exclusive(x_22); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_22, 0); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_24); -lean::cnstr_set(x_22, 0, x_25); -return x_22; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_22, 0); -x_27 = lean::cnstr_get(x_22, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_22); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_26); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -return x_29; -} -} -else -{ -uint8 x_30; -lean::dec(x_14); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_2); -x_30 = !lean::is_exclusive(x_16); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::cnstr_get(x_16, 0); -lean::dec(x_31); -x_32 = !lean::is_exclusive(x_17); -if (x_32 == 0) -{ -return x_16; -} -else -{ -obj* x_33; uint8 x_34; obj* x_35; -x_33 = lean::cnstr_get(x_17, 0); -x_34 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); -lean::inc(x_33); -lean::dec(x_17); -x_35 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set_scalar(x_35, sizeof(void*)*1, x_34); -lean::cnstr_set(x_16, 0, x_35); -return x_16; -} -} -else -{ -obj* x_36; obj* x_37; uint8 x_38; obj* x_39; obj* x_40; obj* x_41; -x_36 = lean::cnstr_get(x_16, 1); -lean::inc(x_36); -lean::dec(x_16); -x_37 = lean::cnstr_get(x_17, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); -if (lean::is_exclusive(x_17)) { - lean::cnstr_release(x_17, 0); - x_39 = x_17; -} else { - lean::dec_ref(x_17); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(1, 1, 1); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_37); -lean::cnstr_set_scalar(x_40, sizeof(void*)*1, x_38); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_36); -return x_41; -} -} -} -} -} -obj* l_Lean_Parser_MonadParsec_longestMatch___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__3(obj* x_1, obj* 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; obj* x_11; obj* x_12; obj* x_13; -x_7 = lean::box(0); -x_8 = l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1; -x_9 = l_mjoin___rarg___closed__1; -lean::inc(x_5); -x_10 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg(x_8, x_9, x_7, x_7, x_5); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_5); -x_12 = l_List_mfoldr___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__5(x_5, x_9, x_11, x_10, x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_5); -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -uint8 x_14; -x_14 = !lean::is_exclusive(x_12); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_12, 0); -lean::dec(x_15); -x_16 = lean::cnstr_get(x_13, 0); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_13, 2); -lean::inc(x_17); -lean::dec(x_13); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_16); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_18); -lean::cnstr_set(x_12, 0, x_19); -return x_12; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::cnstr_get(x_12, 1); -lean::inc(x_20); -lean::dec(x_12); -x_21 = lean::cnstr_get(x_13, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_13, 2); -lean::inc(x_22); -lean::dec(x_13); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_21); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_20); -return x_25; -} -} -else -{ -uint8 x_26; -x_26 = !lean::is_exclusive(x_12); -if (x_26 == 0) -{ -obj* x_27; uint8 x_28; -x_27 = lean::cnstr_get(x_12, 0); -lean::dec(x_27); -x_28 = !lean::is_exclusive(x_13); -if (x_28 == 0) -{ -obj* x_29; -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_13); -lean::cnstr_set(x_12, 0, x_29); -return x_12; -} -else -{ -obj* x_30; uint8 x_31; obj* x_32; obj* x_33; -x_30 = lean::cnstr_get(x_13, 0); -x_31 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -lean::inc(x_30); -lean::dec(x_13); -x_32 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_32); -lean::cnstr_set(x_12, 0, x_33); -return x_12; -} -} -else -{ -obj* x_34; obj* x_35; uint8 x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_34 = lean::cnstr_get(x_12, 1); -lean::inc(x_34); -lean::dec(x_12); -x_35 = lean::cnstr_get(x_13, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -if (lean::is_exclusive(x_13)) { - lean::cnstr_release(x_13, 0); - x_37 = x_13; -} else { - lean::dec_ref(x_13); - x_37 = lean::box(0); -} -if (lean::is_scalar(x_37)) { - x_38 = lean::alloc_cnstr(1, 1, 1); -} else { - x_38 = x_37; -} -lean::cnstr_set(x_38, 0, x_35); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_36); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_38); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_34); -return x_40; -} -} -} -} -obj* l_Lean_Parser_Combinators_longestChoice___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* 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; obj* x_11; -x_7 = lean::mk_nat_obj(0u); -x_8 = l_List_enumFrom___main___rarg(x_7, x_1); -x_9 = l_List_map___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__2(x_8); -lean::inc(x_4); -lean::inc(x_3); -lean::inc(x_2); -x_10 = l_Lean_Parser_MonadParsec_longestMatch___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__3(x_9, x_2, x_3, x_4, x_5, x_6); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -lean::dec(x_10); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_11, 2); -lean::inc(x_15); -lean::dec(x_11); -x_16 = lean::box(0); -x_17 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_18 = l_mjoin___rarg___closed__1; -x_19 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_17, x_18, x_16, x_16, x_2, x_3, x_4, x_14, x_13); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_21); -lean::cnstr_set(x_19, 0, x_22); -return x_19; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_23 = lean::cnstr_get(x_19, 0); -x_24 = lean::cnstr_get(x_19, 1); -lean::inc(x_24); -lean::inc(x_23); -lean::dec(x_19); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_23); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -return x_26; -} -} -else -{ -uint8 x_27; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_27 = !lean::is_exclusive(x_10); -if (x_27 == 0) -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_10, 0); -lean::dec(x_28); -x_29 = !lean::is_exclusive(x_11); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_30 = lean::cnstr_get(x_11, 2); -x_31 = lean::cnstr_get(x_11, 0); -lean::dec(x_31); -x_32 = lean::cnstr_get(x_12, 0); -lean::inc(x_32); -lean::dec(x_12); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_11, 2, x_33); -lean::cnstr_set(x_11, 0, x_32); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_11); -lean::cnstr_set(x_10, 0, x_34); -return x_10; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_35 = lean::cnstr_get(x_11, 1); -x_36 = lean::cnstr_get(x_11, 2); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_11); -x_37 = lean::cnstr_get(x_12, 0); -lean::inc(x_37); -lean::dec(x_12); -x_38 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_35); -lean::cnstr_set(x_39, 2, x_38); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_39); -lean::cnstr_set(x_10, 0, x_40); -return x_10; -} -} -else -{ -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; -x_41 = lean::cnstr_get(x_10, 1); -lean::inc(x_41); -lean::dec(x_10); -x_42 = lean::cnstr_get(x_11, 1); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_11, 2); -lean::inc(x_43); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - lean::cnstr_release(x_11, 2); - x_44 = x_11; -} else { - lean::dec_ref(x_11); - x_44 = lean::box(0); -} -x_45 = lean::cnstr_get(x_12, 0); -lean::inc(x_45); -lean::dec(x_12); -x_46 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_44)) { - x_47 = lean::alloc_cnstr(0, 3, 0); -} else { - x_47 = x_44; -} -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_42); -lean::cnstr_set(x_47, 2, x_46); -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_47); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_41); -return x_49; -} -} -} -else -{ -uint8 x_50; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_50 = !lean::is_exclusive(x_10); -if (x_50 == 0) -{ -obj* x_51; uint8 x_52; -x_51 = lean::cnstr_get(x_10, 0); -lean::dec(x_51); -x_52 = !lean::is_exclusive(x_11); -if (x_52 == 0) -{ -return x_10; -} -else -{ -obj* x_53; uint8 x_54; obj* x_55; -x_53 = lean::cnstr_get(x_11, 0); -x_54 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_53); -lean::dec(x_11); -x_55 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_55, 0, x_53); -lean::cnstr_set_scalar(x_55, sizeof(void*)*1, x_54); -lean::cnstr_set(x_10, 0, x_55); -return x_10; -} -} -else -{ -obj* x_56; obj* x_57; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; -x_56 = lean::cnstr_get(x_10, 1); -lean::inc(x_56); -lean::dec(x_10); -x_57 = lean::cnstr_get(x_11, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_59 = x_11; -} else { - lean::dec_ref(x_11); - x_59 = lean::box(0); -} -if (lean::is_scalar(x_59)) { - x_60 = lean::alloc_cnstr(1, 1, 1); -} else { - x_60 = x_59; -} -lean::cnstr_set(x_60, 0, x_57); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_58); -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_56); -return x_61; -} -} -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::mk_string(")"); -x_3 = lean::mk_nat_obj(0u); -x_4 = l_Lean_Parser_symbol_tokens___rarg(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_1); -lean::dec(x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -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::dec(x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; uint8 x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_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; -x_1 = lean::box(0); -x_2 = lean::mk_string("{"); -x_3 = lean::mk_nat_obj(0u); -x_4 = l_Lean_Parser_symbol_tokens___rarg(x_2, x_3); -lean::dec(x_2); -x_5 = 0; -x_6 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens(x_5); -x_7 = lean::mk_string("}"); -x_8 = l_Lean_Parser_symbol_tokens___rarg(x_7, x_3); -lean::dec(x_7); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_1); -lean::dec(x_8); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_10); -lean::dec(x_10); -lean::dec(x_4); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = lean::mk_string("⦃"); -x_14 = l_Lean_Parser_symbol_tokens___rarg(x_13, x_3); -lean::dec(x_13); -x_15 = lean::mk_string("⦄"); -x_16 = l_Lean_Parser_symbol_tokens___rarg(x_15, x_3); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_16, x_1); -lean::dec(x_16); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_17); -lean::dec(x_17); -lean::dec(x_6); -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_18); -lean::dec(x_18); -lean::dec(x_14); -x_20 = l_Lean_Parser_tokens___rarg(x_19); -lean::dec(x_19); -x_21 = lean::mk_string("["); -x_22 = l_Lean_Parser_symbol_tokens___rarg(x_21, x_3); -lean::dec(x_21); -x_23 = lean::mk_string(" : "); -x_24 = l_Lean_Parser_symbol_tokens___rarg(x_23, x_3); -lean::dec(x_23); -x_25 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_3); -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_25, x_1); -lean::dec(x_25); -x_27 = l_Lean_Parser_List_cons_tokens___rarg(x_24, x_26); -lean::dec(x_24); -x_28 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_27); -lean::dec(x_27); -x_29 = l_Lean_Parser_tokens___rarg(x_28); -lean::dec(x_28); -x_30 = l_Lean_Parser_tokens___rarg(x_26); -lean::dec(x_26); -x_31 = l_Lean_Parser_List_cons_tokens___rarg(x_30, x_1); -lean::dec(x_30); -x_32 = l_Lean_Parser_List_cons_tokens___rarg(x_29, x_31); -lean::dec(x_31); -lean::dec(x_29); -x_33 = l_Lean_Parser_tokens___rarg(x_32); -lean::dec(x_32); -x_34 = l_Lean_Parser_List_cons_tokens___rarg(x_33, x_1); -lean::dec(x_33); -x_35 = l_Lean_Parser_tokens___rarg(x_34); -lean::dec(x_34); -x_36 = lean::mk_string("]"); -x_37 = l_Lean_Parser_symbol_tokens___rarg(x_36, x_3); -lean::dec(x_36); -x_38 = l_Lean_Parser_List_cons_tokens___rarg(x_37, x_1); -lean::dec(x_37); -x_39 = l_Lean_Parser_List_cons_tokens___rarg(x_35, x_38); -lean::dec(x_38); -lean::dec(x_35); -x_40 = l_Lean_Parser_List_cons_tokens___rarg(x_22, x_39); -lean::dec(x_39); -lean::dec(x_22); -x_41 = l_Lean_Parser_tokens___rarg(x_40); -lean::dec(x_40); -x_42 = l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasTokens; -x_43 = l_Lean_Parser_List_cons_tokens___rarg(x_42, x_1); -x_44 = l_Lean_Parser_List_cons_tokens___rarg(x_41, x_43); -lean::dec(x_43); -lean::dec(x_41); -x_45 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_44); -lean::dec(x_44); -lean::dec(x_20); -x_46 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_45); -lean::dec(x_45); -lean::dec(x_12); -return x_46; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens(uint8 x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_2 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens(x_1); -x_3 = lean::box(0); -x_4 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_command_notationLike_Parser_Lean_Parser_HasTokens; -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_4); -lean::dec(x_4); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_3); -lean::dec(x_7); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__1; -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_10); -lean::dec(x_9); -x_12 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__2; -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_11); -lean::dec(x_11); -x_14 = l_Lean_Parser_tokens___rarg(x_13); -lean::dec(x_13); -x_15 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__3; -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_15); -lean::dec(x_14); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_17, x_3); -lean::dec(x_17); -x_19 = l_Lean_Parser_tokens___rarg(x_18); -lean::dec(x_18); -return x_19; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__4(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__5___boxed(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_11; -x_11 = l_List_mfoldr___main___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -lean::dec(x_1); -return x_11; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_command_notationLike_Parser), 5, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__2() { -_start: -{ -uint8 x_1; obj* x_2; -x_1 = 0; -x_2 = l_Lean_Parser_Term_explicitBinderContent(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string(")"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -lean::inc(x_3); -x_4 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_6, 0, x_3); -lean::closure_set(x_6, 1, x_5); -lean::closure_set(x_6, 2, x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_1); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::mk_string("("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_1 = lean::box(0); -x_2 = lean::mk_string("{"); -x_3 = l_String_trim(x_2); -lean::dec(x_2); -lean::inc(x_3); -x_4 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_6, 0, x_3); -lean::closure_set(x_6, 1, x_5); -lean::closure_set(x_6, 2, x_4); -x_7 = 0; -x_8 = lean::box(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderContent_Parser___boxed), 6, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::mk_string("}"); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_5); -lean::closure_set(x_13, 2, 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_1); -lean::inc(x_9); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_Term_implicitBinder; -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_18, 0, x_17); -lean::closure_set(x_18, 1, x_16); -x_19 = lean::mk_string("⦃"); -x_20 = l_String_trim(x_19); -lean::dec(x_19); -lean::inc(x_20); -x_21 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_21, 0, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_5); -lean::closure_set(x_22, 2, x_21); -x_23 = lean::mk_string("⦄"); -x_24 = l_String_trim(x_23); -lean::dec(x_23); -lean::inc(x_24); -x_25 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_25, 0, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_26, 0, x_24); -lean::closure_set(x_26, 1, x_5); -lean::closure_set(x_26, 2, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_9); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_22); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_Lean_Parser_Term_strictImplicitBinder; -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_31, 0, x_30); -lean::closure_set(x_31, 1, x_29); -x_32 = lean::mk_string("["); -x_33 = l_String_trim(x_32); -lean::dec(x_32); -lean::inc(x_33); -x_34 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_34, 0, x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_35, 0, x_33); -lean::closure_set(x_35, 1, x_5); -lean::closure_set(x_35, 2, x_34); -x_36 = lean::mk_string(" : "); -x_37 = l_String_trim(x_36); -lean::dec(x_36); -lean::inc(x_37); -x_38 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_38, 0, x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_39, 0, x_37); -lean::closure_set(x_39, 1, x_5); -lean::closure_set(x_39, 2, x_38); -x_40 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_40, 0, x_5); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_1); -lean::inc(x_41); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_39); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_42); -x_45 = l_Lean_Parser_Term_instImplicitNamedBinder; -x_46 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_46, 0, x_45); -lean::closure_set(x_46, 1, x_44); -x_47 = l_Lean_Parser_Term_instImplicitAnonymousBinder; -x_48 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_48, 0, x_47); -lean::closure_set(x_48, 1, x_41); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_1); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_46); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestChoice___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_51, 0, x_50); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_1); -x_53 = l_Lean_Parser_Term_instImplicitBinderContent; -x_54 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_54, 0, x_53); -lean::closure_set(x_54, 1, x_52); -x_55 = lean::mk_string("]"); -x_56 = l_String_trim(x_55); -lean::dec(x_55); -lean::inc(x_56); -x_57 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_57, 0, x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_58, 0, x_56); -lean::closure_set(x_58, 1, x_5); -lean::closure_set(x_58, 2, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_1); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_54); -lean::cnstr_set(x_60, 1, x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_35); -lean::cnstr_set(x_61, 1, x_60); -x_62 = l_Lean_Parser_Term_instImplicitBinder; -x_63 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_63, 0, x_62); -lean::closure_set(x_63, 1, x_61); -x_64 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_anonymousConstructor_Parser), 5, 0); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_1); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_63); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_31); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_18); -lean::cnstr_set(x_68, 1, x_67); -return x_68; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__6() { -_start: -{ -uint8 x_1; obj* x_2; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__7() { -_start: -{ -uint8 x_1; obj* x_2; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView(uint8 x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_2 = lean::box(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderContent_Parser___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::box(0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__1; -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_4); -x_11 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__2; -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_12, 0, x_11); -lean::closure_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__3; -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 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__4; -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 = l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1; -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_18, 0, x_17); -lean::closure_set(x_18, 1, x_16); -x_19 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__5; -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_21, 0, x_20); -lean::closure_set(x_21, 1, x_8); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_4); -x_23 = l_Lean_Parser_TermParserM_Monad; -x_24 = l_Lean_Parser_TermParserM_MonadExcept; -x_25 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_26 = l_Lean_Parser_TermParserM_Alternative; -x_27 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__6; -x_28 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__7; -x_29 = l_Lean_Parser_Combinators_node_view___rarg(x_23, x_24, x_25, x_26, x_27, x_22, x_28); -lean::dec(x_22); -return x_29; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___boxed(obj* x_1) { -_start: -{ -uint8 x_2; obj* x_3; -x_2 = lean::unbox(x_1); -lean::dec(x_1); -x_3 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView(x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_Parser(uint8 x_1, obj* 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; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_7 = lean::box(x_1); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderContent_Parser___boxed), 6, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__1; -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::mk_nat_obj(0u); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_9); -x_16 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__2; -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_15); -x_18 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__3; -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__4; -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -x_22 = l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_22); -lean::closure_set(x_23, 1, x_21); -x_24 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__5; -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_26, 0, x_25); -lean::closure_set(x_26, 1, x_13); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_9); -x_28 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__6; -x_29 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_28, x_27, x_2, x_3, x_4, x_5, x_6); -return x_29; -} -} -obj* l_Lean_Parser_Term_bracketedBinder_Parser___boxed(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_1); -lean::dec(x_1); -x_8 = l_Lean_Parser_Term_bracketedBinder_Parser(x_7, x_2, x_3, x_4, x_5, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_binder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; uint8 x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = 0; -x_5 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_4); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_2); -x_9 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_2); -x_12 = l_Lean_Parser_Term_binder; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1(x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_2); -x_17 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_2); -x_20 = l_Lean_Parser_Term_binder; -x_21 = l_Lean_Parser_Syntax_mkNode(x_20, x_19); -return x_21; -} -} -} -obj* _init_l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -uint8 x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_30 = 0; -x_31 = l_Lean_Parser_Term_binderContent_HasView_x27(x_30); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -lean::dec(x_31); -x_33 = lean::apply_1(x_32, x_27); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -else -{ -uint8 x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_35 = 0; -x_36 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_35); -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -lean::dec(x_36); -x_38 = lean::apply_1(x_37, x_27); -x_39 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -return x_39; -} -} -else -{ -obj* x_40; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_40 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_40; -} -} -} -} -} -} -} -else -{ -obj* x_41; -lean::dec(x_11); -lean::dec(x_6); -x_41 = l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1; -return x_41; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_binder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_binder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_binder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasTokens() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens(x_1); -x_3 = l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_5); -lean::dec(x_5); -lean::dec(x_2); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_4); -lean::dec(x_7); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasView() { -_start: -{ -uint8 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; -x_1 = 0; -x_2 = lean::box(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::box(x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderContent_Parser___boxed), 6, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_3); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_6); -x_12 = l_Lean_Parser_TermParserM_Monad; -x_13 = l_Lean_Parser_TermParserM_MonadExcept; -x_14 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_15 = l_Lean_Parser_TermParserM_Alternative; -x_16 = l_Lean_Parser_Term_binder; -x_17 = l_Lean_Parser_Term_binder_HasView; -x_18 = l_Lean_Parser_Combinators_node_view___rarg(x_12, x_13, x_14, x_15, x_16, x_11, x_17); -lean::dec(x_11); -return x_18; -} -} -obj* _init_l_Lean_Parser_Term_binder_Parser___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = 0; -x_2 = lean::box(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::box(x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderContent_Parser___boxed), 6, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_3); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_6); -return x_11; -} -} -obj* l_Lean_Parser_Term_binder_Parser(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; -x_6 = l_Lean_Parser_Term_binder; -x_7 = l_Lean_Parser_Term_binder_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_bindersTypes() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("bindersTypes"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_bindersTypes; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_bindersTypes; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_bindersTypes_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_bindersTypes_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_bindersTypes_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_mixedBinder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("mixedBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_mixedBinder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; uint8 x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = 0; -x_5 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_4); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_2); -x_9 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_2); -x_12 = l_Lean_Parser_Term_mixedBinder; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = l_Lean_Parser_Term_binderIdent_HasView; -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_2); -x_19 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_2); -x_22 = l_Lean_Parser_Term_mixedBinder; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -return x_23; -} -} -} -obj* _init_l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("mixedBinder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_binderIdent_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -uint8 x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_34 = 0; -x_35 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_34); -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -lean::dec(x_35); -x_37 = lean::apply_1(x_36, x_27); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -return x_38; -} -} -else -{ -obj* x_39; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_39 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -} -else -{ -obj* x_40; -lean::dec(x_11); -lean::dec(x_6); -x_40 = l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1; -return x_40; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_mixedBinder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_mixedBinder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_mixedBinder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_mixedBinder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_bindersRemainder() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("bindersRemainder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Term_mixedBinder_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_bindersTypes_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_bindersRemainder; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1___closed__1; -x_15 = l_List_map___main___rarg(x_14, x_13); -x_16 = l_Lean_Parser_noKind; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_2); -x_19 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_2); -x_22 = l_Lean_Parser_Term_bindersRemainder; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -return x_23; -} -} -} -obj* _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = l_Lean_Parser_Term_mixedBinder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Term_mixedBinder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_bindersTypes_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("bindersRemainder"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__4; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; -x_30 = l_Lean_Parser_Syntax_asNode___main(x_27); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; -x_31 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__1; -return x_31; -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -x_34 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__2; -x_35 = l_List_map___main___rarg(x_34, x_33); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_37 = l_Lean_Parser_Term_bindersTypes_HasView; -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -x_39 = lean::apply_1(x_38, x_27); -x_40 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -return x_40; -} -} -else -{ -obj* x_41; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_41 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_41; -} -} -} -} -} -} -} -else -{ -obj* x_42; -lean::dec(x_11); -lean::dec(x_6); -x_42 = l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3; -return x_42; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_bindersRemainder_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_bindersRemainder_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_bindersExt() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("bindersExt"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__1; -x_5 = l_List_map___main___rarg(x_4, x_2); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_Term_bindersExt; -x_11 = l_Lean_Parser_Syntax_mkNode(x_10, x_9); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -lean::dec(x_3); -x_13 = lean::box(0); -x_14 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_12); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_13); -x_18 = l_Lean_Parser_Syntax_mkNode(x_6, 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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_7); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_Term_bindersExt; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = l_Lean_Parser_Term_binderIdent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_3); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_6); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2() { -_start: -{ -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_1 = l_Lean_Parser_Term_binderIdent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, 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::box(0); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_12 = lean::apply_1(x_11, x_9); -lean::cnstr_set(x_2, 0, x_12); -x_13 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3; -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -return x_14; -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::dec(x_6); -lean::free_heap_obj(x_2); -x_15 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1; -return x_15; -} -} -} -else -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2; -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_17, 1); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_20 = lean::cnstr_get(x_17, 0); -lean::inc(x_20); -lean::dec(x_17); -x_21 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3; -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -return x_26; -} -else -{ -obj* x_27; -lean::dec(x_19); -lean::dec(x_17); -x_27 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1; -return x_27; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4; -x_8 = l_List_map___main___rarg(x_7, x_6); -x_9 = lean::cnstr_get(x_5, 1); -lean::inc(x_9); -lean::dec(x_5); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -lean::cnstr_set(x_2, 0, x_16); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_8); -lean::cnstr_set(x_17, 1, x_2); -return x_17; -} -else -{ -obj* x_18; obj* x_19; -lean::dec(x_12); -lean::dec(x_9); -lean::free_heap_obj(x_2); -x_18 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_8); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -x_22 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4; -x_23 = l_List_map___main___rarg(x_22, x_21); -x_24 = lean::cnstr_get(x_20, 1); -lean::inc(x_24); -lean::dec(x_20); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::box(0); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_23); -lean::cnstr_set(x_26, 1, x_25); -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_28 = lean::cnstr_get(x_24, 0); -lean::inc(x_28); -lean::dec(x_24); -x_29 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::apply_1(x_30, x_28); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_23); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; -lean::dec(x_27); -lean::dec(x_24); -x_34 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_23); -lean::cnstr_set(x_35, 1, x_34); -return x_35; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_98; -x_98 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_98) == 0) -{ -obj* x_99; -x_99 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__5; -return x_99; -} -else -{ -obj* x_100; obj* x_101; -x_100 = lean::cnstr_get(x_98, 0); -lean::inc(x_100); -lean::dec(x_98); -x_101 = lean::cnstr_get(x_100, 1); -lean::inc(x_101); -lean::dec(x_100); -if (lean::obj_tag(x_101) == 0) -{ -obj* x_102; -x_102 = lean::box(3); -x_2 = x_101; -x_3 = x_102; -goto block_97; -} -else -{ -obj* x_103; obj* x_104; -x_103 = lean::cnstr_get(x_101, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_101, 1); -lean::inc(x_104); -lean::dec(x_101); -x_2 = x_104; -x_3 = x_103; -goto block_97; -} -} -block_97: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__3; -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1; -return x_8; -} -else -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_7, 0); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -lean::dec(x_10); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; -lean::free_heap_obj(x_7); -x_12 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2; -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_11, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_11, 0); -lean::inc(x_14); -lean::dec(x_11); -x_15 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_7, 0, x_17); -x_18 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3; -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_7); -return x_19; -} -else -{ -obj* x_20; -lean::dec(x_13); -lean::dec(x_11); -lean::free_heap_obj(x_7); -x_20 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1; -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_7, 0); -lean::inc(x_21); -lean::dec(x_7); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; -x_23 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2; -return x_23; -} -else -{ -obj* x_24; -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_22, 0); -lean::inc(x_25); -lean::dec(x_22); -x_26 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::apply_1(x_27, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3; -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -return x_31; -} -else -{ -obj* x_32; -lean::dec(x_24); -lean::dec(x_22); -x_32 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1; -return x_32; -} -} -} -} -} -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_33 = lean::cnstr_get(x_4, 0); -lean::inc(x_33); -lean::dec(x_4); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -x_35 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4; -x_36 = l_List_map___main___rarg(x_35, x_34); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_37; obj* x_38; -x_37 = lean::box(3); -x_38 = l_Lean_Parser_Syntax_asNode___main(x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; -x_39 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_36); -lean::cnstr_set(x_40, 1, x_39); -return x_40; -} -else -{ -uint8 x_41; -x_41 = !lean::is_exclusive(x_38); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_38, 0); -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -lean::dec(x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; -lean::free_heap_obj(x_38); -x_44 = lean::box(0); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_36); -lean::cnstr_set(x_45, 1, x_44); -return x_45; -} -else -{ -obj* x_46; -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::apply_1(x_49, x_47); -lean::cnstr_set(x_38, 0, x_50); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_36); -lean::cnstr_set(x_51, 1, x_38); -return x_51; -} -else -{ -obj* x_52; obj* x_53; -lean::dec(x_46); -lean::dec(x_43); -lean::free_heap_obj(x_38); -x_52 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_36); -lean::cnstr_set(x_53, 1, x_52); -return x_53; -} -} -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_38, 0); -lean::inc(x_54); -lean::dec(x_38); -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -lean::dec(x_54); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; -x_56 = lean::box(0); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_36); -lean::cnstr_set(x_57, 1, x_56); -return x_57; -} -else -{ -obj* x_58; -x_58 = lean::cnstr_get(x_55, 1); -lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_59 = lean::cnstr_get(x_55, 0); -lean::inc(x_59); -lean::dec(x_55); -x_60 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -x_62 = lean::apply_1(x_61, x_59); -x_63 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_63, 0, x_62); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_36); -lean::cnstr_set(x_64, 1, x_63); -return x_64; -} -else -{ -obj* x_65; obj* x_66; -lean::dec(x_58); -lean::dec(x_55); -x_65 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_36); -lean::cnstr_set(x_66, 1, x_65); -return x_66; -} -} -} -} -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_2, 0); -lean::inc(x_67); -lean::dec(x_2); -x_68 = l_Lean_Parser_Syntax_asNode___main(x_67); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; obj* x_70; -x_69 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -x_70 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_70, 0, x_36); -lean::cnstr_set(x_70, 1, x_69); -return x_70; -} -else -{ -uint8 x_71; -x_71 = !lean::is_exclusive(x_68); -if (x_71 == 0) -{ -obj* x_72; obj* x_73; -x_72 = lean::cnstr_get(x_68, 0); -x_73 = lean::cnstr_get(x_72, 1); -lean::inc(x_73); -lean::dec(x_72); -if (lean::obj_tag(x_73) == 0) -{ -obj* x_74; obj* x_75; -lean::free_heap_obj(x_68); -x_74 = lean::box(0); -x_75 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_75, 0, x_36); -lean::cnstr_set(x_75, 1, x_74); -return x_75; -} -else -{ -obj* x_76; -x_76 = lean::cnstr_get(x_73, 1); -lean::inc(x_76); -if (lean::obj_tag(x_76) == 0) -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_77 = lean::cnstr_get(x_73, 0); -lean::inc(x_77); -lean::dec(x_73); -x_78 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_79 = lean::cnstr_get(x_78, 0); -lean::inc(x_79); -x_80 = lean::apply_1(x_79, x_77); -lean::cnstr_set(x_68, 0, x_80); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_36); -lean::cnstr_set(x_81, 1, x_68); -return x_81; -} -else -{ -obj* x_82; obj* x_83; -lean::dec(x_76); -lean::dec(x_73); -lean::free_heap_obj(x_68); -x_82 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -x_83 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_83, 0, x_36); -lean::cnstr_set(x_83, 1, x_82); -return x_83; -} -} -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_68, 0); -lean::inc(x_84); -lean::dec(x_68); -x_85 = lean::cnstr_get(x_84, 1); -lean::inc(x_85); -lean::dec(x_84); -if (lean::obj_tag(x_85) == 0) -{ -obj* x_86; obj* x_87; -x_86 = lean::box(0); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_36); -lean::cnstr_set(x_87, 1, x_86); -return x_87; -} -else -{ -obj* x_88; -x_88 = lean::cnstr_get(x_85, 1); -lean::inc(x_88); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_89 = lean::cnstr_get(x_85, 0); -lean::inc(x_89); -lean::dec(x_85); -x_90 = l_Lean_Parser_Term_bindersRemainder_HasView; -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -x_92 = lean::apply_1(x_91, x_89); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_92); -x_94 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_94, 0, x_36); -lean::cnstr_set(x_94, 1, x_93); -return x_94; -} -else -{ -obj* x_95; obj* x_96; -lean::dec(x_88); -lean::dec(x_85); -x_95 = l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4; -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_36); -lean::cnstr_set(x_96, 1, x_95); -return x_96; -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bindersExt_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_bindersExt_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_1 = l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_tokens___rarg(x_1); -x_3 = lean::mk_string(":"); -x_4 = lean::mk_nat_obj(0u); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_4); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_7); -lean::dec(x_6); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_8); -lean::dec(x_8); -lean::dec(x_5); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = 0; -x_12 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens(x_11); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_7); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_13); -lean::dec(x_13); -lean::dec(x_12); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_7); -lean::dec(x_15); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_18, x_7); -lean::dec(x_18); -x_20 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_19); -lean::dec(x_19); -lean::dec(x_10); -x_21 = l_Lean_Parser_tokens___rarg(x_20); -lean::dec(x_20); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_21, x_7); -lean::dec(x_21); -x_23 = l_Lean_Parser_tokens___rarg(x_22); -lean::dec(x_22); -x_24 = l_Lean_Parser_tokens___rarg(x_23); -lean::dec(x_23); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_24, x_7); -lean::dec(x_24); -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_25); -lean::dec(x_25); -lean::dec(x_2); -x_27 = l_Lean_Parser_tokens___rarg(x_26); -lean::dec(x_26); -return x_27; -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 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_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderIdent_Parser), 5, 0); -lean::inc(x_1); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::mk_string(":"); -x_4 = l_String_trim(x_3); -lean::dec(x_3); -lean::inc(x_4); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_7, 0, x_4); -lean::closure_set(x_7, 1, x_6); -lean::closure_set(x_7, 2, x_5); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_8, 0, x_6); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_7); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_Term_bindersTypes; -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_13, 0, x_12); -lean::closure_set(x_13, 1, x_11); -x_14 = 0; -x_15 = lean::box(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, 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_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_19, 0, x_18); -lean::closure_set(x_19, 1, x_6); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_9); -x_21 = l_Lean_Parser_Term_mixedBinder; -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_22, 0, x_21); -lean::closure_set(x_22, 1, x_20); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__2), 6, 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_9); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_26, 0, x_25); -lean::closure_set(x_26, 1, x_6); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_9); -x_28 = l_Lean_Parser_Term_bindersRemainder; -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_29, 0, x_28); -lean::closure_set(x_29, 1, x_27); -x_30 = lean::box(x_14); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_31, 0, x_29); -lean::closure_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_9); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_2); -lean::cnstr_set(x_33, 1, x_32); -x_34 = l_Lean_Parser_TermParserM_Monad; -x_35 = l_Lean_Parser_TermParserM_MonadExcept; -x_36 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_37 = l_Lean_Parser_TermParserM_Alternative; -x_38 = l_Lean_Parser_Term_bindersExt; -x_39 = l_Lean_Parser_Term_bindersExt_HasView; -x_40 = l_Lean_Parser_Combinators_node_view___rarg(x_34, x_35, x_36, x_37, x_38, x_33, x_39); -lean::dec(x_33); -return x_40; -} -} -obj* _init_l_Lean_Parser_Term_bindersExt_Parser___closed__1() { -_start: -{ -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; uint8 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_31; obj* x_32; obj* x_33; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binderIdent_Parser), 5, 0); -lean::inc(x_1); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::mk_string(":"); -x_4 = l_String_trim(x_3); -lean::dec(x_3); -lean::inc(x_4); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_7, 0, x_4); -lean::closure_set(x_7, 1, x_6); -lean::closure_set(x_7, 2, x_5); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_8, 0, x_6); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_7); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_Term_bindersTypes; -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_13, 0, x_12); -lean::closure_set(x_13, 1, x_11); -x_14 = 0; -x_15 = lean::box(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, 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_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_19, 0, x_18); -lean::closure_set(x_19, 1, x_6); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_9); -x_21 = l_Lean_Parser_Term_mixedBinder; -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_22, 0, x_21); -lean::closure_set(x_22, 1, x_20); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many1___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__2), 6, 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_9); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_26, 0, x_25); -lean::closure_set(x_26, 1, x_6); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_9); -x_28 = l_Lean_Parser_Term_bindersRemainder; -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_29, 0, x_28); -lean::closure_set(x_29, 1, x_27); -x_30 = lean::box(x_14); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_31, 0, x_29); -lean::closure_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_9); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_2); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -obj* l_Lean_Parser_Term_bindersExt_Parser(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; -x_6 = l_Lean_Parser_Term_bindersExt; -x_7 = l_Lean_Parser_Term_bindersExt_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_binders() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binders"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binders_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_bindersExt_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_binders; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_simpleBinder_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_binders; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_bindersExt_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("binders"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_binders_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_simpleBinder_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Term_bindersExt_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_binders_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_binders_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_binders_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_1); -x_4 = l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasTokens; -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_3); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_1); -lean::dec(x_6); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleBinder_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bindersExt_Parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_TermParserM_Monad; -x_10 = l_Lean_Parser_TermParserM_MonadExcept; -x_11 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_12 = l_Lean_Parser_TermParserM_Alternative; -x_13 = l_Lean_Parser_Term_binders; -x_14 = l_Lean_Parser_Term_binders_HasView; -x_15 = l_Lean_Parser_Combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -lean::dec(x_8); -return x_15; -} -} -obj* _init_l_Lean_Parser_Term_binders_Parser___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleBinder_Parser), 5, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bindersExt_Parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* l_Lean_Parser_Term_binders_Parser(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; -x_6 = l_Lean_Parser_Term_binders; -x_7 = l_Lean_Parser_Term_binders_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("bracketedBinders"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 1); -lean::inc(x_3); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Term_simpleBinder_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__1; -x_5 = l_List_map___main___rarg(x_4, x_3); -x_6 = l_Lean_Parser_noKind; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_2); -x_9 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_2); -x_12 = l_Lean_Parser_Term_bracketedBinders; -x_13 = l_Lean_Parser_Syntax_mkNode(x_12, x_11); -return x_13; -} -else -{ -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_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); -lean::dec(x_1); -x_15 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__2; -x_16 = l_List_map___main___rarg(x_15, x_14); -x_17 = l_Lean_Parser_noKind; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_2); -x_20 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_21 = l_Lean_Parser_Syntax_mkNode(x_20, x_19); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_2); -x_23 = l_Lean_Parser_Term_bracketedBinders; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -return x_24; -} -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = l_Lean_Parser_Term_simpleBinder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_Term_simpleBinder_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__3() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4; -x_7 = l_List_map___main___rarg(x_6, x_5); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("bracketedBinders"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__6; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; -x_30 = l_Lean_Parser_Syntax_asNode___main(x_27); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; -x_31 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__1; -return x_31; -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -lean::dec(x_32); -x_34 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__2; -x_35 = l_List_map___main___rarg(x_34, x_33); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -return x_36; -} -} -else -{ -obj* x_37; -x_37 = l_Lean_Parser_Syntax_asNode___main(x_27); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__3; -return x_38; -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_39 = lean::cnstr_get(x_37, 0); -lean::inc(x_39); -lean::dec(x_37); -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -lean::dec(x_39); -x_41 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4; -x_42 = l_List_map___main___rarg(x_41, x_40); -x_43 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -return x_43; -} -} -} -else -{ -obj* x_44; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_44 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_44; -} -} -} -} -} -} -} -else -{ -obj* x_45; -lean::dec(x_11); -lean::dec(x_6); -x_45 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5; -return x_45; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_bracketedBinders_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens(x_1); -x_3 = l_Lean_Parser_tokens___rarg(x_2); -lean::dec(x_2); -x_4 = l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasTokens; -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); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_6); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -return x_11; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasView() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_1 = 0; -x_2 = lean::box(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 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_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleBinder_Parser), 5, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::mk_nat_obj(0u); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_7); -x_13 = l_Lean_Parser_TermParserM_Monad; -x_14 = l_Lean_Parser_TermParserM_MonadExcept; -x_15 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_16 = l_Lean_Parser_TermParserM_Alternative; -x_17 = l_Lean_Parser_Term_bracketedBinders; -x_18 = l_Lean_Parser_Term_bracketedBinders_HasView; -x_19 = l_Lean_Parser_Combinators_node_view___rarg(x_13, x_14, x_15, x_16, x_17, x_12, x_18); -lean::dec(x_12); -return x_19; -} -} -obj* _init_l_Lean_Parser_Term_bracketedBinders_Parser___closed__1() { -_start: -{ -uint8 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_1 = 0; -x_2 = lean::box(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 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_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_simpleBinder_Parser), 5, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::mk_nat_obj(0u); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_7); -return x_12; -} -} -obj* l_Lean_Parser_Term_bracketedBinders_Parser(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; -x_6 = l_Lean_Parser_Term_bracketedBinders; -x_7 = l_Lean_Parser_Term_bracketedBinders_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_lambda() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("lambda"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_lambda_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_Lean_Parser_Term_binders_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_3); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_lambda; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_17 = lean::cnstr_get(x_4, 0); -lean::inc(x_17); -lean::dec(x_4); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_8); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_2); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_Term_lambda; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -return x_23; -} -} -} -obj* _init_l_Lean_Parser_Term_lambda_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_Term_binders_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 2, x_5); -lean::cnstr_set(x_6, 3, x_3); -return x_6; -} -} -obj* l_Lean_Parser_Term_lambda_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_lambda_HasView_x27___lambda__1___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_2 = x_34; -x_3 = x_35; -goto block_30; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -lean::dec(x_34); -x_2 = x_37; -x_3 = x_36; -goto block_30; -} -} -block_30: -{ -obj* x_4; obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_27; -x_27 = lean::box(3); -x_4 = x_2; -x_5 = x_27; -goto block_26; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_2, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_2, 1); -lean::inc(x_29); -lean::dec(x_2); -x_4 = x_29; -x_5 = x_28; -goto block_26; -} -block_26: -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = l_Lean_Parser_Term_binders_HasView; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_5); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::box(0); -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_11, 0, x_3); -lean::cnstr_set(x_11, 1, x_8); -lean::cnstr_set(x_11, 2, x_9); -lean::cnstr_set(x_11, 3, x_10); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_4, 0); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_4, 1); -lean::inc(x_13); -lean::dec(x_4); -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::box(3); -x_17 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_17, 0, x_3); -lean::cnstr_set(x_17, 1, x_8); -lean::cnstr_set(x_17, 2, x_15); -lean::cnstr_set(x_17, 3, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_13, 0); -lean::inc(x_18); -lean::dec(x_13); -x_19 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_19, 0, x_3); -lean::cnstr_set(x_19, 1, x_8); -lean::cnstr_set(x_19, 2, x_15); -lean::cnstr_set(x_19, 3, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; -lean::dec(x_12); -x_20 = lean::cnstr_get(x_4, 1); -lean::inc(x_20); -lean::dec(x_4); -x_21 = lean::box(0); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_23, 0, x_3); -lean::cnstr_set(x_23, 1, x_8); -lean::cnstr_set(x_23, 2, x_21); -lean::cnstr_set(x_23, 3, x_22); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_20, 0); -lean::inc(x_24); -lean::dec(x_20); -x_25 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_25, 0, x_3); -lean::cnstr_set(x_25, 1, x_8); -lean::cnstr_set(x_25, 2, x_21); -lean::cnstr_set(x_25, 3, x_24); -return x_25; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_lambda_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_lambda_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_lambda_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_lambda_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_lambda_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1(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_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; -x_9 = l_String_trim(x_1); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -lean::inc(x_3); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_3); -lean::closure_set(x_11, 2, x_10); -x_12 = l_String_trim(x_2); -lean::inc(x_12); -x_13 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_3); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_11); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__2(x_17, x_5, x_7, x_8); -return x_18; -} -} -obj* _init_l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("λ"); -x_2 = lean::mk_string("fun"); -x_3 = l_Lean_Parser_maxPrec; -x_4 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -x_5 = lean::mk_string(","); -x_6 = lean::mk_nat_obj(0u); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_6); -x_9 = lean::box(0); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_9); -lean::dec(x_8); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_10); -lean::dec(x_10); -lean::dec(x_7); -x_12 = l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasTokens; -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_11); -lean::dec(x_11); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_13); -lean::dec(x_13); -lean::dec(x_4); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -return x_15; -} -} -obj* l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed(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_9; -x_9 = l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::mk_string("λ"); -x_2 = lean::mk_string("fun"); -x_3 = l_Lean_Parser_maxPrec; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_2); -lean::closure_set(x_4, 2, x_3); -x_5 = lean::mk_string(","); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_Parser), 5, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_TermParserM_Monad; -x_18 = l_Lean_Parser_TermParserM_MonadExcept; -x_19 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_20 = l_Lean_Parser_TermParserM_Alternative; -x_21 = l_Lean_Parser_Term_lambda; -x_22 = l_Lean_Parser_Term_lambda_HasView; -x_23 = l_Lean_Parser_Combinators_node_view___rarg(x_17, x_18, x_19, x_20, x_21, x_16, x_22); -lean::dec(x_16); -return x_23; -} -} -obj* _init_l_Lean_Parser_Term_lambda_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("λ"); -x_2 = lean::mk_string("fun"); -x_3 = l_Lean_Parser_maxPrec; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_2); -lean::closure_set(x_4, 2, x_3); -x_5 = lean::mk_string(","); -x_6 = l_String_trim(x_5); -lean::dec(x_5); -lean::inc(x_6); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_6); -lean::closure_set(x_9, 1, x_8); -lean::closure_set(x_9, 2, x_7); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_Parser), 5, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -obj* l_Lean_Parser_Term_lambda_Parser(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; -x_6 = l_Lean_Parser_Term_lambda; -x_7 = l_Lean_Parser_Term_lambda_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_assumeAnonymous() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("assumeAnonymous"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_assumeAnonymous; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_assumeAnonymous; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_assumeAnonymous_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_assumeAnonymous_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_assumeAnonymous_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_assumeBinders() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("assumeBinders"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_assumeBinders_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_assumeAnonymous_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_assumeBinders; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_binders_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_assumeBinders; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_assumeAnonymous_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("assumeBinders"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_binders_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Term_assumeAnonymous_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_assumeBinders_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_assumeBinders_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_assumeBinders_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_assumeBinders_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_assume() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("assume"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_assume_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_Lean_Parser_Term_assumeBinders_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_3); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_assume; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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_17 = lean::cnstr_get(x_4, 0); -lean::inc(x_17); -lean::dec(x_4); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_8); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_Lean_Parser_Term_assume; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -lean::dec(x_2); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_10); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_8); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_Term_assume; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_33 = lean::cnstr_get(x_4, 0); -lean::inc(x_33); -lean::dec(x_4); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_10); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_8); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_26); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_Term_assume; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -return x_39; -} -} -} -} -obj* _init_l_Lean_Parser_Term_assume_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_assumeBinders_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_1); -lean::cnstr_set(x_6, 3, x_4); -return x_6; -} -} -obj* l_Lean_Parser_Term_assume_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_36; -x_36 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_37; -x_37 = l_Lean_Parser_Term_assume_HasView_x27___lambda__1___closed__1; -return x_37; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_36, 0); -lean::inc(x_38); -lean::dec(x_36); -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -lean::dec(x_38); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; -x_40 = lean::box(3); -x_2 = x_39; -x_3 = x_40; -goto block_35; -} -else -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_39, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_39, 1); -lean::inc(x_42); -lean::dec(x_39); -x_2 = x_42; -x_3 = x_41; -goto block_35; -} -} -block_35: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_3, 0); -lean::inc(x_32); -lean::dec(x_3); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_4 = x_33; -goto block_31; -} -else -{ -obj* x_34; -lean::dec(x_3); -x_34 = lean::box(0); -x_4 = x_34; -goto block_31; -} -block_31: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_28; -x_28 = lean::box(3); -x_5 = x_2; -x_6 = x_28; -goto block_27; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_2, 0); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_2, 1); -lean::inc(x_30); -lean::dec(x_2); -x_5 = x_30; -x_6 = x_29; -goto block_27; -} -block_27: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l_Lean_Parser_Term_assumeBinders_HasView; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_6); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::box(0); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_9); -lean::cnstr_set(x_12, 2, x_10); -lean::cnstr_set(x_12, 3, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_5, 0); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_5, 1); -lean::inc(x_14); -lean::dec(x_5); -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::box(3); -x_18 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_9); -lean::cnstr_set(x_18, 2, x_16); -lean::cnstr_set(x_18, 3, x_17); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_14, 0); -lean::inc(x_19); -lean::dec(x_14); -x_20 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_9); -lean::cnstr_set(x_20, 2, x_16); -lean::cnstr_set(x_20, 3, x_19); -return x_20; -} -} -else -{ -obj* x_21; obj* x_22; -lean::dec(x_13); -x_21 = lean::cnstr_get(x_5, 1); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::box(0); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::box(3); -x_24 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_24, 0, x_4); -lean::cnstr_set(x_24, 1, x_9); -lean::cnstr_set(x_24, 2, x_22); -lean::cnstr_set(x_24, 3, x_23); -return x_24; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_21, 0); -lean::inc(x_25); -lean::dec(x_21); -x_26 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_9); -lean::cnstr_set(x_26, 2, x_22); -lean::cnstr_set(x_26, 3, x_25); -return x_26; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_assume_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_assume_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_assume_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_assume_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_assume_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::mk_string("assume "); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(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); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_5); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_8); -lean::dec(x_7); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_9); -lean::dec(x_6); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasTokens; -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_8); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_13); -lean::dec(x_13); -lean::dec(x_11); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_8); -lean::dec(x_15); -x_17 = l_Lean_Parser_tokens___rarg(x_16); -lean::dec(x_16); -x_18 = lean::mk_string(", "); -x_19 = l_Lean_Parser_symbol_tokens___rarg(x_18, x_5); -lean::dec(x_18); -x_20 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_9); -lean::dec(x_9); -lean::dec(x_19); -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_17, x_20); -lean::dec(x_20); -lean::dec(x_17); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_21); -lean::dec(x_21); -lean::dec(x_3); -x_23 = l_Lean_Parser_tokens___rarg(x_22); -lean::dec(x_22); -return x_23; -} -} -obj* _init_l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; -x_1 = lean::mk_string("assume "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(": "); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_7); -lean::closure_set(x_10, 1, x_9); -lean::closure_set(x_10, 2, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_11, 0, x_9); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_10); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_assumeAnonymous; -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_16, 0, x_15); -lean::closure_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_Parser), 5, 0); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_12); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_9); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_12); -x_22 = l_Lean_Parser_Term_assumeBinders; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_22); -lean::closure_set(x_23, 1, x_21); -x_24 = lean::mk_string(", "); -x_25 = l_String_trim(x_24); -lean::dec(x_24); -lean::inc(x_25); -x_26 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_9); -lean::closure_set(x_27, 2, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_13); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_23); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_5); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_TermParserM_Monad; -x_32 = l_Lean_Parser_TermParserM_MonadExcept; -x_33 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_34 = l_Lean_Parser_TermParserM_Alternative; -x_35 = l_Lean_Parser_Term_assume; -x_36 = l_Lean_Parser_Term_assume_HasView; -x_37 = l_Lean_Parser_Combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_35, x_30, x_36); -lean::dec(x_30); -return x_37; -} -} -obj* _init_l_Lean_Parser_Term_assume_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_1 = lean::mk_string("assume "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(": "); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_7); -lean::closure_set(x_10, 1, x_9); -lean::closure_set(x_10, 2, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_11, 0, x_9); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_10); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_assumeAnonymous; -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_16, 0, x_15); -lean::closure_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_Parser), 5, 0); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_12); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_9); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_12); -x_22 = l_Lean_Parser_Term_assumeBinders; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_22); -lean::closure_set(x_23, 1, x_21); -x_24 = lean::mk_string(", "); -x_25 = l_String_trim(x_24); -lean::dec(x_24); -lean::inc(x_25); -x_26 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_9); -lean::closure_set(x_27, 2, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_13); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_23); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_5); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -obj* l_Lean_Parser_Term_assume_Parser(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; -x_6 = l_Lean_Parser_Term_assume; -x_7 = l_Lean_Parser_Term_assume_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_pi() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("pi"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_pi_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_Lean_Parser_Term_binders_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_3); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_pi; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_17 = lean::cnstr_get(x_4, 0); -lean::inc(x_17); -lean::dec(x_4); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_8); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_2); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_Term_pi; -x_23 = l_Lean_Parser_Syntax_mkNode(x_22, x_21); -return x_23; -} -} -} -obj* _init_l_Lean_Parser_Term_pi_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = l_Lean_Parser_Term_binders_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 2, x_5); -lean::cnstr_set(x_6, 3, x_3); -return x_6; -} -} -obj* l_Lean_Parser_Term_pi_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_pi_HasView_x27___lambda__1___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -lean::dec(x_33); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; -x_35 = lean::box(3); -x_2 = x_34; -x_3 = x_35; -goto block_30; -} -else -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -lean::dec(x_34); -x_2 = x_37; -x_3 = x_36; -goto block_30; -} -} -block_30: -{ -obj* x_4; obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_27; -x_27 = lean::box(3); -x_4 = x_2; -x_5 = x_27; -goto block_26; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_2, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_2, 1); -lean::inc(x_29); -lean::dec(x_2); -x_4 = x_29; -x_5 = x_28; -goto block_26; -} -block_26: -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = l_Lean_Parser_Term_binders_HasView; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_5); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::box(0); -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_11, 0, x_3); -lean::cnstr_set(x_11, 1, x_8); -lean::cnstr_set(x_11, 2, x_9); -lean::cnstr_set(x_11, 3, x_10); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_4, 0); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_4, 1); -lean::inc(x_13); -lean::dec(x_4); -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::box(3); -x_17 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_17, 0, x_3); -lean::cnstr_set(x_17, 1, x_8); -lean::cnstr_set(x_17, 2, x_15); -lean::cnstr_set(x_17, 3, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_13, 0); -lean::inc(x_18); -lean::dec(x_13); -x_19 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_19, 0, x_3); -lean::cnstr_set(x_19, 1, x_8); -lean::cnstr_set(x_19, 2, x_15); -lean::cnstr_set(x_19, 3, x_18); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; -lean::dec(x_12); -x_20 = lean::cnstr_get(x_4, 1); -lean::inc(x_20); -lean::dec(x_4); -x_21 = lean::box(0); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_23, 0, x_3); -lean::cnstr_set(x_23, 1, x_8); -lean::cnstr_set(x_23, 2, x_21); -lean::cnstr_set(x_23, 3, x_22); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_20, 0); -lean::inc(x_24); -lean::dec(x_20); -x_25 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_25, 0, x_3); -lean::cnstr_set(x_25, 1, x_8); -lean::cnstr_set(x_25, 2, x_21); -lean::cnstr_set(x_25, 3, x_24); -return x_25; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_pi_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_pi_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_pi_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_pi_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_pi_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_1 = lean::mk_string("Π"); -x_2 = lean::mk_string("Pi"); -x_3 = l_Lean_Parser_maxPrec; -x_4 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -x_5 = lean::mk_string("∀"); -x_6 = lean::mk_string("forall"); -x_7 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(x_5, x_6, x_3); -lean::dec(x_6); -lean::dec(x_5); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_8); -lean::dec(x_7); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_9); -lean::dec(x_9); -lean::dec(x_4); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = lean::mk_string(","); -x_13 = lean::mk_nat_obj(0u); -x_14 = l_Lean_Parser_symbol_tokens___rarg(x_12, x_13); -lean::dec(x_12); -x_15 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_13); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_8); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_16); -lean::dec(x_16); -lean::dec(x_14); -x_18 = l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasTokens; -x_19 = l_Lean_Parser_List_cons_tokens___rarg(x_18, x_17); -lean::dec(x_17); -x_20 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_19); -lean::dec(x_19); -lean::dec(x_11); -x_21 = l_Lean_Parser_tokens___rarg(x_20); -lean::dec(x_20); -return x_21; -} -} -obj* _init_l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_1 = lean::mk_string("Π"); -x_2 = lean::mk_string("Pi"); -x_3 = l_Lean_Parser_maxPrec; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_2); -lean::closure_set(x_4, 2, x_3); -x_5 = lean::mk_string("∀"); -x_6 = lean::mk_string("forall"); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -lean::closure_set(x_7, 2, x_3); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::mk_string(","); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::mk_nat_obj(0u); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_16, 0, x_13); -lean::closure_set(x_16, 1, x_15); -lean::closure_set(x_16, 2, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_17, 0, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_8); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_Parser), 5, 0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_11); -lean::cnstr_set(x_22, 1, x_21); -x_23 = l_Lean_Parser_TermParserM_Monad; -x_24 = l_Lean_Parser_TermParserM_MonadExcept; -x_25 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_26 = l_Lean_Parser_TermParserM_Alternative; -x_27 = l_Lean_Parser_Term_pi; -x_28 = l_Lean_Parser_Term_pi_HasView; -x_29 = l_Lean_Parser_Combinators_node_view___rarg(x_23, x_24, x_25, x_26, x_27, x_22, x_28); -lean::dec(x_22); -return x_29; -} -} -obj* _init_l_Lean_Parser_Term_pi_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string("Π"); -x_2 = lean::mk_string("Pi"); -x_3 = l_Lean_Parser_maxPrec; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_2); -lean::closure_set(x_4, 2, x_3); -x_5 = lean::mk_string("∀"); -x_6 = lean::mk_string("forall"); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -lean::closure_set(x_7, 2, x_3); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::mk_string(","); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::mk_nat_obj(0u); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_16, 0, x_13); -lean::closure_set(x_16, 1, x_15); -lean::closure_set(x_16, 2, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_17, 0, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_8); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_binders_Parser), 5, 0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_11); -lean::cnstr_set(x_22, 1, x_21); -return x_22; -} -} -obj* l_Lean_Parser_Term_pi_Parser(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; -x_6 = l_Lean_Parser_Term_pi; -x_7 = l_Lean_Parser_Term_pi_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("explicitModifier"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_Term_explicitModifier; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_Term_explicitModifier; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__1; -return x_4; -} -else -{ -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_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_explicitModifier; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_explicitModifier; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("explicitModifier"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__4; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -lean::dec(x_22); -if (x_30 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_13); -return x_32; -} -else -{ -obj* x_33; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_33 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__1; -return x_33; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_28, 0); -lean::inc(x_34); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_34); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_13); -return x_35; -} -else -{ -obj* x_36; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_36 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__2; -return x_36; -} -} -} -else -{ -obj* x_37; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_37 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_37; -} -} -} -} -} -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_13, 0); -lean::inc(x_38); -lean::dec(x_13); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -switch (lean::obj_tag(x_39)) { -case 0: -{ -obj* x_40; -lean::dec(x_38); -x_40 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_40; -} -case 1: -{ -obj* x_41; -lean::dec(x_39); -lean::dec(x_38); -x_41 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_41; -} -default: -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; uint8 x_46; -x_42 = lean::cnstr_get(x_38, 1); -lean::inc(x_42); -lean::dec(x_38); -x_43 = lean::cnstr_get(x_39, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_39, 1); -lean::inc(x_44); -lean::dec(x_39); -x_45 = lean::box(0); -x_46 = lean_name_dec_eq(x_43, x_45); -lean::dec(x_43); -if (x_46 == 0) -{ -obj* x_47; -lean::dec(x_44); -lean::dec(x_42); -x_47 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_47; -} -else -{ -if (lean::obj_tag(x_42) == 0) -{ -obj* x_48; -lean::dec(x_44); -x_48 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_48; -} -else -{ -obj* x_49; -x_49 = lean::cnstr_get(x_42, 1); -lean::inc(x_49); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; -x_50 = lean::cnstr_get(x_42, 0); -lean::inc(x_50); -lean::dec(x_42); -x_51 = lean::mk_nat_obj(0u); -x_52 = lean::nat_dec_eq(x_44, x_51); -lean::dec(x_44); -if (x_52 == 0) -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::cnstr_get(x_50, 0); -lean::inc(x_53); -lean::dec(x_50); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -return x_55; -} -else -{ -obj* x_56; -lean::dec(x_50); -x_56 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__1; -return x_56; -} -} -else -{ -if (lean::obj_tag(x_50) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; -x_57 = lean::cnstr_get(x_50, 0); -lean::inc(x_57); -lean::dec(x_50); -x_58 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_58, 0, x_57); -x_59 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -return x_59; -} -else -{ -obj* x_60; -lean::dec(x_50); -x_60 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__2; -return x_60; -} -} -} -else -{ -obj* x_61; -lean::dec(x_49); -lean::dec(x_44); -lean::dec(x_42); -x_61 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_61; -} -} -} -} -} -} -} -} -else -{ -obj* x_62; -lean::dec(x_11); -lean::dec(x_6); -x_62 = l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3; -return x_62; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_explicitModifier_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_explicitModifier_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_explicit() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("explicit"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_explicit_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_explicitModifier_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_2); -x_7 = l_Lean_Parser_identUnivs_HasView; -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_3); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_Term_explicit; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -obj* _init_l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__1() { -_start: -{ -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_1 = l_Lean_Parser_Term_explicitModifier_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = l_Lean_Parser_identUnivs_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_3); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_identUnivs_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Term_explicit_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -lean::dec(x_5); -x_9 = l_Lean_Parser_Term_explicitModifier_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_12; obj* x_13; -x_12 = l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__2; -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_8, 0); -lean::inc(x_14); -lean::dec(x_8); -x_15 = l_Lean_Parser_identUnivs_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -return x_18; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_explicit_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicit_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicit_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_explicit_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_explicit_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("@"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_string("@@"); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_4, x_2); -lean::dec(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_6); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasTokens; -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_6); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_13); -lean::dec(x_13); -lean::dec(x_11); -x_15 = l_Lean_Parser_tokens___rarg(x_14); -lean::dec(x_14); -return x_15; -} -} -obj* _init_l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_1 = lean::mk_string("@"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("@@"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::mk_nat_obj(0u); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_10); -x_16 = l_Lean_Parser_Term_explicitModifier; -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_15); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivs_Parser), 5, 0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_TermParserM_Monad; -x_22 = l_Lean_Parser_TermParserM_MonadExcept; -x_23 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_24 = l_Lean_Parser_TermParserM_Alternative; -x_25 = l_Lean_Parser_Term_explicit; -x_26 = l_Lean_Parser_Term_explicit_HasView; -x_27 = l_Lean_Parser_Combinators_node_view___rarg(x_21, x_22, x_23, x_24, x_25, x_20, x_26); -lean::dec(x_20); -return x_27; -} -} -obj* _init_l_Lean_Parser_Term_explicit_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_1 = lean::mk_string("@"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("@@"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_4); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::mk_nat_obj(0u); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_10); -x_16 = l_Lean_Parser_Term_explicitModifier; -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_15); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivs_Parser), 5, 0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -obj* l_Lean_Parser_Term_explicit_Parser(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; -x_6 = l_Lean_Parser_Term_explicit; -x_7 = l_Lean_Parser_Term_explicit_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_from() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("from"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_from_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_from; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_from; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_from_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_from_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_from_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_from_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_from_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_from_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_from_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_from_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_from_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string("from "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_4); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_6); -lean::dec(x_6); -lean::dec(x_3); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_from_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::mk_string("from "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_Lean_Parser_TermParserM_Monad; -x_11 = l_Lean_Parser_TermParserM_MonadExcept; -x_12 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_13 = l_Lean_Parser_TermParserM_Alternative; -x_14 = l_Lean_Parser_Term_from; -x_15 = l_Lean_Parser_Term_from_HasView; -x_16 = l_Lean_Parser_Combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); -lean::dec(x_9); -return x_16; -} -} -obj* _init_l_Lean_Parser_Term_from_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("from "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_from_Parser(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; -x_6 = l_Lean_Parser_Term_from; -x_7 = l_Lean_Parser_Term_from_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_letLhsId() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("letLhsId"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_letLhsId_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_2); -x_6 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__1; -x_7 = l_List_map___main___rarg(x_6, x_3); -x_8 = l_Lean_Parser_noKind; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_Term_letLhsId; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -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; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::box(0); -x_17 = l_Lean_Parser_Term_typeSpec_HasView; -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -x_19 = lean::apply_1(x_18, x_15); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_16); -x_21 = l_Lean_Parser_Syntax_mkNode(x_8, x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_16); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_9); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_5); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Term_letLhsId; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -} -} -obj* _init_l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_4 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_5 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 2, x_5); -return x_6; -} -else -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_2); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_2, 0); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -x_10 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4; -x_11 = l_List_map___main___rarg(x_10, x_9); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -lean::dec(x_8); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -lean::free_heap_obj(x_2); -x_13 = lean::box(0); -x_14 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_11); -lean::cnstr_set(x_15, 2, x_13); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_12, 1); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = lean::cnstr_get(x_12, 0); -lean::inc(x_17); -lean::dec(x_12); -x_18 = l_Lean_Parser_Term_typeSpec_HasView; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::apply_1(x_19, x_17); -lean::cnstr_set(x_2, 0, x_20); -x_21 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_11); -lean::cnstr_set(x_22, 2, x_2); -return x_22; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_16); -lean::dec(x_12); -lean::free_heap_obj(x_2); -x_23 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_24 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_11); -lean::cnstr_set(x_25, 2, x_24); -return x_25; -} -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_26 = lean::cnstr_get(x_2, 0); -lean::inc(x_26); -lean::dec(x_2); -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -x_28 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4; -x_29 = l_List_map___main___rarg(x_28, x_27); -x_30 = lean::cnstr_get(x_26, 1); -lean::inc(x_30); -lean::dec(x_26); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::box(0); -x_32 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_29); -lean::cnstr_set(x_33, 2, x_31); -return x_33; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_30, 1); -lean::inc(x_34); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_35 = lean::cnstr_get(x_30, 0); -lean::inc(x_35); -lean::dec(x_30); -x_36 = l_Lean_Parser_Term_typeSpec_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_35); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_29); -lean::cnstr_set(x_41, 2, x_39); -return x_41; -} -else -{ -obj* x_42; obj* x_43; obj* x_44; -lean::dec(x_34); -lean::dec(x_30); -x_42 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_43 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set(x_44, 1, x_29); -lean::cnstr_set(x_44, 2, x_43); -return x_44; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_154; -x_154 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_154) == 0) -{ -obj* x_155; -x_155 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__2; -return x_155; -} -else -{ -obj* x_156; obj* x_157; -x_156 = lean::cnstr_get(x_154, 0); -lean::inc(x_156); -lean::dec(x_154); -x_157 = lean::cnstr_get(x_156, 1); -lean::inc(x_157); -lean::dec(x_156); -if (lean::obj_tag(x_157) == 0) -{ -obj* x_158; -x_158 = lean::box(3); -x_2 = x_157; -x_3 = x_158; -goto block_153; -} -else -{ -obj* x_159; obj* x_160; -x_159 = lean::cnstr_get(x_157, 0); -lean::inc(x_159); -x_160 = lean::cnstr_get(x_157, 1); -lean::inc(x_160); -lean::dec(x_157); -x_2 = x_160; -x_3 = x_159; -goto block_153; -} -} -block_153: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -obj* x_151; -x_151 = lean::cnstr_get(x_3, 0); -lean::inc(x_151); -lean::dec(x_3); -x_4 = x_151; -goto block_150; -} -else -{ -obj* x_152; -lean::dec(x_3); -x_152 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_4 = x_152; -goto block_150; -} -block_150: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_147; -x_147 = lean::box(3); -x_5 = x_2; -x_6 = x_147; -goto block_146; -} -else -{ -obj* x_148; obj* x_149; -x_148 = lean::cnstr_get(x_2, 0); -lean::inc(x_148); -x_149 = lean::cnstr_get(x_2, 1); -lean::inc(x_149); -lean::dec(x_2); -x_5 = x_149; -x_6 = x_148; -goto block_146; -} -block_146: -{ -obj* x_7; -x_7 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_7) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::box(3); -x_9 = l_Lean_Parser_Syntax_asNode___main(x_8); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_11 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_12 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_10); -lean::cnstr_set(x_12, 2, x_11); -return x_12; -} -else -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_9); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -lean::dec(x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -lean::free_heap_obj(x_9); -x_16 = lean::box(0); -x_17 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_18, 2, x_16); -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::cnstr_get(x_15, 0); -lean::inc(x_20); -lean::dec(x_15); -x_21 = l_Lean_Parser_Term_typeSpec_HasView; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::apply_1(x_22, x_20); -lean::cnstr_set(x_9, 0, x_23); -x_24 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_25, 2, x_9); -return x_25; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -lean::dec(x_19); -lean::dec(x_15); -lean::free_heap_obj(x_9); -x_26 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_27 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_26); -lean::cnstr_set(x_28, 2, x_27); -return x_28; -} -} -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_9, 0); -lean::inc(x_29); -lean::dec(x_9); -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -lean::dec(x_29); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::box(0); -x_32 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_32); -lean::cnstr_set(x_33, 2, x_31); -return x_33; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_30, 1); -lean::inc(x_34); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_35 = lean::cnstr_get(x_30, 0); -lean::inc(x_35); -lean::dec(x_30); -x_36 = l_Lean_Parser_Term_typeSpec_HasView; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -x_38 = lean::apply_1(x_37, x_35); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_4); -lean::cnstr_set(x_41, 1, x_40); -lean::cnstr_set(x_41, 2, x_39); -return x_41; -} -else -{ -obj* x_42; obj* x_43; obj* x_44; -lean::dec(x_34); -lean::dec(x_30); -x_42 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_43 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_4); -lean::cnstr_set(x_44, 1, x_42); -lean::cnstr_set(x_44, 2, x_43); -return x_44; -} -} -} -} -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_5, 0); -lean::inc(x_45); -lean::dec(x_5); -x_46 = l_Lean_Parser_Syntax_asNode___main(x_45); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; -x_47 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_48 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_49 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_49, 0, x_4); -lean::cnstr_set(x_49, 1, x_47); -lean::cnstr_set(x_49, 2, x_48); -return x_49; -} -else -{ -uint8 x_50; -x_50 = !lean::is_exclusive(x_46); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_46, 0); -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -lean::dec(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; -lean::free_heap_obj(x_46); -x_53 = lean::box(0); -x_54 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_4); -lean::cnstr_set(x_55, 1, x_54); -lean::cnstr_set(x_55, 2, x_53); -return x_55; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_52, 1); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_57 = lean::cnstr_get(x_52, 0); -lean::inc(x_57); -lean::dec(x_52); -x_58 = l_Lean_Parser_Term_typeSpec_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -lean::cnstr_set(x_46, 0, x_60); -x_61 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_62 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_62, 0, x_4); -lean::cnstr_set(x_62, 1, x_61); -lean::cnstr_set(x_62, 2, x_46); -return x_62; -} -else -{ -obj* x_63; obj* x_64; obj* x_65; -lean::dec(x_56); -lean::dec(x_52); -lean::free_heap_obj(x_46); -x_63 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_64 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_65 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_65, 0, x_4); -lean::cnstr_set(x_65, 1, x_63); -lean::cnstr_set(x_65, 2, x_64); -return x_65; -} -} -} -else -{ -obj* x_66; obj* x_67; -x_66 = lean::cnstr_get(x_46, 0); -lean::inc(x_66); -lean::dec(x_46); -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -lean::dec(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; obj* x_70; -x_68 = lean::box(0); -x_69 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_70 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_70, 0, x_4); -lean::cnstr_set(x_70, 1, x_69); -lean::cnstr_set(x_70, 2, x_68); -return x_70; -} -else -{ -obj* x_71; -x_71 = lean::cnstr_get(x_67, 1); -lean::inc(x_71); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_72 = lean::cnstr_get(x_67, 0); -lean::inc(x_72); -lean::dec(x_67); -x_73 = l_Lean_Parser_Term_typeSpec_HasView; -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::apply_1(x_74, x_72); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -x_77 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_78 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_78, 0, x_4); -lean::cnstr_set(x_78, 1, x_77); -lean::cnstr_set(x_78, 2, x_76); -return x_78; -} -else -{ -obj* x_79; obj* x_80; obj* x_81; -lean::dec(x_71); -lean::dec(x_67); -x_79 = l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1; -x_80 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_81 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_81, 0, x_4); -lean::cnstr_set(x_81, 1, x_79); -lean::cnstr_set(x_81, 2, x_80); -return x_81; -} -} -} -} -} -} -else -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; -x_82 = lean::cnstr_get(x_7, 0); -lean::inc(x_82); -lean::dec(x_7); -x_83 = lean::cnstr_get(x_82, 1); -lean::inc(x_83); -lean::dec(x_82); -x_84 = l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4; -x_85 = l_List_map___main___rarg(x_84, x_83); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_86; obj* x_87; -x_86 = lean::box(3); -x_87 = l_Lean_Parser_Syntax_asNode___main(x_86); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_88; obj* x_89; -x_88 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_89 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_89, 0, x_4); -lean::cnstr_set(x_89, 1, x_85); -lean::cnstr_set(x_89, 2, x_88); -return x_89; -} -else -{ -uint8 x_90; -x_90 = !lean::is_exclusive(x_87); -if (x_90 == 0) -{ -obj* x_91; obj* x_92; -x_91 = lean::cnstr_get(x_87, 0); -x_92 = lean::cnstr_get(x_91, 1); -lean::inc(x_92); -lean::dec(x_91); -if (lean::obj_tag(x_92) == 0) -{ -obj* x_93; obj* x_94; -lean::free_heap_obj(x_87); -x_93 = lean::box(0); -x_94 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_94, 0, x_4); -lean::cnstr_set(x_94, 1, x_85); -lean::cnstr_set(x_94, 2, x_93); -return x_94; -} -else -{ -obj* x_95; -x_95 = lean::cnstr_get(x_92, 1); -lean::inc(x_95); -if (lean::obj_tag(x_95) == 0) -{ -obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_96 = lean::cnstr_get(x_92, 0); -lean::inc(x_96); -lean::dec(x_92); -x_97 = l_Lean_Parser_Term_typeSpec_HasView; -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_99 = lean::apply_1(x_98, x_96); -lean::cnstr_set(x_87, 0, x_99); -x_100 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_100, 0, x_4); -lean::cnstr_set(x_100, 1, x_85); -lean::cnstr_set(x_100, 2, x_87); -return x_100; -} -else -{ -obj* x_101; obj* x_102; -lean::dec(x_95); -lean::dec(x_92); -lean::free_heap_obj(x_87); -x_101 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_102 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_102, 0, x_4); -lean::cnstr_set(x_102, 1, x_85); -lean::cnstr_set(x_102, 2, x_101); -return x_102; -} -} -} -else -{ -obj* x_103; obj* x_104; -x_103 = lean::cnstr_get(x_87, 0); -lean::inc(x_103); -lean::dec(x_87); -x_104 = lean::cnstr_get(x_103, 1); -lean::inc(x_104); -lean::dec(x_103); -if (lean::obj_tag(x_104) == 0) -{ -obj* x_105; obj* x_106; -x_105 = lean::box(0); -x_106 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_106, 0, x_4); -lean::cnstr_set(x_106, 1, x_85); -lean::cnstr_set(x_106, 2, x_105); -return x_106; -} -else -{ -obj* x_107; -x_107 = lean::cnstr_get(x_104, 1); -lean::inc(x_107); -if (lean::obj_tag(x_107) == 0) -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_108 = lean::cnstr_get(x_104, 0); -lean::inc(x_108); -lean::dec(x_104); -x_109 = l_Lean_Parser_Term_typeSpec_HasView; -x_110 = lean::cnstr_get(x_109, 0); -lean::inc(x_110); -x_111 = lean::apply_1(x_110, x_108); -x_112 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_112, 0, x_111); -x_113 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_113, 0, x_4); -lean::cnstr_set(x_113, 1, x_85); -lean::cnstr_set(x_113, 2, x_112); -return x_113; -} -else -{ -obj* x_114; obj* x_115; -lean::dec(x_107); -lean::dec(x_104); -x_114 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_115 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_115, 0, x_4); -lean::cnstr_set(x_115, 1, x_85); -lean::cnstr_set(x_115, 2, x_114); -return x_115; -} -} -} -} -} -else -{ -obj* x_116; obj* x_117; -x_116 = lean::cnstr_get(x_5, 0); -lean::inc(x_116); -lean::dec(x_5); -x_117 = l_Lean_Parser_Syntax_asNode___main(x_116); -if (lean::obj_tag(x_117) == 0) -{ -obj* x_118; obj* x_119; -x_118 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_119 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_119, 0, x_4); -lean::cnstr_set(x_119, 1, x_85); -lean::cnstr_set(x_119, 2, x_118); -return x_119; -} -else -{ -uint8 x_120; -x_120 = !lean::is_exclusive(x_117); -if (x_120 == 0) -{ -obj* x_121; obj* x_122; -x_121 = lean::cnstr_get(x_117, 0); -x_122 = lean::cnstr_get(x_121, 1); -lean::inc(x_122); -lean::dec(x_121); -if (lean::obj_tag(x_122) == 0) -{ -obj* x_123; obj* x_124; -lean::free_heap_obj(x_117); -x_123 = lean::box(0); -x_124 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_124, 0, x_4); -lean::cnstr_set(x_124, 1, x_85); -lean::cnstr_set(x_124, 2, x_123); -return x_124; -} -else -{ -obj* x_125; -x_125 = lean::cnstr_get(x_122, 1); -lean::inc(x_125); -if (lean::obj_tag(x_125) == 0) -{ -obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -x_126 = lean::cnstr_get(x_122, 0); -lean::inc(x_126); -lean::dec(x_122); -x_127 = l_Lean_Parser_Term_typeSpec_HasView; -x_128 = lean::cnstr_get(x_127, 0); -lean::inc(x_128); -x_129 = lean::apply_1(x_128, x_126); -lean::cnstr_set(x_117, 0, x_129); -x_130 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_130, 0, x_4); -lean::cnstr_set(x_130, 1, x_85); -lean::cnstr_set(x_130, 2, x_117); -return x_130; -} -else -{ -obj* x_131; obj* x_132; -lean::dec(x_125); -lean::dec(x_122); -lean::free_heap_obj(x_117); -x_131 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_132 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_132, 0, x_4); -lean::cnstr_set(x_132, 1, x_85); -lean::cnstr_set(x_132, 2, x_131); -return x_132; -} -} -} -else -{ -obj* x_133; obj* x_134; -x_133 = lean::cnstr_get(x_117, 0); -lean::inc(x_133); -lean::dec(x_117); -x_134 = lean::cnstr_get(x_133, 1); -lean::inc(x_134); -lean::dec(x_133); -if (lean::obj_tag(x_134) == 0) -{ -obj* x_135; obj* x_136; -x_135 = lean::box(0); -x_136 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_136, 0, x_4); -lean::cnstr_set(x_136, 1, x_85); -lean::cnstr_set(x_136, 2, x_135); -return x_136; -} -else -{ -obj* x_137; -x_137 = lean::cnstr_get(x_134, 1); -lean::inc(x_137); -if (lean::obj_tag(x_137) == 0) -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; -x_138 = lean::cnstr_get(x_134, 0); -lean::inc(x_138); -lean::dec(x_134); -x_139 = l_Lean_Parser_Term_typeSpec_HasView; -x_140 = lean::cnstr_get(x_139, 0); -lean::inc(x_140); -x_141 = lean::apply_1(x_140, x_138); -x_142 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_142, 0, x_141); -x_143 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_143, 0, x_4); -lean::cnstr_set(x_143, 1, x_85); -lean::cnstr_set(x_143, 2, x_142); -return x_143; -} -else -{ -obj* x_144; obj* x_145; -lean::dec(x_137); -lean::dec(x_134); -x_144 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_145 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_145, 0, x_4); -lean::cnstr_set(x_145, 1, x_85); -lean::cnstr_set(x_145, 2, x_144); -return x_145; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_letLhsId_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_letLhsId_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_letLhsId_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_letLhsId_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_letLhs() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("letLhs"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_letLhs_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_letLhsId_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_letLhs; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_2); -x_15 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_Term_letLhs; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -} -} -obj* _init_l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_letLhsId_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("letLhs"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_27); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = l_Lean_Parser_Term_letLhsId_HasView; -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_27); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -else -{ -obj* x_35; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_35 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_35; -} -} -} -} -} -} -} -else -{ -obj* x_36; -lean::dec(x_11); -lean::dec(x_6); -x_36 = l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1; -return x_36; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_letLhs_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_letLhs_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_letLhs_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_letLhs_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_let() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("let"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_let_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -lean::dec(x_1); -x_8 = l_Lean_Parser_Term_letLhs_HasView; -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -x_10 = lean::apply_1(x_9, x_3); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = lean::box(3); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_5); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_10); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_13); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Term_let; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_21 = lean::cnstr_get(x_6, 0); -lean::inc(x_21); -lean::dec(x_6); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_12); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_5); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::box(3); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_10); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_25); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_Term_let; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_4, 0); -lean::inc(x_31); -lean::dec(x_4); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_12); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_5); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_32); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_10); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_33); -lean::cnstr_set(x_38, 1, x_37); -x_39 = l_Lean_Parser_Term_let; -x_40 = l_Lean_Parser_Syntax_mkNode(x_39, x_38); -return x_40; -} -else -{ -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; -x_41 = lean::cnstr_get(x_6, 0); -lean::inc(x_41); -lean::dec(x_6); -x_42 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_42, 0, 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_12); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_5); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_32); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_10); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::box(3); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_46); -x_49 = l_Lean_Parser_Term_let; -x_50 = l_Lean_Parser_Syntax_mkNode(x_49, x_48); -return x_50; -} -} -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_2, 0); -lean::inc(x_51); -lean::dec(x_2); -x_52 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_52, 0, x_51); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_53 = lean::box(3); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_12); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_5); -lean::cnstr_set(x_55, 1, x_54); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_53); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_10); -lean::cnstr_set(x_57, 1, x_56); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_52); -lean::cnstr_set(x_58, 1, x_57); -x_59 = l_Lean_Parser_Term_let; -x_60 = l_Lean_Parser_Syntax_mkNode(x_59, x_58); -return x_60; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_61 = lean::cnstr_get(x_6, 0); -lean::inc(x_61); -lean::dec(x_6); -x_62 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_62, 0, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_12); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_5); -lean::cnstr_set(x_64, 1, x_63); -x_65 = lean::box(3); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_64); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_10); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_52); -lean::cnstr_set(x_68, 1, x_67); -x_69 = l_Lean_Parser_Term_let; -x_70 = l_Lean_Parser_Syntax_mkNode(x_69, x_68); -return x_70; -} -} -else -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_4, 0); -lean::inc(x_71); -lean::dec(x_4); -x_72 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_73 = lean::box(3); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_12); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_5); -lean::cnstr_set(x_75, 1, x_74); -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_10); -lean::cnstr_set(x_77, 1, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_52); -lean::cnstr_set(x_78, 1, x_77); -x_79 = l_Lean_Parser_Term_let; -x_80 = l_Lean_Parser_Syntax_mkNode(x_79, x_78); -return x_80; -} -else -{ -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; -x_81 = lean::cnstr_get(x_6, 0); -lean::inc(x_81); -lean::dec(x_6); -x_82 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_12); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_5); -lean::cnstr_set(x_84, 1, x_83); -x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_72); -lean::cnstr_set(x_85, 1, x_84); -x_86 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_86, 0, x_10); -lean::cnstr_set(x_86, 1, x_85); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_52); -lean::cnstr_set(x_87, 1, x_86); -x_88 = l_Lean_Parser_Term_let; -x_89 = l_Lean_Parser_Syntax_mkNode(x_88, x_87); -return x_89; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_let_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_letLhs_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_1); -lean::cnstr_set(x_6, 3, x_4); -lean::cnstr_set(x_6, 4, x_1); -lean::cnstr_set(x_6, 5, x_4); -return x_6; -} -} -obj* l_Lean_Parser_Term_let_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_58; -x_58 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; -x_59 = l_Lean_Parser_Term_let_HasView_x27___lambda__1___closed__1; -return x_59; -} -else -{ -obj* x_60; obj* x_61; -x_60 = lean::cnstr_get(x_58, 0); -lean::inc(x_60); -lean::dec(x_58); -x_61 = lean::cnstr_get(x_60, 1); -lean::inc(x_61); -lean::dec(x_60); -if (lean::obj_tag(x_61) == 0) -{ -obj* x_62; -x_62 = lean::box(3); -x_2 = x_61; -x_3 = x_62; -goto block_57; -} -else -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_61, 0); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_61, 1); -lean::inc(x_64); -lean::dec(x_61); -x_2 = x_64; -x_3 = x_63; -goto block_57; -} -} -block_57: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_3, 0); -lean::inc(x_54); -lean::dec(x_3); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -x_4 = x_55; -goto block_53; -} -else -{ -obj* x_56; -lean::dec(x_3); -x_56 = lean::box(0); -x_4 = x_56; -goto block_53; -} -block_53: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_50; -x_50 = lean::box(3); -x_5 = x_2; -x_6 = x_50; -goto block_49; -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_2, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_2, 1); -lean::inc(x_52); -lean::dec(x_2); -x_5 = x_52; -x_6 = x_51; -goto block_49; -} -block_49: -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_31; obj* x_32; -x_7 = l_Lean_Parser_Term_letLhs_HasView; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::apply_1(x_8, x_6); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_46; -x_46 = lean::box(3); -x_31 = x_5; -x_32 = x_46; -goto block_45; -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_5, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_5, 1); -lean::inc(x_48); -lean::dec(x_5); -x_31 = x_48; -x_32 = x_47; -goto block_45; -} -block_30: -{ -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::box(0); -x_14 = lean::box(3); -x_15 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_9); -lean::cnstr_set(x_15, 2, x_10); -lean::cnstr_set(x_15, 3, x_11); -lean::cnstr_set(x_15, 4, x_13); -lean::cnstr_set(x_15, 5, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_12, 0); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_12, 1); -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::box(3); -x_21 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_9); -lean::cnstr_set(x_21, 2, x_10); -lean::cnstr_set(x_21, 3, x_11); -lean::cnstr_set(x_21, 4, x_19); -lean::cnstr_set(x_21, 5, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_17, 0); -lean::inc(x_22); -x_23 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_9); -lean::cnstr_set(x_23, 2, x_10); -lean::cnstr_set(x_23, 3, x_11); -lean::cnstr_set(x_23, 4, x_19); -lean::cnstr_set(x_23, 5, x_22); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_12, 1); -x_25 = lean::box(0); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::box(3); -x_27 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_27, 0, x_4); -lean::cnstr_set(x_27, 1, x_9); -lean::cnstr_set(x_27, 2, x_10); -lean::cnstr_set(x_27, 3, x_11); -lean::cnstr_set(x_27, 4, x_25); -lean::cnstr_set(x_27, 5, x_26); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_24, 0); -lean::inc(x_28); -x_29 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_9); -lean::cnstr_set(x_29, 2, x_10); -lean::cnstr_set(x_29, 3, x_11); -lean::cnstr_set(x_29, 4, x_25); -lean::cnstr_set(x_29, 5, x_28); -return x_29; -} -} -} -} -block_45: -{ -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -lean::dec(x_32); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::box(0); -x_36 = lean::box(3); -x_37 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_9); -lean::cnstr_set(x_37, 2, x_34); -lean::cnstr_set(x_37, 3, x_36); -lean::cnstr_set(x_37, 4, x_35); -lean::cnstr_set(x_37, 5, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_31, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_31, 1); -lean::inc(x_39); -lean::dec(x_31); -x_10 = x_34; -x_11 = x_38; -x_12 = x_39; -goto block_30; -} -} -else -{ -obj* x_40; -lean::dec(x_32); -x_40 = lean::box(0); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_41; obj* x_42; -x_41 = lean::box(3); -x_42 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_42, 0, x_4); -lean::cnstr_set(x_42, 1, x_9); -lean::cnstr_set(x_42, 2, x_40); -lean::cnstr_set(x_42, 3, x_41); -lean::cnstr_set(x_42, 4, x_40); -lean::cnstr_set(x_42, 5, x_41); -return x_42; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_31, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_31, 1); -lean::inc(x_44); -lean::dec(x_31); -x_10 = x_40; -x_11 = x_43; -x_12 = x_44; -goto block_30; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_let_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_let_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_let_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_let_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_let_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_let_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; uint8 x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_1 = lean::mk_string("let "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = 0; -x_6 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens; -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_4); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_9); -lean::dec(x_9); -lean::dec(x_7); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_4); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_14); -lean::dec(x_12); -x_16 = l_Lean_Parser_tokens___rarg(x_15); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_16, x_4); -lean::dec(x_16); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -x_19 = lean::mk_string(" := "); -x_20 = l_Lean_Parser_symbol_tokens___rarg(x_19, x_2); -lean::dec(x_19); -x_21 = lean::mk_string(" in "); -x_22 = l_Lean_Parser_symbol_tokens___rarg(x_21, x_2); -lean::dec(x_21); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_22, x_14); -lean::dec(x_14); -lean::dec(x_22); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_23); -lean::dec(x_23); -lean::dec(x_13); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_24); -lean::dec(x_24); -lean::dec(x_20); -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_18, x_25); -lean::dec(x_25); -lean::dec(x_18); -x_27 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_26); -lean::dec(x_26); -lean::dec(x_3); -x_28 = l_Lean_Parser_tokens___rarg(x_27); -lean::dec(x_27); -return x_28; -} -} -obj* _init_l_Lean_Parser_Term_let_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_1 = lean::mk_string("let "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optType_Parser), 5, 0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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_letLhsId; -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_15); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_18, 0, x_4); -lean::inc(x_18); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -lean::inc(x_19); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_21, 0, x_20); -lean::closure_set(x_21, 1, x_4); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_10); -x_23 = l_Lean_Parser_Term_letLhs; -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::mk_string(" := "); -x_26 = l_String_trim(x_25); -lean::dec(x_25); -lean::inc(x_26); -x_27 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_27, 0, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_28, 0, x_26); -lean::closure_set(x_28, 1, x_4); -lean::closure_set(x_28, 2, x_27); -x_29 = lean::mk_string(" in "); -x_30 = l_String_trim(x_29); -lean::dec(x_29); -lean::inc(x_30); -x_31 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_31, 0, x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_4); -lean::closure_set(x_32, 2, 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_19); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_18); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_28); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_24); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_5); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_TermParserM_Monad; -x_39 = l_Lean_Parser_TermParserM_MonadExcept; -x_40 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_41 = l_Lean_Parser_TermParserM_Alternative; -x_42 = l_Lean_Parser_Term_let; -x_43 = l_Lean_Parser_Term_let_HasView; -x_44 = l_Lean_Parser_Combinators_node_view___rarg(x_38, x_39, x_40, x_41, x_42, x_37, x_43); -lean::dec(x_37); -return x_44; -} -} -obj* _init_l_Lean_Parser_Term_let_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; -x_1 = lean::mk_string("let "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = 0; -x_7 = lean::box(x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_many___at_Lean_Parser_command_NotationSpec_Parser_Lean_Parser_HasTokens___spec__1), 6, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optType_Parser), 5, 0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_9); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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_letLhsId; -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_17, 0, x_16); -lean::closure_set(x_17, 1, x_15); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_18, 0, x_4); -lean::inc(x_18); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -lean::inc(x_19); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_21, 0, x_20); -lean::closure_set(x_21, 1, x_4); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_10); -x_23 = l_Lean_Parser_Term_letLhs; -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::mk_string(" := "); -x_26 = l_String_trim(x_25); -lean::dec(x_25); -lean::inc(x_26); -x_27 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_27, 0, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_28, 0, x_26); -lean::closure_set(x_28, 1, x_4); -lean::closure_set(x_28, 2, x_27); -x_29 = lean::mk_string(" in "); -x_30 = l_String_trim(x_29); -lean::dec(x_29); -lean::inc(x_30); -x_31 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_31, 0, x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_4); -lean::closure_set(x_32, 2, 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_19); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_18); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_28); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_24); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_5); -lean::cnstr_set(x_37, 1, x_36); -return x_37; -} -} -obj* l_Lean_Parser_Term_let_Parser(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; -x_6 = l_Lean_Parser_Term_let; -x_7 = l_Lean_Parser_Term_let_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_optIdent() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("optIdent"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_optIdent_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_Term_optIdent; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_3, 0); -x_10 = lean::box(0); -lean::inc(x_9); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Parser_Term_optIdent; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_26; -x_26 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; -x_27 = l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__2; -return x_27; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_26, 0); -lean::inc(x_28); -lean::dec(x_26); -x_29 = lean::cnstr_get(x_28, 1); -lean::inc(x_29); -lean::dec(x_28); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; -x_30 = lean::box(3); -x_2 = x_29; -x_3 = x_30; -goto block_25; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_2 = x_32; -x_3 = x_31; -goto block_25; -} -} -block_25: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -lean::dec(x_3); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_16); -x_21 = lean::cnstr_get(x_3, 0); -lean::inc(x_21); -lean::dec(x_3); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -} -else -{ -obj* x_24; -lean::dec(x_3); -x_24 = lean::box(0); -x_4 = x_24; -goto block_12; -} -block_12: -{ -lean::dec(x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_8); -return x_10; -} -else -{ -obj* x_11; -lean::dec(x_6); -x_11 = l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__1; -return x_11; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_optIdent_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optIdent_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_optIdent_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_optIdent_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_optIdent_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_optIdent_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string(" : "); -x_3 = lean::mk_nat_obj(0u); -x_4 = l_Lean_Parser_symbol_tokens___rarg(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_1); -lean::dec(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_5); -lean::dec(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = l_Lean_Parser_Term_optIdent; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_7, x_1, x_2, x_3, x_4, x_5, x_6); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_10); -lean::cnstr_set(x_8, 0, x_11); -return x_8; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_8, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_8); -x_14 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_12); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; obj* x_21; -x_1 = lean::mk_string(" : "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_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_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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); -x_10 = l_Lean_Parser_Term_optIdent; -lean::inc(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_11, 0, x_10); -lean::closure_set(x_11, 1, x_9); -lean::inc(x_9); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView___lambda__1), 6, 1); -lean::closure_set(x_12, 0, x_9); -x_13 = l_Lean_Parser_TermParserM_Monad; -x_14 = l_Lean_Parser_TermParserM_MonadExcept; -x_15 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_16 = l_Lean_Parser_TermParserM_Alternative; -x_17 = l_Lean_Parser_Term_optIdent_HasView; -x_18 = l_Lean_Parser_Combinators_node_view___rarg(x_13, x_14, x_15, x_16, x_10, x_9, x_17); -lean::dec(x_9); -x_19 = l_Lean_Parser_Combinators_try_view___rarg(x_15, x_16, x_11, x_18); -lean::dec(x_11); -x_20 = 0; -x_21 = l_Lean_Parser_Combinators_optional_view___rarg(x_13, x_14, x_15, x_16, x_12, x_19, x_20); -lean::dec(x_12); -return x_21; -} -} -obj* _init_l_Lean_Parser_Term_optIdent_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string(" : "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_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_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView___lambda__1), 6, 1); -lean::closure_set(x_10, 0, x_9); -return x_10; -} -} -obj* l_Lean_Parser_Term_optIdent_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; obj* x_8; -x_6 = l_Lean_Parser_Term_optIdent_Parser___closed__1; -x_7 = 0; -x_8 = l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_haveTerm() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("haveTerm"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_haveTerm; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_haveTerm; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_haveTerm_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_haveTerm_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_haveTerm_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_haveFrom() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("haveFrom"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_haveFrom_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_from_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::box(3); -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 = l_Lean_Parser_Term_haveFrom; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -lean::dec(x_2); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_8); -x_16 = l_Lean_Parser_Term_haveFrom; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -return x_17; -} -} -} -obj* _init_l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Term_from_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_from_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_21; -x_21 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__3; -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 1); -lean::inc(x_24); -lean::dec(x_23); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; -x_25 = lean::box(3); -x_2 = x_24; -x_3 = x_25; -goto block_20; -} -else -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_2 = x_27; -x_3 = x_26; -goto block_20; -} -} -block_20: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -lean::dec(x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l_Lean_Parser_Term_from_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -} -else -{ -lean::dec(x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_13; -x_13 = l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__2; -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_2, 0); -lean::inc(x_14); -lean::dec(x_2); -x_15 = lean::box(0); -x_16 = l_Lean_Parser_Term_from_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_15); -lean::cnstr_set(x_19, 1, x_18); -return x_19; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_haveFrom_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_haveFrom_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_haveFrom_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_haveFrom_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_haveProof() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("haveProof"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_haveProof_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_haveTerm_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_haveProof; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_haveFrom_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_haveProof; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_haveTerm_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("haveProof"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_haveFrom_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Term_haveTerm_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_haveProof_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_haveProof_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_haveProof_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_haveProof_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_have() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("have"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_have_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -lean::dec(x_1); -x_8 = l_Lean_Parser_Term_haveProof_HasView; -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -x_10 = lean::apply_1(x_9, x_5); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_13 = lean::box(3); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_10); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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_13); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_Term_have; -x_21 = l_Lean_Parser_Syntax_mkNode(x_20, x_19); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_22 = lean::cnstr_get(x_6, 0); -lean::inc(x_22); -lean::dec(x_6); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_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_12); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_10); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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::box(3); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -x_31 = l_Lean_Parser_Term_have; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_33 = lean::cnstr_get(x_3, 0); -lean::inc(x_33); -lean::dec(x_3); -x_34 = l_Lean_Parser_Term_optIdent_HasView; -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_33); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_11); -x_38 = l_Lean_Parser_noKind; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_40 = lean::box(3); -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_10); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_39); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_40); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_Term_have; -x_47 = l_Lean_Parser_Syntax_mkNode(x_46, x_45); -return x_47; -} -else -{ -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; -x_48 = lean::cnstr_get(x_6, 0); -lean::inc(x_48); -lean::dec(x_6); -x_49 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_12); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_10); -lean::cnstr_set(x_51, 1, x_50); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_4); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_39); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::box(3); -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 = l_Lean_Parser_Term_have; -x_57 = l_Lean_Parser_Syntax_mkNode(x_56, x_55); -return x_57; -} -} -} -else -{ -obj* x_58; obj* x_59; -x_58 = lean::cnstr_get(x_2, 0); -lean::inc(x_58); -lean::dec(x_2); -x_59 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_60 = lean::box(3); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_12); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_10); -lean::cnstr_set(x_62, 1, x_61); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_4); -lean::cnstr_set(x_63, 1, x_62); -x_64 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_63); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_59); -lean::cnstr_set(x_66, 1, x_65); -x_67 = l_Lean_Parser_Term_have; -x_68 = l_Lean_Parser_Syntax_mkNode(x_67, x_66); -return x_68; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_69 = lean::cnstr_get(x_6, 0); -lean::inc(x_69); -lean::dec(x_6); -x_70 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_70, 0, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_12); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_10); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_4); -lean::cnstr_set(x_73, 1, x_72); -x_74 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_73); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_59); -lean::cnstr_set(x_76, 1, x_75); -x_77 = l_Lean_Parser_Term_have; -x_78 = l_Lean_Parser_Syntax_mkNode(x_77, x_76); -return x_78; -} -} -else -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -x_79 = lean::cnstr_get(x_3, 0); -lean::inc(x_79); -lean::dec(x_3); -x_80 = l_Lean_Parser_Term_optIdent_HasView; -x_81 = lean::cnstr_get(x_80, 1); -lean::inc(x_81); -x_82 = lean::apply_1(x_81, x_79); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_11); -x_84 = l_Lean_Parser_noKind; -x_85 = l_Lean_Parser_Syntax_mkNode(x_84, x_83); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_86 = lean::box(3); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_12); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_10); -lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_4); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_85); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_59); -lean::cnstr_set(x_91, 1, x_90); -x_92 = l_Lean_Parser_Term_have; -x_93 = l_Lean_Parser_Syntax_mkNode(x_92, x_91); -return x_93; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_94 = lean::cnstr_get(x_6, 0); -lean::inc(x_94); -lean::dec(x_6); -x_95 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -x_96 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_12); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_10); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_4); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_85); -lean::cnstr_set(x_99, 1, x_98); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_59); -lean::cnstr_set(x_100, 1, x_99); -x_101 = l_Lean_Parser_Term_have; -x_102 = l_Lean_Parser_Syntax_mkNode(x_101, x_100); -return x_102; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_optIdent_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_9; obj* x_10; -x_1 = lean::box(0); -x_9 = lean::box(3); -x_10 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -x_11 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_2 = x_11; -goto block_8; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_10, 0); -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -lean::dec(x_13); -if (lean::obj_tag(x_14) == 0) -{ -lean::free_heap_obj(x_10); -x_2 = x_1; -goto block_8; -} -else -{ -obj* x_15; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_14, 0); -lean::inc(x_16); -lean::dec(x_14); -x_17 = l_Lean_Parser_Term_optIdent_HasView; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -x_19 = lean::apply_1(x_18, x_16); -lean::cnstr_set(x_10, 0, x_19); -x_2 = x_10; -goto block_8; -} -else -{ -obj* x_20; -lean::dec(x_15); -lean::dec(x_14); -lean::free_heap_obj(x_10); -x_20 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_2 = x_20; -goto block_8; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_10, 0); -lean::inc(x_21); -lean::dec(x_10); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -x_2 = x_1; -goto block_8; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_24 = lean::cnstr_get(x_22, 0); -lean::inc(x_24); -lean::dec(x_22); -x_25 = l_Lean_Parser_Term_optIdent_HasView; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -x_27 = lean::apply_1(x_26, x_24); -x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_2 = x_28; -goto block_8; -} -else -{ -obj* x_29; -lean::dec(x_23); -lean::dec(x_22); -x_29 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_2 = x_29; -goto block_8; -} -} -} -} -block_8: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = l_Lean_Parser_Term_haveProof_HasView; -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -x_5 = lean::box(3); -x_6 = lean::apply_1(x_4, x_5); -x_7 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_2); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_1); -lean::cnstr_set(x_7, 5, x_5); -return x_7; -} -} -} -obj* l_Lean_Parser_Term_have_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_72; -x_72 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; -x_73 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__2; -return x_73; -} -else -{ -obj* x_74; obj* x_75; -x_74 = lean::cnstr_get(x_72, 0); -lean::inc(x_74); -lean::dec(x_72); -x_75 = lean::cnstr_get(x_74, 1); -lean::inc(x_75); -lean::dec(x_74); -if (lean::obj_tag(x_75) == 0) -{ -obj* x_76; -x_76 = lean::box(3); -x_2 = x_75; -x_3 = x_76; -goto block_71; -} -else -{ -obj* x_77; obj* x_78; -x_77 = lean::cnstr_get(x_75, 0); -lean::inc(x_77); -x_78 = lean::cnstr_get(x_75, 1); -lean::inc(x_78); -lean::dec(x_75); -x_2 = x_78; -x_3 = x_77; -goto block_71; -} -} -block_71: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_3, 0); -lean::inc(x_68); -lean::dec(x_3); -x_69 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_69, 0, x_68); -x_4 = x_69; -goto block_67; -} -else -{ -obj* x_70; -lean::dec(x_3); -x_70 = lean::box(0); -x_4 = x_70; -goto block_67; -} -block_67: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_64; -x_64 = lean::box(3); -x_5 = x_2; -x_6 = x_64; -goto block_63; -} -else -{ -obj* x_65; obj* x_66; -x_65 = lean::cnstr_get(x_2, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_2, 1); -lean::inc(x_66); -lean::dec(x_2); -x_5 = x_66; -x_6 = x_65; -goto block_63; -} -block_63: -{ -obj* x_7; obj* x_41; -x_41 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; -x_42 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_7 = x_42; -goto block_40; -} -else -{ -uint8 x_43; -x_43 = !lean::is_exclusive(x_41); -if (x_43 == 0) -{ -obj* x_44; obj* x_45; -x_44 = lean::cnstr_get(x_41, 0); -x_45 = lean::cnstr_get(x_44, 1); -lean::inc(x_45); -lean::dec(x_44); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; -lean::free_heap_obj(x_41); -x_46 = lean::box(0); -x_7 = x_46; -goto block_40; -} -else -{ -obj* x_47; -x_47 = lean::cnstr_get(x_45, 1); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_48 = lean::cnstr_get(x_45, 0); -lean::inc(x_48); -lean::dec(x_45); -x_49 = l_Lean_Parser_Term_optIdent_HasView; -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_51 = lean::apply_1(x_50, x_48); -lean::cnstr_set(x_41, 0, x_51); -x_7 = x_41; -goto block_40; -} -else -{ -obj* x_52; -lean::dec(x_47); -lean::dec(x_45); -lean::free_heap_obj(x_41); -x_52 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_7 = x_52; -goto block_40; -} -} -} -else -{ -obj* x_53; obj* x_54; -x_53 = lean::cnstr_get(x_41, 0); -lean::inc(x_53); -lean::dec(x_41); -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -lean::dec(x_53); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; -x_55 = lean::box(0); -x_7 = x_55; -goto block_40; -} -else -{ -obj* x_56; -x_56 = lean::cnstr_get(x_54, 1); -lean::inc(x_56); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_57 = lean::cnstr_get(x_54, 0); -lean::inc(x_57); -lean::dec(x_54); -x_58 = l_Lean_Parser_Term_optIdent_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -x_7 = x_61; -goto block_40; -} -else -{ -obj* x_62; -lean::dec(x_56); -lean::dec(x_54); -x_62 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_7 = x_62; -goto block_40; -} -} -} -} -block_40: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_37; -x_37 = lean::box(3); -x_8 = x_5; -x_9 = x_37; -goto block_36; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_5, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_5, 1); -lean::inc(x_39); -lean::dec(x_5); -x_8 = x_39; -x_9 = x_38; -goto block_36; -} -block_36: -{ -obj* x_10; obj* x_11; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_33; -x_33 = lean::box(3); -x_10 = x_8; -x_11 = x_33; -goto block_32; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_8, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_8, 1); -lean::inc(x_35); -lean::dec(x_8); -x_10 = x_35; -x_11 = x_34; -goto block_32; -} -block_32: -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = l_Lean_Parser_Term_haveProof_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; -x_15 = lean::box(0); -x_16 = lean::box(3); -x_17 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_7); -lean::cnstr_set(x_17, 2, x_9); -lean::cnstr_set(x_17, 3, x_14); -lean::cnstr_set(x_17, 4, x_15); -lean::cnstr_set(x_17, 5, x_16); -return x_17; -} -else -{ -obj* x_18; -x_18 = lean::cnstr_get(x_10, 0); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_10, 1); -lean::inc(x_19); -lean::dec(x_10); -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -lean::dec(x_18); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::box(3); -x_23 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_7); -lean::cnstr_set(x_23, 2, x_9); -lean::cnstr_set(x_23, 3, x_14); -lean::cnstr_set(x_23, 4, x_21); -lean::cnstr_set(x_23, 5, x_22); -return x_23; -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_19, 0); -lean::inc(x_24); -lean::dec(x_19); -x_25 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_7); -lean::cnstr_set(x_25, 2, x_9); -lean::cnstr_set(x_25, 3, x_14); -lean::cnstr_set(x_25, 4, x_21); -lean::cnstr_set(x_25, 5, x_24); -return x_25; -} -} -else -{ -obj* x_26; obj* x_27; -lean::dec(x_18); -x_26 = lean::cnstr_get(x_10, 1); -lean::inc(x_26); -lean::dec(x_10); -x_27 = lean::box(0); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::box(3); -x_29 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_9); -lean::cnstr_set(x_29, 3, x_14); -lean::cnstr_set(x_29, 4, x_27); -lean::cnstr_set(x_29, 5, x_28); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_26, 0); -lean::inc(x_30); -lean::dec(x_26); -x_31 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_9); -lean::cnstr_set(x_31, 3, x_14); -lean::cnstr_set(x_31, 4, x_27); -lean::cnstr_set(x_31, 5, x_30); -return x_31; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_have_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_have_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_have_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_have_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_have_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_have_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_1 = lean::mk_string("have "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = lean::mk_string(" := "); -x_6 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_2); -lean::dec(x_5); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_7); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_8); -lean::dec(x_6); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = lean::mk_string(", "); -x_12 = l_Lean_Parser_symbol_tokens___rarg(x_11, x_2); -lean::dec(x_11); -x_13 = l_Lean_Parser_Term_from_Parser_Lean_Parser_HasTokens; -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_7); -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_14); -lean::dec(x_14); -x_16 = l_Lean_Parser_tokens___rarg(x_15); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_16, x_7); -lean::dec(x_16); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_17); -lean::dec(x_17); -lean::dec(x_10); -x_19 = l_Lean_Parser_tokens___rarg(x_18); -lean::dec(x_18); -x_20 = l_Lean_Parser_List_cons_tokens___rarg(x_19, x_7); -lean::dec(x_19); -x_21 = l_Lean_Parser_tokens___rarg(x_20); -lean::dec(x_20); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_8); -lean::dec(x_8); -lean::dec(x_12); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_21, x_22); -lean::dec(x_22); -lean::dec(x_21); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_23); -lean::dec(x_23); -lean::dec(x_4); -x_25 = l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasTokens; -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_25, x_24); -lean::dec(x_24); -x_27 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_26); -lean::dec(x_26); -lean::dec(x_3); -x_28 = l_Lean_Parser_tokens___rarg(x_27); -lean::dec(x_27); -return x_28; -} -} -obj* _init_l_Lean_Parser_Term_have_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_1 = lean::mk_string("have "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_string(" := "); -x_8 = l_String_trim(x_7); -lean::dec(x_7); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = lean::box(0); -lean::inc(x_6); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_11); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Parser_Term_haveTerm; -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_15, 0, x_14); -lean::closure_set(x_15, 1, x_13); -x_16 = lean::mk_string(", "); -x_17 = l_String_trim(x_16); -lean::dec(x_16); -lean::inc(x_17); -x_18 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_18, 0, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_19, 0, x_17); -lean::closure_set(x_19, 1, x_4); -lean::closure_set(x_19, 2, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_from_Parser), 5, 0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_11); -lean::inc(x_19); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_21); -x_23 = l_Lean_Parser_Term_haveFrom; -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_11); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_15); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_11); -x_29 = l_Lean_Parser_Term_haveProof; -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_30, 0, x_29); -lean::closure_set(x_30, 1, x_28); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_19); -lean::cnstr_set(x_31, 1, 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_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_6); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optIdent_Parser), 5, 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_5); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_Lean_Parser_TermParserM_Monad; -x_38 = l_Lean_Parser_TermParserM_MonadExcept; -x_39 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_40 = l_Lean_Parser_TermParserM_Alternative; -x_41 = l_Lean_Parser_Term_have; -x_42 = l_Lean_Parser_Term_have_HasView; -x_43 = l_Lean_Parser_Combinators_node_view___rarg(x_37, x_38, x_39, x_40, x_41, x_36, x_42); -lean::dec(x_36); -return x_43; -} -} -obj* _init_l_Lean_Parser_Term_have_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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; -x_1 = lean::mk_string("have "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_string(" := "); -x_8 = l_String_trim(x_7); -lean::dec(x_7); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = lean::box(0); -lean::inc(x_6); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_11); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Parser_Term_haveTerm; -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_15, 0, x_14); -lean::closure_set(x_15, 1, x_13); -x_16 = lean::mk_string(", "); -x_17 = l_String_trim(x_16); -lean::dec(x_16); -lean::inc(x_17); -x_18 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_18, 0, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_19, 0, x_17); -lean::closure_set(x_19, 1, x_4); -lean::closure_set(x_19, 2, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_from_Parser), 5, 0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_11); -lean::inc(x_19); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_21); -x_23 = l_Lean_Parser_Term_haveFrom; -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_11); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_15); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_11); -x_29 = l_Lean_Parser_Term_haveProof; -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_30, 0, x_29); -lean::closure_set(x_30, 1, x_28); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_19); -lean::cnstr_set(x_31, 1, 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_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_6); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optIdent_Parser), 5, 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_5); -lean::cnstr_set(x_36, 1, x_35); -return x_36; -} -} -obj* l_Lean_Parser_Term_have_Parser(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; -x_6 = l_Lean_Parser_Term_have; -x_7 = l_Lean_Parser_Term_have_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_show() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("show"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_show_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -lean::dec(x_1); -x_6 = l_Lean_Parser_Term_from_HasView; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_8 = lean::apply_1(x_7, x_5); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_3); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_show; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -return x_16; -} -else -{ -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_17 = lean::cnstr_get(x_4, 0); -lean::inc(x_17); -lean::dec(x_4); -x_18 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -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::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_Lean_Parser_Term_show; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -lean::dec(x_2); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_10); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_3); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_Term_show; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_33 = lean::cnstr_get(x_4, 0); -lean::inc(x_33); -lean::dec(x_4); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_10); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_3); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_26); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_Term_show; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -return x_39; -} -} -} -} -obj* _init_l_Lean_Parser_Term_show_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1; -x_4 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -lean::cnstr_set(x_4, 2, x_1); -lean::cnstr_set(x_4, 3, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Term_show_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_39; -x_39 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; -x_40 = l_Lean_Parser_Term_show_HasView_x27___lambda__1___closed__1; -return x_40; -} -else -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_39, 0); -lean::inc(x_41); -lean::dec(x_39); -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -lean::dec(x_41); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; -x_43 = lean::box(3); -x_2 = x_42; -x_3 = x_43; -goto block_38; -} -else -{ -obj* x_44; obj* x_45; -x_44 = lean::cnstr_get(x_42, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_42, 1); -lean::inc(x_45); -lean::dec(x_42); -x_2 = x_45; -x_3 = x_44; -goto block_38; -} -} -block_38: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_3, 0); -lean::inc(x_35); -lean::dec(x_3); -x_36 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_4 = x_36; -goto block_34; -} -else -{ -obj* x_37; -lean::dec(x_3); -x_37 = lean::box(0); -x_4 = x_37; -goto block_34; -} -block_34: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_31; -x_31 = lean::box(3); -x_5 = x_2; -x_6 = x_31; -goto block_30; -} -else -{ -obj* x_32; obj* x_33; -x_32 = lean::cnstr_get(x_2, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_2, 1); -lean::inc(x_33); -lean::dec(x_2); -x_5 = x_33; -x_6 = x_32; -goto block_30; -} -block_30: -{ -obj* x_7; obj* x_8; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_27; -x_27 = lean::box(3); -x_7 = x_5; -x_8 = x_27; -goto block_26; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_5, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_5, 1); -lean::inc(x_29); -lean::dec(x_5); -x_7 = x_29; -x_8 = x_28; -goto block_26; -} -block_26: -{ -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_11; obj* x_12; -x_11 = l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1; -x_12 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_6); -lean::cnstr_set(x_12, 2, x_10); -lean::cnstr_set(x_12, 3, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_7, 0); -lean::inc(x_13); -lean::dec(x_7); -x_14 = l_Lean_Parser_Term_from_HasView; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_17, 0, x_4); -lean::cnstr_set(x_17, 1, x_6); -lean::cnstr_set(x_17, 2, x_10); -lean::cnstr_set(x_17, 3, x_16); -return x_17; -} -} -else -{ -obj* x_18; -lean::dec(x_8); -x_18 = lean::box(0); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_19; obj* x_20; -x_19 = l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_6); -lean::cnstr_set(x_20, 2, x_18); -lean::cnstr_set(x_20, 3, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_7, 0); -lean::inc(x_21); -lean::dec(x_7); -x_22 = l_Lean_Parser_Term_from_HasView; -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_24 = lean::apply_1(x_23, x_21); -x_25 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_6); -lean::cnstr_set(x_25, 2, x_18); -lean::cnstr_set(x_25, 3, x_24); -return x_25; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_show_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_show_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_show_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_show_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_show_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_show_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("show "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = lean::mk_string(", "); -x_6 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_2); -lean::dec(x_5); -x_7 = lean::box(0); -x_8 = l_Lean_Parser_Term_from_Parser_Lean_Parser_HasTokens; -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_7); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_9); -lean::dec(x_9); -lean::dec(x_6); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_10); -lean::dec(x_10); -lean::dec(x_4); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_11); -lean::dec(x_11); -lean::dec(x_3); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -return x_13; -} -} -obj* _init_l_Lean_Parser_Term_show_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::mk_string("show "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_string(", "); -x_8 = l_String_trim(x_7); -lean::dec(x_7); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_from_Parser), 5, 0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_10); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_TermParserM_Monad; -x_18 = l_Lean_Parser_TermParserM_MonadExcept; -x_19 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_20 = l_Lean_Parser_TermParserM_Alternative; -x_21 = l_Lean_Parser_Term_show; -x_22 = l_Lean_Parser_Term_show_HasView; -x_23 = l_Lean_Parser_Combinators_node_view___rarg(x_17, x_18, x_19, x_20, x_21, x_16, x_22); -lean::dec(x_16); -return x_23; -} -} -obj* _init_l_Lean_Parser_Term_show_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("show "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_string(", "); -x_8 = l_String_trim(x_7); -lean::dec(x_7); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_from_Parser), 5, 0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_10); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -obj* l_Lean_Parser_Term_show_Parser(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; -x_6 = l_Lean_Parser_Term_show; -x_7 = l_Lean_Parser_Term_show_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_matchEquation() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("matchEquation"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_matchEquation_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(x_2); -x_6 = l_List_join___main___rarg(x_5); -x_7 = l_Lean_Parser_noKind; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Parser_Term_matchEquation; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_3, 0); -lean::inc(x_16); -lean::dec(x_3); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_10); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_8); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_Term_matchEquation; -x_21 = l_Lean_Parser_Syntax_mkNode(x_20, x_19); -return x_21; -} -} -} -obj* _init_l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::box(0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -lean::cnstr_set(x_6, 2, x_2); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_7 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_8 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_6, x_7, x_5); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_1); -return x_10; -} -} -} -obj* l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_66; -x_66 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; -x_67 = l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__2; -return x_67; -} -else -{ -obj* x_68; obj* x_69; -x_68 = lean::cnstr_get(x_66, 0); -lean::inc(x_68); -lean::dec(x_66); -x_69 = lean::cnstr_get(x_68, 1); -lean::inc(x_69); -lean::dec(x_68); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; -x_70 = lean::box(3); -x_2 = x_69; -x_3 = x_70; -goto block_65; -} -else -{ -obj* x_71; obj* x_72; -x_71 = lean::cnstr_get(x_69, 0); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -lean::dec(x_69); -x_2 = x_72; -x_3 = x_71; -goto block_65; -} -} -block_65: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_2, 1); -lean::inc(x_7); -lean::dec(x_2); -x_8 = lean::box(0); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_12 = lean::box(3); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_7, 0); -lean::inc(x_14); -lean::dec(x_7); -x_15 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_16 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_10); -lean::cnstr_set(x_16, 2, x_14); -return x_16; -} -} -else -{ -lean::dec(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_17; -x_17 = l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__1; -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_7, 0); -lean::inc(x_18); -lean::dec(x_7); -x_19 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_8); -lean::cnstr_set(x_20, 2, x_18); -return x_20; -} -} -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_4); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = lean::cnstr_get(x_4, 0); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -x_24 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_25 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_26 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_24, x_25, x_23); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -lean::free_heap_obj(x_4); -x_27 = lean::box(0); -x_28 = lean::box(3); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_26); -lean::cnstr_set(x_29, 1, x_27); -lean::cnstr_set(x_29, 2, x_28); -return x_29; -} -else -{ -obj* x_30; -x_30 = lean::cnstr_get(x_2, 0); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_2, 1); -lean::inc(x_31); -lean::dec(x_2); -x_32 = lean::cnstr_get(x_30, 0); -lean::inc(x_32); -lean::dec(x_30); -lean::cnstr_set(x_4, 0, x_32); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_34, 0, x_26); -lean::cnstr_set(x_34, 1, x_4); -lean::cnstr_set(x_34, 2, x_33); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_31, 0); -lean::inc(x_35); -lean::dec(x_31); -x_36 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_36, 0, x_26); -lean::cnstr_set(x_36, 1, x_4); -lean::cnstr_set(x_36, 2, x_35); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; -lean::dec(x_30); -lean::free_heap_obj(x_4); -x_37 = lean::cnstr_get(x_2, 1); -lean::inc(x_37); -lean::dec(x_2); -x_38 = lean::box(0); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_39; obj* x_40; -x_39 = lean::box(3); -x_40 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_40, 0, x_26); -lean::cnstr_set(x_40, 1, x_38); -lean::cnstr_set(x_40, 2, x_39); -return x_40; -} -else -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_37, 0); -lean::inc(x_41); -lean::dec(x_37); -x_42 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_42, 0, x_26); -lean::cnstr_set(x_42, 1, x_38); -lean::cnstr_set(x_42, 2, x_41); -return x_42; -} -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_43 = lean::cnstr_get(x_4, 0); -lean::inc(x_43); -lean::dec(x_4); -x_44 = lean::cnstr_get(x_43, 1); -lean::inc(x_44); -lean::dec(x_43); -x_45 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_46 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_47 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_45, x_46, x_44); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; -x_48 = lean::box(0); -x_49 = lean::box(3); -x_50 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_50, 0, x_47); -lean::cnstr_set(x_50, 1, x_48); -lean::cnstr_set(x_50, 2, x_49); -return x_50; -} -else -{ -obj* x_51; -x_51 = lean::cnstr_get(x_2, 0); -lean::inc(x_51); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; obj* x_53; obj* x_54; -x_52 = lean::cnstr_get(x_2, 1); -lean::inc(x_52); -lean::dec(x_2); -x_53 = lean::cnstr_get(x_51, 0); -lean::inc(x_53); -lean::dec(x_51); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_55; obj* x_56; -x_55 = lean::box(3); -x_56 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_56, 0, x_47); -lean::cnstr_set(x_56, 1, x_54); -lean::cnstr_set(x_56, 2, x_55); -return x_56; -} -else -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_52, 0); -lean::inc(x_57); -lean::dec(x_52); -x_58 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_58, 0, x_47); -lean::cnstr_set(x_58, 1, x_54); -lean::cnstr_set(x_58, 2, x_57); -return x_58; -} -} -else -{ -obj* x_59; obj* x_60; -lean::dec(x_51); -x_59 = lean::cnstr_get(x_2, 1); -lean::inc(x_59); -lean::dec(x_2); -x_60 = lean::box(0); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_61; obj* x_62; -x_61 = lean::box(3); -x_62 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_62, 0, x_47); -lean::cnstr_set(x_62, 1, x_60); -lean::cnstr_set(x_62, 2, x_61); -return x_62; -} -else -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_59, 0); -lean::inc(x_63); -lean::dec(x_59); -x_64 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_64, 0, x_47); -lean::cnstr_set(x_64, 1, x_60); -lean::cnstr_set(x_64, 2, x_63); -return x_64; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_matchEquation_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_matchEquation_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_matchEquation_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_matchEquation_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_match() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("match"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_List_map___main___at_Lean_Parser_Term_match_HasView_x27___elambda__1___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_List_map___main___at_Lean_Parser_Term_match_HasView_x27___elambda__1___spec__1(x_5); -x_7 = lean::cnstr_get(x_4, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = l_Lean_Parser_Term_matchEquation_HasView; -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -x_12 = lean::box(0); -lean::cnstr_set(x_1, 1, x_12); -lean::cnstr_set(x_1, 0, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_6); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_4, 0); -lean::inc(x_14); -lean::dec(x_4); -x_15 = lean::cnstr_get(x_7, 0); -lean::inc(x_15); -lean::dec(x_7); -x_16 = l_Lean_Parser_Term_matchEquation_HasView; -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_19; obj* x_20; -x_19 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::cnstr_set(x_1, 1, x_19); -lean::cnstr_set(x_1, 0, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_6); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_15, 0); -lean::inc(x_21); -lean::dec(x_15); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_1, 1, x_22); -lean::cnstr_set(x_1, 0, x_23); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); -lean::cnstr_set(x_24, 1, x_1); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_6); -return x_25; -} -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_1, 0); -x_27 = lean::cnstr_get(x_1, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_1); -x_28 = l_List_map___main___at_Lean_Parser_Term_match_HasView_x27___elambda__1___spec__1(x_27); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_26, 0); -lean::inc(x_30); -lean::dec(x_26); -x_31 = l_Lean_Parser_Term_matchEquation_HasView; -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_30); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_28); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = lean::cnstr_get(x_26, 0); -lean::inc(x_37); -lean::dec(x_26); -x_38 = lean::cnstr_get(x_29, 0); -lean::inc(x_38); -lean::dec(x_29); -x_39 = l_Lean_Parser_Term_matchEquation_HasView; -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; -x_42 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_28); -return x_44; -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_45 = lean::cnstr_get(x_38, 0); -lean::inc(x_45); -lean::dec(x_38); -x_46 = lean::box(0); -x_47 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_47, 0, x_45); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_46); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_41); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_28); -return x_50; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_match_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -lean::dec(x_1); -x_8 = l_List_map___main___at_Lean_Parser_Term_tuple_HasView_x27___elambda__1___spec__1(x_3); -x_9 = l_List_join___main___rarg(x_8); -x_10 = l_Lean_Parser_noKind; -x_11 = l_Lean_Parser_Syntax_mkNode(x_10, x_9); -x_12 = l_List_map___main___at_Lean_Parser_Term_match_HasView_x27___elambda__1___spec__1(x_7); -x_13 = l_List_join___main___rarg(x_12); -x_14 = l_Lean_Parser_Syntax_mkNode(x_10, x_13); -x_15 = lean::box(0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_15); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_94; -x_94 = lean::box(3); -x_17 = x_94; -goto block_93; -} -else -{ -obj* x_95; obj* x_96; -x_95 = lean::cnstr_get(x_2, 0); -lean::inc(x_95); -lean::dec(x_2); -x_96 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_96, 0, x_95); -x_17 = x_96; -goto block_93; -} -block_93: -{ -obj* x_18; obj* x_51; obj* x_52; -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_83; -x_83 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_18 = x_83; -goto block_50; -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_5, 0); -lean::inc(x_84); -lean::dec(x_5); -x_85 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_51 = x_85; -x_52 = x_84; -goto block_82; -} -} -else -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_86 = lean::cnstr_get(x_4, 0); -lean::inc(x_86); -lean::dec(x_4); -x_87 = l_Lean_Parser_Term_typeSpec_HasView; -x_88 = lean::cnstr_get(x_87, 1); -lean::inc(x_88); -x_89 = lean::apply_1(x_88, x_86); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_15); -x_91 = l_Lean_Parser_Syntax_mkNode(x_10, x_90); -if (lean::obj_tag(x_5) == 0) -{ -x_18 = x_91; -goto block_50; -} -else -{ -obj* x_92; -x_92 = lean::cnstr_get(x_5, 0); -lean::inc(x_92); -lean::dec(x_5); -x_51 = x_91; -x_52 = x_92; -goto block_82; -} -} -block_50: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_19 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_16); -x_21 = lean::box(3); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_18); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_11); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_17); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_Lean_Parser_Term_match; -x_27 = l_Lean_Parser_Syntax_mkNode(x_26, x_25); -return x_27; -} -else -{ -obj* x_28; -x_28 = lean::cnstr_get(x_6, 0); -lean::inc(x_28); -lean::dec(x_6); -if (lean::obj_tag(x_28) == 0) -{ -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; -x_29 = l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -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 = lean::box(3); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_30); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_11); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_17); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_Term_match; -x_37 = l_Lean_Parser_Syntax_mkNode(x_36, x_35); -return x_37; -} -else -{ -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; -x_38 = lean::cnstr_get(x_28, 0); -lean::inc(x_38); -lean::dec(x_28); -x_39 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_39, 0, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_15); -x_41 = l_Lean_Parser_Syntax_mkNode(x_10, 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_16); -x_43 = lean::box(3); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_18); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_11); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_17); -lean::cnstr_set(x_47, 1, x_46); -x_48 = l_Lean_Parser_Term_match; -x_49 = l_Lean_Parser_Syntax_mkNode(x_48, x_47); -return x_49; -} -} -} -block_82: -{ -obj* x_53; -x_53 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_54 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_16); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_53); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_51); -lean::cnstr_set(x_57, 1, x_56); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_11); -lean::cnstr_set(x_58, 1, x_57); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_17); -lean::cnstr_set(x_59, 1, x_58); -x_60 = l_Lean_Parser_Term_match; -x_61 = l_Lean_Parser_Syntax_mkNode(x_60, x_59); -return x_61; -} -else -{ -obj* x_62; -x_62 = lean::cnstr_get(x_6, 0); -lean::inc(x_62); -lean::dec(x_6); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_63 = l_Lean_Parser_command_notation_HasView_x27___elambda__1___closed__1; -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_16); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_53); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_51); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_11); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_17); -lean::cnstr_set(x_68, 1, x_67); -x_69 = l_Lean_Parser_Term_match; -x_70 = l_Lean_Parser_Syntax_mkNode(x_69, x_68); -return x_70; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_71 = lean::cnstr_get(x_62, 0); -lean::inc(x_71); -lean::dec(x_62); -x_72 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_15); -x_74 = l_Lean_Parser_Syntax_mkNode(x_10, 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_16); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_53); -lean::cnstr_set(x_76, 1, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_51); -lean::cnstr_set(x_77, 1, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_11); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_17); -lean::cnstr_set(x_79, 1, x_78); -x_80 = l_Lean_Parser_Term_match; -x_81 = l_Lean_Parser_Syntax_mkNode(x_80, x_79); -return x_81; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1(obj* x_1, obj* x_2, uint8 x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { -_start: -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint8 x_13; obj* x_14; uint8 x_15; -x_9 = l_String_OldIterator_remaining___main(x_7); -x_10 = lean::box(0); -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_add(x_9, x_11); -lean::dec(x_9); -x_13 = 0; -x_14 = l___private_init_lean_parser_combinators_2__sepByAux___main___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_13, x_10, x_12, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_12); -x_15 = !lean::is_exclusive(x_14); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = lean::cnstr_get(x_14, 0); -x_17 = l_Lean_Parser_finishCommentBlock___closed__2; -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_16); -lean::cnstr_set(x_14, 0, x_18); -return x_14; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = lean::cnstr_get(x_14, 0); -x_20 = lean::cnstr_get(x_14, 1); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_14); -x_21 = l_Lean_Parser_finishCommentBlock___closed__2; -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_19); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_20); -return x_23; -} -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -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_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -lean::dec(x_8); -x_9 = l_Lean_Parser_Term_matchEquation_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_7); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::box(0); -lean::cnstr_set(x_3, 1, x_14); -lean::cnstr_set(x_3, 0, x_13); -return x_3; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = l_Lean_Parser_Term_matchEquation_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_15); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::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); -return x_22; -} -} -else -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_3, 0); -lean::inc(x_23); -lean::dec(x_3); -x_24 = !lean::is_exclusive(x_5); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_5, 0); -x_26 = lean::cnstr_get(x_5, 1); -x_27 = l_Lean_Parser_Term_matchEquation_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_23); -x_30 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2(x_1, x_2, x_26); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_25, 0); -lean::inc(x_31); -lean::dec(x_25); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_29); -lean::cnstr_set(x_34, 1, x_33); -lean::cnstr_set(x_5, 1, x_30); -lean::cnstr_set(x_5, 0, x_34); -return x_5; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_25); -x_35 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_29); -lean::cnstr_set(x_36, 1, x_35); -lean::cnstr_set(x_5, 1, x_30); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 0); -x_38 = lean::cnstr_get(x_5, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_5); -x_39 = l_Lean_Parser_Term_matchEquation_HasView; -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_23); -x_42 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2(x_1, x_2, x_38); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_43 = lean::cnstr_get(x_37, 0); -lean::inc(x_43); -lean::dec(x_37); -x_44 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_41); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_42); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; -lean::dec(x_37); -x_48 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_41); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_42); -return x_50; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_matchEquation_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 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; -x_1 = lean::mk_nat_obj(0u); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::mk_string(", "); -x_4 = l_String_trim(x_3); -lean::dec(x_3); -lean::inc(x_4); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_6, 0, x_4); -lean::closure_set(x_6, 1, x_1); -lean::closure_set(x_6, 2, x_5); -x_7 = 0; -x_8 = lean::box(x_7); -lean::inc(x_2); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1___boxed), 8, 3); -lean::closure_set(x_9, 0, x_2); -lean::closure_set(x_9, 1, x_6); -lean::closure_set(x_9, 2, x_8); -x_10 = lean::mk_string(":="); -x_11 = l_String_trim(x_10); -lean::dec(x_10); -lean::inc(x_11); -x_12 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_13, 0, x_11); -lean::closure_set(x_13, 1, x_1); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_2); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_9); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_Term_matchEquation; -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_19, 0, x_18); -lean::closure_set(x_19, 1, x_17); -return x_19; -} -} -obj* _init_l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::mk_string(" | "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_60; obj* x_61; -x_1 = lean::box(0); -x_60 = lean::box(3); -x_61 = l_Lean_Parser_Syntax_asNode___main(x_60); -if (lean::obj_tag(x_61) == 0) -{ -obj* x_62; -x_62 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_2 = x_62; -goto block_59; -} -else -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_63 = lean::cnstr_get(x_61, 0); -lean::inc(x_63); -lean::dec(x_61); -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -lean::dec(x_63); -x_65 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_66 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_67 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_65, x_66, x_64); -x_2 = x_67; -goto block_59; -} -block_59: -{ -obj* x_3; obj* x_38; obj* x_39; -x_38 = lean::box(3); -x_39 = l_Lean_Parser_Syntax_asNode___main(x_38); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; -x_40 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_3 = x_40; -goto block_37; -} -else -{ -uint8 x_41; -x_41 = !lean::is_exclusive(x_39); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_39, 0); -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -lean::dec(x_42); -if (lean::obj_tag(x_43) == 0) -{ -lean::free_heap_obj(x_39); -x_3 = x_1; -goto block_37; -} -else -{ -obj* x_44; -x_44 = lean::cnstr_get(x_43, 1); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -lean::dec(x_43); -x_46 = l_Lean_Parser_Term_typeSpec_HasView; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::apply_1(x_47, x_45); -lean::cnstr_set(x_39, 0, x_48); -x_3 = x_39; -goto block_37; -} -else -{ -obj* x_49; -lean::dec(x_44); -lean::dec(x_43); -lean::free_heap_obj(x_39); -x_49 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_3 = x_49; -goto block_37; -} -} -} -else -{ -obj* x_50; obj* x_51; -x_50 = lean::cnstr_get(x_39, 0); -lean::inc(x_50); -lean::dec(x_39); -x_51 = lean::cnstr_get(x_50, 1); -lean::inc(x_51); -lean::dec(x_50); -if (lean::obj_tag(x_51) == 0) -{ -x_3 = x_1; -goto block_37; -} -else -{ -obj* x_52; -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_53 = lean::cnstr_get(x_51, 0); -lean::inc(x_53); -lean::dec(x_51); -x_54 = l_Lean_Parser_Term_typeSpec_HasView; -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -x_56 = lean::apply_1(x_55, x_53); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_3 = x_57; -goto block_37; -} -else -{ -obj* x_58; -lean::dec(x_52); -lean::dec(x_51); -x_58 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_3 = x_58; -goto block_37; -} -} -} -} -block_37: -{ -obj* x_4; obj* x_16; obj* x_17; -x_16 = lean::box(3); -x_17 = l_Lean_Parser_Syntax_asNode___main(x_16); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; -x_18 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_18; -goto block_15; -} -else -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_17); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_17, 0); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -lean::free_heap_obj(x_17); -x_4 = x_1; -goto block_15; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -lean::dec(x_23); -lean::cnstr_set(x_17, 0, x_24); -x_25 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_25, 0, x_17); -x_4 = x_25; -goto block_15; -} -else -{ -obj* x_26; -lean::dec(x_23); -lean::free_heap_obj(x_17); -x_26 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_26; -goto block_15; -} -} -else -{ -obj* x_27; -lean::dec(x_22); -lean::dec(x_21); -lean::free_heap_obj(x_17); -x_27 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_27; -goto block_15; -} -} -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_17, 0); -lean::inc(x_28); -lean::dec(x_17); -x_29 = lean::cnstr_get(x_28, 1); -lean::inc(x_29); -lean::dec(x_28); -if (lean::obj_tag(x_29) == 0) -{ -x_4 = x_1; -goto block_15; -} -else -{ -obj* x_30; -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -if (lean::obj_tag(x_30) == 0) -{ -obj* x_31; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -lean::dec(x_29); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; obj* x_33; obj* x_34; -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -lean::dec(x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_4 = x_34; -goto block_15; -} -else -{ -obj* x_35; -lean::dec(x_31); -x_35 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_35; -goto block_15; -} -} -else -{ -obj* x_36; -lean::dec(x_30); -lean::dec(x_29); -x_36 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_4 = x_36; -goto block_15; -} -} -} -} -block_15: -{ -obj* x_5; obj* x_6; -x_5 = lean::box(3); -x_6 = l_Lean_Parser_Syntax_asNode___main(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__1; -x_8 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_8, 0, x_1); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set(x_8, 2, x_3); -lean::cnstr_set(x_8, 3, x_1); -lean::cnstr_set(x_8, 4, x_4); -lean::cnstr_set(x_8, 5, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__2; -x_12 = l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__3; -x_13 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2(x_11, x_12, x_10); -x_14 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_14, 0, x_1); -lean::cnstr_set(x_14, 1, x_2); -lean::cnstr_set(x_14, 2, x_3); -lean::cnstr_set(x_14, 3, x_1); -lean::cnstr_set(x_14, 4, x_4); -lean::cnstr_set(x_14, 5, x_13); -return x_14; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_match_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_109; -x_109 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_109) == 0) -{ -obj* x_110; -x_110 = l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__4; -return x_110; -} -else -{ -obj* x_111; obj* x_112; -x_111 = lean::cnstr_get(x_109, 0); -lean::inc(x_111); -lean::dec(x_109); -x_112 = lean::cnstr_get(x_111, 1); -lean::inc(x_112); -lean::dec(x_111); -if (lean::obj_tag(x_112) == 0) -{ -obj* x_113; -x_113 = lean::box(3); -x_2 = x_112; -x_3 = x_113; -goto block_108; -} -else -{ -obj* x_114; obj* x_115; -x_114 = lean::cnstr_get(x_112, 0); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_112, 1); -lean::inc(x_115); -lean::dec(x_112); -x_2 = x_115; -x_3 = x_114; -goto block_108; -} -} -block_108: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_105; obj* x_106; -x_105 = lean::cnstr_get(x_3, 0); -lean::inc(x_105); -lean::dec(x_3); -x_106 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_106, 0, x_105); -x_4 = x_106; -goto block_104; -} -else -{ -obj* x_107; -lean::dec(x_3); -x_107 = lean::box(0); -x_4 = x_107; -goto block_104; -} -block_104: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_101; -x_101 = lean::box(3); -x_5 = x_2; -x_6 = x_101; -goto block_100; -} -else -{ -obj* x_102; obj* x_103; -x_102 = lean::cnstr_get(x_2, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_2, 1); -lean::inc(x_103); -lean::dec(x_2); -x_5 = x_103; -x_6 = x_102; -goto block_100; -} -block_100: -{ -obj* x_7; obj* x_93; -x_93 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_93) == 0) -{ -obj* x_94; -x_94 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1; -x_7 = x_94; -goto block_92; -} -else -{ -obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -x_95 = lean::cnstr_get(x_93, 0); -lean::inc(x_95); -lean::dec(x_93); -x_96 = lean::cnstr_get(x_95, 1); -lean::inc(x_96); -lean::dec(x_95); -x_97 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2; -x_98 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_99 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_tuple_HasView_x27___spec__1(x_97, x_98, x_96); -x_7 = x_99; -goto block_92; -} -block_92: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_89; -x_89 = lean::box(3); -x_8 = x_5; -x_9 = x_89; -goto block_88; -} -else -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_5, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_5, 1); -lean::inc(x_91); -lean::dec(x_5); -x_8 = x_91; -x_9 = x_90; -goto block_88; -} -block_88: -{ -obj* x_10; obj* x_66; -x_66 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; -x_67 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_10 = x_67; -goto block_65; -} -else -{ -uint8 x_68; -x_68 = !lean::is_exclusive(x_66); -if (x_68 == 0) -{ -obj* x_69; obj* x_70; -x_69 = lean::cnstr_get(x_66, 0); -x_70 = lean::cnstr_get(x_69, 1); -lean::inc(x_70); -lean::dec(x_69); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; -lean::free_heap_obj(x_66); -x_71 = lean::box(0); -x_10 = x_71; -goto block_65; -} -else -{ -obj* x_72; -x_72 = lean::cnstr_get(x_70, 1); -lean::inc(x_72); -if (lean::obj_tag(x_72) == 0) -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_73 = lean::cnstr_get(x_70, 0); -lean::inc(x_73); -lean::dec(x_70); -x_74 = l_Lean_Parser_Term_typeSpec_HasView; -x_75 = lean::cnstr_get(x_74, 0); -lean::inc(x_75); -x_76 = lean::apply_1(x_75, x_73); -lean::cnstr_set(x_66, 0, x_76); -x_10 = x_66; -goto block_65; -} -else -{ -obj* x_77; -lean::dec(x_72); -lean::dec(x_70); -lean::free_heap_obj(x_66); -x_77 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_10 = x_77; -goto block_65; -} -} -} -else -{ -obj* x_78; obj* x_79; -x_78 = lean::cnstr_get(x_66, 0); -lean::inc(x_78); -lean::dec(x_66); -x_79 = lean::cnstr_get(x_78, 1); -lean::inc(x_79); -lean::dec(x_78); -if (lean::obj_tag(x_79) == 0) -{ -obj* x_80; -x_80 = lean::box(0); -x_10 = x_80; -goto block_65; -} -else -{ -obj* x_81; -x_81 = lean::cnstr_get(x_79, 1); -lean::inc(x_81); -if (lean::obj_tag(x_81) == 0) -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_82 = lean::cnstr_get(x_79, 0); -lean::inc(x_82); -lean::dec(x_79); -x_83 = l_Lean_Parser_Term_typeSpec_HasView; -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_85 = lean::apply_1(x_84, x_82); -x_86 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_86, 0, x_85); -x_10 = x_86; -goto block_65; -} -else -{ -obj* x_87; -lean::dec(x_81); -lean::dec(x_79); -x_87 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_10 = x_87; -goto block_65; -} -} -} -} -block_65: -{ -obj* x_11; obj* x_12; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_62; -x_62 = lean::box(3); -x_11 = x_8; -x_12 = x_62; -goto block_61; -} -else -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_8, 0); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_8, 1); -lean::inc(x_64); -lean::dec(x_8); -x_11 = x_64; -x_12 = x_63; -goto block_61; -} -block_61: -{ -obj* x_13; -if (lean::obj_tag(x_12) == 0) -{ -obj* x_58; obj* x_59; -x_58 = lean::cnstr_get(x_12, 0); -lean::inc(x_58); -lean::dec(x_12); -x_59 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_59, 0, x_58); -x_13 = x_59; -goto block_57; -} -else -{ -obj* x_60; -lean::dec(x_12); -x_60 = lean::box(0); -x_13 = x_60; -goto block_57; -} -block_57: -{ -obj* x_14; obj* x_15; -if (lean::obj_tag(x_11) == 0) -{ -obj* x_54; -x_54 = lean::box(3); -x_14 = x_11; -x_15 = x_54; -goto block_53; -} -else -{ -obj* x_55; obj* x_56; -x_55 = lean::cnstr_get(x_11, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_11, 1); -lean::inc(x_56); -lean::dec(x_11); -x_14 = x_56; -x_15 = x_55; -goto block_53; -} -block_53: -{ -obj* x_16; obj* x_31; -x_31 = l_Lean_Parser_Syntax_asNode___main(x_15); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_16 = x_32; -goto block_30; -} -else -{ -uint8 x_33; -x_33 = !lean::is_exclusive(x_31); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_31, 0); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -lean::free_heap_obj(x_31); -x_36 = lean::box(0); -x_16 = x_36; -goto block_30; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_35, 1); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = lean::cnstr_get(x_35, 0); -lean::inc(x_38); -lean::dec(x_35); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -lean::dec(x_38); -lean::cnstr_set(x_31, 0, x_39); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_31); -x_16 = x_40; -goto block_30; -} -else -{ -obj* x_41; -lean::dec(x_38); -lean::free_heap_obj(x_31); -x_41 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_16 = x_41; -goto block_30; -} -} -else -{ -obj* x_42; -lean::dec(x_37); -lean::dec(x_35); -lean::free_heap_obj(x_31); -x_42 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_16 = x_42; -goto block_30; -} -} -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_31, 0); -lean::inc(x_43); -lean::dec(x_31); -x_44 = lean::cnstr_get(x_43, 1); -lean::inc(x_44); -lean::dec(x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; -x_45 = lean::box(0); -x_16 = x_45; -goto block_30; -} -else -{ -obj* x_46; -x_46 = lean::cnstr_get(x_44, 1); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; -x_47 = lean::cnstr_get(x_44, 0); -lean::inc(x_47); -lean::dec(x_44); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -lean::dec(x_47); -x_49 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_49); -x_16 = x_50; -goto block_30; -} -else -{ -obj* x_51; -lean::dec(x_47); -x_51 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_16 = x_51; -goto block_30; -} -} -else -{ -obj* x_52; -lean::dec(x_46); -lean::dec(x_44); -x_52 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_16 = x_52; -goto block_30; -} -} -} -} -block_30: -{ -obj* x_17; -if (lean::obj_tag(x_14) == 0) -{ -obj* x_28; -x_28 = lean::box(3); -x_17 = x_28; -goto block_27; -} -else -{ -obj* x_29; -x_29 = lean::cnstr_get(x_14, 0); -lean::inc(x_29); -lean::dec(x_14); -x_17 = x_29; -goto block_27; -} -block_27: -{ -obj* x_18; -x_18 = l_Lean_Parser_Syntax_asNode___main(x_17); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -x_19 = l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_7); -lean::cnstr_set(x_20, 2, x_10); -lean::cnstr_set(x_20, 3, x_13); -lean::cnstr_set(x_20, 4, x_16); -lean::cnstr_set(x_20, 5, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_18, 0); -lean::inc(x_21); -lean::dec(x_18); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -x_23 = l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__2; -x_24 = l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__3; -x_25 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2(x_23, x_24, x_22); -x_26 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_26, 0, x_4); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_10); -lean::cnstr_set(x_26, 3, x_13); -lean::cnstr_set(x_26, 4, x_16); -lean::cnstr_set(x_26, 5, x_25); -return x_26; -} -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_match_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_match_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_match_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1___boxed(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: -{ -uint8 x_9; obj* x_10; -x_9 = lean::unbox(x_3); -lean::dec(x_3); -x_10 = l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1(x_1, x_2, x_9, x_4, x_5, x_6, x_7, x_8); -return x_10; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_match_HasView_x27___spec__2(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_Term_match_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_match_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_match_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_1 = lean::mk_string("match "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = lean::mk_string(", "); -x_6 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_2); -lean::dec(x_5); -x_7 = l_Lean_Parser_Combinators_sepBy1_tokens___rarg(x_4, x_6); -lean::dec(x_6); -x_8 = lean::mk_string(" with "); -x_9 = l_Lean_Parser_symbol_tokens___rarg(x_8, x_2); -lean::dec(x_8); -x_10 = lean::mk_string(" | "); -x_11 = l_Lean_Parser_symbol_tokens___rarg(x_10, x_2); -lean::dec(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_2); -lean::dec(x_13); -x_15 = lean::box(0); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_15); -lean::dec(x_4); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_16); -lean::dec(x_16); -lean::dec(x_14); -x_18 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_17); -lean::dec(x_17); -x_19 = l_Lean_Parser_tokens___rarg(x_18); -lean::dec(x_18); -x_20 = l_Lean_Parser_Combinators_sepBy1_tokens___rarg(x_19, x_11); -lean::dec(x_11); -lean::dec(x_19); -x_21 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_15); -lean::dec(x_20); -x_22 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_21); -lean::dec(x_21); -lean::dec(x_12); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_9, x_22); -lean::dec(x_22); -lean::dec(x_9); -x_24 = l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens; -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_24, x_23); -lean::dec(x_23); -x_26 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_25); -lean::dec(x_25); -lean::dec(x_7); -x_27 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_26); -lean::dec(x_26); -lean::dec(x_3); -x_28 = l_Lean_Parser_tokens___rarg(x_27); -lean::dec(x_27); -return x_28; -} -} -obj* _init_l_Lean_Parser_Term_match_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_1 = lean::mk_string("match "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_string(", "); -x_8 = l_String_trim(x_7); -lean::dec(x_7); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = 0; -x_12 = lean::box(x_11); -lean::inc(x_6); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1___boxed), 8, 3); -lean::closure_set(x_13, 0, x_6); -lean::closure_set(x_13, 1, x_10); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::mk_string(" with "); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::mk_string(" | "); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::box(x_11); -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_22); -x_24 = lean::mk_string(":="); -x_25 = l_String_trim(x_24); -lean::dec(x_24); -lean::inc(x_25); -x_26 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_4); -lean::closure_set(x_27, 2, x_26); -x_28 = lean::box(0); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set(x_30, 1, x_29); -lean::inc(x_13); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_13); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_Lean_Parser_Term_matchEquation; -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_32); -lean::closure_set(x_33, 1, x_31); -x_34 = lean::box(x_11); -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1___boxed), 8, 3); -lean::closure_set(x_35, 0, x_33); -lean::closure_set(x_35, 1, x_21); -lean::closure_set(x_35, 2, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_28); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_23); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_17); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optType_Parser), 5, 0); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_38); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_13); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_5); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_TermParserM_Monad; -x_44 = l_Lean_Parser_TermParserM_MonadExcept; -x_45 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_46 = l_Lean_Parser_TermParserM_Alternative; -x_47 = l_Lean_Parser_Term_match; -x_48 = l_Lean_Parser_Term_match_HasView; -x_49 = l_Lean_Parser_Combinators_node_view___rarg(x_43, x_44, x_45, x_46, x_47, x_42, x_48); -lean::dec(x_42); -return x_49; -} -} -obj* _init_l_Lean_Parser_Term_match_Parser___closed__1() { -_start: -{ -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; uint8 x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_1 = lean::mk_string("match "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_string(", "); -x_8 = l_String_trim(x_7); -lean::dec(x_7); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = 0; -x_12 = lean::box(x_11); -lean::inc(x_6); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1___boxed), 8, 3); -lean::closure_set(x_13, 0, x_6); -lean::closure_set(x_13, 1, x_10); -lean::closure_set(x_13, 2, x_12); -x_14 = lean::mk_string(" with "); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_4); -lean::closure_set(x_17, 2, x_16); -x_18 = lean::mk_string(" | "); -x_19 = l_String_trim(x_18); -lean::dec(x_18); -lean::inc(x_19); -x_20 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_20); -x_22 = lean::box(x_11); -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_22); -x_24 = lean::mk_string(":="); -x_25 = l_String_trim(x_24); -lean::dec(x_24); -lean::inc(x_25); -x_26 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_4); -lean::closure_set(x_27, 2, x_26); -x_28 = lean::box(0); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set(x_30, 1, x_29); -lean::inc(x_13); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_13); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_Lean_Parser_Term_matchEquation; -x_33 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_32); -lean::closure_set(x_33, 1, x_31); -x_34 = lean::box(x_11); -x_35 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy1___at_Lean_Parser_Term_match_HasView_x27___spec__1___boxed), 8, 3); -lean::closure_set(x_35, 0, x_33); -lean::closure_set(x_35, 1, x_21); -lean::closure_set(x_35, 2, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_28); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_23); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_17); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optType_Parser), 5, 0); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_38); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_13); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_5); -lean::cnstr_set(x_42, 1, x_41); -return x_42; -} -} -obj* l_Lean_Parser_Term_match_Parser(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; -x_6 = l_Lean_Parser_Term_match; -x_7 = l_Lean_Parser_Term_match_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_if() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("if"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_if_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_58; obj* x_59; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_1, 6); -lean::inc(x_8); -lean::dec(x_1); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_108; -x_108 = lean::box(3); -x_11 = x_108; -goto block_57; -} -else -{ -obj* x_109; obj* x_110; -x_109 = lean::cnstr_get(x_3, 0); -lean::inc(x_109); -lean::dec(x_3); -x_110 = lean::box(3); -x_58 = x_110; -x_59 = x_109; -goto block_107; -} -} -else -{ -obj* x_111; obj* x_112; -x_111 = lean::cnstr_get(x_2, 0); -lean::inc(x_111); -lean::dec(x_2); -x_112 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_112, 0, x_111); -if (lean::obj_tag(x_3) == 0) -{ -x_11 = x_112; -goto block_57; -} -else -{ -obj* x_113; -x_113 = lean::cnstr_get(x_3, 0); -lean::inc(x_113); -lean::dec(x_3); -x_58 = x_112; -x_59 = x_113; -goto block_107; -} -} -block_57: -{ -if (lean::obj_tag(x_5) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_12 = lean::box(3); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_6); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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_11); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_Lean_Parser_Term_if; -x_21 = l_Lean_Parser_Syntax_mkNode(x_20, x_19); -return x_21; -} -else -{ -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; -x_22 = lean::cnstr_get(x_7, 0); -lean::inc(x_22); -lean::dec(x_7); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_10); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_6); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::box(3); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_11); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_Lean_Parser_Term_if; -x_33 = l_Lean_Parser_Syntax_mkNode(x_32, x_31); -return x_33; -} -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_5, 0); -lean::inc(x_34); -lean::dec(x_5); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -if (lean::obj_tag(x_7) == 0) -{ -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; -x_36 = lean::box(3); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_10); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_6); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_35); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_4); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_40); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_11); -lean::cnstr_set(x_43, 1, x_42); -x_44 = l_Lean_Parser_Term_if; -x_45 = l_Lean_Parser_Syntax_mkNode(x_44, x_43); -return x_45; -} -else -{ -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; -x_46 = lean::cnstr_get(x_7, 0); -lean::inc(x_46); -lean::dec(x_7); -x_47 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_47, 0, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_10); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_6); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_35); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_4); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_51); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_11); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_Lean_Parser_Term_if; -x_56 = l_Lean_Parser_Syntax_mkNode(x_55, x_54); -return x_56; -} -} -} -block_107: -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_60 = l_Lean_Parser_Term_optIdent_HasView; -x_61 = lean::cnstr_get(x_60, 1); -lean::inc(x_61); -x_62 = lean::apply_1(x_61, x_59); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_9); -x_64 = l_Lean_Parser_noKind; -x_65 = l_Lean_Parser_Syntax_mkNode(x_64, x_63); -if (lean::obj_tag(x_5) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_66 = lean::box(3); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_10); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_6); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_66); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_4); -lean::cnstr_set(x_70, 1, x_69); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_65); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_58); -lean::cnstr_set(x_72, 1, x_71); -x_73 = l_Lean_Parser_Term_if; -x_74 = l_Lean_Parser_Syntax_mkNode(x_73, x_72); -return x_74; -} -else -{ -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; -x_75 = lean::cnstr_get(x_7, 0); -lean::inc(x_75); -lean::dec(x_7); -x_76 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_10); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_6); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::box(3); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_4); -lean::cnstr_set(x_81, 1, x_80); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_65); -lean::cnstr_set(x_82, 1, x_81); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_58); -lean::cnstr_set(x_83, 1, x_82); -x_84 = l_Lean_Parser_Term_if; -x_85 = l_Lean_Parser_Syntax_mkNode(x_84, x_83); -return x_85; -} -} -else -{ -obj* x_86; obj* x_87; -x_86 = lean::cnstr_get(x_5, 0); -lean::inc(x_86); -lean::dec(x_5); -x_87 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_88 = lean::box(3); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_10); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_6); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_87); -lean::cnstr_set(x_91, 1, x_90); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_4); -lean::cnstr_set(x_92, 1, x_91); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_65); -lean::cnstr_set(x_93, 1, x_92); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_58); -lean::cnstr_set(x_94, 1, x_93); -x_95 = l_Lean_Parser_Term_if; -x_96 = l_Lean_Parser_Syntax_mkNode(x_95, x_94); -return x_96; -} -else -{ -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; -x_97 = lean::cnstr_get(x_7, 0); -lean::inc(x_97); -lean::dec(x_7); -x_98 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_10); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_6); -lean::cnstr_set(x_100, 1, x_99); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_87); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_4); -lean::cnstr_set(x_102, 1, x_101); -x_103 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_103, 0, x_65); -lean::cnstr_set(x_103, 1, x_102); -x_104 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_104, 0, x_58); -lean::cnstr_set(x_104, 1, x_103); -x_105 = l_Lean_Parser_Term_if; -x_106 = l_Lean_Parser_Syntax_mkNode(x_105, x_104); -return x_106; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_if_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -lean::cnstr_set(x_5, 2, x_2); -lean::cnstr_set(x_5, 3, x_1); -lean::cnstr_set(x_5, 4, x_2); -lean::cnstr_set(x_5, 5, x_1); -lean::cnstr_set(x_5, 6, x_2); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -lean::free_heap_obj(x_3); -x_9 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_2); -lean::cnstr_set(x_9, 3, x_1); -lean::cnstr_set(x_9, 4, x_2); -lean::cnstr_set(x_9, 5, x_1); -lean::cnstr_set(x_9, 6, x_2); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -lean::dec(x_8); -x_12 = l_Lean_Parser_Term_optIdent_HasView; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -lean::cnstr_set(x_3, 0, x_14); -x_15 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_15, 0, x_1); -lean::cnstr_set(x_15, 1, x_3); -lean::cnstr_set(x_15, 2, x_2); -lean::cnstr_set(x_15, 3, x_1); -lean::cnstr_set(x_15, 4, x_2); -lean::cnstr_set(x_15, 5, x_1); -lean::cnstr_set(x_15, 6, x_2); -return x_15; -} -else -{ -obj* x_16; obj* x_17; -lean::dec(x_10); -lean::dec(x_8); -lean::free_heap_obj(x_3); -x_16 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_16); -lean::cnstr_set(x_17, 2, x_2); -lean::cnstr_set(x_17, 3, x_1); -lean::cnstr_set(x_17, 4, x_2); -lean::cnstr_set(x_17, 5, x_1); -lean::cnstr_set(x_17, 6, x_2); -return x_17; -} -} -} -else -{ -obj* x_18; obj* x_19; -x_18 = lean::cnstr_get(x_3, 0); -lean::inc(x_18); -lean::dec(x_3); -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -lean::dec(x_18); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_1); -lean::cnstr_set(x_20, 2, x_2); -lean::cnstr_set(x_20, 3, x_1); -lean::cnstr_set(x_20, 4, x_2); -lean::cnstr_set(x_20, 5, x_1); -lean::cnstr_set(x_20, 6, x_2); -return x_20; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_19, 0); -lean::inc(x_22); -lean::dec(x_19); -x_23 = l_Lean_Parser_Term_optIdent_HasView; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::apply_1(x_24, x_22); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_27, 0, x_1); -lean::cnstr_set(x_27, 1, x_26); -lean::cnstr_set(x_27, 2, x_2); -lean::cnstr_set(x_27, 3, x_1); -lean::cnstr_set(x_27, 4, x_2); -lean::cnstr_set(x_27, 5, x_1); -lean::cnstr_set(x_27, 6, x_2); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -lean::dec(x_21); -lean::dec(x_19); -x_28 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_29 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_29, 0, x_1); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_29, 2, x_2); -lean::cnstr_set(x_29, 3, x_1); -lean::cnstr_set(x_29, 4, x_2); -lean::cnstr_set(x_29, 5, x_1); -lean::cnstr_set(x_29, 6, x_2); -return x_29; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_if_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_85; -x_85 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_85) == 0) -{ -obj* x_86; -x_86 = l_Lean_Parser_Term_if_HasView_x27___lambda__1___closed__1; -return x_86; -} -else -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_85, 0); -lean::inc(x_87); -lean::dec(x_85); -x_88 = lean::cnstr_get(x_87, 1); -lean::inc(x_88); -lean::dec(x_87); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; -x_89 = lean::box(3); -x_2 = x_88; -x_3 = x_89; -goto block_84; -} -else -{ -obj* x_90; obj* x_91; -x_90 = lean::cnstr_get(x_88, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_88, 1); -lean::inc(x_91); -lean::dec(x_88); -x_2 = x_91; -x_3 = x_90; -goto block_84; -} -} -block_84: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_81; obj* x_82; -x_81 = lean::cnstr_get(x_3, 0); -lean::inc(x_81); -lean::dec(x_3); -x_82 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_82, 0, x_81); -x_4 = x_82; -goto block_80; -} -else -{ -obj* x_83; -lean::dec(x_3); -x_83 = lean::box(0); -x_4 = x_83; -goto block_80; -} -block_80: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_77; -x_77 = lean::box(3); -x_5 = x_2; -x_6 = x_77; -goto block_76; -} -else -{ -obj* x_78; obj* x_79; -x_78 = lean::cnstr_get(x_2, 0); -lean::inc(x_78); -x_79 = lean::cnstr_get(x_2, 1); -lean::inc(x_79); -lean::dec(x_2); -x_5 = x_79; -x_6 = x_78; -goto block_76; -} -block_76: -{ -obj* x_7; obj* x_54; -x_54 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; -x_55 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_7 = x_55; -goto block_53; -} -else -{ -uint8 x_56; -x_56 = !lean::is_exclusive(x_54); -if (x_56 == 0) -{ -obj* x_57; obj* x_58; -x_57 = lean::cnstr_get(x_54, 0); -x_58 = lean::cnstr_get(x_57, 1); -lean::inc(x_58); -lean::dec(x_57); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; -lean::free_heap_obj(x_54); -x_59 = lean::box(0); -x_7 = x_59; -goto block_53; -} -else -{ -obj* x_60; -x_60 = lean::cnstr_get(x_58, 1); -lean::inc(x_60); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_61 = lean::cnstr_get(x_58, 0); -lean::inc(x_61); -lean::dec(x_58); -x_62 = l_Lean_Parser_Term_optIdent_HasView; -x_63 = lean::cnstr_get(x_62, 0); -lean::inc(x_63); -x_64 = lean::apply_1(x_63, x_61); -lean::cnstr_set(x_54, 0, x_64); -x_7 = x_54; -goto block_53; -} -else -{ -obj* x_65; -lean::dec(x_60); -lean::dec(x_58); -lean::free_heap_obj(x_54); -x_65 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_7 = x_65; -goto block_53; -} -} -} -else -{ -obj* x_66; obj* x_67; -x_66 = lean::cnstr_get(x_54, 0); -lean::inc(x_66); -lean::dec(x_54); -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -lean::dec(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; -x_68 = lean::box(0); -x_7 = x_68; -goto block_53; -} -else -{ -obj* x_69; -x_69 = lean::cnstr_get(x_67, 1); -lean::inc(x_69); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_70 = lean::cnstr_get(x_67, 0); -lean::inc(x_70); -lean::dec(x_67); -x_71 = l_Lean_Parser_Term_optIdent_HasView; -x_72 = lean::cnstr_get(x_71, 0); -lean::inc(x_72); -x_73 = lean::apply_1(x_72, x_70); -x_74 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_74, 0, x_73); -x_7 = x_74; -goto block_53; -} -else -{ -obj* x_75; -lean::dec(x_69); -lean::dec(x_67); -x_75 = l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1; -x_7 = x_75; -goto block_53; -} -} -} -} -block_53: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_50; -x_50 = lean::box(3); -x_8 = x_5; -x_9 = x_50; -goto block_49; -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_5, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_5, 1); -lean::inc(x_52); -lean::dec(x_5); -x_8 = x_52; -x_9 = x_51; -goto block_49; -} -block_49: -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_31; obj* x_32; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_46; -x_46 = lean::box(3); -x_31 = x_8; -x_32 = x_46; -goto block_45; -} -else -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_8, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_8, 1); -lean::inc(x_48); -lean::dec(x_8); -x_31 = x_48; -x_32 = x_47; -goto block_45; -} -block_30: -{ -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::box(0); -x_14 = lean::box(3); -x_15 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_9); -lean::cnstr_set(x_15, 3, x_10); -lean::cnstr_set(x_15, 4, x_11); -lean::cnstr_set(x_15, 5, x_13); -lean::cnstr_set(x_15, 6, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_12, 0); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_12, 1); -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::box(3); -x_21 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_7); -lean::cnstr_set(x_21, 2, x_9); -lean::cnstr_set(x_21, 3, x_10); -lean::cnstr_set(x_21, 4, x_11); -lean::cnstr_set(x_21, 5, x_19); -lean::cnstr_set(x_21, 6, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_17, 0); -lean::inc(x_22); -x_23 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_7); -lean::cnstr_set(x_23, 2, x_9); -lean::cnstr_set(x_23, 3, x_10); -lean::cnstr_set(x_23, 4, x_11); -lean::cnstr_set(x_23, 5, x_19); -lean::cnstr_set(x_23, 6, x_22); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_12, 1); -x_25 = lean::box(0); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::box(3); -x_27 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_27, 0, x_4); -lean::cnstr_set(x_27, 1, x_7); -lean::cnstr_set(x_27, 2, x_9); -lean::cnstr_set(x_27, 3, x_10); -lean::cnstr_set(x_27, 4, x_11); -lean::cnstr_set(x_27, 5, x_25); -lean::cnstr_set(x_27, 6, x_26); -return x_27; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_24, 0); -lean::inc(x_28); -x_29 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_9); -lean::cnstr_set(x_29, 3, x_10); -lean::cnstr_set(x_29, 4, x_11); -lean::cnstr_set(x_29, 5, x_25); -lean::cnstr_set(x_29, 6, x_28); -return x_29; -} -} -} -} -block_45: -{ -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -lean::dec(x_32); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; -x_35 = lean::box(0); -x_36 = lean::box(3); -x_37 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_37, 0, x_4); -lean::cnstr_set(x_37, 1, x_7); -lean::cnstr_set(x_37, 2, x_9); -lean::cnstr_set(x_37, 3, x_34); -lean::cnstr_set(x_37, 4, x_36); -lean::cnstr_set(x_37, 5, x_35); -lean::cnstr_set(x_37, 6, x_36); -return x_37; -} -else -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_31, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_31, 1); -lean::inc(x_39); -lean::dec(x_31); -x_10 = x_34; -x_11 = x_38; -x_12 = x_39; -goto block_30; -} -} -else -{ -obj* x_40; -lean::dec(x_32); -x_40 = lean::box(0); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_41; obj* x_42; -x_41 = lean::box(3); -x_42 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_42, 0, x_4); -lean::cnstr_set(x_42, 1, x_7); -lean::cnstr_set(x_42, 2, x_9); -lean::cnstr_set(x_42, 3, x_40); -lean::cnstr_set(x_42, 4, x_41); -lean::cnstr_set(x_42, 5, x_40); -lean::cnstr_set(x_42, 6, x_41); -return x_42; -} -else -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_31, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_31, 1); -lean::inc(x_44); -lean::dec(x_31); -x_10 = x_40; -x_11 = x_43; -x_12 = x_44; -goto block_30; -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_if_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_if_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_if_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_if_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_if_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_if_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("if "); -x_2 = lean::mk_nat_obj(0u); -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_2); -x_5 = lean::mk_string(" then "); -x_6 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_2); -lean::dec(x_5); -x_7 = lean::mk_string(" else "); -x_8 = l_Lean_Parser_symbol_tokens___rarg(x_7, x_2); -lean::dec(x_7); -x_9 = lean::box(0); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_10); -lean::dec(x_10); -lean::dec(x_8); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_12); -lean::dec(x_12); -lean::dec(x_6); -x_14 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_13); -lean::dec(x_13); -lean::dec(x_4); -x_15 = l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasTokens; -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_14); -lean::dec(x_14); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_16); -lean::dec(x_16); -lean::dec(x_3); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -return x_18; -} -} -obj* _init_l_Lean_Parser_Term_if_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_1 = lean::mk_string("if "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_string(" then "); -x_8 = l_String_trim(x_7); -lean::dec(x_7); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = lean::mk_string(" else "); -x_12 = l_String_trim(x_11); -lean::dec(x_11); -lean::inc(x_12); -x_13 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_4); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::box(0); -lean::inc(x_6); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_14); -lean::cnstr_set(x_17, 1, x_16); -lean::inc(x_6); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_6); -lean::cnstr_set(x_18, 1, x_17); -x_19 = 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_6); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optIdent_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); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_5); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_Lean_Parser_TermParserM_Monad; -x_25 = l_Lean_Parser_TermParserM_MonadExcept; -x_26 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_27 = l_Lean_Parser_TermParserM_Alternative; -x_28 = l_Lean_Parser_Term_if; -x_29 = l_Lean_Parser_Term_if_HasView; -x_30 = l_Lean_Parser_Combinators_node_view___rarg(x_24, x_25, x_26, x_27, x_28, x_23, x_29); -lean::dec(x_23); -return x_30; -} -} -obj* _init_l_Lean_Parser_Term_if_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_1 = lean::mk_string("if "); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_Term_Parser), 6, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_string(" then "); -x_8 = l_String_trim(x_7); -lean::dec(x_7); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = lean::mk_string(" else "); -x_12 = l_String_trim(x_11); -lean::dec(x_11); -lean::inc(x_12); -x_13 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_14, 0, x_12); -lean::closure_set(x_14, 1, x_4); -lean::closure_set(x_14, 2, x_13); -x_15 = lean::box(0); -lean::inc(x_6); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_14); -lean::cnstr_set(x_17, 1, x_16); -lean::inc(x_6); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_6); -lean::cnstr_set(x_18, 1, x_17); -x_19 = 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_6); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optIdent_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); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_5); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -obj* l_Lean_Parser_Term_if_Parser(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; -x_6 = l_Lean_Parser_Term_if; -x_7 = l_Lean_Parser_Term_if_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_structInstType() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structInstType"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_structInstType_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_Term_structInstType; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_3, 0); -x_10 = lean::box(0); -lean::inc(x_9); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Parser_Term_structInstType; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_26; -x_26 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; -x_27 = l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__2; -return x_27; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_26, 0); -lean::inc(x_28); -lean::dec(x_26); -x_29 = lean::cnstr_get(x_28, 1); -lean::inc(x_29); -lean::dec(x_28); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; -x_30 = lean::box(3); -x_2 = x_29; -x_3 = x_30; -goto block_25; -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_29, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_2 = x_32; -x_3 = x_31; -goto block_25; -} -} -block_25: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -lean::dec(x_3); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_2, 0); -lean::inc(x_16); -lean::dec(x_2); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_3, 0); -lean::inc(x_17); -lean::dec(x_3); -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -lean::dec(x_16); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_16); -x_21 = lean::cnstr_get(x_3, 0); -lean::inc(x_21); -lean::dec(x_3); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -} -else -{ -obj* x_24; -lean::dec(x_3); -x_24 = lean::box(0); -x_4 = x_24; -goto block_12; -} -block_12: -{ -lean::dec(x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_8); -return x_10; -} -else -{ -obj* x_11; -lean::dec(x_6); -x_11 = l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__1; -return x_11; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_structInstType_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstType_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_structInstType_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_structInstType_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_structInstType_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_structInstType_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_structInstWith() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structInstWith"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_Lean_Parser_Term_structInstWith; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_2, 0); -x_10 = lean::box(0); -lean::inc(x_9); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -lean::inc(x_8); -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 = l_Lean_Parser_Term_structInstWith; -x_15 = l_Lean_Parser_Syntax_mkNode(x_14, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -return x_3; -} -} -obj* l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -lean::free_heap_obj(x_2); -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_8, 0); -lean::inc(x_12); -lean::dec(x_8); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_6, 0); -lean::inc(x_13); -lean::dec(x_6); -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -lean::cnstr_set(x_2, 0, x_14); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_2); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; -lean::dec(x_12); -lean::free_heap_obj(x_2); -x_16 = lean::cnstr_get(x_6, 0); -lean::inc(x_16); -lean::dec(x_6); -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -return x_18; -} -} -} -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_2, 0); -lean::inc(x_19); -lean::dec(x_2); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; -x_21 = l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2___closed__1; -return x_21; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; -x_23 = lean::cnstr_get(x_20, 0); -lean::inc(x_23); -lean::dec(x_20); -x_24 = lean::box(0); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_20, 0); -lean::inc(x_27); -lean::dec(x_20); -x_28 = lean::cnstr_get(x_26, 0); -lean::inc(x_28); -lean::dec(x_26); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; -lean::dec(x_26); -x_31 = lean::cnstr_get(x_20, 0); -lean::inc(x_31); -lean::dec(x_20); -x_32 = lean::box(0); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_structInstWith_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_structInstWith_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_structInstWith_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_structInstField() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structInstField"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_structInstField_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_2); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_2); -x_6 = lean::box(0); -lean::inc(x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_6); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::box(3); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_Term_structInstField; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_7); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_Term_structInstField; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -return x_18; -} -} -} -obj* _init_l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::box(3); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_44; -x_44 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; -x_45 = l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__2; -return x_45; -} -else -{ -obj* x_46; obj* x_47; -x_46 = lean::cnstr_get(x_44, 0); -lean::inc(x_46); -lean::dec(x_44); -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -lean::dec(x_46); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -x_48 = lean::box(3); -x_2 = x_47; -x_3 = x_48; -goto block_43; -} -else -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_47, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_47, 1); -lean::inc(x_50); -lean::dec(x_47); -x_2 = x_50; -x_3 = x_49; -goto block_43; -} -} -block_43: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 1) -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_3, 0); -lean::inc(x_22); -lean::dec(x_3); -x_23 = lean::box(0); -x_24 = lean::box(3); -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_23); -lean::cnstr_set(x_25, 2, x_24); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_2, 0); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_3, 0); -lean::inc(x_27); -lean::dec(x_3); -x_28 = lean::cnstr_get(x_2, 1); -lean::inc(x_28); -lean::dec(x_2); -x_29 = lean::cnstr_get(x_26, 0); -lean::inc(x_29); -lean::dec(x_26); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::box(3); -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_27); -lean::cnstr_set(x_32, 1, x_30); -lean::cnstr_set(x_32, 2, x_31); -return x_32; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_28, 0); -lean::inc(x_33); -lean::dec(x_28); -x_34 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_34, 0, x_27); -lean::cnstr_set(x_34, 1, x_30); -lean::cnstr_set(x_34, 2, x_33); -return x_34; -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; -lean::dec(x_26); -x_35 = lean::cnstr_get(x_3, 0); -lean::inc(x_35); -lean::dec(x_3); -x_36 = lean::cnstr_get(x_2, 1); -lean::inc(x_36); -lean::dec(x_2); -x_37 = lean::box(0); -if (lean::obj_tag(x_36) == 0) -{ -obj* x_38; obj* x_39; -x_38 = lean::box(3); -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_35); -lean::cnstr_set(x_39, 1, x_37); -lean::cnstr_set(x_39, 2, x_38); -return x_39; -} -else -{ -obj* x_40; obj* x_41; -x_40 = lean::cnstr_get(x_36, 0); -lean::inc(x_40); -lean::dec(x_36); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_35); -lean::cnstr_set(x_41, 1, x_37); -lean::cnstr_set(x_41, 2, x_40); -return x_41; -} -} -} -} -else -{ -obj* x_42; -lean::dec(x_3); -x_42 = lean::box(0); -x_4 = x_42; -goto block_21; -} -block_21: -{ -lean::dec(x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__1; -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_2, 1); -lean::inc(x_7); -lean::dec(x_2); -x_8 = lean::box(0); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_12 = lean::box(3); -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_12); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_7, 0); -lean::inc(x_14); -lean::dec(x_7); -x_15 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_16 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_10); -lean::cnstr_set(x_16, 2, x_14); -return x_16; -} -} -else -{ -lean::dec(x_6); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_17; -x_17 = l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__1; -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_7, 0); -lean::inc(x_18); -lean::dec(x_7); -x_19 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_8); -lean::cnstr_set(x_20, 2, x_18); -return x_20; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_structInstField_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstField_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_structInstField_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_structInstField_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_structInstField_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_structInstField_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_structInstSource() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structInstSource"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::box(3); -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 = l_Lean_Parser_Term_structInstSource; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___closed__1; -return x_5; -} -else -{ -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_6 = lean::cnstr_get(x_3, 0); -lean::inc(x_6); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_4); -x_8 = l_Lean_Parser_noKind; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_4); -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_10); -x_13 = l_Lean_Parser_Term_structInstSource; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_2, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Term_structInstSource; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_21 = lean::cnstr_get(x_3, 0); -lean::inc(x_21); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_4); -x_23 = l_Lean_Parser_noKind; -x_24 = l_Lean_Parser_Syntax_mkNode(x_23, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_4); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_16); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_Lean_Parser_Term_structInstSource; -x_28 = l_Lean_Parser_Syntax_mkNode(x_27, x_26); -return x_28; -} -} -} -} -obj* _init_l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_7, 1); -lean::inc(x_8); -lean::dec(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -lean::free_heap_obj(x_3); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_1); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -lean::dec(x_8); -lean::cnstr_set(x_3, 0, x_11); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_1); -lean::cnstr_set(x_12, 1, x_3); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -lean::dec(x_10); -lean::dec(x_8); -lean::free_heap_obj(x_3); -x_13 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_1); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -lean::dec(x_15); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_1); -lean::cnstr_set(x_17, 1, x_1); -return x_17; -} -else -{ -obj* x_18; -x_18 = lean::cnstr_get(x_16, 1); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_16, 0); -lean::inc(x_19); -lean::dec(x_16); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_19); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_20); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -lean::dec(x_18); -lean::dec(x_16); -x_22 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_1); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_28; -x_28 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; -x_29 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2; -return x_29; -} -else -{ -uint8 x_30; -x_30 = !lean::is_exclusive(x_28); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -lean::dec(x_31); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -lean::free_heap_obj(x_28); -x_33 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2; -return x_33; -} -else -{ -obj* x_34; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_32, 1); -lean::inc(x_35); -lean::dec(x_32); -x_36 = lean::cnstr_get(x_34, 0); -lean::inc(x_36); -lean::dec(x_34); -lean::cnstr_set(x_28, 0, x_36); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_37; obj* x_38; -x_37 = lean::box(3); -x_38 = l_Lean_Parser_Syntax_asNode___main(x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; -x_39 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_28); -lean::cnstr_set(x_40, 1, x_39); -return x_40; -} -else -{ -uint8 x_41; -x_41 = !lean::is_exclusive(x_38); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_38, 0); -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -lean::dec(x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; -lean::free_heap_obj(x_38); -x_44 = lean::box(0); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_28); -lean::cnstr_set(x_45, 1, x_44); -return x_45; -} -else -{ -obj* x_46; -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -lean::cnstr_set(x_38, 0, x_47); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_28); -lean::cnstr_set(x_48, 1, x_38); -return x_48; -} -else -{ -obj* x_49; obj* x_50; -lean::dec(x_46); -lean::dec(x_43); -lean::free_heap_obj(x_38); -x_49 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_28); -lean::cnstr_set(x_50, 1, x_49); -return x_50; -} -} -} -else -{ -obj* x_51; obj* x_52; -x_51 = lean::cnstr_get(x_38, 0); -lean::inc(x_51); -lean::dec(x_38); -x_52 = lean::cnstr_get(x_51, 1); -lean::inc(x_52); -lean::dec(x_51); -if (lean::obj_tag(x_52) == 0) -{ -obj* x_53; obj* x_54; -x_53 = lean::box(0); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_28); -lean::cnstr_set(x_54, 1, x_53); -return x_54; -} -else -{ -obj* x_55; -x_55 = lean::cnstr_get(x_52, 1); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; obj* x_58; -x_56 = lean::cnstr_get(x_52, 0); -lean::inc(x_56); -lean::dec(x_52); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_28); -lean::cnstr_set(x_58, 1, x_57); -return x_58; -} -else -{ -obj* x_59; obj* x_60; -lean::dec(x_55); -lean::dec(x_52); -x_59 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_28); -lean::cnstr_set(x_60, 1, x_59); -return x_60; -} -} -} -} -} -else -{ -obj* x_61; -x_61 = lean::cnstr_get(x_35, 0); -lean::inc(x_61); -lean::dec(x_35); -x_2 = x_28; -x_3 = x_61; -goto block_27; -} -} -else -{ -obj* x_62; -lean::dec(x_34); -lean::free_heap_obj(x_28); -x_62 = lean::cnstr_get(x_32, 1); -lean::inc(x_62); -lean::dec(x_32); -if (lean::obj_tag(x_62) == 0) -{ -obj* x_63; -x_63 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2; -return x_63; -} -else -{ -obj* x_64; obj* x_65; -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -lean::dec(x_62); -x_65 = lean::box(0); -x_2 = x_65; -x_3 = x_64; -goto block_27; -} -} -} -} -else -{ -obj* x_66; obj* x_67; -x_66 = lean::cnstr_get(x_28, 0); -lean::inc(x_66); -lean::dec(x_28); -x_67 = lean::cnstr_get(x_66, 1); -lean::inc(x_67); -lean::dec(x_66); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; -x_68 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2; -return x_68; -} -else -{ -obj* x_69; -x_69 = lean::cnstr_get(x_67, 0); -lean::inc(x_69); -if (lean::obj_tag(x_69) == 0) -{ -obj* x_70; obj* x_71; obj* x_72; -x_70 = lean::cnstr_get(x_67, 1); -lean::inc(x_70); -lean::dec(x_67); -x_71 = lean::cnstr_get(x_69, 0); -lean::inc(x_71); -lean::dec(x_69); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_73; obj* x_74; -x_73 = lean::box(3); -x_74 = l_Lean_Parser_Syntax_asNode___main(x_73); -if (lean::obj_tag(x_74) == 0) -{ -obj* x_75; obj* x_76; -x_75 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_72); -lean::cnstr_set(x_76, 1, x_75); -return x_76; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; -x_77 = lean::cnstr_get(x_74, 0); -lean::inc(x_77); -if (lean::is_exclusive(x_74)) { - lean::cnstr_release(x_74, 0); - x_78 = x_74; -} else { - lean::dec_ref(x_74); - x_78 = lean::box(0); -} -x_79 = lean::cnstr_get(x_77, 1); -lean::inc(x_79); -lean::dec(x_77); -if (lean::obj_tag(x_79) == 0) -{ -obj* x_80; obj* x_81; -lean::dec(x_78); -x_80 = lean::box(0); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_72); -lean::cnstr_set(x_81, 1, x_80); -return x_81; -} -else -{ -obj* x_82; -x_82 = lean::cnstr_get(x_79, 1); -lean::inc(x_82); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; obj* x_84; obj* x_85; -x_83 = lean::cnstr_get(x_79, 0); -lean::inc(x_83); -lean::dec(x_79); -if (lean::is_scalar(x_78)) { - x_84 = lean::alloc_cnstr(1, 1, 0); -} else { - x_84 = x_78; -} -lean::cnstr_set(x_84, 0, x_83); -x_85 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_85, 0, x_72); -lean::cnstr_set(x_85, 1, x_84); -return x_85; -} -else -{ -obj* x_86; obj* x_87; -lean::dec(x_82); -lean::dec(x_79); -lean::dec(x_78); -x_86 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_72); -lean::cnstr_set(x_87, 1, x_86); -return x_87; -} -} -} -} -else -{ -obj* x_88; -x_88 = lean::cnstr_get(x_70, 0); -lean::inc(x_88); -lean::dec(x_70); -x_2 = x_72; -x_3 = x_88; -goto block_27; -} -} -else -{ -obj* x_89; -lean::dec(x_69); -x_89 = lean::cnstr_get(x_67, 1); -lean::inc(x_89); -lean::dec(x_67); -if (lean::obj_tag(x_89) == 0) -{ -obj* x_90; -x_90 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2; -return x_90; -} -else -{ -obj* x_91; obj* x_92; -x_91 = lean::cnstr_get(x_89, 0); -lean::inc(x_91); -lean::dec(x_89); -x_92 = lean::box(0); -x_2 = x_92; -x_3 = x_91; -goto block_27; -} -} -} -} -} -block_27: -{ -obj* x_4; -x_4 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -else -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_4); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_4, 0); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; -lean::free_heap_obj(x_4); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_2); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -lean::cnstr_set(x_4, 0, x_13); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_4); -return x_14; -} -else -{ -obj* x_15; obj* x_16; -lean::dec(x_12); -lean::dec(x_9); -lean::free_heap_obj(x_4); -x_15 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_2); -lean::cnstr_set(x_16, 1, x_15); -return x_16; -} -} -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_4, 0); -lean::inc(x_17); -lean::dec(x_4); -x_18 = lean::cnstr_get(x_17, 1); -lean::inc(x_18); -lean::dec(x_17); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_2); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_18, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_18, 0); -lean::inc(x_22); -lean::dec(x_18); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_2); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -else -{ -obj* x_25; obj* x_26; -lean::dec(x_21); -lean::dec(x_18); -x_25 = l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1; -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_2); -lean::cnstr_set(x_26, 1, x_25); -return x_26; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_structInstSource_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_structInstSource_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_structInstSource_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_structInstItem() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structInstItem"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_structInstItem_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_structInstField_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_Term_structInstItem; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_Lean_Parser_Term_structInstSource_HasView; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_Term_structInstItem; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_structInstField_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structInstItem"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__2; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_Term_structInstSource_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = l_Lean_Parser_Term_structInstField_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_27); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_38 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_38; -} -} -} -} -} -} -} -else -{ -obj* x_39; -lean::dec(x_11); -lean::dec(x_6); -x_39 = l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1; -return x_39; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_structInstItem_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInstItem_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_structInstItem_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_structInstItem_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_structInst() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("structInst"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_List_map___main___at_Lean_Parser_Term_structInst_HasView_x27___elambda__1___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = l_List_map___main___at_Lean_Parser_Term_structInst_HasView_x27___elambda__1___spec__1(x_5); -x_7 = lean::cnstr_get(x_4, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_8 = lean::cnstr_get(x_4, 0); -lean::inc(x_8); -lean::dec(x_4); -x_9 = l_Lean_Parser_Term_structInstItem_HasView; -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_8); -x_12 = lean::box(0); -lean::cnstr_set(x_1, 1, x_12); -lean::cnstr_set(x_1, 0, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_6); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_4, 0); -lean::inc(x_14); -lean::dec(x_4); -x_15 = lean::cnstr_get(x_7, 0); -lean::inc(x_15); -lean::dec(x_7); -x_16 = l_Lean_Parser_Term_structInstItem_HasView; -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_19; obj* x_20; -x_19 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::cnstr_set(x_1, 1, x_19); -lean::cnstr_set(x_1, 0, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_6); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_15, 0); -lean::inc(x_21); -lean::dec(x_15); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_1, 1, x_22); -lean::cnstr_set(x_1, 0, x_23); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); -lean::cnstr_set(x_24, 1, x_1); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_6); -return x_25; -} -} -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_1, 0); -x_27 = lean::cnstr_get(x_1, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_1); -x_28 = l_List_map___main___at_Lean_Parser_Term_structInst_HasView_x27___elambda__1___spec__1(x_27); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_30 = lean::cnstr_get(x_26, 0); -lean::inc(x_30); -lean::dec(x_26); -x_31 = l_Lean_Parser_Term_structInstItem_HasView; -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_30); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_28); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = lean::cnstr_get(x_26, 0); -lean::inc(x_37); -lean::dec(x_26); -x_38 = lean::cnstr_get(x_29, 0); -lean::inc(x_38); -lean::dec(x_29); -x_39 = l_Lean_Parser_Term_structInstItem_HasView; -x_40 = lean::cnstr_get(x_39, 1); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; -x_42 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_28); -return x_44; -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_45 = lean::cnstr_get(x_38, 0); -lean::inc(x_45); -lean::dec(x_38); -x_46 = lean::box(0); -x_47 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_47, 0, x_45); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_46); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_41); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_28); -return x_50; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_structInst_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_56; obj* x_57; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -lean::dec(x_1); -x_7 = l_List_map___main___at_Lean_Parser_Term_structInst_HasView_x27___elambda__1___spec__1(x_5); -x_8 = l_List_join___main___rarg(x_7); -x_9 = l_Lean_Parser_noKind; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -x_11 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_104; -x_104 = lean::box(3); -x_12 = x_104; -goto block_55; -} -else -{ -obj* x_105; obj* x_106; -x_105 = lean::cnstr_get(x_3, 0); -lean::inc(x_105); -lean::dec(x_3); -x_106 = lean::box(3); -x_56 = x_106; -x_57 = x_105; -goto block_103; -} -} -else -{ -obj* x_107; obj* x_108; -x_107 = lean::cnstr_get(x_2, 0); -lean::inc(x_107); -lean::dec(x_2); -x_108 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_108, 0, x_107); -if (lean::obj_tag(x_3) == 0) -{ -x_12 = x_108; -goto block_55; -} -else -{ -obj* x_109; -x_109 = lean::cnstr_get(x_3, 0); -lean::inc(x_109); -lean::dec(x_3); -x_56 = x_108; -x_57 = x_109; -goto block_103; -} -} -block_55: -{ -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_13 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_10); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_12); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Term_structInst; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_21 = lean::cnstr_get(x_6, 0); -lean::inc(x_21); -lean::dec(x_6); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_11); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_10); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_12); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_Lean_Parser_Term_structInst; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_31 = lean::cnstr_get(x_4, 0); -lean::inc(x_31); -lean::dec(x_4); -x_32 = l_Lean_Parser_Term_structInstWith_HasView; -x_33 = lean::cnstr_get(x_32, 1); -lean::inc(x_33); -x_34 = lean::apply_1(x_33, x_31); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_11); -x_36 = l_Lean_Parser_Syntax_mkNode(x_9, x_35); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_37 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_10); -lean::cnstr_set(x_38, 1, x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_36); -lean::cnstr_set(x_39, 1, x_38); -x_40 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_39); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_12); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_Term_structInst; -x_44 = l_Lean_Parser_Syntax_mkNode(x_43, x_42); -return x_44; -} -else -{ -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; -x_45 = lean::cnstr_get(x_6, 0); -lean::inc(x_45); -lean::dec(x_6); -x_46 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_11); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_10); -lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_36); -lean::cnstr_set(x_49, 1, x_48); -x_50 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_49); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_12); -lean::cnstr_set(x_52, 1, x_51); -x_53 = l_Lean_Parser_Term_structInst; -x_54 = l_Lean_Parser_Syntax_mkNode(x_53, x_52); -return x_54; -} -} -} -block_103: -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_58 = l_Lean_Parser_Term_structInstType_HasView; -x_59 = lean::cnstr_get(x_58, 1); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_11); -x_62 = l_Lean_Parser_Syntax_mkNode(x_9, x_61); -if (lean::obj_tag(x_4) == 0) -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_63 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_10); -lean::cnstr_set(x_64, 1, x_63); -x_65 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_64); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_62); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_56); -lean::cnstr_set(x_68, 1, x_67); -x_69 = l_Lean_Parser_Term_structInst; -x_70 = l_Lean_Parser_Syntax_mkNode(x_69, x_68); -return x_70; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_71 = lean::cnstr_get(x_6, 0); -lean::inc(x_71); -lean::dec(x_6); -x_72 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_11); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_10); -lean::cnstr_set(x_74, 1, x_73); -x_75 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_74); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_62); -lean::cnstr_set(x_77, 1, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_56); -lean::cnstr_set(x_78, 1, x_77); -x_79 = l_Lean_Parser_Term_structInst; -x_80 = l_Lean_Parser_Syntax_mkNode(x_79, x_78); -return x_80; -} -} -else -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_81 = lean::cnstr_get(x_4, 0); -lean::inc(x_81); -lean::dec(x_4); -x_82 = l_Lean_Parser_Term_structInstWith_HasView; -x_83 = lean::cnstr_get(x_82, 1); -lean::inc(x_83); -x_84 = lean::apply_1(x_83, x_81); -x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_11); -x_86 = l_Lean_Parser_Syntax_mkNode(x_9, x_85); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_87 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_10); -lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_86); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_62); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_56); -lean::cnstr_set(x_91, 1, x_90); -x_92 = l_Lean_Parser_Term_structInst; -x_93 = l_Lean_Parser_Syntax_mkNode(x_92, x_91); -return x_93; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_94 = lean::cnstr_get(x_6, 0); -lean::inc(x_94); -lean::dec(x_6); -x_95 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -x_96 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_11); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_10); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_86); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_62); -lean::cnstr_set(x_99, 1, x_98); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_56); -lean::cnstr_set(x_100, 1, x_99); -x_101 = l_Lean_Parser_Term_structInst; -x_102 = l_Lean_Parser_Syntax_mkNode(x_101, x_100); -return x_102; -} -} -} -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; -x_5 = lean::cnstr_get(x_3, 1); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_3); -if (x_6 == 0) -{ -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_7 = lean::cnstr_get(x_3, 0); -x_8 = lean::cnstr_get(x_3, 1); -lean::dec(x_8); -x_9 = l_Lean_Parser_Term_structInstItem_HasView; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_11 = lean::apply_1(x_10, x_7); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::box(0); -lean::cnstr_set(x_3, 1, x_14); -lean::cnstr_set(x_3, 0, x_13); -return x_3; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = l_Lean_Parser_Term_structInstItem_HasView; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::apply_1(x_17, x_15); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::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); -return x_22; -} -} -else -{ -obj* x_23; uint8 x_24; -x_23 = lean::cnstr_get(x_3, 0); -lean::inc(x_23); -lean::dec(x_3); -x_24 = !lean::is_exclusive(x_5); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_5, 0); -x_26 = lean::cnstr_get(x_5, 1); -x_27 = l_Lean_Parser_Term_structInstItem_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_23); -x_30 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1(x_1, x_2, x_26); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_25, 0); -lean::inc(x_31); -lean::dec(x_25); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_29); -lean::cnstr_set(x_34, 1, x_33); -lean::cnstr_set(x_5, 1, x_30); -lean::cnstr_set(x_5, 0, x_34); -return x_5; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_25); -x_35 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_29); -lean::cnstr_set(x_36, 1, x_35); -lean::cnstr_set(x_5, 1, x_30); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 0); -x_38 = lean::cnstr_get(x_5, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_5); -x_39 = l_Lean_Parser_Term_structInstItem_HasView; -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -x_41 = lean::apply_1(x_40, x_23); -x_42 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1(x_1, x_2, x_38); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_43 = lean::cnstr_get(x_37, 0); -lean::inc(x_43); -lean::dec(x_37); -x_44 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_44, 0, x_43); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_41); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_42); -return x_47; -} -else -{ -obj* x_48; obj* x_49; obj* x_50; -lean::dec(x_37); -x_48 = l_Lean_Parser_command_notation_HasView_x27___lambda__1___closed__1; -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_41); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_42); -return x_50; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_structInstItem_HasView; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__2() { -_start: -{ -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; uint8 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; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(0u); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_string(" := "); -x_5 = l_String_trim(x_4); -lean::dec(x_4); -lean::inc(x_5); -x_6 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_2); -lean::closure_set(x_7, 2, x_6); -lean::inc(x_3); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_3); -lean::cnstr_set(x_8, 1, x_1); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = l_Lean_Parser_Term_structInstField; -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_13, 0, x_12); -lean::closure_set(x_13, 1, x_11); -x_14 = lean::mk_string(".."); -x_15 = l_String_trim(x_14); -lean::dec(x_14); -lean::inc(x_15); -x_16 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_2); -lean::closure_set(x_17, 2, x_16); -x_18 = 0; -x_19 = lean::box(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_20, 0, x_3); -lean::closure_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_1); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_17); -lean::cnstr_set(x_22, 1, x_21); -x_23 = l_Lean_Parser_Term_structInstSource; -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_24, 0, x_23); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_13); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_2); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_Lean_Parser_Term_structInstItem; -x_30 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_30, 0, x_29); -lean::closure_set(x_30, 1, x_28); -return x_30; -} -} -obj* _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_structInstWith_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_Term_structInstType_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; obj* x_2; obj* x_37; obj* x_38; -x_1 = lean::box(0); -x_37 = lean::box(3); -x_38 = l_Lean_Parser_Syntax_asNode___main(x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; -x_39 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4; -x_2 = x_39; -goto block_36; -} -else -{ -uint8 x_40; -x_40 = !lean::is_exclusive(x_38); -if (x_40 == 0) -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_38, 0); -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -lean::dec(x_41); -if (lean::obj_tag(x_42) == 0) -{ -lean::free_heap_obj(x_38); -x_2 = x_1; -goto block_36; -} -else -{ -obj* x_43; -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_44 = lean::cnstr_get(x_42, 0); -lean::inc(x_44); -lean::dec(x_42); -x_45 = l_Lean_Parser_Term_structInstType_HasView; -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::apply_1(x_46, x_44); -lean::cnstr_set(x_38, 0, x_47); -x_2 = x_38; -goto block_36; -} -else -{ -obj* x_48; -lean::dec(x_43); -lean::dec(x_42); -lean::free_heap_obj(x_38); -x_48 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4; -x_2 = x_48; -goto block_36; -} -} -} -else -{ -obj* x_49; obj* x_50; -x_49 = lean::cnstr_get(x_38, 0); -lean::inc(x_49); -lean::dec(x_38); -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -lean::dec(x_49); -if (lean::obj_tag(x_50) == 0) -{ -x_2 = x_1; -goto block_36; -} -else -{ -obj* x_51; -x_51 = lean::cnstr_get(x_50, 1); -lean::inc(x_51); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_52 = lean::cnstr_get(x_50, 0); -lean::inc(x_52); -lean::dec(x_50); -x_53 = l_Lean_Parser_Term_structInstType_HasView; -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::apply_1(x_54, x_52); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -x_2 = x_56; -goto block_36; -} -else -{ -obj* x_57; -lean::dec(x_51); -lean::dec(x_50); -x_57 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4; -x_2 = x_57; -goto block_36; -} -} -} -} -block_36: -{ -obj* x_3; obj* x_15; obj* x_16; -x_15 = lean::box(3); -x_16 = l_Lean_Parser_Syntax_asNode___main(x_15); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; -x_17 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3; -x_3 = x_17; -goto block_14; -} -else -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_16); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_16, 0); -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -lean::dec(x_19); -if (lean::obj_tag(x_20) == 0) -{ -lean::free_heap_obj(x_16); -x_3 = x_1; -goto block_14; -} -else -{ -obj* x_21; -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_20, 0); -lean::inc(x_22); -lean::dec(x_20); -x_23 = l_Lean_Parser_Term_structInstWith_HasView; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::apply_1(x_24, x_22); -lean::cnstr_set(x_16, 0, x_25); -x_3 = x_16; -goto block_14; -} -else -{ -obj* x_26; -lean::dec(x_21); -lean::dec(x_20); -lean::free_heap_obj(x_16); -x_26 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3; -x_3 = x_26; -goto block_14; -} -} -} -else -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_16, 0); -lean::inc(x_27); -lean::dec(x_16); -x_28 = lean::cnstr_get(x_27, 1); -lean::inc(x_28); -lean::dec(x_27); -if (lean::obj_tag(x_28) == 0) -{ -x_3 = x_1; -goto block_14; -} -else -{ -obj* x_29; -x_29 = lean::cnstr_get(x_28, 1); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -lean::dec(x_28); -x_31 = l_Lean_Parser_Term_structInstWith_HasView; -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -x_33 = lean::apply_1(x_32, x_30); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -x_3 = x_34; -goto block_14; -} -else -{ -obj* x_35; -lean::dec(x_29); -lean::dec(x_28); -x_35 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3; -x_3 = x_35; -goto block_14; -} -} -} -} -block_14: -{ -obj* x_4; obj* x_5; -x_4 = lean::box(3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_2); -lean::cnstr_set(x_7, 2, x_3); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_1); -return x_7; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -lean::dec(x_5); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__2; -x_11 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_12 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1(x_10, x_11, x_9); -x_13 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_2); -lean::cnstr_set(x_13, 2, x_3); -lean::cnstr_set(x_13, 3, x_12); -lean::cnstr_set(x_13, 4, x_1); -return x_13; -} -} -} -} -} -obj* l_Lean_Parser_Term_structInst_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_113; -x_113 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_114; -x_114 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__5; -return x_114; -} -else -{ -obj* x_115; obj* x_116; -x_115 = lean::cnstr_get(x_113, 0); -lean::inc(x_115); -lean::dec(x_113); -x_116 = lean::cnstr_get(x_115, 1); -lean::inc(x_116); -lean::dec(x_115); -if (lean::obj_tag(x_116) == 0) -{ -obj* x_117; -x_117 = lean::box(3); -x_2 = x_116; -x_3 = x_117; -goto block_112; -} -else -{ -obj* x_118; obj* x_119; -x_118 = lean::cnstr_get(x_116, 0); -lean::inc(x_118); -x_119 = lean::cnstr_get(x_116, 1); -lean::inc(x_119); -lean::dec(x_116); -x_2 = x_119; -x_3 = x_118; -goto block_112; -} -} -block_112: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_109; obj* x_110; -x_109 = lean::cnstr_get(x_3, 0); -lean::inc(x_109); -lean::dec(x_3); -x_110 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_110, 0, x_109); -x_4 = x_110; -goto block_108; -} -else -{ -obj* x_111; -lean::dec(x_3); -x_111 = lean::box(0); -x_4 = x_111; -goto block_108; -} -block_108: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_105; -x_105 = lean::box(3); -x_5 = x_2; -x_6 = x_105; -goto block_104; -} -else -{ -obj* x_106; obj* x_107; -x_106 = lean::cnstr_get(x_2, 0); -lean::inc(x_106); -x_107 = lean::cnstr_get(x_2, 1); -lean::inc(x_107); -lean::dec(x_2); -x_5 = x_107; -x_6 = x_106; -goto block_104; -} -block_104: -{ -obj* x_7; obj* x_82; -x_82 = l_Lean_Parser_Syntax_asNode___main(x_6); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; -x_83 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4; -x_7 = x_83; -goto block_81; -} -else -{ -uint8 x_84; -x_84 = !lean::is_exclusive(x_82); -if (x_84 == 0) -{ -obj* x_85; obj* x_86; -x_85 = lean::cnstr_get(x_82, 0); -x_86 = lean::cnstr_get(x_85, 1); -lean::inc(x_86); -lean::dec(x_85); -if (lean::obj_tag(x_86) == 0) -{ -obj* x_87; -lean::free_heap_obj(x_82); -x_87 = lean::box(0); -x_7 = x_87; -goto block_81; -} -else -{ -obj* x_88; -x_88 = lean::cnstr_get(x_86, 1); -lean::inc(x_88); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_89 = lean::cnstr_get(x_86, 0); -lean::inc(x_89); -lean::dec(x_86); -x_90 = l_Lean_Parser_Term_structInstType_HasView; -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -x_92 = lean::apply_1(x_91, x_89); -lean::cnstr_set(x_82, 0, x_92); -x_7 = x_82; -goto block_81; -} -else -{ -obj* x_93; -lean::dec(x_88); -lean::dec(x_86); -lean::free_heap_obj(x_82); -x_93 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4; -x_7 = x_93; -goto block_81; -} -} -} -else -{ -obj* x_94; obj* x_95; -x_94 = lean::cnstr_get(x_82, 0); -lean::inc(x_94); -lean::dec(x_82); -x_95 = lean::cnstr_get(x_94, 1); -lean::inc(x_95); -lean::dec(x_94); -if (lean::obj_tag(x_95) == 0) -{ -obj* x_96; -x_96 = lean::box(0); -x_7 = x_96; -goto block_81; -} -else -{ -obj* x_97; -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -if (lean::obj_tag(x_97) == 0) -{ -obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_98 = lean::cnstr_get(x_95, 0); -lean::inc(x_98); -lean::dec(x_95); -x_99 = l_Lean_Parser_Term_structInstType_HasView; -x_100 = lean::cnstr_get(x_99, 0); -lean::inc(x_100); -x_101 = lean::apply_1(x_100, x_98); -x_102 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_102, 0, x_101); -x_7 = x_102; -goto block_81; -} -else -{ -obj* x_103; -lean::dec(x_97); -lean::dec(x_95); -x_103 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4; -x_7 = x_103; -goto block_81; -} -} -} -} -block_81: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_78; -x_78 = lean::box(3); -x_8 = x_5; -x_9 = x_78; -goto block_77; -} -else -{ -obj* x_79; obj* x_80; -x_79 = lean::cnstr_get(x_5, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_5, 1); -lean::inc(x_80); -lean::dec(x_5); -x_8 = x_80; -x_9 = x_79; -goto block_77; -} -block_77: -{ -obj* x_10; obj* x_55; -x_55 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; -x_56 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3; -x_10 = x_56; -goto block_54; -} -else -{ -uint8 x_57; -x_57 = !lean::is_exclusive(x_55); -if (x_57 == 0) -{ -obj* x_58; obj* x_59; -x_58 = lean::cnstr_get(x_55, 0); -x_59 = lean::cnstr_get(x_58, 1); -lean::inc(x_59); -lean::dec(x_58); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; -lean::free_heap_obj(x_55); -x_60 = lean::box(0); -x_10 = x_60; -goto block_54; -} -else -{ -obj* x_61; -x_61 = lean::cnstr_get(x_59, 1); -lean::inc(x_61); -if (lean::obj_tag(x_61) == 0) -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_62 = lean::cnstr_get(x_59, 0); -lean::inc(x_62); -lean::dec(x_59); -x_63 = l_Lean_Parser_Term_structInstWith_HasView; -x_64 = lean::cnstr_get(x_63, 0); -lean::inc(x_64); -x_65 = lean::apply_1(x_64, x_62); -lean::cnstr_set(x_55, 0, x_65); -x_10 = x_55; -goto block_54; -} -else -{ -obj* x_66; -lean::dec(x_61); -lean::dec(x_59); -lean::free_heap_obj(x_55); -x_66 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3; -x_10 = x_66; -goto block_54; -} -} -} -else -{ -obj* x_67; obj* x_68; -x_67 = lean::cnstr_get(x_55, 0); -lean::inc(x_67); -lean::dec(x_55); -x_68 = lean::cnstr_get(x_67, 1); -lean::inc(x_68); -lean::dec(x_67); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = lean::box(0); -x_10 = x_69; -goto block_54; -} -else -{ -obj* x_70; -x_70 = lean::cnstr_get(x_68, 1); -lean::inc(x_70); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_71 = lean::cnstr_get(x_68, 0); -lean::inc(x_71); -lean::dec(x_68); -x_72 = l_Lean_Parser_Term_structInstWith_HasView; -x_73 = lean::cnstr_get(x_72, 0); -lean::inc(x_73); -x_74 = lean::apply_1(x_73, x_71); -x_75 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_75, 0, x_74); -x_10 = x_75; -goto block_54; -} -else -{ -obj* x_76; -lean::dec(x_70); -lean::dec(x_68); -x_76 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3; -x_10 = x_76; -goto block_54; -} -} -} -} -block_54: -{ -obj* x_11; obj* x_12; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_51; -x_51 = lean::box(3); -x_11 = x_8; -x_12 = x_51; -goto block_50; -} -else -{ -obj* x_52; obj* x_53; -x_52 = lean::cnstr_get(x_8, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_8, 1); -lean::inc(x_53); -lean::dec(x_8); -x_11 = x_53; -x_12 = x_52; -goto block_50; -} -block_50: -{ -obj* x_13; -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = lean::box(0); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_15; obj* x_16; -x_15 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1; -x_16 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_16, 0, x_4); -lean::cnstr_set(x_16, 1, x_7); -lean::cnstr_set(x_16, 2, x_10); -lean::cnstr_set(x_16, 3, x_15); -lean::cnstr_set(x_16, 4, x_14); -return x_16; -} -else -{ -obj* x_17; -x_17 = lean::cnstr_get(x_11, 0); -lean::inc(x_17); -lean::dec(x_11); -if (lean::obj_tag(x_17) == 0) -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -lean::dec(x_17); -x_19 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_19, 0, x_18); -x_20 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1; -x_21 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_7); -lean::cnstr_set(x_21, 2, x_10); -lean::cnstr_set(x_21, 3, x_20); -lean::cnstr_set(x_21, 4, x_19); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -lean::dec(x_17); -x_22 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_23, 0, x_4); -lean::cnstr_set(x_23, 1, x_7); -lean::cnstr_set(x_23, 2, x_10); -lean::cnstr_set(x_23, 3, x_22); -lean::cnstr_set(x_23, 4, x_14); -return x_23; -} -} -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_13); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = lean::cnstr_get(x_13, 0); -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -lean::dec(x_25); -x_27 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__2; -x_28 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_29 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1(x_27, x_28, x_26); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_30; obj* x_31; -lean::free_heap_obj(x_13); -x_30 = lean::box(0); -x_31 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_7); -lean::cnstr_set(x_31, 2, x_10); -lean::cnstr_set(x_31, 3, x_29); -lean::cnstr_set(x_31, 4, x_30); -return x_31; -} -else -{ -obj* x_32; -x_32 = lean::cnstr_get(x_11, 0); -lean::inc(x_32); -lean::dec(x_11); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -lean::dec(x_32); -lean::cnstr_set(x_13, 0, x_33); -x_34 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_34, 0, x_4); -lean::cnstr_set(x_34, 1, x_7); -lean::cnstr_set(x_34, 2, x_10); -lean::cnstr_set(x_34, 3, x_29); -lean::cnstr_set(x_34, 4, x_13); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_32); -lean::free_heap_obj(x_13); -x_35 = lean::box(0); -x_36 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_36, 0, x_4); -lean::cnstr_set(x_36, 1, x_7); -lean::cnstr_set(x_36, 2, x_10); -lean::cnstr_set(x_36, 3, x_29); -lean::cnstr_set(x_36, 4, x_35); -return x_36; -} -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = lean::cnstr_get(x_13, 0); -lean::inc(x_37); -lean::dec(x_13); -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -lean::dec(x_37); -x_39 = l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__2; -x_40 = l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3; -x_41 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1(x_39, x_40, x_38); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::box(0); -x_43 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_43, 0, x_4); -lean::cnstr_set(x_43, 1, x_7); -lean::cnstr_set(x_43, 2, x_10); -lean::cnstr_set(x_43, 3, x_41); -lean::cnstr_set(x_43, 4, x_42); -return x_43; -} -else -{ -obj* x_44; -x_44 = lean::cnstr_get(x_11, 0); -lean::inc(x_44); -lean::dec(x_11); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -lean::dec(x_44); -x_46 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_47 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_47, 0, x_4); -lean::cnstr_set(x_47, 1, x_7); -lean::cnstr_set(x_47, 2, x_10); -lean::cnstr_set(x_47, 3, x_41); -lean::cnstr_set(x_47, 4, x_46); -return x_47; -} -else -{ -obj* x_48; obj* x_49; -lean::dec(x_44); -x_48 = lean::box(0); -x_49 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_49, 0, x_4); -lean::cnstr_set(x_49, 1, x_7); -lean::cnstr_set(x_49, 2, x_10); -lean::cnstr_set(x_49, 3, x_41); -lean::cnstr_set(x_49, 4, x_48); -return x_49; -} -} -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_structInst_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInst_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInst_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_combinators_3__sepBy_viewAux___main___at_Lean_Parser_Term_structInst_HasView_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_Term_structInst_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_structInst_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_1 = lean::mk_string("{"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = lean::mk_string(" . "); -x_6 = lean::mk_nat_obj(0u); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_4); -lean::dec(x_7); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -x_11 = l_Lean_Parser_tokens___rarg(x_10); -lean::dec(x_10); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_6); -x_14 = lean::mk_string(" with "); -x_15 = l_Lean_Parser_symbol_tokens___rarg(x_14, x_6); -lean::dec(x_14); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_15, x_4); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_16); -lean::dec(x_16); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -x_19 = l_Lean_Parser_tokens___rarg(x_18); -lean::dec(x_18); -x_20 = l_Lean_Parser_tokens___rarg(x_19); -lean::dec(x_19); -x_21 = lean::mk_string(" := "); -x_22 = l_Lean_Parser_symbol_tokens___rarg(x_21, x_6); -lean::dec(x_21); -x_23 = l_Lean_Parser_List_cons_tokens___rarg(x_13, x_4); -x_24 = l_Lean_Parser_List_cons_tokens___rarg(x_22, x_23); -lean::dec(x_23); -lean::dec(x_22); -x_25 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_24); -lean::dec(x_24); -x_26 = l_Lean_Parser_tokens___rarg(x_25); -lean::dec(x_25); -x_27 = lean::mk_string(".."); -x_28 = l_Lean_Parser_symbol_tokens___rarg(x_27, x_6); -lean::dec(x_27); -x_29 = l_Lean_Parser_tokens___rarg(x_13); -lean::dec(x_13); -x_30 = l_Lean_Parser_List_cons_tokens___rarg(x_29, x_4); -lean::dec(x_29); -x_31 = l_Lean_Parser_List_cons_tokens___rarg(x_28, x_30); -lean::dec(x_30); -lean::dec(x_28); -x_32 = l_Lean_Parser_tokens___rarg(x_31); -lean::dec(x_31); -x_33 = l_Lean_Parser_List_cons_tokens___rarg(x_32, x_4); -lean::dec(x_32); -x_34 = l_Lean_Parser_List_cons_tokens___rarg(x_26, x_33); -lean::dec(x_33); -lean::dec(x_26); -x_35 = l_Lean_Parser_tokens___rarg(x_34); -lean::dec(x_34); -x_36 = l_Lean_Parser_List_cons_tokens___rarg(x_35, x_4); -lean::dec(x_35); -x_37 = l_Lean_Parser_tokens___rarg(x_36); -lean::dec(x_36); -x_38 = lean::mk_string(", "); -x_39 = l_Lean_Parser_symbol_tokens___rarg(x_38, x_6); -lean::dec(x_38); -x_40 = l_Lean_Parser_Combinators_sepBy_tokens___rarg(x_37, x_39); -lean::dec(x_39); -lean::dec(x_37); -x_41 = lean::mk_string("}"); -x_42 = l_Lean_Parser_symbol_tokens___rarg(x_41, x_6); -lean::dec(x_41); -x_43 = l_Lean_Parser_List_cons_tokens___rarg(x_42, x_4); -lean::dec(x_42); -x_44 = l_Lean_Parser_List_cons_tokens___rarg(x_40, x_43); -lean::dec(x_43); -lean::dec(x_40); -x_45 = l_Lean_Parser_List_cons_tokens___rarg(x_20, x_44); -lean::dec(x_44); -lean::dec(x_20); -x_46 = l_Lean_Parser_List_cons_tokens___rarg(x_12, x_45); -lean::dec(x_45); -lean::dec(x_12); -x_47 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_46); -lean::dec(x_46); -lean::dec(x_3); -x_48 = l_Lean_Parser_tokens___rarg(x_47); -lean::dec(x_47); -return x_48; -} -} -obj* l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = l_Lean_Parser_Term_structInstType; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_7, x_1, x_2, x_3, x_4, x_5, x_6); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_10); -lean::cnstr_set(x_8, 0, x_11); -return x_8; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_8, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_8); -x_14 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_12); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -return x_15; -} -} -} -obj* l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = l_Lean_Parser_Term_structInstWith; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_7, x_1, x_2, x_3, x_4, x_5, x_6); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_10); -lean::cnstr_set(x_8, 0, x_11); -return x_8; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_8, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_8); -x_14 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_12); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -return x_15; -} -} -} -obj* _init_l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView() { -_start: -{ -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; uint8 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_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_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; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_1 = lean::mk_string("{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(" . "); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_7); -lean::closure_set(x_10, 1, x_9); -lean::closure_set(x_10, 2, x_8); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView___lambda__1), 6, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = 0; -x_17 = lean::box(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_18, 0, x_15); -lean::closure_set(x_18, 1, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_19, 0, x_9); -x_20 = lean::mk_string(" with "); -x_21 = l_String_trim(x_20); -lean::dec(x_20); -lean::inc(x_21); -x_22 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_22, 0, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_9); -lean::closure_set(x_23, 2, 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); -lean::inc(x_19); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_19); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::box(x_16); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_28, 0, x_26); -lean::closure_set(x_28, 1, x_27); -x_29 = lean::mk_string(" := "); -x_30 = l_String_trim(x_29); -lean::dec(x_29); -lean::inc(x_30); -x_31 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_31, 0, x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_9); -lean::closure_set(x_32, 2, x_31); -lean::inc(x_19); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_19); -lean::cnstr_set(x_33, 1, x_11); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_13); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_Term_structInstField; -x_37 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_37, 0, x_36); -lean::closure_set(x_37, 1, x_35); -x_38 = lean::mk_string(".."); -x_39 = l_String_trim(x_38); -lean::dec(x_38); -lean::inc(x_39); -x_40 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_40, 0, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_41, 0, x_39); -lean::closure_set(x_41, 1, x_9); -lean::closure_set(x_41, 2, x_40); -x_42 = lean::box(x_16); -x_43 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_43, 0, x_19); -lean::closure_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_11); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_41); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_Term_structInstSource; -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_47, 0, x_46); -lean::closure_set(x_47, 1, x_45); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_11); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_37); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_50, 0, x_49); -lean::closure_set(x_50, 1, x_9); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_11); -x_52 = l_Lean_Parser_Term_structInstItem; -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_53, 0, x_52); -lean::closure_set(x_53, 1, x_51); -x_54 = lean::mk_string(", "); -x_55 = l_String_trim(x_54); -lean::dec(x_54); -lean::inc(x_55); -x_56 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_56, 0, x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_57, 0, x_55); -lean::closure_set(x_57, 1, x_9); -lean::closure_set(x_57, 2, x_56); -x_58 = 1; -x_59 = lean::box(x_58); -x_60 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_60, 0, x_53); -lean::closure_set(x_60, 1, x_57); -lean::closure_set(x_60, 2, x_59); -x_61 = lean::mk_string("}"); -x_62 = l_String_trim(x_61); -lean::dec(x_61); -lean::inc(x_62); -x_63 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_63, 0, x_62); -x_64 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_64, 0, x_62); -lean::closure_set(x_64, 1, x_9); -lean::closure_set(x_64, 2, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_11); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_60); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_28); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_18); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_5); -lean::cnstr_set(x_69, 1, x_68); -x_70 = l_Lean_Parser_TermParserM_Monad; -x_71 = l_Lean_Parser_TermParserM_MonadExcept; -x_72 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_73 = l_Lean_Parser_TermParserM_Alternative; -x_74 = l_Lean_Parser_Term_structInst; -x_75 = l_Lean_Parser_Term_structInst_HasView; -x_76 = l_Lean_Parser_Combinators_node_view___rarg(x_70, x_71, x_72, x_73, x_74, x_69, x_75); -lean::dec(x_69); -return x_76; -} -} -obj* _init_l_Lean_Parser_Term_structInst_Parser___closed__1() { -_start: -{ -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; uint8 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_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_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; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_1 = lean::mk_string("{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string(" . "); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_7); -lean::closure_set(x_10, 1, x_9); -lean::closure_set(x_10, 2, x_8); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 1, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView___lambda__1), 6, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = 0; -x_17 = lean::box(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_18, 0, x_15); -lean::closure_set(x_18, 1, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_19, 0, x_9); -x_20 = lean::mk_string(" with "); -x_21 = l_String_trim(x_20); -lean::dec(x_20); -lean::inc(x_21); -x_22 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_22, 0, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_9); -lean::closure_set(x_23, 2, 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); -lean::inc(x_19); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_19); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView___lambda__2), 6, 1); -lean::closure_set(x_26, 0, x_25); -x_27 = lean::box(x_16); -x_28 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_28, 0, x_26); -lean::closure_set(x_28, 1, x_27); -x_29 = lean::mk_string(" := "); -x_30 = l_String_trim(x_29); -lean::dec(x_29); -lean::inc(x_30); -x_31 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_31, 0, x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_9); -lean::closure_set(x_32, 2, x_31); -lean::inc(x_19); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_19); -lean::cnstr_set(x_33, 1, x_11); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_13); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_Lean_Parser_Term_structInstField; -x_37 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_37, 0, x_36); -lean::closure_set(x_37, 1, x_35); -x_38 = lean::mk_string(".."); -x_39 = l_String_trim(x_38); -lean::dec(x_38); -lean::inc(x_39); -x_40 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_40, 0, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_41, 0, x_39); -lean::closure_set(x_41, 1, x_9); -lean::closure_set(x_41, 2, x_40); -x_42 = lean::box(x_16); -x_43 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__7___boxed), 7, 2); -lean::closure_set(x_43, 0, x_19); -lean::closure_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_11); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_41); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_Lean_Parser_Term_structInstSource; -x_47 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_47, 0, x_46); -lean::closure_set(x_47, 1, x_45); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_11); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_37); -lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__3), 7, 2); -lean::closure_set(x_50, 0, x_49); -lean::closure_set(x_50, 1, x_9); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_11); -x_52 = l_Lean_Parser_Term_structInstItem; -x_53 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1), 7, 2); -lean::closure_set(x_53, 0, x_52); -lean::closure_set(x_53, 1, x_51); -x_54 = lean::mk_string(", "); -x_55 = l_String_trim(x_54); -lean::dec(x_54); -lean::inc(x_55); -x_56 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_56, 0, x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_57, 0, x_55); -lean::closure_set(x_57, 1, x_9); -lean::closure_set(x_57, 2, x_56); -x_58 = 1; -x_59 = lean::box(x_58); -x_60 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_sepBy___at_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_60, 0, x_53); -lean::closure_set(x_60, 1, x_57); -lean::closure_set(x_60, 2, x_59); -x_61 = lean::mk_string("}"); -x_62 = l_String_trim(x_61); -lean::dec(x_61); -lean::inc(x_62); -x_63 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_63, 0, x_62); -x_64 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_64, 0, x_62); -lean::closure_set(x_64, 1, x_9); -lean::closure_set(x_64, 2, x_63); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_11); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_60); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_28); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_18); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_5); -lean::cnstr_set(x_69, 1, x_68); -return x_69; -} -} -obj* l_Lean_Parser_Term_structInst_Parser(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; -x_6 = l_Lean_Parser_Term_structInst; -x_7 = l_Lean_Parser_Term_structInst_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_Subtype() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("Subtype"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_Subtype_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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_56; obj* x_57; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 3); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 4); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 5); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_3); -x_9 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_105; -x_105 = lean::box(3); -x_10 = x_105; -goto block_55; -} -else -{ -obj* x_106; obj* x_107; -x_106 = lean::cnstr_get(x_4, 0); -lean::inc(x_106); -lean::dec(x_4); -x_107 = lean::box(3); -x_56 = x_107; -x_57 = x_106; -goto block_104; -} -} -else -{ -obj* x_108; obj* x_109; -x_108 = lean::cnstr_get(x_2, 0); -lean::inc(x_108); -lean::dec(x_2); -x_109 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_109, 0, x_108); -if (lean::obj_tag(x_4) == 0) -{ -x_10 = x_109; -goto block_55; -} -else -{ -obj* x_110; -x_110 = lean::cnstr_get(x_4, 0); -lean::inc(x_110); -lean::dec(x_4); -x_56 = x_109; -x_57 = x_110; -goto block_104; -} -} -block_55: -{ -if (lean::obj_tag(x_5) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -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; -x_11 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::box(3); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -x_15 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_8); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_10); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Term_Subtype; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -else -{ -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; -x_21 = lean::cnstr_get(x_7, 0); -lean::inc(x_21); -lean::dec(x_7); -x_22 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_9); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_6); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::box(3); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -x_27 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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_8); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_10); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_Lean_Parser_Term_Subtype; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_5, 0); -lean::inc(x_33); -lean::dec(x_5); -x_34 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_35 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_34); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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_8); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_10); -lean::cnstr_set(x_41, 1, x_40); -x_42 = l_Lean_Parser_Term_Subtype; -x_43 = l_Lean_Parser_Syntax_mkNode(x_42, x_41); -return x_43; -} -else -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_44 = lean::cnstr_get(x_7, 0); -lean::inc(x_44); -lean::dec(x_7); -x_45 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_9); -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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_34); -lean::cnstr_set(x_48, 1, x_47); -x_49 = l_Lean_Parser_Combinators_many___rarg___closed__1; -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_8); -lean::cnstr_set(x_51, 1, x_50); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_10); -lean::cnstr_set(x_52, 1, x_51); -x_53 = l_Lean_Parser_Term_Subtype; -x_54 = l_Lean_Parser_Syntax_mkNode(x_53, x_52); -return x_54; -} -} -} -block_104: -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_58 = l_Lean_Parser_Term_typeSpec_HasView; -x_59 = lean::cnstr_get(x_58, 1); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_57); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_9); -x_62 = l_Lean_Parser_noKind; -x_63 = l_Lean_Parser_Syntax_mkNode(x_62, x_61); -if (lean::obj_tag(x_5) == 0) -{ -if (lean::obj_tag(x_7) == 0) -{ -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; -x_64 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_6); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::box(3); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_65); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_63); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_8); -lean::cnstr_set(x_69, 1, x_68); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_56); -lean::cnstr_set(x_70, 1, x_69); -x_71 = l_Lean_Parser_Term_Subtype; -x_72 = l_Lean_Parser_Syntax_mkNode(x_71, x_70); -return x_72; -} -else -{ -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; -x_73 = lean::cnstr_get(x_7, 0); -lean::inc(x_73); -lean::dec(x_7); -x_74 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_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_9); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_6); -lean::cnstr_set(x_76, 1, x_75); -x_77 = lean::box(3); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_76); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_63); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_8); -lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_56); -lean::cnstr_set(x_81, 1, x_80); -x_82 = l_Lean_Parser_Term_Subtype; -x_83 = l_Lean_Parser_Syntax_mkNode(x_82, x_81); -return x_83; -} -} -else -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_5, 0); -lean::inc(x_84); -lean::dec(x_5); -x_85 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; -x_86 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_6); -lean::cnstr_set(x_87, 1, x_86); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_85); -lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_63); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_8); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_56); -lean::cnstr_set(x_91, 1, x_90); -x_92 = l_Lean_Parser_Term_Subtype; -x_93 = l_Lean_Parser_Syntax_mkNode(x_92, x_91); -return x_93; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_94 = lean::cnstr_get(x_7, 0); -lean::inc(x_94); -lean::dec(x_7); -x_95 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -x_96 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_9); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_6); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_85); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_63); -lean::cnstr_set(x_99, 1, x_98); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_8); -lean::cnstr_set(x_100, 1, x_99); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_56); -lean::cnstr_set(x_101, 1, x_100); -x_102 = l_Lean_Parser_Term_Subtype; -x_103 = l_Lean_Parser_Syntax_mkNode(x_102, x_101); -return x_103; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Syntax_asNode___main(x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_5 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_6 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 2, x_5); -lean::cnstr_set(x_6, 3, x_1); -lean::cnstr_set(x_6, 4, x_2); -lean::cnstr_set(x_6, 5, x_1); -return x_6; -} -else -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_3); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_3, 0); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; -lean::free_heap_obj(x_3); -x_10 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_11 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -lean::cnstr_set(x_11, 2, x_1); -lean::cnstr_set(x_11, 3, x_1); -lean::cnstr_set(x_11, 4, x_2); -lean::cnstr_set(x_11, 5, x_1); -return x_11; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = l_Lean_Parser_Term_typeSpec_HasView; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_16 = lean::apply_1(x_15, x_13); -lean::cnstr_set(x_3, 0, x_16); -x_17 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_18 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_18, 0, x_1); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_18, 2, x_3); -lean::cnstr_set(x_18, 3, x_1); -lean::cnstr_set(x_18, 4, x_2); -lean::cnstr_set(x_18, 5, x_1); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_12); -lean::dec(x_9); -lean::free_heap_obj(x_3); -x_19 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_20 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_21 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_19); -lean::cnstr_set(x_21, 2, x_20); -lean::cnstr_set(x_21, 3, x_1); -lean::cnstr_set(x_21, 4, x_2); -lean::cnstr_set(x_21, 5, x_1); -return x_21; -} -} -} -else -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_3, 0); -lean::inc(x_22); -lean::dec(x_3); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; -x_24 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_25 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_25, 0, x_1); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_25, 2, x_1); -lean::cnstr_set(x_25, 3, x_1); -lean::cnstr_set(x_25, 4, x_2); -lean::cnstr_set(x_25, 5, x_1); -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_23, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_27 = lean::cnstr_get(x_23, 0); -lean::inc(x_27); -lean::dec(x_23); -x_28 = l_Lean_Parser_Term_typeSpec_HasView; -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -x_30 = lean::apply_1(x_29, x_27); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_30); -x_32 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_33, 0, x_1); -lean::cnstr_set(x_33, 1, x_32); -lean::cnstr_set(x_33, 2, x_31); -lean::cnstr_set(x_33, 3, x_1); -lean::cnstr_set(x_33, 4, x_2); -lean::cnstr_set(x_33, 5, x_1); -return x_33; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; -lean::dec(x_26); -lean::dec(x_23); -x_34 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_35 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_36 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_36, 0, x_1); -lean::cnstr_set(x_36, 1, x_34); -lean::cnstr_set(x_36, 2, x_35); -lean::cnstr_set(x_36, 3, x_1); -lean::cnstr_set(x_36, 4, x_2); -lean::cnstr_set(x_36, 5, x_1); -return x_36; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_80; -x_80 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; -x_81 = l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1___closed__1; -return x_81; -} -else -{ -obj* x_82; obj* x_83; -x_82 = lean::cnstr_get(x_80, 0); -lean::inc(x_82); -lean::dec(x_80); -x_83 = lean::cnstr_get(x_82, 1); -lean::inc(x_83); -lean::dec(x_82); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; -x_84 = lean::box(3); -x_2 = x_83; -x_3 = x_84; -goto block_79; -} -else -{ -obj* x_85; obj* x_86; -x_85 = lean::cnstr_get(x_83, 0); -lean::inc(x_85); -x_86 = lean::cnstr_get(x_83, 1); -lean::inc(x_86); -lean::dec(x_83); -x_2 = x_86; -x_3 = x_85; -goto block_79; -} -} -block_79: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_76; obj* x_77; -x_76 = lean::cnstr_get(x_3, 0); -lean::inc(x_76); -lean::dec(x_3); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_76); -x_4 = x_77; -goto block_75; -} -else -{ -obj* x_78; -lean::dec(x_3); -x_78 = lean::box(0); -x_4 = x_78; -goto block_75; -} -block_75: -{ -obj* x_5; obj* x_6; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_72; -x_72 = lean::box(3); -x_5 = x_2; -x_6 = x_72; -goto block_71; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_2, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_2, 1); -lean::inc(x_74); -lean::dec(x_2); -x_5 = x_74; -x_6 = x_73; -goto block_71; -} -block_71: -{ -obj* x_7; -if (lean::obj_tag(x_6) == 1) -{ -obj* x_69; -x_69 = lean::cnstr_get(x_6, 0); -lean::inc(x_69); -lean::dec(x_6); -x_7 = x_69; -goto block_68; -} -else -{ -obj* x_70; -lean::dec(x_6); -x_70 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -x_7 = x_70; -goto block_68; -} -block_68: -{ -obj* x_8; obj* x_9; -if (lean::obj_tag(x_5) == 0) -{ -obj* x_65; -x_65 = lean::box(3); -x_8 = x_5; -x_9 = x_65; -goto block_64; -} -else -{ -obj* x_66; obj* x_67; -x_66 = lean::cnstr_get(x_5, 0); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_5, 1); -lean::inc(x_67); -lean::dec(x_5); -x_8 = x_67; -x_9 = x_66; -goto block_64; -} -block_64: -{ -obj* x_10; obj* x_42; -x_42 = l_Lean_Parser_Syntax_asNode___main(x_9); -if (lean::obj_tag(x_42) == 0) -{ -obj* x_43; -x_43 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_10 = x_43; -goto block_41; -} -else -{ -uint8 x_44; -x_44 = !lean::is_exclusive(x_42); -if (x_44 == 0) -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_42, 0); -x_46 = lean::cnstr_get(x_45, 1); -lean::inc(x_46); -lean::dec(x_45); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; -lean::free_heap_obj(x_42); -x_47 = lean::box(0); -x_10 = x_47; -goto block_41; -} -else -{ -obj* x_48; -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_49 = lean::cnstr_get(x_46, 0); -lean::inc(x_49); -lean::dec(x_46); -x_50 = l_Lean_Parser_Term_typeSpec_HasView; -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_52 = lean::apply_1(x_51, x_49); -lean::cnstr_set(x_42, 0, x_52); -x_10 = x_42; -goto block_41; -} -else -{ -obj* x_53; -lean::dec(x_48); -lean::dec(x_46); -lean::free_heap_obj(x_42); -x_53 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_10 = x_53; -goto block_41; -} -} -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_42, 0); -lean::inc(x_54); -lean::dec(x_42); -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -lean::dec(x_54); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; -x_56 = lean::box(0); -x_10 = x_56; -goto block_41; -} -else -{ -obj* x_57; -x_57 = lean::cnstr_get(x_55, 1); -lean::inc(x_57); -if (lean::obj_tag(x_57) == 0) -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_58 = lean::cnstr_get(x_55, 0); -lean::inc(x_58); -lean::dec(x_55); -x_59 = l_Lean_Parser_Term_typeSpec_HasView; -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -x_61 = lean::apply_1(x_60, x_58); -x_62 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_62, 0, x_61); -x_10 = x_62; -goto block_41; -} -else -{ -obj* x_63; -lean::dec(x_57); -lean::dec(x_55); -x_63 = l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2; -x_10 = x_63; -goto block_41; -} -} -} -} -block_41: -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_23; obj* x_24; -if (lean::obj_tag(x_8) == 0) -{ -obj* x_38; -x_38 = lean::box(3); -x_23 = x_8; -x_24 = x_38; -goto block_37; -} -else -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_8, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_8, 1); -lean::inc(x_40); -lean::dec(x_8); -x_23 = x_40; -x_24 = x_39; -goto block_37; -} -block_22: -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_7); -lean::cnstr_set(x_15, 2, x_10); -lean::cnstr_set(x_15, 3, x_11); -lean::cnstr_set(x_15, 4, x_12); -lean::cnstr_set(x_15, 5, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_13, 0); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_19, 0, x_4); -lean::cnstr_set(x_19, 1, x_7); -lean::cnstr_set(x_19, 2, x_10); -lean::cnstr_set(x_19, 3, x_11); -lean::cnstr_set(x_19, 4, x_12); -lean::cnstr_set(x_19, 5, x_18); -return x_19; -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::box(0); -x_21 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_7); -lean::cnstr_set(x_21, 2, x_10); -lean::cnstr_set(x_21, 3, x_11); -lean::cnstr_set(x_21, 4, x_12); -lean::cnstr_set(x_21, 5, x_20); -return x_21; -} -} -} -block_37: -{ -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -lean::dec(x_24); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::box(0); -x_28 = lean::box(3); -x_29 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_29, 0, x_4); -lean::cnstr_set(x_29, 1, x_7); -lean::cnstr_set(x_29, 2, x_10); -lean::cnstr_set(x_29, 3, x_26); -lean::cnstr_set(x_29, 4, x_28); -lean::cnstr_set(x_29, 5, x_27); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_23, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_23, 1); -lean::inc(x_31); -lean::dec(x_23); -x_11 = x_26; -x_12 = x_30; -x_13 = x_31; -goto block_22; -} -} -else -{ -obj* x_32; -lean::dec(x_24); -x_32 = lean::box(0); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::box(3); -x_34 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_34, 0, x_4); -lean::cnstr_set(x_34, 1, x_7); -lean::cnstr_set(x_34, 2, x_10); -lean::cnstr_set(x_34, 3, x_32); -lean::cnstr_set(x_34, 4, x_33); -lean::cnstr_set(x_34, 5, x_32); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_23, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_23, 1); -lean::inc(x_36); -lean::dec(x_23); -x_11 = x_32; -x_12 = x_35; -x_13 = x_36; -goto block_22; -} -} -} -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_Subtype_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Subtype_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_Subtype_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_Subtype_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("{"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = lean::mk_string("//"); -x_6 = lean::mk_nat_obj(0u); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_6); -x_9 = lean::mk_string("}"); -x_10 = l_Lean_Parser_symbol_tokens___rarg(x_9, x_6); -lean::dec(x_9); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_10, x_4); -lean::dec(x_10); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_11); -lean::dec(x_11); -lean::dec(x_8); -x_13 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_12); -lean::dec(x_12); -lean::dec(x_7); -x_14 = l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens; -x_15 = l_Lean_Parser_List_cons_tokens___rarg(x_14, x_13); -lean::dec(x_13); -x_16 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_15); -lean::dec(x_15); -x_17 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_16); -lean::dec(x_16); -lean::dec(x_3); -x_18 = l_Lean_Parser_tokens___rarg(x_17); -lean::dec(x_17); -return x_18; -} -} -obj* _init_l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_1 = lean::mk_string("{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("//"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_7); -lean::closure_set(x_10, 1, x_9); -lean::closure_set(x_10, 2, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_11, 0, x_9); -x_12 = lean::mk_string("}"); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_9); -lean::closure_set(x_15, 2, x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_10); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optType_Parser), 5, 0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_5); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_TermParserM_Monad; -x_26 = l_Lean_Parser_TermParserM_MonadExcept; -x_27 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_28 = l_Lean_Parser_TermParserM_Alternative; -x_29 = l_Lean_Parser_Term_Subtype; -x_30 = l_Lean_Parser_Term_Subtype_HasView; -x_31 = l_Lean_Parser_Combinators_node_view___rarg(x_25, x_26, x_27, x_28, x_29, x_24, x_30); -lean::dec(x_24); -return x_31; -} -} -obj* _init_l_Lean_Parser_Term_Subtype_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_1 = lean::mk_string("{"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_string("//"); -x_7 = l_String_trim(x_6); -lean::dec(x_6); -lean::inc(x_7); -x_8 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::mk_nat_obj(0u); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_10, 0, x_7); -lean::closure_set(x_10, 1, x_9); -lean::closure_set(x_10, 2, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_11, 0, x_9); -x_12 = lean::mk_string("}"); -x_13 = l_String_trim(x_12); -lean::dec(x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_9); -lean::closure_set(x_15, 2, x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_11); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_10); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_optType_Parser), 5, 0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_19); -x_22 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___boxed), 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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_5); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -} -obj* l_Lean_Parser_Term_Subtype_Parser(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; -x_6 = l_Lean_Parser_Term_Subtype; -x_7 = l_Lean_Parser_Term_Subtype_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_inaccessible() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("inaccessible"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_inaccessible_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_6 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_3); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::box(3); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_7); -x_10 = l_Lean_Parser_Term_inaccessible; -x_11 = l_Lean_Parser_Syntax_mkNode(x_10, x_9); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_12 = lean::cnstr_get(x_4, 0); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_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_5); -lean::inc(x_3); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_3); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::box(3); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_15); -x_18 = l_Lean_Parser_Term_inaccessible; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -return x_19; -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -x_21 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -lean::inc(x_3); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_3); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_Term_inaccessible; -x_26 = l_Lean_Parser_Syntax_mkNode(x_25, x_24); -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_27 = lean::cnstr_get(x_4, 0); -lean::inc(x_27); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_5); -lean::inc(x_3); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_3); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_21); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_Lean_Parser_Term_inaccessible; -x_33 = l_Lean_Parser_Syntax_mkNode(x_32, x_31); -return x_33; -} -} -} -} -obj* _init_l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -lean::cnstr_set(x_3, 2, x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_14; obj* x_15; obj* x_28; -x_28 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; -x_29 = l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__2; -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -lean::dec(x_28); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = lean::box(3); -x_14 = x_31; -x_15 = x_32; -goto block_27; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -lean::dec(x_31); -x_14 = x_34; -x_15 = x_33; -goto block_27; -} -} -block_13: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_3); -lean::cnstr_set(x_6, 2, x_5); -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_4, 0); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_3); -lean::cnstr_set(x_10, 2, x_9); -return x_10; -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_3); -lean::cnstr_set(x_12, 2, x_11); -return x_12; -} -} -} -block_27: -{ -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -lean::dec(x_15); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_16); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::box(0); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_19); -lean::cnstr_set(x_20, 2, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_14, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_14, 1); -lean::inc(x_22); -lean::dec(x_14); -x_2 = x_17; -x_3 = x_21; -x_4 = x_22; -goto block_13; -} -} -else -{ -lean::dec(x_15); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_23; -x_23 = l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__1; -return x_23; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_14, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_14, 1); -lean::inc(x_25); -lean::dec(x_14); -x_26 = lean::box(0); -x_2 = x_26; -x_3 = x_24; -x_4 = x_25; -goto block_13; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_inaccessible_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_inaccessible_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_inaccessible_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_inaccessible_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_inaccessible_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_inaccessible_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = lean::mk_string(".("); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::mk_nat_obj(0u); -x_5 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_4); -x_6 = lean::mk_string(")"); -x_7 = l_Lean_Parser_symbol_tokens___rarg(x_6, x_4); -lean::dec(x_6); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_8); -lean::dec(x_7); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_9); -lean::dec(x_9); -lean::dec(x_5); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_10); -lean::dec(x_10); -lean::dec(x_3); -x_12 = l_Lean_Parser_tokens___rarg(x_11); -lean::dec(x_11); -return x_12; -} -} -obj* _init_l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_1 = lean::mk_string(".("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string(")"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_6); -lean::closure_set(x_11, 2, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_5); -lean::cnstr_set(x_15, 1, x_14); -x_16 = l_Lean_Parser_TermParserM_Monad; -x_17 = l_Lean_Parser_TermParserM_MonadExcept; -x_18 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_19 = l_Lean_Parser_TermParserM_Alternative; -x_20 = l_Lean_Parser_Term_inaccessible; -x_21 = l_Lean_Parser_Term_inaccessible_HasView; -x_22 = l_Lean_Parser_Combinators_node_view___rarg(x_16, x_17, x_18, x_19, x_20, x_15, x_21); -lean::dec(x_15); -return x_22; -} -} -obj* _init_l_Lean_Parser_Term_inaccessible_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string(".("); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string(")"); -x_9 = l_String_trim(x_8); -lean::dec(x_8); -lean::inc(x_9); -x_10 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_6); -lean::closure_set(x_11, 2, x_10); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_7); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_5); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -} -obj* l_Lean_Parser_Term_inaccessible_Parser(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; -x_6 = l_Lean_Parser_Term_inaccessible; -x_7 = l_Lean_Parser_Term_inaccessible_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_anonymousInaccessible() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("anonymousInaccessible"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_Term_anonymousInaccessible; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = l_Lean_Parser_Term_anonymousInaccessible; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -} -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_10; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -return x_10; -} -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; -x_13 = lean::box(0); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -else -{ -obj* x_17; -lean::dec(x_14); -x_17 = lean::box(0); -return x_17; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_anonymousInaccessible_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_anonymousInaccessible_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_anonymousInaccessible_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::mk_string("._"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::mk_string("._"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = l_Lean_Parser_TermParserM_Monad; -x_9 = l_Lean_Parser_TermParserM_MonadExcept; -x_10 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_11 = l_Lean_Parser_TermParserM_Alternative; -x_12 = l_Lean_Parser_Term_anonymousInaccessible; -x_13 = l_Lean_Parser_Term_anonymousInaccessible_HasView; -x_14 = l_Lean_Parser_Combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); -lean::dec(x_7); -return x_14; -} -} -obj* _init_l_Lean_Parser_Term_anonymousInaccessible_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::mk_string("._"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_Term_anonymousInaccessible_Parser(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; -x_6 = l_Lean_Parser_Term_anonymousInaccessible; -x_7 = l_Lean_Parser_Term_anonymousInaccessible_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_sorry() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("sorry"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_Term_sorry; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_Term_sorry_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = l_Lean_Parser_Term_sorry; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -} -obj* l_Lean_Parser_Term_sorry_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_10; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -return x_10; -} -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; -x_13 = lean::box(0); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -else -{ -obj* x_17; -lean::dec(x_14); -x_17 = lean::box(0); -return x_17; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_sorry_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sorry_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_sorry_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_sorry_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_sorry_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::mk_string("sorry"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokens___rarg(x_5); -lean::dec(x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_1 = lean::mk_string("sorry"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = l_Lean_Parser_TermParserM_Monad; -x_9 = l_Lean_Parser_TermParserM_MonadExcept; -x_10 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_11 = l_Lean_Parser_TermParserM_Alternative; -x_12 = l_Lean_Parser_Term_sorry; -x_13 = l_Lean_Parser_Term_sorry_HasView; -x_14 = l_Lean_Parser_Combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); -lean::dec(x_7); -return x_14; -} -} -obj* _init_l_Lean_Parser_Term_sorry_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::mk_string("sorry"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_Term_sorry_Parser(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; -x_6 = l_Lean_Parser_Term_sorry; -x_7 = l_Lean_Parser_Term_sorry_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_borrowPrec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_Lean_Parser_maxPrec; -x_2 = lean::mk_nat_obj(1u); -x_3 = lean::nat_sub(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_borrowed() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("borrowed"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_borrowed_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_Term_borrowed; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_Term_borrowed; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_borrowed_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_borrowed_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_borrowed_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_borrowed_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_borrowed_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_borrowed_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::mk_string("@&"); -x_2 = l_Lean_Parser_maxPrec; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -x_4 = l_Lean_Parser_Term_borrowPrec; -x_5 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_4); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_7); -lean::dec(x_7); -lean::dec(x_3); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::mk_string("@&"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = l_Lean_Parser_Term_borrowPrec; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = l_Lean_Parser_TermParserM_Monad; -x_12 = l_Lean_Parser_TermParserM_MonadExcept; -x_13 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_14 = l_Lean_Parser_TermParserM_Alternative; -x_15 = l_Lean_Parser_Term_borrowed; -x_16 = l_Lean_Parser_Term_borrowed_HasView; -x_17 = l_Lean_Parser_Combinators_node_view___rarg(x_11, x_12, x_13, x_14, x_15, x_10, x_16); -lean::dec(x_10); -return x_17; -} -} -obj* _init_l_Lean_Parser_Term_borrowed_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("@&"); -x_2 = l_String_trim(x_1); -lean::dec(x_1); -lean::inc(x_2); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_command_NotationSpec_precedenceTerm_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = l_Lean_Parser_Term_borrowPrec; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -} -obj* l_Lean_Parser_Term_borrowed_Parser(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; -x_6 = l_Lean_Parser_Term_borrowed; -x_7 = l_Lean_Parser_Term_borrowed_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_depArrow() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("depArrow"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_depArrow_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; uint8 x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = 0; -x_6 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_5); -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -lean::dec(x_6); -x_8 = lean::apply_1(x_7, x_2); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_3); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_Term_depArrow; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -obj* _init_l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2___closed__1() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = 0; -x_2 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_1); -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -lean::dec(x_2); -x_4 = lean::box(3); -x_5 = lean::apply_1(x_3, x_4); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 2, x_4); -return x_6; -} -} -obj* l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; obj* x_8; uint8 x_9; obj* x_10; obj* x_11; obj* x_12; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -lean::dec(x_5); -x_9 = 0; -x_10 = l_Lean_Parser_Term_bracketedBinder_HasView_x27(x_9); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::apply_1(x_11, x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::box(3); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -else -{ -obj* x_15; -x_15 = lean::cnstr_get(x_8, 1); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; -x_16 = lean::cnstr_get(x_8, 0); -lean::inc(x_16); -lean::dec(x_8); -x_17 = lean::box(3); -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_12); -lean::cnstr_set(x_18, 1, x_16); -lean::cnstr_set(x_18, 2, x_17); -return x_18; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_8, 0); -lean::inc(x_19); -lean::dec(x_8); -x_20 = lean::cnstr_get(x_15, 0); -lean::inc(x_20); -lean::dec(x_15); -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_12); -lean::cnstr_set(x_21, 1, x_19); -lean::cnstr_set(x_21, 2, x_20); -return x_21; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_depArrow_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_depArrow_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_depArrow_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_depArrow_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasTokens() { -_start: -{ -uint8 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; -x_1 = 1; -x_2 = l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens(x_1); -x_3 = lean::mk_string("→"); -x_4 = lean::mk_string("->"); -x_5 = lean::mk_nat_obj(25u); -x_6 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -x_7 = lean::mk_nat_obj(24u); -x_8 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_7); -x_9 = lean::box(0); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_8, x_9); -lean::dec(x_8); -x_11 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_10); -lean::dec(x_10); -lean::dec(x_6); -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_2, x_11); -lean::dec(x_11); -lean::dec(x_2); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -return x_13; -} -} -obj* _init_l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasView() { -_start: -{ -uint8 x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_1 = 1; -x_2 = lean::box(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_string("→"); -x_5 = lean::mk_string("->"); -x_6 = lean::mk_nat_obj(25u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_7, 0, x_4); -lean::closure_set(x_7, 1, x_5); -lean::closure_set(x_7, 2, x_6); -x_8 = lean::mk_nat_obj(24u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_3); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_Lean_Parser_TermParserM_Monad; -x_15 = l_Lean_Parser_TermParserM_MonadExcept; -x_16 = l_Lean_Parser_TermParserM_Lean_Parser_MonadParsec; -x_17 = l_Lean_Parser_TermParserM_Alternative; -x_18 = l_Lean_Parser_Term_depArrow; -x_19 = l_Lean_Parser_Term_depArrow_HasView; -x_20 = l_Lean_Parser_Combinators_node_view___rarg(x_14, x_15, x_16, x_17, x_18, x_13, x_19); -lean::dec(x_13); -return x_20; -} -} -obj* _init_l_Lean_Parser_Term_depArrow_Parser___closed__1() { -_start: -{ -uint8 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; -x_1 = 1; -x_2 = lean::box(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_bracketedBinder_Parser___boxed), 6, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_string("→"); -x_5 = lean::mk_string("->"); -x_6 = lean::mk_nat_obj(25u); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens___spec__1___boxed), 8, 3); -lean::closure_set(x_7, 0, x_4); -lean::closure_set(x_7, 1, x_5); -lean::closure_set(x_7, 2, x_6); -x_8 = lean::mk_nat_obj(24u); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Parser), 6, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_3); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -obj* l_Lean_Parser_Term_depArrow_Parser(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; -x_6 = l_Lean_Parser_Term_depArrow; -x_7 = l_Lean_Parser_Term_depArrow_Parser___closed__1; -x_8 = l_Lean_Parser_Combinators_node___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser___spec__1(x_6, x_7, x_1, x_2, x_3, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("String"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_1); -x_5 = l_Lean_Parser_token(x_1, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_6, 0); -x_12 = lean::cnstr_get(x_6, 1); -x_13 = lean::cnstr_get(x_6, 2); -x_14 = l_Lean_Parser_stringLit; -lean::inc(x_11); -x_15 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_14, x_11); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::free_heap_obj(x_6); -lean::dec(x_11); -lean::free_heap_obj(x_5); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_3); -x_17 = lean::box(0); -x_18 = l_String_splitAux___main___closed__1; -x_19 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_20 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_18, x_19, x_16, x_17, x_1, x_12, x_8); -lean::dec(x_1); -lean::dec(x_16); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_22); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_24); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_25); -x_27 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_26, x_19); -x_28 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_27); -lean::cnstr_set(x_20, 0, x_28); -return x_20; -} -else -{ -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; -x_29 = lean::cnstr_get(x_20, 0); -x_30 = lean::cnstr_get(x_20, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_20); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_29); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_32); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_33); -x_35 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_34, x_19); -x_36 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_35); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_30); -return x_37; -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -lean::dec(x_15); -lean::dec(x_3); -lean::dec(x_1); -x_38 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_38); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_6); -x_40 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_39); -x_42 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_43 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_41, x_42); -x_44 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_43); -lean::cnstr_set(x_5, 0, x_44); -return x_5; -} -} -else -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_45 = lean::cnstr_get(x_6, 0); -x_46 = lean::cnstr_get(x_6, 1); -x_47 = lean::cnstr_get(x_6, 2); -lean::inc(x_47); -lean::inc(x_46); -lean::inc(x_45); -lean::dec(x_6); -x_48 = l_Lean_Parser_stringLit; -lean::inc(x_45); -x_49 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_48, x_45); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -lean::dec(x_45); -lean::free_heap_obj(x_5); -x_50 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_50, 0, x_3); -x_51 = lean::box(0); -x_52 = l_String_splitAux___main___closed__1; -x_53 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_54 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_52, x_53, x_50, x_51, x_1, x_46, x_8); -lean::dec(x_1); -lean::dec(x_50); -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_54, 1); -lean::inc(x_56); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - lean::cnstr_release(x_54, 1); - x_57 = x_54; -} else { - lean::dec_ref(x_54); - x_57 = lean::box(0); -} -x_58 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_55); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_47, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_60); -x_62 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_61, x_53); -x_63 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_62); -if (lean::is_scalar(x_57)) { - x_64 = lean::alloc_cnstr(0, 2, 0); -} else { - x_64 = x_57; -} -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_56); -return x_64; -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; -lean::dec(x_49); -lean::dec(x_3); -lean::dec(x_1); -x_65 = l_Lean_Parser_finishCommentBlock___closed__2; -x_66 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_66, 0, x_45); -lean::cnstr_set(x_66, 1, x_46); -lean::cnstr_set(x_66, 2, x_65); -x_67 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_47, x_66); -x_68 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_68, x_67); -x_70 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_71 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_69, x_70); -x_72 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_71); -lean::cnstr_set(x_5, 0, x_72); -return x_5; -} -} -} -else -{ -obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_73 = lean::cnstr_get(x_5, 1); -lean::inc(x_73); -lean::dec(x_5); -x_74 = lean::cnstr_get(x_6, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_6, 1); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_6, 2); -lean::inc(x_76); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_77 = x_6; -} else { - lean::dec_ref(x_6); - x_77 = lean::box(0); -} -x_78 = l_Lean_Parser_stringLit; -lean::inc(x_74); -x_79 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_78, x_74); -if (lean::obj_tag(x_79) == 0) -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -lean::dec(x_77); -lean::dec(x_74); -x_80 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_80, 0, x_3); -x_81 = lean::box(0); -x_82 = l_String_splitAux___main___closed__1; -x_83 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_84 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_82, x_83, x_80, x_81, x_1, x_75, x_73); -lean::dec(x_1); -lean::dec(x_80); -x_85 = lean::cnstr_get(x_84, 0); -lean::inc(x_85); -x_86 = lean::cnstr_get(x_84, 1); -lean::inc(x_86); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - lean::cnstr_release(x_84, 1); - x_87 = x_84; -} else { - lean::dec_ref(x_84); - x_87 = lean::box(0); -} -x_88 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_85); -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_76, x_89); -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_90); -x_92 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_91, x_83); -x_93 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_92); -if (lean::is_scalar(x_87)) { - x_94 = lean::alloc_cnstr(0, 2, 0); -} else { - x_94 = x_87; -} -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_86); -return x_94; -} -else -{ -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; -lean::dec(x_79); -lean::dec(x_3); -lean::dec(x_1); -x_95 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_77)) { - x_96 = lean::alloc_cnstr(0, 3, 0); -} else { - x_96 = x_77; -} -lean::cnstr_set(x_96, 0, x_74); -lean::cnstr_set(x_96, 1, x_75); -lean::cnstr_set(x_96, 2, x_95); -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_76, x_96); -x_98 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_97); -x_100 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_101 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_99, x_100); -x_102 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_101); -x_103 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_73); -return x_103; -} -} -} -else -{ -uint8 x_104; -lean::dec(x_3); -lean::dec(x_1); -x_104 = !lean::is_exclusive(x_5); -if (x_104 == 0) -{ -obj* x_105; uint8 x_106; -x_105 = lean::cnstr_get(x_5, 0); -lean::dec(x_105); -x_106 = !lean::is_exclusive(x_6); -if (x_106 == 0) -{ -obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_107 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_107, x_6); -x_109 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_110 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_108, x_109); -x_111 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_110); -lean::cnstr_set(x_5, 0, x_111); -return x_5; -} -else -{ -obj* x_112; uint8 x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_112 = lean::cnstr_get(x_6, 0); -x_113 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_112); -lean::dec(x_6); -x_114 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_114, 0, x_112); -lean::cnstr_set_scalar(x_114, sizeof(void*)*1, x_113); -x_115 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_116 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_115, x_114); -x_117 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_118 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_116, x_117); -x_119 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_118); -lean::cnstr_set(x_5, 0, x_119); -return x_5; -} -} -else -{ -obj* x_120; obj* x_121; uint8 x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -x_120 = lean::cnstr_get(x_5, 1); -lean::inc(x_120); -lean::dec(x_5); -x_121 = lean::cnstr_get(x_6, 0); -lean::inc(x_121); -x_122 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_123 = x_6; -} else { - lean::dec_ref(x_6); - x_123 = lean::box(0); -} -if (lean::is_scalar(x_123)) { - x_124 = lean::alloc_cnstr(1, 1, 1); -} else { - x_124 = x_123; -} -lean::cnstr_set(x_124, 0, x_121); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_122); -x_125 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_126 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_125, x_124); -x_127 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1; -x_128 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_126, x_127); -x_129 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_128); -x_130 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_120); -return x_130; -} -} -} -} -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasTokens; -x_3 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_2, x_1); -x_4 = l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasTokens; -x_5 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_4, x_3); -lean::dec(x_3); -x_6 = l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasTokens; -x_7 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_6, x_5); -lean::dec(x_5); -x_8 = l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasTokens; -x_9 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_8, x_7); -lean::dec(x_7); -x_10 = l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasTokens; -x_11 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_10, x_9); -lean::dec(x_9); -x_12 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_10, x_11); -lean::dec(x_11); -x_13 = l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasTokens; -x_14 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_13, x_12); -lean::dec(x_12); -x_15 = l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasTokens; -x_16 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_15, x_14); -lean::dec(x_14); -x_17 = l_Lean_Parser_Term_if_Parser_Lean_Parser_HasTokens; -x_18 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_17, x_16); -lean::dec(x_16); -x_19 = l_Lean_Parser_Term_match_Parser_Lean_Parser_HasTokens; -x_20 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_19, x_18); -lean::dec(x_18); -x_21 = l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasTokens; -x_22 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_21, x_20); -lean::dec(x_20); -x_23 = l_Lean_Parser_Term_show_Parser_Lean_Parser_HasTokens; -x_24 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_23, x_22); -lean::dec(x_22); -x_25 = l_Lean_Parser_Term_have_Parser_Lean_Parser_HasTokens; -x_26 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_25, x_24); -lean::dec(x_24); -x_27 = l_Lean_Parser_Term_let_Parser_Lean_Parser_HasTokens; -x_28 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_27, x_26); -lean::dec(x_26); -x_29 = l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasTokens; -x_30 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_29, x_28); -lean::dec(x_28); -x_31 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_29, x_30); -lean::dec(x_30); -x_32 = l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasTokens; -x_33 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_32, x_31); -lean::dec(x_31); -x_34 = l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasTokens; -x_35 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_34, x_33); -lean::dec(x_33); -x_36 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_34, x_35); -lean::dec(x_35); -x_37 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_34, x_36); -lean::dec(x_36); -x_38 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_34, x_37); -lean::dec(x_37); -x_39 = l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens; -x_40 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_39, x_38); -lean::dec(x_38); -x_41 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_39, x_40); -lean::dec(x_40); -x_42 = l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasTokens; -x_43 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_42, x_41); -lean::dec(x_41); -x_44 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_42, x_43); -lean::dec(x_43); -x_45 = l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasTokens; -x_46 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_45, x_44); -lean::dec(x_44); -x_47 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_10, x_46); -lean::dec(x_46); -x_48 = l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens; -x_49 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_48, x_47); -lean::dec(x_47); -x_50 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_1, x_49); -lean::dec(x_49); -x_51 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_1, x_50); -lean::dec(x_50); -x_52 = l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasTokens; -x_53 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_52, x_51); -lean::dec(x_51); -return x_53; -} -} -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_builtinLeadingParsers() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 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_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; -x_1 = lean::box(0); -x_2 = lean::mk_string("ident"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_identUnivs_Parser), 5, 0); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_Lean_Parser_number; -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__1___boxed), 1, 0); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = l_Lean_Parser_stringLit; -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___boxed), 1, 0); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::mk_string("("); -x_13 = lean_name_mk_string(x_1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_paren_Parser), 5, 0); -lean::inc(x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_depArrow_Parser), 5, 0); -lean::inc(x_16); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_13); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::mk_string("_"); -x_19 = lean_name_mk_string(x_1, x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_hole_Parser), 5, 0); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::mk_string("Sort"); -x_23 = lean_name_mk_string(x_1, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sort_Parser), 5, 0); -lean::inc(x_24); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::mk_string("Type"); -x_27 = lean_name_mk_string(x_1, x_26); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_24); -x_29 = lean::mk_string("λ"); -x_30 = lean_name_mk_string(x_1, x_29); -x_31 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_lambda_Parser), 5, 0); -lean::inc(x_31); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::mk_string("fun"); -x_34 = lean_name_mk_string(x_1, x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_31); -x_36 = lean::mk_string("Π"); -x_37 = lean_name_mk_string(x_1, x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_pi_Parser), 5, 0); -lean::inc(x_38); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::mk_string("Pi"); -x_41 = lean_name_mk_string(x_1, x_40); -lean::inc(x_38); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_38); -x_43 = lean::mk_string("∀"); -x_44 = lean_name_mk_string(x_1, x_43); -lean::inc(x_38); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_38); -x_46 = lean::mk_string("forall"); -x_47 = lean_name_mk_string(x_1, x_46); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_38); -x_49 = lean::mk_string("⟨"); -x_50 = lean_name_mk_string(x_1, x_49); -x_51 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_anonymousConstructor_Parser), 5, 0); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_50); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::mk_string("@"); -x_54 = lean_name_mk_string(x_1, x_53); -x_55 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_explicit_Parser), 5, 0); -lean::inc(x_55); -x_56 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_56, 0, x_54); -lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::mk_string("@@"); -x_58 = lean_name_mk_string(x_1, x_57); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_55); -x_60 = lean::mk_string("let"); -x_61 = lean_name_mk_string(x_1, x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_let_Parser), 5, 0); -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_61); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::mk_string("have"); -x_65 = lean_name_mk_string(x_1, x_64); -x_66 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_have_Parser), 5, 0); -x_67 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_67, 0, x_65); -lean::cnstr_set(x_67, 1, x_66); -x_68 = lean::mk_string("show"); -x_69 = lean_name_mk_string(x_1, x_68); -x_70 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_show_Parser), 5, 0); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_69); -lean::cnstr_set(x_71, 1, x_70); -x_72 = lean::mk_string("assume"); -x_73 = lean_name_mk_string(x_1, x_72); -x_74 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_assume_Parser), 5, 0); -x_75 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_75, 0, x_73); -lean::cnstr_set(x_75, 1, x_74); -x_76 = lean::mk_string("match"); -x_77 = lean_name_mk_string(x_1, x_76); -x_78 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_match_Parser), 5, 0); -x_79 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_79, 0, x_77); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::mk_string("if"); -x_81 = lean_name_mk_string(x_1, x_80); -x_82 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_if_Parser), 5, 0); -x_83 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_83, 0, x_81); -lean::cnstr_set(x_83, 1, x_82); -x_84 = lean::mk_string("{"); -x_85 = lean_name_mk_string(x_1, x_84); -x_86 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_structInst_Parser), 5, 0); -lean::inc(x_85); -x_87 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_87, 0, x_85); -lean::cnstr_set(x_87, 1, x_86); -x_88 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_Subtype_Parser), 5, 0); -lean::inc(x_85); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_85); -lean::cnstr_set(x_89, 1, x_88); -lean::inc(x_16); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_85); -lean::cnstr_set(x_90, 1, x_16); -x_91 = lean::mk_string("["); -x_92 = lean_name_mk_string(x_1, x_91); -x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set(x_93, 1, x_16); -x_94 = lean::mk_string(".("); -x_95 = lean_name_mk_string(x_1, x_94); -x_96 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_inaccessible_Parser), 5, 0); -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_95); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::mk_string("._"); -x_99 = lean_name_mk_string(x_1, x_98); -x_100 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_anonymousInaccessible_Parser), 5, 0); -x_101 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_101, 0, x_99); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::mk_string("sorry"); -x_103 = lean_name_mk_string(x_1, x_102); -x_104 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sorry_Parser), 5, 0); -x_105 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_105, 0, x_103); -lean::cnstr_set(x_105, 1, x_104); -x_106 = lean::mk_string("@&"); -x_107 = lean_name_mk_string(x_1, x_106); -x_108 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_borrowed_Parser), 5, 0); -x_109 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_109, 0, x_107); -lean::cnstr_set(x_109, 1, x_108); -x_110 = lean::box(0); -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_109); -lean::cnstr_set(x_111, 1, x_110); -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_105); -lean::cnstr_set(x_112, 1, x_111); -x_113 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_113, 0, x_101); -lean::cnstr_set(x_113, 1, x_112); -x_114 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_114, 0, x_97); -lean::cnstr_set(x_114, 1, x_113); -x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_93); -lean::cnstr_set(x_115, 1, x_114); -x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_90); -lean::cnstr_set(x_116, 1, x_115); -x_117 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_117, 0, x_89); -lean::cnstr_set(x_117, 1, x_116); -x_118 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_118, 0, x_87); -lean::cnstr_set(x_118, 1, x_117); -x_119 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_119, 0, x_83); -lean::cnstr_set(x_119, 1, x_118); -x_120 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_120, 0, x_79); -lean::cnstr_set(x_120, 1, x_119); -x_121 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_121, 0, x_75); -lean::cnstr_set(x_121, 1, x_120); -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_71); -lean::cnstr_set(x_122, 1, x_121); -x_123 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_123, 0, x_67); -lean::cnstr_set(x_123, 1, x_122); -x_124 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_124, 0, x_63); -lean::cnstr_set(x_124, 1, x_123); -x_125 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_125, 0, x_59); -lean::cnstr_set(x_125, 1, x_124); -x_126 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_126, 0, x_56); -lean::cnstr_set(x_126, 1, x_125); -x_127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_127, 0, x_52); -lean::cnstr_set(x_127, 1, x_126); -x_128 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_128, 0, x_48); -lean::cnstr_set(x_128, 1, x_127); -x_129 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_129, 0, x_45); -lean::cnstr_set(x_129, 1, x_128); -x_130 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_130, 0, x_42); -lean::cnstr_set(x_130, 1, x_129); -x_131 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_131, 0, x_39); -lean::cnstr_set(x_131, 1, x_130); -x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_35); -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_28); -lean::cnstr_set(x_134, 1, x_133); -x_135 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_135, 0, x_25); -lean::cnstr_set(x_135, 1, x_134); -x_136 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_136, 0, x_21); -lean::cnstr_set(x_136, 1, x_135); -x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_17); -lean::cnstr_set(x_137, 1, x_136); -x_138 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_138, 0, x_15); -lean::cnstr_set(x_138, 1, x_137); -x_139 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_139, 0, x_11); -lean::cnstr_set(x_139, 1, x_138); -x_140 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_140, 0, x_8); -lean::cnstr_set(x_140, 1, x_139); -x_141 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_141, 0, x_5); -lean::cnstr_set(x_141, 1, x_140); -x_142 = l_Lean_Parser_TokenMap_ofList___main___rarg(x_141); -return x_142; -} -} -obj* _init_l_Lean_Parser_Term_sortApp() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("sortApp"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_sortApp_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -lean::inc(x_2); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_Term_sortApp; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -lean::dec(x_5); -x_9 = lean::box(3); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -x_12 = lean::cnstr_get(x_7, 0); -lean::inc(x_12); -lean::dec(x_7); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_sortApp_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sortApp_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_sortApp_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_sortApp_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_sortApp_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_sortApp_HasView_x27; -return x_1; -} -} -obj* l_ReaderT_bind___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__1___rarg(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_9; obj* x_10; -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_9 = lean::apply_6(x_1, x_3, x_4, x_5, x_6, x_7, x_8); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint8 x_16; -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_10, 2); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::apply_7(x_2, x_12, x_3, x_4, x_5, x_6, x_13, x_11); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 0); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_17); -lean::cnstr_set(x_15, 0, x_18); -return x_15; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_15, 0); -x_20 = lean::cnstr_get(x_15, 1); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_15); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_19); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -return x_22; -} -} -else -{ -uint8 x_23; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_23 = !lean::is_exclusive(x_9); -if (x_23 == 0) -{ -obj* x_24; uint8 x_25; -x_24 = lean::cnstr_get(x_9, 0); -lean::dec(x_24); -x_25 = !lean::is_exclusive(x_10); -if (x_25 == 0) -{ -return x_9; -} -else -{ -obj* x_26; uint8 x_27; obj* x_28; -x_26 = lean::cnstr_get(x_10, 0); -x_27 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_26); -lean::dec(x_10); -x_28 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set_scalar(x_28, sizeof(void*)*1, x_27); -lean::cnstr_set(x_9, 0, x_28); -return x_9; -} -} -else -{ -obj* x_29; obj* x_30; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_9, 1); -lean::inc(x_29); -lean::dec(x_9); -x_30 = lean::cnstr_get(x_10, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_32 = x_10; -} else { - lean::dec_ref(x_10); - x_32 = lean::box(0); -} -if (lean::is_scalar(x_32)) { - x_33 = lean::alloc_cnstr(1, 1, 1); -} else { - x_33 = x_32; -} -lean::cnstr_set(x_33, 0, x_30); -lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_31); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_29); -return x_34; -} -} -} -} -obj* l_ReaderT_bind___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__1___rarg), 8, 0); -return x_3; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg(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; -x_8 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -return x_8; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 7, 0); -return x_2; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__4(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: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_10 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_2); -lean::cnstr_set(x_11, 1, x_8); -lean::cnstr_set(x_11, 2, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_9); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_69; obj* x_70; -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_3, 1); -lean::inc(x_14); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_15 = x_3; -} else { - lean::dec_ref(x_3); - x_15 = lean::box(0); -} -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -x_69 = lean::apply_6(x_13, x_4, x_5, x_6, x_7, x_8, x_9); -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -lean::dec(x_69); -x_16 = x_70; -x_17 = x_71; -goto block_68; -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_72; -x_72 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -if (x_72 == 0) -{ -obj* x_73; uint8 x_74; -x_73 = lean::cnstr_get(x_69, 1); -lean::inc(x_73); -lean::dec(x_69); -x_74 = !lean::is_exclusive(x_70); -if (x_74 == 0) -{ -uint8 x_75; -x_75 = 0; -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_75); -x_16 = x_70; -x_17 = x_73; -goto block_68; -} -else -{ -obj* x_76; uint8 x_77; obj* x_78; -x_76 = lean::cnstr_get(x_70, 0); -lean::inc(x_76); -lean::dec(x_70); -x_77 = 0; -x_78 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_78, 0, x_76); -lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_77); -x_16 = x_78; -x_17 = x_73; -goto block_68; -} -} -else -{ -obj* x_79; uint8 x_80; -x_79 = lean::cnstr_get(x_69, 1); -lean::inc(x_79); -lean::dec(x_69); -x_80 = !lean::is_exclusive(x_70); -if (x_80 == 0) -{ -uint8 x_81; -x_81 = 1; -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_81); -x_16 = x_70; -x_17 = x_79; -goto block_68; -} -else -{ -obj* x_82; uint8 x_83; obj* x_84; -x_82 = lean::cnstr_get(x_70, 0); -lean::inc(x_82); -lean::dec(x_70); -x_83 = 1; -x_84 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_84, 0, x_82); -lean::cnstr_set_scalar(x_84, sizeof(void*)*1, x_83); -x_16 = x_84; -x_17 = x_79; -goto block_68; -} -} -} -else -{ -obj* x_85; obj* x_86; -x_85 = lean::cnstr_get(x_70, 0); -lean::inc(x_85); -x_86 = lean::cnstr_get(x_85, 3); -lean::inc(x_86); -if (lean::obj_tag(x_86) == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_69, 1); -lean::inc(x_87); -lean::dec(x_69); -x_88 = !lean::is_exclusive(x_70); -if (x_88 == 0) -{ -uint8 x_89; obj* x_90; uint8 x_91; -x_89 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -x_90 = lean::cnstr_get(x_70, 0); -lean::dec(x_90); -x_91 = !lean::is_exclusive(x_85); -if (x_91 == 0) -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_92 = lean::cnstr_get(x_85, 3); -lean::dec(x_92); -x_93 = lean::box(3); -lean::inc(x_2); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_2); -x_95 = l_List_reverse___rarg(x_94); -lean::inc(x_1); -x_96 = l_Lean_Parser_Syntax_mkNode(x_1, x_95); -x_97 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_85, 3, x_97); -if (x_89 == 0) -{ -uint8 x_98; -x_98 = 0; -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_98); -x_16 = x_70; -x_17 = x_87; -goto block_68; -} -else -{ -uint8 x_99; -x_99 = 1; -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_99); -x_16 = x_70; -x_17 = x_87; -goto block_68; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_100 = lean::cnstr_get(x_85, 0); -x_101 = lean::cnstr_get(x_85, 1); -x_102 = lean::cnstr_get(x_85, 2); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_85); -x_103 = lean::box(3); -lean::inc(x_2); -x_104 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_2); -x_105 = l_List_reverse___rarg(x_104); -lean::inc(x_1); -x_106 = l_Lean_Parser_Syntax_mkNode(x_1, x_105); -x_107 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_107, 0, x_106); -x_108 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_108, 0, x_100); -lean::cnstr_set(x_108, 1, x_101); -lean::cnstr_set(x_108, 2, x_102); -lean::cnstr_set(x_108, 3, x_107); -if (x_89 == 0) -{ -uint8 x_109; -x_109 = 0; -lean::cnstr_set(x_70, 0, x_108); -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_109); -x_16 = x_70; -x_17 = x_87; -goto block_68; -} -else -{ -uint8 x_110; -x_110 = 1; -lean::cnstr_set(x_70, 0, x_108); -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_110); -x_16 = x_70; -x_17 = x_87; -goto block_68; -} -} -} -else -{ -uint8 x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_111 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -lean::dec(x_70); -x_112 = lean::cnstr_get(x_85, 0); -lean::inc(x_112); -x_113 = lean::cnstr_get(x_85, 1); -lean::inc(x_113); -x_114 = lean::cnstr_get(x_85, 2); -lean::inc(x_114); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - lean::cnstr_release(x_85, 1); - lean::cnstr_release(x_85, 2); - lean::cnstr_release(x_85, 3); - x_115 = x_85; -} else { - lean::dec_ref(x_85); - x_115 = lean::box(0); -} -x_116 = lean::box(3); -lean::inc(x_2); -x_117 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_117, 0, x_116); -lean::cnstr_set(x_117, 1, x_2); -x_118 = l_List_reverse___rarg(x_117); -lean::inc(x_1); -x_119 = l_Lean_Parser_Syntax_mkNode(x_1, x_118); -x_120 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_120, 0, x_119); -if (lean::is_scalar(x_115)) { - x_121 = lean::alloc_cnstr(0, 4, 0); -} else { - x_121 = x_115; -} -lean::cnstr_set(x_121, 0, x_112); -lean::cnstr_set(x_121, 1, x_113); -lean::cnstr_set(x_121, 2, x_114); -lean::cnstr_set(x_121, 3, x_120); -if (x_111 == 0) -{ -uint8 x_122; obj* x_123; -x_122 = 0; -x_123 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_123, 0, x_121); -lean::cnstr_set_scalar(x_123, sizeof(void*)*1, x_122); -x_16 = x_123; -x_17 = x_87; -goto block_68; -} -else -{ -uint8 x_124; obj* x_125; -x_124 = 1; -x_125 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_125, 0, x_121); -lean::cnstr_set_scalar(x_125, sizeof(void*)*1, x_124); -x_16 = x_125; -x_17 = x_87; -goto block_68; -} -} -} -else -{ -obj* x_126; uint8 x_127; -x_126 = lean::cnstr_get(x_69, 1); -lean::inc(x_126); -lean::dec(x_69); -x_127 = !lean::is_exclusive(x_70); -if (x_127 == 0) -{ -uint8 x_128; obj* x_129; uint8 x_130; -x_128 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -x_129 = lean::cnstr_get(x_70, 0); -lean::dec(x_129); -x_130 = !lean::is_exclusive(x_85); -if (x_130 == 0) -{ -obj* x_131; uint8 x_132; -x_131 = lean::cnstr_get(x_85, 3); -lean::dec(x_131); -x_132 = !lean::is_exclusive(x_86); -if (x_132 == 0) -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; -x_133 = lean::cnstr_get(x_86, 0); -lean::inc(x_2); -x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_133); -lean::cnstr_set(x_134, 1, x_2); -x_135 = l_List_reverse___rarg(x_134); -lean::inc(x_1); -x_136 = l_Lean_Parser_Syntax_mkNode(x_1, x_135); -lean::cnstr_set(x_86, 0, x_136); -if (x_128 == 0) -{ -uint8 x_137; -x_137 = 0; -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_137); -x_16 = x_70; -x_17 = x_126; -goto block_68; -} -else -{ -uint8 x_138; -x_138 = 1; -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_138); -x_16 = x_70; -x_17 = x_126; -goto block_68; -} -} -else -{ -obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; -x_139 = lean::cnstr_get(x_86, 0); -lean::inc(x_139); -lean::dec(x_86); -lean::inc(x_2); -x_140 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_140, 0, x_139); -lean::cnstr_set(x_140, 1, x_2); -x_141 = l_List_reverse___rarg(x_140); -lean::inc(x_1); -x_142 = l_Lean_Parser_Syntax_mkNode(x_1, x_141); -x_143 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_143, 0, x_142); -lean::cnstr_set(x_85, 3, x_143); -if (x_128 == 0) -{ -uint8 x_144; -x_144 = 0; -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_144); -x_16 = x_70; -x_17 = x_126; -goto block_68; -} -else -{ -uint8 x_145; -x_145 = 1; -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_145); -x_16 = x_70; -x_17 = x_126; -goto block_68; -} -} -} -else -{ -obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; -x_146 = lean::cnstr_get(x_85, 0); -x_147 = lean::cnstr_get(x_85, 1); -x_148 = lean::cnstr_get(x_85, 2); -lean::inc(x_148); -lean::inc(x_147); -lean::inc(x_146); -lean::dec(x_85); -x_149 = lean::cnstr_get(x_86, 0); -lean::inc(x_149); -if (lean::is_exclusive(x_86)) { - lean::cnstr_release(x_86, 0); - x_150 = x_86; -} else { - lean::dec_ref(x_86); - x_150 = lean::box(0); -} -lean::inc(x_2); -x_151 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_151, 0, x_149); -lean::cnstr_set(x_151, 1, x_2); -x_152 = l_List_reverse___rarg(x_151); -lean::inc(x_1); -x_153 = l_Lean_Parser_Syntax_mkNode(x_1, x_152); -if (lean::is_scalar(x_150)) { - x_154 = lean::alloc_cnstr(1, 1, 0); -} else { - x_154 = x_150; -} -lean::cnstr_set(x_154, 0, x_153); -x_155 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_155, 0, x_146); -lean::cnstr_set(x_155, 1, x_147); -lean::cnstr_set(x_155, 2, x_148); -lean::cnstr_set(x_155, 3, x_154); -if (x_128 == 0) -{ -uint8 x_156; -x_156 = 0; -lean::cnstr_set(x_70, 0, x_155); -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_156); -x_16 = x_70; -x_17 = x_126; -goto block_68; -} -else -{ -uint8 x_157; -x_157 = 1; -lean::cnstr_set(x_70, 0, x_155); -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_157); -x_16 = x_70; -x_17 = x_126; -goto block_68; -} -} -} -else -{ -uint8 x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; -x_158 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -lean::dec(x_70); -x_159 = lean::cnstr_get(x_85, 0); -lean::inc(x_159); -x_160 = lean::cnstr_get(x_85, 1); -lean::inc(x_160); -x_161 = lean::cnstr_get(x_85, 2); -lean::inc(x_161); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - lean::cnstr_release(x_85, 1); - lean::cnstr_release(x_85, 2); - lean::cnstr_release(x_85, 3); - x_162 = x_85; -} else { - lean::dec_ref(x_85); - x_162 = lean::box(0); -} -x_163 = lean::cnstr_get(x_86, 0); -lean::inc(x_163); -if (lean::is_exclusive(x_86)) { - lean::cnstr_release(x_86, 0); - x_164 = x_86; -} else { - lean::dec_ref(x_86); - x_164 = lean::box(0); -} -lean::inc(x_2); -x_165 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_165, 0, x_163); -lean::cnstr_set(x_165, 1, x_2); -x_166 = l_List_reverse___rarg(x_165); -lean::inc(x_1); -x_167 = l_Lean_Parser_Syntax_mkNode(x_1, x_166); -if (lean::is_scalar(x_164)) { - x_168 = lean::alloc_cnstr(1, 1, 0); -} else { - x_168 = x_164; -} -lean::cnstr_set(x_168, 0, x_167); -if (lean::is_scalar(x_162)) { - x_169 = lean::alloc_cnstr(0, 4, 0); -} else { - x_169 = x_162; -} -lean::cnstr_set(x_169, 0, x_159); -lean::cnstr_set(x_169, 1, x_160); -lean::cnstr_set(x_169, 2, x_161); -lean::cnstr_set(x_169, 3, x_168); -if (x_158 == 0) -{ -uint8 x_170; obj* x_171; -x_170 = 0; -x_171 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_171, 0, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*1, x_170); -x_16 = x_171; -x_17 = x_126; -goto block_68; -} -else -{ -uint8 x_172; obj* x_173; -x_172 = 1; -x_173 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_173, 0, x_169); -lean::cnstr_set_scalar(x_173, sizeof(void*)*1, x_172); -x_16 = x_173; -x_17 = x_126; -goto block_68; -} -} -} -} -} -block_68: -{ -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_16); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_19 = lean::cnstr_get(x_16, 0); -x_20 = lean::cnstr_get(x_16, 2); -if (lean::is_scalar(x_15)) { - x_21 = lean::alloc_cnstr(1, 2, 0); -} else { - x_21 = x_15; -} -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_2); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_16, 2, x_22); -lean::cnstr_set(x_16, 0, x_21); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_16); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; uint8 x_28; -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -x_25 = lean::cnstr_get(x_23, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_23, 2); -lean::inc(x_26); -lean::dec(x_23); -x_27 = l_List_mfoldl___main___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__4(x_1, x_24, x_14, x_4, x_5, x_6, x_7, x_25, x_17); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_27, 0); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_29); -lean::cnstr_set(x_27, 0, x_30); -return x_27; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_27, 0); -x_32 = lean::cnstr_get(x_27, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_27); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_31); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -return x_34; -} -} -else -{ -uint8 x_35; -lean::dec(x_14); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_35 = !lean::is_exclusive(x_23); -if (x_35 == 0) -{ -obj* x_36; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_23); -lean::cnstr_set(x_36, 1, x_17); -return x_36; -} -else -{ -obj* x_37; uint8 x_38; obj* x_39; obj* x_40; -x_37 = lean::cnstr_get(x_23, 0); -x_38 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -lean::inc(x_37); -lean::dec(x_23); -x_39 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_38); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_17); -return x_40; -} -} -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_41 = lean::cnstr_get(x_16, 0); -x_42 = lean::cnstr_get(x_16, 1); -x_43 = lean::cnstr_get(x_16, 2); -lean::inc(x_43); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_16); -if (lean::is_scalar(x_15)) { - x_44 = lean::alloc_cnstr(1, 2, 0); -} else { - x_44 = x_15; -} -lean::cnstr_set(x_44, 0, x_41); -lean::cnstr_set(x_44, 1, x_2); -x_45 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_46 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_46, 0, x_44); -lean::cnstr_set(x_46, 1, x_42); -lean::cnstr_set(x_46, 2, x_45); -x_47 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_46); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_47, 2); -lean::inc(x_50); -lean::dec(x_47); -x_51 = l_List_mfoldl___main___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__4(x_1, x_48, x_14, x_4, x_5, x_6, x_7, x_49, x_17); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_51, 1); -lean::inc(x_53); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - lean::cnstr_release(x_51, 1); - x_54 = x_51; -} else { - lean::dec_ref(x_51); - x_54 = lean::box(0); -} -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_52); -if (lean::is_scalar(x_54)) { - x_56 = lean::alloc_cnstr(0, 2, 0); -} else { - x_56 = x_54; -} -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_53); -return x_56; -} -else -{ -obj* x_57; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; -lean::dec(x_14); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_57 = lean::cnstr_get(x_47, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get_scalar(x_47, sizeof(void*)*1); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - x_59 = x_47; -} else { - lean::dec_ref(x_47); - x_59 = lean::box(0); -} -if (lean::is_scalar(x_59)) { - x_60 = lean::alloc_cnstr(1, 1, 1); -} else { - x_60 = x_59; -} -lean::cnstr_set(x_60, 0, x_57); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_58); -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_17); -return x_61; -} -} -} -else -{ -uint8 x_62; -lean::dec(x_15); -lean::dec(x_14); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_62 = !lean::is_exclusive(x_16); -if (x_62 == 0) -{ -obj* x_63; -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_16); -lean::cnstr_set(x_63, 1, x_17); -return x_63; -} -else -{ -obj* x_64; uint8 x_65; obj* x_66; obj* x_67; -x_64 = lean::cnstr_get(x_16, 0); -x_65 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); -lean::inc(x_64); -lean::dec(x_16); -x_66 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_66, 0, x_64); -lean::cnstr_set_scalar(x_66, sizeof(void*)*1, x_65); -x_67 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_17); -return x_67; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(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_9; obj* x_10; obj* x_11; -x_9 = lean::box(0); -lean::inc(x_1); -x_10 = l_List_mfoldl___main___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__4(x_1, x_9, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; uint8 x_14; -x_13 = lean::cnstr_get(x_10, 0); -lean::dec(x_13); -x_14 = !lean::is_exclusive(x_11); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = lean::cnstr_get(x_11, 0); -x_16 = lean::cnstr_get(x_11, 2); -x_17 = l_List_reverse___rarg(x_15); -x_18 = l_Lean_Parser_Syntax_mkNode(x_1, x_17); -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_11, 2, x_19); -lean::cnstr_set(x_11, 0, x_18); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_11); -lean::cnstr_set(x_10, 0, x_20); -return x_10; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_21 = lean::cnstr_get(x_11, 0); -x_22 = lean::cnstr_get(x_11, 1); -x_23 = lean::cnstr_get(x_11, 2); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_11); -x_24 = l_List_reverse___rarg(x_21); -x_25 = l_Lean_Parser_Syntax_mkNode(x_1, x_24); -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_27 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_22); -lean::cnstr_set(x_27, 2, x_26); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_27); -lean::cnstr_set(x_10, 0, x_28); -return x_10; -} -} -else -{ -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; -x_29 = lean::cnstr_get(x_10, 1); -lean::inc(x_29); -lean::dec(x_10); -x_30 = lean::cnstr_get(x_11, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_11, 1); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_11, 2); -lean::inc(x_32); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - lean::cnstr_release(x_11, 2); - x_33 = x_11; -} else { - lean::dec_ref(x_11); - x_33 = lean::box(0); -} -x_34 = l_List_reverse___rarg(x_30); -x_35 = l_Lean_Parser_Syntax_mkNode(x_1, x_34); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_33)) { - x_37 = lean::alloc_cnstr(0, 3, 0); -} else { - x_37 = x_33; -} -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_31); -lean::cnstr_set(x_37, 2, x_36); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_29); -return x_39; -} -} -else -{ -uint8 x_40; -lean::dec(x_1); -x_40 = !lean::is_exclusive(x_10); -if (x_40 == 0) -{ -obj* x_41; uint8 x_42; -x_41 = lean::cnstr_get(x_10, 0); -lean::dec(x_41); -x_42 = !lean::is_exclusive(x_11); -if (x_42 == 0) -{ -return x_10; -} -else -{ -obj* x_43; uint8 x_44; obj* x_45; -x_43 = lean::cnstr_get(x_11, 0); -x_44 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_43); -lean::dec(x_11); -x_45 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set_scalar(x_45, sizeof(void*)*1, x_44); -lean::cnstr_set(x_10, 0, x_45); -return x_10; -} -} -else -{ -obj* x_46; obj* x_47; uint8 x_48; obj* x_49; obj* x_50; obj* x_51; -x_46 = lean::cnstr_get(x_10, 1); -lean::inc(x_46); -lean::dec(x_10); -x_47 = lean::cnstr_get(x_11, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_49 = x_11; -} else { - lean::dec_ref(x_11); - x_49 = lean::box(0); -} -if (lean::is_scalar(x_49)) { - x_50 = lean::alloc_cnstr(1, 1, 1); -} else { - x_50 = x_49; -} -lean::cnstr_set(x_50, 0, x_47); -lean::cnstr_set_scalar(x_50, sizeof(void*)*1, x_48); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_46); -return x_51; -} -} -} -} -obj* _init_l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = l_Lean_Parser_Level_leading_Parser_Lean_Parser_HasTokens; -x_2 = l_Lean_Parser_Level_trailing_Parser_Lean_Parser_HasTokens; -x_3 = l_List_append___rarg(x_1, x_2); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = lean::box(0); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_5); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_Lean_Parser_HasTokens; -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_6); -lean::dec(x_6); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -return x_10; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(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; -x_8 = l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_2); -return x_8; -} -} -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__1(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; -x_8 = l_Lean_Parser_Term_sort; -x_9 = l_Lean_Parser_Syntax_isOfKind___main(x_8, x_1); -if (x_9 == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(x_6, x_7); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::box(0); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_6); -lean::cnstr_set(x_13, 2, x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_7); -return x_14; -} -} -} -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__2(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; -x_6 = l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__2; -x_7 = l_Lean_Parser_levelParser_run_Lean_Parser_HasView___closed__3; -x_8 = l_Lean_Parser_prattParser___at_Lean_Parser_levelParser_run___spec__1(x_6, x_7, x_1, x_2, x_4, x_5); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__1___boxed), 7, 0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__1___rarg), 8, 2); -lean::closure_set(x_3, 0, x_1); -lean::closure_set(x_3, 1, x_2); -x_4 = l_Lean_Parser_maxPrec; -x_5 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_Parser), 5, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__2___boxed), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 7, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_10); -x_12 = l_Lean_Parser_Term_sortApp; -lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_13, 0, x_12); -lean::closure_set(x_13, 1, x_11); -x_14 = l_Lean_Parser_TrailingTermParserM_Monad; -x_15 = l_Lean_Parser_TrailingTermParserM_MonadExcept; -x_16 = l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec; -x_17 = l_Lean_Parser_TrailingTermParserM_Alternative; -x_18 = l_Lean_Parser_Term_sortApp_HasView; -x_19 = l_Lean_Parser_Combinators_node_view___rarg(x_14, x_15, x_16, x_17, x_12, x_11, x_18); -lean::dec(x_11); -x_20 = l_Lean_Parser_Combinators_seqRight_view___rarg(x_17, lean::box(0), lean::box(0), x_3, x_13, x_19); -lean::dec(x_13); -lean::dec(x_3); -return x_20; -} -} -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__1___boxed(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; -x_8 = l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_sortApp_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = l_Lean_Parser_maxPrec; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Level_Parser), 5, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView___lambda__2___boxed), 5, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 7, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 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); -return x_9; -} -} -obj* l_Lean_Parser_Term_sortApp_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_1); -x_7 = l_Lean_Parser_Term_getLeading(x_1, x_2, x_3, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; uint8 x_12; -x_10 = lean::cnstr_get(x_7, 1); -x_11 = lean::cnstr_get(x_7, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_8); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; uint8 x_17; -x_13 = lean::cnstr_get(x_8, 0); -x_14 = lean::cnstr_get(x_8, 1); -x_15 = lean::cnstr_get(x_8, 2); -x_16 = l_Lean_Parser_Term_sort; -x_17 = l_Lean_Parser_Syntax_isOfKind___main(x_16, x_13); -lean::dec(x_13); -if (x_17 == 0) -{ -obj* x_18; uint8 x_19; -lean::free_heap_obj(x_8); -lean::free_heap_obj(x_7); -x_18 = l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(x_14, x_10); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = lean::cnstr_get(x_18, 1); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_20); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; uint8 x_28; -lean::free_heap_obj(x_18); -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_22, 2); -lean::inc(x_24); -lean::dec(x_22); -x_25 = l_Lean_Parser_Term_sortApp; -x_26 = l_Lean_Parser_Term_sortApp_Parser___closed__1; -x_27 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_25, x_26, x_1, x_2, x_3, x_4, x_23, x_21); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_27, 0); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_29); -lean::cnstr_set(x_27, 0, x_30); -return x_27; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_27, 0); -x_32 = lean::cnstr_get(x_27, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_27); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_31); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -return x_34; -} -} -else -{ -uint8 x_35; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_35 = !lean::is_exclusive(x_22); -if (x_35 == 0) -{ -lean::cnstr_set(x_18, 0, x_22); -return x_18; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; -x_36 = lean::cnstr_get(x_22, 0); -x_37 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_22); -x_38 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_37); -lean::cnstr_set(x_18, 0, x_38); -return x_18; -} -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; -x_39 = lean::cnstr_get(x_18, 0); -x_40 = lean::cnstr_get(x_18, 1); -lean::inc(x_40); -lean::inc(x_39); -lean::dec(x_18); -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_39); -if (lean::obj_tag(x_41) == 0) -{ -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; -x_42 = lean::cnstr_get(x_41, 1); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 2); -lean::inc(x_43); -lean::dec(x_41); -x_44 = l_Lean_Parser_Term_sortApp; -x_45 = l_Lean_Parser_Term_sortApp_Parser___closed__1; -x_46 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_44, x_45, x_1, x_2, x_3, x_4, x_42, x_40); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - x_49 = x_46; -} else { - lean::dec_ref(x_46); - x_49 = lean::box(0); -} -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_47); -if (lean::is_scalar(x_49)) { - x_51 = lean::alloc_cnstr(0, 2, 0); -} else { - x_51 = x_49; -} -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_48); -return x_51; -} -else -{ -obj* x_52; uint8 x_53; obj* x_54; obj* x_55; obj* x_56; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_52 = lean::cnstr_get(x_41, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get_scalar(x_41, sizeof(void*)*1); -if (lean::is_exclusive(x_41)) { - lean::cnstr_release(x_41, 0); - x_54 = x_41; -} else { - lean::dec_ref(x_41); - x_54 = lean::box(0); -} -if (lean::is_scalar(x_54)) { - x_55 = lean::alloc_cnstr(1, 1, 1); -} else { - x_55 = x_54; -} -lean::cnstr_set(x_55, 0, x_52); -lean::cnstr_set_scalar(x_55, sizeof(void*)*1, x_53); -x_56 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_40); -return x_56; -} -} -} -else -{ -obj* x_57; obj* x_58; obj* x_59; -x_57 = lean::box(0); -x_58 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_58); -lean::cnstr_set(x_8, 0, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_8); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; -lean::free_heap_obj(x_7); -x_60 = lean::cnstr_get(x_59, 1); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_59, 2); -lean::inc(x_61); -lean::dec(x_59); -x_62 = l_Lean_Parser_Term_sortApp; -x_63 = l_Lean_Parser_Term_sortApp_Parser___closed__1; -x_64 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_62, x_63, x_1, x_2, x_3, x_4, x_60, x_10); -x_65 = !lean::is_exclusive(x_64); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; -x_66 = lean::cnstr_get(x_64, 0); -x_67 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_61, x_66); -lean::cnstr_set(x_64, 0, x_67); -return x_64; -} -else -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_68 = lean::cnstr_get(x_64, 0); -x_69 = lean::cnstr_get(x_64, 1); -lean::inc(x_69); -lean::inc(x_68); -lean::dec(x_64); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_61, x_68); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_69); -return x_71; -} -} -else -{ -uint8 x_72; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_72 = !lean::is_exclusive(x_59); -if (x_72 == 0) -{ -lean::cnstr_set(x_7, 0, x_59); -return x_7; -} -else -{ -obj* x_73; uint8 x_74; obj* x_75; -x_73 = lean::cnstr_get(x_59, 0); -x_74 = lean::cnstr_get_scalar(x_59, sizeof(void*)*1); -lean::inc(x_73); -lean::dec(x_59); -x_75 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_75, 0, x_73); -lean::cnstr_set_scalar(x_75, sizeof(void*)*1, x_74); -lean::cnstr_set(x_7, 0, x_75); -return x_7; -} -} -} -} -else -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; uint8 x_80; -x_76 = lean::cnstr_get(x_8, 0); -x_77 = lean::cnstr_get(x_8, 1); -x_78 = lean::cnstr_get(x_8, 2); -lean::inc(x_78); -lean::inc(x_77); -lean::inc(x_76); -lean::dec(x_8); -x_79 = l_Lean_Parser_Term_sort; -x_80 = l_Lean_Parser_Syntax_isOfKind___main(x_79, x_76); -lean::dec(x_76); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -lean::free_heap_obj(x_7); -x_81 = l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(x_77, x_10); -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_81, 1); -lean::inc(x_83); -if (lean::is_exclusive(x_81)) { - lean::cnstr_release(x_81, 0); - lean::cnstr_release(x_81, 1); - x_84 = x_81; -} else { - lean::dec_ref(x_81); - x_84 = lean::box(0); -} -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_78, x_82); -if (lean::obj_tag(x_85) == 0) -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -lean::dec(x_84); -x_86 = lean::cnstr_get(x_85, 1); -lean::inc(x_86); -x_87 = lean::cnstr_get(x_85, 2); -lean::inc(x_87); -lean::dec(x_85); -x_88 = l_Lean_Parser_Term_sortApp; -x_89 = l_Lean_Parser_Term_sortApp_Parser___closed__1; -x_90 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_88, x_89, x_1, x_2, x_3, x_4, x_86, x_83); -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_90, 1); -lean::inc(x_92); -if (lean::is_exclusive(x_90)) { - lean::cnstr_release(x_90, 0); - lean::cnstr_release(x_90, 1); - x_93 = x_90; -} else { - lean::dec_ref(x_90); - x_93 = lean::box(0); -} -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_91); -if (lean::is_scalar(x_93)) { - x_95 = lean::alloc_cnstr(0, 2, 0); -} else { - x_95 = x_93; -} -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_92); -return x_95; -} -else -{ -obj* x_96; uint8 x_97; obj* x_98; obj* x_99; obj* x_100; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_96 = lean::cnstr_get(x_85, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get_scalar(x_85, sizeof(void*)*1); -if (lean::is_exclusive(x_85)) { - lean::cnstr_release(x_85, 0); - x_98 = x_85; -} else { - lean::dec_ref(x_85); - x_98 = lean::box(0); -} -if (lean::is_scalar(x_98)) { - x_99 = lean::alloc_cnstr(1, 1, 1); -} else { - x_99 = x_98; -} -lean::cnstr_set(x_99, 0, x_96); -lean::cnstr_set_scalar(x_99, sizeof(void*)*1, x_97); -if (lean::is_scalar(x_84)) { - x_100 = lean::alloc_cnstr(0, 2, 0); -} else { - x_100 = x_84; -} -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_83); -return x_100; -} -} -else -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_101 = lean::box(0); -x_102 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_103 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_103, 0, x_101); -lean::cnstr_set(x_103, 1, x_77); -lean::cnstr_set(x_103, 2, x_102); -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_78, x_103); -if (lean::obj_tag(x_104) == 0) -{ -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; -lean::free_heap_obj(x_7); -x_105 = lean::cnstr_get(x_104, 1); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_104, 2); -lean::inc(x_106); -lean::dec(x_104); -x_107 = l_Lean_Parser_Term_sortApp; -x_108 = l_Lean_Parser_Term_sortApp_Parser___closed__1; -x_109 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_107, x_108, x_1, x_2, x_3, x_4, x_105, x_10); -x_110 = lean::cnstr_get(x_109, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_109, 1); -lean::inc(x_111); -if (lean::is_exclusive(x_109)) { - lean::cnstr_release(x_109, 0); - lean::cnstr_release(x_109, 1); - x_112 = x_109; -} else { - lean::dec_ref(x_109); - x_112 = lean::box(0); -} -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_106, x_110); -if (lean::is_scalar(x_112)) { - x_114 = lean::alloc_cnstr(0, 2, 0); -} else { - x_114 = x_112; -} -lean::cnstr_set(x_114, 0, x_113); -lean::cnstr_set(x_114, 1, x_111); -return x_114; -} -else -{ -obj* x_115; uint8 x_116; obj* x_117; obj* x_118; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_115 = lean::cnstr_get(x_104, 0); -lean::inc(x_115); -x_116 = lean::cnstr_get_scalar(x_104, sizeof(void*)*1); -if (lean::is_exclusive(x_104)) { - lean::cnstr_release(x_104, 0); - x_117 = x_104; -} else { - lean::dec_ref(x_104); - x_117 = lean::box(0); -} -if (lean::is_scalar(x_117)) { - x_118 = lean::alloc_cnstr(1, 1, 1); -} else { - x_118 = x_117; -} -lean::cnstr_set(x_118, 0, x_115); -lean::cnstr_set_scalar(x_118, sizeof(void*)*1, x_116); -lean::cnstr_set(x_7, 0, x_118); -return x_7; -} -} -} -} -else -{ -obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; uint8 x_125; -x_119 = lean::cnstr_get(x_7, 1); -lean::inc(x_119); -lean::dec(x_7); -x_120 = lean::cnstr_get(x_8, 0); -lean::inc(x_120); -x_121 = lean::cnstr_get(x_8, 1); -lean::inc(x_121); -x_122 = lean::cnstr_get(x_8, 2); -lean::inc(x_122); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_123 = x_8; -} else { - lean::dec_ref(x_8); - x_123 = lean::box(0); -} -x_124 = l_Lean_Parser_Term_sort; -x_125 = l_Lean_Parser_Syntax_isOfKind___main(x_124, x_120); -lean::dec(x_120); -if (x_125 == 0) -{ -obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -lean::dec(x_123); -x_126 = l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(x_121, x_119); -x_127 = lean::cnstr_get(x_126, 0); -lean::inc(x_127); -x_128 = lean::cnstr_get(x_126, 1); -lean::inc(x_128); -if (lean::is_exclusive(x_126)) { - lean::cnstr_release(x_126, 0); - lean::cnstr_release(x_126, 1); - x_129 = x_126; -} else { - lean::dec_ref(x_126); - x_129 = lean::box(0); -} -x_130 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_122, x_127); -if (lean::obj_tag(x_130) == 0) -{ -obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; -lean::dec(x_129); -x_131 = lean::cnstr_get(x_130, 1); -lean::inc(x_131); -x_132 = lean::cnstr_get(x_130, 2); -lean::inc(x_132); -lean::dec(x_130); -x_133 = l_Lean_Parser_Term_sortApp; -x_134 = l_Lean_Parser_Term_sortApp_Parser___closed__1; -x_135 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_133, x_134, x_1, x_2, x_3, x_4, x_131, x_128); -x_136 = lean::cnstr_get(x_135, 0); -lean::inc(x_136); -x_137 = lean::cnstr_get(x_135, 1); -lean::inc(x_137); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - lean::cnstr_release(x_135, 1); - x_138 = x_135; -} else { - lean::dec_ref(x_135); - x_138 = lean::box(0); -} -x_139 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_132, x_136); -if (lean::is_scalar(x_138)) { - x_140 = lean::alloc_cnstr(0, 2, 0); -} else { - x_140 = x_138; -} -lean::cnstr_set(x_140, 0, x_139); -lean::cnstr_set(x_140, 1, x_137); -return x_140; -} -else -{ -obj* x_141; uint8 x_142; obj* x_143; obj* x_144; obj* x_145; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_141 = lean::cnstr_get(x_130, 0); -lean::inc(x_141); -x_142 = lean::cnstr_get_scalar(x_130, sizeof(void*)*1); -if (lean::is_exclusive(x_130)) { - lean::cnstr_release(x_130, 0); - x_143 = x_130; -} else { - lean::dec_ref(x_130); - x_143 = lean::box(0); -} -if (lean::is_scalar(x_143)) { - x_144 = lean::alloc_cnstr(1, 1, 1); -} else { - x_144 = x_143; -} -lean::cnstr_set(x_144, 0, x_141); -lean::cnstr_set_scalar(x_144, sizeof(void*)*1, x_142); -if (lean::is_scalar(x_129)) { - x_145 = lean::alloc_cnstr(0, 2, 0); -} else { - x_145 = x_129; -} -lean::cnstr_set(x_145, 0, x_144); -lean::cnstr_set(x_145, 1, x_128); -return x_145; -} -} -else -{ -obj* x_146; obj* x_147; obj* x_148; obj* x_149; -x_146 = lean::box(0); -x_147 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_123)) { - x_148 = lean::alloc_cnstr(0, 3, 0); -} else { - x_148 = x_123; -} -lean::cnstr_set(x_148, 0, x_146); -lean::cnstr_set(x_148, 1, x_121); -lean::cnstr_set(x_148, 2, x_147); -x_149 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_122, x_148); -if (lean::obj_tag(x_149) == 0) -{ -obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; -x_150 = lean::cnstr_get(x_149, 1); -lean::inc(x_150); -x_151 = lean::cnstr_get(x_149, 2); -lean::inc(x_151); -lean::dec(x_149); -x_152 = l_Lean_Parser_Term_sortApp; -x_153 = l_Lean_Parser_Term_sortApp_Parser___closed__1; -x_154 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_152, x_153, x_1, x_2, x_3, x_4, x_150, x_119); -x_155 = lean::cnstr_get(x_154, 0); -lean::inc(x_155); -x_156 = lean::cnstr_get(x_154, 1); -lean::inc(x_156); -if (lean::is_exclusive(x_154)) { - lean::cnstr_release(x_154, 0); - lean::cnstr_release(x_154, 1); - x_157 = x_154; -} else { - lean::dec_ref(x_154); - x_157 = lean::box(0); -} -x_158 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_151, x_155); -if (lean::is_scalar(x_157)) { - x_159 = lean::alloc_cnstr(0, 2, 0); -} else { - x_159 = x_157; -} -lean::cnstr_set(x_159, 0, x_158); -lean::cnstr_set(x_159, 1, x_156); -return x_159; -} -else -{ -obj* x_160; uint8 x_161; obj* x_162; obj* x_163; obj* x_164; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_160 = lean::cnstr_get(x_149, 0); -lean::inc(x_160); -x_161 = lean::cnstr_get_scalar(x_149, sizeof(void*)*1); -if (lean::is_exclusive(x_149)) { - lean::cnstr_release(x_149, 0); - x_162 = x_149; -} else { - lean::dec_ref(x_149); - x_162 = lean::box(0); -} -if (lean::is_scalar(x_162)) { - x_163 = lean::alloc_cnstr(1, 1, 1); -} else { - x_163 = x_162; -} -lean::cnstr_set(x_163, 0, x_160); -lean::cnstr_set_scalar(x_163, sizeof(void*)*1, x_161); -x_164 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_164, 0, x_163); -lean::cnstr_set(x_164, 1, x_119); -return x_164; -} -} -} -} -else -{ -uint8 x_165; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_165 = !lean::is_exclusive(x_7); -if (x_165 == 0) -{ -obj* x_166; uint8 x_167; -x_166 = lean::cnstr_get(x_7, 0); -lean::dec(x_166); -x_167 = !lean::is_exclusive(x_8); -if (x_167 == 0) -{ -return x_7; -} -else -{ -obj* x_168; uint8 x_169; obj* x_170; -x_168 = lean::cnstr_get(x_8, 0); -x_169 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_168); -lean::dec(x_8); -x_170 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_170, 0, x_168); -lean::cnstr_set_scalar(x_170, sizeof(void*)*1, x_169); -lean::cnstr_set(x_7, 0, x_170); -return x_7; -} -} -else -{ -obj* x_171; obj* x_172; uint8 x_173; obj* x_174; obj* x_175; obj* x_176; -x_171 = lean::cnstr_get(x_7, 1); -lean::inc(x_171); -lean::dec(x_7); -x_172 = lean::cnstr_get(x_8, 0); -lean::inc(x_172); -x_173 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_174 = x_8; -} else { - lean::dec_ref(x_8); - x_174 = lean::box(0); -} -if (lean::is_scalar(x_174)) { - x_175 = lean::alloc_cnstr(1, 1, 1); -} else { - x_175 = x_174; -} -lean::cnstr_set(x_175, 0, x_172); -lean::cnstr_set_scalar(x_175, sizeof(void*)*1, x_173); -x_176 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_176, 0, x_175); -lean::cnstr_set(x_176, 1, x_171); -return x_176; -} -} -} -} -obj* _init_l_Lean_Parser_Term_app() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("app"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_app_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -lean::inc(x_2); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_5); -x_7 = l_Lean_Parser_Term_app; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_app_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_app_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_app_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_Term_app_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -lean::dec(x_5); -x_9 = lean::box(3); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_5, 0); -lean::inc(x_11); -lean::dec(x_5); -x_12 = lean::cnstr_get(x_7, 0); -lean::inc(x_12); -lean::dec(x_7); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_app_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_app_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_app_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_app_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_app_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_app_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_app_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_app_Parser_Lean_Parser_HasTokens() { -_start: -{ -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_1 = l_Lean_Parser_maxPrec; -x_2 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_1); -x_3 = l_Lean_Parser_tokens___rarg(x_2); -lean::dec(x_2); -x_4 = lean::box(0); -x_5 = l_Lean_Parser_List_cons_tokens___rarg(x_3, x_4); -lean::dec(x_3); -x_6 = l_Lean_Parser_Term_Lean_Parser_HasTokens; -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_6, x_5); -lean::dec(x_5); -x_8 = l_Lean_Parser_tokens___rarg(x_7); -lean::dec(x_7); -return x_8; -} -} -obj* l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_maxPrec; -x_8 = l_Lean_Parser_Term_Parser(x_7, x_2, x_3, x_4, x_5, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView___lambda__1___boxed), 6, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 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 = l_Lean_Parser_TrailingTermParserM_Monad; -x_7 = l_Lean_Parser_TrailingTermParserM_MonadExcept; -x_8 = l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec; -x_9 = l_Lean_Parser_TrailingTermParserM_Alternative; -x_10 = l_Lean_Parser_Term_app; -x_11 = l_Lean_Parser_Term_app_HasView; -x_12 = l_Lean_Parser_Combinators_node_view___rarg(x_6, x_7, x_8, x_9, x_10, x_5, x_11); -lean::dec(x_5); -return x_12; -} -} -obj* l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_1); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_app_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView___lambda__1___boxed), 6, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 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); -return x_5; -} -} -obj* l_Lean_Parser_Term_app_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l_Lean_Parser_Term_app; -x_8 = l_Lean_Parser_Term_app_Parser___closed__1; -x_9 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_7, x_8, x_1, x_2, x_3, x_4, x_5, x_6); -return x_9; -} -} -obj* l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_2, 1); -x_5 = lean::box(0); -lean::cnstr_set(x_2, 1, x_5); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_2); -x_7 = l_Lean_Parser_Term_app; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -x_1 = x_8; -x_2 = x_4; -goto _start; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_10 = lean::cnstr_get(x_2, 0); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_2); -x_12 = lean::box(0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_1); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_Lean_Parser_Term_app; -x_16 = l_Lean_Parser_Syntax_mkNode(x_15, x_14); -x_1 = x_16; -x_2 = x_11; -goto _start; -} -} -} -} -obj* l_Lean_Parser_Term_mkApp(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_List_foldl___main___at_Lean_Parser_Term_mkApp___spec__1(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_arrow() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("arrow"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_arrow_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -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; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::box(0); -lean::inc(x_4); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -lean::inc(x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_3); -lean::cnstr_set(x_7, 1, x_6); -lean::inc(x_2); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_2); -lean::cnstr_set(x_8, 1, x_7); -x_9 = l_Lean_Parser_Term_arrow; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_Term_arrow_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(3); -x_2 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -lean::cnstr_set(x_2, 2, x_1); -return x_2; -} -} -obj* l_Lean_Parser_Term_arrow_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_arrow_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_Term_arrow_HasView_x27___elambda__2___closed__1; -return x_6; -} -else -{ -obj* x_7; -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_5, 0); -lean::inc(x_8); -lean::dec(x_5); -x_9 = lean::box(3); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_9); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_7, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_5, 0); -lean::inc(x_12); -lean::dec(x_5); -x_13 = lean::cnstr_get(x_7, 0); -lean::inc(x_13); -lean::dec(x_7); -x_14 = lean::box(3); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -lean::cnstr_set(x_15, 2, x_14); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_5, 0); -lean::inc(x_16); -lean::dec(x_5); -x_17 = lean::cnstr_get(x_7, 0); -lean::inc(x_17); -lean::dec(x_7); -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); -lean::cnstr_set(x_19, 2, x_18); -return x_19; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_arrow_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_arrow_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_arrow_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Term_arrow_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Term_arrow_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_Term_arrow_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_arrow_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens___spec__1(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: -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_10 = l_String_trim(x_1); -lean::inc(x_10); -x_11 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_11, 0, x_10); -lean::inc(x_3); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_12, 0, x_10); -lean::closure_set(x_12, 1, x_3); -lean::closure_set(x_12, 2, x_11); -x_13 = l_String_trim(x_2); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_3); -lean::closure_set(x_15, 2, x_14); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_12); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__2(x_18, x_6, x_8, x_9); -return x_19; -} -} -obj* _init_l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens() { -_start: -{ -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; -x_1 = lean::mk_string("→"); -x_2 = lean::mk_string("->"); -x_3 = lean::mk_nat_obj(25u); -x_4 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -x_5 = lean::mk_nat_obj(24u); -x_6 = l_Lean_Parser_Term_Parser_Lean_Parser_HasTokens(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = lean::box(0); -x_9 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_8); -lean::dec(x_7); -x_10 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_9); -lean::dec(x_9); -lean::dec(x_4); -x_11 = l_Lean_Parser_Term_Lean_Parser_HasTokens; -x_12 = l_Lean_Parser_List_cons_tokens___rarg(x_11, x_10); -lean::dec(x_10); -x_13 = l_Lean_Parser_tokens___rarg(x_12); -lean::dec(x_12); -return x_13; -} -} -obj* l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens___spec__1___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_10; -} -} -obj* l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = lean::mk_nat_obj(24u); -x_8 = l_Lean_Parser_Term_Parser(x_7, x_2, x_3, x_4, x_5, x_6); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView() { -_start: -{ -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; -x_1 = lean::mk_string("→"); -x_2 = lean::mk_string("->"); -x_3 = lean::mk_nat_obj(25u); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens___spec__1___boxed), 9, 3); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_2); -lean::closure_set(x_4, 2, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView___lambda__1___boxed), 6, 0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 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 = l_Lean_Parser_TrailingTermParserM_Monad; -x_12 = l_Lean_Parser_TrailingTermParserM_MonadExcept; -x_13 = l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec; -x_14 = l_Lean_Parser_TrailingTermParserM_Alternative; -x_15 = l_Lean_Parser_Term_arrow; -x_16 = l_Lean_Parser_Term_arrow_HasView; -x_17 = l_Lean_Parser_Combinators_node_view___rarg(x_11, x_12, x_13, x_14, x_15, x_10, x_16); -lean::dec(x_10); -return x_17; -} -} -obj* l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_1); -return x_7; -} -} -obj* _init_l_Lean_Parser_Term_arrow_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("→"); -x_2 = lean::mk_string("->"); -x_3 = lean::mk_nat_obj(25u); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___at_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens___spec__1___boxed), 9, 3); -lean::closure_set(x_4, 0, x_1); -lean::closure_set(x_4, 1, x_2); -lean::closure_set(x_4, 2, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView___lambda__1___boxed), 6, 0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 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); -return x_10; -} -} -obj* l_Lean_Parser_Term_arrow_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l_Lean_Parser_Term_arrow; -x_8 = l_Lean_Parser_Term_arrow_Parser___closed__1; -x_9 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_7, x_8, x_1, x_2, x_3, x_4, x_5, x_6); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_projectionSpec() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("projectionSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_2); -x_6 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_2); -x_9 = l_Lean_Parser_Term_projectionSpec; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -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; -x_11 = lean::cnstr_get(x_1, 0); -lean::inc(x_11); -lean::dec(x_1); -x_12 = l_Lean_Parser_number_HasView; -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -x_14 = lean::apply_1(x_13, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_2); -x_16 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_2); -x_19 = l_Lean_Parser_Term_projectionSpec; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__1() { -_start: -{ -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_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__1; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__2; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("projectionSpec"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__4; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_14; -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -switch (lean::obj_tag(x_16)) { -case 0: -{ -obj* x_17; -lean::dec(x_15); -x_17 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_17; -} -case 1: -{ -obj* x_18; -lean::dec(x_16); -lean::dec(x_15); -x_18 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_18; -} -default: -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_19 = lean::cnstr_get(x_15, 1); -lean::inc(x_19); -lean::dec(x_15); -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_16, 1); -lean::inc(x_21); -lean::dec(x_16); -x_22 = lean::box(0); -x_23 = lean_name_dec_eq(x_20, x_22); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; -lean::dec(x_21); -lean::dec(x_19); -x_24 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_24; -} -else -{ -if (lean::obj_tag(x_19) == 0) -{ -obj* x_25; -lean::dec(x_21); -x_25 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_25; -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_19, 1); -lean::inc(x_26); -if (lean::obj_tag(x_26) == 0) -{ -obj* x_27; obj* x_28; uint8 x_29; -x_27 = lean::cnstr_get(x_19, 0); -lean::inc(x_27); -lean::dec(x_19); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::nat_dec_eq(x_21, x_28); -lean::dec(x_21); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = l_Lean_Parser_number_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_27); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -return x_33; -} -else -{ -if (lean::obj_tag(x_27) == 1) -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_27, 0); -lean::inc(x_34); -lean::dec(x_27); -x_35 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_35, 0, x_34); -return x_35; -} -else -{ -obj* x_36; -lean::dec(x_27); -x_36 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__2; -return x_36; -} -} -} -else -{ -obj* x_37; -lean::dec(x_26); -lean::dec(x_21); -lean::dec(x_19); -x_37 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_37; -} -} -} -} -} -} -} -else -{ -obj* x_38; -lean::dec(x_11); -lean::dec(x_6); -x_38 = l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3; -return x_38; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_projectionSpec_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_projectionSpec_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_projectionSpec_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_projectionSpec_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_Term_projection() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("Term"); -x_7 = lean_name_mk_string(x_5, x_6); -x_8 = lean::mk_string("projection"); -x_9 = lean_name_mk_string(x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_Term_projection_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 2); -lean::inc(x_4); -lean::dec(x_1); -x_5 = l_Lean_Parser_Term_projectionSpec_HasView; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_4); -x_8 = lean::box(0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_Term_projection; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -lean::dec(x_3); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_9); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_2); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_Lean_Parser_Term_projection; -x_20 = l_Lean_Parser_Syntax_mkNode(x_19, x_18); -return x_20; -} -} -} -obj* _init_l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = l_Lean_Parser_Term_projectionSpec_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -return x_4; -} -} -obj* _init_l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__1; -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_1); -lean::cnstr_set(x_4, 2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Term_projection_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_28; -x_28 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; -x_29 = l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__2; -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -lean::dec(x_28); -x_31 = lean::cnstr_get(x_30, 1); -lean::inc(x_31); -lean::dec(x_30); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = lean::box(3); -x_2 = x_31; -x_3 = x_32; -goto block_27; -} -else -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -lean::dec(x_31); -x_2 = x_34; -x_3 = x_33; -goto block_27; -} -} -block_27: -{ -obj* x_4; obj* x_5; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_24; -x_24 = lean::box(3); -x_4 = x_2; -x_5 = x_24; -goto block_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_2, 1); -lean::inc(x_26); -lean::dec(x_2); -x_4 = x_26; -x_5 = x_25; -goto block_23; -} -block_23: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -lean::dec(x_5); -x_7 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_7, 0, x_6); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_8; obj* x_9; -x_8 = l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_3); -lean::cnstr_set(x_9, 1, x_7); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_4, 0); -lean::inc(x_10); -lean::dec(x_4); -x_11 = l_Lean_Parser_Term_projectionSpec_HasView; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_13 = lean::apply_1(x_12, x_10); -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_3); -lean::cnstr_set(x_14, 1, x_7); -lean::cnstr_set(x_14, 2, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_5); -x_15 = lean::box(0); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_16; obj* x_17; -x_16 = l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__1; -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_3); -lean::cnstr_set(x_17, 1, x_15); -lean::cnstr_set(x_17, 2, x_16); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_18 = lean::cnstr_get(x_4, 0); -lean::inc(x_18); -lean::dec(x_4); -x_19 = l_Lean_Parser_Term_projectionSpec_HasView; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_21 = lean::apply_1(x_20, x_18); -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_3); -lean::cnstr_set(x_22, 1, x_15); -lean::cnstr_set(x_22, 2, x_21); -return x_22; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_Term_projection_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_projection_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_projection_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_Term_projection_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Term_projection_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__1(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: -{ -uint8 x_9; -x_9 = l_String_isEmpty(x_1); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::string_length(x_1); -x_11 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_12 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_12, 0, x_1); -lean::cnstr_set(x_12, 1, x_11); -lean::cnstr_set(x_12, 2, x_11); -lean::inc(x_7); -x_13 = l___private_init_lean_parser_parsec_2__strAux___main(x_10, x_12, x_7); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; uint8 x_17; obj* x_18; obj* x_19; -lean::dec(x_1); -x_14 = lean::box(0); -x_15 = l_String_splitAux___main___closed__1; -x_16 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_16, 0, x_7); -lean::cnstr_set(x_16, 1, x_15); -lean::cnstr_set(x_16, 2, x_2); -lean::cnstr_set(x_16, 3, x_14); -x_17 = 0; -x_18 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set_scalar(x_18, sizeof(void*)*1, x_17); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_8); -return x_19; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -lean::dec(x_7); -lean::dec(x_2); -x_20 = lean::cnstr_get(x_13, 0); -lean::inc(x_20); -lean::dec(x_13); -x_21 = lean::box(0); -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_1); -lean::cnstr_set(x_22, 1, x_20); -lean::cnstr_set(x_22, 2, x_21); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_8); -return x_23; -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; -lean::dec(x_2); -lean::dec(x_1); -x_24 = l_String_splitAux___main___closed__1; -x_25 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_26 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_7); -lean::cnstr_set(x_26, 2, x_25); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_8); -return x_27; -} -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_1); -x_5 = l_Lean_Parser_token(x_1, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_6, 0); -x_12 = lean::cnstr_get(x_6, 1); -x_13 = lean::cnstr_get(x_6, 2); -if (lean::obj_tag(x_11) == 1) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -lean::dec(x_3); -lean::dec(x_1); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_36); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_6); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_37); -x_39 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_40 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_38, x_39); -x_41 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_40); -lean::cnstr_set(x_5, 0, x_41); -return x_5; -} -else -{ -obj* x_42; -lean::free_heap_obj(x_6); -lean::dec(x_11); -lean::free_heap_obj(x_5); -x_42 = lean::box(0); -x_14 = x_42; -goto block_35; -} -block_35: -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -lean::dec(x_14); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_3); -x_16 = lean::box(0); -x_17 = l_String_splitAux___main___closed__1; -x_18 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_19 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_17, x_18, x_15, x_16, x_1, x_12, x_8); -lean::dec(x_1); -lean::dec(x_15); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_21); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_22); -x_25 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_24, x_18); -x_26 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_25); -lean::cnstr_set(x_19, 0, x_26); -return x_19; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_27 = lean::cnstr_get(x_19, 0); -x_28 = lean::cnstr_get(x_19, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_19); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_27); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_29); -x_32 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_31, x_18); -x_33 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_28); -return x_34; -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_43 = lean::cnstr_get(x_6, 0); -x_44 = lean::cnstr_get(x_6, 1); -x_45 = lean::cnstr_get(x_6, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::inc(x_43); -lean::dec(x_6); -if (lean::obj_tag(x_43) == 1) -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -lean::dec(x_3); -lean::dec(x_1); -x_62 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_63 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_63, 0, x_43); -lean::cnstr_set(x_63, 1, x_44); -lean::cnstr_set(x_63, 2, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_63); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_64); -x_66 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_67 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_65, x_66); -x_68 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_67); -lean::cnstr_set(x_5, 0, x_68); -return x_5; -} -else -{ -obj* x_69; -lean::dec(x_43); -lean::free_heap_obj(x_5); -x_69 = lean::box(0); -x_46 = x_69; -goto block_61; -} -block_61: -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_46); -x_47 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_47, 0, x_3); -x_48 = lean::box(0); -x_49 = l_String_splitAux___main___closed__1; -x_50 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_51 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_49, x_50, x_47, x_48, x_1, x_44, x_8); -lean::dec(x_1); -lean::dec(x_47); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_51, 1); -lean::inc(x_53); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - lean::cnstr_release(x_51, 1); - x_54 = x_51; -} else { - lean::dec_ref(x_51); - x_54 = lean::box(0); -} -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_52); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_55); -x_58 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_57, x_50); -x_59 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_58); -if (lean::is_scalar(x_54)) { - x_60 = lean::alloc_cnstr(0, 2, 0); -} else { - x_60 = x_54; -} -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_53); -return x_60; -} -} -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_70 = lean::cnstr_get(x_5, 1); -lean::inc(x_70); -lean::dec(x_5); -x_71 = lean::cnstr_get(x_6, 0); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_6, 1); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_6, 2); -lean::inc(x_73); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_74 = x_6; -} else { - lean::dec_ref(x_6); - x_74 = lean::box(0); -} -if (lean::obj_tag(x_71) == 1) -{ -obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -lean::dec(x_3); -lean::dec(x_1); -x_91 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_74)) { - x_92 = lean::alloc_cnstr(0, 3, 0); -} else { - x_92 = x_74; -} -lean::cnstr_set(x_92, 0, x_71); -lean::cnstr_set(x_92, 1, x_72); -lean::cnstr_set(x_92, 2, x_91); -x_93 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_73, x_92); -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_93); -x_95 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_96 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_94, x_95); -x_97 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_96); -x_98 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_98, 0, x_97); -lean::cnstr_set(x_98, 1, x_70); -return x_98; -} -else -{ -obj* x_99; -lean::dec(x_74); -lean::dec(x_71); -x_99 = lean::box(0); -x_75 = x_99; -goto block_90; -} -block_90: -{ -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; -lean::dec(x_75); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_3); -x_77 = lean::box(0); -x_78 = l_String_splitAux___main___closed__1; -x_79 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_80 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_78, x_79, x_76, x_77, x_1, x_72, x_70); -lean::dec(x_1); -lean::dec(x_76); -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_80, 1); -lean::inc(x_82); -if (lean::is_exclusive(x_80)) { - lean::cnstr_release(x_80, 0); - lean::cnstr_release(x_80, 1); - x_83 = x_80; -} else { - lean::dec_ref(x_80); - x_83 = lean::box(0); -} -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_73, x_81); -x_85 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_85, x_84); -x_87 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_86, x_79); -x_88 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_87); -if (lean::is_scalar(x_83)) { - x_89 = lean::alloc_cnstr(0, 2, 0); -} else { - x_89 = x_83; -} -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_82); -return x_89; -} -} -} -else -{ -uint8 x_100; -lean::dec(x_3); -lean::dec(x_1); -x_100 = !lean::is_exclusive(x_5); -if (x_100 == 0) -{ -obj* x_101; uint8 x_102; -x_101 = lean::cnstr_get(x_5, 0); -lean::dec(x_101); -x_102 = !lean::is_exclusive(x_6); -if (x_102 == 0) -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_103 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_6); -x_105 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_106 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_104, x_105); -x_107 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_106); -lean::cnstr_set(x_5, 0, x_107); -return x_5; -} -else -{ -obj* x_108; uint8 x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; -x_108 = lean::cnstr_get(x_6, 0); -x_109 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_108); -lean::dec(x_6); -x_110 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_110, 0, x_108); -lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_109); -x_111 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_112 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_111, x_110); -x_113 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_114 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_112, x_113); -x_115 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_114); -lean::cnstr_set(x_5, 0, x_115); -return x_5; -} -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_116 = lean::cnstr_get(x_5, 1); -lean::inc(x_116); -lean::dec(x_5); -x_117 = lean::cnstr_get(x_6, 0); -lean::inc(x_117); -x_118 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_119 = x_6; -} else { - lean::dec_ref(x_6); - x_119 = lean::box(0); -} -if (lean::is_scalar(x_119)) { - x_120 = lean::alloc_cnstr(1, 1, 1); -} else { - x_120 = x_119; -} -lean::cnstr_set(x_120, 0, x_117); -lean::cnstr_set_scalar(x_120, sizeof(void*)*1, x_118); -x_121 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_122 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_121, x_120); -x_123 = l_Lean_Parser_ident_Parser___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__4___rarg___closed__1; -x_124 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_122, x_123); -x_125 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_124); -x_126 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_126, 0, x_125); -lean::cnstr_set(x_126, 1, x_116); -return x_126; -} -} -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___rarg___boxed), 4, 0); -return x_3; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_1); -x_5 = l_Lean_Parser_token(x_1, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; uint8 x_15; -x_11 = lean::cnstr_get(x_6, 0); -x_12 = lean::cnstr_get(x_6, 1); -x_13 = lean::cnstr_get(x_6, 2); -x_14 = l_Lean_Parser_number; -x_15 = l_Lean_Parser_Syntax_isOfKind___main(x_14, x_11); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::free_heap_obj(x_6); -lean::dec(x_11); -lean::free_heap_obj(x_5); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_3); -x_17 = lean::box(0); -x_18 = l_String_splitAux___main___closed__1; -x_19 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_20 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_18, x_19, x_16, x_17, x_1, x_12, x_8); -lean::dec(x_1); -lean::dec(x_16); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_22); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_23); -x_26 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_25); -lean::cnstr_set(x_20, 0, x_26); -return x_20; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_27 = lean::cnstr_get(x_20, 0); -x_28 = lean::cnstr_get(x_20, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_20); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_27); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_29); -x_32 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_31); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_28); -return x_33; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -lean::dec(x_3); -lean::dec(x_1); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_34); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_6); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_35); -x_37 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_36); -lean::cnstr_set(x_5, 0, x_37); -return x_5; -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; uint8 x_42; -x_38 = lean::cnstr_get(x_6, 0); -x_39 = lean::cnstr_get(x_6, 1); -x_40 = lean::cnstr_get(x_6, 2); -lean::inc(x_40); -lean::inc(x_39); -lean::inc(x_38); -lean::dec(x_6); -x_41 = l_Lean_Parser_number; -x_42 = l_Lean_Parser_Syntax_isOfKind___main(x_41, x_38); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -lean::dec(x_38); -lean::free_heap_obj(x_5); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_3); -x_44 = lean::box(0); -x_45 = l_String_splitAux___main___closed__1; -x_46 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_47 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_45, x_46, x_43, x_44, x_1, x_39, x_8); -lean::dec(x_1); -lean::dec(x_43); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - x_50 = x_47; -} else { - lean::dec_ref(x_47); - x_50 = lean::box(0); -} -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_48); -x_52 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_51); -x_54 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_53); -if (lean::is_scalar(x_50)) { - x_55 = lean::alloc_cnstr(0, 2, 0); -} else { - x_55 = x_50; -} -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_49); -return x_55; -} -else -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_3); -lean::dec(x_1); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_57, 0, x_38); -lean::cnstr_set(x_57, 1, x_39); -lean::cnstr_set(x_57, 2, x_56); -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_58); -x_60 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_59); -lean::cnstr_set(x_5, 0, x_60); -return x_5; -} -} -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; uint8 x_67; -x_61 = lean::cnstr_get(x_5, 1); -lean::inc(x_61); -lean::dec(x_5); -x_62 = lean::cnstr_get(x_6, 0); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_6, 1); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_6, 2); -lean::inc(x_64); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_65 = x_6; -} else { - lean::dec_ref(x_6); - x_65 = lean::box(0); -} -x_66 = l_Lean_Parser_number; -x_67 = l_Lean_Parser_Syntax_isOfKind___main(x_66, x_62); -if (x_67 == 0) -{ -obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -lean::dec(x_65); -lean::dec(x_62); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_3); -x_69 = lean::box(0); -x_70 = l_String_splitAux___main___closed__1; -x_71 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_72 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_70, x_71, x_68, x_69, x_1, x_63, x_61); -lean::dec(x_1); -lean::dec(x_68); -x_73 = lean::cnstr_get(x_72, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_72, 1); -lean::inc(x_74); -if (lean::is_exclusive(x_72)) { - lean::cnstr_release(x_72, 0); - lean::cnstr_release(x_72, 1); - x_75 = x_72; -} else { - lean::dec_ref(x_72); - x_75 = lean::box(0); -} -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_73); -x_77 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_78 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_76); -x_79 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_78); -if (lean::is_scalar(x_75)) { - x_80 = lean::alloc_cnstr(0, 2, 0); -} else { - x_80 = x_75; -} -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_74); -return x_80; -} -else -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -lean::dec(x_3); -lean::dec(x_1); -x_81 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_65)) { - x_82 = lean::alloc_cnstr(0, 3, 0); -} else { - x_82 = x_65; -} -lean::cnstr_set(x_82, 0, x_62); -lean::cnstr_set(x_82, 1, x_63); -lean::cnstr_set(x_82, 2, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_82); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_81, x_83); -x_85 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_84); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_61); -return x_86; -} -} -} -else -{ -uint8 x_87; -lean::dec(x_3); -lean::dec(x_1); -x_87 = !lean::is_exclusive(x_5); -if (x_87 == 0) -{ -obj* x_88; uint8 x_89; -x_88 = lean::cnstr_get(x_5, 0); -lean::dec(x_88); -x_89 = !lean::is_exclusive(x_6); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; obj* x_92; -x_90 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_6); -x_92 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_91); -lean::cnstr_set(x_5, 0, x_92); -return x_5; -} -else -{ -obj* x_93; uint8 x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_93 = lean::cnstr_get(x_6, 0); -x_94 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_93); -lean::dec(x_6); -x_95 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_95, 0, x_93); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_94); -x_96 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_96, x_95); -x_98 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_97); -lean::cnstr_set(x_5, 0, x_98); -return x_5; -} -} -else -{ -obj* x_99; obj* x_100; uint8 x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_99 = lean::cnstr_get(x_5, 1); -lean::inc(x_99); -lean::dec(x_5); -x_100 = lean::cnstr_get(x_6, 0); -lean::inc(x_100); -x_101 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_102 = x_6; -} else { - lean::dec_ref(x_6); - x_102 = lean::box(0); -} -if (lean::is_scalar(x_102)) { - x_103 = lean::alloc_cnstr(1, 1, 1); -} else { - x_103 = x_102; -} -lean::cnstr_set(x_103, 0, x_100); -lean::cnstr_set_scalar(x_103, sizeof(void*)*1, x_101); -x_104 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_104, x_103); -x_106 = l_Lean_Parser_ParsecT_tryMkRes___rarg(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_99); -return x_107; -} -} -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___rarg___boxed), 4, 0); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg(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: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_11; uint8 x_12; obj* x_13; obj* x_14; -x_11 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -lean::cnstr_set(x_11, 2, x_2); -lean::cnstr_set(x_11, 3, x_4); -x_12 = 0; -x_13 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set_scalar(x_13, sizeof(void*)*1, x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -return x_14; -} -else -{ -obj* x_15; obj* x_16; uint8 x_17; obj* x_18; obj* x_19; -lean::dec(x_9); -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_1); -lean::cnstr_set(x_16, 2, x_2); -lean::cnstr_set(x_16, 3, x_4); -x_17 = 0; -x_18 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set_scalar(x_18, sizeof(void*)*1, x_17); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_10); -return x_19; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg___boxed), 10, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4(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_1) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_2); -x_9 = lean::box(0); -x_10 = l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -x_11 = l_mjoin___rarg___closed__1; -x_12 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg(x_10, x_11, x_9, x_9, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_12; -} -else -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_1); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_14 = lean::cnstr_get(x_1, 0); -x_15 = lean::cnstr_get(x_1, 1); -x_16 = lean::mk_nat_obj(1u); -x_17 = lean::nat_add(x_2, x_16); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_18 = lean::apply_6(x_14, x_3, x_4, x_5, x_6, x_7, x_8); -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -if (lean::obj_tag(x_19) == 0) -{ -uint8 x_20; -x_20 = !lean::is_exclusive(x_18); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; uint8 x_23; -x_21 = lean::cnstr_get(x_18, 1); -x_22 = lean::cnstr_get(x_18, 0); -lean::dec(x_22); -x_23 = !lean::is_exclusive(x_19); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_24 = lean::cnstr_get(x_19, 0); -x_25 = lean::cnstr_get(x_19, 2); -x_26 = lean::box(0); -x_27 = lean_name_mk_numeral(x_26, x_2); -x_28 = lean::box(0); -lean::cnstr_set(x_1, 1, x_28); -lean::cnstr_set(x_1, 0, x_24); -x_29 = l_Lean_Parser_Syntax_mkNode(x_27, x_1); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_19, 2, x_30); -lean::cnstr_set(x_19, 0, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_19); -if (lean::obj_tag(x_31) == 0) -{ -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_18, 0, x_31); -return x_18; -} -else -{ -uint8 x_32; -x_32 = lean::cnstr_get_scalar(x_31, sizeof(void*)*1); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; uint8 x_35; -lean::free_heap_obj(x_18); -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4(x_15, x_17, x_3, x_4, x_5, x_6, x_7, x_21); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; -x_36 = lean::cnstr_get(x_34, 0); -x_37 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_33, x_36); -lean::cnstr_set(x_34, 0, x_37); -return x_34; -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = lean::cnstr_get(x_34, 0); -x_39 = lean::cnstr_get(x_34, 1); -lean::inc(x_39); -lean::inc(x_38); -lean::dec(x_34); -x_40 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_33, x_38); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_39); -return x_41; -} -} -else -{ -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_18, 0, x_31); -return x_18; -} -} -} -else -{ -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; -x_42 = lean::cnstr_get(x_19, 0); -x_43 = lean::cnstr_get(x_19, 1); -x_44 = lean::cnstr_get(x_19, 2); -lean::inc(x_44); -lean::inc(x_43); -lean::inc(x_42); -lean::dec(x_19); -x_45 = lean::box(0); -x_46 = lean_name_mk_numeral(x_45, x_2); -x_47 = lean::box(0); -lean::cnstr_set(x_1, 1, x_47); -lean::cnstr_set(x_1, 0, x_42); -x_48 = l_Lean_Parser_Syntax_mkNode(x_46, x_1); -x_49 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_50 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_50, 0, x_48); -lean::cnstr_set(x_50, 1, x_43); -lean::cnstr_set(x_50, 2, x_49); -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_50); -if (lean::obj_tag(x_51) == 0) -{ -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_18, 0, x_51); -return x_18; -} -else -{ -uint8 x_52; -x_52 = lean::cnstr_get_scalar(x_51, sizeof(void*)*1); -if (x_52 == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::free_heap_obj(x_18); -x_53 = lean::cnstr_get(x_51, 0); -lean::inc(x_53); -lean::dec(x_51); -x_54 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4(x_15, x_17, x_3, x_4, x_5, x_6, x_7, x_21); -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_54, 1); -lean::inc(x_56); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - lean::cnstr_release(x_54, 1); - x_57 = x_54; -} else { - lean::dec_ref(x_54); - x_57 = lean::box(0); -} -x_58 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_53, x_55); -if (lean::is_scalar(x_57)) { - x_59 = lean::alloc_cnstr(0, 2, 0); -} else { - x_59 = x_57; -} -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_56); -return x_59; -} -else -{ -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_18, 0, x_51); -return x_18; -} -} -} -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_60 = lean::cnstr_get(x_18, 1); -lean::inc(x_60); -lean::dec(x_18); -x_61 = lean::cnstr_get(x_19, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_19, 1); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_19, 2); -lean::inc(x_63); -if (lean::is_exclusive(x_19)) { - lean::cnstr_release(x_19, 0); - lean::cnstr_release(x_19, 1); - lean::cnstr_release(x_19, 2); - x_64 = x_19; -} else { - lean::dec_ref(x_19); - x_64 = lean::box(0); -} -x_65 = lean::box(0); -x_66 = lean_name_mk_numeral(x_65, x_2); -x_67 = lean::box(0); -lean::cnstr_set(x_1, 1, x_67); -lean::cnstr_set(x_1, 0, x_61); -x_68 = l_Lean_Parser_Syntax_mkNode(x_66, x_1); -x_69 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_64)) { - x_70 = lean::alloc_cnstr(0, 3, 0); -} else { - x_70 = x_64; -} -lean::cnstr_set(x_70, 0, x_68); -lean::cnstr_set(x_70, 1, x_62); -lean::cnstr_set(x_70, 2, x_69); -x_71 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_70); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_72 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_60); -return x_72; -} -else -{ -uint8 x_73; -x_73 = lean::cnstr_get_scalar(x_71, sizeof(void*)*1); -if (x_73 == 0) -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_74 = lean::cnstr_get(x_71, 0); -lean::inc(x_74); -lean::dec(x_71); -x_75 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4(x_15, x_17, x_3, x_4, x_5, x_6, x_7, x_60); -x_76 = lean::cnstr_get(x_75, 0); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_75, 1); -lean::inc(x_77); -if (lean::is_exclusive(x_75)) { - lean::cnstr_release(x_75, 0); - lean::cnstr_release(x_75, 1); - x_78 = x_75; -} else { - lean::dec_ref(x_75); - x_78 = lean::box(0); -} -x_79 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_74, x_76); -if (lean::is_scalar(x_78)) { - x_80 = lean::alloc_cnstr(0, 2, 0); -} else { - x_80 = x_78; -} -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_77); -return x_80; -} -else -{ -obj* x_81; -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_71); -lean::cnstr_set(x_81, 1, x_60); -return x_81; -} -} -} -} -else -{ -uint8 x_82; -lean::free_heap_obj(x_1); -lean::dec(x_2); -x_82 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (x_82 == 0) -{ -obj* x_83; obj* x_84; obj* x_85; uint8 x_86; -x_83 = lean::cnstr_get(x_18, 1); -lean::inc(x_83); -lean::dec(x_18); -x_84 = lean::cnstr_get(x_19, 0); -lean::inc(x_84); -lean::dec(x_19); -x_85 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4(x_15, x_17, x_3, x_4, x_5, x_6, x_7, x_83); -x_86 = !lean::is_exclusive(x_85); -if (x_86 == 0) -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_85, 0); -x_88 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_84, x_87); -lean::cnstr_set(x_85, 0, x_88); -return x_85; -} -else -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_89 = lean::cnstr_get(x_85, 0); -x_90 = lean::cnstr_get(x_85, 1); -lean::inc(x_90); -lean::inc(x_89); -lean::dec(x_85); -x_91 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_84, x_89); -x_92 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_90); -return x_92; -} -} -else -{ -uint8 x_93; -lean::dec(x_17); -lean::dec(x_15); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_93 = !lean::is_exclusive(x_18); -if (x_93 == 0) -{ -obj* x_94; uint8 x_95; -x_94 = lean::cnstr_get(x_18, 0); -lean::dec(x_94); -x_95 = !lean::is_exclusive(x_19); -if (x_95 == 0) -{ -return x_18; -} -else -{ -obj* x_96; obj* x_97; -x_96 = lean::cnstr_get(x_19, 0); -lean::inc(x_96); -lean::dec(x_19); -x_97 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set_scalar(x_97, sizeof(void*)*1, x_82); -lean::cnstr_set(x_18, 0, x_97); -return x_18; -} -} -else -{ -obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_98 = lean::cnstr_get(x_18, 1); -lean::inc(x_98); -lean::dec(x_18); -x_99 = lean::cnstr_get(x_19, 0); -lean::inc(x_99); -if (lean::is_exclusive(x_19)) { - lean::cnstr_release(x_19, 0); - x_100 = x_19; -} else { - lean::dec_ref(x_19); - x_100 = lean::box(0); -} -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_99); -lean::cnstr_set_scalar(x_101, sizeof(void*)*1, x_82); -x_102 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_98); -return x_102; -} -} -} -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_103 = lean::cnstr_get(x_1, 0); -x_104 = lean::cnstr_get(x_1, 1); -lean::inc(x_104); -lean::inc(x_103); -lean::dec(x_1); -x_105 = lean::mk_nat_obj(1u); -x_106 = lean::nat_add(x_2, x_105); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_107 = lean::apply_6(x_103, x_3, x_4, x_5, x_6, x_7, x_8); -x_108 = lean::cnstr_get(x_107, 0); -lean::inc(x_108); -if (lean::obj_tag(x_108) == 0) -{ -obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; -x_109 = lean::cnstr_get(x_107, 1); -lean::inc(x_109); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - x_110 = x_107; -} else { - lean::dec_ref(x_107); - x_110 = lean::box(0); -} -x_111 = lean::cnstr_get(x_108, 0); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_108, 1); -lean::inc(x_112); -x_113 = lean::cnstr_get(x_108, 2); -lean::inc(x_113); -if (lean::is_exclusive(x_108)) { - lean::cnstr_release(x_108, 0); - lean::cnstr_release(x_108, 1); - lean::cnstr_release(x_108, 2); - x_114 = x_108; -} else { - lean::dec_ref(x_108); - x_114 = lean::box(0); -} -x_115 = lean::box(0); -x_116 = lean_name_mk_numeral(x_115, x_2); -x_117 = lean::box(0); -x_118 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_118, 0, x_111); -lean::cnstr_set(x_118, 1, x_117); -x_119 = l_Lean_Parser_Syntax_mkNode(x_116, x_118); -x_120 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_114)) { - x_121 = lean::alloc_cnstr(0, 3, 0); -} else { - x_121 = x_114; -} -lean::cnstr_set(x_121, 0, x_119); -lean::cnstr_set(x_121, 1, x_112); -lean::cnstr_set(x_121, 2, x_120); -x_122 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_113, x_121); -if (lean::obj_tag(x_122) == 0) -{ -obj* x_123; -lean::dec(x_106); -lean::dec(x_104); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_110)) { - x_123 = lean::alloc_cnstr(0, 2, 0); -} else { - x_123 = x_110; -} -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_109); -return x_123; -} -else -{ -uint8 x_124; -x_124 = lean::cnstr_get_scalar(x_122, sizeof(void*)*1); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; -lean::dec(x_110); -x_125 = lean::cnstr_get(x_122, 0); -lean::inc(x_125); -lean::dec(x_122); -x_126 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4(x_104, x_106, x_3, x_4, x_5, x_6, x_7, x_109); -x_127 = lean::cnstr_get(x_126, 0); -lean::inc(x_127); -x_128 = lean::cnstr_get(x_126, 1); -lean::inc(x_128); -if (lean::is_exclusive(x_126)) { - lean::cnstr_release(x_126, 0); - lean::cnstr_release(x_126, 1); - x_129 = x_126; -} else { - lean::dec_ref(x_126); - x_129 = lean::box(0); -} -x_130 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_125, x_127); -if (lean::is_scalar(x_129)) { - x_131 = lean::alloc_cnstr(0, 2, 0); -} else { - x_131 = x_129; -} -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_128); -return x_131; -} -else -{ -obj* x_132; -lean::dec(x_106); -lean::dec(x_104); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_110)) { - x_132 = lean::alloc_cnstr(0, 2, 0); -} else { - x_132 = x_110; -} -lean::cnstr_set(x_132, 0, x_122); -lean::cnstr_set(x_132, 1, x_109); -return x_132; -} -} -} -else -{ -uint8 x_133; -lean::dec(x_2); -x_133 = lean::cnstr_get_scalar(x_108, sizeof(void*)*1); -if (x_133 == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_134 = lean::cnstr_get(x_107, 1); -lean::inc(x_134); -lean::dec(x_107); -x_135 = lean::cnstr_get(x_108, 0); -lean::inc(x_135); -lean::dec(x_108); -x_136 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4(x_104, x_106, x_3, x_4, x_5, x_6, x_7, x_134); -x_137 = lean::cnstr_get(x_136, 0); -lean::inc(x_137); -x_138 = lean::cnstr_get(x_136, 1); -lean::inc(x_138); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_139 = x_136; -} else { - lean::dec_ref(x_136); - x_139 = lean::box(0); -} -x_140 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_135, x_137); -if (lean::is_scalar(x_139)) { - x_141 = lean::alloc_cnstr(0, 2, 0); -} else { - x_141 = x_139; -} -lean::cnstr_set(x_141, 0, x_140); -lean::cnstr_set(x_141, 1, x_138); -return x_141; -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; -lean::dec(x_106); -lean::dec(x_104); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_142 = lean::cnstr_get(x_107, 1); -lean::inc(x_142); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - x_143 = x_107; -} else { - lean::dec_ref(x_107); - x_143 = lean::box(0); -} -x_144 = lean::cnstr_get(x_108, 0); -lean::inc(x_144); -if (lean::is_exclusive(x_108)) { - lean::cnstr_release(x_108, 0); - x_145 = x_108; -} else { - lean::dec_ref(x_108); - x_145 = lean::box(0); -} -if (lean::is_scalar(x_145)) { - x_146 = lean::alloc_cnstr(1, 1, 1); -} else { - x_146 = x_145; -} -lean::cnstr_set(x_146, 0, x_144); -lean::cnstr_set_scalar(x_146, sizeof(void*)*1, x_133); -if (lean::is_scalar(x_143)) { - x_147 = lean::alloc_cnstr(0, 2, 0); -} else { - x_147 = x_143; -} -lean::cnstr_set(x_147, 0, x_146); -lean::cnstr_set(x_147, 1, x_142); -return x_147; -} -} -} -} -} -} -obj* l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___lambda__1(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_9; obj* x_10; obj* x_11; -x_9 = l_Lean_Name_toString___closed__1; -x_10 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__1(x_9, x_1, x_3, x_4, x_5, x_6, x_7, x_8); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; uint8 x_14; -x_13 = lean::cnstr_get(x_10, 0); -lean::dec(x_13); -x_14 = !lean::is_exclusive(x_11); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = lean::cnstr_get(x_11, 1); -x_16 = lean::cnstr_get(x_11, 2); -x_17 = lean::cnstr_get(x_11, 0); -lean::dec(x_17); -lean::inc(x_15); -x_18 = l_Lean_Parser_mkRawRes(x_2, x_15); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_11, 2, x_19); -lean::cnstr_set(x_11, 0, x_18); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_11); -lean::cnstr_set(x_10, 0, x_20); -return x_10; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_11, 1); -x_22 = lean::cnstr_get(x_11, 2); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_11); -lean::inc(x_21); -x_23 = l_Lean_Parser_mkRawRes(x_2, x_21); -x_24 = l_Lean_Parser_finishCommentBlock___closed__2; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_21); -lean::cnstr_set(x_25, 2, x_24); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_25); -lean::cnstr_set(x_10, 0, x_26); -return x_10; -} -} -else -{ -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; -x_27 = lean::cnstr_get(x_10, 1); -lean::inc(x_27); -lean::dec(x_10); -x_28 = lean::cnstr_get(x_11, 1); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_11, 2); -lean::inc(x_29); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - lean::cnstr_release(x_11, 2); - x_30 = x_11; -} else { - lean::dec_ref(x_11); - x_30 = lean::box(0); -} -lean::inc(x_28); -x_31 = l_Lean_Parser_mkRawRes(x_2, x_28); -x_32 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_30)) { - x_33 = lean::alloc_cnstr(0, 3, 0); -} else { - x_33 = x_30; -} -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_28); -lean::cnstr_set(x_33, 2, x_32); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_27); -return x_35; -} -} -else -{ -uint8 x_36; -lean::dec(x_2); -x_36 = !lean::is_exclusive(x_10); -if (x_36 == 0) -{ -obj* x_37; uint8 x_38; -x_37 = lean::cnstr_get(x_10, 0); -lean::dec(x_37); -x_38 = !lean::is_exclusive(x_11); -if (x_38 == 0) -{ -return x_10; -} -else -{ -obj* x_39; uint8 x_40; obj* x_41; -x_39 = lean::cnstr_get(x_11, 0); -x_40 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_39); -lean::dec(x_11); -x_41 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_41, 0, x_39); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_40); -lean::cnstr_set(x_10, 0, x_41); -return x_10; -} -} -else -{ -obj* x_42; obj* x_43; uint8 x_44; obj* x_45; obj* x_46; obj* x_47; -x_42 = lean::cnstr_get(x_10, 1); -lean::inc(x_42); -lean::dec(x_10); -x_43 = lean::cnstr_get(x_11, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_45 = x_11; -} else { - lean::dec_ref(x_11); - x_45 = lean::box(0); -} -if (lean::is_scalar(x_45)) { - x_46 = lean::alloc_cnstr(1, 1, 1); -} else { - x_46 = x_45; -} -lean::cnstr_set(x_46, 0, x_43); -lean::cnstr_set_scalar(x_46, sizeof(void*)*1, x_44); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_42); -return x_47; -} -} -} -} -obj* _init_l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_1 = lean::mk_string("."); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 7, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___lambda__1___boxed), 8, 1); -lean::closure_set(x_9, 0, x_3); -x_10 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__1___rarg), 8, 2); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___boxed), 2, 0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___boxed), 2, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::mk_nat_obj(0u); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4), 8, 2); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_11); -x_19 = l_Lean_Parser_Term_projectionSpec; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_11); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_10); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 0); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -x_25 = l_Lean_Parser_Term_projection; -lean::inc(x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_26, 0, x_25); -lean::closure_set(x_26, 1, x_24); -x_27 = l_Lean_Parser_TrailingTermParserM_Monad; -x_28 = l_Lean_Parser_TrailingTermParserM_MonadExcept; -x_29 = l_Lean_Parser_TrailingTermParserM_Lean_Parser_MonadParsec; -x_30 = l_Lean_Parser_TrailingTermParserM_Alternative; -x_31 = l_Lean_Parser_Term_projection_HasView; -x_32 = l_Lean_Parser_Combinators_node_view___rarg(x_27, x_28, x_29, x_30, x_25, x_24, x_31); -lean::dec(x_24); -x_33 = l_Lean_Parser_Combinators_try_view___rarg(x_29, x_30, x_26, x_32); -lean::dec(x_26); -return x_33; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__1___boxed(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_9; -x_9 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_9; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg___boxed(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_11; -x_11 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_11; -} -} -obj* l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___lambda__1___boxed(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_9; -x_9 = l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -return x_9; -} -} -obj* _init_l_Lean_Parser_Term_projection_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_1 = lean::mk_string("."); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_command_NotationSpec_symbolQuote_Parser_Lean_Parser_HasTokens___spec__3___rarg___boxed), 6, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 7, 1); -lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___lambda__1___boxed), 8, 1); -lean::closure_set(x_9, 0, x_3); -x_10 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__1___rarg), 8, 2); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__3___boxed), 2, 0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__2___boxed), 2, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::mk_nat_obj(0u); -x_17 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__4), 8, 2); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_11); -x_19 = l_Lean_Parser_Term_projectionSpec; -x_20 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3), 8, 2); -lean::closure_set(x_20, 0, x_19); -lean::closure_set(x_20, 1, x_18); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_11); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_10); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_getLeading___boxed), 6, 0); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -return x_24; -} -} -obj* l_Lean_Parser_Term_projection_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; uint8 x_10; -x_7 = l_Lean_Parser_Term_projection; -x_8 = l_Lean_Parser_Term_projection_Parser___closed__1; -x_9 = l_Lean_Parser_Combinators_node___at_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens___spec__3(x_7, x_8, x_1, x_2, x_3, x_4, x_5, x_6); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_11); -lean::cnstr_set(x_9, 0, x_12); -return x_9; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = lean::cnstr_get(x_9, 0); -x_14 = lean::cnstr_get(x_9, 1); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_9); -x_15 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_13); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_14); -return x_16; -} -} -} -obj* _init_l_Lean_Parser_Term_projection_tokens() { -_start: -{ -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_1 = l_Lean_Parser_maxPrec; -x_2 = lean::mk_nat_obj(1u); -x_3 = lean::nat_add(x_1, x_2); -x_4 = lean::box(0); -x_5 = lean::mk_string("."); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -lean::cnstr_set(x_6, 2, x_4); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -return x_8; -} -} -obj* _init_l_Lean_Parser_Term_builtinTrailingParsers_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_Term_projection_tokens; -x_3 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_2, x_1); -x_4 = l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens; -x_5 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_4, x_3); -lean::dec(x_3); -x_6 = l_Lean_Parser_tokenMapCons_tokens___rarg(x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_Term_builtinTrailingParsers() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::mk_string("→"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_arrow_Parser), 6, 0); -lean::inc(x_4); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = lean::mk_string("->"); -x_7 = lean_name_mk_string(x_1, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_4); -x_9 = lean::mk_string("."); -x_10 = lean_name_mk_string(x_1, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_projection_Parser), 6, 0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::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_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_5); -lean::cnstr_set(x_16, 1, x_15); -x_17 = l_Lean_Parser_TokenMap_ofList___main___rarg(x_16); -return x_17; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1___rarg(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_10; -x_8 = l_Lean_Parser_peekToken___closed__1; -lean::inc(x_4); -x_9 = l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(x_8, x_4, x_6, x_7); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -lean::dec(x_11); -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -lean::dec(x_9); -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_10, 2); -lean::inc(x_14); -lean::dec(x_10); -x_15 = lean::box(0); -x_16 = l_String_splitAux___main___closed__1; -x_17 = l_mjoin___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_16, x_17, x_15, x_15, x_4, x_13, x_12); -lean::dec(x_4); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_20); -lean::cnstr_set(x_18, 0, x_21); -return x_18; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_18, 0); -x_23 = lean::cnstr_get(x_18, 1); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_18); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_22); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -return x_25; -} -} -else -{ -obj* x_26; -x_26 = lean::cnstr_get(x_11, 0); -lean::inc(x_26); -lean::dec(x_11); -switch (lean::obj_tag(x_26)) { -case 0: -{ -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; uint8 x_36; -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -lean::dec(x_26); -x_28 = lean::cnstr_get(x_9, 1); -lean::inc(x_28); -lean::dec(x_9); -x_29 = lean::cnstr_get(x_10, 1); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_10, 2); -lean::inc(x_30); -lean::dec(x_10); -x_31 = lean::cnstr_get(x_27, 1); -lean::inc(x_31); -lean::dec(x_27); -x_32 = lean::box(0); -x_33 = lean_name_mk_string(x_32, x_31); -x_34 = l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg(x_1, x_33); -lean::dec(x_33); -x_35 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_34, x_4, x_29, x_28); -lean::dec(x_4); -lean::dec(x_34); -x_36 = !lean::is_exclusive(x_35); -if (x_36 == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_37 = lean::cnstr_get(x_35, 0); -x_38 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_37); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_39); -lean::cnstr_set(x_35, 0, x_40); -return x_35; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_41 = lean::cnstr_get(x_35, 0); -x_42 = lean::cnstr_get(x_35, 1); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_35); -x_43 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_41); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_44); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_42); -return x_46; -} -} -case 1: -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; uint8 x_53; -lean::dec(x_26); -x_47 = lean::cnstr_get(x_9, 1); -lean::inc(x_47); -lean::dec(x_9); -x_48 = lean::cnstr_get(x_10, 1); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_10, 2); -lean::inc(x_49); -lean::dec(x_10); -x_50 = l_Lean_Parser_indexed___rarg___lambda__1___closed__1; -x_51 = l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3___rarg(x_1, x_50); -x_52 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_51, x_4, x_48, x_47); -lean::dec(x_4); -lean::dec(x_51); -x_53 = !lean::is_exclusive(x_52); -if (x_53 == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_54 = lean::cnstr_get(x_52, 0); -x_55 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_54); -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_49, x_56); -lean::cnstr_set(x_52, 0, x_57); -return x_52; -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -x_58 = lean::cnstr_get(x_52, 0); -x_59 = lean::cnstr_get(x_52, 1); -lean::inc(x_59); -lean::inc(x_58); -lean::dec(x_52); -x_60 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_60, x_58); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_49, x_61); -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_59); -return x_63; -} -} -case 2: -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; uint8 x_71; -x_64 = lean::cnstr_get(x_9, 1); -lean::inc(x_64); -lean::dec(x_9); -x_65 = lean::cnstr_get(x_10, 1); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_10, 2); -lean::inc(x_66); -lean::dec(x_10); -x_67 = lean::cnstr_get(x_26, 0); -lean::inc(x_67); -lean::dec(x_26); -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -lean::dec(x_67); -x_69 = l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4___rarg(x_1, x_68); -lean::dec(x_68); -x_70 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_69, x_4, x_65, x_64); -lean::dec(x_4); -lean::dec(x_69); -x_71 = !lean::is_exclusive(x_70); -if (x_71 == 0) -{ -obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_72 = lean::cnstr_get(x_70, 0); -x_73 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_73, x_72); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_66, x_74); -lean::cnstr_set(x_70, 0, x_75); -return x_70; -} -else -{ -obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_76 = lean::cnstr_get(x_70, 0); -x_77 = lean::cnstr_get(x_70, 1); -lean::inc(x_77); -lean::inc(x_76); -lean::dec(x_70); -x_78 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_78, x_76); -x_80 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_66, x_79); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_77); -return x_81; -} -} -default: -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; -x_82 = lean::cnstr_get(x_9, 1); -lean::inc(x_82); -lean::dec(x_9); -x_83 = lean::cnstr_get(x_10, 1); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_10, 2); -lean::inc(x_84); -lean::dec(x_10); -x_85 = lean::box(0); -x_86 = l_String_splitAux___main___closed__1; -x_87 = l_mjoin___rarg___closed__1; -x_88 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_86, x_87, x_85, x_85, x_4, x_83, x_82); -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -if (lean::obj_tag(x_89) == 0) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; uint8 x_96; -x_90 = lean::cnstr_get(x_88, 1); -lean::inc(x_90); -lean::dec(x_88); -x_91 = lean::cnstr_get(x_89, 0); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_89, 1); -lean::inc(x_92); -x_93 = lean::cnstr_get(x_89, 2); -lean::inc(x_93); -lean::dec(x_89); -x_94 = l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5___rarg(x_1, x_91); -lean::dec(x_91); -x_95 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_94, x_4, x_92, x_90); -lean::dec(x_4); -lean::dec(x_94); -x_96 = !lean::is_exclusive(x_95); -if (x_96 == 0) -{ -obj* x_97; obj* x_98; obj* x_99; -x_97 = lean::cnstr_get(x_95, 0); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_93, x_97); -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_98); -lean::cnstr_set(x_95, 0, x_99); -return x_95; -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_100 = lean::cnstr_get(x_95, 0); -x_101 = lean::cnstr_get(x_95, 1); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_95); -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_93, x_100); -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_102); -x_104 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_101); -return x_104; -} -} -else -{ -uint8 x_105; -lean::dec(x_4); -x_105 = !lean::is_exclusive(x_88); -if (x_105 == 0) -{ -obj* x_106; uint8 x_107; -x_106 = lean::cnstr_get(x_88, 0); -lean::dec(x_106); -x_107 = !lean::is_exclusive(x_89); -if (x_107 == 0) -{ -obj* x_108; -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_89); -lean::cnstr_set(x_88, 0, x_108); -return x_88; -} -else -{ -obj* x_109; uint8 x_110; obj* x_111; obj* x_112; -x_109 = lean::cnstr_get(x_89, 0); -x_110 = lean::cnstr_get_scalar(x_89, sizeof(void*)*1); -lean::inc(x_109); -lean::dec(x_89); -x_111 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_111, 0, x_109); -lean::cnstr_set_scalar(x_111, sizeof(void*)*1, x_110); -x_112 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_111); -lean::cnstr_set(x_88, 0, x_112); -return x_88; -} -} -else -{ -obj* x_113; obj* x_114; uint8 x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_113 = lean::cnstr_get(x_88, 1); -lean::inc(x_113); -lean::dec(x_88); -x_114 = lean::cnstr_get(x_89, 0); -lean::inc(x_114); -x_115 = lean::cnstr_get_scalar(x_89, sizeof(void*)*1); -if (lean::is_exclusive(x_89)) { - lean::cnstr_release(x_89, 0); - x_116 = x_89; -} else { - lean::dec_ref(x_89); - x_116 = lean::box(0); -} -if (lean::is_scalar(x_116)) { - x_117 = lean::alloc_cnstr(1, 1, 1); -} else { - x_117 = x_116; -} -lean::cnstr_set(x_117, 0, x_114); -lean::cnstr_set_scalar(x_117, sizeof(void*)*1, x_115); -x_118 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_117); -x_119 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_119, 1, x_113); -return x_119; -} -} -} -} -} -} -else -{ -uint8 x_120; -lean::dec(x_4); -x_120 = !lean::is_exclusive(x_9); -if (x_120 == 0) -{ -obj* x_121; uint8 x_122; -x_121 = lean::cnstr_get(x_9, 0); -lean::dec(x_121); -x_122 = !lean::is_exclusive(x_10); -if (x_122 == 0) -{ -return x_9; -} -else -{ -obj* x_123; uint8 x_124; obj* x_125; -x_123 = lean::cnstr_get(x_10, 0); -x_124 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_123); -lean::dec(x_10); -x_125 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_125, 0, x_123); -lean::cnstr_set_scalar(x_125, sizeof(void*)*1, x_124); -lean::cnstr_set(x_9, 0, x_125); -return x_9; -} -} -else -{ -obj* x_126; obj* x_127; uint8 x_128; obj* x_129; obj* x_130; obj* x_131; -x_126 = lean::cnstr_get(x_9, 1); -lean::inc(x_126); -lean::dec(x_9); -x_127 = lean::cnstr_get(x_10, 0); -lean::inc(x_127); -x_128 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_129 = x_10; -} else { - lean::dec_ref(x_10); - x_129 = lean::box(0); -} -if (lean::is_scalar(x_129)) { - x_130 = lean::alloc_cnstr(1, 1, 1); -} else { - x_130 = x_129; -} -lean::cnstr_set(x_130, 0, x_127); -lean::cnstr_set_scalar(x_130, sizeof(void*)*1, x_128); -x_131 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_126); -return x_131; -} -} -} -} -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1___rarg___boxed), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8___rarg(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_11; obj* x_12; obj* x_24; obj* x_25; obj* x_30; obj* x_31; -lean::inc(x_9); -x_30 = lean::apply_6(x_3, x_5, x_6, x_7, x_8, x_9, x_10); -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_32 = lean::cnstr_get(x_30, 1); -lean::inc(x_32); -lean::dec(x_30); -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_31, 2); -lean::inc(x_35); -if (lean::is_exclusive(x_31)) { - lean::cnstr_release(x_31, 0); - lean::cnstr_release(x_31, 1); - lean::cnstr_release(x_31, 2); - x_36 = x_31; -} else { - lean::dec_ref(x_31); - x_36 = lean::box(0); -} -if (lean::obj_tag(x_4) == 0) -{ -obj* x_47; -x_47 = lean::cnstr_get(x_4, 2); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; uint8 x_52; -lean::dec(x_36); -x_48 = lean::cnstr_get(x_4, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_4, 1); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_34, 1); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_49, 1); -lean::inc(x_51); -lean::dec(x_49); -x_52 = lean::nat_dec_lt(x_50, x_51); -if (x_52 == 0) -{ -uint8 x_53; -x_53 = lean::nat_dec_lt(x_51, x_50); -lean::dec(x_50); -lean::dec(x_51); -if (x_53 == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_33); -lean::cnstr_set(x_54, 1, x_48); -lean::inc(x_34); -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_34); -lean::cnstr_set(x_55, 2, x_47); -lean::inc(x_1); -x_56 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_56, 0, x_1); -lean::closure_set(x_56, 1, x_1); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_58 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_58, 0, x_55); -lean::cnstr_set(x_58, 1, x_34); -lean::cnstr_set(x_58, 2, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_58); -x_24 = x_59; -x_25 = x_32; -goto block_29; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -lean::dec(x_48); -x_60 = lean::box(0); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_33); -lean::cnstr_set(x_61, 1, x_60); -lean::inc(x_34); -x_62 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_34); -lean::cnstr_set(x_62, 2, x_47); -lean::inc(x_1); -x_63 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_63, 0, x_1); -lean::closure_set(x_63, 1, x_1); -x_64 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_64, 0, x_63); -x_65 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_65, 0, x_62); -lean::cnstr_set(x_65, 1, x_34); -lean::cnstr_set(x_65, 2, x_64); -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_65); -x_24 = x_66; -x_25 = x_32; -goto block_29; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; -lean::dec(x_51); -lean::dec(x_50); -lean::dec(x_48); -lean::dec(x_33); -lean::inc(x_1); -x_67 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_67, 0, x_1); -lean::closure_set(x_67, 1, x_1); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::inc(x_4); -x_69 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_69, 0, x_4); -lean::cnstr_set(x_69, 1, x_34); -lean::cnstr_set(x_69, 2, x_68); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_69); -x_24 = x_70; -x_25 = x_32; -goto block_29; -} -} -else -{ -obj* x_71; -lean::dec(x_47); -x_71 = lean::box(0); -x_37 = x_71; -goto block_46; -} -} -else -{ -obj* x_72; -x_72 = lean::box(0); -x_37 = x_72; -goto block_46; -} -block_46: -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -lean::dec(x_37); -x_38 = lean::box(0); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_33); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::box(0); -lean::inc(x_34); -if (lean::is_scalar(x_36)) { - x_41 = lean::alloc_cnstr(0, 3, 0); -} else { - x_41 = x_36; -} -lean::cnstr_set(x_41, 0, x_39); -lean::cnstr_set(x_41, 1, x_34); -lean::cnstr_set(x_41, 2, x_40); -lean::inc(x_1); -x_42 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_42, 0, x_1); -lean::closure_set(x_42, 1, x_1); -x_43 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_43, 0, x_42); -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_41); -lean::cnstr_set(x_44, 1, x_34); -lean::cnstr_set(x_44, 2, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_44); -x_24 = x_45; -x_25 = x_32; -goto block_29; -} -} -else -{ -obj* x_73; uint8 x_74; -lean::dec(x_1); -x_73 = lean::cnstr_get(x_30, 1); -lean::inc(x_73); -lean::dec(x_30); -x_74 = !lean::is_exclusive(x_31); -if (x_74 == 0) -{ -x_24 = x_31; -x_25 = x_73; -goto block_29; -} -else -{ -obj* x_75; uint8 x_76; obj* x_77; -x_75 = lean::cnstr_get(x_31, 0); -x_76 = lean::cnstr_get_scalar(x_31, sizeof(void*)*1); -lean::inc(x_75); -lean::dec(x_31); -x_77 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_77, 0, x_75); -lean::cnstr_set_scalar(x_77, sizeof(void*)*1, x_76); -x_24 = x_77; -x_25 = x_73; -goto block_29; -} -} -block_23: -{ -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_13; -x_13 = !lean::is_exclusive(x_11); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::cnstr_get(x_11, 2); -lean::dec(x_14); -x_15 = lean::cnstr_get(x_11, 1); -lean::dec(x_15); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_11, 2, x_16); -lean::cnstr_set(x_11, 1, x_9); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_11); -lean::cnstr_set(x_17, 1, x_12); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_9); -lean::cnstr_set(x_20, 2, x_19); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_12); -return x_21; -} -} -else -{ -obj* x_22; -lean::dec(x_9); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_11); -lean::cnstr_set(x_22, 1, x_12); -return x_22; -} -} -block_29: -{ -if (lean::obj_tag(x_24) == 0) -{ -lean::dec(x_4); -lean::dec(x_2); -x_11 = x_24; -x_12 = x_25; -goto block_23; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -lean::dec(x_24); -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -lean::dec(x_26); -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_4); -lean::cnstr_set(x_28, 1, x_27); -lean::cnstr_set(x_28, 2, x_2); -x_11 = x_28; -x_12 = x_25; -goto block_23; -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8___rarg), 10, 0); -return x_2; -} -} -obj* l_List_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9(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) { -_start: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_2); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_10); -lean::cnstr_set(x_13, 2, x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_11); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_5, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_5, 1); -lean::inc(x_16); -lean::dec(x_5); -lean::inc(x_9); -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_3); -lean::inc(x_2); -x_17 = l_List_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9(x_1, x_2, x_3, x_4, x_16, x_6, x_7, x_8, x_9, x_10, x_11); -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_19 = lean::cnstr_get(x_17, 1); -lean::inc(x_19); -lean::dec(x_17); -x_20 = lean::cnstr_get(x_18, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get(x_18, 1); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_18, 2); -lean::inc(x_22); -lean::dec(x_18); -x_23 = l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8___rarg(x_2, x_3, x_15, x_20, x_6, x_7, x_8, x_9, x_21, x_19); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_23, 0); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_25); -lean::cnstr_set(x_23, 0, x_26); -return x_23; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_23, 0); -x_28 = lean::cnstr_get(x_23, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_23); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_27); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_28); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_2); -x_31 = !lean::is_exclusive(x_17); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_17, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_18); -if (x_33 == 0) -{ -return x_17; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_18, 0); -x_35 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_18); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_17, 0, x_36); -return x_17; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_17, 1); -lean::inc(x_37); -lean::dec(x_17); -x_38 = lean::cnstr_get(x_18, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - x_40 = x_18; -} else { - lean::dec_ref(x_18); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -} -obj* l_Lean_Parser_MonadParsec_longestMatch___at___private_init_lean_parser_term_1__trailing___spec__7(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_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_8 = lean::box(0); -x_9 = l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1; -x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_6); -x_11 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg(x_9, x_10, x_8, x_8, x_6); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_6); -x_13 = l_List_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9(x_6, x_10, x_12, x_11, x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_6); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = lean::cnstr_get(x_13, 0); -lean::dec(x_16); -x_17 = lean::cnstr_get(x_14, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_14, 2); -lean::inc(x_18); -lean::dec(x_14); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_17); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_19); -lean::cnstr_set(x_13, 0, x_20); -return x_13; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_21 = lean::cnstr_get(x_13, 1); -lean::inc(x_21); -lean::dec(x_13); -x_22 = lean::cnstr_get(x_14, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_14, 2); -lean::inc(x_23); -lean::dec(x_14); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_22); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_21); -return x_26; -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_13); -if (x_27 == 0) -{ -obj* x_28; uint8 x_29; -x_28 = lean::cnstr_get(x_13, 0); -lean::dec(x_28); -x_29 = !lean::is_exclusive(x_14); -if (x_29 == 0) -{ -obj* x_30; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_14); -lean::cnstr_set(x_13, 0, x_30); -return x_13; -} -else -{ -obj* x_31; uint8 x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_14, 0); -x_32 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -lean::inc(x_31); -lean::dec(x_14); -x_33 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_32); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_33); -lean::cnstr_set(x_13, 0, x_34); -return x_13; -} -} -else -{ -obj* x_35; obj* x_36; uint8 x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_35 = lean::cnstr_get(x_13, 1); -lean::inc(x_35); -lean::dec(x_13); -x_36 = lean::cnstr_get(x_14, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -if (lean::is_exclusive(x_14)) { - lean::cnstr_release(x_14, 0); - x_38 = x_14; -} else { - lean::dec_ref(x_14); - x_38 = lean::box(0); -} -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_36); -lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_39); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_35); -return x_41; -} -} -} -} -obj* l_Lean_Parser_Combinators_longestMatch___at___private_init_lean_parser_term_1__trailing___spec__6(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; -x_8 = l_Lean_Parser_MonadParsec_longestMatch___at___private_init_lean_parser_term_1__trailing___spec__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - x_11 = x_8; -} else { - lean::dec_ref(x_8); - x_11 = lean::box(0); -} -x_12 = lean::cnstr_get(x_9, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_9, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_9, 2); -lean::inc(x_14); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_15 = x_9; -} else { - lean::dec_ref(x_9); - x_15 = lean::box(0); -} -if (lean::obj_tag(x_12) == 0) -{ -obj* x_24; -x_24 = lean::box(0); -x_16 = x_24; -goto block_23; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_12, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_15); -lean::dec(x_11); -x_26 = lean::cnstr_get(x_12, 0); -lean::inc(x_26); -lean::dec(x_12); -x_27 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_28 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_13); -lean::cnstr_set(x_28, 2, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_10); -return x_30; -} -else -{ -obj* x_31; -lean::dec(x_25); -x_31 = lean::box(0); -x_16 = x_31; -goto block_23; -} -} -block_23: -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -lean::dec(x_16); -x_17 = l_Lean_Parser_choice; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_12); -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_15)) { - x_20 = lean::alloc_cnstr(0, 3, 0); -} else { - x_20 = x_15; -} -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_13); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_20); -if (lean::is_scalar(x_11)) { - x_22 = lean::alloc_cnstr(0, 2, 0); -} else { - x_22 = x_11; -} -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_10); -return x_22; -} -} -else -{ -uint8 x_32; -x_32 = !lean::is_exclusive(x_8); -if (x_32 == 0) -{ -obj* x_33; uint8 x_34; -x_33 = lean::cnstr_get(x_8, 0); -lean::dec(x_33); -x_34 = !lean::is_exclusive(x_9); -if (x_34 == 0) -{ -return x_8; -} -else -{ -obj* x_35; uint8 x_36; obj* x_37; -x_35 = lean::cnstr_get(x_9, 0); -x_36 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_35); -lean::dec(x_9); -x_37 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_36); -lean::cnstr_set(x_8, 0, x_37); -return x_8; -} -} -else -{ -obj* x_38; obj* x_39; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; -x_38 = lean::cnstr_get(x_8, 1); -lean::inc(x_38); -lean::dec(x_8); -x_39 = lean::cnstr_get(x_9, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_41 = x_9; -} else { - lean::dec_ref(x_9); - x_41 = lean::box(0); -} -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_39); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_38); -return x_43; -} -} -} -} -obj* l_ReaderT_orelse___at___private_init_lean_parser_term_1__trailing___spec__11___rarg(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_9; obj* x_10; -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -x_9 = lean::apply_6(x_1, x_3, x_4, x_5, x_6, x_7, x_8); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; -x_12 = lean::cnstr_get(x_9, 0); -lean::dec(x_12); -return x_9; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 1); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_10); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -uint8 x_15; -x_15 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -x_16 = lean::cnstr_get(x_9, 1); -lean::inc(x_16); -lean::dec(x_9); -x_17 = lean::cnstr_get(x_10, 0); -lean::inc(x_17); -lean::dec(x_10); -x_18 = lean::apply_6(x_2, x_3, x_4, x_5, x_6, x_7, x_16); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_17, x_20); -lean::cnstr_set(x_18, 0, x_21); -return x_18; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_18, 0); -x_23 = lean::cnstr_get(x_18, 1); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_18); -x_24 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_17, x_22); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -return x_25; -} -} -else -{ -uint8 x_26; -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_26 = !lean::is_exclusive(x_9); -if (x_26 == 0) -{ -obj* x_27; -x_27 = lean::cnstr_get(x_9, 0); -lean::dec(x_27); -return x_9; -} -else -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_9, 1); -lean::inc(x_28); -lean::dec(x_9); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_10); -lean::cnstr_set(x_29, 1, x_28); -return x_29; -} -} -} -} -} -obj* l_ReaderT_orelse___at___private_init_lean_parser_term_1__trailing___spec__11(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at___private_init_lean_parser_term_1__trailing___spec__11___rarg), 8, 0); -return x_2; -} -} -obj* l_List_foldl___main___at___private_init_lean_parser_term_1__trailing___spec__12(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) -{ -obj* x_9; -x_9 = lean::apply_6(x_1, x_3, x_4, x_5, x_6, x_7, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at___private_init_lean_parser_term_1__trailing___spec__11___rarg), 8, 2); -lean::closure_set(x_12, 0, x_1); -lean::closure_set(x_12, 1, x_10); -x_1 = x_12; -x_2 = x_11; -goto _start; -} -} -} -obj* l_Lean_Parser_Combinators_anyOf___at___private_init_lean_parser_term_1__trailing___spec__10(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::box(0); -x_9 = l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -x_10 = l_mjoin___rarg___closed__1; -x_11 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_1, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_1, 1); -lean::inc(x_13); -lean::dec(x_1); -x_14 = l_List_foldl___main___at___private_init_lean_parser_term_1__trailing___spec__12(x_12, x_13, x_2, x_3, x_4, x_5, x_6, x_7); -return x_14; -} -} -} -obj* l_List_foldr___main___at___private_init_lean_parser_term_1__trailing___spec__13(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) -{ -obj* x_9; -x_9 = lean::apply_6(x_1, x_3, x_4, x_5, x_6, x_7, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_2, 1); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::alloc_closure(reinterpret_cast(l_List_foldr___main___at___private_init_lean_parser_term_1__trailing___spec__13), 8, 2); -lean::closure_set(x_12, 0, x_1); -lean::closure_set(x_12, 1, x_11); -x_13 = l_ReaderT_orelse___at___private_init_lean_parser_term_1__trailing___spec__11___rarg(x_10, x_12, x_3, x_4, x_5, x_6, x_7, x_8); -return x_13; -} -} -} -obj* _init_l___private_init_lean_parser_term_1__trailing___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_app_Parser), 6, 0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Term_sortApp_Parser), 6, 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); -return x_5; -} -} -obj* _init_l___private_init_lean_parser_term_1__trailing___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string(""); -x_3 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView___spec__5___rarg___boxed), 10, 4); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -lean::closure_set(x_4, 2, x_1); -lean::closure_set(x_4, 3, x_1); -return x_4; -} -} -obj* l___private_init_lean_parser_term_1__trailing(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_10; obj* x_11; obj* x_87; obj* x_88; -x_8 = lean::cnstr_get(x_1, 4); -x_9 = lean::cnstr_get(x_1, 2); -lean::inc(x_6); -lean::inc(x_4); -x_87 = l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1___rarg(x_8, x_2, x_3, x_4, x_5, x_6, x_7); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -lean::dec(x_87); -x_90 = lean::cnstr_get(x_88, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_88, 1); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_88, 2); -lean::inc(x_92); -lean::dec(x_88); -x_93 = l___private_init_lean_parser_term_1__trailing___closed__2; -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -lean::inc(x_2); -x_94 = l_List_foldr___main___at___private_init_lean_parser_term_1__trailing___spec__13(x_93, x_90, x_2, x_3, x_4, x_5, x_91, x_89); -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_94, 1); -lean::inc(x_96); -lean::dec(x_94); -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_95); -x_10 = x_97; -x_11 = x_96; -goto block_86; -} -else -{ -obj* x_98; uint8 x_99; -x_98 = lean::cnstr_get(x_87, 1); -lean::inc(x_98); -lean::dec(x_87); -x_99 = !lean::is_exclusive(x_88); -if (x_99 == 0) -{ -x_10 = x_88; -x_11 = x_98; -goto block_86; -} -else -{ -obj* x_100; uint8 x_101; obj* x_102; -x_100 = lean::cnstr_get(x_88, 0); -x_101 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -lean::inc(x_100); -lean::dec(x_88); -x_102 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_102, 0, x_100); -lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_101); -x_10 = x_102; -x_11 = x_98; -goto block_86; -} -} -block_86: -{ -if (lean::obj_tag(x_10) == 0) -{ -obj* x_12; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -uint8 x_13; -x_13 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -lean::inc(x_6); -lean::inc(x_4); -x_15 = l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1___rarg(x_9, x_2, x_3, x_4, x_5, x_6, x_11); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 x_22; -x_17 = lean::cnstr_get(x_15, 1); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_16, 1); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_16, 2); -lean::inc(x_20); -lean::dec(x_16); -lean::inc(x_5); -lean::inc(x_4); -lean::inc(x_3); -lean::inc(x_2); -x_21 = l_Lean_Parser_Combinators_longestMatch___at___private_init_lean_parser_term_1__trailing___spec__6(x_18, x_2, x_3, x_4, x_5, x_19, x_17); -x_22 = !lean::is_exclusive(x_21); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; -x_23 = lean::cnstr_get(x_21, 0); -x_24 = lean::cnstr_get(x_21, 1); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_23); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_26 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_25); -lean::cnstr_set(x_21, 0, x_26); -return x_21; -} -else -{ -uint8 x_27; -x_27 = lean::cnstr_get_scalar(x_25, sizeof(void*)*1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; uint8 x_31; -lean::free_heap_obj(x_21); -x_28 = lean::cnstr_get(x_25, 0); -lean::inc(x_28); -lean::dec(x_25); -x_29 = l___private_init_lean_parser_term_1__trailing___closed__1; -x_30 = l_Lean_Parser_Combinators_anyOf___at___private_init_lean_parser_term_1__trailing___spec__10(x_29, x_2, x_3, x_4, x_5, x_6, x_24); -x_31 = !lean::is_exclusive(x_30); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; -x_32 = lean::cnstr_get(x_30, 0); -x_33 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_28, x_32); -x_34 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_33); -lean::cnstr_set(x_30, 0, x_34); -return x_30; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_35 = lean::cnstr_get(x_30, 0); -x_36 = lean::cnstr_get(x_30, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_30); -x_37 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_28, x_35); -x_38 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_36); -return x_39; -} -} -else -{ -obj* x_40; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_40 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_25); -lean::cnstr_set(x_21, 0, x_40); -return x_21; -} -} -} -else -{ -obj* x_41; obj* x_42; obj* x_43; -x_41 = lean::cnstr_get(x_21, 0); -x_42 = lean::cnstr_get(x_21, 1); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_21); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_41); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_44 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_43); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_42); -return x_45; -} -else -{ -uint8 x_46; -x_46 = lean::cnstr_get_scalar(x_43, sizeof(void*)*1); -if (x_46 == 0) -{ -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; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = l___private_init_lean_parser_term_1__trailing___closed__1; -x_49 = l_Lean_Parser_Combinators_anyOf___at___private_init_lean_parser_term_1__trailing___spec__10(x_48, x_2, x_3, x_4, x_5, x_6, x_42); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_49, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_52 = x_49; -} else { - lean::dec_ref(x_49); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_47, x_50); -x_54 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_53); -if (lean::is_scalar(x_52)) { - x_55 = lean::alloc_cnstr(0, 2, 0); -} else { - x_55 = x_52; -} -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_51); -return x_55; -} -else -{ -obj* x_56; obj* x_57; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_56 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_43); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_42); -return x_57; -} -} -} -} -else -{ -uint8 x_58; -x_58 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); -if (x_58 == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; uint8 x_63; -x_59 = lean::cnstr_get(x_15, 1); -lean::inc(x_59); -lean::dec(x_15); -x_60 = lean::cnstr_get(x_16, 0); -lean::inc(x_60); -lean::dec(x_16); -x_61 = l___private_init_lean_parser_term_1__trailing___closed__1; -x_62 = l_Lean_Parser_Combinators_anyOf___at___private_init_lean_parser_term_1__trailing___spec__10(x_61, x_2, x_3, x_4, x_5, x_6, x_59); -x_63 = !lean::is_exclusive(x_62); -if (x_63 == 0) -{ -obj* x_64; obj* x_65; obj* x_66; -x_64 = lean::cnstr_get(x_62, 0); -x_65 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_60, x_64); -x_66 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_65); -lean::cnstr_set(x_62, 0, x_66); -return x_62; -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_67 = lean::cnstr_get(x_62, 0); -x_68 = lean::cnstr_get(x_62, 1); -lean::inc(x_68); -lean::inc(x_67); -lean::dec(x_62); -x_69 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_60, x_67); -x_70 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_69); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_68); -return x_71; -} -} -else -{ -uint8 x_72; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_72 = !lean::is_exclusive(x_15); -if (x_72 == 0) -{ -obj* x_73; uint8 x_74; -x_73 = lean::cnstr_get(x_15, 0); -lean::dec(x_73); -x_74 = !lean::is_exclusive(x_16); -if (x_74 == 0) -{ -obj* x_75; -x_75 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_16); -lean::cnstr_set(x_15, 0, x_75); -return x_15; -} -else -{ -obj* x_76; obj* x_77; obj* x_78; -x_76 = lean::cnstr_get(x_16, 0); -lean::inc(x_76); -lean::dec(x_16); -x_77 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set_scalar(x_77, sizeof(void*)*1, x_58); -x_78 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_77); -lean::cnstr_set(x_15, 0, x_78); -return x_15; -} -} -else -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; -x_79 = lean::cnstr_get(x_15, 1); -lean::inc(x_79); -lean::dec(x_15); -x_80 = lean::cnstr_get(x_16, 0); -lean::inc(x_80); -if (lean::is_exclusive(x_16)) { - lean::cnstr_release(x_16, 0); - x_81 = x_16; -} else { - lean::dec_ref(x_16); - x_81 = lean::box(0); -} -if (lean::is_scalar(x_81)) { - x_82 = lean::alloc_cnstr(1, 1, 1); -} else { - x_82 = x_81; -} -lean::cnstr_set(x_82, 0, x_80); -lean::cnstr_set_scalar(x_82, sizeof(void*)*1, x_58); -x_83 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_82); -x_84 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_79); -return x_84; -} -} -} -} -else -{ -obj* x_85; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_85 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_85, 0, x_10); -lean::cnstr_set(x_85, 1, x_11); -return x_85; -} -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__3___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__4___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_parser_term_1__trailing___spec__5___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1___rarg___boxed(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; -x_8 = l_Lean_Parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_List_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9___boxed(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) { -_start: -{ -obj* x_12; -x_12 = l_List_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); -lean::dec(x_1); -return x_12; -} -} -obj* l___private_init_lean_parser_term_1__trailing___boxed(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; -x_8 = l___private_init_lean_parser_term_1__trailing(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_1); -return x_8; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l_Lean_Parser_peekToken___closed__1; -lean::inc(x_3); -x_8 = l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(x_7, x_3, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; -lean::dec(x_10); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -lean::dec(x_8); -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_9, 2); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::box(0); -x_15 = l_String_splitAux___main___closed__1; -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_15, x_16, x_14, x_14, x_3, x_12, x_11); -lean::dec(x_3); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_19); -lean::cnstr_set(x_17, 0, x_20); -return x_17; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_17, 0); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_17); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_21); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -return x_24; -} -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_10, 0); -lean::inc(x_25); -lean::dec(x_10); -switch (lean::obj_tag(x_25)) { -case 0: -{ -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; uint8 x_35; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::dec(x_25); -x_27 = lean::cnstr_get(x_8, 1); -lean::inc(x_27); -lean::dec(x_8); -x_28 = lean::cnstr_get(x_9, 1); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_9, 2); -lean::inc(x_29); -lean::dec(x_9); -x_30 = lean::cnstr_get(x_26, 1); -lean::inc(x_30); -lean::dec(x_26); -x_31 = lean::box(0); -x_32 = lean_name_mk_string(x_31, x_30); -x_33 = l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2___rarg(x_1, x_32); -lean::dec(x_32); -x_34 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_33, x_3, x_28, x_27); -lean::dec(x_3); -lean::dec(x_33); -x_35 = !lean::is_exclusive(x_34); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_34, 0); -x_37 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_36); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_38); -lean::cnstr_set(x_34, 0, x_39); -return x_34; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_34, 0); -x_41 = lean::cnstr_get(x_34, 1); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_34); -x_42 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_40); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_43); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_41); -return x_45; -} -} -case 1: -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; uint8 x_52; -lean::dec(x_25); -x_46 = lean::cnstr_get(x_8, 1); -lean::inc(x_46); -lean::dec(x_8); -x_47 = lean::cnstr_get(x_9, 1); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_9, 2); -lean::inc(x_48); -lean::dec(x_9); -x_49 = l_Lean_Parser_indexed___rarg___lambda__1___closed__1; -x_50 = l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3___rarg(x_1, x_49); -x_51 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_50, x_3, x_47, x_46); -lean::dec(x_3); -lean::dec(x_50); -x_52 = !lean::is_exclusive(x_51); -if (x_52 == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_53 = lean::cnstr_get(x_51, 0); -x_54 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_54, x_53); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_55); -lean::cnstr_set(x_51, 0, x_56); -return x_51; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_57 = lean::cnstr_get(x_51, 0); -x_58 = lean::cnstr_get(x_51, 1); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_51); -x_59 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_57); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_60); -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_58); -return x_62; -} -} -case 2: -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; uint8 x_70; -x_63 = lean::cnstr_get(x_8, 1); -lean::inc(x_63); -lean::dec(x_8); -x_64 = lean::cnstr_get(x_9, 1); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_9, 2); -lean::inc(x_65); -lean::dec(x_9); -x_66 = lean::cnstr_get(x_25, 0); -lean::inc(x_66); -lean::dec(x_25); -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -lean::dec(x_66); -x_68 = l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4___rarg(x_1, x_67); -lean::dec(x_67); -x_69 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_68, x_3, x_64, x_63); -lean::dec(x_3); -lean::dec(x_68); -x_70 = !lean::is_exclusive(x_69); -if (x_70 == 0) -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_71 = lean::cnstr_get(x_69, 0); -x_72 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_71); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_73); -lean::cnstr_set(x_69, 0, x_74); -return x_69; -} -else -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_75 = lean::cnstr_get(x_69, 0); -x_76 = lean::cnstr_get(x_69, 1); -lean::inc(x_76); -lean::inc(x_75); -lean::dec(x_69); -x_77 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_78 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_75); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_78); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_76); -return x_80; -} -} -default: -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_81 = lean::cnstr_get(x_8, 1); -lean::inc(x_81); -lean::dec(x_8); -x_82 = lean::cnstr_get(x_9, 1); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_9, 2); -lean::inc(x_83); -lean::dec(x_9); -x_84 = lean::box(0); -x_85 = l_String_splitAux___main___closed__1; -x_86 = l_mjoin___rarg___closed__1; -x_87 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_85, x_86, x_84, x_84, x_3, x_82, x_81); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; uint8 x_95; -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -lean::dec(x_87); -x_90 = lean::cnstr_get(x_88, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_88, 1); -lean::inc(x_91); -x_92 = lean::cnstr_get(x_88, 2); -lean::inc(x_92); -lean::dec(x_88); -x_93 = l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5___rarg(x_1, x_90); -lean::dec(x_90); -x_94 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_93, x_3, x_91, x_89); -lean::dec(x_3); -lean::dec(x_93); -x_95 = !lean::is_exclusive(x_94); -if (x_95 == 0) -{ -obj* x_96; obj* x_97; obj* x_98; -x_96 = lean::cnstr_get(x_94, 0); -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_96); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_97); -lean::cnstr_set(x_94, 0, x_98); -return x_94; -} -else -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_99 = lean::cnstr_get(x_94, 0); -x_100 = lean::cnstr_get(x_94, 1); -lean::inc(x_100); -lean::inc(x_99); -lean::dec(x_94); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_99); -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_101); -x_103 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_100); -return x_103; -} -} -else -{ -uint8 x_104; -lean::dec(x_3); -x_104 = !lean::is_exclusive(x_87); -if (x_104 == 0) -{ -obj* x_105; uint8 x_106; -x_105 = lean::cnstr_get(x_87, 0); -lean::dec(x_105); -x_106 = !lean::is_exclusive(x_88); -if (x_106 == 0) -{ -obj* x_107; -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_88); -lean::cnstr_set(x_87, 0, x_107); -return x_87; -} -else -{ -obj* x_108; uint8 x_109; obj* x_110; obj* x_111; -x_108 = lean::cnstr_get(x_88, 0); -x_109 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -lean::inc(x_108); -lean::dec(x_88); -x_110 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_110, 0, x_108); -lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_109); -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_110); -lean::cnstr_set(x_87, 0, x_111); -return x_87; -} -} -else -{ -obj* x_112; obj* x_113; uint8 x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_112 = lean::cnstr_get(x_87, 1); -lean::inc(x_112); -lean::dec(x_87); -x_113 = lean::cnstr_get(x_88, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -if (lean::is_exclusive(x_88)) { - lean::cnstr_release(x_88, 0); - x_115 = x_88; -} else { - lean::dec_ref(x_88); - x_115 = lean::box(0); -} -if (lean::is_scalar(x_115)) { - x_116 = lean::alloc_cnstr(1, 1, 1); -} else { - x_116 = x_115; -} -lean::cnstr_set(x_116, 0, x_113); -lean::cnstr_set_scalar(x_116, sizeof(void*)*1, x_114); -x_117 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_116); -x_118 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_118, 0, x_117); -lean::cnstr_set(x_118, 1, x_112); -return x_118; -} -} -} -} -} -} -else -{ -uint8 x_119; -lean::dec(x_3); -x_119 = !lean::is_exclusive(x_8); -if (x_119 == 0) -{ -obj* x_120; uint8 x_121; -x_120 = lean::cnstr_get(x_8, 0); -lean::dec(x_120); -x_121 = !lean::is_exclusive(x_9); -if (x_121 == 0) -{ -return x_8; -} -else -{ -obj* x_122; uint8 x_123; obj* x_124; -x_122 = lean::cnstr_get(x_9, 0); -x_123 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_122); -lean::dec(x_9); -x_124 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_124, 0, x_122); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_123); -lean::cnstr_set(x_8, 0, x_124); -return x_8; -} -} -else -{ -obj* x_125; obj* x_126; uint8 x_127; obj* x_128; obj* x_129; obj* x_130; -x_125 = lean::cnstr_get(x_8, 1); -lean::inc(x_125); -lean::dec(x_8); -x_126 = lean::cnstr_get(x_9, 0); -lean::inc(x_126); -x_127 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_128 = x_9; -} else { - lean::dec_ref(x_9); - x_128 = lean::box(0); -} -if (lean::is_scalar(x_128)) { - x_129 = lean::alloc_cnstr(1, 1, 1); -} else { - x_129 = x_128; -} -lean::cnstr_set(x_129, 0, x_126); -lean::cnstr_set_scalar(x_129, sizeof(void*)*1, x_127); -x_130 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_125); -return x_130; -} -} -} -} -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_List_foldr___main___at___private_init_lean_parser_term_2__leading___spec__6(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_8; -x_8 = lean::apply_5(x_1, x_3, x_4, x_5, x_6, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -lean::dec(x_2); -x_11 = lean::alloc_closure(reinterpret_cast(l_List_foldr___main___at___private_init_lean_parser_term_2__leading___spec__6), 7, 2); -lean::closure_set(x_11, 0, x_1); -lean::closure_set(x_11, 1, x_10); -x_12 = l_ReaderT_orelse___at_Lean_Parser_command_NotationSpec_foldAction_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_9, x_11, x_3, x_4, x_5, x_6, x_7); -return x_12; -} -} -} -obj* l_Lean_Parser_Combinators_longestMatch___at___private_init_lean_parser_term_2__leading___spec__7(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_MonadParsec_longestMatch___at_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___spec__3(x_1, x_2, x_3, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - x_10 = x_7; -} else { - lean::dec_ref(x_7); - x_10 = lean::box(0); -} -x_11 = lean::cnstr_get(x_8, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_8, 2); -lean::inc(x_13); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_14 = x_8; -} else { - lean::dec_ref(x_8); - x_14 = lean::box(0); -} -if (lean::obj_tag(x_11) == 0) -{ -obj* x_23; -x_23 = lean::box(0); -x_15 = x_23; -goto block_22; -} -else -{ -obj* x_24; -x_24 = lean::cnstr_get(x_11, 1); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -lean::dec(x_14); -lean::dec(x_10); -x_25 = lean::cnstr_get(x_11, 0); -lean::inc(x_25); -lean::dec(x_11); -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_27 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_12); -lean::cnstr_set(x_27, 2, x_26); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_9); -return x_29; -} -else -{ -obj* x_30; -lean::dec(x_24); -x_30 = lean::box(0); -x_15 = x_30; -goto block_22; -} -} -block_22: -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_15); -x_16 = l_Lean_Parser_choice; -x_17 = l_Lean_Parser_Syntax_mkNode(x_16, x_11); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -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_17); -lean::cnstr_set(x_19, 1, x_12); -lean::cnstr_set(x_19, 2, x_18); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_19); -if (lean::is_scalar(x_10)) { - x_21 = lean::alloc_cnstr(0, 2, 0); -} else { - x_21 = x_10; -} -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_9); -return x_21; -} -} -else -{ -uint8 x_31; -x_31 = !lean::is_exclusive(x_7); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_7, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_8); -if (x_33 == 0) -{ -return x_7; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_8, 0); -x_35 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_8); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_7, 0, x_36); -return x_7; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_7, 1); -lean::inc(x_37); -lean::dec(x_7); -x_38 = lean::cnstr_get(x_8, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_40 = x_8; -} else { - lean::dec_ref(x_8); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -obj* _init_l___private_init_lean_parser_term_2__leading___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::mk_string(""); -x_3 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_command_NotationSpec_precedenceLit_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed), 9, 4); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -lean::closure_set(x_4, 2, x_1); -lean::closure_set(x_4, 3, x_1); -return x_4; -} -} -obj* l___private_init_lean_parser_term_2__leading(obj* x_1, obj* 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; -x_7 = lean::cnstr_get(x_1, 3); -x_8 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::inc(x_3); -x_9 = l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg(x_7, x_2, x_3, x_4, x_5, x_6); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; uint8 x_17; -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_10, 2); -lean::inc(x_14); -lean::dec(x_10); -x_15 = l___private_init_lean_parser_term_2__leading___closed__1; -lean::inc(x_4); -lean::inc(x_3); -lean::inc(x_2); -x_16 = l_List_foldr___main___at___private_init_lean_parser_term_2__leading___spec__6(x_15, x_12, x_2, x_3, x_4, x_13, x_11); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_16, 0); -x_19 = lean::cnstr_get(x_16, 1); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_18); -if (lean::obj_tag(x_20) == 0) -{ -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::cnstr_set(x_16, 0, x_20); -return x_16; -} -else -{ -uint8 x_21; -x_21 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; -lean::free_heap_obj(x_16); -x_22 = lean::cnstr_get(x_20, 0); -lean::inc(x_22); -lean::dec(x_20); -lean::inc(x_3); -x_23 = l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg(x_8, x_2, x_3, x_4, x_5, x_19); -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; uint8 x_30; -x_25 = lean::cnstr_get(x_23, 1); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::cnstr_get(x_24, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_24, 2); -lean::inc(x_28); -lean::dec(x_24); -x_29 = l_Lean_Parser_Combinators_longestMatch___at___private_init_lean_parser_term_2__leading___spec__7(x_26, x_2, x_3, x_4, x_27, x_25); -x_30 = !lean::is_exclusive(x_29); -if (x_30 == 0) -{ -obj* x_31; obj* x_32; obj* x_33; -x_31 = lean::cnstr_get(x_29, 0); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_28, x_31); -x_33 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_32); -lean::cnstr_set(x_29, 0, x_33); -return x_29; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_34 = lean::cnstr_get(x_29, 0); -x_35 = lean::cnstr_get(x_29, 1); -lean::inc(x_35); -lean::inc(x_34); -lean::dec(x_29); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_28, x_34); -x_37 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_35); -return x_38; -} -} -else -{ -uint8 x_39; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_39 = !lean::is_exclusive(x_23); -if (x_39 == 0) -{ -obj* x_40; uint8 x_41; -x_40 = lean::cnstr_get(x_23, 0); -lean::dec(x_40); -x_41 = !lean::is_exclusive(x_24); -if (x_41 == 0) -{ -obj* x_42; -x_42 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_24); -lean::cnstr_set(x_23, 0, x_42); -return x_23; -} -else -{ -obj* x_43; uint8 x_44; obj* x_45; obj* x_46; -x_43 = lean::cnstr_get(x_24, 0); -x_44 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); -lean::inc(x_43); -lean::dec(x_24); -x_45 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set_scalar(x_45, sizeof(void*)*1, x_44); -x_46 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_45); -lean::cnstr_set(x_23, 0, x_46); -return x_23; -} -} -else -{ -obj* x_47; obj* x_48; uint8 x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_47 = lean::cnstr_get(x_23, 1); -lean::inc(x_47); -lean::dec(x_23); -x_48 = lean::cnstr_get(x_24, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); -if (lean::is_exclusive(x_24)) { - lean::cnstr_release(x_24, 0); - x_50 = x_24; -} else { - lean::dec_ref(x_24); - x_50 = lean::box(0); -} -if (lean::is_scalar(x_50)) { - x_51 = lean::alloc_cnstr(1, 1, 1); -} else { - x_51 = x_50; -} -lean::cnstr_set(x_51, 0, x_48); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_49); -x_52 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_51); -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_47); -return x_53; -} -} -} -else -{ -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::cnstr_set(x_16, 0, x_20); -return x_16; -} -} -} -else -{ -obj* x_54; obj* x_55; obj* x_56; -x_54 = lean::cnstr_get(x_16, 0); -x_55 = lean::cnstr_get(x_16, 1); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_16); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_54); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_55); -return x_57; -} -else -{ -uint8 x_58; -x_58 = lean::cnstr_get_scalar(x_56, sizeof(void*)*1); -if (x_58 == 0) -{ -obj* x_59; obj* x_60; obj* x_61; -x_59 = lean::cnstr_get(x_56, 0); -lean::inc(x_59); -lean::dec(x_56); -lean::inc(x_3); -x_60 = l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg(x_8, x_2, x_3, x_4, x_5, x_55); -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -if (lean::obj_tag(x_61) == 0) -{ -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; -x_62 = lean::cnstr_get(x_60, 1); -lean::inc(x_62); -lean::dec(x_60); -x_63 = lean::cnstr_get(x_61, 0); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_61, 1); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_61, 2); -lean::inc(x_65); -lean::dec(x_61); -x_66 = l_Lean_Parser_Combinators_longestMatch___at___private_init_lean_parser_term_2__leading___spec__7(x_63, x_2, x_3, x_4, x_64, x_62); -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_66, 1); -lean::inc(x_68); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - x_69 = x_66; -} else { - lean::dec_ref(x_66); - x_69 = lean::box(0); -} -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_67); -x_71 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_59, x_70); -if (lean::is_scalar(x_69)) { - x_72 = lean::alloc_cnstr(0, 2, 0); -} else { - x_72 = x_69; -} -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_68); -return x_72; -} -else -{ -obj* x_73; obj* x_74; obj* x_75; uint8 x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_73 = lean::cnstr_get(x_60, 1); -lean::inc(x_73); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - lean::cnstr_release(x_60, 1); - x_74 = x_60; -} else { - lean::dec_ref(x_60); - x_74 = lean::box(0); -} -x_75 = lean::cnstr_get(x_61, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); -if (lean::is_exclusive(x_61)) { - lean::cnstr_release(x_61, 0); - x_77 = x_61; -} else { - lean::dec_ref(x_61); - x_77 = lean::box(0); -} -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_75); -lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); -x_79 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_59, x_78); -if (lean::is_scalar(x_74)) { - x_80 = lean::alloc_cnstr(0, 2, 0); -} else { - x_80 = x_74; -} -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_73); -return x_80; -} -} -else -{ -obj* x_81; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_56); -lean::cnstr_set(x_81, 1, x_55); -return x_81; -} -} -} -} -else -{ -uint8 x_82; -x_82 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (x_82 == 0) -{ -obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_83 = lean::cnstr_get(x_9, 1); -lean::inc(x_83); -lean::dec(x_9); -x_84 = lean::cnstr_get(x_10, 0); -lean::inc(x_84); -lean::dec(x_10); -lean::inc(x_3); -x_85 = l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg(x_8, x_2, x_3, x_4, x_5, x_83); -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -if (lean::obj_tag(x_86) == 0) -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; uint8 x_92; -x_87 = lean::cnstr_get(x_85, 1); -lean::inc(x_87); -lean::dec(x_85); -x_88 = lean::cnstr_get(x_86, 0); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_86, 1); -lean::inc(x_89); -x_90 = lean::cnstr_get(x_86, 2); -lean::inc(x_90); -lean::dec(x_86); -x_91 = l_Lean_Parser_Combinators_longestMatch___at___private_init_lean_parser_term_2__leading___spec__7(x_88, x_2, x_3, x_4, x_89, x_87); -x_92 = !lean::is_exclusive(x_91); -if (x_92 == 0) -{ -obj* x_93; obj* x_94; obj* x_95; -x_93 = lean::cnstr_get(x_91, 0); -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_93); -x_95 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_84, x_94); -lean::cnstr_set(x_91, 0, x_95); -return x_91; -} -else -{ -obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_96 = lean::cnstr_get(x_91, 0); -x_97 = lean::cnstr_get(x_91, 1); -lean::inc(x_97); -lean::inc(x_96); -lean::dec(x_91); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_96); -x_99 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_84, x_98); -x_100 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_97); -return x_100; -} -} -else -{ -uint8 x_101; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_101 = !lean::is_exclusive(x_85); -if (x_101 == 0) -{ -obj* x_102; uint8 x_103; -x_102 = lean::cnstr_get(x_85, 0); -lean::dec(x_102); -x_103 = !lean::is_exclusive(x_86); -if (x_103 == 0) -{ -obj* x_104; -x_104 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_84, x_86); -lean::cnstr_set(x_85, 0, x_104); -return x_85; -} -else -{ -obj* x_105; uint8 x_106; obj* x_107; obj* x_108; -x_105 = lean::cnstr_get(x_86, 0); -x_106 = lean::cnstr_get_scalar(x_86, sizeof(void*)*1); -lean::inc(x_105); -lean::dec(x_86); -x_107 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_107, 0, x_105); -lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_106); -x_108 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_84, x_107); -lean::cnstr_set(x_85, 0, x_108); -return x_85; -} -} -else -{ -obj* x_109; obj* x_110; uint8 x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; -x_109 = lean::cnstr_get(x_85, 1); -lean::inc(x_109); -lean::dec(x_85); -x_110 = lean::cnstr_get(x_86, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get_scalar(x_86, sizeof(void*)*1); -if (lean::is_exclusive(x_86)) { - lean::cnstr_release(x_86, 0); - x_112 = x_86; -} else { - lean::dec_ref(x_86); - x_112 = lean::box(0); -} -if (lean::is_scalar(x_112)) { - x_113 = lean::alloc_cnstr(1, 1, 1); -} else { - x_113 = x_112; -} -lean::cnstr_set(x_113, 0, x_110); -lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_111); -x_114 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_84, x_113); -x_115 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_115, 0, x_114); -lean::cnstr_set(x_115, 1, x_109); -return x_115; -} -} -} -else -{ -uint8 x_116; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_116 = !lean::is_exclusive(x_9); -if (x_116 == 0) -{ -obj* x_117; uint8 x_118; -x_117 = lean::cnstr_get(x_9, 0); -lean::dec(x_117); -x_118 = !lean::is_exclusive(x_10); -if (x_118 == 0) -{ -return x_9; -} -else -{ -obj* x_119; obj* x_120; -x_119 = lean::cnstr_get(x_10, 0); -lean::inc(x_119); -lean::dec(x_10); -x_120 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_120, 0, x_119); -lean::cnstr_set_scalar(x_120, sizeof(void*)*1, x_82); -lean::cnstr_set(x_9, 0, x_120); -return x_9; -} -} -else -{ -obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; -x_121 = lean::cnstr_get(x_9, 1); -lean::inc(x_121); -lean::dec(x_9); -x_122 = lean::cnstr_get(x_10, 0); -lean::inc(x_122); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_123 = x_10; -} else { - lean::dec_ref(x_10); - x_123 = lean::box(0); -} -if (lean::is_scalar(x_123)) { - x_124 = lean::alloc_cnstr(1, 1, 1); -} else { - x_124 = x_123; -} -lean::cnstr_set(x_124, 0, x_122); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_82); -x_125 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_125, 0, x_124); -lean::cnstr_set(x_125, 1, x_121); -return x_125; -} -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__2___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__3___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__4___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at___private_init_lean_parser_term_2__leading___spec__5___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l___private_init_lean_parser_term_2__leading___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l___private_init_lean_parser_term_2__leading(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2___rarg(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_3) == 0) -{ -obj* x_9; uint8 x_10; obj* x_11; obj* x_12; -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_2); -lean::cnstr_set(x_9, 3, x_4); -x_10 = 0; -x_11 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set_scalar(x_11, sizeof(void*)*1, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_8); -return x_12; -} -else -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -lean::dec(x_7); -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_4); -x_15 = 0; -x_16 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set_scalar(x_16, sizeof(void*)*1, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -return x_17; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2___rarg___boxed), 8, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(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: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_10; uint8 x_11; obj* x_12; obj* x_13; -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -lean::cnstr_set(x_10, 2, x_2); -lean::cnstr_set(x_10, 3, x_4); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_9); -return x_13; -} -else -{ -obj* x_14; obj* x_15; uint8 x_16; obj* x_17; obj* x_18; -lean::dec(x_8); -x_14 = lean::cnstr_get(x_3, 0); -lean::inc(x_14); -x_15 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -lean::cnstr_set(x_15, 2, x_2); -lean::cnstr_set(x_15, 3, x_4); -x_16 = 0; -x_17 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set_scalar(x_17, sizeof(void*)*1, x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -return x_18; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg___boxed), 9, 0); -return x_2; -} -} -obj* l_Lean_Parser_currLbp___at_Lean_Parser_termParser_run___spec__5(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; -x_6 = l_Lean_Parser_peekToken___closed__1; -lean::inc(x_2); -x_7 = l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(x_6, x_2, x_4, x_5); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -lean::dec(x_9); -lean::dec(x_2); -x_10 = !lean::is_exclusive(x_7); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_7, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_8); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_8, 2); -x_14 = lean::cnstr_get(x_8, 0); -lean::dec(x_14); -x_15 = lean::mk_nat_obj(0u); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_16); -lean::cnstr_set(x_8, 0, x_15); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_8); -lean::cnstr_set(x_7, 0, x_17); -return x_7; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::cnstr_get(x_8, 1); -x_19 = lean::cnstr_get(x_8, 2); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_8); -x_20 = lean::mk_nat_obj(0u); -x_21 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_18); -lean::cnstr_set(x_22, 2, x_21); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_22); -lean::cnstr_set(x_7, 0, x_23); -return x_7; -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_24 = lean::cnstr_get(x_7, 1); -lean::inc(x_24); -lean::dec(x_7); -x_25 = lean::cnstr_get(x_8, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_8, 2); -lean::inc(x_26); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_27 = x_8; -} else { - lean::dec_ref(x_8); - x_27 = lean::box(0); -} -x_28 = lean::mk_nat_obj(0u); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_27)) { - x_30 = lean::alloc_cnstr(0, 3, 0); -} else { - x_30 = x_27; -} -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_25); -lean::cnstr_set(x_30, 2, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_24); -return x_32; -} -} -else -{ -obj* x_33; -x_33 = lean::cnstr_get(x_9, 0); -lean::inc(x_33); -lean::dec(x_9); -switch (lean::obj_tag(x_33)) { -case 0: -{ -obj* x_34; obj* x_35; uint8 x_36; -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -lean::dec(x_33); -x_35 = lean::cnstr_get(x_7, 1); -lean::inc(x_35); -lean::dec(x_7); -x_36 = !lean::is_exclusive(x_8); -if (x_36 == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_37 = lean::cnstr_get(x_8, 1); -x_38 = lean::cnstr_get(x_8, 2); -x_39 = lean::cnstr_get(x_8, 0); -lean::dec(x_39); -x_40 = lean::cnstr_get(x_34, 1); -lean::inc(x_40); -lean::dec(x_34); -x_41 = lean::cnstr_get(x_2, 1); -lean::inc(x_41); -x_42 = lean::mk_nat_obj(0u); -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set(x_43, 1, x_42); -lean::cnstr_set(x_43, 2, x_42); -x_44 = l_Lean_Parser_Trie_oldMatchPrefix___rarg(x_41, x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; uint8 x_49; -lean::free_heap_obj(x_8); -x_45 = lean::box(0); -x_46 = l_Lean_Parser_currLbp___rarg___lambda__1___closed__1; -x_47 = l_mjoin___rarg___closed__1; -x_48 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(x_46, x_47, x_45, x_45, x_1, x_2, x_3, x_37, x_35); -lean::dec(x_2); -x_49 = !lean::is_exclusive(x_48); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_48, 0); -x_51 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_50); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_52); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_53); -lean::cnstr_set(x_48, 0, x_54); -return x_48; -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_55 = lean::cnstr_get(x_48, 0); -x_56 = lean::cnstr_get(x_48, 1); -lean::inc(x_56); -lean::inc(x_55); -lean::dec(x_48); -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_55); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_58); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_59); -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_56); -return x_61; -} -} -else -{ -obj* x_62; uint8 x_63; -lean::dec(x_2); -x_62 = lean::cnstr_get(x_44, 0); -lean::inc(x_62); -lean::dec(x_44); -x_63 = !lean::is_exclusive(x_62); -if (x_63 == 0) -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_64 = lean::cnstr_get(x_62, 1); -x_65 = lean::cnstr_get(x_62, 0); -lean::dec(x_65); -x_66 = lean::cnstr_get(x_64, 1); -lean::inc(x_66); -lean::dec(x_64); -x_67 = l_Lean_Parser_matchToken___closed__1; -lean::cnstr_set(x_8, 2, x_67); -lean::cnstr_set(x_8, 0, x_66); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_8); -lean::cnstr_set(x_62, 1, x_35); -lean::cnstr_set(x_62, 0, x_68); -return x_62; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_69 = lean::cnstr_get(x_62, 1); -lean::inc(x_69); -lean::dec(x_62); -x_70 = lean::cnstr_get(x_69, 1); -lean::inc(x_70); -lean::dec(x_69); -x_71 = l_Lean_Parser_matchToken___closed__1; -lean::cnstr_set(x_8, 2, x_71); -lean::cnstr_set(x_8, 0, x_70); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_8); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_35); -return x_73; -} -} -} -else -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_74 = lean::cnstr_get(x_8, 1); -x_75 = lean::cnstr_get(x_8, 2); -lean::inc(x_75); -lean::inc(x_74); -lean::dec(x_8); -x_76 = lean::cnstr_get(x_34, 1); -lean::inc(x_76); -lean::dec(x_34); -x_77 = lean::cnstr_get(x_2, 1); -lean::inc(x_77); -x_78 = lean::mk_nat_obj(0u); -x_79 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_79, 0, x_76); -lean::cnstr_set(x_79, 1, x_78); -lean::cnstr_set(x_79, 2, x_78); -x_80 = l_Lean_Parser_Trie_oldMatchPrefix___rarg(x_77, x_79); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_81 = lean::box(0); -x_82 = l_Lean_Parser_currLbp___rarg___lambda__1___closed__1; -x_83 = l_mjoin___rarg___closed__1; -x_84 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(x_82, x_83, x_81, x_81, x_1, x_2, x_3, x_74, x_35); -lean::dec(x_2); -x_85 = lean::cnstr_get(x_84, 0); -lean::inc(x_85); -x_86 = lean::cnstr_get(x_84, 1); -lean::inc(x_86); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - lean::cnstr_release(x_84, 1); - x_87 = x_84; -} else { - lean::dec_ref(x_84); - x_87 = lean::box(0); -} -x_88 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_85); -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_89); -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_75, x_90); -if (lean::is_scalar(x_87)) { - x_92 = lean::alloc_cnstr(0, 2, 0); -} else { - x_92 = x_87; -} -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_86); -return x_92; -} -else -{ -obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -lean::dec(x_2); -x_93 = lean::cnstr_get(x_80, 0); -lean::inc(x_93); -lean::dec(x_80); -x_94 = lean::cnstr_get(x_93, 1); -lean::inc(x_94); -if (lean::is_exclusive(x_93)) { - lean::cnstr_release(x_93, 0); - lean::cnstr_release(x_93, 1); - x_95 = x_93; -} else { - lean::dec_ref(x_93); - x_95 = lean::box(0); -} -x_96 = lean::cnstr_get(x_94, 1); -lean::inc(x_96); -lean::dec(x_94); -x_97 = l_Lean_Parser_matchToken___closed__1; -x_98 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_98, 0, x_96); -lean::cnstr_set(x_98, 1, x_74); -lean::cnstr_set(x_98, 2, x_97); -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_75, x_98); -if (lean::is_scalar(x_95)) { - x_100 = lean::alloc_cnstr(0, 2, 0); -} else { - x_100 = x_95; -} -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_35); -return x_100; -} -} -} -case 1: -{ -uint8 x_101; -lean::dec(x_33); -lean::dec(x_2); -x_101 = !lean::is_exclusive(x_7); -if (x_101 == 0) -{ -obj* x_102; uint8 x_103; -x_102 = lean::cnstr_get(x_7, 0); -lean::dec(x_102); -x_103 = !lean::is_exclusive(x_8); -if (x_103 == 0) -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_104 = lean::cnstr_get(x_8, 2); -x_105 = lean::cnstr_get(x_8, 0); -lean::dec(x_105); -x_106 = l_Lean_Parser_maxPrec; -x_107 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_107); -lean::cnstr_set(x_8, 0, x_106); -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_104, x_8); -lean::cnstr_set(x_7, 0, x_108); -return x_7; -} -else -{ -obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_109 = lean::cnstr_get(x_8, 1); -x_110 = lean::cnstr_get(x_8, 2); -lean::inc(x_110); -lean::inc(x_109); -lean::dec(x_8); -x_111 = l_Lean_Parser_maxPrec; -x_112 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_113 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set(x_113, 1, x_109); -lean::cnstr_set(x_113, 2, x_112); -x_114 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_110, x_113); -lean::cnstr_set(x_7, 0, x_114); -return x_7; -} -} -else -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; -x_115 = lean::cnstr_get(x_7, 1); -lean::inc(x_115); -lean::dec(x_7); -x_116 = lean::cnstr_get(x_8, 1); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_8, 2); -lean::inc(x_117); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_118 = x_8; -} else { - lean::dec_ref(x_8); - x_118 = lean::box(0); -} -x_119 = l_Lean_Parser_maxPrec; -x_120 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_118)) { - x_121 = lean::alloc_cnstr(0, 3, 0); -} else { - x_121 = x_118; -} -lean::cnstr_set(x_121, 0, x_119); -lean::cnstr_set(x_121, 1, x_116); -lean::cnstr_set(x_121, 2, x_120); -x_122 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_117, x_121); -x_123 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_115); -return x_123; -} -} -case 2: -{ -obj* x_124; uint8 x_125; -x_124 = lean::cnstr_get(x_33, 0); -lean::inc(x_124); -lean::dec(x_33); -x_125 = !lean::is_exclusive(x_7); -if (x_125 == 0) -{ -obj* x_126; obj* x_127; uint8 x_128; -x_126 = lean::cnstr_get(x_7, 1); -x_127 = lean::cnstr_get(x_7, 0); -lean::dec(x_127); -x_128 = !lean::is_exclusive(x_8); -if (x_128 == 0) -{ -obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; uint8 x_134; -x_129 = lean::cnstr_get(x_8, 1); -x_130 = lean::cnstr_get(x_8, 2); -x_131 = lean::cnstr_get(x_8, 0); -lean::dec(x_131); -x_132 = lean::cnstr_get(x_124, 0); -lean::inc(x_132); -lean::dec(x_124); -x_133 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_134 = lean_name_dec_eq(x_132, x_133); -if (x_134 == 0) -{ -obj* x_135; uint8 x_136; -x_135 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -x_136 = lean_name_dec_eq(x_132, x_135); -lean::dec(x_132); -if (x_136 == 0) -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; uint8 x_141; -lean::free_heap_obj(x_8); -lean::free_heap_obj(x_7); -x_137 = lean::box(0); -x_138 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_139 = l_mjoin___rarg___closed__1; -x_140 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(x_138, x_139, x_137, x_137, x_1, x_2, x_3, x_129, x_126); -lean::dec(x_2); -x_141 = !lean::is_exclusive(x_140); -if (x_141 == 0) -{ -obj* x_142; obj* x_143; -x_142 = lean::cnstr_get(x_140, 0); -x_143 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_130, x_142); -lean::cnstr_set(x_140, 0, x_143); -return x_140; -} -else -{ -obj* x_144; obj* x_145; obj* x_146; obj* x_147; -x_144 = lean::cnstr_get(x_140, 0); -x_145 = lean::cnstr_get(x_140, 1); -lean::inc(x_145); -lean::inc(x_144); -lean::dec(x_140); -x_146 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_130, x_144); -x_147 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_147, 0, x_146); -lean::cnstr_set(x_147, 1, x_145); -return x_147; -} -} -else -{ -obj* x_148; obj* x_149; obj* x_150; -lean::dec(x_2); -x_148 = l_Lean_Parser_maxPrec; -x_149 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_149); -lean::cnstr_set(x_8, 0, x_148); -x_150 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_130, x_8); -lean::cnstr_set(x_7, 0, x_150); -return x_7; -} -} -else -{ -obj* x_151; obj* x_152; obj* x_153; -lean::dec(x_132); -lean::dec(x_2); -x_151 = l_Lean_Parser_maxPrec; -x_152 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_152); -lean::cnstr_set(x_8, 0, x_151); -x_153 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_130, x_8); -lean::cnstr_set(x_7, 0, x_153); -return x_7; -} -} -else -{ -obj* x_154; obj* x_155; obj* x_156; obj* x_157; uint8 x_158; -x_154 = lean::cnstr_get(x_8, 1); -x_155 = lean::cnstr_get(x_8, 2); -lean::inc(x_155); -lean::inc(x_154); -lean::dec(x_8); -x_156 = lean::cnstr_get(x_124, 0); -lean::inc(x_156); -lean::dec(x_124); -x_157 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_158 = lean_name_dec_eq(x_156, x_157); -if (x_158 == 0) -{ -obj* x_159; uint8 x_160; -x_159 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -x_160 = lean_name_dec_eq(x_156, x_159); -lean::dec(x_156); -if (x_160 == 0) -{ -obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; -lean::free_heap_obj(x_7); -x_161 = lean::box(0); -x_162 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_163 = l_mjoin___rarg___closed__1; -x_164 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(x_162, x_163, x_161, x_161, x_1, x_2, x_3, x_154, x_126); -lean::dec(x_2); -x_165 = lean::cnstr_get(x_164, 0); -lean::inc(x_165); -x_166 = lean::cnstr_get(x_164, 1); -lean::inc(x_166); -if (lean::is_exclusive(x_164)) { - lean::cnstr_release(x_164, 0); - lean::cnstr_release(x_164, 1); - x_167 = x_164; -} else { - lean::dec_ref(x_164); - x_167 = lean::box(0); -} -x_168 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_155, x_165); -if (lean::is_scalar(x_167)) { - x_169 = lean::alloc_cnstr(0, 2, 0); -} else { - x_169 = x_167; -} -lean::cnstr_set(x_169, 0, x_168); -lean::cnstr_set(x_169, 1, x_166); -return x_169; -} -else -{ -obj* x_170; obj* x_171; obj* x_172; obj* x_173; -lean::dec(x_2); -x_170 = l_Lean_Parser_maxPrec; -x_171 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_172 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_172, 0, x_170); -lean::cnstr_set(x_172, 1, x_154); -lean::cnstr_set(x_172, 2, x_171); -x_173 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_155, x_172); -lean::cnstr_set(x_7, 0, x_173); -return x_7; -} -} -else -{ -obj* x_174; obj* x_175; obj* x_176; obj* x_177; -lean::dec(x_156); -lean::dec(x_2); -x_174 = l_Lean_Parser_maxPrec; -x_175 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_176 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_176, 0, x_174); -lean::cnstr_set(x_176, 1, x_154); -lean::cnstr_set(x_176, 2, x_175); -x_177 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_155, x_176); -lean::cnstr_set(x_7, 0, x_177); -return x_7; -} -} -} -else -{ -obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; uint8 x_184; -x_178 = lean::cnstr_get(x_7, 1); -lean::inc(x_178); -lean::dec(x_7); -x_179 = lean::cnstr_get(x_8, 1); -lean::inc(x_179); -x_180 = lean::cnstr_get(x_8, 2); -lean::inc(x_180); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_181 = x_8; -} else { - lean::dec_ref(x_8); - x_181 = lean::box(0); -} -x_182 = lean::cnstr_get(x_124, 0); -lean::inc(x_182); -lean::dec(x_124); -x_183 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_184 = lean_name_dec_eq(x_182, x_183); -if (x_184 == 0) -{ -obj* x_185; uint8 x_186; -x_185 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__1; -x_186 = lean_name_dec_eq(x_182, x_185); -lean::dec(x_182); -if (x_186 == 0) -{ -obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; -lean::dec(x_181); -x_187 = lean::box(0); -x_188 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_189 = l_mjoin___rarg___closed__1; -x_190 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(x_188, x_189, x_187, x_187, x_1, x_2, x_3, x_179, x_178); -lean::dec(x_2); -x_191 = lean::cnstr_get(x_190, 0); -lean::inc(x_191); -x_192 = lean::cnstr_get(x_190, 1); -lean::inc(x_192); -if (lean::is_exclusive(x_190)) { - lean::cnstr_release(x_190, 0); - lean::cnstr_release(x_190, 1); - x_193 = x_190; -} else { - lean::dec_ref(x_190); - x_193 = lean::box(0); -} -x_194 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_180, x_191); -if (lean::is_scalar(x_193)) { - x_195 = lean::alloc_cnstr(0, 2, 0); -} else { - x_195 = x_193; -} -lean::cnstr_set(x_195, 0, x_194); -lean::cnstr_set(x_195, 1, x_192); -return x_195; -} -else -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; -lean::dec(x_2); -x_196 = l_Lean_Parser_maxPrec; -x_197 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_181)) { - x_198 = lean::alloc_cnstr(0, 3, 0); -} else { - x_198 = x_181; -} -lean::cnstr_set(x_198, 0, x_196); -lean::cnstr_set(x_198, 1, x_179); -lean::cnstr_set(x_198, 2, x_197); -x_199 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_180, x_198); -x_200 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_200, 0, x_199); -lean::cnstr_set(x_200, 1, x_178); -return x_200; -} -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; -lean::dec(x_182); -lean::dec(x_2); -x_201 = l_Lean_Parser_maxPrec; -x_202 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_181)) { - x_203 = lean::alloc_cnstr(0, 3, 0); -} else { - x_203 = x_181; -} -lean::cnstr_set(x_203, 0, x_201); -lean::cnstr_set(x_203, 1, x_179); -lean::cnstr_set(x_203, 2, x_202); -x_204 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_180, x_203); -x_205 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_205, 0, x_204); -lean::cnstr_set(x_205, 1, x_178); -return x_205; -} -} -} -default: -{ -obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; uint8 x_213; -x_206 = lean::cnstr_get(x_7, 1); -lean::inc(x_206); -lean::dec(x_7); -x_207 = lean::cnstr_get(x_8, 1); -lean::inc(x_207); -x_208 = lean::cnstr_get(x_8, 2); -lean::inc(x_208); -lean::dec(x_8); -x_209 = lean::box(0); -x_210 = l_Lean_Parser_currLbp___rarg___lambda__3___closed__2; -x_211 = l_mjoin___rarg___closed__1; -x_212 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(x_210, x_211, x_209, x_209, x_1, x_2, x_3, x_207, x_206); -lean::dec(x_2); -x_213 = !lean::is_exclusive(x_212); -if (x_213 == 0) -{ -obj* x_214; obj* x_215; -x_214 = lean::cnstr_get(x_212, 0); -x_215 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_208, x_214); -lean::cnstr_set(x_212, 0, x_215); -return x_212; -} -else -{ -obj* x_216; obj* x_217; obj* x_218; obj* x_219; -x_216 = lean::cnstr_get(x_212, 0); -x_217 = lean::cnstr_get(x_212, 1); -lean::inc(x_217); -lean::inc(x_216); -lean::dec(x_212); -x_218 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_208, x_216); -x_219 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_219, 0, x_218); -lean::cnstr_set(x_219, 1, x_217); -return x_219; -} -} -} -} -} -else -{ -uint8 x_220; -lean::dec(x_2); -x_220 = !lean::is_exclusive(x_7); -if (x_220 == 0) -{ -obj* x_221; uint8 x_222; -x_221 = lean::cnstr_get(x_7, 0); -lean::dec(x_221); -x_222 = !lean::is_exclusive(x_8); -if (x_222 == 0) -{ -return x_7; -} -else -{ -obj* x_223; uint8 x_224; obj* x_225; -x_223 = lean::cnstr_get(x_8, 0); -x_224 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_223); -lean::dec(x_8); -x_225 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_225, 0, x_223); -lean::cnstr_set_scalar(x_225, sizeof(void*)*1, x_224); -lean::cnstr_set(x_7, 0, x_225); -return x_7; -} -} -else -{ -obj* x_226; obj* x_227; uint8 x_228; obj* x_229; obj* x_230; obj* x_231; -x_226 = lean::cnstr_get(x_7, 1); -lean::inc(x_226); -lean::dec(x_7); -x_227 = lean::cnstr_get(x_8, 0); -lean::inc(x_227); -x_228 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_229 = x_8; -} else { - lean::dec_ref(x_8); - x_229 = lean::box(0); -} -if (lean::is_scalar(x_229)) { - x_230 = lean::alloc_cnstr(1, 1, 1); -} else { - x_230 = x_229; -} -lean::cnstr_set(x_230, 0, x_227); -lean::cnstr_set_scalar(x_230, sizeof(void*)*1, x_228); -x_231 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_231, 0, x_230); -lean::cnstr_set(x_231, 1, x_226); -return x_231; -} -} -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3(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: -{ -obj* x_10; uint8 x_11; -x_10 = lean::mk_nat_obj(0u); -x_11 = lean::nat_dec_eq(x_3, x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::mk_nat_obj(1u); -x_13 = lean::nat_sub(x_3, x_12); -lean::inc(x_6); -x_14 = l_Lean_Parser_currLbp___at_Lean_Parser_termParser_run___spec__5(x_5, x_6, x_7, x_8, x_9); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -uint8 x_16; -x_16 = !lean::is_exclusive(x_14); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; uint8 x_19; -x_17 = lean::cnstr_get(x_14, 1); -x_18 = lean::cnstr_get(x_14, 0); -lean::dec(x_18); -x_19 = !lean::is_exclusive(x_15); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; uint8 x_23; -x_20 = lean::cnstr_get(x_15, 0); -x_21 = lean::cnstr_get(x_15, 1); -x_22 = lean::cnstr_get(x_15, 2); -x_23 = lean::nat_dec_lt(x_2, x_20); -lean::dec(x_20); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; -lean::dec(x_13); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_15, 2, x_24); -lean::cnstr_set(x_15, 0, x_4); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_15); -lean::cnstr_set(x_14, 0, x_25); -return x_14; -} -else -{ -obj* x_26; obj* x_27; -lean::free_heap_obj(x_15); -lean::free_heap_obj(x_14); -lean::inc(x_1); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -x_26 = lean::apply_6(x_1, x_4, x_5, x_6, x_7, x_21, x_17); -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; uint8 x_33; -x_28 = lean::cnstr_get(x_26, 1); -lean::inc(x_28); -lean::dec(x_26); -x_29 = lean::cnstr_get(x_27, 0); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_27, 1); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_27, 2); -lean::inc(x_31); -lean::dec(x_27); -x_32 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3(x_1, x_2, x_13, x_29, x_5, x_6, x_7, x_30, x_28); -lean::dec(x_13); -x_33 = !lean::is_exclusive(x_32); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; -x_34 = lean::cnstr_get(x_32, 0); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_34); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_35); -lean::cnstr_set(x_32, 0, x_36); -return x_32; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = lean::cnstr_get(x_32, 0); -x_38 = lean::cnstr_get(x_32, 1); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_32); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_37); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_39); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_38); -return x_41; -} -} -else -{ -uint8 x_42; -lean::dec(x_13); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_42 = !lean::is_exclusive(x_26); -if (x_42 == 0) -{ -obj* x_43; uint8 x_44; -x_43 = lean::cnstr_get(x_26, 0); -lean::dec(x_43); -x_44 = !lean::is_exclusive(x_27); -if (x_44 == 0) -{ -obj* x_45; -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_27); -lean::cnstr_set(x_26, 0, x_45); -return x_26; -} -else -{ -obj* x_46; uint8 x_47; obj* x_48; obj* x_49; -x_46 = lean::cnstr_get(x_27, 0); -x_47 = lean::cnstr_get_scalar(x_27, sizeof(void*)*1); -lean::inc(x_46); -lean::dec(x_27); -x_48 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set_scalar(x_48, sizeof(void*)*1, x_47); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_48); -lean::cnstr_set(x_26, 0, x_49); -return x_26; -} -} -else -{ -obj* x_50; obj* x_51; uint8 x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_50 = lean::cnstr_get(x_26, 1); -lean::inc(x_50); -lean::dec(x_26); -x_51 = lean::cnstr_get(x_27, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get_scalar(x_27, sizeof(void*)*1); -if (lean::is_exclusive(x_27)) { - lean::cnstr_release(x_27, 0); - x_53 = x_27; -} else { - lean::dec_ref(x_27); - x_53 = lean::box(0); -} -if (lean::is_scalar(x_53)) { - x_54 = lean::alloc_cnstr(1, 1, 1); -} else { - x_54 = x_53; -} -lean::cnstr_set(x_54, 0, x_51); -lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_52); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_54); -x_56 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_50); -return x_56; -} -} -} -} -else -{ -obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_57 = lean::cnstr_get(x_15, 0); -x_58 = lean::cnstr_get(x_15, 1); -x_59 = lean::cnstr_get(x_15, 2); -lean::inc(x_59); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_15); -x_60 = lean::nat_dec_lt(x_2, x_57); -lean::dec(x_57); -if (x_60 == 0) -{ -obj* x_61; obj* x_62; obj* x_63; -lean::dec(x_13); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_61 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_62 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_62, 0, x_4); -lean::cnstr_set(x_62, 1, x_58); -lean::cnstr_set(x_62, 2, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_62); -lean::cnstr_set(x_14, 0, x_63); -return x_14; -} -else -{ -obj* x_64; obj* x_65; -lean::free_heap_obj(x_14); -lean::inc(x_1); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -x_64 = lean::apply_6(x_1, x_4, x_5, x_6, x_7, x_58, x_17); -x_65 = lean::cnstr_get(x_64, 0); -lean::inc(x_65); -if (lean::obj_tag(x_65) == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_66 = lean::cnstr_get(x_64, 1); -lean::inc(x_66); -lean::dec(x_64); -x_67 = lean::cnstr_get(x_65, 0); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_65, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_65, 2); -lean::inc(x_69); -lean::dec(x_65); -x_70 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3(x_1, x_2, x_13, x_67, x_5, x_6, x_7, x_68, x_66); -lean::dec(x_13); -x_71 = lean::cnstr_get(x_70, 0); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_70, 1); -lean::inc(x_72); -if (lean::is_exclusive(x_70)) { - lean::cnstr_release(x_70, 0); - lean::cnstr_release(x_70, 1); - x_73 = x_70; -} else { - lean::dec_ref(x_70); - x_73 = lean::box(0); -} -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_71); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_74); -if (lean::is_scalar(x_73)) { - x_76 = lean::alloc_cnstr(0, 2, 0); -} else { - x_76 = x_73; -} -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_72); -return x_76; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; uint8 x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; -lean::dec(x_13); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_77 = lean::cnstr_get(x_64, 1); -lean::inc(x_77); -if (lean::is_exclusive(x_64)) { - lean::cnstr_release(x_64, 0); - lean::cnstr_release(x_64, 1); - x_78 = x_64; -} else { - lean::dec_ref(x_64); - x_78 = lean::box(0); -} -x_79 = lean::cnstr_get(x_65, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get_scalar(x_65, sizeof(void*)*1); -if (lean::is_exclusive(x_65)) { - lean::cnstr_release(x_65, 0); - x_81 = x_65; -} else { - lean::dec_ref(x_65); - x_81 = lean::box(0); -} -if (lean::is_scalar(x_81)) { - x_82 = lean::alloc_cnstr(1, 1, 1); -} else { - x_82 = x_81; -} -lean::cnstr_set(x_82, 0, x_79); -lean::cnstr_set_scalar(x_82, sizeof(void*)*1, x_80); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_82); -if (lean::is_scalar(x_78)) { - x_84 = lean::alloc_cnstr(0, 2, 0); -} else { - x_84 = x_78; -} -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_77); -return x_84; -} -} -} -} -else -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; uint8 x_90; -x_85 = lean::cnstr_get(x_14, 1); -lean::inc(x_85); -lean::dec(x_14); -x_86 = lean::cnstr_get(x_15, 0); -lean::inc(x_86); -x_87 = lean::cnstr_get(x_15, 1); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_15, 2); -lean::inc(x_88); -if (lean::is_exclusive(x_15)) { - lean::cnstr_release(x_15, 0); - lean::cnstr_release(x_15, 1); - lean::cnstr_release(x_15, 2); - x_89 = x_15; -} else { - lean::dec_ref(x_15); - x_89 = lean::box(0); -} -x_90 = lean::nat_dec_lt(x_2, x_86); -lean::dec(x_86); -if (x_90 == 0) -{ -obj* x_91; obj* x_92; obj* x_93; obj* x_94; -lean::dec(x_13); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_91 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_89)) { - x_92 = lean::alloc_cnstr(0, 3, 0); -} else { - x_92 = x_89; -} -lean::cnstr_set(x_92, 0, x_4); -lean::cnstr_set(x_92, 1, x_87); -lean::cnstr_set(x_92, 2, x_91); -x_93 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_92); -x_94 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_85); -return x_94; -} -else -{ -obj* x_95; obj* x_96; -lean::dec(x_89); -lean::inc(x_1); -lean::inc(x_7); -lean::inc(x_6); -lean::inc(x_5); -x_95 = lean::apply_6(x_1, x_4, x_5, x_6, x_7, x_87, x_85); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -lean::dec(x_95); -x_98 = lean::cnstr_get(x_96, 0); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_96, 1); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_96, 2); -lean::inc(x_100); -lean::dec(x_96); -x_101 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3(x_1, x_2, x_13, x_98, x_5, x_6, x_7, x_99, x_97); -lean::dec(x_13); -x_102 = lean::cnstr_get(x_101, 0); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_101, 1); -lean::inc(x_103); -if (lean::is_exclusive(x_101)) { - lean::cnstr_release(x_101, 0); - lean::cnstr_release(x_101, 1); - x_104 = x_101; -} else { - lean::dec_ref(x_101); - x_104 = lean::box(0); -} -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_100, x_102); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_105); -if (lean::is_scalar(x_104)) { - x_107 = lean::alloc_cnstr(0, 2, 0); -} else { - x_107 = x_104; -} -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_107, 1, x_103); -return x_107; -} -else -{ -obj* x_108; obj* x_109; obj* x_110; uint8 x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; -lean::dec(x_13); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_1); -x_108 = lean::cnstr_get(x_95, 1); -lean::inc(x_108); -if (lean::is_exclusive(x_95)) { - lean::cnstr_release(x_95, 0); - lean::cnstr_release(x_95, 1); - x_109 = x_95; -} else { - lean::dec_ref(x_95); - x_109 = lean::box(0); -} -x_110 = lean::cnstr_get(x_96, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get_scalar(x_96, sizeof(void*)*1); -if (lean::is_exclusive(x_96)) { - lean::cnstr_release(x_96, 0); - x_112 = x_96; -} else { - lean::dec_ref(x_96); - x_112 = lean::box(0); -} -if (lean::is_scalar(x_112)) { - x_113 = lean::alloc_cnstr(1, 1, 1); -} else { - x_113 = x_112; -} -lean::cnstr_set(x_113, 0, x_110); -lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_111); -x_114 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_113); -if (lean::is_scalar(x_109)) { - x_115 = lean::alloc_cnstr(0, 2, 0); -} else { - x_115 = x_109; -} -lean::cnstr_set(x_115, 0, x_114); -lean::cnstr_set(x_115, 1, x_108); -return x_115; -} -} -} -} -else -{ -uint8 x_116; -lean::dec(x_13); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_116 = !lean::is_exclusive(x_14); -if (x_116 == 0) -{ -obj* x_117; uint8 x_118; -x_117 = lean::cnstr_get(x_14, 0); -lean::dec(x_117); -x_118 = !lean::is_exclusive(x_15); -if (x_118 == 0) -{ -return x_14; -} -else -{ -obj* x_119; uint8 x_120; obj* x_121; -x_119 = lean::cnstr_get(x_15, 0); -x_120 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -lean::inc(x_119); -lean::dec(x_15); -x_121 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_121, 0, x_119); -lean::cnstr_set_scalar(x_121, sizeof(void*)*1, x_120); -lean::cnstr_set(x_14, 0, x_121); -return x_14; -} -} -else -{ -obj* x_122; obj* x_123; uint8 x_124; obj* x_125; obj* x_126; obj* x_127; -x_122 = lean::cnstr_get(x_14, 1); -lean::inc(x_122); -lean::dec(x_14); -x_123 = lean::cnstr_get(x_15, 0); -lean::inc(x_123); -x_124 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -if (lean::is_exclusive(x_15)) { - lean::cnstr_release(x_15, 0); - x_125 = x_15; -} else { - lean::dec_ref(x_15); - x_125 = lean::box(0); -} -if (lean::is_scalar(x_125)) { - x_126 = lean::alloc_cnstr(1, 1, 1); -} else { - x_126 = x_125; -} -lean::cnstr_set(x_126, 0, x_123); -lean::cnstr_set_scalar(x_126, sizeof(void*)*1, x_124); -x_127 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_122); -return x_127; -} -} -} -else -{ -obj* x_128; obj* x_129; obj* x_130; obj* x_131; -lean::dec(x_4); -lean::dec(x_1); -x_128 = lean::box(0); -x_129 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_130 = l_mjoin___rarg___closed__1; -x_131 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(x_129, x_130, x_128, x_128, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -return x_131; -} -} -} -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__1(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; -x_6 = lean::box(0); -x_7 = l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2___rarg(x_7, x_8, x_6, x_6, x_2, x_3, x_4, x_5); -return x_9; -} -} -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__2(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_9; obj* x_10; -lean::inc(x_6); -lean::inc(x_5); -lean::inc(x_3); -x_9 = lean::apply_5(x_1, x_3, x_5, x_6, x_7, x_8); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -lean::dec(x_9); -x_12 = lean::cnstr_get(x_10, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_10, 2); -lean::inc(x_14); -lean::dec(x_10); -x_15 = l_String_OldIterator_remaining___main(x_13); -x_16 = lean::mk_nat_obj(1u); -x_17 = lean::nat_add(x_15, x_16); -lean::dec(x_15); -x_18 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3(x_2, x_4, x_17, x_12, x_3, x_5, x_6, x_13, x_11); -lean::dec(x_17); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = l_Lean_Parser_finishCommentBlock___closed__2; -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_20); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_22); -lean::cnstr_set(x_18, 0, x_23); -return x_18; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_24 = lean::cnstr_get(x_18, 0); -x_25 = lean::cnstr_get(x_18, 1); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_18); -x_26 = l_Lean_Parser_finishCommentBlock___closed__2; -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_24); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_25); -return x_29; -} -} -else -{ -uint8 x_30; -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -x_30 = !lean::is_exclusive(x_9); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::cnstr_get(x_9, 0); -lean::dec(x_31); -x_32 = !lean::is_exclusive(x_10); -if (x_32 == 0) -{ -return x_9; -} -else -{ -obj* x_33; uint8 x_34; obj* x_35; -x_33 = lean::cnstr_get(x_10, 0); -x_34 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_33); -lean::dec(x_10); -x_35 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set_scalar(x_35, sizeof(void*)*1, x_34); -lean::cnstr_set(x_9, 0, x_35); -return x_9; -} -} -else -{ -obj* x_36; obj* x_37; uint8 x_38; obj* x_39; obj* x_40; obj* x_41; -x_36 = lean::cnstr_get(x_9, 1); -lean::inc(x_36); -lean::dec(x_9); -x_37 = lean::cnstr_get(x_10, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_39 = x_10; -} else { - lean::dec_ref(x_10); - x_39 = lean::box(0); -} -if (lean::is_scalar(x_39)) { - x_40 = lean::alloc_cnstr(1, 1, 1); -} else { - x_40 = x_39; -} -lean::cnstr_set(x_40, 0, x_37); -lean::cnstr_set_scalar(x_40, sizeof(void*)*1, x_38); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_36); -return x_41; -} -} -} -} -obj* _init_l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__1___boxed), 5, 0); -return x_1; -} -} -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1(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_10; obj* x_11; -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__2___boxed), 8, 2); -lean::closure_set(x_8, 0, x_1); -lean::closure_set(x_8, 1, x_2); -x_9 = l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___closed__1; -x_10 = lean::alloc_closure(reinterpret_cast(l_fixCore___rarg___boxed), 3, 2); -lean::closure_set(x_10, 0, x_9); -lean::closure_set(x_10, 1, x_8); -x_11 = lean::apply_5(x_3, x_10, x_4, x_5, x_6, x_7); -return x_11; -} -} -obj* l_Lean_Parser_termParser_run(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; uint8 x_10; -lean::inc(x_2); -x_6 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_term_2__leading___boxed), 6, 1); -lean::closure_set(x_6, 0, x_2); -lean::inc(x_2); -x_7 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_term_1__trailing___boxed), 7, 1); -lean::closure_set(x_7, 0, x_2); -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1(x_6, x_7, x_1, x_8, x_3, x_4, x_5); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_11); -lean::cnstr_set(x_9, 0, x_13); -return x_9; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_9); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_15); -return x_18; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2___rarg___boxed(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_9; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__2___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg___boxed(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: -{ -obj* x_10; -x_10 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_termParser_run___spec__4___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_10; -} -} -obj* l_Lean_Parser_currLbp___at_Lean_Parser_termParser_run___spec__5___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_currLbp___at_Lean_Parser_termParser_run___spec__5(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3___boxed(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: -{ -obj* x_10; -x_10 = l___private_init_lean_parser_pratt_1__trailingLoop___main___at_Lean_Parser_termParser_run___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean::dec(x_3); -lean::dec(x_2); -return x_10; -} -} -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__2___boxed(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_9; -x_9 = l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_4); -return x_9; -} -} -obj* initialize_init_lean_parser_level(obj*); -obj* initialize_init_lean_parser_notation(obj*); -obj* initialize_init_lean_expr(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_term(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_level(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_notation(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_expr(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_identUnivSpec = _init_l_Lean_Parser_identUnivSpec(); -lean::mark_persistent(l_Lean_Parser_identUnivSpec); -l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_identUnivSpec_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_identUnivSpec_HasView_x27 = _init_l_Lean_Parser_identUnivSpec_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_identUnivSpec_HasView_x27); -l_Lean_Parser_identUnivSpec_HasView = _init_l_Lean_Parser_identUnivSpec_HasView(); -lean::mark_persistent(l_Lean_Parser_identUnivSpec_HasView); -l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_identUnivSpec_Parser_Lean_Parser_HasView); -l_Lean_Parser_identUnivSpec_Parser___closed__1 = _init_l_Lean_Parser_identUnivSpec_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_identUnivSpec_Parser___closed__1); -l_Lean_Parser_identUnivs = _init_l_Lean_Parser_identUnivs(); -lean::mark_persistent(l_Lean_Parser_identUnivs); -l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_identUnivs_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_identUnivs_HasView_x27 = _init_l_Lean_Parser_identUnivs_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_identUnivs_HasView_x27); -l_Lean_Parser_identUnivs_HasView = _init_l_Lean_Parser_identUnivs_HasView(); -lean::mark_persistent(l_Lean_Parser_identUnivs_HasView); -l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_identUnivs_Parser_Lean_Parser_HasView); -l_Lean_Parser_identUnivs_Parser___closed__1 = _init_l_Lean_Parser_identUnivs_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_identUnivs_Parser___closed__1); -l_Lean_Parser_Term_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_Lean_Parser_HasTokens); -l_Lean_Parser_Term_Lean_Parser_HasView = _init_l_Lean_Parser_Term_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_Lean_Parser_HasView); -l_Lean_Parser_Term_tuple = _init_l_Lean_Parser_Term_tuple(); -lean::mark_persistent(l_Lean_Parser_Term_tuple); -l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_Term_tuple_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_Term_tuple_HasView_x27 = _init_l_Lean_Parser_Term_tuple_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_tuple_HasView_x27); -l_Lean_Parser_Term_tuple_HasView = _init_l_Lean_Parser_Term_tuple_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_tuple_HasView); -l_Lean_Parser_Term_typed = _init_l_Lean_Parser_Term_typed(); -lean::mark_persistent(l_Lean_Parser_Term_typed); -l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_typed_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_typed_HasView_x27 = _init_l_Lean_Parser_Term_typed_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_typed_HasView_x27); -l_Lean_Parser_Term_typed_HasView = _init_l_Lean_Parser_Term_typed_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_typed_HasView); -l_Lean_Parser_Term_parenSpecial = _init_l_Lean_Parser_Term_parenSpecial(); -lean::mark_persistent(l_Lean_Parser_Term_parenSpecial); -l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_parenSpecial_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_parenSpecial_HasView_x27 = _init_l_Lean_Parser_Term_parenSpecial_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_parenSpecial_HasView_x27); -l_Lean_Parser_Term_parenSpecial_HasView = _init_l_Lean_Parser_Term_parenSpecial_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_parenSpecial_HasView); -l_Lean_Parser_Term_parenContent = _init_l_Lean_Parser_Term_parenContent(); -lean::mark_persistent(l_Lean_Parser_Term_parenContent); -l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_parenContent_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_parenContent_HasView_x27 = _init_l_Lean_Parser_Term_parenContent_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_parenContent_HasView_x27); -l_Lean_Parser_Term_parenContent_HasView = _init_l_Lean_Parser_Term_parenContent_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_parenContent_HasView); -l_Lean_Parser_Term_paren = _init_l_Lean_Parser_Term_paren(); -lean::mark_persistent(l_Lean_Parser_Term_paren); -l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_paren_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_paren_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_paren_HasView_x27 = _init_l_Lean_Parser_Term_paren_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_paren_HasView_x27); -l_Lean_Parser_Term_paren_HasView = _init_l_Lean_Parser_Term_paren_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_paren_HasView); -l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_paren_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_paren_Parser___closed__1 = _init_l_Lean_Parser_Term_paren_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_paren_Parser___closed__1); -l_Lean_Parser_Term_hole = _init_l_Lean_Parser_Term_hole(); -lean::mark_persistent(l_Lean_Parser_Term_hole); -l_Lean_Parser_Term_hole_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_hole_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_hole_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_hole_HasView_x27 = _init_l_Lean_Parser_Term_hole_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_hole_HasView_x27); -l_Lean_Parser_Term_hole_HasView = _init_l_Lean_Parser_Term_hole_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_hole_HasView); -l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_hole_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_hole_Parser___closed__1 = _init_l_Lean_Parser_Term_hole_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_hole_Parser___closed__1); -l_Lean_Parser_Term_sort = _init_l_Lean_Parser_Term_sort(); -lean::mark_persistent(l_Lean_Parser_Term_sort); -l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_sort_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_sort_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_sort_HasView_x27 = _init_l_Lean_Parser_Term_sort_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_sort_HasView_x27); -l_Lean_Parser_Term_sort_HasView = _init_l_Lean_Parser_Term_sort_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_sort_HasView); -l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_sort_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_sort_Parser___closed__1 = _init_l_Lean_Parser_Term_sort_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_sort_Parser___closed__1); -l_Lean_Parser_Term_typeSpec = _init_l_Lean_Parser_Term_typeSpec(); -lean::mark_persistent(l_Lean_Parser_Term_typeSpec); -l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_typeSpec_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_typeSpec_HasView_x27 = _init_l_Lean_Parser_Term_typeSpec_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_typeSpec_HasView_x27); -l_Lean_Parser_Term_typeSpec_HasView = _init_l_Lean_Parser_Term_typeSpec_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_typeSpec_HasView); -l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_typeSpec_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_typeSpec_Parser___closed__1 = _init_l_Lean_Parser_Term_typeSpec_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_typeSpec_Parser___closed__1); -l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_optType_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_optType_Parser___closed__1 = _init_l_Lean_Parser_Term_optType_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_optType_Parser___closed__1); -l_Lean_Parser_Term_optType_viewDefault = _init_l_Lean_Parser_Term_optType_viewDefault(); -lean::mark_persistent(l_Lean_Parser_Term_optType_viewDefault); -l_Lean_Parser_Term_binderIdent = _init_l_Lean_Parser_Term_binderIdent(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent); -l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_binderIdent_HasView_x27 = _init_l_Lean_Parser_Term_binderIdent_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_HasView_x27); -l_Lean_Parser_Term_binderIdent_HasView = _init_l_Lean_Parser_Term_binderIdent_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_HasView); -l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_binderIdent_Parser___closed__1 = _init_l_Lean_Parser_Term_binderIdent_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderIdent_Parser___closed__1); -l_Lean_Parser_Term_binderDefaultVal = _init_l_Lean_Parser_Term_binderDefaultVal(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefaultVal); -l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefaultVal_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_binderDefaultVal_HasView_x27 = _init_l_Lean_Parser_Term_binderDefaultVal_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefaultVal_HasView_x27); -l_Lean_Parser_Term_binderDefaultVal_HasView = _init_l_Lean_Parser_Term_binderDefaultVal_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefaultVal_HasView); -l_Lean_Parser_Term_binderDefaultTac = _init_l_Lean_Parser_Term_binderDefaultTac(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefaultTac); -l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefaultTac_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_binderDefaultTac_HasView_x27 = _init_l_Lean_Parser_Term_binderDefaultTac_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefaultTac_HasView_x27); -l_Lean_Parser_Term_binderDefaultTac_HasView = _init_l_Lean_Parser_Term_binderDefaultTac_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefaultTac_HasView); -l_Lean_Parser_Term_binderDefault = _init_l_Lean_Parser_Term_binderDefault(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefault); -l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefault_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_binderDefault_HasView_x27 = _init_l_Lean_Parser_Term_binderDefault_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefault_HasView_x27); -l_Lean_Parser_Term_binderDefault_HasView = _init_l_Lean_Parser_Term_binderDefault_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefault_HasView); -l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefault_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_binderDefault_Parser___closed__1 = _init_l_Lean_Parser_Term_binderDefault_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderDefault_Parser___closed__1); -l_Lean_Parser_Term_binderContent___closed__1 = _init_l_Lean_Parser_Term_binderContent___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent___closed__1); -l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___elambda__1___closed__3); -l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_Term_binderContent_HasView_x27___closed__1 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___closed__1); -l_Lean_Parser_Term_binderContent_HasView_x27___closed__2 = _init_l_Lean_Parser_Term_binderContent_HasView_x27___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_HasView_x27___closed__2); -l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens___closed__1 = _init_l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasTokens___closed__1); -l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__1 = _init_l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__1); -l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__2 = _init_l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__2); -l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__3 = _init_l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_binderContent_Parser_Lean_Parser_HasView___closed__3); -l_Lean_Parser_Term_simpleExplicitBinder = _init_l_Lean_Parser_Term_simpleExplicitBinder(); -lean::mark_persistent(l_Lean_Parser_Term_simpleExplicitBinder); -l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27 = _init_l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_simpleExplicitBinder_HasView_x27); -l_Lean_Parser_Term_simpleExplicitBinder_HasView = _init_l_Lean_Parser_Term_simpleExplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_simpleExplicitBinder_HasView); -l_Lean_Parser_Term_simpleImplicitBinder = _init_l_Lean_Parser_Term_simpleImplicitBinder(); -lean::mark_persistent(l_Lean_Parser_Term_simpleImplicitBinder); -l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27 = _init_l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_simpleImplicitBinder_HasView_x27); -l_Lean_Parser_Term_simpleImplicitBinder_HasView = _init_l_Lean_Parser_Term_simpleImplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_simpleImplicitBinder_HasView); -l_Lean_Parser_Term_simpleStrictImplicitBinder = _init_l_Lean_Parser_Term_simpleStrictImplicitBinder(); -lean::mark_persistent(l_Lean_Parser_Term_simpleStrictImplicitBinder); -l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27 = _init_l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView_x27); -l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView = _init_l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_simpleStrictImplicitBinder_HasView); -l_Lean_Parser_Term_simpleInstImplicitBinder = _init_l_Lean_Parser_Term_simpleInstImplicitBinder(); -lean::mark_persistent(l_Lean_Parser_Term_simpleInstImplicitBinder); -l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27 = _init_l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_simpleInstImplicitBinder_HasView_x27); -l_Lean_Parser_Term_simpleInstImplicitBinder_HasView = _init_l_Lean_Parser_Term_simpleInstImplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_simpleInstImplicitBinder_HasView); -l_Lean_Parser_Term_simpleBinder = _init_l_Lean_Parser_Term_simpleBinder(); -lean::mark_persistent(l_Lean_Parser_Term_simpleBinder); -l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_simpleBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_simpleBinder_HasView_x27 = _init_l_Lean_Parser_Term_simpleBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_simpleBinder_HasView_x27); -l_Lean_Parser_Term_simpleBinder_HasView = _init_l_Lean_Parser_Term_simpleBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_simpleBinder_HasView); -l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_simpleBinder_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_simpleBinder_Parser___closed__1 = _init_l_Lean_Parser_Term_simpleBinder_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_simpleBinder_Parser___closed__1); -l_Lean_Parser_Term_anonymousConstructor = _init_l_Lean_Parser_Term_anonymousConstructor(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousConstructor); -l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousConstructor_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_anonymousConstructor_HasView_x27 = _init_l_Lean_Parser_Term_anonymousConstructor_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousConstructor_HasView_x27); -l_Lean_Parser_Term_anonymousConstructor_HasView = _init_l_Lean_Parser_Term_anonymousConstructor_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousConstructor_HasView); -l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousConstructor_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_anonymousConstructor_Parser___closed__1 = _init_l_Lean_Parser_Term_anonymousConstructor_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousConstructor_Parser___closed__1); -l_Lean_Parser_Term_explicitBinderContent___closed__1 = _init_l_Lean_Parser_Term_explicitBinderContent___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinderContent___closed__1); -l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinderContent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_explicitBinderContent_HasView_x27___closed__1 = _init_l_Lean_Parser_Term_explicitBinderContent_HasView_x27___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinderContent_HasView_x27___closed__1); -l_Lean_Parser_Term_explicitBinder___closed__1 = _init_l_Lean_Parser_Term_explicitBinder___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinder___closed__1); -l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinder_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinder_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__1 = _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__1); -l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__2 = _init_l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_explicitBinder_HasView_x27___closed__2); -l_Lean_Parser_Term_implicitBinder = _init_l_Lean_Parser_Term_implicitBinder(); -lean::mark_persistent(l_Lean_Parser_Term_implicitBinder); -l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_implicitBinder_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_implicitBinder_HasView_x27 = _init_l_Lean_Parser_Term_implicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_implicitBinder_HasView_x27); -l_Lean_Parser_Term_implicitBinder_HasView = _init_l_Lean_Parser_Term_implicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_implicitBinder_HasView); -l_Lean_Parser_Term_strictImplicitBinder = _init_l_Lean_Parser_Term_strictImplicitBinder(); -lean::mark_persistent(l_Lean_Parser_Term_strictImplicitBinder); -l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_strictImplicitBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_strictImplicitBinder_HasView_x27 = _init_l_Lean_Parser_Term_strictImplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_strictImplicitBinder_HasView_x27); -l_Lean_Parser_Term_strictImplicitBinder_HasView = _init_l_Lean_Parser_Term_strictImplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_strictImplicitBinder_HasView); -l_Lean_Parser_Term_instImplicitNamedBinder = _init_l_Lean_Parser_Term_instImplicitNamedBinder(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitNamedBinder); -l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27 = _init_l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitNamedBinder_HasView_x27); -l_Lean_Parser_Term_instImplicitNamedBinder_HasView = _init_l_Lean_Parser_Term_instImplicitNamedBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitNamedBinder_HasView); -l_Lean_Parser_Term_instImplicitAnonymousBinder = _init_l_Lean_Parser_Term_instImplicitAnonymousBinder(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitAnonymousBinder); -l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27 = _init_l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView_x27); -l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView = _init_l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitAnonymousBinder_HasView); -l_Lean_Parser_Term_instImplicitBinderContent = _init_l_Lean_Parser_Term_instImplicitBinderContent(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinderContent); -l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27 = _init_l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinderContent_HasView_x27); -l_Lean_Parser_Term_instImplicitBinderContent_HasView = _init_l_Lean_Parser_Term_instImplicitBinderContent_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinderContent_HasView); -l_Lean_Parser_Term_instImplicitBinder = _init_l_Lean_Parser_Term_instImplicitBinder(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinder); -l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinder_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_instImplicitBinder_HasView_x27 = _init_l_Lean_Parser_Term_instImplicitBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinder_HasView_x27); -l_Lean_Parser_Term_instImplicitBinder_HasView = _init_l_Lean_Parser_Term_instImplicitBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_instImplicitBinder_HasView); -l_Lean_Parser_Term_bracketedBinder___closed__1 = _init_l_Lean_Parser_Term_bracketedBinder___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder___closed__1); -l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_bracketedBinder_HasView_x27___closed__1 = _init_l_Lean_Parser_Term_bracketedBinder_HasView_x27___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_HasView_x27___closed__1); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__1 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__1); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__2 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__2); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__3 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasTokens___closed__3); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__1 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__1); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__2 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__2); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__3 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__3); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__4 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__4); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__5 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__5(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__5); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__6 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__6(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__6); -l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__7 = _init_l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__7(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinder_Parser_Lean_Parser_HasView___closed__7); -l_Lean_Parser_Term_binder = _init_l_Lean_Parser_Term_binder(); -lean::mark_persistent(l_Lean_Parser_Term_binder); -l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_binder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_binder_HasView_x27 = _init_l_Lean_Parser_Term_binder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_binder_HasView_x27); -l_Lean_Parser_Term_binder_HasView = _init_l_Lean_Parser_Term_binder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binder_HasView); -l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binder_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_binder_Parser___closed__1 = _init_l_Lean_Parser_Term_binder_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binder_Parser___closed__1); -l_Lean_Parser_Term_bindersTypes = _init_l_Lean_Parser_Term_bindersTypes(); -lean::mark_persistent(l_Lean_Parser_Term_bindersTypes); -l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bindersTypes_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_bindersTypes_HasView_x27 = _init_l_Lean_Parser_Term_bindersTypes_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_bindersTypes_HasView_x27); -l_Lean_Parser_Term_bindersTypes_HasView = _init_l_Lean_Parser_Term_bindersTypes_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_bindersTypes_HasView); -l_Lean_Parser_Term_mixedBinder = _init_l_Lean_Parser_Term_mixedBinder(); -lean::mark_persistent(l_Lean_Parser_Term_mixedBinder); -l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_mixedBinder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_mixedBinder_HasView_x27 = _init_l_Lean_Parser_Term_mixedBinder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_mixedBinder_HasView_x27); -l_Lean_Parser_Term_mixedBinder_HasView = _init_l_Lean_Parser_Term_mixedBinder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_mixedBinder_HasView); -l_Lean_Parser_Term_bindersRemainder = _init_l_Lean_Parser_Term_bindersRemainder(); -lean::mark_persistent(l_Lean_Parser_Term_bindersRemainder); -l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bindersRemainder_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_bindersRemainder_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_bindersRemainder_HasView_x27 = _init_l_Lean_Parser_Term_bindersRemainder_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_bindersRemainder_HasView_x27); -l_Lean_Parser_Term_bindersRemainder_HasView = _init_l_Lean_Parser_Term_bindersRemainder_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_bindersRemainder_HasView); -l_Lean_Parser_Term_bindersExt = _init_l_Lean_Parser_Term_bindersExt(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt); -l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_Term_bindersExt_HasView_x27 = _init_l_Lean_Parser_Term_bindersExt_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_HasView_x27); -l_Lean_Parser_Term_bindersExt_HasView = _init_l_Lean_Parser_Term_bindersExt_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_HasView); -l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_bindersExt_Parser___closed__1 = _init_l_Lean_Parser_Term_bindersExt_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bindersExt_Parser___closed__1); -l_Lean_Parser_Term_binders = _init_l_Lean_Parser_Term_binders(); -lean::mark_persistent(l_Lean_Parser_Term_binders); -l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_binders_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_binders_HasView_x27 = _init_l_Lean_Parser_Term_binders_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_binders_HasView_x27); -l_Lean_Parser_Term_binders_HasView = _init_l_Lean_Parser_Term_binders_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binders_HasView); -l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_binders_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_binders_Parser___closed__1 = _init_l_Lean_Parser_Term_binders_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_binders_Parser___closed__1); -l_Lean_Parser_Term_bracketedBinders = _init_l_Lean_Parser_Term_bracketedBinders(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders); -l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__6 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27___lambda__1___closed__6); -l_Lean_Parser_Term_bracketedBinders_HasView_x27 = _init_l_Lean_Parser_Term_bracketedBinders_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView_x27); -l_Lean_Parser_Term_bracketedBinders_HasView = _init_l_Lean_Parser_Term_bracketedBinders_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_HasView); -l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_bracketedBinders_Parser___closed__1 = _init_l_Lean_Parser_Term_bracketedBinders_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_bracketedBinders_Parser___closed__1); -l_Lean_Parser_Term_lambda = _init_l_Lean_Parser_Term_lambda(); -lean::mark_persistent(l_Lean_Parser_Term_lambda); -l_Lean_Parser_Term_lambda_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_lambda_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_lambda_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_lambda_HasView_x27 = _init_l_Lean_Parser_Term_lambda_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_lambda_HasView_x27); -l_Lean_Parser_Term_lambda_HasView = _init_l_Lean_Parser_Term_lambda_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_lambda_HasView); -l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_lambda_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_lambda_Parser___closed__1 = _init_l_Lean_Parser_Term_lambda_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_lambda_Parser___closed__1); -l_Lean_Parser_Term_assumeAnonymous = _init_l_Lean_Parser_Term_assumeAnonymous(); -lean::mark_persistent(l_Lean_Parser_Term_assumeAnonymous); -l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_assumeAnonymous_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_assumeAnonymous_HasView_x27 = _init_l_Lean_Parser_Term_assumeAnonymous_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_assumeAnonymous_HasView_x27); -l_Lean_Parser_Term_assumeAnonymous_HasView = _init_l_Lean_Parser_Term_assumeAnonymous_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_assumeAnonymous_HasView); -l_Lean_Parser_Term_assumeBinders = _init_l_Lean_Parser_Term_assumeBinders(); -lean::mark_persistent(l_Lean_Parser_Term_assumeBinders); -l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_assumeBinders_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_assumeBinders_HasView_x27 = _init_l_Lean_Parser_Term_assumeBinders_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_assumeBinders_HasView_x27); -l_Lean_Parser_Term_assumeBinders_HasView = _init_l_Lean_Parser_Term_assumeBinders_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_assumeBinders_HasView); -l_Lean_Parser_Term_assume = _init_l_Lean_Parser_Term_assume(); -lean::mark_persistent(l_Lean_Parser_Term_assume); -l_Lean_Parser_Term_assume_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_assume_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_assume_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_assume_HasView_x27 = _init_l_Lean_Parser_Term_assume_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_assume_HasView_x27); -l_Lean_Parser_Term_assume_HasView = _init_l_Lean_Parser_Term_assume_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_assume_HasView); -l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_assume_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_assume_Parser___closed__1 = _init_l_Lean_Parser_Term_assume_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_assume_Parser___closed__1); -l_Lean_Parser_Term_pi = _init_l_Lean_Parser_Term_pi(); -lean::mark_persistent(l_Lean_Parser_Term_pi); -l_Lean_Parser_Term_pi_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_pi_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_pi_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_pi_HasView_x27 = _init_l_Lean_Parser_Term_pi_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_pi_HasView_x27); -l_Lean_Parser_Term_pi_HasView = _init_l_Lean_Parser_Term_pi_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_pi_HasView); -l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_pi_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_pi_Parser___closed__1 = _init_l_Lean_Parser_Term_pi_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_pi_Parser___closed__1); -l_Lean_Parser_Term_explicitModifier = _init_l_Lean_Parser_Term_explicitModifier(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier); -l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_explicitModifier_HasView_x27 = _init_l_Lean_Parser_Term_explicitModifier_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier_HasView_x27); -l_Lean_Parser_Term_explicitModifier_HasView = _init_l_Lean_Parser_Term_explicitModifier_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_explicitModifier_HasView); -l_Lean_Parser_Term_explicit = _init_l_Lean_Parser_Term_explicit(); -lean::mark_persistent(l_Lean_Parser_Term_explicit); -l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__2 = _init_l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_explicit_HasView_x27___elambda__2___closed__2); -l_Lean_Parser_Term_explicit_HasView_x27 = _init_l_Lean_Parser_Term_explicit_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_explicit_HasView_x27); -l_Lean_Parser_Term_explicit_HasView = _init_l_Lean_Parser_Term_explicit_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_explicit_HasView); -l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_explicit_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_explicit_Parser___closed__1 = _init_l_Lean_Parser_Term_explicit_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_explicit_Parser___closed__1); -l_Lean_Parser_Term_from = _init_l_Lean_Parser_Term_from(); -lean::mark_persistent(l_Lean_Parser_Term_from); -l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_from_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_from_HasView_x27 = _init_l_Lean_Parser_Term_from_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_from_HasView_x27); -l_Lean_Parser_Term_from_HasView = _init_l_Lean_Parser_Term_from_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_from_HasView); -l_Lean_Parser_Term_from_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_from_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_from_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_from_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_from_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_from_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_from_Parser___closed__1 = _init_l_Lean_Parser_Term_from_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_from_Parser___closed__1); -l_Lean_Parser_Term_letLhsId = _init_l_Lean_Parser_Term_letLhsId(); -lean::mark_persistent(l_Lean_Parser_Term_letLhsId); -l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_letLhsId_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_letLhsId_HasView_x27 = _init_l_Lean_Parser_Term_letLhsId_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_letLhsId_HasView_x27); -l_Lean_Parser_Term_letLhsId_HasView = _init_l_Lean_Parser_Term_letLhsId_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_letLhsId_HasView); -l_Lean_Parser_Term_letLhs = _init_l_Lean_Parser_Term_letLhs(); -lean::mark_persistent(l_Lean_Parser_Term_letLhs); -l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_letLhs_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_letLhs_HasView_x27 = _init_l_Lean_Parser_Term_letLhs_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_letLhs_HasView_x27); -l_Lean_Parser_Term_letLhs_HasView = _init_l_Lean_Parser_Term_letLhs_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_letLhs_HasView); -l_Lean_Parser_Term_let = _init_l_Lean_Parser_Term_let(); -lean::mark_persistent(l_Lean_Parser_Term_let); -l_Lean_Parser_Term_let_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_let_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_let_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_let_HasView_x27 = _init_l_Lean_Parser_Term_let_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_let_HasView_x27); -l_Lean_Parser_Term_let_HasView = _init_l_Lean_Parser_Term_let_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_let_HasView); -l_Lean_Parser_Term_let_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_let_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_let_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_let_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_let_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_let_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_let_Parser___closed__1 = _init_l_Lean_Parser_Term_let_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_let_Parser___closed__1); -l_Lean_Parser_Term_optIdent = _init_l_Lean_Parser_Term_optIdent(); -lean::mark_persistent(l_Lean_Parser_Term_optIdent); -l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_optIdent_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_optIdent_HasView_x27 = _init_l_Lean_Parser_Term_optIdent_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_optIdent_HasView_x27); -l_Lean_Parser_Term_optIdent_HasView = _init_l_Lean_Parser_Term_optIdent_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_optIdent_HasView); -l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_optIdent_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_optIdent_Parser___closed__1 = _init_l_Lean_Parser_Term_optIdent_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_optIdent_Parser___closed__1); -l_Lean_Parser_Term_haveTerm = _init_l_Lean_Parser_Term_haveTerm(); -lean::mark_persistent(l_Lean_Parser_Term_haveTerm); -l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_haveTerm_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_haveTerm_HasView_x27 = _init_l_Lean_Parser_Term_haveTerm_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_haveTerm_HasView_x27); -l_Lean_Parser_Term_haveTerm_HasView = _init_l_Lean_Parser_Term_haveTerm_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_haveTerm_HasView); -l_Lean_Parser_Term_haveFrom = _init_l_Lean_Parser_Term_haveFrom(); -lean::mark_persistent(l_Lean_Parser_Term_haveFrom); -l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_haveFrom_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_haveFrom_HasView_x27 = _init_l_Lean_Parser_Term_haveFrom_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_haveFrom_HasView_x27); -l_Lean_Parser_Term_haveFrom_HasView = _init_l_Lean_Parser_Term_haveFrom_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_haveFrom_HasView); -l_Lean_Parser_Term_haveProof = _init_l_Lean_Parser_Term_haveProof(); -lean::mark_persistent(l_Lean_Parser_Term_haveProof); -l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_haveProof_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_haveProof_HasView_x27 = _init_l_Lean_Parser_Term_haveProof_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_haveProof_HasView_x27); -l_Lean_Parser_Term_haveProof_HasView = _init_l_Lean_Parser_Term_haveProof_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_haveProof_HasView); -l_Lean_Parser_Term_have = _init_l_Lean_Parser_Term_have(); -lean::mark_persistent(l_Lean_Parser_Term_have); -l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_have_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_have_HasView_x27 = _init_l_Lean_Parser_Term_have_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_have_HasView_x27); -l_Lean_Parser_Term_have_HasView = _init_l_Lean_Parser_Term_have_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_have_HasView); -l_Lean_Parser_Term_have_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_have_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_have_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_have_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_have_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_have_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_have_Parser___closed__1 = _init_l_Lean_Parser_Term_have_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_have_Parser___closed__1); -l_Lean_Parser_Term_show = _init_l_Lean_Parser_Term_show(); -lean::mark_persistent(l_Lean_Parser_Term_show); -l_Lean_Parser_Term_show_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_show_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_show_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_show_HasView_x27 = _init_l_Lean_Parser_Term_show_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_show_HasView_x27); -l_Lean_Parser_Term_show_HasView = _init_l_Lean_Parser_Term_show_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_show_HasView); -l_Lean_Parser_Term_show_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_show_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_show_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_show_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_show_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_show_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_show_Parser___closed__1 = _init_l_Lean_Parser_Term_show_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_show_Parser___closed__1); -l_Lean_Parser_Term_matchEquation = _init_l_Lean_Parser_Term_matchEquation(); -lean::mark_persistent(l_Lean_Parser_Term_matchEquation); -l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_matchEquation_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_matchEquation_HasView_x27 = _init_l_Lean_Parser_Term_matchEquation_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_matchEquation_HasView_x27); -l_Lean_Parser_Term_matchEquation_HasView = _init_l_Lean_Parser_Term_matchEquation_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_matchEquation_HasView); -l_Lean_Parser_Term_match = _init_l_Lean_Parser_Term_match(); -lean::mark_persistent(l_Lean_Parser_Term_match); -l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_match_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_match_HasView_x27 = _init_l_Lean_Parser_Term_match_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_match_HasView_x27); -l_Lean_Parser_Term_match_HasView = _init_l_Lean_Parser_Term_match_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_match_HasView); -l_Lean_Parser_Term_match_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_match_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_match_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_match_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_match_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_match_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_match_Parser___closed__1 = _init_l_Lean_Parser_Term_match_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_match_Parser___closed__1); -l_Lean_Parser_Term_if = _init_l_Lean_Parser_Term_if(); -lean::mark_persistent(l_Lean_Parser_Term_if); -l_Lean_Parser_Term_if_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_if_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_if_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_if_HasView_x27 = _init_l_Lean_Parser_Term_if_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_if_HasView_x27); -l_Lean_Parser_Term_if_HasView = _init_l_Lean_Parser_Term_if_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_if_HasView); -l_Lean_Parser_Term_if_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_if_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_if_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_if_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_if_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_if_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_if_Parser___closed__1 = _init_l_Lean_Parser_Term_if_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_if_Parser___closed__1); -l_Lean_Parser_Term_structInstType = _init_l_Lean_Parser_Term_structInstType(); -lean::mark_persistent(l_Lean_Parser_Term_structInstType); -l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_structInstType_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_structInstType_HasView_x27 = _init_l_Lean_Parser_Term_structInstType_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_structInstType_HasView_x27); -l_Lean_Parser_Term_structInstType_HasView = _init_l_Lean_Parser_Term_structInstType_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_structInstType_HasView); -l_Lean_Parser_Term_structInstWith = _init_l_Lean_Parser_Term_structInstWith(); -lean::mark_persistent(l_Lean_Parser_Term_structInstWith); -l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_structInstWith_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_structInstWith_HasView_x27 = _init_l_Lean_Parser_Term_structInstWith_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_structInstWith_HasView_x27); -l_Lean_Parser_Term_structInstWith_HasView = _init_l_Lean_Parser_Term_structInstWith_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_structInstWith_HasView); -l_Lean_Parser_Term_structInstField = _init_l_Lean_Parser_Term_structInstField(); -lean::mark_persistent(l_Lean_Parser_Term_structInstField); -l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_structInstField_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_structInstField_HasView_x27 = _init_l_Lean_Parser_Term_structInstField_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_structInstField_HasView_x27); -l_Lean_Parser_Term_structInstField_HasView = _init_l_Lean_Parser_Term_structInstField_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_structInstField_HasView); -l_Lean_Parser_Term_structInstSource = _init_l_Lean_Parser_Term_structInstSource(); -lean::mark_persistent(l_Lean_Parser_Term_structInstSource); -l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_structInstSource_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_structInstSource_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_structInstSource_HasView_x27 = _init_l_Lean_Parser_Term_structInstSource_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_structInstSource_HasView_x27); -l_Lean_Parser_Term_structInstSource_HasView = _init_l_Lean_Parser_Term_structInstSource_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_structInstSource_HasView); -l_Lean_Parser_Term_structInstItem = _init_l_Lean_Parser_Term_structInstItem(); -lean::mark_persistent(l_Lean_Parser_Term_structInstItem); -l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_structInstItem_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_structInstItem_HasView_x27 = _init_l_Lean_Parser_Term_structInstItem_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_structInstItem_HasView_x27); -l_Lean_Parser_Term_structInstItem_HasView = _init_l_Lean_Parser_Term_structInstItem_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_structInstItem_HasView); -l_Lean_Parser_Term_structInst = _init_l_Lean_Parser_Term_structInst(); -lean::mark_persistent(l_Lean_Parser_Term_structInst); -l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_Term_structInst_HasView_x27 = _init_l_Lean_Parser_Term_structInst_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_HasView_x27); -l_Lean_Parser_Term_structInst_HasView = _init_l_Lean_Parser_Term_structInst_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_HasView); -l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_structInst_Parser___closed__1 = _init_l_Lean_Parser_Term_structInst_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_structInst_Parser___closed__1); -l_Lean_Parser_Term_Subtype = _init_l_Lean_Parser_Term_Subtype(); -lean::mark_persistent(l_Lean_Parser_Term_Subtype); -l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_Subtype_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_Subtype_HasView_x27 = _init_l_Lean_Parser_Term_Subtype_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_Subtype_HasView_x27); -l_Lean_Parser_Term_Subtype_HasView = _init_l_Lean_Parser_Term_Subtype_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_Subtype_HasView); -l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_Subtype_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_Subtype_Parser___closed__1 = _init_l_Lean_Parser_Term_Subtype_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_Subtype_Parser___closed__1); -l_Lean_Parser_Term_inaccessible = _init_l_Lean_Parser_Term_inaccessible(); -lean::mark_persistent(l_Lean_Parser_Term_inaccessible); -l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_inaccessible_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_inaccessible_HasView_x27 = _init_l_Lean_Parser_Term_inaccessible_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_inaccessible_HasView_x27); -l_Lean_Parser_Term_inaccessible_HasView = _init_l_Lean_Parser_Term_inaccessible_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_inaccessible_HasView); -l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_inaccessible_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_inaccessible_Parser___closed__1 = _init_l_Lean_Parser_Term_inaccessible_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_inaccessible_Parser___closed__1); -l_Lean_Parser_Term_anonymousInaccessible = _init_l_Lean_Parser_Term_anonymousInaccessible(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousInaccessible); -l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousInaccessible_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_anonymousInaccessible_HasView_x27 = _init_l_Lean_Parser_Term_anonymousInaccessible_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousInaccessible_HasView_x27); -l_Lean_Parser_Term_anonymousInaccessible_HasView = _init_l_Lean_Parser_Term_anonymousInaccessible_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousInaccessible_HasView); -l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousInaccessible_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_anonymousInaccessible_Parser___closed__1 = _init_l_Lean_Parser_Term_anonymousInaccessible_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_anonymousInaccessible_Parser___closed__1); -l_Lean_Parser_Term_sorry = _init_l_Lean_Parser_Term_sorry(); -lean::mark_persistent(l_Lean_Parser_Term_sorry); -l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_sorry_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_Term_sorry_HasView_x27 = _init_l_Lean_Parser_Term_sorry_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_sorry_HasView_x27); -l_Lean_Parser_Term_sorry_HasView = _init_l_Lean_Parser_Term_sorry_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_sorry_HasView); -l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_sorry_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_sorry_Parser___closed__1 = _init_l_Lean_Parser_Term_sorry_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_sorry_Parser___closed__1); -l_Lean_Parser_Term_borrowPrec = _init_l_Lean_Parser_Term_borrowPrec(); -lean::mark_persistent(l_Lean_Parser_Term_borrowPrec); -l_Lean_Parser_Term_borrowed = _init_l_Lean_Parser_Term_borrowed(); -lean::mark_persistent(l_Lean_Parser_Term_borrowed); -l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_borrowed_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_borrowed_HasView_x27 = _init_l_Lean_Parser_Term_borrowed_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_borrowed_HasView_x27); -l_Lean_Parser_Term_borrowed_HasView = _init_l_Lean_Parser_Term_borrowed_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_borrowed_HasView); -l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_borrowed_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_borrowed_Parser___closed__1 = _init_l_Lean_Parser_Term_borrowed_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_borrowed_Parser___closed__1); -l_Lean_Parser_Term_depArrow = _init_l_Lean_Parser_Term_depArrow(); -lean::mark_persistent(l_Lean_Parser_Term_depArrow); -l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_depArrow_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_depArrow_HasView_x27 = _init_l_Lean_Parser_Term_depArrow_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_depArrow_HasView_x27); -l_Lean_Parser_Term_depArrow_HasView = _init_l_Lean_Parser_Term_depArrow_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_depArrow_HasView); -l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_depArrow_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_depArrow_Parser___closed__1 = _init_l_Lean_Parser_Term_depArrow_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_depArrow_Parser___closed__1); -l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1 = _init_l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_stringLit_Parser___at_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens___spec__1___rarg___closed__1); -l_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_builtinLeadingParsers_Lean_Parser_HasTokens); -l_Lean_Parser_Term_builtinLeadingParsers = _init_l_Lean_Parser_Term_builtinLeadingParsers(); -lean::mark_persistent(l_Lean_Parser_Term_builtinLeadingParsers); -l_Lean_Parser_Term_sortApp = _init_l_Lean_Parser_Term_sortApp(); -lean::mark_persistent(l_Lean_Parser_Term_sortApp); -l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_sortApp_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_sortApp_HasView_x27 = _init_l_Lean_Parser_Term_sortApp_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_sortApp_HasView_x27); -l_Lean_Parser_Term_sortApp_HasView = _init_l_Lean_Parser_Term_sortApp_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_sortApp_HasView); -l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_sortApp_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_sortApp_Parser___closed__1 = _init_l_Lean_Parser_Term_sortApp_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_sortApp_Parser___closed__1); -l_Lean_Parser_Term_app = _init_l_Lean_Parser_Term_app(); -lean::mark_persistent(l_Lean_Parser_Term_app); -l_Lean_Parser_Term_app_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_app_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_app_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_app_HasView_x27 = _init_l_Lean_Parser_Term_app_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_app_HasView_x27); -l_Lean_Parser_Term_app_HasView = _init_l_Lean_Parser_Term_app_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_app_HasView); -l_Lean_Parser_Term_app_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_app_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_app_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_app_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_app_Parser___closed__1 = _init_l_Lean_Parser_Term_app_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_app_Parser___closed__1); -l_Lean_Parser_Term_arrow = _init_l_Lean_Parser_Term_arrow(); -lean::mark_persistent(l_Lean_Parser_Term_arrow); -l_Lean_Parser_Term_arrow_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_Term_arrow_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_arrow_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_Term_arrow_HasView_x27 = _init_l_Lean_Parser_Term_arrow_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_arrow_HasView_x27); -l_Lean_Parser_Term_arrow_HasView = _init_l_Lean_Parser_Term_arrow_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_arrow_HasView); -l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_arrow_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_arrow_Parser___closed__1 = _init_l_Lean_Parser_Term_arrow_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_arrow_Parser___closed__1); -l_Lean_Parser_Term_projectionSpec = _init_l_Lean_Parser_Term_projectionSpec(); -lean::mark_persistent(l_Lean_Parser_Term_projectionSpec); -l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_Term_projectionSpec_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_Term_projectionSpec_HasView_x27 = _init_l_Lean_Parser_Term_projectionSpec_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_projectionSpec_HasView_x27); -l_Lean_Parser_Term_projectionSpec_HasView = _init_l_Lean_Parser_Term_projectionSpec_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_projectionSpec_HasView); -l_Lean_Parser_Term_projection = _init_l_Lean_Parser_Term_projection(); -lean::mark_persistent(l_Lean_Parser_Term_projection); -l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_Term_projection_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_Term_projection_HasView_x27 = _init_l_Lean_Parser_Term_projection_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_Term_projection_HasView_x27); -l_Lean_Parser_Term_projection_HasView = _init_l_Lean_Parser_Term_projection_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_projection_HasView); -l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_Term_projection_Parser_Lean_Parser_HasView); -l_Lean_Parser_Term_projection_Parser___closed__1 = _init_l_Lean_Parser_Term_projection_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_Term_projection_Parser___closed__1); -l_Lean_Parser_Term_projection_tokens = _init_l_Lean_Parser_Term_projection_tokens(); -lean::mark_persistent(l_Lean_Parser_Term_projection_tokens); -l_Lean_Parser_Term_builtinTrailingParsers_Lean_Parser_HasTokens = _init_l_Lean_Parser_Term_builtinTrailingParsers_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_Term_builtinTrailingParsers_Lean_Parser_HasTokens); -l_Lean_Parser_Term_builtinTrailingParsers = _init_l_Lean_Parser_Term_builtinTrailingParsers(); -lean::mark_persistent(l_Lean_Parser_Term_builtinTrailingParsers); -l___private_init_lean_parser_term_1__trailing___closed__1 = _init_l___private_init_lean_parser_term_1__trailing___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_term_1__trailing___closed__1); -l___private_init_lean_parser_term_1__trailing___closed__2 = _init_l___private_init_lean_parser_term_1__trailing___closed__2(); -lean::mark_persistent(l___private_init_lean_parser_term_1__trailing___closed__2); -l___private_init_lean_parser_term_2__leading___closed__1 = _init_l___private_init_lean_parser_term_2__leading___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_term_2__leading___closed__1); -l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___closed__1 = _init_l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_prattParser___at_Lean_Parser_termParser_run___spec__1___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/token.cpp b/src/stage0/init/lean/parser/token.cpp deleted file mode 100644 index e1bd29f292..0000000000 --- a/src/stage0/init/lean/parser/token.cpp +++ /dev/null @@ -1,34704 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.token -// Imports: init.lean.parser.combinators init.lean.parser.stringliteral -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_withTrailing___rarg___lambda__1(obj*, obj*); -obj* l_Lean_Parser_rawStr_Lean_Parser_HasTokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser_view___rarg___closed__2; -obj* l___private_init_lean_parser_parsec_4__mkStringResult___rarg(obj*, obj*); -obj* l_Lean_Parser_indexed___rarg___closed__1; -obj* l_Lean_Parser_raw_view___rarg(obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_List_mfoldr___main___at_Lean_Parser_number_x27___spec__9(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_rawStr_Lean_Parser_HasView___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit; -obj* l_fixCore___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_raw_view___rarg___closed__1; -obj* l_Lean_Parser_stringLit_View_value(obj*); -obj* l_Lean_Parser_finishCommentBlock(obj*, obj*, obj*, obj*); -extern "C" uint8 lean_name_dec_eq(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2(obj*); -obj* l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(obj*); -obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__2(obj*); -extern obj* l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -obj* l_Lean_Parser_raw_view___rarg___lambda__1___boxed(obj*); -extern obj* l_Lean_Parser_BasicParserM_Alternative; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent_View___boxed(obj*); -obj* l_Lean_Parser_raw___boxed(obj*); -obj* l_Lean_Parser_symbol_tokens(obj*, obj*); -obj* l_Lean_Parser_ident_Parser_tokens(obj*, obj*); -obj* l_Lean_Parser_Trie_oldMatchPrefix___rarg(obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__4___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2(obj*); -obj* l_DList_singleton___elambda__1___rarg(obj*, obj*); -obj* l_Lean_Parser_rawIdent_Parser_View___boxed(obj*); -obj* l_Lean_Parser_detailIdent_x27___closed__1; -obj* l___private_init_lean_parser_token_4__ident_x27___lambda__2(uint32, uint32, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_tokens___rarg(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_String_toNat(obj*); -uint8 l_Lean_isIdRest(uint32); -obj* l___private_init_lean_parser_token_4__ident_x27___closed__1; -obj* l_Lean_Parser_stringLit_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__1; -obj* l___private_init_lean_parser_token_4__ident_x27(obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_4__ident_x27___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_parseBinLit___spec__2(obj*, obj*, obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_number_x27___spec__5(obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_rawStr(obj*); -uint8 l_Lean_isIdEndEscape(uint32); -obj* l_Lean_Parser_stringLit_Parser_tokens(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2___rarg(obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_Parser(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent_View___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___boxed(obj*, obj*); -uint8 l_String_isEmpty(obj*); -obj* l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -obj* l___private_init_lean_parser_token_2__whitespaceAux___main___boxed(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_7__toNatCore___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser___rarg(obj*); -extern obj* l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__3; -obj* l_ReaderT_bind___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__6(obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent___boxed(obj*); -obj* l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_x27___spec__3(obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_viewDefault(obj*); -obj* l_Lean_Parser_number_Parser_view(obj*); -obj* l_Lean_Parser_rawStr_viewDefault___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView; -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__6___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_raw_view(obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseHexLit___spec__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_HasView_x27___elambda__2(obj*); -obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_detailIdentPartEscaped_HasView; -obj* l_Lean_Parser_indexed___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_View___rarg(obj*, obj*, obj*); -extern obj* l_mjoin___rarg___closed__1; -obj* l_Lean_Parser_asSubstring___boxed(obj*); -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView; -obj* l_Lean_Parser_raw_view___rarg___closed__2; -extern obj* l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -obj* l_Lean_Parser_number_Parser___rarg___closed__1; -obj* l___private_init_lean_parser_token_2__whitespaceAux___main(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3(obj*); -obj* l_Lean_Parser_finishCommentBlock___closed__2; -obj* l_Lean_Parser_numberOrStringLit(obj*, obj*, obj*); -obj* l_Lean_Parser_raw___rarg___lambda__3___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_BasicParserM_Monad; -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_withTrailing___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(uint32, obj*, obj*, obj*); -obj* l_Lean_Parser_rawStr_Lean_Parser_HasView___boxed(obj*); -obj* l___private_init_lean_parser_token_2__whitespaceAux(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_x27___closed__1; -obj* l_Lean_Parser_number_Parser_tokens(obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__5___rarg(obj*, obj*); -uint8 l_Char_isAlpha(uint32); -obj* l_Lean_Parser_rawIdent_Parser___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_View_value___spec__7___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -obj* l_Function_comp___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_labelsMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__2; -uint32 l_String_OldIterator_curr___main(obj*); -obj* l_List_reverse___rarg(obj*); -obj* l_ReaderT_bind___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__6___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseOctLit___spec__1(uint32, obj*, obj*, obj*); -obj* l_Lean_Parser_token___closed__1; -obj* l_Lean_Parser_ident_Parser_View___rarg___closed__1; -obj* l___private_init_lean_parser_token_5__mkConsumeToken___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_indexed___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_raw___rarg___lambda__2(obj*, uint8, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__1; -uint8 l_Lean_Parser_Syntax_isOfKind___main(obj*, obj*); -obj* l_ReaderT_orelse___at_Lean_Parser_parseBinLit___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__4(obj*); -obj* l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser_View___boxed(obj*); -obj* l_Lean_Parser_rawStr_viewDefault___boxed(obj*); -obj* l_Lean_Parser_number_x27___closed__1; -obj* l_id___rarg___boxed(obj*); -obj* l_Lean_Parser_asSubstring___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_View_value___spec__9(obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__6(obj*, uint8, obj*); -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27; -obj* l_String_OldIterator_remaining___main(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__4___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_2__whitespaceAux___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_x27___lambda__4___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_withTrailing___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_raw_view___boxed(obj*); -obj* l_Lean_Parser_number_HasView; -obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__2; -obj* l_Lean_Parser_unicodeSymbol___boxed(obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol_viewDefault___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_rawIdent_Parser_tokens___boxed(obj*, obj*); -obj* l_Lean_Parser_Substring_toString(obj*); -obj* l_Lean_Parser_rawStr_Lean_Parser_HasView(obj*); -obj* l_Lean_Parser_stringLit_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_4__ident_x27___spec__7(obj*, obj*, uint32, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_Parser(obj*, obj*, obj*); -obj* l_Lean_Parser_indexed___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_x27___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2(obj*); -obj* l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_x27___spec__6___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_asSubstring___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_x27___spec__3___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_raw(obj*); -obj* l_String_OldIterator_nextn___main(obj*, obj*); -extern obj* l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_indexed___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseHexLit___spec__1(obj*, obj*, obj*); -namespace lean { -obj* string_push(obj*, uint32); -} -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_updateLast___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6(obj*); -obj* l_Lean_Parser_detailIdent_x27(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_whitespace(obj*, obj*, obj*); -obj* l_Lean_Parser_Syntax_asNode___main(obj*); -obj* l_Lean_Parser_MonadParsec_whitespace___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_number_x27___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser_view___rarg___boxed(obj*); -obj* l_Lean_Parser_symbolOrIdent(obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_matchToken(obj*, obj*, obj*); -obj* l_Lean_Parser_finishCommentBlock___boxed(obj*, obj*, obj*, obj*); -obj* l_Nat_repr(obj*); -obj* l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2(obj*); -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__7(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_tokenCont(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_mkRawRes(obj*, obj*); -obj* l_Lean_Parser_withTrailing___rarg___lambda__3(obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7(obj*); -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser_View___rarg___closed__2; -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -obj* l_Lean_Parser_symbol_View___boxed(obj*); -obj* l_Lean_Parser_symbol_viewDefault___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2___boxed(obj*); -obj* l_Lean_Parser_raw_view___rarg___lambda__2(obj*); -obj* l_Lean_Parser_unicodeSymbol___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_stringLit_View_value___spec__2(uint32, obj*); -obj* l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -extern obj* l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1; -obj* l___private_init_lean_parser_token_4__ident_x27___lambda__1(obj*, uint32, obj*, obj*, obj*); -obj* l_List_enumFrom___main___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_idPartDefault___at___private_init_lean_parser_token_4__ident_x27___spec__3(obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_2__strAux___main(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ident_Parser___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2(obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg(obj*, obj*); -obj* l_ReaderT_Monad___rarg(obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_number_x27___spec__3(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf_view___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolCore___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser(obj*); -obj* l_Lean_Parser_rawIdent_Parser_tokens(obj*, obj*); -obj* l_Lean_Parser_stringLit_x27(obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_viewDefault___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_monadLift_view___rarg(obj*, obj*, obj*); -uint8 l_Lean_isIdBeginEscape(uint32); -obj* l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1(obj*); -obj* l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseOctLit___spec__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ident_Parser(obj*); -obj* l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldl___at___private_init_lean_parser_token_4__ident_x27___spec__8(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolCore___boxed(obj*); -obj* l___private_init_lean_parser_token_3__updateTrailing(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4(obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg(obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser_View___rarg___boxed(obj*); -obj* l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(obj*, obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l_Lean_Parser_rawStr_viewDefault(obj*); -obj* l_String_OldIterator_next___main(obj*); -obj* l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol(obj*); -obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__5; -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1; -uint8 l_UInt32_decLe(uint32, uint32); -obj* l_Lean_Parser_rawIdent_Parser_View___rarg___boxed(obj*); -obj* l___private_init_lean_parser_token_5__mkConsumeToken(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_stringLit_x27___lambda__1___boxed(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -obj* l_Lean_Parser_stringLit_Parser_View___rarg(obj*); -obj* l_Lean_Parser_raw___rarg___lambda__1(obj*, uint8, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_raw_view___rarg___lambda__1(obj*); -obj* l_Lean_Parser_Syntax_mkNode(obj*, obj*); -obj* l_Lean_Parser_symbolCore(obj*); -obj* l_Lean_Parser_raw_view___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_7__toNatCore(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_ident_Parser___rarg(obj*); -obj* l_Lean_Parser_stringLit_Parser_View(obj*); -obj* l_Lean_Parser_asSubstring(obj*); -obj* l_Lean_Parser_RecT_recurse___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__7(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_updateLast(obj*, obj*, obj*); -namespace lean { -uint8 nat_dec_lt(obj*, obj*); -} -obj* l_Lean_Parser_parseOctLit___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_MonadParsec_whitespace___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens(obj*, obj*); -obj* l_Lean_Parser_asSubstring___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_longestMatch___at_Lean_Parser_number_x27___spec__6(obj*, obj*, obj*, obj*); -extern obj* l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -uint32 l_Char_ofNat(obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseOctLit___spec__3(uint32, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdent_Parser___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ident_Parser___rarg___closed__1; -extern obj* l_Char_HasRepr___closed__1; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser___spec__1(obj*, obj*, uint32, obj*, obj*); -extern obj* l_Lean_Parser_noKind; -obj* l_Lean_Parser_ident_Parser_View___boxed(obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_4__ident_x27___spec__7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseOctLit___spec__3___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_View___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__5(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_matchToken___closed__1; -obj* l_Lean_Parser_whitespace___boxed(obj*, obj*, obj*); -extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_Lean_Parser_rawIdent_Parser(obj*); -extern uint32 l_Lean_idBeginEscape; -obj* l_Lean_Parser_symbolOrIdent_tokens___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_HasView_x27; -obj* l_List_mfoldl___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__5(obj*, obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_rawIdent_Parser_View(obj*); -obj* l_Char_quoteCore(uint32); -obj* l_Lean_Parser_ParsecT_orelseMkRes___rarg(obj*, obj*); -uint8 l_String_OldIterator_hasNext___main(obj*); -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__3(uint32, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens; -obj* l___private_init_lean_parser_token_4__ident_x27___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_2__whitespaceAux___main___closed__1; -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_Lean_Parser_parseBinLit___closed__1; -obj* l_Lean_Parser_updateLast___main___at___private_init_lean_parser_token_3__updateTrailing___main___spec__1(obj*, obj*); -obj* l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2(obj*, obj*); -obj* l_Lean_Parser_detailIdentPart; -obj* l___private_init_lean_parser_token_8__toNatBase(obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__3___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at___private_init_lean_parser_token_4__ident_x27___spec__9___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolCore___rarg___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_tokens___rarg(obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l_Lean_Parser_raw___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_ident_Parser_tokens___boxed(obj*, obj*); -obj* l_Lean_Parser_symbol_tokens___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_peekToken___closed__1; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_token___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -uint8 l_UInt32_decLt(uint32, uint32); -obj* l_Lean_Parser_symbol___boxed(obj*); -obj* l_Lean_Parser_ParsecT_tryMkRes___rarg(obj*); -obj* l_Lean_Parser_raw_view___rarg___lambda__2___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6___boxed(obj*); -obj* l_Lean_Parser_ident_Parser_View___rarg(obj*); -obj* l_Lean_Parser_idPart___at___private_init_lean_parser_token_4__ident_x27___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser_view___rarg(obj*); -obj* l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(uint8, obj*); -obj* l_Lean_Parser_detailIdent; -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_parseHexLit(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__5___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5___boxed(obj*); -obj* l_Lean_Parser_detailIdent_HasView; -obj* l___private_init_lean_parser_token_3__updateTrailing___main(obj*, obj*); -obj* l_Lean_Parser_detailIdent_Parser___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolCore___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_Parser___closed__1; -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4(obj*); -obj* l_Lean_Parser_detailIdentPartEscaped; -obj* l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(obj*, obj*, obj*, obj*, obj*); -obj* l_List_mfoldl___main___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__9(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_HasView; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_peekToken___spec__1(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__3; -obj* l_Lean_Parser_symbolOrIdent_View(obj*); -obj* l_Lean_Parser_idPartEscaped___at___private_init_lean_parser_token_4__ident_x27___spec__5___boxed(obj*, obj*, obj*); -namespace lean { -uint8 string_dec_eq(obj*, obj*); -} -obj* l_List_mfoldr___main___at_Lean_Parser_number_x27___spec__9___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6___rarg(obj*, obj*); -obj* l_Lean_Parser_number_Parser_view___rarg___closed__1; -obj* l_Lean_Parser_Combinators_seqRight_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -uint8 l_UInt32_decEq(uint32, uint32); -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView(obj*); -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_updateLast___main(obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_rawIdent_Parser_View___rarg(obj*); -obj* l_Lean_Parser_finishCommentBlock___closed__1; -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_parseBinLit___spec__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_x27___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_raw_tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_View_value___closed__1; -obj* l_Lean_Parser_symbol_View(obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8(obj*); -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux(obj*, obj*, obj*, obj*, obj*); -uint8 l_Char_isDigit(uint32); -obj* l_Lean_Parser_number_Parser_view___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__2___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser_tokens___boxed(obj*, obj*); -obj* l_Lean_Parser_idPart___at___private_init_lean_parser_token_4__ident_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_7__toNatCore___main(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_8__toNatBase___boxed(obj*, obj*); -obj* l_Lean_Parser_ident_Parser_View___rarg___boxed(obj*); -obj* l_Lean_Parser_stringLit_Parser___boxed(obj*); -obj* l_Lean_Parser_parseOctLit(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__3; -obj* l_Lean_Parser_withTrailing___rarg___lambda__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser___rarg(obj*); -obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -obj* l_Lean_Parser_detailIdent_Parser___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_String_trim(obj*); -obj* l_Lean_Parser_stringLit_x27___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser(obj*); -obj* l_Lean_Parser_ParsecT_bindMkRes___rarg(obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__2; -obj* l_Lean_Parser_peekToken___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdent_Parser___closed__1; -obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__4; -obj* l_Lean_Parser_ident_Parser___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent___rarg(obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens; -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__1(uint32, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -obj* l_Lean_Parser_rawStr_Lean_Parser_HasView___rarg(obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__8(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2___boxed(obj*); -obj* l_Lean_Parser_number_x27___lambda__3(obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1; -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at___private_init_lean_parser_token_4__ident_x27___spec__9(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol___rarg___boxed(obj*, obj*, obj*); -uint8 l_Lean_Name_quickLt(obj*, obj*); -obj* l_Lean_Parser_symbol_viewDefault___boxed(obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__3___boxed(obj*, obj*, obj*); -obj* l_ReaderT_MonadExcept___rarg(obj*); -obj* l_Lean_Parser_ident_Parser_View(obj*); -obj* l_Lean_Parser_raw___rarg(obj*, obj*, obj*, obj*, obj*, uint8); -extern obj* l_Int_repr___main___closed__2; -extern "C" obj* lean_name_mk_numeral(obj*, obj*); -obj* l_Lean_Parser_detailIdent_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2___rarg(obj*, obj*); -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseHexLit___spec__3(obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView___boxed(obj*); -extern obj* l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1(obj*); -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_token(obj*, obj*, obj*); -obj* l_Lean_Parser_rawStr___rarg(obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_rawStr___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2; -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseHexLit___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_List_cons_tokens___rarg(obj*, obj*); -obj* l_Lean_Parser_raw___rarg___lambda__3(uint8, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_View_ofNat(obj*); -uint8 l_Char_isWhitespace(uint32); -obj* l_Lean_Parser_number_x27(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(uint32, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__4; -obj* l_Lean_Parser_detailIdent_Parser(obj*, obj*, obj*); -obj* l_Lean_Parser_peekToken(obj*, obj*, obj*); -obj* l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__5___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1(obj*); -obj* l_Lean_Parser_detailIdentSuffix_Parser___closed__1; -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_number_x27___spec__1___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1; -obj* l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6___boxed(obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__4___rarg(obj*, obj*); -obj* l_Lean_Parser_number_HasView_x27; -obj* l_Lean_Parser_MonadParsec_strCore___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolCore___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4(obj*); -obj* l_Lean_Parser_rawStr___boxed(obj*); -obj* l_Lean_Parser_symbolOrIdent_View___rarg(obj*, obj*); -obj* l_Lean_Parser_withTrailing___boxed(obj*); -obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5___rarg(obj*, obj*); -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1___closed__1; -obj* l_Lean_Parser_detailIdentPart_HasView; -obj* l_Lean_Parser_number_x27___lambda__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_View_value___spec__6(obj*); -extern uint8 l_True_Decidable; -obj* l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_token___spec__2(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_indexed(obj*); -obj* l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(obj*, obj*, obj*); -obj* l_ReaderT_orelse___at_Lean_Parser_parseBinLit___spec__1(obj*); -extern obj* l_Lean_Name_toString___closed__1; -obj* l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_number_HasView_x27___lambda__1___closed__3; -namespace lean { -uint8 nat_dec_le(obj*, obj*); -} -obj* l___private_init_lean_parser_token_2__whitespaceAux___main___closed__3; -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_Alternative___rarg(obj*, obj*); -obj* l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__2(obj*, obj*, obj*); -obj* l_List_map___main___at_Lean_Parser_number_x27___spec__5___lambda__1(obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__3(obj*, uint8, obj*); -obj* l_Lean_Parser_raw___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdent_Parser___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__3; -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_detailIdent_x27___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_rawIdent_Parser___boxed(obj*); -namespace lean { -obj* uint32_to_nat(uint32); -} -obj* l_Lean_Parser_number_HasView_x27___elambda__1___boxed(obj*); -obj* l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1___boxed(obj*, obj*); -obj* l_Lean_Parser_number_Parser___boxed(obj*); -obj* l_Lean_Parser_raw_tokens(obj*, obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_token___closed__2; -obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___boxed(obj*); -obj* l_Lean_Parser_rawStr_viewDefault___rarg(obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__3(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_unicodeSymbol_viewDefault(obj*); -obj* l_Lean_Parser_unicodeSymbol_viewDefault___boxed(obj*); -obj* l_Lean_Parser_ident_Parser_View___rarg___closed__2; -obj* l_Lean_Parser_stringLit_HasView; -obj* l_Lean_Parser_detailIdentSuffix_HasView_x27; -extern uint32 l_Lean_idEndEscape; -obj* l_Lean_Parser_detailIdent_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_Combinators_longestChoice___at_Lean_Parser_number_x27___spec__4(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_x27___lambda__4(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix; -obj* l_Lean_Parser_asSubstring___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); -obj* l_List_foldl___main___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__3(obj*, obj*, obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_idPartDefault___at___private_init_lean_parser_token_4__ident_x27___spec__3___boxed(obj*, obj*, obj*); -obj* l_String_quote(obj*); -obj* l_Lean_Parser_number_x27___lambda__3___boxed(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_token_7__toNatCore___main___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_withTrailing___rarg___lambda__2___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbol_tokens___boxed(obj*, obj*); -obj* l_Lean_Parser_detailIdent_HasView_x27; -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_View_value___spec__7(obj*); -obj* l_Lean_Parser_parseHexLit___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_withTrailing___rarg___closed__1; -obj* l_Lean_Parser_tokenCont___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__4(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__1(obj*); -obj* l_Lean_Parser_indexed___boxed(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5(obj*); -obj* l_Lean_Parser_Substring_ofString(obj*); -obj* l_Lean_Parser_stringLit_HasView_x27; -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_symbolOrIdent_tokens(obj*, obj*, obj*); -obj* l_Lean_Parser_idPartEscaped___at___private_init_lean_parser_token_4__ident_x27___spec__5(obj*, obj*, obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseHexLit___spec__2(obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__5(obj*); -extern obj* l_Lean_Parser_BasicParserM_MonadExcept; -obj* l_Lean_Parser_asSubstring___rarg___lambda__1(obj*, obj*, obj*); -obj* l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(obj*, obj*, obj*, obj*, obj*); -extern obj* l_Lean_Parser_ParsecT_failure___rarg___closed__1; -uint8 l_Lean_isIdFirst(uint32); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1(obj*); -namespace lean { -obj* nat_mul(obj*, obj*); -} -extern obj* l_Lean_Parser_Combinators_many___rarg___closed__1; -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseOctLit___spec__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser_tokens___boxed(obj*, obj*); -obj* l_Lean_Parser_symbol(obj*); -obj* l_Lean_Parser_unicodeSymbol_viewDefault___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___spec__1(uint32, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_rawIdent_Parser___rarg(obj*); -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseOctLit___spec__2(uint32, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser_View___rarg___closed__1; -obj* l___private_init_lean_parser_token_2__whitespaceAux___main___closed__4; -obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_detailIdent_x27___spec__1(obj*, uint8, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_raw___rarg___lambda__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_HasView_x27___lambda__1(obj*); -obj* l_Lean_Parser_withTrailing(obj*); -obj* l_Lean_Parser_rawStr_Lean_Parser_HasTokens(obj*, obj*, obj*, obj*, obj*, uint8); -obj* l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_View_value___spec__1(obj*); -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3(obj*); -obj* l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_x27___spec__6(obj*, obj*, obj*); -obj* l_Lean_Parser_number_HasView_x27___elambda__1(obj*); -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__2; -obj* l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_stringLit_View_value___spec__2___boxed(obj*, obj*); -obj* l_Lean_Parser_number_View_toNat___main(obj*); -obj* l_Lean_Parser_number_View_toNat(obj*); -obj* l_Lean_Parser_number_x27___lambda__1___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_token___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_number_Parser___rarg___lambda__1(obj*, obj*, obj*); -obj* l_Lean_Parser_parseBinLit(obj*, obj*, obj*); -obj* l_Lean_Parser_stringLit_Parser___rarg___closed__1; -extern obj* l_String_splitAux___main___closed__1; -obj* l_Lean_Parser_MonadParsec_any___at_Lean_Parser_stringLit_View_value___spec__5(obj*); -namespace lean { -obj* string_length(obj*); -} -obj* l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1(obj*); -obj* _init_l_Lean_Parser_matchToken___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -lean::inc(x_1, 2); -x_2 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_2, 0, x_1); -lean::closure_set(x_2, 1, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_3, 0, x_1); -lean::closure_set(x_3, 1, x_2); -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -obj* l_Lean_Parser_matchToken(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -lean::inc(x_2); -x_5 = l_Lean_Parser_Trie_oldMatchPrefix___rarg(x_4, x_2); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(0); -x_7 = l_Lean_Parser_matchToken___closed__1; -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set(x_8, 2, x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_3); -return x_9; -} -else -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_5); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_5, 0); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -lean::cnstr_set(x_5, 0, x_12); -x_13 = l_Lean_Parser_matchToken___closed__1; -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_5); -lean::cnstr_set(x_14, 1, x_2); -lean::cnstr_set(x_14, 2, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_3); -return x_15; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_5, 0); -lean::inc(x_16); -lean::dec(x_5); -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -lean::dec(x_16); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -x_19 = l_Lean_Parser_matchToken___closed__1; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_2); -lean::cnstr_set(x_20, 2, x_19); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_3); -return x_21; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_8; uint8 x_9; obj* x_10; obj* x_11; -x_8 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_1); -lean::cnstr_set(x_8, 2, x_2); -lean::cnstr_set(x_8, 3, x_4); -x_9 = 0; -x_10 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set_scalar(x_10, sizeof(void*)*1, x_9); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_7); -return x_11; -} -else -{ -obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; -lean::dec(x_6); -x_12 = lean::cnstr_get(x_3, 0); -lean::inc(x_12); -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_1); -lean::cnstr_set(x_13, 2, x_2); -lean::cnstr_set(x_13, 3, x_4); -x_14 = 0; -x_15 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set_scalar(x_15, sizeof(void*)*1, x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_7); -return x_16; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg___boxed), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_12 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_10); -lean::cnstr_set(x_8, 0, x_12); -return x_8; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_8, 0); -x_14 = lean::cnstr_get(x_8, 1); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_8); -x_15 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_13); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_14); -return x_17; -} -} -else -{ -uint32 x_18; uint8 x_19; -x_18 = l_String_OldIterator_curr___main(x_2); -x_19 = l_True_Decidable; -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; uint8 x_27; -x_20 = l_Char_quoteCore(x_18); -x_21 = l_Char_HasRepr___closed__1; -x_22 = lean::string_append(x_21, x_20); -lean::dec(x_20); -x_23 = lean::string_append(x_22, x_21); -x_24 = lean::box(0); -x_25 = l_mjoin___rarg___closed__1; -x_26 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_23, x_25, x_24, x_24, x_1, x_2, x_3); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_26, 0); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_28); -lean::cnstr_set(x_26, 0, x_30); -return x_26; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_26, 0); -x_32 = lean::cnstr_get(x_26, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_26); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_31); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_32); -return x_35; -} -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_36 = l_String_OldIterator_next___main(x_2); -x_37 = lean::box(0); -x_38 = lean::box_uint32(x_18); -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_36); -lean::cnstr_set(x_39, 2, x_37); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_3); -return x_40; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint8 x_6; -x_6 = l_String_isEmpty(x_1); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::string_length(x_1); -x_8 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_8); -lean::cnstr_set(x_9, 2, x_8); -lean::inc(x_4); -x_10 = l___private_init_lean_parser_parsec_2__strAux___main(x_7, x_9, x_4); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; -lean::dec(x_1); -x_11 = lean::box(0); -x_12 = l_String_splitAux___main___closed__1; -x_13 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_13, 0, x_4); -lean::cnstr_set(x_13, 1, x_12); -lean::cnstr_set(x_13, 2, x_2); -lean::cnstr_set(x_13, 3, x_11); -x_14 = 0; -x_15 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set_scalar(x_15, sizeof(void*)*1, x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_5); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -lean::dec(x_4); -lean::dec(x_2); -x_17 = lean::cnstr_get(x_10, 0); -lean::inc(x_17); -lean::dec(x_10); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_1); -lean::cnstr_set(x_19, 1, x_17); -lean::cnstr_set(x_19, 2, x_18); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_5); -return x_20; -} -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -lean::dec(x_2); -lean::dec(x_1); -x_21 = l_String_splitAux___main___closed__1; -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_4); -lean::cnstr_set(x_23, 2, x_22); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_5); -return x_24; -} -} -} -obj* _init_l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("-/"); -return x_1; -} -} -obj* _init_l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("-/"); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* _init_l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("/-"); -return x_1; -} -} -obj* _init_l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("/-"); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_2, x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_sub(x_2, x_8); -x_10 = lean::nat_add(x_1, x_8); -x_11 = lean::nat_dec_eq(x_1, x_8); -x_93 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__3; -x_94 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__4; -lean::inc(x_4); -x_95 = l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(x_93, x_94, x_3, x_4, x_5); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -if (lean::obj_tag(x_96) == 0) -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -lean::dec(x_95); -x_98 = lean::cnstr_get(x_96, 1); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_96, 2); -lean::inc(x_99); -lean::dec(x_96); -x_100 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main(x_10, x_9, x_3, x_98, x_97); -lean::dec(x_10); -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -lean::dec(x_100); -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_99, x_101); -x_12 = x_103; -x_13 = x_102; -goto block_92; -} -else -{ -obj* x_104; uint8 x_105; -lean::dec(x_10); -x_104 = lean::cnstr_get(x_95, 1); -lean::inc(x_104); -lean::dec(x_95); -x_105 = !lean::is_exclusive(x_96); -if (x_105 == 0) -{ -x_12 = x_96; -x_13 = x_104; -goto block_92; -} -else -{ -obj* x_106; uint8 x_107; obj* x_108; -x_106 = lean::cnstr_get(x_96, 0); -x_107 = lean::cnstr_get_scalar(x_96, sizeof(void*)*1); -lean::inc(x_106); -lean::dec(x_96); -x_108 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_108, 0, x_106); -lean::cnstr_set_scalar(x_108, sizeof(void*)*1, x_107); -x_12 = x_108; -x_13 = x_104; -goto block_92; -} -} -block_92: -{ -if (lean::obj_tag(x_12) == 0) -{ -obj* x_14; -lean::dec(x_9); -lean::dec(x_4); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -else -{ -obj* x_15; uint8 x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_12, 0); -lean::inc(x_15); -x_16 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -if (x_16 == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; -lean::dec(x_12); -x_61 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1; -x_62 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__2; -lean::inc(x_4); -x_63 = l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(x_61, x_62, x_3, x_4, x_13); -x_64 = lean::cnstr_get(x_63, 0); -lean::inc(x_64); -if (lean::obj_tag(x_64) == 0) -{ -if (x_11 == 0) -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; -x_65 = lean::cnstr_get(x_63, 1); -lean::inc(x_65); -lean::dec(x_63); -x_66 = lean::cnstr_get(x_64, 1); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_64, 2); -lean::inc(x_67); -lean::dec(x_64); -x_68 = lean::nat_sub(x_1, x_8); -x_69 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main(x_68, x_9, x_3, x_66, x_65); -lean::dec(x_68); -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -lean::dec(x_69); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_70); -x_17 = x_72; -x_18 = x_71; -goto block_60; -} -else -{ -obj* x_73; uint8 x_74; -x_73 = lean::cnstr_get(x_63, 1); -lean::inc(x_73); -lean::dec(x_63); -x_74 = !lean::is_exclusive(x_64); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -x_75 = lean::cnstr_get(x_64, 2); -x_76 = lean::cnstr_get(x_64, 0); -lean::dec(x_76); -x_77 = lean::box(0); -x_78 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_64, 2, x_78); -lean::cnstr_set(x_64, 0, x_77); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_75, x_64); -x_17 = x_79; -x_18 = x_73; -goto block_60; -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -x_80 = lean::cnstr_get(x_64, 1); -x_81 = lean::cnstr_get(x_64, 2); -lean::inc(x_81); -lean::inc(x_80); -lean::dec(x_64); -x_82 = lean::box(0); -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_84, 0, x_82); -lean::cnstr_set(x_84, 1, x_80); -lean::cnstr_set(x_84, 2, x_83); -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_81, x_84); -x_17 = x_85; -x_18 = x_73; -goto block_60; -} -} -} -else -{ -obj* x_86; uint8 x_87; -x_86 = lean::cnstr_get(x_63, 1); -lean::inc(x_86); -lean::dec(x_63); -x_87 = !lean::is_exclusive(x_64); -if (x_87 == 0) -{ -x_17 = x_64; -x_18 = x_86; -goto block_60; -} -else -{ -obj* x_88; uint8 x_89; obj* x_90; -x_88 = lean::cnstr_get(x_64, 0); -x_89 = lean::cnstr_get_scalar(x_64, sizeof(void*)*1); -lean::inc(x_88); -lean::dec(x_64); -x_90 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_90, 0, x_88); -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_89); -x_17 = x_90; -x_18 = x_86; -goto block_60; -} -} -} -else -{ -obj* x_91; -lean::dec(x_15); -lean::dec(x_9); -lean::dec(x_4); -x_91 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_91, 0, x_12); -lean::cnstr_set(x_91, 1, x_13); -return x_91; -} -block_60: -{ -if (lean::obj_tag(x_17) == 0) -{ -obj* x_19; obj* x_20; -lean::dec(x_9); -lean::dec(x_4); -x_19 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_17); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -return x_20; -} -else -{ -uint8 x_21; -x_21 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_17, 0); -lean::inc(x_22); -lean::dec(x_17); -x_23 = l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__2(x_3, x_4, x_18); -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; uint8 x_29; -x_25 = lean::cnstr_get(x_23, 1); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::cnstr_get(x_24, 1); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_24, 2); -lean::inc(x_27); -lean::dec(x_24); -x_28 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main(x_1, x_9, x_3, x_26, x_25); -lean::dec(x_9); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = lean::cnstr_get(x_28, 0); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_27, x_30); -x_32 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_31); -x_33 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_32); -lean::cnstr_set(x_28, 0, x_33); -return x_28; -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_28, 0); -x_35 = lean::cnstr_get(x_28, 1); -lean::inc(x_35); -lean::inc(x_34); -lean::dec(x_28); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_27, x_34); -x_37 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_36); -x_38 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_35); -return x_39; -} -} -else -{ -uint8 x_40; -lean::dec(x_9); -x_40 = !lean::is_exclusive(x_23); -if (x_40 == 0) -{ -obj* x_41; uint8 x_42; -x_41 = lean::cnstr_get(x_23, 0); -lean::dec(x_41); -x_42 = !lean::is_exclusive(x_24); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; -x_43 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_24); -x_44 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_43); -lean::cnstr_set(x_23, 0, x_44); -return x_23; -} -else -{ -obj* x_45; uint8 x_46; obj* x_47; obj* x_48; obj* x_49; -x_45 = lean::cnstr_get(x_24, 0); -x_46 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); -lean::inc(x_45); -lean::dec(x_24); -x_47 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_46); -x_48 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_47); -x_49 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_48); -lean::cnstr_set(x_23, 0, x_49); -return x_23; -} -} -else -{ -obj* x_50; obj* x_51; uint8 x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_50 = lean::cnstr_get(x_23, 1); -lean::inc(x_50); -lean::dec(x_23); -x_51 = lean::cnstr_get(x_24, 0); -lean::inc(x_51); -x_52 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); -if (lean::is_exclusive(x_24)) { - lean::cnstr_release(x_24, 0); - x_53 = x_24; -} else { - lean::dec_ref(x_24); - x_53 = lean::box(0); -} -if (lean::is_scalar(x_53)) { - x_54 = lean::alloc_cnstr(1, 1, 1); -} else { - x_54 = x_53; -} -lean::cnstr_set(x_54, 0, x_51); -lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_52); -x_55 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_22, x_54); -x_56 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_55); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_50); -return x_57; -} -} -} -else -{ -obj* x_58; obj* x_59; -lean::dec(x_9); -lean::dec(x_4); -x_58 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_15, x_17); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_18); -return x_59; -} -} -} -} -} -} -else -{ -obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_109 = lean::box(0); -x_110 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_111 = l_mjoin___rarg___closed__1; -x_112 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_110, x_111, x_109, x_109, x_3, x_4, x_5); -return x_112; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg___boxed(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; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean::dec(x_5); -lean::dec(x_3); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__2(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___main___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main(x_1, x_2, x_3, x_4, x_5); -return x_6; -} -} -obj* l___private_init_lean_parser_token_1__finishCommentBlockAux___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l___private_init_lean_parser_token_1__finishCommentBlockAux(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_6; -} -} -obj* _init_l_Lean_Parser_finishCommentBlock___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("end of comment block"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_finishCommentBlock___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -lean::inc(x_1); -x_2 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_2, 0, x_1); -lean::closure_set(x_2, 1, x_1); -x_3 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_Lean_Parser_finishCommentBlock(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; uint8 x_9; -x_5 = l_String_OldIterator_remaining___main(x_3); -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_add(x_5, x_6); -lean::dec(x_5); -x_8 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main(x_1, x_7, x_2, x_3, x_4); -lean::dec(x_7); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = l_Lean_Parser_finishCommentBlock___closed__1; -x_12 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_10, x_11); -x_13 = l_Lean_Parser_finishCommentBlock___closed__2; -x_14 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_12); -lean::cnstr_set(x_8, 0, x_14); -return x_8; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_15 = lean::cnstr_get(x_8, 0); -x_16 = lean::cnstr_get(x_8, 1); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_8); -x_17 = l_Lean_Parser_finishCommentBlock___closed__1; -x_18 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_15, x_17); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_18); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_16); -return x_21; -} -} -} -obj* l_Lean_Parser_finishCommentBlock___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_finishCommentBlock(x_1, x_2, x_3, x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__3(obj* x_1, uint8 x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Char_isWhitespace(x_10); -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_12; -} -else -{ -obj* x_13; uint8 x_14; -x_13 = l_String_OldIterator_next___main(x_3); -x_14 = 1; -x_1 = x_7; -x_2 = x_14; -x_3 = x_13; -goto _start; -} -} -} -else -{ -obj* x_16; -lean::dec(x_1); -x_16 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_16; -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; obj* x_5; obj* x_6; -x_3 = l_String_OldIterator_remaining___main(x_1); -x_4 = 0; -x_5 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__3(x_3, x_4, x_1); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_2); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_whitespace___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2___rarg(x_2, x_3); -return x_4; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__4(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; -x_6 = l_Int_repr___main___closed__2; -lean::inc(x_4); -x_7 = l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(x_6, x_2, x_1, x_4, x_5); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_8, 2); -x_13 = lean::cnstr_get(x_8, 0); -lean::dec(x_13); -x_14 = 0; -x_15 = lean::box(x_14); -lean::cnstr_set(x_8, 2, x_3); -lean::cnstr_set(x_8, 0, x_15); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_8); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_16, 2); -lean::dec(x_18); -x_19 = lean::cnstr_get(x_16, 1); -lean::dec(x_19); -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_16, 2, x_20); -lean::cnstr_set(x_16, 1, x_4); -lean::cnstr_set(x_7, 0, x_16); -return x_7; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; -x_21 = lean::cnstr_get(x_16, 0); -lean::inc(x_21); -lean::dec(x_16); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_4); -lean::cnstr_set(x_23, 2, x_22); -lean::cnstr_set(x_7, 0, x_23); -return x_7; -} -} -else -{ -uint8 x_24; obj* x_25; obj* x_26; obj* x_27; -lean::dec(x_16); -x_24 = 1; -x_25 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_26 = lean::box(x_24); -x_27 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_4); -lean::cnstr_set(x_27, 2, x_25); -lean::cnstr_set(x_7, 0, x_27); -return x_7; -} -} -else -{ -obj* x_28; obj* x_29; uint8 x_30; obj* x_31; obj* x_32; obj* x_33; -x_28 = lean::cnstr_get(x_8, 1); -x_29 = lean::cnstr_get(x_8, 2); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_8); -x_30 = 0; -x_31 = lean::box(x_30); -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_28); -lean::cnstr_set(x_32, 2, x_3); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_32); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -if (lean::is_exclusive(x_33)) { - lean::cnstr_release(x_33, 0); - lean::cnstr_release(x_33, 1); - lean::cnstr_release(x_33, 2); - x_35 = x_33; -} else { - lean::dec_ref(x_33); - x_35 = lean::box(0); -} -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_35)) { - x_37 = lean::alloc_cnstr(0, 3, 0); -} else { - x_37 = x_35; -} -lean::cnstr_set(x_37, 0, x_34); -lean::cnstr_set(x_37, 1, x_4); -lean::cnstr_set(x_37, 2, x_36); -lean::cnstr_set(x_7, 0, x_37); -return x_7; -} -else -{ -uint8 x_38; obj* x_39; obj* x_40; obj* x_41; -lean::dec(x_33); -x_38 = 1; -x_39 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_40 = lean::box(x_38); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_4); -lean::cnstr_set(x_41, 2, x_39); -lean::cnstr_set(x_7, 0, x_41); -return x_7; -} -} -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; uint8 x_46; obj* x_47; obj* x_48; obj* x_49; -x_42 = lean::cnstr_get(x_7, 1); -lean::inc(x_42); -lean::dec(x_7); -x_43 = lean::cnstr_get(x_8, 1); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_8, 2); -lean::inc(x_44); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_45 = x_8; -} else { - lean::dec_ref(x_8); - x_45 = lean::box(0); -} -x_46 = 0; -x_47 = lean::box(x_46); -if (lean::is_scalar(x_45)) { - x_48 = lean::alloc_cnstr(0, 3, 0); -} else { - x_48 = x_45; -} -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_43); -lean::cnstr_set(x_48, 2, x_3); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_48); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - lean::cnstr_release(x_49, 2); - x_51 = x_49; -} else { - lean::dec_ref(x_49); - x_51 = lean::box(0); -} -x_52 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_51)) { - x_53 = lean::alloc_cnstr(0, 3, 0); -} else { - x_53 = x_51; -} -lean::cnstr_set(x_53, 0, x_50); -lean::cnstr_set(x_53, 1, x_4); -lean::cnstr_set(x_53, 2, x_52); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_42); -return x_54; -} -else -{ -uint8 x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_49); -x_55 = 1; -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = lean::box(x_55); -x_58 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_4); -lean::cnstr_set(x_58, 2, x_56); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_42); -return x_59; -} -} -} -else -{ -uint8 x_60; -lean::dec(x_8); -lean::dec(x_3); -x_60 = !lean::is_exclusive(x_7); -if (x_60 == 0) -{ -obj* x_61; uint8 x_62; obj* x_63; obj* x_64; obj* x_65; -x_61 = lean::cnstr_get(x_7, 0); -lean::dec(x_61); -x_62 = 1; -x_63 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_64 = lean::box(x_62); -x_65 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_4); -lean::cnstr_set(x_65, 2, x_63); -lean::cnstr_set(x_7, 0, x_65); -return x_7; -} -else -{ -obj* x_66; uint8 x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_66 = lean::cnstr_get(x_7, 1); -lean::inc(x_66); -lean::dec(x_7); -x_67 = 1; -x_68 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_69 = lean::box(x_67); -x_70 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_4); -lean::cnstr_set(x_70, 2, x_68); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_66); -return x_71; -} -} -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__6(obj* x_1, uint8 x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint32 x_11; uint8 x_12; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = 10; -x_12 = x_10 == x_11; -if (x_12 == 0) -{ -obj* x_13; uint8 x_14; -x_13 = l_String_OldIterator_next___main(x_3); -x_14 = 1; -x_1 = x_7; -x_2 = x_14; -x_3 = x_13; -goto _start; -} -else -{ -obj* x_16; -lean::dec(x_7); -x_16 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_16; -} -} -} -else -{ -obj* x_17; -lean::dec(x_1); -x_17 = l___private_init_lean_parser_parsec_6__mkConsumedResult___rarg(x_2, x_3); -return x_17; -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; obj* x_5; obj* x_6; -x_3 = l_String_OldIterator_remaining___main(x_1); -x_4 = 0; -x_5 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__6(x_3, x_4, x_1); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_2); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5___rarg), 2, 0); -return x_2; -} -} -obj* _init_l___private_init_lean_parser_token_2__whitespaceAux___main___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("-"); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* _init_l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("input"); -return x_1; -} -} -obj* _init_l___private_init_lean_parser_token_2__whitespaceAux___main___closed__3() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("--"); -return x_1; -} -} -obj* _init_l___private_init_lean_parser_token_2__whitespaceAux___main___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("--"); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_token_2__whitespaceAux___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_1, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_1, x_7); -x_9 = l_Lean_Parser_MonadParsec_whitespace___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__1(x_2, x_3, x_4); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_303; obj* x_304; obj* x_305; obj* x_306; -x_11 = lean::cnstr_get(x_9, 1); -lean::inc(x_11); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - x_12 = x_9; -} else { - lean::dec_ref(x_9); - x_12 = lean::box(0); -} -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_10, 2); -lean::inc(x_14); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - lean::cnstr_release(x_10, 2); - x_15 = x_10; -} else { - lean::dec_ref(x_10); - x_15 = lean::box(0); -} -x_303 = l___private_init_lean_parser_token_2__whitespaceAux___main___closed__3; -x_304 = l___private_init_lean_parser_token_2__whitespaceAux___main___closed__4; -lean::inc(x_13); -x_305 = l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(x_303, x_304, x_2, x_13, x_11); -x_306 = lean::cnstr_get(x_305, 0); -lean::inc(x_306); -if (lean::obj_tag(x_306) == 0) -{ -obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; -x_307 = lean::cnstr_get(x_305, 1); -lean::inc(x_307); -lean::dec(x_305); -x_308 = lean::cnstr_get(x_306, 1); -lean::inc(x_308); -x_309 = lean::cnstr_get(x_306, 2); -lean::inc(x_309); -lean::dec(x_306); -x_310 = l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5___rarg(x_308, x_307); -x_311 = lean::cnstr_get(x_310, 0); -lean::inc(x_311); -if (lean::obj_tag(x_311) == 0) -{ -obj* x_312; obj* x_313; obj* x_314; obj* x_315; obj* x_316; obj* x_317; obj* x_318; obj* x_319; -x_312 = lean::cnstr_get(x_310, 1); -lean::inc(x_312); -lean::dec(x_310); -x_313 = lean::cnstr_get(x_311, 1); -lean::inc(x_313); -x_314 = lean::cnstr_get(x_311, 2); -lean::inc(x_314); -lean::dec(x_311); -x_315 = l___private_init_lean_parser_token_2__whitespaceAux___main(x_8, x_2, x_313, x_312); -x_316 = lean::cnstr_get(x_315, 0); -lean::inc(x_316); -x_317 = lean::cnstr_get(x_315, 1); -lean::inc(x_317); -lean::dec(x_315); -x_318 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_314, x_316); -x_319 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_309, x_318); -x_16 = x_319; -x_17 = x_317; -goto block_302; -} -else -{ -obj* x_320; uint8 x_321; -x_320 = lean::cnstr_get(x_310, 1); -lean::inc(x_320); -lean::dec(x_310); -x_321 = !lean::is_exclusive(x_311); -if (x_321 == 0) -{ -obj* x_322; -x_322 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_309, x_311); -x_16 = x_322; -x_17 = x_320; -goto block_302; -} -else -{ -obj* x_323; uint8 x_324; obj* x_325; obj* x_326; -x_323 = lean::cnstr_get(x_311, 0); -x_324 = lean::cnstr_get_scalar(x_311, sizeof(void*)*1); -lean::inc(x_323); -lean::dec(x_311); -x_325 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_325, 0, x_323); -lean::cnstr_set_scalar(x_325, sizeof(void*)*1, x_324); -x_326 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_309, x_325); -x_16 = x_326; -x_17 = x_320; -goto block_302; -} -} -} -else -{ -obj* x_327; uint8 x_328; -x_327 = lean::cnstr_get(x_305, 1); -lean::inc(x_327); -lean::dec(x_305); -x_328 = !lean::is_exclusive(x_306); -if (x_328 == 0) -{ -x_16 = x_306; -x_17 = x_327; -goto block_302; -} -else -{ -obj* x_329; uint8 x_330; obj* x_331; -x_329 = lean::cnstr_get(x_306, 0); -x_330 = lean::cnstr_get_scalar(x_306, sizeof(void*)*1); -lean::inc(x_329); -lean::dec(x_306); -x_331 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_331, 0, x_329); -lean::cnstr_set_scalar(x_331, sizeof(void*)*1, x_330); -x_16 = x_331; -x_17 = x_327; -goto block_302; -} -} -block_302: -{ -if (lean::obj_tag(x_16) == 0) -{ -obj* x_18; obj* x_19; -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_8); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_16); -if (lean::is_scalar(x_12)) { - x_19 = lean::alloc_cnstr(0, 2, 0); -} else { - x_19 = x_12; -} -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -else -{ -obj* x_20; uint8 x_21; obj* x_22; obj* x_23; -x_20 = lean::cnstr_get(x_16, 0); -lean::inc(x_20); -x_21 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); -if (x_21 == 0) -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; -lean::dec(x_16); -x_239 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__3; -x_240 = l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__4; -lean::inc(x_13); -x_241 = l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(x_239, x_240, x_2, x_13, x_17); -x_242 = lean::cnstr_get(x_241, 0); -lean::inc(x_242); -if (lean::obj_tag(x_242) == 0) -{ -obj* x_243; obj* x_244; obj* x_245; obj* x_246; obj* x_247; obj* x_248; obj* x_249; -x_243 = lean::cnstr_get(x_241, 1); -lean::inc(x_243); -lean::dec(x_241); -x_244 = lean::cnstr_get(x_242, 1); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_242, 2); -lean::inc(x_245); -lean::dec(x_242); -x_246 = l___private_init_lean_parser_token_2__whitespaceAux___main___closed__1; -x_247 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_244); -x_248 = l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__4(x_2, x_246, x_247, x_244, x_243); -x_249 = lean::cnstr_get(x_248, 0); -lean::inc(x_249); -if (lean::obj_tag(x_249) == 0) -{ -obj* x_250; uint8 x_251; -x_250 = lean::cnstr_get(x_249, 0); -lean::inc(x_250); -x_251 = lean::unbox(x_250); -lean::dec(x_250); -if (x_251 == 0) -{ -obj* x_252; obj* x_253; obj* x_254; obj* x_255; obj* x_256; obj* x_257; obj* x_258; obj* x_259; obj* x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_264; obj* x_265; -x_252 = lean::cnstr_get(x_248, 1); -lean::inc(x_252); -lean::dec(x_248); -x_253 = lean::cnstr_get(x_249, 1); -lean::inc(x_253); -x_254 = lean::cnstr_get(x_249, 2); -lean::inc(x_254); -lean::dec(x_249); -x_255 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_255, 0, x_244); -x_256 = lean::box(0); -x_257 = l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2; -x_258 = l_mjoin___rarg___closed__1; -x_259 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_257, x_258, x_255, x_256, x_2, x_253, x_252); -lean::dec(x_255); -x_260 = lean::cnstr_get(x_259, 0); -lean::inc(x_260); -x_261 = lean::cnstr_get(x_259, 1); -lean::inc(x_261); -lean::dec(x_259); -x_262 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_254, x_260); -x_263 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_247, x_262); -x_264 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_263); -x_265 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_264); -x_22 = x_265; -x_23 = x_261; -goto block_238; -} -else -{ -obj* x_266; uint8 x_267; -lean::dec(x_244); -x_266 = lean::cnstr_get(x_248, 1); -lean::inc(x_266); -lean::dec(x_248); -x_267 = !lean::is_exclusive(x_249); -if (x_267 == 0) -{ -obj* x_268; obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_273; obj* x_274; -x_268 = lean::cnstr_get(x_249, 2); -x_269 = lean::cnstr_get(x_249, 0); -lean::dec(x_269); -x_270 = lean::box(0); -lean::cnstr_set(x_249, 2, x_247); -lean::cnstr_set(x_249, 0, x_270); -x_271 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_268, x_249); -x_272 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_247, x_271); -x_273 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_272); -x_274 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_273); -x_22 = x_274; -x_23 = x_266; -goto block_238; -} -else -{ -obj* x_275; obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -x_275 = lean::cnstr_get(x_249, 1); -x_276 = lean::cnstr_get(x_249, 2); -lean::inc(x_276); -lean::inc(x_275); -lean::dec(x_249); -x_277 = lean::box(0); -x_278 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_278, 0, x_277); -lean::cnstr_set(x_278, 1, x_275); -lean::cnstr_set(x_278, 2, x_247); -x_279 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_276, x_278); -x_280 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_247, x_279); -x_281 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_280); -x_282 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_281); -x_22 = x_282; -x_23 = x_266; -goto block_238; -} -} -} -else -{ -obj* x_283; uint8 x_284; -lean::dec(x_244); -x_283 = lean::cnstr_get(x_248, 1); -lean::inc(x_283); -lean::dec(x_248); -x_284 = !lean::is_exclusive(x_249); -if (x_284 == 0) -{ -obj* x_285; obj* x_286; obj* x_287; -x_285 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_247, x_249); -x_286 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_285); -x_287 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_286); -x_22 = x_287; -x_23 = x_283; -goto block_238; -} -else -{ -obj* x_288; uint8 x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_288 = lean::cnstr_get(x_249, 0); -x_289 = lean::cnstr_get_scalar(x_249, sizeof(void*)*1); -lean::inc(x_288); -lean::dec(x_249); -x_290 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_290, 0, x_288); -lean::cnstr_set_scalar(x_290, sizeof(void*)*1, x_289); -x_291 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_247, x_290); -x_292 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_291); -x_293 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_292); -x_22 = x_293; -x_23 = x_283; -goto block_238; -} -} -} -else -{ -obj* x_294; uint8 x_295; -x_294 = lean::cnstr_get(x_241, 1); -lean::inc(x_294); -lean::dec(x_241); -x_295 = !lean::is_exclusive(x_242); -if (x_295 == 0) -{ -uint8 x_296; -x_296 = 0; -lean::cnstr_set_scalar(x_242, sizeof(void*)*1, x_296); -x_22 = x_242; -x_23 = x_294; -goto block_238; -} -else -{ -obj* x_297; uint8 x_298; obj* x_299; -x_297 = lean::cnstr_get(x_242, 0); -lean::inc(x_297); -lean::dec(x_242); -x_298 = 0; -x_299 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_299, 0, x_297); -lean::cnstr_set_scalar(x_299, sizeof(void*)*1, x_298); -x_22 = x_299; -x_23 = x_294; -goto block_238; -} -} -} -else -{ -obj* x_300; obj* x_301; -lean::dec(x_20); -lean::dec(x_15); -lean::dec(x_13); -lean::dec(x_12); -lean::dec(x_8); -x_300 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_16); -x_301 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_301, 0, x_300); -lean::cnstr_set(x_301, 1, x_17); -return x_301; -} -block_238: -{ -if (lean::obj_tag(x_22) == 0) -{ -uint8 x_24; -lean::dec(x_15); -lean::dec(x_12); -x_24 = !lean::is_exclusive(x_22); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_25 = lean::cnstr_get(x_22, 1); -x_26 = lean::cnstr_get(x_22, 2); -x_27 = lean::cnstr_get(x_22, 0); -lean::dec(x_27); -x_28 = l_Lean_Parser_finishCommentBlock(x_7, x_2, x_25, x_23); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; uint8 x_31; -lean::free_heap_obj(x_22); -x_30 = lean::cnstr_get(x_28, 1); -lean::inc(x_30); -lean::dec(x_28); -x_31 = !lean::is_exclusive(x_29); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; uint8 x_36; -x_32 = lean::cnstr_get(x_29, 1); -x_33 = lean::cnstr_get(x_29, 2); -x_34 = lean::cnstr_get(x_29, 0); -lean::dec(x_34); -x_35 = l___private_init_lean_parser_token_2__whitespaceAux___main(x_8, x_2, x_32, x_30); -lean::dec(x_8); -x_36 = !lean::is_exclusive(x_35); -if (x_36 == 0) -{ -obj* x_37; obj* x_38; obj* x_39; -x_37 = lean::cnstr_get(x_35, 0); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_37); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_38); -if (lean::obj_tag(x_39) == 0) -{ -obj* x_40; obj* x_41; -lean::free_heap_obj(x_29); -lean::dec(x_13); -x_40 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_39); -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_40); -lean::cnstr_set(x_35, 0, x_41); -return x_35; -} -else -{ -uint8 x_42; -x_42 = lean::cnstr_get_scalar(x_39, sizeof(void*)*1); -if (x_42 == 0) -{ -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; -x_43 = lean::cnstr_get(x_39, 0); -lean::inc(x_43); -lean::dec(x_39); -x_44 = lean::cnstr_get(x_43, 2); -lean::inc(x_44); -lean::dec(x_43); -x_45 = l_mjoin___rarg___closed__1; -x_46 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_46, 0, x_44); -lean::closure_set(x_46, 1, x_45); -x_47 = lean::cnstr_get(x_20, 2); -lean::inc(x_47); -lean::dec(x_20); -x_48 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_48, 0, x_47); -lean::closure_set(x_48, 1, x_46); -x_49 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -x_50 = lean::box(0); -lean::cnstr_set(x_29, 2, x_49); -lean::cnstr_set(x_29, 1, x_13); -lean::cnstr_set(x_29, 0, x_50); -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_29); -lean::cnstr_set(x_35, 0, x_51); -return x_35; -} -else -{ -obj* x_52; obj* x_53; -lean::free_heap_obj(x_29); -lean::dec(x_13); -x_52 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_39); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_52); -lean::cnstr_set(x_35, 0, x_53); -return x_35; -} -} -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_54 = lean::cnstr_get(x_35, 0); -x_55 = lean::cnstr_get(x_35, 1); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_35); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_54); -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_56); -if (lean::obj_tag(x_57) == 0) -{ -obj* x_58; obj* x_59; obj* x_60; -lean::free_heap_obj(x_29); -lean::dec(x_13); -x_58 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_58); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_55); -return x_60; -} -else -{ -uint8 x_61; -x_61 = lean::cnstr_get_scalar(x_57, sizeof(void*)*1); -if (x_61 == 0) -{ -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; -x_62 = lean::cnstr_get(x_57, 0); -lean::inc(x_62); -lean::dec(x_57); -x_63 = lean::cnstr_get(x_62, 2); -lean::inc(x_63); -lean::dec(x_62); -x_64 = l_mjoin___rarg___closed__1; -x_65 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_65, 0, x_63); -lean::closure_set(x_65, 1, x_64); -x_66 = lean::cnstr_get(x_20, 2); -lean::inc(x_66); -lean::dec(x_20); -x_67 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_67, 0, x_66); -lean::closure_set(x_67, 1, x_65); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -x_69 = lean::box(0); -lean::cnstr_set(x_29, 2, x_68); -lean::cnstr_set(x_29, 1, x_13); -lean::cnstr_set(x_29, 0, x_69); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_29); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_55); -return x_71; -} -else -{ -obj* x_72; obj* x_73; obj* x_74; -lean::free_heap_obj(x_29); -lean::dec(x_13); -x_72 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_57); -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_72); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_55); -return x_74; -} -} -} -} -else -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_75 = lean::cnstr_get(x_29, 1); -x_76 = lean::cnstr_get(x_29, 2); -lean::inc(x_76); -lean::inc(x_75); -lean::dec(x_29); -x_77 = l___private_init_lean_parser_token_2__whitespaceAux___main(x_8, x_2, x_75, x_30); -lean::dec(x_8); -x_78 = lean::cnstr_get(x_77, 0); -lean::inc(x_78); -x_79 = lean::cnstr_get(x_77, 1); -lean::inc(x_79); -if (lean::is_exclusive(x_77)) { - lean::cnstr_release(x_77, 0); - lean::cnstr_release(x_77, 1); - x_80 = x_77; -} else { - lean::dec_ref(x_77); - x_80 = lean::box(0); -} -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_76, x_78); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_81); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; obj* x_84; obj* x_85; -lean::dec(x_13); -x_83 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_82); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_83); -if (lean::is_scalar(x_80)) { - x_85 = lean::alloc_cnstr(0, 2, 0); -} else { - x_85 = x_80; -} -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_79); -return x_85; -} -else -{ -uint8 x_86; -x_86 = lean::cnstr_get_scalar(x_82, sizeof(void*)*1); -if (x_86 == 0) -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_87 = lean::cnstr_get(x_82, 0); -lean::inc(x_87); -lean::dec(x_82); -x_88 = lean::cnstr_get(x_87, 2); -lean::inc(x_88); -lean::dec(x_87); -x_89 = l_mjoin___rarg___closed__1; -x_90 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_90, 0, x_88); -lean::closure_set(x_90, 1, x_89); -x_91 = lean::cnstr_get(x_20, 2); -lean::inc(x_91); -lean::dec(x_20); -x_92 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_92, 0, x_91); -lean::closure_set(x_92, 1, x_90); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_92); -x_94 = lean::box(0); -x_95 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_13); -lean::cnstr_set(x_95, 2, x_93); -x_96 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_95); -if (lean::is_scalar(x_80)) { - x_97 = lean::alloc_cnstr(0, 2, 0); -} else { - x_97 = x_80; -} -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_79); -return x_97; -} -else -{ -obj* x_98; obj* x_99; obj* x_100; -lean::dec(x_13); -x_98 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_82); -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_98); -if (lean::is_scalar(x_80)) { - x_100 = lean::alloc_cnstr(0, 2, 0); -} else { - x_100 = x_80; -} -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_79); -return x_100; -} -} -} -} -else -{ -uint8 x_101; -lean::dec(x_8); -x_101 = !lean::is_exclusive(x_28); -if (x_101 == 0) -{ -obj* x_102; uint8 x_103; -x_102 = lean::cnstr_get(x_28, 0); -lean::dec(x_102); -x_103 = !lean::is_exclusive(x_29); -if (x_103 == 0) -{ -obj* x_104; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_29); -if (lean::obj_tag(x_104) == 0) -{ -obj* x_105; obj* x_106; -lean::free_heap_obj(x_22); -lean::dec(x_13); -x_105 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_104); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_105); -lean::cnstr_set(x_28, 0, x_106); -return x_28; -} -else -{ -uint8 x_107; -x_107 = lean::cnstr_get_scalar(x_104, sizeof(void*)*1); -if (x_107 == 0) -{ -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; -x_108 = lean::cnstr_get(x_104, 0); -lean::inc(x_108); -lean::dec(x_104); -x_109 = lean::cnstr_get(x_108, 2); -lean::inc(x_109); -lean::dec(x_108); -x_110 = l_mjoin___rarg___closed__1; -x_111 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_111, 0, x_109); -lean::closure_set(x_111, 1, x_110); -x_112 = lean::cnstr_get(x_20, 2); -lean::inc(x_112); -lean::dec(x_20); -x_113 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_113, 0, x_112); -lean::closure_set(x_113, 1, x_111); -x_114 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_114, 0, x_113); -x_115 = lean::box(0); -lean::cnstr_set(x_22, 2, x_114); -lean::cnstr_set(x_22, 1, x_13); -lean::cnstr_set(x_22, 0, x_115); -x_116 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_22); -lean::cnstr_set(x_28, 0, x_116); -return x_28; -} -else -{ -obj* x_117; obj* x_118; -lean::free_heap_obj(x_22); -lean::dec(x_13); -x_117 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_104); -x_118 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_117); -lean::cnstr_set(x_28, 0, x_118); -return x_28; -} -} -} -else -{ -obj* x_119; uint8 x_120; obj* x_121; obj* x_122; -x_119 = lean::cnstr_get(x_29, 0); -x_120 = lean::cnstr_get_scalar(x_29, sizeof(void*)*1); -lean::inc(x_119); -lean::dec(x_29); -x_121 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_121, 0, x_119); -lean::cnstr_set_scalar(x_121, sizeof(void*)*1, x_120); -x_122 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_121); -if (lean::obj_tag(x_122) == 0) -{ -obj* x_123; obj* x_124; -lean::free_heap_obj(x_22); -lean::dec(x_13); -x_123 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_122); -x_124 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_123); -lean::cnstr_set(x_28, 0, x_124); -return x_28; -} -else -{ -uint8 x_125; -x_125 = lean::cnstr_get_scalar(x_122, sizeof(void*)*1); -if (x_125 == 0) -{ -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; -x_126 = lean::cnstr_get(x_122, 0); -lean::inc(x_126); -lean::dec(x_122); -x_127 = lean::cnstr_get(x_126, 2); -lean::inc(x_127); -lean::dec(x_126); -x_128 = l_mjoin___rarg___closed__1; -x_129 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_129, 0, x_127); -lean::closure_set(x_129, 1, x_128); -x_130 = lean::cnstr_get(x_20, 2); -lean::inc(x_130); -lean::dec(x_20); -x_131 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_131, 0, x_130); -lean::closure_set(x_131, 1, x_129); -x_132 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_132, 0, x_131); -x_133 = lean::box(0); -lean::cnstr_set(x_22, 2, x_132); -lean::cnstr_set(x_22, 1, x_13); -lean::cnstr_set(x_22, 0, x_133); -x_134 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_22); -lean::cnstr_set(x_28, 0, x_134); -return x_28; -} -else -{ -obj* x_135; obj* x_136; -lean::free_heap_obj(x_22); -lean::dec(x_13); -x_135 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_122); -x_136 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_135); -lean::cnstr_set(x_28, 0, x_136); -return x_28; -} -} -} -} -else -{ -obj* x_137; obj* x_138; uint8 x_139; obj* x_140; obj* x_141; obj* x_142; -x_137 = lean::cnstr_get(x_28, 1); -lean::inc(x_137); -lean::dec(x_28); -x_138 = lean::cnstr_get(x_29, 0); -lean::inc(x_138); -x_139 = lean::cnstr_get_scalar(x_29, sizeof(void*)*1); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - x_140 = x_29; -} else { - lean::dec_ref(x_29); - x_140 = lean::box(0); -} -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(1, 1, 1); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_138); -lean::cnstr_set_scalar(x_141, sizeof(void*)*1, x_139); -x_142 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_141); -if (lean::obj_tag(x_142) == 0) -{ -obj* x_143; obj* x_144; obj* x_145; -lean::free_heap_obj(x_22); -lean::dec(x_13); -x_143 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_142); -x_144 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_143); -x_145 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_145, 0, x_144); -lean::cnstr_set(x_145, 1, x_137); -return x_145; -} -else -{ -uint8 x_146; -x_146 = lean::cnstr_get_scalar(x_142, sizeof(void*)*1); -if (x_146 == 0) -{ -obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; -x_147 = lean::cnstr_get(x_142, 0); -lean::inc(x_147); -lean::dec(x_142); -x_148 = lean::cnstr_get(x_147, 2); -lean::inc(x_148); -lean::dec(x_147); -x_149 = l_mjoin___rarg___closed__1; -x_150 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_150, 0, x_148); -lean::closure_set(x_150, 1, x_149); -x_151 = lean::cnstr_get(x_20, 2); -lean::inc(x_151); -lean::dec(x_20); -x_152 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_152, 0, x_151); -lean::closure_set(x_152, 1, x_150); -x_153 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_153, 0, x_152); -x_154 = lean::box(0); -lean::cnstr_set(x_22, 2, x_153); -lean::cnstr_set(x_22, 1, x_13); -lean::cnstr_set(x_22, 0, x_154); -x_155 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_22); -x_156 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_156, 0, x_155); -lean::cnstr_set(x_156, 1, x_137); -return x_156; -} -else -{ -obj* x_157; obj* x_158; obj* x_159; -lean::free_heap_obj(x_22); -lean::dec(x_13); -x_157 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_142); -x_158 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_157); -x_159 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_159, 0, x_158); -lean::cnstr_set(x_159, 1, x_137); -return x_159; -} -} -} -} -} -else -{ -obj* x_160; obj* x_161; obj* x_162; obj* x_163; -x_160 = lean::cnstr_get(x_22, 1); -x_161 = lean::cnstr_get(x_22, 2); -lean::inc(x_161); -lean::inc(x_160); -lean::dec(x_22); -x_162 = l_Lean_Parser_finishCommentBlock(x_7, x_2, x_160, x_23); -x_163 = lean::cnstr_get(x_162, 0); -lean::inc(x_163); -if (lean::obj_tag(x_163) == 0) -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; -x_164 = lean::cnstr_get(x_162, 1); -lean::inc(x_164); -lean::dec(x_162); -x_165 = lean::cnstr_get(x_163, 1); -lean::inc(x_165); -x_166 = lean::cnstr_get(x_163, 2); -lean::inc(x_166); -if (lean::is_exclusive(x_163)) { - lean::cnstr_release(x_163, 0); - lean::cnstr_release(x_163, 1); - lean::cnstr_release(x_163, 2); - x_167 = x_163; -} else { - lean::dec_ref(x_163); - x_167 = lean::box(0); -} -x_168 = l___private_init_lean_parser_token_2__whitespaceAux___main(x_8, x_2, x_165, x_164); -lean::dec(x_8); -x_169 = lean::cnstr_get(x_168, 0); -lean::inc(x_169); -x_170 = lean::cnstr_get(x_168, 1); -lean::inc(x_170); -if (lean::is_exclusive(x_168)) { - lean::cnstr_release(x_168, 0); - lean::cnstr_release(x_168, 1); - x_171 = x_168; -} else { - lean::dec_ref(x_168); - x_171 = lean::box(0); -} -x_172 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_166, x_169); -x_173 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_161, x_172); -if (lean::obj_tag(x_173) == 0) -{ -obj* x_174; obj* x_175; obj* x_176; -lean::dec(x_167); -lean::dec(x_13); -x_174 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_173); -x_175 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_174); -if (lean::is_scalar(x_171)) { - x_176 = lean::alloc_cnstr(0, 2, 0); -} else { - x_176 = x_171; -} -lean::cnstr_set(x_176, 0, x_175); -lean::cnstr_set(x_176, 1, x_170); -return x_176; -} -else -{ -uint8 x_177; -x_177 = lean::cnstr_get_scalar(x_173, sizeof(void*)*1); -if (x_177 == 0) -{ -obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; -x_178 = lean::cnstr_get(x_173, 0); -lean::inc(x_178); -lean::dec(x_173); -x_179 = lean::cnstr_get(x_178, 2); -lean::inc(x_179); -lean::dec(x_178); -x_180 = l_mjoin___rarg___closed__1; -x_181 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_181, 0, x_179); -lean::closure_set(x_181, 1, x_180); -x_182 = lean::cnstr_get(x_20, 2); -lean::inc(x_182); -lean::dec(x_20); -x_183 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_183, 0, x_182); -lean::closure_set(x_183, 1, x_181); -x_184 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_184, 0, x_183); -x_185 = lean::box(0); -if (lean::is_scalar(x_167)) { - x_186 = lean::alloc_cnstr(0, 3, 0); -} else { - x_186 = x_167; -} -lean::cnstr_set(x_186, 0, x_185); -lean::cnstr_set(x_186, 1, x_13); -lean::cnstr_set(x_186, 2, x_184); -x_187 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_186); -if (lean::is_scalar(x_171)) { - x_188 = lean::alloc_cnstr(0, 2, 0); -} else { - x_188 = x_171; -} -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set(x_188, 1, x_170); -return x_188; -} -else -{ -obj* x_189; obj* x_190; obj* x_191; -lean::dec(x_167); -lean::dec(x_13); -x_189 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_173); -x_190 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_189); -if (lean::is_scalar(x_171)) { - x_191 = lean::alloc_cnstr(0, 2, 0); -} else { - x_191 = x_171; -} -lean::cnstr_set(x_191, 0, x_190); -lean::cnstr_set(x_191, 1, x_170); -return x_191; -} -} -} -else -{ -obj* x_192; obj* x_193; obj* x_194; uint8 x_195; obj* x_196; obj* x_197; obj* x_198; -lean::dec(x_8); -x_192 = lean::cnstr_get(x_162, 1); -lean::inc(x_192); -if (lean::is_exclusive(x_162)) { - lean::cnstr_release(x_162, 0); - lean::cnstr_release(x_162, 1); - x_193 = x_162; -} else { - lean::dec_ref(x_162); - x_193 = lean::box(0); -} -x_194 = lean::cnstr_get(x_163, 0); -lean::inc(x_194); -x_195 = lean::cnstr_get_scalar(x_163, sizeof(void*)*1); -if (lean::is_exclusive(x_163)) { - lean::cnstr_release(x_163, 0); - x_196 = x_163; -} else { - lean::dec_ref(x_163); - x_196 = lean::box(0); -} -if (lean::is_scalar(x_196)) { - x_197 = lean::alloc_cnstr(1, 1, 1); -} else { - x_197 = x_196; -} -lean::cnstr_set(x_197, 0, x_194); -lean::cnstr_set_scalar(x_197, sizeof(void*)*1, x_195); -x_198 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_161, x_197); -if (lean::obj_tag(x_198) == 0) -{ -obj* x_199; obj* x_200; obj* x_201; -lean::dec(x_13); -x_199 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_198); -x_200 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_199); -if (lean::is_scalar(x_193)) { - x_201 = lean::alloc_cnstr(0, 2, 0); -} else { - x_201 = x_193; -} -lean::cnstr_set(x_201, 0, x_200); -lean::cnstr_set(x_201, 1, x_192); -return x_201; -} -else -{ -uint8 x_202; -x_202 = lean::cnstr_get_scalar(x_198, sizeof(void*)*1); -if (x_202 == 0) -{ -obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; -x_203 = lean::cnstr_get(x_198, 0); -lean::inc(x_203); -lean::dec(x_198); -x_204 = lean::cnstr_get(x_203, 2); -lean::inc(x_204); -lean::dec(x_203); -x_205 = l_mjoin___rarg___closed__1; -x_206 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_206, 0, x_204); -lean::closure_set(x_206, 1, x_205); -x_207 = lean::cnstr_get(x_20, 2); -lean::inc(x_207); -lean::dec(x_20); -x_208 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_208, 0, x_207); -lean::closure_set(x_208, 1, x_206); -x_209 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_209, 0, x_208); -x_210 = lean::box(0); -x_211 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_211, 0, x_210); -lean::cnstr_set(x_211, 1, x_13); -lean::cnstr_set(x_211, 2, x_209); -x_212 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_211); -if (lean::is_scalar(x_193)) { - x_213 = lean::alloc_cnstr(0, 2, 0); -} else { - x_213 = x_193; -} -lean::cnstr_set(x_213, 0, x_212); -lean::cnstr_set(x_213, 1, x_192); -return x_213; -} -else -{ -obj* x_214; obj* x_215; obj* x_216; -lean::dec(x_13); -x_214 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_198); -x_215 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_214); -if (lean::is_scalar(x_193)) { - x_216 = lean::alloc_cnstr(0, 2, 0); -} else { - x_216 = x_193; -} -lean::cnstr_set(x_216, 0, x_215); -lean::cnstr_set(x_216, 1, x_192); -return x_216; -} -} -} -} -} -else -{ -uint8 x_217; -lean::dec(x_8); -x_217 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -if (x_217 == 0) -{ -obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; -x_218 = lean::cnstr_get(x_22, 0); -lean::inc(x_218); -lean::dec(x_22); -x_219 = lean::cnstr_get(x_218, 2); -lean::inc(x_219); -lean::dec(x_218); -x_220 = l_mjoin___rarg___closed__1; -x_221 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_221, 0, x_219); -lean::closure_set(x_221, 1, x_220); -x_222 = lean::cnstr_get(x_20, 2); -lean::inc(x_222); -lean::dec(x_20); -x_223 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_223, 0, x_222); -lean::closure_set(x_223, 1, x_221); -x_224 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_224, 0, x_223); -x_225 = lean::box(0); -if (lean::is_scalar(x_15)) { - x_226 = lean::alloc_cnstr(0, 3, 0); -} else { - x_226 = x_15; -} -lean::cnstr_set(x_226, 0, x_225); -lean::cnstr_set(x_226, 1, x_13); -lean::cnstr_set(x_226, 2, x_224); -x_227 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_226); -if (lean::is_scalar(x_12)) { - x_228 = lean::alloc_cnstr(0, 2, 0); -} else { - x_228 = x_12; -} -lean::cnstr_set(x_228, 0, x_227); -lean::cnstr_set(x_228, 1, x_23); -return x_228; -} -else -{ -uint8 x_229; -lean::dec(x_15); -lean::dec(x_13); -x_229 = !lean::is_exclusive(x_22); -if (x_229 == 0) -{ -obj* x_230; obj* x_231; obj* x_232; -x_230 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_22); -x_231 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_230); -if (lean::is_scalar(x_12)) { - x_232 = lean::alloc_cnstr(0, 2, 0); -} else { - x_232 = x_12; -} -lean::cnstr_set(x_232, 0, x_231); -lean::cnstr_set(x_232, 1, x_23); -return x_232; -} -else -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; -x_233 = lean::cnstr_get(x_22, 0); -lean::inc(x_233); -lean::dec(x_22); -x_234 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_234, 0, x_233); -lean::cnstr_set_scalar(x_234, sizeof(void*)*1, x_217); -x_235 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_20, x_234); -x_236 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_235); -if (lean::is_scalar(x_12)) { - x_237 = lean::alloc_cnstr(0, 2, 0); -} else { - x_237 = x_12; -} -lean::cnstr_set(x_237, 0, x_236); -lean::cnstr_set(x_237, 1, x_23); -return x_237; -} -} -} -} -} -} -} -else -{ -uint8 x_332; -lean::dec(x_8); -x_332 = !lean::is_exclusive(x_9); -if (x_332 == 0) -{ -obj* x_333; uint8 x_334; -x_333 = lean::cnstr_get(x_9, 0); -lean::dec(x_333); -x_334 = !lean::is_exclusive(x_10); -if (x_334 == 0) -{ -return x_9; -} -else -{ -obj* x_335; uint8 x_336; obj* x_337; -x_335 = lean::cnstr_get(x_10, 0); -x_336 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_335); -lean::dec(x_10); -x_337 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_337, 0, x_335); -lean::cnstr_set_scalar(x_337, sizeof(void*)*1, x_336); -lean::cnstr_set(x_9, 0, x_337); -return x_9; -} -} -else -{ -obj* x_338; obj* x_339; uint8 x_340; obj* x_341; obj* x_342; obj* x_343; -x_338 = lean::cnstr_get(x_9, 1); -lean::inc(x_338); -lean::dec(x_9); -x_339 = lean::cnstr_get(x_10, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (lean::is_exclusive(x_10)) { - lean::cnstr_release(x_10, 0); - x_341 = x_10; -} else { - lean::dec_ref(x_10); - x_341 = lean::box(0); -} -if (lean::is_scalar(x_341)) { - x_342 = lean::alloc_cnstr(1, 1, 1); -} else { - x_342 = x_341; -} -lean::cnstr_set(x_342, 0, x_339); -lean::cnstr_set_scalar(x_342, sizeof(void*)*1, x_340); -x_343 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_343, 0, x_342); -lean::cnstr_set(x_343, 1, x_338); -return x_343; -} -} -} -else -{ -obj* x_344; obj* x_345; obj* x_346; obj* x_347; -x_344 = lean::box(0); -x_345 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_346 = l_mjoin___rarg___closed__1; -x_347 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_345, x_346, x_344, x_344, x_2, x_3, x_4); -return x_347; -} -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_2); -lean::dec(x_2); -x_5 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__3(x_1, x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__2(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_whitespace___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_whitespace___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__4(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_1); -return x_6; -} -} -obj* l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__6___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; obj* x_5; -x_4 = lean::unbox(x_2); -lean::dec(x_2); -x_5 = l___private_init_lean_parser_parsec_7__takeWhileAux_x27___main___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__6(x_1, x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_MonadParsec_takeWhile_x27___at___private_init_lean_parser_token_2__whitespaceAux___main___spec__5(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l___private_init_lean_parser_token_2__whitespaceAux___main___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_token_2__whitespaceAux___main(x_1, x_2, x_3, x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l___private_init_lean_parser_token_2__whitespaceAux(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_token_2__whitespaceAux___main(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l___private_init_lean_parser_token_2__whitespaceAux___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_token_2__whitespaceAux(x_1, x_2, x_3, x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_whitespace(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = l_String_OldIterator_remaining___main(x_2); -x_5 = lean::mk_nat_obj(1u); -x_6 = lean::nat_add(x_4, x_5); -lean::dec(x_4); -x_7 = l___private_init_lean_parser_token_2__whitespaceAux___main(x_6, x_1, x_2, x_3); -lean::dec(x_6); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_11 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_10, x_9); -x_12 = l_mjoin___rarg___closed__1; -x_13 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_11, x_12); -lean::cnstr_set(x_7, 0, x_13); -return x_7; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_14 = lean::cnstr_get(x_7, 0); -x_15 = lean::cnstr_get(x_7, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_7); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_14); -x_18 = l_mjoin___rarg___closed__1; -x_19 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_17, x_18); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_15); -return x_20; -} -} -} -obj* l_Lean_Parser_whitespace___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_whitespace(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_asSubstring___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_3); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -return x_7; -} -} -obj* l_Lean_Parser_asSubstring___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_asSubstring___rarg___lambda__1), 3, 2); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_2); -x_7 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_4, x_6); -return x_7; -} -} -obj* l_Lean_Parser_asSubstring___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_2); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_asSubstring___rarg___lambda__2___boxed), 5, 4); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_5); -lean::closure_set(x_6, 2, x_2); -lean::closure_set(x_6, 3, x_3); -x_7 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_4, x_6); -return x_7; -} -} -obj* l_Lean_Parser_asSubstring___rarg(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_9; obj* x_10; -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_2, 0); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_8 = lean::apply_2(x_6, lean::box(0), x_7); -lean::inc(x_8); -lean::inc(x_5); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_asSubstring___rarg___lambda__3), 5, 4); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_5); -lean::closure_set(x_9, 2, x_8); -lean::closure_set(x_9, 3, x_4); -x_10 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_8, x_9); -return x_10; -} -} -obj* l_Lean_Parser_asSubstring(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_asSubstring___rarg), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_asSubstring___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_asSubstring___rarg___lambda__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_5); -return x_6; -} -} -obj* l_Lean_Parser_asSubstring___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_asSubstring(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_updateLast___main(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -lean::dec(x_1); -return x_2; -} -else -{ -obj* x_3; -x_3 = lean::cnstr_get(x_2, 1); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::dec(x_6); -x_7 = lean::apply_1(x_1, x_5); -lean::cnstr_set(x_2, 0, x_7); -return x_2; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = lean::apply_1(x_1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_3); -return x_10; -} -} -else -{ -obj* x_11; obj* x_12; uint8 x_13; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -lean::inc(x_3); -x_12 = l_Lean_Parser_updateLast___main(x_1, x_3); -x_13 = !lean::is_exclusive(x_3); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_3, 1); -lean::dec(x_14); -x_15 = lean::cnstr_get(x_3, 0); -lean::dec(x_15); -lean::cnstr_set(x_3, 1, x_12); -lean::cnstr_set(x_3, 0, x_11); -return x_3; -} -else -{ -obj* x_16; -lean::dec(x_3); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_11); -lean::cnstr_set(x_16, 1, x_12); -return x_16; -} -} -} -} -} -obj* l_Lean_Parser_updateLast(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_updateLast___main(x_1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_updateLast___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_updateLast(x_1, x_2, x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_updateLast___main___at___private_init_lean_parser_token_3__updateTrailing___main___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -lean::dec(x_1); -return x_2; -} -else -{ -obj* x_3; -x_3 = lean::cnstr_get(x_2, 1); -lean::inc(x_3); -if (lean::obj_tag(x_3) == 0) -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_2, 1); -lean::dec(x_6); -x_7 = l___private_init_lean_parser_token_3__updateTrailing___main(x_1, x_5); -lean::cnstr_set(x_2, 0, x_7); -return x_2; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -lean::dec(x_2); -x_9 = l___private_init_lean_parser_token_3__updateTrailing___main(x_1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_3); -return x_10; -} -} -else -{ -obj* x_11; obj* x_12; uint8 x_13; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -lean::inc(x_3); -x_12 = l_Lean_Parser_updateLast___main___at___private_init_lean_parser_token_3__updateTrailing___main___spec__1(x_1, x_3); -x_13 = !lean::is_exclusive(x_3); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_3, 1); -lean::dec(x_14); -x_15 = lean::cnstr_get(x_3, 0); -lean::dec(x_15); -lean::cnstr_set(x_3, 1, x_12); -lean::cnstr_set(x_3, 0, x_11); -return x_3; -} -else -{ -obj* x_16; -lean::dec(x_3); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_11); -lean::cnstr_set(x_16, 1, x_12); -return x_16; -} -} -} -} -} -obj* l___private_init_lean_parser_token_3__updateTrailing___main(obj* x_1, obj* x_2) { -_start: -{ -switch (lean::obj_tag(x_2)) { -case 0: -{ -obj* x_3; obj* x_4; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_3, 0); -lean::inc(x_4); -if (lean::obj_tag(x_4) == 0) -{ -lean::dec(x_3); -lean::dec(x_1); -return x_2; -} -else -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_2); -if (x_5 == 0) -{ -obj* x_6; uint8 x_7; -x_6 = lean::cnstr_get(x_2, 0); -lean::dec(x_6); -x_7 = !lean::is_exclusive(x_4); -if (x_7 == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_3); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; -x_9 = lean::cnstr_get(x_4, 0); -x_10 = lean::cnstr_get(x_3, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_9); -if (x_11 == 0) -{ -obj* x_12; -x_12 = lean::cnstr_get(x_9, 2); -lean::dec(x_12); -lean::cnstr_set(x_9, 2, x_1); -return x_2; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; -x_13 = lean::cnstr_get(x_9, 0); -x_14 = lean::cnstr_get(x_9, 1); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_9); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -lean::cnstr_set(x_15, 2, x_1); -lean::cnstr_set(x_4, 0, x_15); -return x_2; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_16 = lean::cnstr_get(x_4, 0); -x_17 = lean::cnstr_get(x_3, 1); -lean::inc(x_17); -lean::dec(x_3); -x_18 = lean::cnstr_get(x_16, 0); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_16, 1); -lean::inc(x_19); -if (lean::is_exclusive(x_16)) { - lean::cnstr_release(x_16, 0); - lean::cnstr_release(x_16, 1); - lean::cnstr_release(x_16, 2); - x_20 = x_16; -} else { - lean::dec_ref(x_16); - x_20 = lean::box(0); -} -if (lean::is_scalar(x_20)) { - x_21 = lean::alloc_cnstr(0, 3, 0); -} else { - x_21 = x_20; -} -lean::cnstr_set(x_21, 0, x_18); -lean::cnstr_set(x_21, 1, x_19); -lean::cnstr_set(x_21, 2, x_1); -lean::cnstr_set(x_4, 0, x_21); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_4); -lean::cnstr_set(x_22, 1, x_17); -lean::cnstr_set(x_2, 0, x_22); -return x_2; -} -} -else -{ -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; -x_23 = lean::cnstr_get(x_4, 0); -lean::inc(x_23); -lean::dec(x_4); -x_24 = lean::cnstr_get(x_3, 1); -lean::inc(x_24); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_25 = x_3; -} else { - lean::dec_ref(x_3); - x_25 = lean::box(0); -} -x_26 = lean::cnstr_get(x_23, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_23, 1); -lean::inc(x_27); -if (lean::is_exclusive(x_23)) { - lean::cnstr_release(x_23, 0); - lean::cnstr_release(x_23, 1); - lean::cnstr_release(x_23, 2); - x_28 = x_23; -} else { - lean::dec_ref(x_23); - x_28 = lean::box(0); -} -if (lean::is_scalar(x_28)) { - x_29 = lean::alloc_cnstr(0, 3, 0); -} else { - x_29 = x_28; -} -lean::cnstr_set(x_29, 0, x_26); -lean::cnstr_set(x_29, 1, x_27); -lean::cnstr_set(x_29, 2, x_1); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -if (lean::is_scalar(x_25)) { - x_31 = lean::alloc_cnstr(0, 2, 0); -} else { - x_31 = x_25; -} -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_24); -lean::cnstr_set(x_2, 0, x_31); -return x_2; -} -} -else -{ -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; -lean::dec(x_2); -x_32 = lean::cnstr_get(x_4, 0); -lean::inc(x_32); -if (lean::is_exclusive(x_4)) { - lean::cnstr_release(x_4, 0); - x_33 = x_4; -} else { - lean::dec_ref(x_4); - x_33 = lean::box(0); -} -x_34 = lean::cnstr_get(x_3, 1); -lean::inc(x_34); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_35 = x_3; -} else { - lean::dec_ref(x_3); - x_35 = lean::box(0); -} -x_36 = lean::cnstr_get(x_32, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_32, 1); -lean::inc(x_37); -if (lean::is_exclusive(x_32)) { - lean::cnstr_release(x_32, 0); - lean::cnstr_release(x_32, 1); - lean::cnstr_release(x_32, 2); - x_38 = x_32; -} else { - lean::dec_ref(x_32); - x_38 = lean::box(0); -} -if (lean::is_scalar(x_38)) { - x_39 = lean::alloc_cnstr(0, 3, 0); -} else { - x_39 = x_38; -} -lean::cnstr_set(x_39, 0, x_36); -lean::cnstr_set(x_39, 1, x_37); -lean::cnstr_set(x_39, 2, x_1); -if (lean::is_scalar(x_33)) { - x_40 = lean::alloc_cnstr(1, 1, 0); -} else { - x_40 = x_33; -} -lean::cnstr_set(x_40, 0, x_39); -if (lean::is_scalar(x_35)) { - x_41 = lean::alloc_cnstr(0, 2, 0); -} else { - x_41 = x_35; -} -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_34); -x_42 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -return x_42; -} -} -} -case 1: -{ -obj* x_43; obj* x_44; -x_43 = lean::cnstr_get(x_2, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -lean::dec(x_43); -lean::dec(x_1); -return x_2; -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_2); -if (x_45 == 0) -{ -obj* x_46; uint8 x_47; -x_46 = lean::cnstr_get(x_2, 0); -lean::dec(x_46); -x_47 = !lean::is_exclusive(x_44); -if (x_47 == 0) -{ -uint8 x_48; -x_48 = !lean::is_exclusive(x_43); -if (x_48 == 0) -{ -obj* x_49; obj* x_50; uint8 x_51; -x_49 = lean::cnstr_get(x_44, 0); -x_50 = lean::cnstr_get(x_43, 0); -lean::dec(x_50); -x_51 = !lean::is_exclusive(x_49); -if (x_51 == 0) -{ -obj* x_52; -x_52 = lean::cnstr_get(x_49, 2); -lean::dec(x_52); -lean::cnstr_set(x_49, 2, x_1); -return x_2; -} -else -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::cnstr_get(x_49, 0); -x_54 = lean::cnstr_get(x_49, 1); -lean::inc(x_54); -lean::inc(x_53); -lean::dec(x_49); -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_53); -lean::cnstr_set(x_55, 1, x_54); -lean::cnstr_set(x_55, 2, x_1); -lean::cnstr_set(x_44, 0, x_55); -return x_2; -} -} -else -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; -x_56 = lean::cnstr_get(x_44, 0); -x_57 = lean::cnstr_get(x_43, 1); -x_58 = lean::cnstr_get(x_43, 2); -x_59 = lean::cnstr_get(x_43, 3); -x_60 = lean::cnstr_get(x_43, 4); -lean::inc(x_60); -lean::inc(x_59); -lean::inc(x_58); -lean::inc(x_57); -lean::dec(x_43); -x_61 = lean::cnstr_get(x_56, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_56, 1); -lean::inc(x_62); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - lean::cnstr_release(x_56, 1); - lean::cnstr_release(x_56, 2); - x_63 = x_56; -} else { - lean::dec_ref(x_56); - x_63 = lean::box(0); -} -if (lean::is_scalar(x_63)) { - x_64 = lean::alloc_cnstr(0, 3, 0); -} else { - x_64 = x_63; -} -lean::cnstr_set(x_64, 0, x_61); -lean::cnstr_set(x_64, 1, x_62); -lean::cnstr_set(x_64, 2, x_1); -lean::cnstr_set(x_44, 0, x_64); -x_65 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_65, 0, x_44); -lean::cnstr_set(x_65, 1, x_57); -lean::cnstr_set(x_65, 2, x_58); -lean::cnstr_set(x_65, 3, x_59); -lean::cnstr_set(x_65, 4, x_60); -lean::cnstr_set(x_2, 0, x_65); -return x_2; -} -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_66 = lean::cnstr_get(x_44, 0); -lean::inc(x_66); -lean::dec(x_44); -x_67 = lean::cnstr_get(x_43, 1); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_43, 2); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_43, 3); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_43, 4); -lean::inc(x_70); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - lean::cnstr_release(x_43, 1); - lean::cnstr_release(x_43, 2); - lean::cnstr_release(x_43, 3); - lean::cnstr_release(x_43, 4); - x_71 = x_43; -} else { - lean::dec_ref(x_43); - x_71 = lean::box(0); -} -x_72 = lean::cnstr_get(x_66, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_66, 1); -lean::inc(x_73); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - lean::cnstr_release(x_66, 2); - x_74 = x_66; -} else { - lean::dec_ref(x_66); - x_74 = lean::box(0); -} -if (lean::is_scalar(x_74)) { - x_75 = lean::alloc_cnstr(0, 3, 0); -} else { - x_75 = x_74; -} -lean::cnstr_set(x_75, 0, x_72); -lean::cnstr_set(x_75, 1, x_73); -lean::cnstr_set(x_75, 2, x_1); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -if (lean::is_scalar(x_71)) { - x_77 = lean::alloc_cnstr(0, 5, 0); -} else { - x_77 = x_71; -} -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_67); -lean::cnstr_set(x_77, 2, x_68); -lean::cnstr_set(x_77, 3, x_69); -lean::cnstr_set(x_77, 4, x_70); -lean::cnstr_set(x_2, 0, x_77); -return x_2; -} -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -lean::dec(x_2); -x_78 = lean::cnstr_get(x_44, 0); -lean::inc(x_78); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_79 = x_44; -} else { - lean::dec_ref(x_44); - x_79 = lean::box(0); -} -x_80 = lean::cnstr_get(x_43, 1); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_43, 2); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_43, 3); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_43, 4); -lean::inc(x_83); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - lean::cnstr_release(x_43, 1); - lean::cnstr_release(x_43, 2); - lean::cnstr_release(x_43, 3); - lean::cnstr_release(x_43, 4); - x_84 = x_43; -} else { - lean::dec_ref(x_43); - x_84 = lean::box(0); -} -x_85 = lean::cnstr_get(x_78, 0); -lean::inc(x_85); -x_86 = lean::cnstr_get(x_78, 1); -lean::inc(x_86); -if (lean::is_exclusive(x_78)) { - lean::cnstr_release(x_78, 0); - lean::cnstr_release(x_78, 1); - lean::cnstr_release(x_78, 2); - x_87 = x_78; -} else { - lean::dec_ref(x_78); - x_87 = lean::box(0); -} -if (lean::is_scalar(x_87)) { - x_88 = lean::alloc_cnstr(0, 3, 0); -} else { - x_88 = x_87; -} -lean::cnstr_set(x_88, 0, x_85); -lean::cnstr_set(x_88, 1, x_86); -lean::cnstr_set(x_88, 2, x_1); -if (lean::is_scalar(x_79)) { - x_89 = lean::alloc_cnstr(1, 1, 0); -} else { - x_89 = x_79; -} -lean::cnstr_set(x_89, 0, x_88); -if (lean::is_scalar(x_84)) { - x_90 = lean::alloc_cnstr(0, 5, 0); -} else { - x_90 = x_84; -} -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_80); -lean::cnstr_set(x_90, 2, x_81); -lean::cnstr_set(x_90, 3, x_82); -lean::cnstr_set(x_90, 4, x_83); -x_91 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_91, 0, x_90); -return x_91; -} -} -} -case 2: -{ -uint8 x_92; -x_92 = !lean::is_exclusive(x_2); -if (x_92 == 0) -{ -obj* x_93; uint8 x_94; -x_93 = lean::cnstr_get(x_2, 0); -x_94 = !lean::is_exclusive(x_93); -if (x_94 == 0) -{ -obj* x_95; obj* x_96; -x_95 = lean::cnstr_get(x_93, 1); -x_96 = l_Lean_Parser_updateLast___main___at___private_init_lean_parser_token_3__updateTrailing___main___spec__1(x_1, x_95); -lean::cnstr_set(x_93, 1, x_96); -return x_2; -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_97 = lean::cnstr_get(x_93, 0); -x_98 = lean::cnstr_get(x_93, 1); -x_99 = lean::cnstr_get(x_93, 2); -lean::inc(x_99); -lean::inc(x_98); -lean::inc(x_97); -lean::dec(x_93); -x_100 = l_Lean_Parser_updateLast___main___at___private_init_lean_parser_token_3__updateTrailing___main___spec__1(x_1, x_98); -x_101 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_101, 0, x_97); -lean::cnstr_set(x_101, 1, x_100); -lean::cnstr_set(x_101, 2, x_99); -lean::cnstr_set(x_2, 0, x_101); -return x_2; -} -} -else -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; -x_102 = lean::cnstr_get(x_2, 0); -lean::inc(x_102); -lean::dec(x_2); -x_103 = lean::cnstr_get(x_102, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_102, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_102, 2); -lean::inc(x_105); -if (lean::is_exclusive(x_102)) { - lean::cnstr_release(x_102, 0); - lean::cnstr_release(x_102, 1); - lean::cnstr_release(x_102, 2); - x_106 = x_102; -} else { - lean::dec_ref(x_102); - x_106 = lean::box(0); -} -x_107 = l_Lean_Parser_updateLast___main___at___private_init_lean_parser_token_3__updateTrailing___main___spec__1(x_1, x_104); -if (lean::is_scalar(x_106)) { - x_108 = lean::alloc_cnstr(0, 3, 0); -} else { - x_108 = x_106; -} -lean::cnstr_set(x_108, 0, x_103); -lean::cnstr_set(x_108, 1, x_107); -lean::cnstr_set(x_108, 2, x_105); -x_109 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_109, 0, x_108); -return x_109; -} -} -default: -{ -lean::dec(x_1); -return x_2; -} -} -} -} -obj* l___private_init_lean_parser_token_3__updateTrailing(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l___private_init_lean_parser_token_3__updateTrailing___main(x_1, x_2); -return x_3; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::apply_2(x_1, x_3, x_4); -return x_5; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_3); -x_6 = lean::apply_3(x_1, x_3, x_4, x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint8 x_13; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -lean::dec(x_6); -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_7, 2); -lean::inc(x_11); -lean::dec(x_7); -x_12 = lean::apply_4(x_2, x_9, x_3, x_10, x_8); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_14); -lean::cnstr_set(x_12, 0, x_15); -return x_12; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_12, 0); -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_12); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_16); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -else -{ -uint8 x_20; -lean::dec(x_3); -lean::dec(x_2); -x_20 = !lean::is_exclusive(x_6); -if (x_20 == 0) -{ -obj* x_21; uint8 x_22; -x_21 = lean::cnstr_get(x_6, 0); -lean::dec(x_21); -x_22 = !lean::is_exclusive(x_7); -if (x_22 == 0) -{ -return x_6; -} -else -{ -obj* x_23; uint8 x_24; obj* x_25; -x_23 = lean::cnstr_get(x_7, 0); -x_24 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_23); -lean::dec(x_7); -x_25 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set_scalar(x_25, sizeof(void*)*1, x_24); -lean::cnstr_set(x_6, 0, x_25); -return x_6; -} -} -else -{ -obj* x_26; obj* x_27; uint8 x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_6, 1); -lean::inc(x_26); -lean::dec(x_6); -x_27 = lean::cnstr_get(x_7, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_29 = x_7; -} else { - lean::dec_ref(x_7); - x_29 = lean::box(0); -} -if (lean::is_scalar(x_29)) { - x_30 = lean::alloc_cnstr(1, 1, 1); -} else { - x_30 = x_29; -} -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set_scalar(x_30, sizeof(void*)*1, x_28); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_26); -return x_31; -} -} -} -} -obj* l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 0); -return x_3; -} -} -obj* l_Lean_Parser_withTrailing___rarg___lambda__1(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_1); -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_1); -lean::cnstr_set(x_4, 2, x_3); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_2); -return x_5; -} -} -obj* l_Lean_Parser_withTrailing___rarg___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_whitespace(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_6, 1); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -lean::inc(x_10); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_1); -lean::cnstr_set(x_13, 1, x_10); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_14); -lean::cnstr_set(x_6, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -lean::cnstr_set(x_5, 0, x_15); -return x_5; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_6, 1); -x_17 = lean::cnstr_get(x_6, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_6); -lean::inc(x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_1); -lean::cnstr_set(x_18, 1, x_16); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -lean::cnstr_set(x_5, 0, x_21); -return x_5; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_5, 1); -lean::inc(x_22); -lean::dec(x_5); -x_23 = lean::cnstr_get(x_6, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_6, 2); -lean::inc(x_24); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_25 = x_6; -} else { - lean::dec_ref(x_6); - x_25 = lean::box(0); -} -lean::inc(x_23); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_1); -lean::cnstr_set(x_26, 1, x_23); -x_27 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_25)) { - x_28 = lean::alloc_cnstr(0, 3, 0); -} else { - x_28 = x_25; -} -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_22); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_5); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_5, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_6); -if (x_33 == 0) -{ -return x_5; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_6, 0); -x_35 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_6); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_38 = lean::cnstr_get(x_6, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_40 = x_6; -} else { - lean::dec_ref(x_6); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -obj* l_Lean_Parser_withTrailing___rarg___lambda__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l___private_init_lean_parser_token_3__updateTrailing___main(x_3, x_2); -x_7 = lean::apply_2(x_5, lean::box(0), x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_withTrailing___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__2___boxed), 4, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_withTrailing___rarg(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_9; -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -x_6 = l_Lean_Parser_withTrailing___rarg___closed__1; -x_7 = lean::apply_2(x_3, lean::box(0), x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__3), 3, 2); -lean::closure_set(x_8, 0, x_1); -lean::closure_set(x_8, 1, x_4); -x_9 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_7, x_8); -return x_9; -} -} -obj* l_Lean_Parser_withTrailing(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_withTrailing___rarg___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_withTrailing___rarg___lambda__2(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_withTrailing___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_withTrailing___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_withTrailing___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_withTrailing(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_mkRawRes(obj* x_1, obj* x_2) { -_start: -{ -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; -lean::inc(x_2); -lean::inc(x_1); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -lean::inc(x_1, 2); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -lean::dec(x_1); -lean::inc(x_2); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_2); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_6); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = l_Lean_Parser_Substring_toString(x_3); -lean::dec(x_3); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -} -obj* l_Lean_Parser_raw___rarg___lambda__1(obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_mkRawRes(x_1, x_6); -if (x_2 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_5); -x_8 = lean::cnstr_get(x_3, 0); -lean::inc(x_8); -lean::dec(x_3); -x_9 = lean::cnstr_get(x_8, 1); -lean::inc(x_9); -lean::dec(x_8); -x_10 = lean::apply_2(x_9, lean::box(0), x_7); -return x_10; -} -else -{ -obj* x_11; -x_11 = l_Lean_Parser_withTrailing___rarg(x_3, x_4, x_5, x_7); -return x_11; -} -} -} -obj* l_Lean_Parser_raw___rarg___lambda__2(obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { -_start: -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::box(x_2); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw___rarg___lambda__1___boxed), 6, 5); -lean::closure_set(x_10, 0, x_1); -lean::closure_set(x_10, 1, x_9); -lean::closure_set(x_10, 2, x_3); -lean::closure_set(x_10, 3, x_4); -lean::closure_set(x_10, 4, x_5); -x_11 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_7, x_10); -return x_11; -} -} -obj* l_Lean_Parser_raw___rarg___lambda__3(uint8 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_9; obj* x_10; obj* x_11; -x_9 = lean::box(x_1); -lean::inc(x_5); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw___rarg___lambda__2___boxed), 8, 7); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_9); -lean::closure_set(x_10, 2, x_2); -lean::closure_set(x_10, 3, x_3); -lean::closure_set(x_10, 4, x_4); -lean::closure_set(x_10, 5, x_5); -lean::closure_set(x_10, 6, x_6); -x_11 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_7, x_10); -return x_11; -} -} -obj* l_Lean_Parser_raw___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, uint8 x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_7 = lean::cnstr_get(x_1, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_2, 0); -lean::inc(x_8); -x_9 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_10 = lean::apply_2(x_8, lean::box(0), x_9); -x_11 = lean::box(x_6); -lean::inc(x_10); -lean::inc(x_7); -x_12 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw___rarg___lambda__3___boxed), 8, 7); -lean::closure_set(x_12, 0, x_11); -lean::closure_set(x_12, 1, x_1); -lean::closure_set(x_12, 2, x_2); -lean::closure_set(x_12, 3, x_3); -lean::closure_set(x_12, 4, x_7); -lean::closure_set(x_12, 5, x_10); -lean::closure_set(x_12, 6, x_5); -x_13 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_10, x_12); -return x_13; -} -} -obj* l_Lean_Parser_raw(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_raw___rarg___lambda__1___boxed(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); -lean::dec(x_2); -x_8 = l_Lean_Parser_raw___rarg___lambda__1(x_1, x_7, x_3, x_4, x_5, x_6); -lean::dec(x_4); -return x_8; -} -} -obj* l_Lean_Parser_raw___rarg___lambda__2___boxed(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: -{ -uint8 x_9; obj* x_10; -x_9 = lean::unbox(x_2); -lean::dec(x_2); -x_10 = l_Lean_Parser_raw___rarg___lambda__2(x_1, x_9, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_8); -return x_10; -} -} -obj* l_Lean_Parser_raw___rarg___lambda__3___boxed(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: -{ -uint8 x_9; obj* x_10; -x_9 = lean::unbox(x_1); -lean::dec(x_1); -x_10 = l_Lean_Parser_raw___rarg___lambda__3(x_9, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -return x_10; -} -} -obj* l_Lean_Parser_raw___rarg___boxed(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_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_raw___rarg(x_1, x_2, x_3, x_4, x_5, x_7); -return x_8; -} -} -obj* l_Lean_Parser_raw___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_raw(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_raw_tokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, uint8 x_7) { -_start: -{ -obj* x_8; -x_8 = lean::box(0); -return x_8; -} -} -obj* l_Lean_Parser_raw_tokens___boxed(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_7); -lean::dec(x_7); -x_9 = l_Lean_Parser_raw_tokens(x_1, x_2, x_3, x_4, x_5, x_6, x_8); -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* l_Lean_Parser_raw_view___rarg___lambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; obj* x_3; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_3, 0, x_2); -return x_3; -} -else -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -} -} -obj* l_Lean_Parser_raw_view___rarg___lambda__2(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(3); -return x_2; -} -else -{ -obj* x_3; obj* x_4; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_4, 0, x_3); -return x_4; -} -} -} -obj* _init_l_Lean_Parser_raw_view___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw_view___rarg___lambda__1___boxed), 1, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_raw_view___rarg___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw_view___rarg___lambda__2___boxed), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_raw_view___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, uint8 x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l_Lean_Parser_raw_view___rarg___closed__1; -x_8 = l_Lean_Parser_raw_view___rarg___closed__2; -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_raw_view(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw_view___rarg___boxed), 6, 0); -return x_2; -} -} -obj* l_Lean_Parser_raw_view___rarg___lambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_raw_view___rarg___lambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_raw_view___rarg___lambda__2___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_raw_view___rarg___lambda__2(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_raw_view___rarg___boxed(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_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_raw_view___rarg(x_1, x_2, x_3, x_4, x_5, x_7); -lean::dec(x_5); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_Lean_Parser_raw_view___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_raw_view(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_rawStr_Lean_Parser_HasTokens(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, uint8 x_6) { -_start: -{ -obj* x_7; -x_7 = lean::box(0); -return x_7; -} -} -obj* l_Lean_Parser_rawStr_Lean_Parser_HasTokens___boxed(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_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_rawStr_Lean_Parser_HasTokens(x_1, x_2, x_3, x_4, x_5, x_7); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_8; -} -} -obj* l_Lean_Parser_rawStr_Lean_Parser_HasView___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, uint8 x_5) { -_start: -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::inc(x_4); -x_6 = l_String_quote(x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -lean::inc(x_2); -lean::inc(x_1); -x_8 = l_Lean_Parser_MonadParsec_strCore___rarg(x_1, x_2, x_4, x_7); -x_9 = l_Lean_Parser_raw_view___rarg(x_1, x_2, x_3, lean::box(0), x_8, x_5); -lean::dec(x_8); -lean::dec(x_2); -lean::dec(x_1); -return x_9; -} -} -obj* l_Lean_Parser_rawStr_Lean_Parser_HasView(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_rawStr_Lean_Parser_HasView___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_rawStr_Lean_Parser_HasView___rarg___boxed(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); -lean::dec(x_5); -x_7 = l_Lean_Parser_rawStr_Lean_Parser_HasView___rarg(x_1, x_2, x_3, x_4, x_6); -lean::dec(x_3); -return x_7; -} -} -obj* l_Lean_Parser_rawStr_Lean_Parser_HasView___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_rawStr_Lean_Parser_HasView(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_rawStr___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, uint8 x_5) { -_start: -{ -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; -lean::inc(x_4); -x_6 = l_String_quote(x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -lean::inc(x_2); -lean::inc(x_1); -x_8 = l_Lean_Parser_MonadParsec_strCore___rarg(x_1, x_2, x_4, x_7); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = l_Lean_Parser_MonadParsec_leftOver___rarg___closed__1; -x_12 = lean::apply_2(x_10, lean::box(0), x_11); -x_13 = lean::box(x_5); -lean::inc(x_12); -lean::inc(x_9); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_raw___rarg___lambda__3___boxed), 8, 7); -lean::closure_set(x_14, 0, x_13); -lean::closure_set(x_14, 1, x_1); -lean::closure_set(x_14, 2, x_2); -lean::closure_set(x_14, 3, x_3); -lean::closure_set(x_14, 4, x_9); -lean::closure_set(x_14, 5, x_12); -lean::closure_set(x_14, 6, x_8); -x_15 = lean::apply_4(x_9, lean::box(0), lean::box(0), x_12, x_14); -return x_15; -} -} -obj* l_Lean_Parser_rawStr(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_rawStr___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_rawStr___rarg___boxed(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); -lean::dec(x_5); -x_7 = l_Lean_Parser_rawStr___rarg(x_1, x_2, x_3, x_4, x_6); -return x_7; -} -} -obj* l_Lean_Parser_rawStr___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_rawStr(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_rawStr_viewDefault___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, uint8 x_5) { -_start: -{ -obj* x_6; -x_6 = lean::box(0); -return x_6; -} -} -obj* l_Lean_Parser_rawStr_viewDefault(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_rawStr_viewDefault___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_rawStr_viewDefault___rarg___boxed(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); -lean::dec(x_5); -x_7 = l_Lean_Parser_rawStr_viewDefault___rarg(x_1, x_2, x_3, x_4, x_6); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* l_Lean_Parser_rawStr_viewDefault___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_rawStr_viewDefault(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_detailIdentPartEscaped() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("detailIdentPartEscaped"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -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_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_Lean_Parser_detailIdentPartEscaped; -x_7 = l_Lean_Parser_Syntax_mkNode(x_6, x_5); -return x_7; -} -} -obj* _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::cnstr_get(x_1, 2); -x_5 = lean::box(0); -if (lean::obj_tag(x_2) == 0) -{ -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; -x_6 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__1; -return x_6; -} -else -{ -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_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -x_8 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_5); -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = l_Lean_Parser_detailIdentPartEscaped; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -else -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_17 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::box(3); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_Lean_Parser_detailIdentPartEscaped; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_23 = lean::cnstr_get(x_4, 0); -lean::inc(x_23); -x_24 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_5); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_16); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::box(3); -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 = l_Lean_Parser_detailIdentPartEscaped; -x_30 = l_Lean_Parser_Syntax_mkNode(x_29, x_28); -return x_30; -} -} -} -else -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_2, 0); -lean::inc(x_31); -x_32 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -if (lean::obj_tag(x_3) == 0) -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_33 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__3; -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_33); -x_35 = l_Lean_Parser_detailIdentPartEscaped; -x_36 = l_Lean_Parser_Syntax_mkNode(x_35, x_34); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_37 = lean::cnstr_get(x_4, 0); -lean::inc(x_37); -x_38 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_38, 0, 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_5); -x_40 = lean::box(3); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_39); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_32); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_Lean_Parser_detailIdentPartEscaped; -x_44 = l_Lean_Parser_Syntax_mkNode(x_43, x_42); -return x_44; -} -} -else -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_3, 0); -lean::inc(x_45); -x_46 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2; -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_32); -lean::cnstr_set(x_49, 1, x_48); -x_50 = l_Lean_Parser_detailIdentPartEscaped; -x_51 = l_Lean_Parser_Syntax_mkNode(x_50, x_49); -return x_51; -} -else -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_52 = lean::cnstr_get(x_4, 0); -lean::inc(x_52); -x_53 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_5); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_46); -lean::cnstr_set(x_55, 1, x_54); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_32); -lean::cnstr_set(x_56, 1, x_55); -x_57 = l_Lean_Parser_detailIdentPartEscaped; -x_58 = l_Lean_Parser_Syntax_mkNode(x_57, x_56); -return x_58; -} -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_2, 0, x_1); -lean::cnstr_set(x_2, 1, x_1); -lean::cnstr_set(x_2, 2, x_1); -return x_2; -} -} -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_32; -x_32 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_32) == 0) -{ -obj* x_33; -x_33 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1___closed__1; -return x_33; -} -else -{ -obj* x_34; obj* x_35; -x_34 = lean::cnstr_get(x_32, 0); -lean::inc(x_34); -lean::dec(x_32); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -lean::dec(x_34); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; -x_36 = lean::box(3); -x_2 = x_35; -x_3 = x_36; -goto block_31; -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_35, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 1); -lean::inc(x_38); -lean::dec(x_35); -x_2 = x_38; -x_3 = x_37; -goto block_31; -} -} -block_31: -{ -obj* x_4; -if (lean::obj_tag(x_3) == 0) -{ -obj* x_28; obj* x_29; -x_28 = lean::cnstr_get(x_3, 0); -lean::inc(x_28); -lean::dec(x_3); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_4 = x_29; -goto block_27; -} -else -{ -obj* x_30; -lean::dec(x_3); -x_30 = lean::box(0); -x_4 = x_30; -goto block_27; -} -block_27: -{ -obj* x_5; obj* x_6; obj* x_13; obj* x_14; -if (lean::obj_tag(x_2) == 0) -{ -obj* x_24; -x_24 = lean::box(3); -x_13 = x_2; -x_14 = x_24; -goto block_23; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_2, 0); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_2, 1); -lean::inc(x_26); -lean::dec(x_2); -x_13 = x_26; -x_14 = x_25; -goto block_23; -} -block_12: -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_4); -lean::cnstr_set(x_9, 1, x_5); -lean::cnstr_set(x_9, 2, x_8); -return x_9; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_4); -lean::cnstr_set(x_11, 1, x_5); -lean::cnstr_set(x_11, 2, x_10); -return x_11; -} -} -block_23: -{ -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::box(0); -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_16); -lean::cnstr_set(x_18, 2, x_17); -return x_18; -} -else -{ -obj* x_19; -x_19 = lean::cnstr_get(x_13, 0); -lean::inc(x_19); -lean::dec(x_13); -x_5 = x_16; -x_6 = x_19; -goto block_12; -} -} -else -{ -obj* x_20; -lean::dec(x_14); -x_20 = lean::box(0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_21; -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_20); -lean::cnstr_set(x_21, 2, x_20); -return x_21; -} -else -{ -obj* x_22; -x_22 = lean::cnstr_get(x_13, 0); -lean::inc(x_22); -lean::dec(x_13); -x_5 = x_20; -x_6 = x_22; -goto block_12; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_detailIdentPartEscaped_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_detailIdentPartEscaped_HasView_x27; -return x_1; -} -} -obj* _init_l_Lean_Parser_detailIdentPart() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("detailIdentPart"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(0u); -x_3 = lean_name_mk_numeral(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_detailIdentPart; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(1u); -x_3 = lean_name_mk_numeral(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -if (lean::obj_tag(x_1) == 0) -{ -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_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_detailIdentPartEscaped_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_detailIdentPart; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_detailIdentPart; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_detailIdentPartEscaped_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("detailIdentPart"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__3; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -lean::dec(x_22); -if (x_30 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_31; obj* x_32; -x_31 = lean::cnstr_get(x_28, 0); -lean::inc(x_31); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_31); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_13); -return x_32; -} -else -{ -obj* x_33; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_33 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__1; -return x_33; -} -} -else -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -lean::free_heap_obj(x_13); -x_34 = l_Lean_Parser_detailIdentPartEscaped_HasView; -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::apply_1(x_35, x_28); -x_37 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -return x_37; -} -} -else -{ -obj* x_38; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_38 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_38; -} -} -} -} -} -} -else -{ -obj* x_39; obj* x_40; -x_39 = lean::cnstr_get(x_13, 0); -lean::inc(x_39); -lean::dec(x_13); -x_40 = lean::cnstr_get(x_39, 0); -lean::inc(x_40); -switch (lean::obj_tag(x_40)) { -case 0: -{ -obj* x_41; -lean::dec(x_39); -x_41 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_41; -} -case 1: -{ -obj* x_42; -lean::dec(x_40); -lean::dec(x_39); -x_42 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_42; -} -default: -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; uint8 x_47; -x_43 = lean::cnstr_get(x_39, 1); -lean::inc(x_43); -lean::dec(x_39); -x_44 = lean::cnstr_get(x_40, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_40, 1); -lean::inc(x_45); -lean::dec(x_40); -x_46 = lean::box(0); -x_47 = lean_name_dec_eq(x_44, x_46); -lean::dec(x_44); -if (x_47 == 0) -{ -obj* x_48; -lean::dec(x_45); -lean::dec(x_43); -x_48 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_48; -} -else -{ -if (lean::obj_tag(x_43) == 0) -{ -obj* x_49; -lean::dec(x_45); -x_49 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_49; -} -else -{ -obj* x_50; -x_50 = lean::cnstr_get(x_43, 1); -lean::inc(x_50); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_51; obj* x_52; uint8 x_53; -x_51 = lean::cnstr_get(x_43, 0); -lean::inc(x_51); -lean::dec(x_43); -x_52 = lean::mk_nat_obj(0u); -x_53 = lean::nat_dec_eq(x_45, x_52); -lean::dec(x_45); -if (x_53 == 0) -{ -if (lean::obj_tag(x_51) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; -x_54 = lean::cnstr_get(x_51, 0); -lean::inc(x_54); -lean::dec(x_51); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -return x_56; -} -else -{ -obj* x_57; -lean::dec(x_51); -x_57 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__1; -return x_57; -} -} -else -{ -obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_58 = l_Lean_Parser_detailIdentPartEscaped_HasView; -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::apply_1(x_59, x_51); -x_61 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -return x_61; -} -} -else -{ -obj* x_62; -lean::dec(x_50); -lean::dec(x_45); -lean::dec(x_43); -x_62 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_62; -} -} -} -} -} -} -} -} -else -{ -obj* x_63; -lean::dec(x_11); -lean::dec(x_6); -x_63 = l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2; -return x_63; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentPart_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_detailIdentPart_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_detailIdentPart_HasView_x27; -return x_1; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Lean_isIdEndEscape(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::string_push(x_2, x_10); -x_13 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_12; -x_3 = x_13; -goto _start; -} -else -{ -obj* x_15; -lean::dec(x_7); -x_15 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_15; -} -} -} -else -{ -obj* x_16; -lean::dec(x_1); -x_16 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_16; -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_String_OldIterator_remaining___main(x_3); -x_6 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__3(x_5, x_1, x_3); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_4); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = lean::cnstr_get(x_8, 1); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_10); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint32 x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::free_heap_obj(x_8); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_13, 2); -lean::inc(x_16); -lean::dec(x_13); -x_17 = l_String_splitAux___main___closed__1; -x_18 = lean::unbox_uint32(x_14); -lean::dec(x_14); -x_19 = lean::string_push(x_17, x_18); -x_20 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2(x_19, x_1, x_15, x_11); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -lean::cnstr_set(x_20, 0, x_23); -return x_20; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_24 = lean::cnstr_get(x_20, 0); -x_25 = lean::cnstr_get(x_20, 1); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_20); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_24); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -return x_27; -} -} -else -{ -uint8 x_28; -x_28 = !lean::is_exclusive(x_13); -if (x_28 == 0) -{ -lean::cnstr_set(x_8, 0, x_13); -return x_8; -} -else -{ -obj* x_29; uint8 x_30; obj* x_31; -x_29 = lean::cnstr_get(x_13, 0); -x_30 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -lean::inc(x_29); -lean::dec(x_13); -x_31 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set_scalar(x_31, sizeof(void*)*1, x_30); -lean::cnstr_set(x_8, 0, x_31); -return x_8; -} -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_32 = lean::cnstr_get(x_8, 0); -x_33 = lean::cnstr_get(x_8, 1); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_8); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_32); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; uint32 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_35, 1); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 2); -lean::inc(x_38); -lean::dec(x_35); -x_39 = l_String_splitAux___main___closed__1; -x_40 = lean::unbox_uint32(x_36); -lean::dec(x_36); -x_41 = lean::string_push(x_39, x_40); -x_42 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2(x_41, x_1, x_37, x_33); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_42, 1); -lean::inc(x_44); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - lean::cnstr_release(x_42, 1); - x_45 = x_42; -} else { - lean::dec_ref(x_42); - x_45 = lean::box(0); -} -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_43); -if (lean::is_scalar(x_45)) { - x_47 = lean::alloc_cnstr(0, 2, 0); -} else { - x_47 = x_45; -} -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_44); -return x_47; -} -else -{ -obj* x_48; uint8 x_49; obj* x_50; obj* x_51; obj* x_52; -x_48 = lean::cnstr_get(x_35, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get_scalar(x_35, sizeof(void*)*1); -if (lean::is_exclusive(x_35)) { - lean::cnstr_release(x_35, 0); - x_50 = x_35; -} else { - lean::dec_ref(x_35); - x_50 = lean::box(0); -} -if (lean::is_scalar(x_50)) { - x_51 = lean::alloc_cnstr(1, 1, 1); -} else { - x_51 = x_50; -} -lean::cnstr_set(x_51, 0, x_48); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_49); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_33); -return x_52; -} -} -} -else -{ -uint32 x_53; uint8 x_54; -x_53 = l_String_OldIterator_curr___main(x_2); -x_54 = l_Lean_isIdEndEscape(x_53); -if (x_54 == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_55 = l_String_OldIterator_next___main(x_2); -x_56 = lean::box(0); -x_57 = l_String_splitAux___main___closed__1; -x_58 = lean::string_push(x_57, x_53); -x_59 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2(x_58, x_1, x_55, x_3); -x_60 = !lean::is_exclusive(x_59); -if (x_60 == 0) -{ -obj* x_61; obj* x_62; -x_61 = lean::cnstr_get(x_59, 0); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_61); -lean::cnstr_set(x_59, 0, x_62); -return x_59; -} -else -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_63 = lean::cnstr_get(x_59, 0); -x_64 = lean::cnstr_get(x_59, 1); -lean::inc(x_64); -lean::inc(x_63); -lean::dec(x_59); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_63); -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_64); -return x_66; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; -x_67 = l_Char_quoteCore(x_53); -x_68 = l_Char_HasRepr___closed__1; -x_69 = lean::string_append(x_68, x_67); -lean::dec(x_67); -x_70 = lean::string_append(x_69, x_68); -x_71 = lean::box(0); -x_72 = l_mjoin___rarg___closed__1; -x_73 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_70, x_72, x_71, x_71, x_1, x_2, x_3); -x_74 = !lean::is_exclusive(x_73); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; obj* x_77; obj* x_78; -x_75 = lean::cnstr_get(x_73, 0); -x_76 = lean::cnstr_get(x_73, 1); -x_77 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_78 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_75); -if (lean::obj_tag(x_78) == 0) -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; uint32 x_83; obj* x_84; obj* x_85; uint8 x_86; -lean::free_heap_obj(x_73); -x_79 = lean::cnstr_get(x_78, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_78, 1); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_78, 2); -lean::inc(x_81); -lean::dec(x_78); -x_82 = l_String_splitAux___main___closed__1; -x_83 = lean::unbox_uint32(x_79); -lean::dec(x_79); -x_84 = lean::string_push(x_82, x_83); -x_85 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2(x_84, x_1, x_80, x_76); -x_86 = !lean::is_exclusive(x_85); -if (x_86 == 0) -{ -obj* x_87; obj* x_88; -x_87 = lean::cnstr_get(x_85, 0); -x_88 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_81, x_87); -lean::cnstr_set(x_85, 0, x_88); -return x_85; -} -else -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_89 = lean::cnstr_get(x_85, 0); -x_90 = lean::cnstr_get(x_85, 1); -lean::inc(x_90); -lean::inc(x_89); -lean::dec(x_85); -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_81, x_89); -x_92 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_90); -return x_92; -} -} -else -{ -uint8 x_93; -x_93 = !lean::is_exclusive(x_78); -if (x_93 == 0) -{ -lean::cnstr_set(x_73, 0, x_78); -return x_73; -} -else -{ -obj* x_94; uint8 x_95; obj* x_96; -x_94 = lean::cnstr_get(x_78, 0); -x_95 = lean::cnstr_get_scalar(x_78, sizeof(void*)*1); -lean::inc(x_94); -lean::dec(x_78); -x_96 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_96, 0, x_94); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_95); -lean::cnstr_set(x_73, 0, x_96); -return x_73; -} -} -} -else -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_97 = lean::cnstr_get(x_73, 0); -x_98 = lean::cnstr_get(x_73, 1); -lean::inc(x_98); -lean::inc(x_97); -lean::dec(x_73); -x_99 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_99, x_97); -if (lean::obj_tag(x_100) == 0) -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; uint32 x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -x_103 = lean::cnstr_get(x_100, 2); -lean::inc(x_103); -lean::dec(x_100); -x_104 = l_String_splitAux___main___closed__1; -x_105 = lean::unbox_uint32(x_101); -lean::dec(x_101); -x_106 = lean::string_push(x_104, x_105); -x_107 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2(x_106, x_1, x_102, x_98); -x_108 = lean::cnstr_get(x_107, 0); -lean::inc(x_108); -x_109 = lean::cnstr_get(x_107, 1); -lean::inc(x_109); -if (lean::is_exclusive(x_107)) { - lean::cnstr_release(x_107, 0); - lean::cnstr_release(x_107, 1); - x_110 = x_107; -} else { - lean::dec_ref(x_107); - x_110 = lean::box(0); -} -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_108); -if (lean::is_scalar(x_110)) { - x_112 = lean::alloc_cnstr(0, 2, 0); -} else { - x_112 = x_110; -} -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_109); -return x_112; -} -else -{ -obj* x_113; uint8 x_114; obj* x_115; obj* x_116; obj* x_117; -x_113 = lean::cnstr_get(x_100, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get_scalar(x_100, sizeof(void*)*1); -if (lean::is_exclusive(x_100)) { - lean::cnstr_release(x_100, 0); - x_115 = x_100; -} else { - lean::dec_ref(x_100); - x_115 = lean::box(0); -} -if (lean::is_scalar(x_115)) { - x_116 = lean::alloc_cnstr(1, 1, 1); -} else { - x_116 = x_115; -} -lean::cnstr_set(x_116, 0, x_113); -lean::cnstr_set_scalar(x_116, sizeof(void*)*1, x_114); -x_117 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_117, 0, x_116); -lean::cnstr_set(x_117, 1, x_98); -return x_117; -} -} -} -} -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__5(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_4); -lean::dec(x_1); -x_7 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_2); -lean::cnstr_set(x_8, 1, x_5); -lean::cnstr_set(x_8, 2, x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_6); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_66; obj* x_67; -x_10 = lean::cnstr_get(x_3, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_3, 1); -lean::inc(x_11); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_12 = x_3; -} else { - lean::dec_ref(x_3); - x_12 = lean::box(0); -} -lean::inc(x_4); -x_66 = lean::apply_3(x_10, x_4, x_5, x_6); -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; -x_68 = lean::cnstr_get(x_66, 1); -lean::inc(x_68); -lean::dec(x_66); -x_13 = x_67; -x_14 = x_68; -goto block_65; -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_69; -x_69 = lean::cnstr_get_scalar(x_67, sizeof(void*)*1); -if (x_69 == 0) -{ -obj* x_70; uint8 x_71; -x_70 = lean::cnstr_get(x_66, 1); -lean::inc(x_70); -lean::dec(x_66); -x_71 = !lean::is_exclusive(x_67); -if (x_71 == 0) -{ -uint8 x_72; -x_72 = 0; -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_72); -x_13 = x_67; -x_14 = x_70; -goto block_65; -} -else -{ -obj* x_73; uint8 x_74; obj* x_75; -x_73 = lean::cnstr_get(x_67, 0); -lean::inc(x_73); -lean::dec(x_67); -x_74 = 0; -x_75 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_75, 0, x_73); -lean::cnstr_set_scalar(x_75, sizeof(void*)*1, x_74); -x_13 = x_75; -x_14 = x_70; -goto block_65; -} -} -else -{ -obj* x_76; uint8 x_77; -x_76 = lean::cnstr_get(x_66, 1); -lean::inc(x_76); -lean::dec(x_66); -x_77 = !lean::is_exclusive(x_67); -if (x_77 == 0) -{ -uint8 x_78; -x_78 = 1; -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_78); -x_13 = x_67; -x_14 = x_76; -goto block_65; -} -else -{ -obj* x_79; uint8 x_80; obj* x_81; -x_79 = lean::cnstr_get(x_67, 0); -lean::inc(x_79); -lean::dec(x_67); -x_80 = 1; -x_81 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_81, 0, x_79); -lean::cnstr_set_scalar(x_81, sizeof(void*)*1, x_80); -x_13 = x_81; -x_14 = x_76; -goto block_65; -} -} -} -else -{ -obj* x_82; obj* x_83; -x_82 = lean::cnstr_get(x_67, 0); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_82, 3); -lean::inc(x_83); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; uint8 x_85; -x_84 = lean::cnstr_get(x_66, 1); -lean::inc(x_84); -lean::dec(x_66); -x_85 = !lean::is_exclusive(x_67); -if (x_85 == 0) -{ -uint8 x_86; obj* x_87; uint8 x_88; -x_86 = lean::cnstr_get_scalar(x_67, sizeof(void*)*1); -x_87 = lean::cnstr_get(x_67, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_82); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_89 = lean::cnstr_get(x_82, 3); -lean::dec(x_89); -x_90 = lean::box(3); -lean::inc(x_2); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_2); -x_92 = l_List_reverse___rarg(x_91); -lean::inc(x_1); -x_93 = l_Lean_Parser_Syntax_mkNode(x_1, x_92); -x_94 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_82, 3, x_94); -if (x_86 == 0) -{ -uint8 x_95; -x_95 = 0; -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_95); -x_13 = x_67; -x_14 = x_84; -goto block_65; -} -else -{ -uint8 x_96; -x_96 = 1; -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_96); -x_13 = x_67; -x_14 = x_84; -goto block_65; -} -} -else -{ -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; -x_97 = lean::cnstr_get(x_82, 0); -x_98 = lean::cnstr_get(x_82, 1); -x_99 = lean::cnstr_get(x_82, 2); -lean::inc(x_99); -lean::inc(x_98); -lean::inc(x_97); -lean::dec(x_82); -x_100 = lean::box(3); -lean::inc(x_2); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_2); -x_102 = l_List_reverse___rarg(x_101); -lean::inc(x_1); -x_103 = l_Lean_Parser_Syntax_mkNode(x_1, x_102); -x_104 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_104, 0, x_103); -x_105 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_105, 0, x_97); -lean::cnstr_set(x_105, 1, x_98); -lean::cnstr_set(x_105, 2, x_99); -lean::cnstr_set(x_105, 3, x_104); -if (x_86 == 0) -{ -uint8 x_106; -x_106 = 0; -lean::cnstr_set(x_67, 0, x_105); -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_106); -x_13 = x_67; -x_14 = x_84; -goto block_65; -} -else -{ -uint8 x_107; -x_107 = 1; -lean::cnstr_set(x_67, 0, x_105); -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_107); -x_13 = x_67; -x_14 = x_84; -goto block_65; -} -} -} -else -{ -uint8 x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; -x_108 = lean::cnstr_get_scalar(x_67, sizeof(void*)*1); -lean::dec(x_67); -x_109 = lean::cnstr_get(x_82, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_82, 1); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_82, 2); -lean::inc(x_111); -if (lean::is_exclusive(x_82)) { - lean::cnstr_release(x_82, 0); - lean::cnstr_release(x_82, 1); - lean::cnstr_release(x_82, 2); - lean::cnstr_release(x_82, 3); - x_112 = x_82; -} else { - lean::dec_ref(x_82); - x_112 = lean::box(0); -} -x_113 = lean::box(3); -lean::inc(x_2); -x_114 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_114, 0, x_113); -lean::cnstr_set(x_114, 1, x_2); -x_115 = l_List_reverse___rarg(x_114); -lean::inc(x_1); -x_116 = l_Lean_Parser_Syntax_mkNode(x_1, x_115); -x_117 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_117, 0, x_116); -if (lean::is_scalar(x_112)) { - x_118 = lean::alloc_cnstr(0, 4, 0); -} else { - x_118 = x_112; -} -lean::cnstr_set(x_118, 0, x_109); -lean::cnstr_set(x_118, 1, x_110); -lean::cnstr_set(x_118, 2, x_111); -lean::cnstr_set(x_118, 3, x_117); -if (x_108 == 0) -{ -uint8 x_119; obj* x_120; -x_119 = 0; -x_120 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_120, 0, x_118); -lean::cnstr_set_scalar(x_120, sizeof(void*)*1, x_119); -x_13 = x_120; -x_14 = x_84; -goto block_65; -} -else -{ -uint8 x_121; obj* x_122; -x_121 = 1; -x_122 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_122, 0, x_118); -lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_121); -x_13 = x_122; -x_14 = x_84; -goto block_65; -} -} -} -else -{ -obj* x_123; uint8 x_124; -x_123 = lean::cnstr_get(x_66, 1); -lean::inc(x_123); -lean::dec(x_66); -x_124 = !lean::is_exclusive(x_67); -if (x_124 == 0) -{ -uint8 x_125; obj* x_126; uint8 x_127; -x_125 = lean::cnstr_get_scalar(x_67, sizeof(void*)*1); -x_126 = lean::cnstr_get(x_67, 0); -lean::dec(x_126); -x_127 = !lean::is_exclusive(x_82); -if (x_127 == 0) -{ -obj* x_128; uint8 x_129; -x_128 = lean::cnstr_get(x_82, 3); -lean::dec(x_128); -x_129 = !lean::is_exclusive(x_83); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_130 = lean::cnstr_get(x_83, 0); -lean::inc(x_2); -x_131 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_2); -x_132 = l_List_reverse___rarg(x_131); -lean::inc(x_1); -x_133 = l_Lean_Parser_Syntax_mkNode(x_1, x_132); -lean::cnstr_set(x_83, 0, x_133); -if (x_125 == 0) -{ -uint8 x_134; -x_134 = 0; -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_134); -x_13 = x_67; -x_14 = x_123; -goto block_65; -} -else -{ -uint8 x_135; -x_135 = 1; -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_135); -x_13 = x_67; -x_14 = x_123; -goto block_65; -} -} -else -{ -obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; -x_136 = lean::cnstr_get(x_83, 0); -lean::inc(x_136); -lean::dec(x_83); -lean::inc(x_2); -x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_136); -lean::cnstr_set(x_137, 1, x_2); -x_138 = l_List_reverse___rarg(x_137); -lean::inc(x_1); -x_139 = l_Lean_Parser_Syntax_mkNode(x_1, x_138); -x_140 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_140, 0, x_139); -lean::cnstr_set(x_82, 3, x_140); -if (x_125 == 0) -{ -uint8 x_141; -x_141 = 0; -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_141); -x_13 = x_67; -x_14 = x_123; -goto block_65; -} -else -{ -uint8 x_142; -x_142 = 1; -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_142); -x_13 = x_67; -x_14 = x_123; -goto block_65; -} -} -} -else -{ -obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_143 = lean::cnstr_get(x_82, 0); -x_144 = lean::cnstr_get(x_82, 1); -x_145 = lean::cnstr_get(x_82, 2); -lean::inc(x_145); -lean::inc(x_144); -lean::inc(x_143); -lean::dec(x_82); -x_146 = lean::cnstr_get(x_83, 0); -lean::inc(x_146); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - x_147 = x_83; -} else { - lean::dec_ref(x_83); - x_147 = lean::box(0); -} -lean::inc(x_2); -x_148 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_148, 0, x_146); -lean::cnstr_set(x_148, 1, x_2); -x_149 = l_List_reverse___rarg(x_148); -lean::inc(x_1); -x_150 = l_Lean_Parser_Syntax_mkNode(x_1, x_149); -if (lean::is_scalar(x_147)) { - x_151 = lean::alloc_cnstr(1, 1, 0); -} else { - x_151 = x_147; -} -lean::cnstr_set(x_151, 0, x_150); -x_152 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_152, 0, x_143); -lean::cnstr_set(x_152, 1, x_144); -lean::cnstr_set(x_152, 2, x_145); -lean::cnstr_set(x_152, 3, x_151); -if (x_125 == 0) -{ -uint8 x_153; -x_153 = 0; -lean::cnstr_set(x_67, 0, x_152); -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_153); -x_13 = x_67; -x_14 = x_123; -goto block_65; -} -else -{ -uint8 x_154; -x_154 = 1; -lean::cnstr_set(x_67, 0, x_152); -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_154); -x_13 = x_67; -x_14 = x_123; -goto block_65; -} -} -} -else -{ -uint8 x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; -x_155 = lean::cnstr_get_scalar(x_67, sizeof(void*)*1); -lean::dec(x_67); -x_156 = lean::cnstr_get(x_82, 0); -lean::inc(x_156); -x_157 = lean::cnstr_get(x_82, 1); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_82, 2); -lean::inc(x_158); -if (lean::is_exclusive(x_82)) { - lean::cnstr_release(x_82, 0); - lean::cnstr_release(x_82, 1); - lean::cnstr_release(x_82, 2); - lean::cnstr_release(x_82, 3); - x_159 = x_82; -} else { - lean::dec_ref(x_82); - x_159 = lean::box(0); -} -x_160 = lean::cnstr_get(x_83, 0); -lean::inc(x_160); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - x_161 = x_83; -} else { - lean::dec_ref(x_83); - x_161 = lean::box(0); -} -lean::inc(x_2); -x_162 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_162, 0, x_160); -lean::cnstr_set(x_162, 1, x_2); -x_163 = l_List_reverse___rarg(x_162); -lean::inc(x_1); -x_164 = l_Lean_Parser_Syntax_mkNode(x_1, x_163); -if (lean::is_scalar(x_161)) { - x_165 = lean::alloc_cnstr(1, 1, 0); -} else { - x_165 = x_161; -} -lean::cnstr_set(x_165, 0, x_164); -if (lean::is_scalar(x_159)) { - x_166 = lean::alloc_cnstr(0, 4, 0); -} else { - x_166 = x_159; -} -lean::cnstr_set(x_166, 0, x_156); -lean::cnstr_set(x_166, 1, x_157); -lean::cnstr_set(x_166, 2, x_158); -lean::cnstr_set(x_166, 3, x_165); -if (x_155 == 0) -{ -uint8 x_167; obj* x_168; -x_167 = 0; -x_168 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_168, 0, x_166); -lean::cnstr_set_scalar(x_168, sizeof(void*)*1, x_167); -x_13 = x_168; -x_14 = x_123; -goto block_65; -} -else -{ -uint8 x_169; obj* x_170; -x_169 = 1; -x_170 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_170, 0, x_166); -lean::cnstr_set_scalar(x_170, sizeof(void*)*1, x_169); -x_13 = x_170; -x_14 = x_123; -goto block_65; -} -} -} -} -} -block_65: -{ -if (lean::obj_tag(x_13) == 0) -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_13, 2); -if (lean::is_scalar(x_12)) { - x_18 = lean::alloc_cnstr(1, 2, 0); -} else { - x_18 = x_12; -} -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_2); -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_13, 2, x_19); -lean::cnstr_set(x_13, 0, x_18); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_13); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; uint8 x_25; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_20, 2); -lean::inc(x_23); -lean::dec(x_20); -x_24 = l_List_mfoldl___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__5(x_1, x_21, x_11, x_4, x_22, x_14); -x_25 = !lean::is_exclusive(x_24); -if (x_25 == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::cnstr_get(x_24, 0); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_26); -lean::cnstr_set(x_24, 0, x_27); -return x_24; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::cnstr_get(x_24, 0); -x_29 = lean::cnstr_get(x_24, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_24); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_28); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_29); -return x_31; -} -} -else -{ -uint8 x_32; -lean::dec(x_11); -lean::dec(x_4); -lean::dec(x_1); -x_32 = !lean::is_exclusive(x_20); -if (x_32 == 0) -{ -obj* x_33; -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_20); -lean::cnstr_set(x_33, 1, x_14); -return x_33; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; obj* x_37; -x_34 = lean::cnstr_get(x_20, 0); -x_35 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_20); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_14); -return x_37; -} -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_38 = lean::cnstr_get(x_13, 0); -x_39 = lean::cnstr_get(x_13, 1); -x_40 = lean::cnstr_get(x_13, 2); -lean::inc(x_40); -lean::inc(x_39); -lean::inc(x_38); -lean::dec(x_13); -if (lean::is_scalar(x_12)) { - x_41 = lean::alloc_cnstr(1, 2, 0); -} else { - x_41 = x_12; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set(x_41, 1, x_2); -x_42 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_39); -lean::cnstr_set(x_43, 2, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_43); -if (lean::obj_tag(x_44) == 0) -{ -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; -x_45 = lean::cnstr_get(x_44, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_44, 1); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_44, 2); -lean::inc(x_47); -lean::dec(x_44); -x_48 = l_List_mfoldl___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__5(x_1, x_45, x_11, x_4, x_46, x_14); -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_48, 1); -lean::inc(x_50); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_51 = x_48; -} else { - lean::dec_ref(x_48); - x_51 = lean::box(0); -} -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_47, x_49); -if (lean::is_scalar(x_51)) { - x_53 = lean::alloc_cnstr(0, 2, 0); -} else { - x_53 = x_51; -} -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_50); -return x_53; -} -else -{ -obj* x_54; uint8 x_55; obj* x_56; obj* x_57; obj* x_58; -lean::dec(x_11); -lean::dec(x_4); -lean::dec(x_1); -x_54 = lean::cnstr_get(x_44, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_56 = x_44; -} else { - lean::dec_ref(x_44); - x_56 = lean::box(0); -} -if (lean::is_scalar(x_56)) { - x_57 = lean::alloc_cnstr(1, 1, 1); -} else { - x_57 = x_56; -} -lean::cnstr_set(x_57, 0, x_54); -lean::cnstr_set_scalar(x_57, sizeof(void*)*1, x_55); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_14); -return x_58; -} -} -} -else -{ -uint8 x_59; -lean::dec(x_12); -lean::dec(x_11); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_59 = !lean::is_exclusive(x_13); -if (x_59 == 0) -{ -obj* x_60; -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_13); -lean::cnstr_set(x_60, 1, x_14); -return x_60; -} -else -{ -obj* x_61; uint8 x_62; obj* x_63; obj* x_64; -x_61 = lean::cnstr_get(x_13, 0); -x_62 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -lean::inc(x_61); -lean::dec(x_13); -x_63 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_63, 0, x_61); -lean::cnstr_set_scalar(x_63, sizeof(void*)*1, x_62); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_14); -return x_64; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(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; -x_6 = lean::box(0); -lean::inc(x_1); -x_7 = l_List_mfoldl___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__5(x_1, x_6, x_2, x_3, x_4, x_5); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_8, 2); -x_14 = l_List_reverse___rarg(x_12); -x_15 = l_Lean_Parser_Syntax_mkNode(x_1, x_14); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_16); -lean::cnstr_set(x_8, 0, x_15); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_8); -lean::cnstr_set(x_7, 0, x_17); -return x_7; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_18 = lean::cnstr_get(x_8, 0); -x_19 = lean::cnstr_get(x_8, 1); -x_20 = lean::cnstr_get(x_8, 2); -lean::inc(x_20); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_8); -x_21 = l_List_reverse___rarg(x_18); -x_22 = l_Lean_Parser_Syntax_mkNode(x_1, x_21); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_19); -lean::cnstr_set(x_24, 2, x_23); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_24); -lean::cnstr_set(x_7, 0, x_25); -return x_7; -} -} -else -{ -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; -x_26 = lean::cnstr_get(x_7, 1); -lean::inc(x_26); -lean::dec(x_7); -x_27 = lean::cnstr_get(x_8, 0); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_8, 1); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_8, 2); -lean::inc(x_29); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_30 = x_8; -} else { - lean::dec_ref(x_8); - x_30 = lean::box(0); -} -x_31 = l_List_reverse___rarg(x_27); -x_32 = l_Lean_Parser_Syntax_mkNode(x_1, x_31); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_30)) { - x_34 = lean::alloc_cnstr(0, 3, 0); -} else { - x_34 = x_30; -} -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_28); -lean::cnstr_set(x_34, 2, x_33); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_34); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_26); -return x_36; -} -} -else -{ -uint8 x_37; -lean::dec(x_1); -x_37 = !lean::is_exclusive(x_7); -if (x_37 == 0) -{ -obj* x_38; uint8 x_39; -x_38 = lean::cnstr_get(x_7, 0); -lean::dec(x_38); -x_39 = !lean::is_exclusive(x_8); -if (x_39 == 0) -{ -return x_7; -} -else -{ -obj* x_40; uint8 x_41; obj* x_42; -x_40 = lean::cnstr_get(x_8, 0); -x_41 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_40); -lean::dec(x_8); -x_42 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_41); -lean::cnstr_set(x_7, 0, x_42); -return x_7; -} -} -else -{ -obj* x_43; obj* x_44; uint8 x_45; obj* x_46; obj* x_47; obj* x_48; -x_43 = lean::cnstr_get(x_7, 1); -lean::inc(x_43); -lean::dec(x_7); -x_44 = lean::cnstr_get(x_8, 0); -lean::inc(x_44); -x_45 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_46 = x_8; -} else { - lean::dec_ref(x_8); - x_46 = lean::box(0); -} -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(1, 1, 1); -} else { - x_47 = x_46; -} -lean::cnstr_set(x_47, 0, x_44); -lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_45); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_43); -return x_48; -} -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__7(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Lean_isIdRest(x_10); -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::string_push(x_2, x_10); -x_14 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_13; -x_3 = x_14; -goto _start; -} -} -} -else -{ -obj* x_16; -lean::dec(x_1); -x_16 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_16; -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = l_String_OldIterator_remaining___main(x_1); -x_4 = l_String_splitAux___main___closed__1; -x_5 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__7(x_3, x_4, x_1); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_2); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_2); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_Combinators_choiceAux___main___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_7, x_8, x_6, x_6, x_3, x_4, x_5); -lean::dec(x_3); -return x_9; -} -else -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_1); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_1, 0); -x_12 = lean::cnstr_get(x_1, 1); -x_13 = lean::mk_nat_obj(1u); -x_14 = lean::nat_add(x_2, x_13); -lean::inc(x_4); -lean::inc(x_3); -x_15 = lean::apply_3(x_11, x_3, x_4, x_5); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -uint8 x_17; -x_17 = !lean::is_exclusive(x_15); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; uint8 x_20; -x_18 = lean::cnstr_get(x_15, 1); -x_19 = lean::cnstr_get(x_15, 0); -lean::dec(x_19); -x_20 = !lean::is_exclusive(x_16); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_21 = lean::cnstr_get(x_16, 0); -x_22 = lean::cnstr_get(x_16, 2); -x_23 = lean::box(0); -x_24 = lean_name_mk_numeral(x_23, x_2); -x_25 = lean::box(0); -lean::cnstr_set(x_1, 1, x_25); -lean::cnstr_set(x_1, 0, x_21); -x_26 = l_Lean_Parser_Syntax_mkNode(x_24, x_1); -x_27 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_16, 2, x_27); -lean::cnstr_set(x_16, 0, x_26); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_16); -if (lean::obj_tag(x_28) == 0) -{ -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_15, 0, x_28); -return x_15; -} -else -{ -uint8 x_29; -x_29 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; uint8 x_32; -lean::free_heap_obj(x_15); -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -lean::dec(x_28); -x_31 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8(x_12, x_14, x_3, x_4, x_18); -x_32 = !lean::is_exclusive(x_31); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -x_34 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_30, x_33); -lean::cnstr_set(x_31, 0, x_34); -return x_31; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_31, 0); -x_36 = lean::cnstr_get(x_31, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_31); -x_37 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_30, x_35); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_36); -return x_38; -} -} -else -{ -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_15, 0, x_28); -return x_15; -} -} -} -else -{ -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; -x_39 = lean::cnstr_get(x_16, 0); -x_40 = lean::cnstr_get(x_16, 1); -x_41 = lean::cnstr_get(x_16, 2); -lean::inc(x_41); -lean::inc(x_40); -lean::inc(x_39); -lean::dec(x_16); -x_42 = lean::box(0); -x_43 = lean_name_mk_numeral(x_42, x_2); -x_44 = lean::box(0); -lean::cnstr_set(x_1, 1, x_44); -lean::cnstr_set(x_1, 0, x_39); -x_45 = l_Lean_Parser_Syntax_mkNode(x_43, x_1); -x_46 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_47 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_40); -lean::cnstr_set(x_47, 2, x_46); -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_47); -if (lean::obj_tag(x_48) == 0) -{ -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_15, 0, x_48); -return x_15; -} -else -{ -uint8 x_49; -x_49 = lean::cnstr_get_scalar(x_48, sizeof(void*)*1); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -lean::free_heap_obj(x_15); -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -lean::dec(x_48); -x_51 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8(x_12, x_14, x_3, x_4, x_18); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_51, 1); -lean::inc(x_53); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - lean::cnstr_release(x_51, 1); - x_54 = x_51; -} else { - lean::dec_ref(x_51); - x_54 = lean::box(0); -} -x_55 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_50, x_52); -if (lean::is_scalar(x_54)) { - x_56 = lean::alloc_cnstr(0, 2, 0); -} else { - x_56 = x_54; -} -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_53); -return x_56; -} -else -{ -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_3); -lean::cnstr_set(x_15, 0, x_48); -return x_15; -} -} -} -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_57 = lean::cnstr_get(x_15, 1); -lean::inc(x_57); -lean::dec(x_15); -x_58 = lean::cnstr_get(x_16, 0); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_16, 1); -lean::inc(x_59); -x_60 = lean::cnstr_get(x_16, 2); -lean::inc(x_60); -if (lean::is_exclusive(x_16)) { - lean::cnstr_release(x_16, 0); - lean::cnstr_release(x_16, 1); - lean::cnstr_release(x_16, 2); - x_61 = x_16; -} else { - lean::dec_ref(x_16); - x_61 = lean::box(0); -} -x_62 = lean::box(0); -x_63 = lean_name_mk_numeral(x_62, x_2); -x_64 = lean::box(0); -lean::cnstr_set(x_1, 1, x_64); -lean::cnstr_set(x_1, 0, x_58); -x_65 = l_Lean_Parser_Syntax_mkNode(x_63, x_1); -x_66 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_61)) { - x_67 = lean::alloc_cnstr(0, 3, 0); -} else { - x_67 = x_61; -} -lean::cnstr_set(x_67, 0, x_65); -lean::cnstr_set(x_67, 1, x_59); -lean::cnstr_set(x_67, 2, x_66); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_60, x_67); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_3); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_57); -return x_69; -} -else -{ -uint8 x_70; -x_70 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -if (x_70 == 0) -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_71 = lean::cnstr_get(x_68, 0); -lean::inc(x_71); -lean::dec(x_68); -x_72 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8(x_12, x_14, x_3, x_4, x_57); -x_73 = lean::cnstr_get(x_72, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_72, 1); -lean::inc(x_74); -if (lean::is_exclusive(x_72)) { - lean::cnstr_release(x_72, 0); - lean::cnstr_release(x_72, 1); - x_75 = x_72; -} else { - lean::dec_ref(x_72); - x_75 = lean::box(0); -} -x_76 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_71, x_73); -if (lean::is_scalar(x_75)) { - x_77 = lean::alloc_cnstr(0, 2, 0); -} else { - x_77 = x_75; -} -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_74); -return x_77; -} -else -{ -obj* x_78; -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_3); -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_68); -lean::cnstr_set(x_78, 1, x_57); -return x_78; -} -} -} -} -else -{ -uint8 x_79; -lean::free_heap_obj(x_1); -lean::dec(x_2); -x_79 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); -if (x_79 == 0) -{ -obj* x_80; obj* x_81; obj* x_82; uint8 x_83; -x_80 = lean::cnstr_get(x_15, 1); -lean::inc(x_80); -lean::dec(x_15); -x_81 = lean::cnstr_get(x_16, 0); -lean::inc(x_81); -lean::dec(x_16); -x_82 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8(x_12, x_14, x_3, x_4, x_80); -x_83 = !lean::is_exclusive(x_82); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; -x_84 = lean::cnstr_get(x_82, 0); -x_85 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_81, x_84); -lean::cnstr_set(x_82, 0, x_85); -return x_82; -} -else -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; -x_86 = lean::cnstr_get(x_82, 0); -x_87 = lean::cnstr_get(x_82, 1); -lean::inc(x_87); -lean::inc(x_86); -lean::dec(x_82); -x_88 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_81, x_86); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_87); -return x_89; -} -} -else -{ -uint8 x_90; -lean::dec(x_14); -lean::dec(x_12); -lean::dec(x_4); -lean::dec(x_3); -x_90 = !lean::is_exclusive(x_15); -if (x_90 == 0) -{ -obj* x_91; uint8 x_92; -x_91 = lean::cnstr_get(x_15, 0); -lean::dec(x_91); -x_92 = !lean::is_exclusive(x_16); -if (x_92 == 0) -{ -return x_15; -} -else -{ -obj* x_93; obj* x_94; -x_93 = lean::cnstr_get(x_16, 0); -lean::inc(x_93); -lean::dec(x_16); -x_94 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_79); -lean::cnstr_set(x_15, 0, x_94); -return x_15; -} -} -else -{ -obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -x_95 = lean::cnstr_get(x_15, 1); -lean::inc(x_95); -lean::dec(x_15); -x_96 = lean::cnstr_get(x_16, 0); -lean::inc(x_96); -if (lean::is_exclusive(x_16)) { - lean::cnstr_release(x_16, 0); - x_97 = x_16; -} else { - lean::dec_ref(x_16); - x_97 = lean::box(0); -} -if (lean::is_scalar(x_97)) { - x_98 = lean::alloc_cnstr(1, 1, 1); -} else { - x_98 = x_97; -} -lean::cnstr_set(x_98, 0, x_96); -lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_79); -x_99 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_95); -return x_99; -} -} -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; -x_100 = lean::cnstr_get(x_1, 0); -x_101 = lean::cnstr_get(x_1, 1); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_1); -x_102 = lean::mk_nat_obj(1u); -x_103 = lean::nat_add(x_2, x_102); -lean::inc(x_4); -lean::inc(x_3); -x_104 = lean::apply_3(x_100, x_3, x_4, x_5); -x_105 = lean::cnstr_get(x_104, 0); -lean::inc(x_105); -if (lean::obj_tag(x_105) == 0) -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_106 = lean::cnstr_get(x_104, 1); -lean::inc(x_106); -if (lean::is_exclusive(x_104)) { - lean::cnstr_release(x_104, 0); - lean::cnstr_release(x_104, 1); - x_107 = x_104; -} else { - lean::dec_ref(x_104); - x_107 = lean::box(0); -} -x_108 = lean::cnstr_get(x_105, 0); -lean::inc(x_108); -x_109 = lean::cnstr_get(x_105, 1); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_105, 2); -lean::inc(x_110); -if (lean::is_exclusive(x_105)) { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - lean::cnstr_release(x_105, 2); - x_111 = x_105; -} else { - lean::dec_ref(x_105); - x_111 = lean::box(0); -} -x_112 = lean::box(0); -x_113 = lean_name_mk_numeral(x_112, x_2); -x_114 = lean::box(0); -x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_108); -lean::cnstr_set(x_115, 1, x_114); -x_116 = l_Lean_Parser_Syntax_mkNode(x_113, x_115); -x_117 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_111)) { - x_118 = lean::alloc_cnstr(0, 3, 0); -} else { - x_118 = x_111; -} -lean::cnstr_set(x_118, 0, x_116); -lean::cnstr_set(x_118, 1, x_109); -lean::cnstr_set(x_118, 2, x_117); -x_119 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_110, x_118); -if (lean::obj_tag(x_119) == 0) -{ -obj* x_120; -lean::dec(x_103); -lean::dec(x_101); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_107)) { - x_120 = lean::alloc_cnstr(0, 2, 0); -} else { - x_120 = x_107; -} -lean::cnstr_set(x_120, 0, x_119); -lean::cnstr_set(x_120, 1, x_106); -return x_120; -} -else -{ -uint8 x_121; -x_121 = lean::cnstr_get_scalar(x_119, sizeof(void*)*1); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; -lean::dec(x_107); -x_122 = lean::cnstr_get(x_119, 0); -lean::inc(x_122); -lean::dec(x_119); -x_123 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8(x_101, x_103, x_3, x_4, x_106); -x_124 = lean::cnstr_get(x_123, 0); -lean::inc(x_124); -x_125 = lean::cnstr_get(x_123, 1); -lean::inc(x_125); -if (lean::is_exclusive(x_123)) { - lean::cnstr_release(x_123, 0); - lean::cnstr_release(x_123, 1); - x_126 = x_123; -} else { - lean::dec_ref(x_123); - x_126 = lean::box(0); -} -x_127 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_122, x_124); -if (lean::is_scalar(x_126)) { - x_128 = lean::alloc_cnstr(0, 2, 0); -} else { - x_128 = x_126; -} -lean::cnstr_set(x_128, 0, x_127); -lean::cnstr_set(x_128, 1, x_125); -return x_128; -} -else -{ -obj* x_129; -lean::dec(x_103); -lean::dec(x_101); -lean::dec(x_4); -lean::dec(x_3); -if (lean::is_scalar(x_107)) { - x_129 = lean::alloc_cnstr(0, 2, 0); -} else { - x_129 = x_107; -} -lean::cnstr_set(x_129, 0, x_119); -lean::cnstr_set(x_129, 1, x_106); -return x_129; -} -} -} -else -{ -uint8 x_130; -lean::dec(x_2); -x_130 = lean::cnstr_get_scalar(x_105, sizeof(void*)*1); -if (x_130 == 0) -{ -obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; -x_131 = lean::cnstr_get(x_104, 1); -lean::inc(x_131); -lean::dec(x_104); -x_132 = lean::cnstr_get(x_105, 0); -lean::inc(x_132); -lean::dec(x_105); -x_133 = l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8(x_101, x_103, x_3, x_4, x_131); -x_134 = lean::cnstr_get(x_133, 0); -lean::inc(x_134); -x_135 = lean::cnstr_get(x_133, 1); -lean::inc(x_135); -if (lean::is_exclusive(x_133)) { - lean::cnstr_release(x_133, 0); - lean::cnstr_release(x_133, 1); - x_136 = x_133; -} else { - lean::dec_ref(x_133); - x_136 = lean::box(0); -} -x_137 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_132, x_134); -if (lean::is_scalar(x_136)) { - x_138 = lean::alloc_cnstr(0, 2, 0); -} else { - x_138 = x_136; -} -lean::cnstr_set(x_138, 0, x_137); -lean::cnstr_set(x_138, 1, x_135); -return x_138; -} -else -{ -obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; -lean::dec(x_103); -lean::dec(x_101); -lean::dec(x_4); -lean::dec(x_3); -x_139 = lean::cnstr_get(x_104, 1); -lean::inc(x_139); -if (lean::is_exclusive(x_104)) { - lean::cnstr_release(x_104, 0); - lean::cnstr_release(x_104, 1); - x_140 = x_104; -} else { - lean::dec_ref(x_104); - x_140 = lean::box(0); -} -x_141 = lean::cnstr_get(x_105, 0); -lean::inc(x_141); -if (lean::is_exclusive(x_105)) { - lean::cnstr_release(x_105, 0); - x_142 = x_105; -} else { - lean::dec_ref(x_105); - x_142 = lean::box(0); -} -if (lean::is_scalar(x_142)) { - x_143 = lean::alloc_cnstr(1, 1, 1); -} else { - x_143 = x_142; -} -lean::cnstr_set(x_143, 0, x_141); -lean::cnstr_set_scalar(x_143, sizeof(void*)*1, x_130); -if (lean::is_scalar(x_140)) { - x_144 = lean::alloc_cnstr(0, 2, 0); -} else { - x_144 = x_140; -} -lean::cnstr_set(x_144, 0, x_143); -lean::cnstr_set(x_144, 1, x_139); -return x_144; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_1); -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_2); -x_4 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -lean::dec(x_4); -x_6 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_2); -lean::dec(x_2); -lean::dec(x_5); -x_7 = l_Lean_Parser_tokens___rarg(x_6); -lean::dec(x_6); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_7, x_1); -lean::dec(x_7); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__2(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -x_7 = l_Lean_Parser_MonadParsec_strCore___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__3(x_1, x_2, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_12 = lean::cnstr_get(x_8, 1); -x_13 = lean::cnstr_get(x_8, 2); -x_14 = lean::cnstr_get(x_8, 0); -lean::dec(x_14); -lean::inc(x_12); -x_15 = l_Lean_Parser_mkRawRes(x_3, x_12); -x_16 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_8, 2, x_16); -lean::cnstr_set(x_8, 0, x_15); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_8); -lean::cnstr_set(x_7, 0, x_17); -return x_7; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::cnstr_get(x_8, 1); -x_19 = lean::cnstr_get(x_8, 2); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_8); -lean::inc(x_18); -x_20 = l_Lean_Parser_mkRawRes(x_3, x_18); -x_21 = l_Lean_Parser_finishCommentBlock___closed__2; -x_22 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_18); -lean::cnstr_set(x_22, 2, x_21); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_22); -lean::cnstr_set(x_7, 0, x_23); -return x_7; -} -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_24 = lean::cnstr_get(x_7, 1); -lean::inc(x_24); -lean::dec(x_7); -x_25 = lean::cnstr_get(x_8, 1); -lean::inc(x_25); -x_26 = lean::cnstr_get(x_8, 2); -lean::inc(x_26); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_27 = x_8; -} else { - lean::dec_ref(x_8); - x_27 = lean::box(0); -} -lean::inc(x_25); -x_28 = l_Lean_Parser_mkRawRes(x_3, x_25); -x_29 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_27)) { - x_30 = lean::alloc_cnstr(0, 3, 0); -} else { - x_30 = x_27; -} -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_25); -lean::cnstr_set(x_30, 2, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_24); -return x_32; -} -} -else -{ -uint8 x_33; -lean::dec(x_3); -x_33 = !lean::is_exclusive(x_7); -if (x_33 == 0) -{ -obj* x_34; uint8 x_35; -x_34 = lean::cnstr_get(x_7, 0); -lean::dec(x_34); -x_35 = !lean::is_exclusive(x_8); -if (x_35 == 0) -{ -return x_7; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; -x_36 = lean::cnstr_get(x_8, 0); -x_37 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_8); -x_38 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_37); -lean::cnstr_set(x_7, 0, x_38); -return x_7; -} -} -else -{ -obj* x_39; obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_44; -x_39 = lean::cnstr_get(x_7, 1); -lean::inc(x_39); -lean::dec(x_7); -x_40 = lean::cnstr_get(x_8, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_42 = x_8; -} else { - lean::dec_ref(x_8); - x_42 = lean::box(0); -} -if (lean::is_scalar(x_42)) { - x_43 = lean::alloc_cnstr(1, 1, 1); -} else { - x_43 = x_42; -} -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_41); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_39); -return x_44; -} -} -} -} -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__1(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_6, 1); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -lean::inc(x_10); -x_13 = l_Lean_Parser_mkRawRes(x_1, x_10); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_14); -lean::cnstr_set(x_6, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -lean::cnstr_set(x_5, 0, x_15); -return x_5; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_6, 1); -x_17 = lean::cnstr_get(x_6, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_6); -lean::inc(x_16); -x_18 = l_Lean_Parser_mkRawRes(x_1, x_16); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -lean::cnstr_set(x_5, 0, x_21); -return x_5; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_5, 1); -lean::inc(x_22); -lean::dec(x_5); -x_23 = lean::cnstr_get(x_6, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_6, 2); -lean::inc(x_24); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_25 = x_6; -} else { - lean::dec_ref(x_6); - x_25 = lean::box(0); -} -lean::inc(x_23); -x_26 = l_Lean_Parser_mkRawRes(x_1, x_23); -x_27 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_25)) { - x_28 = lean::alloc_cnstr(0, 3, 0); -} else { - x_28 = x_25; -} -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_22); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_5); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_5, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_6); -if (x_33 == 0) -{ -return x_5; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_6, 0); -x_35 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_6); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_38 = lean::cnstr_get(x_6, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_40 = x_6; -} else { - lean::dec_ref(x_6); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; uint8 x_29; -x_29 = l_String_OldIterator_hasNext___main(x_3); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_30 = lean::box(0); -x_31 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_32 = l_mjoin___rarg___closed__1; -x_33 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_31, x_32, x_30, x_30, x_2, x_3, x_4); -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_33, 1); -lean::inc(x_35); -lean::dec(x_33); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_34); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_37, 2); -lean::inc(x_39); -lean::dec(x_37); -x_40 = l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6___rarg(x_38, x_35); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -lean::dec(x_40); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_41); -x_5 = x_43; -x_6 = x_42; -goto block_28; -} -else -{ -uint8 x_44; -x_44 = !lean::is_exclusive(x_37); -if (x_44 == 0) -{ -x_5 = x_37; -x_6 = x_35; -goto block_28; -} -else -{ -obj* x_45; uint8 x_46; obj* x_47; -x_45 = lean::cnstr_get(x_37, 0); -x_46 = lean::cnstr_get_scalar(x_37, sizeof(void*)*1); -lean::inc(x_45); -lean::dec(x_37); -x_47 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_46); -x_5 = x_47; -x_6 = x_35; -goto block_28; -} -} -} -else -{ -uint32 x_48; uint8 x_49; -x_48 = l_String_OldIterator_curr___main(x_3); -x_49 = l_Lean_isIdFirst(x_48); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_50 = l_Char_quoteCore(x_48); -x_51 = l_Char_HasRepr___closed__1; -x_52 = lean::string_append(x_51, x_50); -lean::dec(x_50); -x_53 = lean::string_append(x_52, x_51); -x_54 = lean::box(0); -x_55 = l_mjoin___rarg___closed__1; -x_56 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_53, x_55, x_54, x_54, x_2, x_3, x_4); -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -lean::dec(x_56); -x_59 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_57); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_61 = lean::cnstr_get(x_60, 1); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_60, 2); -lean::inc(x_62); -lean::dec(x_60); -x_63 = l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6___rarg(x_61, x_58); -x_64 = lean::cnstr_get(x_63, 0); -lean::inc(x_64); -x_65 = lean::cnstr_get(x_63, 1); -lean::inc(x_65); -lean::dec(x_63); -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_64); -x_5 = x_66; -x_6 = x_65; -goto block_28; -} -else -{ -uint8 x_67; -x_67 = !lean::is_exclusive(x_60); -if (x_67 == 0) -{ -x_5 = x_60; -x_6 = x_58; -goto block_28; -} -else -{ -obj* x_68; uint8 x_69; obj* x_70; -x_68 = lean::cnstr_get(x_60, 0); -x_69 = lean::cnstr_get_scalar(x_60, sizeof(void*)*1); -lean::inc(x_68); -lean::dec(x_60); -x_70 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_70, 0, x_68); -lean::cnstr_set_scalar(x_70, sizeof(void*)*1, x_69); -x_5 = x_70; -x_6 = x_58; -goto block_28; -} -} -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_71 = l_String_OldIterator_next___main(x_3); -x_72 = lean::box(0); -x_73 = l_Lean_Parser_MonadParsec_takeWhile___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__6___rarg(x_71, x_4); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -lean::dec(x_73); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_74); -x_5 = x_76; -x_6 = x_75; -goto block_28; -} -} -block_28: -{ -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 2); -x_10 = lean::cnstr_get(x_5, 0); -lean::dec(x_10); -lean::inc(x_8); -x_11 = l_Lean_Parser_mkRawRes(x_1, x_8); -x_12 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_5, 2, x_12); -lean::cnstr_set(x_5, 0, x_11); -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_5); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_6); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_15 = lean::cnstr_get(x_5, 1); -x_16 = lean::cnstr_get(x_5, 2); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_5); -lean::inc(x_15); -x_17 = l_Lean_Parser_mkRawRes(x_1, x_15); -x_18 = l_Lean_Parser_finishCommentBlock___closed__2; -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_15); -lean::cnstr_set(x_19, 2, x_18); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_19); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_6); -return x_21; -} -} -else -{ -uint8 x_22; -lean::dec(x_1); -x_22 = !lean::is_exclusive(x_5); -if (x_22 == 0) -{ -obj* x_23; -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_5); -lean::cnstr_set(x_23, 1, x_6); -return x_23; -} -else -{ -obj* x_24; uint8 x_25; obj* x_26; obj* x_27; -x_24 = lean::cnstr_get(x_5, 0); -x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_24); -lean::dec(x_5); -x_26 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_25); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_6); -return x_27; -} -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; uint32 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; uint32 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_1 = lean::mk_string(""); -x_2 = l_Lean_idBeginEscape; -lean::inc(x_1); -x_3 = lean::string_push(x_1, x_2); -lean::inc(x_3); -x_4 = l_String_quote(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1___boxed), 6, 2); -lean::closure_set(x_8, 0, x_3); -lean::closure_set(x_8, 1, x_5); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__2___boxed), 4, 0); -lean::inc(x_7); -x_11 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_11, 0, x_7); -lean::closure_set(x_11, 1, x_10); -x_12 = l_Lean_idEndEscape; -x_13 = lean::string_push(x_1, x_12); -lean::inc(x_13); -x_14 = l_String_quote(x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1___boxed), 6, 2); -lean::closure_set(x_16, 0, x_13); -lean::closure_set(x_16, 1, x_15); -lean::inc(x_7); -x_17 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_17, 0, x_7); -lean::closure_set(x_17, 1, x_16); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_11); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_9); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_detailIdentPartEscaped; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4), 5, 2); -lean::closure_set(x_23, 0, x_22); -lean::closure_set(x_23, 1, x_21); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__3___boxed), 4, 0); -x_25 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_25, 0, x_7); -lean::closure_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_18); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8), 5, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_18); -x_31 = l_Lean_Parser_BasicParserM_Monad; -x_32 = l_Lean_Parser_BasicParserM_MonadExcept; -x_33 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_34 = l_Lean_Parser_BasicParserM_Alternative; -x_35 = l_Lean_Parser_detailIdentPart; -x_36 = l_Lean_Parser_detailIdentPart_HasView; -x_37 = l_Lean_Parser_Combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_35, x_30, x_36); -lean::dec(x_30); -return x_37; -} -} -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -return x_7; -} -} -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__2(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__3(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Parser_detailIdentPart_Parser___closed__1() { -_start: -{ -obj* x_1; uint32 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; uint32 x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_1 = lean::mk_string(""); -x_2 = l_Lean_idBeginEscape; -lean::inc(x_1); -x_3 = lean::string_push(x_1, x_2); -lean::inc(x_3); -x_4 = l_String_quote(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1___boxed), 6, 2); -lean::closure_set(x_8, 0, x_3); -lean::closure_set(x_8, 1, x_5); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__2___boxed), 4, 0); -lean::inc(x_7); -x_11 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_11, 0, x_7); -lean::closure_set(x_11, 1, x_10); -x_12 = l_Lean_idEndEscape; -x_13 = lean::string_push(x_1, x_12); -lean::inc(x_13); -x_14 = l_String_quote(x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__1___boxed), 6, 2); -lean::closure_set(x_16, 0, x_13); -lean::closure_set(x_16, 1, x_15); -lean::inc(x_7); -x_17 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_17, 0, x_7); -lean::closure_set(x_17, 1, x_16); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_11); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_9); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_Lean_Parser_detailIdentPartEscaped; -x_23 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4), 5, 2); -lean::closure_set(x_23, 0, x_22); -lean::closure_set(x_23, 1, x_21); -x_24 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView___lambda__3___boxed), 4, 0); -x_25 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_25, 0, x_7); -lean::closure_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_18); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::mk_nat_obj(0u); -x_29 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_choiceAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__8), 5, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_18); -return x_30; -} -} -obj* l_Lean_Parser_detailIdentPart_Parser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_detailIdentPart; -x_5 = l_Lean_Parser_detailIdentPart_Parser___closed__1; -x_6 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(x_4, x_5, x_1, x_2, x_3); -return x_6; -} -} -obj* _init_l_Lean_Parser_detailIdentSuffix() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("detailIdentSuffix"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_2 = lean::cnstr_get(x_1, 0); -x_3 = lean::cnstr_get(x_1, 1); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::box(3); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_5); -x_8 = l_Lean_Parser_detailIdentSuffix; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -return x_9; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -x_11 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -x_13 = l_Lean_Parser_detailIdentSuffix; -x_14 = l_Lean_Parser_Syntax_mkNode(x_13, x_12); -return x_14; -} -} -} -obj* _init_l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1; -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1; -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -lean::dec(x_6); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_10); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_11; obj* x_12; -x_11 = lean::box(3); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_9, 0); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_2); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -else -{ -obj* x_15; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_15 = lean::cnstr_get(x_6, 1); -lean::inc(x_15); -lean::dec(x_6); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -x_16 = l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1; -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::box(0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -} -} -else -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_2, 0); -lean::inc(x_20); -lean::dec(x_2); -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -lean::dec(x_20); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; -x_22 = l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1; -return x_22; -} -else -{ -obj* x_23; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -lean::dec(x_23); -x_26 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -if (lean::obj_tag(x_24) == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::box(3); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -return x_28; -} -else -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_24, 0); -lean::inc(x_29); -lean::dec(x_24); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; -lean::dec(x_23); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -lean::dec(x_21); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -x_32 = l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1; -return x_32; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; -x_33 = lean::cnstr_get(x_31, 0); -lean::inc(x_33); -lean::dec(x_31); -x_34 = lean::box(0); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -return x_35; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentSuffix_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_detailIdentSuffix_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_detailIdentSuffix_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(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_3) == 0) -{ -obj* x_9; uint8 x_10; obj* x_11; obj* x_12; -x_9 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_1); -lean::cnstr_set(x_9, 2, x_2); -lean::cnstr_set(x_9, 3, x_4); -x_10 = 0; -x_11 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set_scalar(x_11, sizeof(void*)*1, x_10); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_8); -return x_12; -} -else -{ -obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -lean::dec(x_7); -x_13 = lean::cnstr_get(x_3, 0); -lean::inc(x_13); -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_4); -x_15 = 0; -x_16 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set_scalar(x_16, sizeof(void*)*1, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -return x_17; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed), 8, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(uint32 x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint8 x_6; -x_6 = l_String_OldIterator_hasNext___main(x_4); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; uint8 x_11; -x_7 = lean::box(0); -x_8 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_9 = l_mjoin___rarg___closed__1; -x_10 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4, x_5); -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_10, 0); -x_13 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_14 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_12); -lean::cnstr_set(x_10, 0, x_14); -return x_10; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_15 = lean::cnstr_get(x_10, 0); -x_16 = lean::cnstr_get(x_10, 1); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_10); -x_17 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_15); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_16); -return x_19; -} -} -else -{ -uint32 x_20; uint8 x_21; -x_20 = l_String_OldIterator_curr___main(x_4); -x_21 = x_20 == x_1; -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; uint8 x_29; -x_22 = l_Char_quoteCore(x_20); -x_23 = l_Char_HasRepr___closed__1; -x_24 = lean::string_append(x_23, x_22); -lean::dec(x_22); -x_25 = lean::string_append(x_24, x_23); -x_26 = lean::box(0); -x_27 = l_mjoin___rarg___closed__1; -x_28 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_25, x_27, x_26, x_26, x_2, x_3, x_4, x_5); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; -x_30 = lean::cnstr_get(x_28, 0); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_30); -lean::cnstr_set(x_28, 0, x_32); -return x_28; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_33 = lean::cnstr_get(x_28, 0); -x_34 = lean::cnstr_get(x_28, 1); -lean::inc(x_34); -lean::inc(x_33); -lean::dec(x_28); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_33); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_34); -return x_37; -} -} -else -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_38 = l_String_OldIterator_next___main(x_4); -x_39 = lean::box(0); -x_40 = lean::box_uint32(x_20); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_38); -lean::cnstr_set(x_41, 2, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_5); -return x_42; -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__3(uint32 x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; obj* x_19; obj* x_20; -lean::inc(x_4); -x_19 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5); -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; uint8 x_22; -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -lean::dec(x_19); -x_22 = !lean::is_exclusive(x_20); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; uint32 x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_20, 1); -x_24 = lean::cnstr_get(x_20, 2); -x_25 = lean::cnstr_get(x_20, 0); -lean::dec(x_25); -x_26 = l_Lean_idBeginEscape; -lean::inc(x_23); -x_27 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_26, x_2, x_3, x_23, x_21); -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; -lean::free_heap_obj(x_20); -lean::dec(x_23); -x_29 = lean::cnstr_get(x_27, 1); -lean::inc(x_29); -lean::dec(x_27); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_6 = x_30; -x_7 = x_29; -goto block_18; -} -else -{ -uint8 x_31; -x_31 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; uint8 x_34; -x_32 = lean::cnstr_get(x_27, 1); -lean::inc(x_32); -lean::dec(x_27); -x_33 = lean::cnstr_get(x_28, 0); -lean::inc(x_33); -lean::dec(x_28); -x_34 = l_String_OldIterator_hasNext___main(x_23); -if (x_34 == 0) -{ -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; -lean::free_heap_obj(x_20); -x_35 = lean::box(0); -x_36 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_37 = l_mjoin___rarg___closed__1; -x_38 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_36, x_37, x_35, x_35, x_2, x_3, x_23, x_32); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_38, 1); -lean::inc(x_40); -lean::dec(x_38); -x_41 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_42 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_39); -x_43 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_33, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_43); -x_6 = x_44; -x_7 = x_40; -goto block_18; -} -else -{ -uint32 x_45; uint8 x_46; -x_45 = l_String_OldIterator_curr___main(x_23); -x_46 = l_Lean_isIdFirst(x_45); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::free_heap_obj(x_20); -x_47 = l_Char_quoteCore(x_45); -x_48 = l_Char_HasRepr___closed__1; -x_49 = lean::string_append(x_48, x_47); -lean::dec(x_47); -x_50 = lean::string_append(x_49, x_48); -x_51 = lean::box(0); -x_52 = l_mjoin___rarg___closed__1; -x_53 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_50, x_52, x_51, x_51, x_2, x_3, x_23, x_32); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -lean::dec(x_53); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_54); -x_58 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_33, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_58); -x_6 = x_59; -x_7 = x_55; -goto block_18; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; -lean::dec(x_33); -x_60 = l_String_OldIterator_next___main(x_23); -x_61 = lean::box(0); -x_62 = lean::box_uint32(x_45); -lean::cnstr_set(x_20, 2, x_61); -lean::cnstr_set(x_20, 1, x_60); -lean::cnstr_set(x_20, 0, x_62); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_20); -x_6 = x_63; -x_7 = x_32; -goto block_18; -} -} -} -else -{ -obj* x_64; obj* x_65; -lean::free_heap_obj(x_20); -lean::dec(x_23); -x_64 = lean::cnstr_get(x_27, 1); -lean::inc(x_64); -lean::dec(x_27); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_6 = x_65; -x_7 = x_64; -goto block_18; -} -} -} -else -{ -obj* x_66; obj* x_67; uint32 x_68; obj* x_69; obj* x_70; -x_66 = lean::cnstr_get(x_20, 1); -x_67 = lean::cnstr_get(x_20, 2); -lean::inc(x_67); -lean::inc(x_66); -lean::dec(x_20); -x_68 = l_Lean_idBeginEscape; -lean::inc(x_66); -x_69 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_68, x_2, x_3, x_66, x_21); -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; obj* x_72; -lean::dec(x_66); -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -lean::dec(x_69); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_70); -x_6 = x_72; -x_7 = x_71; -goto block_18; -} -else -{ -uint8 x_73; -x_73 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -if (x_73 == 0) -{ -obj* x_74; obj* x_75; uint8 x_76; -x_74 = lean::cnstr_get(x_69, 1); -lean::inc(x_74); -lean::dec(x_69); -x_75 = lean::cnstr_get(x_70, 0); -lean::inc(x_75); -lean::dec(x_70); -x_76 = l_String_OldIterator_hasNext___main(x_66); -if (x_76 == 0) -{ -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; -x_77 = lean::box(0); -x_78 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_79 = l_mjoin___rarg___closed__1; -x_80 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_78, x_79, x_77, x_77, x_2, x_3, x_66, x_74); -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_80, 1); -lean::inc(x_82); -lean::dec(x_80); -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_81); -x_85 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_75, x_84); -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_85); -x_6 = x_86; -x_7 = x_82; -goto block_18; -} -else -{ -uint32 x_87; uint8 x_88; -x_87 = l_String_OldIterator_curr___main(x_66); -x_88 = l_Lean_isIdFirst(x_87); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_89 = l_Char_quoteCore(x_87); -x_90 = l_Char_HasRepr___closed__1; -x_91 = lean::string_append(x_90, x_89); -lean::dec(x_89); -x_92 = lean::string_append(x_91, x_90); -x_93 = lean::box(0); -x_94 = l_mjoin___rarg___closed__1; -x_95 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_92, x_94, x_93, x_93, x_2, x_3, x_66, x_74); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -lean::dec(x_95); -x_98 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_96); -x_100 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_75, x_99); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_100); -x_6 = x_101; -x_7 = x_97; -goto block_18; -} -else -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_75); -x_102 = l_String_OldIterator_next___main(x_66); -x_103 = lean::box(0); -x_104 = lean::box_uint32(x_87); -x_105 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_102); -lean::cnstr_set(x_105, 2, x_103); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_105); -x_6 = x_106; -x_7 = x_74; -goto block_18; -} -} -} -else -{ -obj* x_107; obj* x_108; -lean::dec(x_66); -x_107 = lean::cnstr_get(x_69, 1); -lean::inc(x_107); -lean::dec(x_69); -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_70); -x_6 = x_108; -x_7 = x_107; -goto block_18; -} -} -} -} -else -{ -obj* x_109; uint8 x_110; -x_109 = lean::cnstr_get(x_19, 1); -lean::inc(x_109); -lean::dec(x_19); -x_110 = !lean::is_exclusive(x_20); -if (x_110 == 0) -{ -x_6 = x_20; -x_7 = x_109; -goto block_18; -} -else -{ -obj* x_111; uint8 x_112; obj* x_113; -x_111 = lean::cnstr_get(x_20, 0); -x_112 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); -lean::inc(x_111); -lean::dec(x_20); -x_113 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_112); -x_6 = x_113; -x_7 = x_109; -goto block_18; -} -} -block_18: -{ -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_6, 2); -lean::dec(x_9); -x_10 = lean::cnstr_get(x_6, 1); -lean::dec(x_10); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_11); -lean::cnstr_set(x_6, 1, x_4); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_7); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = lean::cnstr_get(x_6, 0); -lean::inc(x_13); -lean::dec(x_6); -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_4); -lean::cnstr_set(x_15, 2, x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_7); -return x_16; -} -} -else -{ -obj* x_17; -lean::dec(x_4); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_6); -lean::cnstr_set(x_17, 1, x_7); -return x_17; -} -} -} -} -obj* l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::apply_3(x_1, x_3, x_4, x_5); -return x_6; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__5(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -uint8 x_7; -x_7 = l_String_isEmpty(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::string_length(x_1); -x_9 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_1); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set(x_10, 2, x_9); -lean::inc(x_5); -x_11 = l___private_init_lean_parser_parsec_2__strAux___main(x_8, x_10, x_5); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; uint8 x_15; obj* x_16; obj* x_17; -lean::dec(x_1); -x_12 = lean::box(0); -x_13 = l_String_splitAux___main___closed__1; -x_14 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_14, 0, x_5); -lean::cnstr_set(x_14, 1, x_13); -lean::cnstr_set(x_14, 2, x_2); -lean::cnstr_set(x_14, 3, x_12); -x_15 = 0; -x_16 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set_scalar(x_16, sizeof(void*)*1, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_6); -return x_17; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_5); -lean::dec(x_2); -x_18 = lean::cnstr_get(x_11, 0); -lean::inc(x_18); -lean::dec(x_11); -x_19 = lean::box(0); -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_1); -lean::cnstr_set(x_20, 1, x_18); -lean::cnstr_set(x_20, 2, x_19); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_6); -return x_21; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -lean::dec(x_2); -lean::dec(x_1); -x_22 = l_String_splitAux___main___closed__1; -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_5); -lean::cnstr_set(x_24, 2, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_6); -return x_25; -} -} -} -obj* l_ReaderT_bind___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__6___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_4); -lean::inc(x_3); -x_7 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; uint8 x_14; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 2); -lean::inc(x_12); -lean::dec(x_8); -x_13 = lean::apply_5(x_2, x_10, x_3, x_4, x_11, x_9); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_15); -lean::cnstr_set(x_13, 0, x_16); -return x_13; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_13, 0); -x_18 = lean::cnstr_get(x_13, 1); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_13); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_17); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -return x_20; -} -} -else -{ -uint8 x_21; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_21 = !lean::is_exclusive(x_7); -if (x_21 == 0) -{ -obj* x_22; uint8 x_23; -x_22 = lean::cnstr_get(x_7, 0); -lean::dec(x_22); -x_23 = !lean::is_exclusive(x_8); -if (x_23 == 0) -{ -return x_7; -} -else -{ -obj* x_24; uint8 x_25; obj* x_26; -x_24 = lean::cnstr_get(x_8, 0); -x_25 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_24); -lean::dec(x_8); -x_26 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_25); -lean::cnstr_set(x_7, 0, x_26); -return x_7; -} -} -else -{ -obj* x_27; obj* x_28; uint8 x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::cnstr_get(x_7, 1); -lean::inc(x_27); -lean::dec(x_7); -x_28 = lean::cnstr_get(x_8, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_30 = x_8; -} else { - lean::dec_ref(x_8); - x_30 = lean::box(0); -} -if (lean::is_scalar(x_30)) { - x_31 = lean::alloc_cnstr(1, 1, 1); -} else { - x_31 = x_30; -} -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set_scalar(x_31, sizeof(void*)*1, x_29); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_27); -return x_32; -} -} -} -} -obj* l_ReaderT_bind___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__6(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__6___rarg), 6, 0); -return x_3; -} -} -obj* l_Lean_Parser_RecT_recurse___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__7(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = lean::apply_4(x_2, x_1, x_3, x_4, x_5); -return x_6; -} -} -obj* l_List_mfoldl___main___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__9(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_8 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_9 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_6); -lean::cnstr_set(x_9, 2, x_8); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_7); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_67; obj* x_68; -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_3, 1); -lean::inc(x_12); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - x_13 = x_3; -} else { - lean::dec_ref(x_3); - x_13 = lean::box(0); -} -lean::inc(x_5); -lean::inc(x_4); -x_67 = lean::apply_4(x_11, x_4, x_5, x_6, x_7); -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = lean::cnstr_get(x_67, 1); -lean::inc(x_69); -lean::dec(x_67); -x_14 = x_68; -x_15 = x_69; -goto block_66; -} -else -{ -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_70; -x_70 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -if (x_70 == 0) -{ -obj* x_71; uint8 x_72; -x_71 = lean::cnstr_get(x_67, 1); -lean::inc(x_71); -lean::dec(x_67); -x_72 = !lean::is_exclusive(x_68); -if (x_72 == 0) -{ -uint8 x_73; -x_73 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_73); -x_14 = x_68; -x_15 = x_71; -goto block_66; -} -else -{ -obj* x_74; uint8 x_75; obj* x_76; -x_74 = lean::cnstr_get(x_68, 0); -lean::inc(x_74); -lean::dec(x_68); -x_75 = 0; -x_76 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_76, 0, x_74); -lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_75); -x_14 = x_76; -x_15 = x_71; -goto block_66; -} -} -else -{ -obj* x_77; uint8 x_78; -x_77 = lean::cnstr_get(x_67, 1); -lean::inc(x_77); -lean::dec(x_67); -x_78 = !lean::is_exclusive(x_68); -if (x_78 == 0) -{ -uint8 x_79; -x_79 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_79); -x_14 = x_68; -x_15 = x_77; -goto block_66; -} -else -{ -obj* x_80; uint8 x_81; obj* x_82; -x_80 = lean::cnstr_get(x_68, 0); -lean::inc(x_80); -lean::dec(x_68); -x_81 = 1; -x_82 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_82, 0, x_80); -lean::cnstr_set_scalar(x_82, sizeof(void*)*1, x_81); -x_14 = x_82; -x_15 = x_77; -goto block_66; -} -} -} -else -{ -obj* x_83; obj* x_84; -x_83 = lean::cnstr_get(x_68, 0); -lean::inc(x_83); -x_84 = lean::cnstr_get(x_83, 3); -lean::inc(x_84); -if (lean::obj_tag(x_84) == 0) -{ -obj* x_85; uint8 x_86; -x_85 = lean::cnstr_get(x_67, 1); -lean::inc(x_85); -lean::dec(x_67); -x_86 = !lean::is_exclusive(x_68); -if (x_86 == 0) -{ -uint8 x_87; obj* x_88; uint8 x_89; -x_87 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -x_88 = lean::cnstr_get(x_68, 0); -lean::dec(x_88); -x_89 = !lean::is_exclusive(x_83); -if (x_89 == 0) -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -x_90 = lean::cnstr_get(x_83, 3); -lean::dec(x_90); -x_91 = lean::box(3); -lean::inc(x_2); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_2); -x_93 = l_List_reverse___rarg(x_92); -lean::inc(x_1); -x_94 = l_Lean_Parser_Syntax_mkNode(x_1, x_93); -x_95 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_83, 3, x_95); -if (x_87 == 0) -{ -uint8 x_96; -x_96 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_96); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_97; -x_97 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_97); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -} -else -{ -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; -x_98 = lean::cnstr_get(x_83, 0); -x_99 = lean::cnstr_get(x_83, 1); -x_100 = lean::cnstr_get(x_83, 2); -lean::inc(x_100); -lean::inc(x_99); -lean::inc(x_98); -lean::dec(x_83); -x_101 = lean::box(3); -lean::inc(x_2); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_2); -x_103 = l_List_reverse___rarg(x_102); -lean::inc(x_1); -x_104 = l_Lean_Parser_Syntax_mkNode(x_1, x_103); -x_105 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_105, 0, x_104); -x_106 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_106, 0, x_98); -lean::cnstr_set(x_106, 1, x_99); -lean::cnstr_set(x_106, 2, x_100); -lean::cnstr_set(x_106, 3, x_105); -if (x_87 == 0) -{ -uint8 x_107; -x_107 = 0; -lean::cnstr_set(x_68, 0, x_106); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_107); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_108; -x_108 = 1; -lean::cnstr_set(x_68, 0, x_106); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_108); -x_14 = x_68; -x_15 = x_85; -goto block_66; -} -} -} -else -{ -uint8 x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_109 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -lean::dec(x_68); -x_110 = lean::cnstr_get(x_83, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_83, 1); -lean::inc(x_111); -x_112 = lean::cnstr_get(x_83, 2); -lean::inc(x_112); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - lean::cnstr_release(x_83, 2); - lean::cnstr_release(x_83, 3); - x_113 = x_83; -} else { - lean::dec_ref(x_83); - x_113 = lean::box(0); -} -x_114 = lean::box(3); -lean::inc(x_2); -x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_114); -lean::cnstr_set(x_115, 1, x_2); -x_116 = l_List_reverse___rarg(x_115); -lean::inc(x_1); -x_117 = l_Lean_Parser_Syntax_mkNode(x_1, x_116); -x_118 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_118, 0, x_117); -if (lean::is_scalar(x_113)) { - x_119 = lean::alloc_cnstr(0, 4, 0); -} else { - x_119 = x_113; -} -lean::cnstr_set(x_119, 0, x_110); -lean::cnstr_set(x_119, 1, x_111); -lean::cnstr_set(x_119, 2, x_112); -lean::cnstr_set(x_119, 3, x_118); -if (x_109 == 0) -{ -uint8 x_120; obj* x_121; -x_120 = 0; -x_121 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_121, 0, x_119); -lean::cnstr_set_scalar(x_121, sizeof(void*)*1, x_120); -x_14 = x_121; -x_15 = x_85; -goto block_66; -} -else -{ -uint8 x_122; obj* x_123; -x_122 = 1; -x_123 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_123, 0, x_119); -lean::cnstr_set_scalar(x_123, sizeof(void*)*1, x_122); -x_14 = x_123; -x_15 = x_85; -goto block_66; -} -} -} -else -{ -obj* x_124; uint8 x_125; -x_124 = lean::cnstr_get(x_67, 1); -lean::inc(x_124); -lean::dec(x_67); -x_125 = !lean::is_exclusive(x_68); -if (x_125 == 0) -{ -uint8 x_126; obj* x_127; uint8 x_128; -x_126 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -x_127 = lean::cnstr_get(x_68, 0); -lean::dec(x_127); -x_128 = !lean::is_exclusive(x_83); -if (x_128 == 0) -{ -obj* x_129; uint8 x_130; -x_129 = lean::cnstr_get(x_83, 3); -lean::dec(x_129); -x_130 = !lean::is_exclusive(x_84); -if (x_130 == 0) -{ -obj* x_131; obj* x_132; obj* x_133; obj* x_134; -x_131 = lean::cnstr_get(x_84, 0); -lean::inc(x_2); -x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_131); -lean::cnstr_set(x_132, 1, x_2); -x_133 = l_List_reverse___rarg(x_132); -lean::inc(x_1); -x_134 = l_Lean_Parser_Syntax_mkNode(x_1, x_133); -lean::cnstr_set(x_84, 0, x_134); -if (x_126 == 0) -{ -uint8 x_135; -x_135 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_135); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_136; -x_136 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_136); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -else -{ -obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_137 = lean::cnstr_get(x_84, 0); -lean::inc(x_137); -lean::dec(x_84); -lean::inc(x_2); -x_138 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_138, 0, x_137); -lean::cnstr_set(x_138, 1, x_2); -x_139 = l_List_reverse___rarg(x_138); -lean::inc(x_1); -x_140 = l_Lean_Parser_Syntax_mkNode(x_1, x_139); -x_141 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_141, 0, x_140); -lean::cnstr_set(x_83, 3, x_141); -if (x_126 == 0) -{ -uint8 x_142; -x_142 = 0; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_142); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_143; -x_143 = 1; -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_143); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -} -else -{ -obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; -x_144 = lean::cnstr_get(x_83, 0); -x_145 = lean::cnstr_get(x_83, 1); -x_146 = lean::cnstr_get(x_83, 2); -lean::inc(x_146); -lean::inc(x_145); -lean::inc(x_144); -lean::dec(x_83); -x_147 = lean::cnstr_get(x_84, 0); -lean::inc(x_147); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - x_148 = x_84; -} else { - lean::dec_ref(x_84); - x_148 = lean::box(0); -} -lean::inc(x_2); -x_149 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_149, 0, x_147); -lean::cnstr_set(x_149, 1, x_2); -x_150 = l_List_reverse___rarg(x_149); -lean::inc(x_1); -x_151 = l_Lean_Parser_Syntax_mkNode(x_1, x_150); -if (lean::is_scalar(x_148)) { - x_152 = lean::alloc_cnstr(1, 1, 0); -} else { - x_152 = x_148; -} -lean::cnstr_set(x_152, 0, x_151); -x_153 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_153, 0, x_144); -lean::cnstr_set(x_153, 1, x_145); -lean::cnstr_set(x_153, 2, x_146); -lean::cnstr_set(x_153, 3, x_152); -if (x_126 == 0) -{ -uint8 x_154; -x_154 = 0; -lean::cnstr_set(x_68, 0, x_153); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_154); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_155; -x_155 = 1; -lean::cnstr_set(x_68, 0, x_153); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_155); -x_14 = x_68; -x_15 = x_124; -goto block_66; -} -} -} -else -{ -uint8 x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; -x_156 = lean::cnstr_get_scalar(x_68, sizeof(void*)*1); -lean::dec(x_68); -x_157 = lean::cnstr_get(x_83, 0); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_83, 1); -lean::inc(x_158); -x_159 = lean::cnstr_get(x_83, 2); -lean::inc(x_159); -if (lean::is_exclusive(x_83)) { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - lean::cnstr_release(x_83, 2); - lean::cnstr_release(x_83, 3); - x_160 = x_83; -} else { - lean::dec_ref(x_83); - x_160 = lean::box(0); -} -x_161 = lean::cnstr_get(x_84, 0); -lean::inc(x_161); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - x_162 = x_84; -} else { - lean::dec_ref(x_84); - x_162 = lean::box(0); -} -lean::inc(x_2); -x_163 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_163, 0, x_161); -lean::cnstr_set(x_163, 1, x_2); -x_164 = l_List_reverse___rarg(x_163); -lean::inc(x_1); -x_165 = l_Lean_Parser_Syntax_mkNode(x_1, x_164); -if (lean::is_scalar(x_162)) { - x_166 = lean::alloc_cnstr(1, 1, 0); -} else { - x_166 = x_162; -} -lean::cnstr_set(x_166, 0, x_165); -if (lean::is_scalar(x_160)) { - x_167 = lean::alloc_cnstr(0, 4, 0); -} else { - x_167 = x_160; -} -lean::cnstr_set(x_167, 0, x_157); -lean::cnstr_set(x_167, 1, x_158); -lean::cnstr_set(x_167, 2, x_159); -lean::cnstr_set(x_167, 3, x_166); -if (x_156 == 0) -{ -uint8 x_168; obj* x_169; -x_168 = 0; -x_169 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_169, 0, x_167); -lean::cnstr_set_scalar(x_169, sizeof(void*)*1, x_168); -x_14 = x_169; -x_15 = x_124; -goto block_66; -} -else -{ -uint8 x_170; obj* x_171; -x_170 = 1; -x_171 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_171, 0, x_167); -lean::cnstr_set_scalar(x_171, sizeof(void*)*1, x_170); -x_14 = x_171; -x_15 = x_124; -goto block_66; -} -} -} -} -} -block_66: -{ -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_16; -x_16 = !lean::is_exclusive(x_14); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_14, 0); -x_18 = lean::cnstr_get(x_14, 2); -if (lean::is_scalar(x_13)) { - x_19 = lean::alloc_cnstr(1, 2, 0); -} else { - x_19 = x_13; -} -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_2); -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_14, 2, x_20); -lean::cnstr_set(x_14, 0, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_14); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; uint8 x_26; -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_23 = lean::cnstr_get(x_21, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_21, 2); -lean::inc(x_24); -lean::dec(x_21); -x_25 = l_List_mfoldl___main___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__9(x_1, x_22, x_12, x_4, x_5, x_23, x_15); -x_26 = !lean::is_exclusive(x_25); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; -x_27 = lean::cnstr_get(x_25, 0); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_27); -lean::cnstr_set(x_25, 0, x_28); -return x_25; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::cnstr_get(x_25, 0); -x_30 = lean::cnstr_get(x_25, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_25); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_29); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_30); -return x_32; -} -} -else -{ -uint8 x_33; -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_33 = !lean::is_exclusive(x_21); -if (x_33 == 0) -{ -obj* x_34; -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_21); -lean::cnstr_set(x_34, 1, x_15); -return x_34; -} -else -{ -obj* x_35; uint8 x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_21, 0); -x_36 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); -lean::inc(x_35); -lean::dec(x_21); -x_37 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_15); -return x_38; -} -} -} -else -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_39 = lean::cnstr_get(x_14, 0); -x_40 = lean::cnstr_get(x_14, 1); -x_41 = lean::cnstr_get(x_14, 2); -lean::inc(x_41); -lean::inc(x_40); -lean::inc(x_39); -lean::dec(x_14); -if (lean::is_scalar(x_13)) { - x_42 = lean::alloc_cnstr(1, 2, 0); -} else { - x_42 = x_13; -} -lean::cnstr_set(x_42, 0, x_39); -lean::cnstr_set(x_42, 1, x_2); -x_43 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set(x_44, 1, x_40); -lean::cnstr_set(x_44, 2, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_44); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_45, 1); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_45, 2); -lean::inc(x_48); -lean::dec(x_45); -x_49 = l_List_mfoldl___main___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__9(x_1, x_46, x_12, x_4, x_5, x_47, x_15); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_49, 1); -lean::inc(x_51); -if (lean::is_exclusive(x_49)) { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_52 = x_49; -} else { - lean::dec_ref(x_49); - x_52 = lean::box(0); -} -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_50); -if (lean::is_scalar(x_52)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_52; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -return x_54; -} -else -{ -obj* x_55; uint8 x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_55 = lean::cnstr_get(x_45, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); -if (lean::is_exclusive(x_45)) { - lean::cnstr_release(x_45, 0); - x_57 = x_45; -} else { - lean::dec_ref(x_45); - x_57 = lean::box(0); -} -if (lean::is_scalar(x_57)) { - x_58 = lean::alloc_cnstr(1, 1, 1); -} else { - x_58 = x_57; -} -lean::cnstr_set(x_58, 0, x_55); -lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_15); -return x_59; -} -} -} -else -{ -uint8 x_60; -lean::dec(x_13); -lean::dec(x_12); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_2); -lean::dec(x_1); -x_60 = !lean::is_exclusive(x_14); -if (x_60 == 0) -{ -obj* x_61; -x_61 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_61, 0, x_14); -lean::cnstr_set(x_61, 1, x_15); -return x_61; -} -else -{ -obj* x_62; uint8 x_63; obj* x_64; obj* x_65; -x_62 = lean::cnstr_get(x_14, 0); -x_63 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -lean::inc(x_62); -lean::dec(x_14); -x_64 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set_scalar(x_64, sizeof(void*)*1, x_63); -x_65 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::cnstr_set(x_65, 1, x_15); -return x_65; -} -} -} -} -} -} -obj* l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__8(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::box(0); -lean::inc(x_1); -x_8 = l_List_mfoldl___main___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__9(x_1, x_7, x_2, x_3, x_4, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_8, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_9, 0); -x_14 = lean::cnstr_get(x_9, 2); -x_15 = l_List_reverse___rarg(x_13); -x_16 = l_Lean_Parser_Syntax_mkNode(x_1, x_15); -x_17 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_9, 2, x_17); -lean::cnstr_set(x_9, 0, x_16); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_9); -lean::cnstr_set(x_8, 0, x_18); -return x_8; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_19 = lean::cnstr_get(x_9, 0); -x_20 = lean::cnstr_get(x_9, 1); -x_21 = lean::cnstr_get(x_9, 2); -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_9); -x_22 = l_List_reverse___rarg(x_19); -x_23 = l_Lean_Parser_Syntax_mkNode(x_1, x_22); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_20); -lean::cnstr_set(x_25, 2, x_24); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_25); -lean::cnstr_set(x_8, 0, x_26); -return x_8; -} -} -else -{ -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_37; -x_27 = lean::cnstr_get(x_8, 1); -lean::inc(x_27); -lean::dec(x_8); -x_28 = lean::cnstr_get(x_9, 0); -lean::inc(x_28); -x_29 = lean::cnstr_get(x_9, 1); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_9, 2); -lean::inc(x_30); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_31 = x_9; -} else { - lean::dec_ref(x_9); - x_31 = lean::box(0); -} -x_32 = l_List_reverse___rarg(x_28); -x_33 = l_Lean_Parser_Syntax_mkNode(x_1, x_32); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_31)) { - x_35 = lean::alloc_cnstr(0, 3, 0); -} else { - x_35 = x_31; -} -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_29); -lean::cnstr_set(x_35, 2, x_34); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_35); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_27); -return x_37; -} -} -else -{ -uint8 x_38; -lean::dec(x_1); -x_38 = !lean::is_exclusive(x_8); -if (x_38 == 0) -{ -obj* x_39; uint8 x_40; -x_39 = lean::cnstr_get(x_8, 0); -lean::dec(x_39); -x_40 = !lean::is_exclusive(x_9); -if (x_40 == 0) -{ -return x_8; -} -else -{ -obj* x_41; uint8 x_42; obj* x_43; -x_41 = lean::cnstr_get(x_9, 0); -x_42 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_41); -lean::dec(x_9); -x_43 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_42); -lean::cnstr_set(x_8, 0, x_43); -return x_8; -} -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; obj* x_48; obj* x_49; -x_44 = lean::cnstr_get(x_8, 1); -lean::inc(x_44); -lean::dec(x_8); -x_45 = lean::cnstr_get(x_9, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_47 = x_9; -} else { - lean::dec_ref(x_9); - x_47 = lean::box(0); -} -if (lean::is_scalar(x_47)) { - x_48 = lean::alloc_cnstr(1, 1, 1); -} else { - x_48 = x_47; -} -lean::cnstr_set(x_48, 0, x_45); -lean::cnstr_set_scalar(x_48, sizeof(void*)*1, x_46); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_44); -return x_49; -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_1); -x_3 = l_Lean_Parser_List_cons_tokens___rarg(x_1, x_2); -lean::dec(x_2); -x_4 = l_Lean_Parser_tokens___rarg(x_3); -lean::dec(x_3); -x_5 = l_Lean_Parser_tokens___rarg(x_4); -lean::dec(x_4); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg___boxed(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_9; -x_9 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_6); -lean::dec(x_5); -lean::dec(x_3); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; obj* x_7; -x_6 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_7 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_6, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; obj* x_7; -x_6 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_7 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__3(x_6, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__5___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__5(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___spec__1(uint32 x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; obj* x_19; obj* x_20; -lean::inc(x_4); -x_19 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5); -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; uint8 x_22; -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -lean::dec(x_19); -x_22 = !lean::is_exclusive(x_20); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; uint32 x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_20, 1); -x_24 = lean::cnstr_get(x_20, 2); -x_25 = lean::cnstr_get(x_20, 0); -lean::dec(x_25); -x_26 = l_Lean_idBeginEscape; -lean::inc(x_23); -x_27 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_26, x_2, x_3, x_23, x_21); -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; -lean::free_heap_obj(x_20); -lean::dec(x_23); -x_29 = lean::cnstr_get(x_27, 1); -lean::inc(x_29); -lean::dec(x_27); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_6 = x_30; -x_7 = x_29; -goto block_18; -} -else -{ -uint8 x_31; -x_31 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; uint8 x_34; -x_32 = lean::cnstr_get(x_27, 1); -lean::inc(x_32); -lean::dec(x_27); -x_33 = lean::cnstr_get(x_28, 0); -lean::inc(x_33); -lean::dec(x_28); -x_34 = l_String_OldIterator_hasNext___main(x_23); -if (x_34 == 0) -{ -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; -lean::free_heap_obj(x_20); -x_35 = lean::box(0); -x_36 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_37 = l_mjoin___rarg___closed__1; -x_38 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_36, x_37, x_35, x_35, x_2, x_3, x_23, x_32); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_38, 1); -lean::inc(x_40); -lean::dec(x_38); -x_41 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_42 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_39); -x_43 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_33, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_43); -x_6 = x_44; -x_7 = x_40; -goto block_18; -} -else -{ -uint32 x_45; uint8 x_46; -x_45 = l_String_OldIterator_curr___main(x_23); -x_46 = l_Lean_isIdFirst(x_45); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::free_heap_obj(x_20); -x_47 = l_Char_quoteCore(x_45); -x_48 = l_Char_HasRepr___closed__1; -x_49 = lean::string_append(x_48, x_47); -lean::dec(x_47); -x_50 = lean::string_append(x_49, x_48); -x_51 = lean::box(0); -x_52 = l_mjoin___rarg___closed__1; -x_53 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_50, x_52, x_51, x_51, x_2, x_3, x_23, x_32); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -lean::dec(x_53); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_54); -x_58 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_33, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_58); -x_6 = x_59; -x_7 = x_55; -goto block_18; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; -lean::dec(x_33); -x_60 = l_String_OldIterator_next___main(x_23); -x_61 = lean::box(0); -x_62 = lean::box_uint32(x_45); -lean::cnstr_set(x_20, 2, x_61); -lean::cnstr_set(x_20, 1, x_60); -lean::cnstr_set(x_20, 0, x_62); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_20); -x_6 = x_63; -x_7 = x_32; -goto block_18; -} -} -} -else -{ -obj* x_64; obj* x_65; -lean::free_heap_obj(x_20); -lean::dec(x_23); -x_64 = lean::cnstr_get(x_27, 1); -lean::inc(x_64); -lean::dec(x_27); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_6 = x_65; -x_7 = x_64; -goto block_18; -} -} -} -else -{ -obj* x_66; obj* x_67; uint32 x_68; obj* x_69; obj* x_70; -x_66 = lean::cnstr_get(x_20, 1); -x_67 = lean::cnstr_get(x_20, 2); -lean::inc(x_67); -lean::inc(x_66); -lean::dec(x_20); -x_68 = l_Lean_idBeginEscape; -lean::inc(x_66); -x_69 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_68, x_2, x_3, x_66, x_21); -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; obj* x_72; -lean::dec(x_66); -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -lean::dec(x_69); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_70); -x_6 = x_72; -x_7 = x_71; -goto block_18; -} -else -{ -uint8 x_73; -x_73 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -if (x_73 == 0) -{ -obj* x_74; obj* x_75; uint8 x_76; -x_74 = lean::cnstr_get(x_69, 1); -lean::inc(x_74); -lean::dec(x_69); -x_75 = lean::cnstr_get(x_70, 0); -lean::inc(x_75); -lean::dec(x_70); -x_76 = l_String_OldIterator_hasNext___main(x_66); -if (x_76 == 0) -{ -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; -x_77 = lean::box(0); -x_78 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_79 = l_mjoin___rarg___closed__1; -x_80 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_78, x_79, x_77, x_77, x_2, x_3, x_66, x_74); -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_80, 1); -lean::inc(x_82); -lean::dec(x_80); -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_81); -x_85 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_75, x_84); -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_85); -x_6 = x_86; -x_7 = x_82; -goto block_18; -} -else -{ -uint32 x_87; uint8 x_88; -x_87 = l_String_OldIterator_curr___main(x_66); -x_88 = l_Lean_isIdFirst(x_87); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_89 = l_Char_quoteCore(x_87); -x_90 = l_Char_HasRepr___closed__1; -x_91 = lean::string_append(x_90, x_89); -lean::dec(x_89); -x_92 = lean::string_append(x_91, x_90); -x_93 = lean::box(0); -x_94 = l_mjoin___rarg___closed__1; -x_95 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_92, x_94, x_93, x_93, x_2, x_3, x_66, x_74); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -lean::dec(x_95); -x_98 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_96); -x_100 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_75, x_99); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_100); -x_6 = x_101; -x_7 = x_97; -goto block_18; -} -else -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_75); -x_102 = l_String_OldIterator_next___main(x_66); -x_103 = lean::box(0); -x_104 = lean::box_uint32(x_87); -x_105 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_102); -lean::cnstr_set(x_105, 2, x_103); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_105); -x_6 = x_106; -x_7 = x_74; -goto block_18; -} -} -} -else -{ -obj* x_107; obj* x_108; -lean::dec(x_66); -x_107 = lean::cnstr_get(x_69, 1); -lean::inc(x_107); -lean::dec(x_69); -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_70); -x_6 = x_108; -x_7 = x_107; -goto block_18; -} -} -} -} -else -{ -obj* x_109; uint8 x_110; -x_109 = lean::cnstr_get(x_19, 1); -lean::inc(x_109); -lean::dec(x_19); -x_110 = !lean::is_exclusive(x_20); -if (x_110 == 0) -{ -x_6 = x_20; -x_7 = x_109; -goto block_18; -} -else -{ -obj* x_111; uint8 x_112; obj* x_113; -x_111 = lean::cnstr_get(x_20, 0); -x_112 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); -lean::inc(x_111); -lean::dec(x_20); -x_113 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_112); -x_6 = x_113; -x_7 = x_109; -goto block_18; -} -} -block_18: -{ -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_6, 2); -lean::dec(x_9); -x_10 = lean::cnstr_get(x_6, 1); -lean::dec(x_10); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_11); -lean::cnstr_set(x_6, 1, x_4); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_7); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = lean::cnstr_get(x_6, 0); -lean::inc(x_13); -lean::dec(x_6); -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_4); -lean::cnstr_set(x_15, 2, x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_7); -return x_16; -} -} -else -{ -obj* x_17; -lean::dec(x_4); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_6); -lean::cnstr_set(x_17, 1, x_7); -return x_17; -} -} -} -} -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__1(uint32 x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___spec__1(x_1, x_2, x_3, x_4, x_5); -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_8); -lean::cnstr_set(x_6, 0, x_9); -return x_6; -} -else -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_6, 0); -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -lean::inc(x_10); -lean::dec(x_6); -x_12 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_10); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); -return x_13; -} -} -} -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = l_Lean_Name_toString___closed__1; -x_8 = l_Lean_Parser_MonadParsec_strCore___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__5(x_7, x_1, x_3, x_4, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; uint8 x_12; -x_11 = lean::cnstr_get(x_8, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_9); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_13 = lean::cnstr_get(x_9, 1); -x_14 = lean::cnstr_get(x_9, 2); -x_15 = lean::cnstr_get(x_9, 0); -lean::dec(x_15); -lean::inc(x_13); -x_16 = l_Lean_Parser_mkRawRes(x_2, x_13); -x_17 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_9, 2, x_17); -lean::cnstr_set(x_9, 0, x_16); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_9); -lean::cnstr_set(x_8, 0, x_18); -return x_8; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_19 = lean::cnstr_get(x_9, 1); -x_20 = lean::cnstr_get(x_9, 2); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_9); -lean::inc(x_19); -x_21 = l_Lean_Parser_mkRawRes(x_2, x_19); -x_22 = l_Lean_Parser_finishCommentBlock___closed__2; -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_19); -lean::cnstr_set(x_23, 2, x_22); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_23); -lean::cnstr_set(x_8, 0, x_24); -return x_8; -} -} -else -{ -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; -x_25 = lean::cnstr_get(x_8, 1); -lean::inc(x_25); -lean::dec(x_8); -x_26 = lean::cnstr_get(x_9, 1); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_9, 2); -lean::inc(x_27); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_28 = x_9; -} else { - lean::dec_ref(x_9); - x_28 = lean::box(0); -} -lean::inc(x_26); -x_29 = l_Lean_Parser_mkRawRes(x_2, x_26); -x_30 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_28)) { - x_31 = lean::alloc_cnstr(0, 3, 0); -} else { - x_31 = x_28; -} -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set(x_31, 1, x_26); -lean::cnstr_set(x_31, 2, x_30); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_27, x_31); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_25); -return x_33; -} -} -else -{ -uint8 x_34; -lean::dec(x_2); -x_34 = !lean::is_exclusive(x_8); -if (x_34 == 0) -{ -obj* x_35; uint8 x_36; -x_35 = lean::cnstr_get(x_8, 0); -lean::dec(x_35); -x_36 = !lean::is_exclusive(x_9); -if (x_36 == 0) -{ -return x_8; -} -else -{ -obj* x_37; uint8 x_38; obj* x_39; -x_37 = lean::cnstr_get(x_9, 0); -x_38 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_37); -lean::dec(x_9); -x_39 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_38); -lean::cnstr_set(x_8, 0, x_39); -return x_8; -} -} -else -{ -obj* x_40; obj* x_41; uint8 x_42; obj* x_43; obj* x_44; obj* x_45; -x_40 = lean::cnstr_get(x_8, 1); -lean::inc(x_40); -lean::dec(x_8); -x_41 = lean::cnstr_get(x_9, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_43 = x_9; -} else { - lean::dec_ref(x_9); - x_43 = lean::box(0); -} -if (lean::is_scalar(x_43)) { - x_44 = lean::alloc_cnstr(1, 1, 1); -} else { - x_44 = x_43; -} -lean::cnstr_set(x_44, 0, x_41); -lean::cnstr_set_scalar(x_44, sizeof(void*)*1, x_42); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_40); -return x_45; -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint32 x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_1 = l_Lean_Parser_BasicParserM_Monad; -x_2 = l_ReaderT_Monad___rarg(x_1); -x_3 = l_Lean_Parser_BasicParserM_MonadExcept; -x_4 = l_ReaderT_MonadExcept___rarg(x_3); -x_5 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_6 = l_Lean_Parser_RecT_Lean_Parser_MonadParsec___rarg(x_1, lean::box(0), x_5); -x_7 = l_Lean_Parser_BasicParserM_Alternative; -x_8 = l_ReaderT_Alternative___rarg(x_1, x_7); -x_9 = 46; -x_10 = lean::box_uint32(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__1___boxed), 5, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::mk_string("."); -x_13 = l_String_quote(x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_16 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed), 5, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__2___boxed), 6, 1); -lean::closure_set(x_18, 0, x_14); -x_19 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__6___rarg), 6, 2); -lean::closure_set(x_19, 0, x_17); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::box(0); -x_21 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__7), 5, 1); -lean::closure_set(x_21, 0, x_20); -x_22 = lean::box(0); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_19); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_Lean_Parser_detailIdentSuffix; -lean::inc(x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__8), 6, 2); -lean::closure_set(x_26, 0, x_25); -lean::closure_set(x_26, 1, x_24); -x_27 = l_Lean_Parser_detailIdentSuffix_HasView; -x_28 = l_Lean_Parser_Combinators_node_view___rarg(x_2, x_4, x_6, x_8, x_25, x_24, x_27); -lean::dec(x_24); -lean::dec(x_6); -lean::dec(x_4); -lean::dec(x_2); -x_29 = l_Lean_Parser_Combinators_seqRight_view___rarg(x_8, lean::box(0), lean::box(0), x_11, x_26, x_28); -lean::dec(x_26); -lean::dec(x_11); -lean::dec(x_8); -return x_29; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; obj* x_7; -x_6 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_7 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___spec__1(x_6, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; obj* x_7; -x_6 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_7 = l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__1(x_6, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_4); -lean::dec(x_3); -return x_7; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser___spec__1(obj* x_1, obj* x_2, uint32 x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; obj* x_19; obj* x_20; -lean::inc(x_4); -x_19 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_3, x_1, x_2, x_4, x_5); -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -if (lean::obj_tag(x_20) == 0) -{ -obj* x_21; uint8 x_22; -x_21 = lean::cnstr_get(x_19, 1); -lean::inc(x_21); -lean::dec(x_19); -x_22 = !lean::is_exclusive(x_20); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; uint32 x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_20, 1); -x_24 = lean::cnstr_get(x_20, 2); -x_25 = lean::cnstr_get(x_20, 0); -lean::dec(x_25); -x_26 = l_Lean_idBeginEscape; -lean::inc(x_23); -x_27 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_26, x_1, x_2, x_23, x_21); -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; -lean::free_heap_obj(x_20); -lean::dec(x_23); -x_29 = lean::cnstr_get(x_27, 1); -lean::inc(x_29); -lean::dec(x_27); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_6 = x_30; -x_7 = x_29; -goto block_18; -} -else -{ -uint8 x_31; -x_31 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; uint8 x_34; -x_32 = lean::cnstr_get(x_27, 1); -lean::inc(x_32); -lean::dec(x_27); -x_33 = lean::cnstr_get(x_28, 0); -lean::inc(x_33); -lean::dec(x_28); -x_34 = l_String_OldIterator_hasNext___main(x_23); -if (x_34 == 0) -{ -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; -lean::free_heap_obj(x_20); -x_35 = lean::box(0); -x_36 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_37 = l_mjoin___rarg___closed__1; -x_38 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_36, x_37, x_35, x_35, x_1, x_2, x_23, x_32); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_38, 1); -lean::inc(x_40); -lean::dec(x_38); -x_41 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_42 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_39); -x_43 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_33, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_43); -x_6 = x_44; -x_7 = x_40; -goto block_18; -} -else -{ -uint32 x_45; uint8 x_46; -x_45 = l_String_OldIterator_curr___main(x_23); -x_46 = l_Lean_isIdFirst(x_45); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::free_heap_obj(x_20); -x_47 = l_Char_quoteCore(x_45); -x_48 = l_Char_HasRepr___closed__1; -x_49 = lean::string_append(x_48, x_47); -lean::dec(x_47); -x_50 = lean::string_append(x_49, x_48); -x_51 = lean::box(0); -x_52 = l_mjoin___rarg___closed__1; -x_53 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_50, x_52, x_51, x_51, x_1, x_2, x_23, x_32); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -lean::dec(x_53); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_54); -x_58 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_33, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_58); -x_6 = x_59; -x_7 = x_55; -goto block_18; -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; -lean::dec(x_33); -x_60 = l_String_OldIterator_next___main(x_23); -x_61 = lean::box(0); -x_62 = lean::box_uint32(x_45); -lean::cnstr_set(x_20, 2, x_61); -lean::cnstr_set(x_20, 1, x_60); -lean::cnstr_set(x_20, 0, x_62); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_20); -x_6 = x_63; -x_7 = x_32; -goto block_18; -} -} -} -else -{ -obj* x_64; obj* x_65; -lean::free_heap_obj(x_20); -lean::dec(x_23); -x_64 = lean::cnstr_get(x_27, 1); -lean::inc(x_64); -lean::dec(x_27); -x_65 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_6 = x_65; -x_7 = x_64; -goto block_18; -} -} -} -else -{ -obj* x_66; obj* x_67; uint32 x_68; obj* x_69; obj* x_70; -x_66 = lean::cnstr_get(x_20, 1); -x_67 = lean::cnstr_get(x_20, 2); -lean::inc(x_67); -lean::inc(x_66); -lean::dec(x_20); -x_68 = l_Lean_idBeginEscape; -lean::inc(x_66); -x_69 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__1(x_68, x_1, x_2, x_66, x_21); -x_70 = lean::cnstr_get(x_69, 0); -lean::inc(x_70); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; obj* x_72; -lean::dec(x_66); -x_71 = lean::cnstr_get(x_69, 1); -lean::inc(x_71); -lean::dec(x_69); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_70); -x_6 = x_72; -x_7 = x_71; -goto block_18; -} -else -{ -uint8 x_73; -x_73 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -if (x_73 == 0) -{ -obj* x_74; obj* x_75; uint8 x_76; -x_74 = lean::cnstr_get(x_69, 1); -lean::inc(x_74); -lean::dec(x_69); -x_75 = lean::cnstr_get(x_70, 0); -lean::inc(x_75); -lean::dec(x_70); -x_76 = l_String_OldIterator_hasNext___main(x_66); -if (x_76 == 0) -{ -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; -x_77 = lean::box(0); -x_78 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_79 = l_mjoin___rarg___closed__1; -x_80 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_78, x_79, x_77, x_77, x_1, x_2, x_66, x_74); -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_80, 1); -lean::inc(x_82); -lean::dec(x_80); -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_81); -x_85 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_75, x_84); -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_85); -x_6 = x_86; -x_7 = x_82; -goto block_18; -} -else -{ -uint32 x_87; uint8 x_88; -x_87 = l_String_OldIterator_curr___main(x_66); -x_88 = l_Lean_isIdFirst(x_87); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_89 = l_Char_quoteCore(x_87); -x_90 = l_Char_HasRepr___closed__1; -x_91 = lean::string_append(x_90, x_89); -lean::dec(x_89); -x_92 = lean::string_append(x_91, x_90); -x_93 = lean::box(0); -x_94 = l_mjoin___rarg___closed__1; -x_95 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__2___rarg(x_92, x_94, x_93, x_93, x_1, x_2, x_66, x_74); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -lean::dec(x_95); -x_98 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_96); -x_100 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_75, x_99); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_100); -x_6 = x_101; -x_7 = x_97; -goto block_18; -} -else -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_75); -x_102 = l_String_OldIterator_next___main(x_66); -x_103 = lean::box(0); -x_104 = lean::box_uint32(x_87); -x_105 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_102); -lean::cnstr_set(x_105, 2, x_103); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_105); -x_6 = x_106; -x_7 = x_74; -goto block_18; -} -} -} -else -{ -obj* x_107; obj* x_108; -lean::dec(x_66); -x_107 = lean::cnstr_get(x_69, 1); -lean::inc(x_107); -lean::dec(x_69); -x_108 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_70); -x_6 = x_108; -x_7 = x_107; -goto block_18; -} -} -} -} -else -{ -obj* x_109; uint8 x_110; -x_109 = lean::cnstr_get(x_19, 1); -lean::inc(x_109); -lean::dec(x_19); -x_110 = !lean::is_exclusive(x_20); -if (x_110 == 0) -{ -x_6 = x_20; -x_7 = x_109; -goto block_18; -} -else -{ -obj* x_111; uint8 x_112; obj* x_113; -x_111 = lean::cnstr_get(x_20, 0); -x_112 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); -lean::inc(x_111); -lean::dec(x_20); -x_113 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_112); -x_6 = x_113; -x_7 = x_109; -goto block_18; -} -} -block_18: -{ -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_6, 2); -lean::dec(x_9); -x_10 = lean::cnstr_get(x_6, 1); -lean::dec(x_10); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_11); -lean::cnstr_set(x_6, 1, x_4); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_7); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = lean::cnstr_get(x_6, 0); -lean::inc(x_13); -lean::dec(x_6); -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_4); -lean::cnstr_set(x_15, 2, x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_7); -return x_16; -} -} -else -{ -obj* x_17; -lean::dec(x_4); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_6); -lean::cnstr_set(x_17, 1, x_7); -return x_17; -} -} -} -} -obj* _init_l_Lean_Parser_detailIdentSuffix_Parser___closed__1() { -_start: -{ -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; -x_1 = lean::mk_string("."); -x_2 = l_String_quote(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_5 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed), 5, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView___lambda__2___boxed), 6, 1); -lean::closure_set(x_7, 0, x_3); -x_8 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__6___rarg), 6, 2); -lean::closure_set(x_8, 0, x_6); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::box(0); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_RecT_recurse___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__7), 5, 1); -lean::closure_set(x_10, 0, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -obj* l_Lean_Parser_detailIdentSuffix_Parser(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint32 x_5; obj* x_6; uint8 x_7; -x_5 = 46; -x_6 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser___spec__1(x_1, x_2, x_5, x_3, x_4); -x_7 = !lean::is_exclusive(x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; -x_8 = lean::cnstr_get(x_6, 0); -x_9 = lean::cnstr_get(x_6, 1); -x_10 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_8); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint8 x_16; -lean::free_heap_obj(x_6); -x_11 = lean::cnstr_get(x_10, 1); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_10, 2); -lean::inc(x_12); -lean::dec(x_10); -x_13 = l_Lean_Parser_detailIdentSuffix; -x_14 = l_Lean_Parser_detailIdentSuffix_Parser___closed__1; -x_15 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__8(x_13, x_14, x_1, x_2, x_11, x_9); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 0); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_17); -lean::cnstr_set(x_15, 0, x_18); -return x_15; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_15, 0); -x_20 = lean::cnstr_get(x_15, 1); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_15); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_19); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -return x_22; -} -} -else -{ -uint8 x_23; -lean::dec(x_2); -lean::dec(x_1); -x_23 = !lean::is_exclusive(x_10); -if (x_23 == 0) -{ -lean::cnstr_set(x_6, 0, x_10); -return x_6; -} -else -{ -obj* x_24; uint8 x_25; obj* x_26; -x_24 = lean::cnstr_get(x_10, 0); -x_25 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_24); -lean::dec(x_10); -x_26 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_25); -lean::cnstr_set(x_6, 0, x_26); -return x_6; -} -} -} -else -{ -obj* x_27; obj* x_28; obj* x_29; -x_27 = lean::cnstr_get(x_6, 0); -x_28 = lean::cnstr_get(x_6, 1); -lean::inc(x_28); -lean::inc(x_27); -lean::dec(x_6); -x_29 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_27); -if (lean::obj_tag(x_29) == 0) -{ -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; -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 2); -lean::inc(x_31); -lean::dec(x_29); -x_32 = l_Lean_Parser_detailIdentSuffix; -x_33 = l_Lean_Parser_detailIdentSuffix_Parser___closed__1; -x_34 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__8(x_32, x_33, x_1, x_2, x_30, x_28); -x_35 = lean::cnstr_get(x_34, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 1); -lean::inc(x_36); -if (lean::is_exclusive(x_34)) { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - x_37 = x_34; -} else { - lean::dec_ref(x_34); - x_37 = lean::box(0); -} -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_35); -if (lean::is_scalar(x_37)) { - x_39 = lean::alloc_cnstr(0, 2, 0); -} else { - x_39 = x_37; -} -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_36); -return x_39; -} -else -{ -obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_44; -lean::dec(x_2); -lean::dec(x_1); -x_40 = lean::cnstr_get(x_29, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get_scalar(x_29, sizeof(void*)*1); -if (lean::is_exclusive(x_29)) { - lean::cnstr_release(x_29, 0); - x_42 = x_29; -} else { - lean::dec_ref(x_29); - x_42 = lean::box(0); -} -if (lean::is_scalar(x_42)) { - x_43 = lean::alloc_cnstr(1, 1, 1); -} else { - x_43 = x_42; -} -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_41); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_28); -return x_44; -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; obj* x_7; -x_6 = lean::unbox_uint32(x_3); -lean::dec(x_3); -x_7 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_detailIdentSuffix_Parser___spec__1(x_1, x_2, x_6, x_4, x_5); -lean::dec(x_2); -lean::dec(x_1); -return x_7; -} -} -obj* _init_l_Lean_Parser_detailIdent() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("detailIdent"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; -x_1 = lean::box(0); -x_2 = l_Lean_Parser_noKind; -x_3 = l_Lean_Parser_Syntax_mkNode(x_2, x_1); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_1); -return x_4; -} -} -obj* l_Lean_Parser_detailIdent_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::cnstr_get(x_1, 1); -lean::inc(x_3); -lean::dec(x_1); -x_4 = l_Lean_Parser_detailIdentPart_HasView; -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_2); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_7 = l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1; -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = l_Lean_Parser_detailIdent; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_11 = lean::cnstr_get(x_3, 0); -lean::inc(x_11); -lean::dec(x_3); -x_12 = lean::box(0); -x_13 = l_Lean_Parser_detailIdentSuffix_HasView; -x_14 = lean::cnstr_get(x_13, 1); -lean::inc(x_14); -x_15 = lean::apply_1(x_14, x_11); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_12); -x_17 = l_Lean_Parser_noKind; -x_18 = l_Lean_Parser_Syntax_mkNode(x_17, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_12); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_6); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_Lean_Parser_detailIdent; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -} -obj* _init_l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_detailIdentSuffix_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -return x_5; -} -} -obj* _init_l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = l_Lean_Parser_detailIdentPart_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -x_3 = lean::box(3); -x_4 = lean::apply_1(x_2, x_3); -x_5 = l_Lean_Parser_Syntax_asNode___main(x_3); -if (lean::obj_tag(x_5) == 0) -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -else -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_5, 0); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; -lean::free_heap_obj(x_5); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_11); -return x_12; -} -else -{ -obj* x_13; -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_10, 0); -lean::inc(x_14); -lean::dec(x_10); -x_15 = l_Lean_Parser_detailIdentSuffix_HasView; -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::apply_1(x_16, x_14); -lean::cnstr_set(x_5, 0, x_17); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_5); -return x_18; -} -else -{ -obj* x_19; obj* x_20; -lean::dec(x_13); -lean::dec(x_10); -lean::free_heap_obj(x_5); -x_19 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_4); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -} -else -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_5, 0); -lean::inc(x_21); -lean::dec(x_5); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::box(0); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_4); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -else -{ -obj* x_25; -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_22, 0); -lean::inc(x_26); -lean::dec(x_22); -x_27 = l_Lean_Parser_detailIdentSuffix_HasView; -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_29 = lean::apply_1(x_28, x_26); -x_30 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_30, 0, x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_4); -lean::cnstr_set(x_31, 1, x_30); -return x_31; -} -else -{ -obj* x_32; obj* x_33; -lean::dec(x_25); -lean::dec(x_22); -x_32 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_4); -lean::cnstr_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -} -obj* l_Lean_Parser_detailIdent_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_68; -x_68 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_68) == 0) -{ -obj* x_69; -x_69 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__2; -return x_69; -} -else -{ -obj* x_70; obj* x_71; -x_70 = lean::cnstr_get(x_68, 0); -lean::inc(x_70); -lean::dec(x_68); -x_71 = lean::cnstr_get(x_70, 1); -lean::inc(x_71); -lean::dec(x_70); -if (lean::obj_tag(x_71) == 0) -{ -obj* x_72; -x_72 = lean::box(3); -x_2 = x_71; -x_3 = x_72; -goto block_67; -} -else -{ -obj* x_73; obj* x_74; -x_73 = lean::cnstr_get(x_71, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get(x_71, 1); -lean::inc(x_74); -lean::dec(x_71); -x_2 = x_74; -x_3 = x_73; -goto block_67; -} -} -block_67: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_detailIdentPart_HasView; -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::apply_1(x_5, x_3); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_7; obj* x_8; -x_7 = lean::box(3); -x_8 = l_Lean_Parser_Syntax_asNode___main(x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_6); -lean::cnstr_set(x_10, 1, x_9); -return x_10; -} -else -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::dec(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; -lean::free_heap_obj(x_8); -x_14 = lean::box(0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -return x_15; -} -else -{ -obj* x_16; -x_16 = lean::cnstr_get(x_13, 1); -lean::inc(x_16); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_17 = lean::cnstr_get(x_13, 0); -lean::inc(x_17); -lean::dec(x_13); -x_18 = l_Lean_Parser_detailIdentSuffix_HasView; -x_19 = lean::cnstr_get(x_18, 0); -lean::inc(x_19); -x_20 = lean::apply_1(x_19, x_17); -lean::cnstr_set(x_8, 0, x_20); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_6); -lean::cnstr_set(x_21, 1, x_8); -return x_21; -} -else -{ -obj* x_22; obj* x_23; -lean::dec(x_16); -lean::dec(x_13); -lean::free_heap_obj(x_8); -x_22 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_6); -lean::cnstr_set(x_23, 1, x_22); -return x_23; -} -} -} -else -{ -obj* x_24; obj* x_25; -x_24 = lean::cnstr_get(x_8, 0); -lean::inc(x_24); -lean::dec(x_8); -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -lean::dec(x_24); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; -x_26 = lean::box(0); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_26); -return x_27; -} -else -{ -obj* x_28; -x_28 = lean::cnstr_get(x_25, 1); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_25, 0); -lean::inc(x_29); -lean::dec(x_25); -x_30 = l_Lean_Parser_detailIdentSuffix_HasView; -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_32 = lean::apply_1(x_31, x_29); -x_33 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_33, 0, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_6); -lean::cnstr_set(x_34, 1, x_33); -return x_34; -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_28); -lean::dec(x_25); -x_35 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_6); -lean::cnstr_set(x_36, 1, x_35); -return x_36; -} -} -} -} -} -else -{ -obj* x_37; obj* x_38; -x_37 = lean::cnstr_get(x_2, 0); -lean::inc(x_37); -lean::dec(x_2); -x_38 = l_Lean_Parser_Syntax_asNode___main(x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; -x_39 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_6); -lean::cnstr_set(x_40, 1, x_39); -return x_40; -} -else -{ -uint8 x_41; -x_41 = !lean::is_exclusive(x_38); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; -x_42 = lean::cnstr_get(x_38, 0); -x_43 = lean::cnstr_get(x_42, 1); -lean::inc(x_43); -lean::dec(x_42); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; obj* x_45; -lean::free_heap_obj(x_38); -x_44 = lean::box(0); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_6); -lean::cnstr_set(x_45, 1, x_44); -return x_45; -} -else -{ -obj* x_46; -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = l_Lean_Parser_detailIdentSuffix_HasView; -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::apply_1(x_49, x_47); -lean::cnstr_set(x_38, 0, x_50); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_6); -lean::cnstr_set(x_51, 1, x_38); -return x_51; -} -else -{ -obj* x_52; obj* x_53; -lean::dec(x_46); -lean::dec(x_43); -lean::free_heap_obj(x_38); -x_52 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_6); -lean::cnstr_set(x_53, 1, x_52); -return x_53; -} -} -} -else -{ -obj* x_54; obj* x_55; -x_54 = lean::cnstr_get(x_38, 0); -lean::inc(x_54); -lean::dec(x_38); -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -lean::dec(x_54); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; -x_56 = lean::box(0); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_6); -lean::cnstr_set(x_57, 1, x_56); -return x_57; -} -else -{ -obj* x_58; -x_58 = lean::cnstr_get(x_55, 1); -lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_59 = lean::cnstr_get(x_55, 0); -lean::inc(x_59); -lean::dec(x_55); -x_60 = l_Lean_Parser_detailIdentSuffix_HasView; -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -x_62 = lean::apply_1(x_61, x_59); -x_63 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_63, 0, x_62); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_6); -lean::cnstr_set(x_64, 1, x_63); -return x_64; -} -else -{ -obj* x_65; obj* x_66; -lean::dec(x_58); -lean::dec(x_55); -x_65 = l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1; -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_6); -lean::cnstr_set(x_66, 1, x_65); -return x_66; -} -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_detailIdent_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdent_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdent_HasView_x27___elambda__1), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_detailIdent_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_detailIdent_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_detailIdent_x27___spec__1(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; -if (x_2 == 0) -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_94; obj* x_95; -x_53 = lean::box(0); -lean::inc(x_5); -x_94 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -if (lean::obj_tag(x_95) == 0) -{ -obj* x_96; -x_96 = lean::cnstr_get(x_94, 1); -lean::inc(x_96); -lean::dec(x_94); -x_54 = x_95; -x_55 = x_96; -goto block_93; -} -else -{ -obj* x_97; obj* x_98; -x_97 = lean::cnstr_get(x_95, 0); -lean::inc(x_97); -x_98 = lean::cnstr_get(x_97, 3); -lean::inc(x_98); -if (lean::obj_tag(x_98) == 0) -{ -obj* x_99; uint8 x_100; -x_99 = lean::cnstr_get(x_94, 1); -lean::inc(x_99); -lean::dec(x_94); -x_100 = !lean::is_exclusive(x_95); -if (x_100 == 0) -{ -uint8 x_101; obj* x_102; uint8 x_103; -x_101 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -x_102 = lean::cnstr_get(x_95, 0); -lean::dec(x_102); -x_103 = !lean::is_exclusive(x_97); -if (x_103 == 0) -{ -obj* x_104; obj* x_105; -x_104 = lean::cnstr_get(x_97, 3); -lean::dec(x_104); -x_105 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -lean::cnstr_set(x_97, 3, x_105); -if (x_101 == 0) -{ -uint8 x_106; -x_106 = 0; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_106); -x_54 = x_95; -x_55 = x_99; -goto block_93; -} -else -{ -uint8 x_107; -x_107 = 1; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_107); -x_54 = x_95; -x_55 = x_99; -goto block_93; -} -} -else -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_108 = lean::cnstr_get(x_97, 0); -x_109 = lean::cnstr_get(x_97, 1); -x_110 = lean::cnstr_get(x_97, 2); -lean::inc(x_110); -lean::inc(x_109); -lean::inc(x_108); -lean::dec(x_97); -x_111 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -x_112 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_112, 0, x_108); -lean::cnstr_set(x_112, 1, x_109); -lean::cnstr_set(x_112, 2, x_110); -lean::cnstr_set(x_112, 3, x_111); -if (x_101 == 0) -{ -uint8 x_113; -x_113 = 0; -lean::cnstr_set(x_95, 0, x_112); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_113); -x_54 = x_95; -x_55 = x_99; -goto block_93; -} -else -{ -uint8 x_114; -x_114 = 1; -lean::cnstr_set(x_95, 0, x_112); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_114); -x_54 = x_95; -x_55 = x_99; -goto block_93; -} -} -} -else -{ -uint8 x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_115 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -lean::dec(x_95); -x_116 = lean::cnstr_get(x_97, 0); -lean::inc(x_116); -x_117 = lean::cnstr_get(x_97, 1); -lean::inc(x_117); -x_118 = lean::cnstr_get(x_97, 2); -lean::inc(x_118); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - lean::cnstr_release(x_97, 2); - lean::cnstr_release(x_97, 3); - x_119 = x_97; -} else { - lean::dec_ref(x_97); - x_119 = lean::box(0); -} -x_120 = l_Lean_Parser_Combinators_optional___rarg___lambda__1___closed__1; -if (lean::is_scalar(x_119)) { - x_121 = lean::alloc_cnstr(0, 4, 0); -} else { - x_121 = x_119; -} -lean::cnstr_set(x_121, 0, x_116); -lean::cnstr_set(x_121, 1, x_117); -lean::cnstr_set(x_121, 2, x_118); -lean::cnstr_set(x_121, 3, x_120); -if (x_115 == 0) -{ -uint8 x_122; obj* x_123; -x_122 = 0; -x_123 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_123, 0, x_121); -lean::cnstr_set_scalar(x_123, sizeof(void*)*1, x_122); -x_54 = x_123; -x_55 = x_99; -goto block_93; -} -else -{ -uint8 x_124; obj* x_125; -x_124 = 1; -x_125 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_125, 0, x_121); -lean::cnstr_set_scalar(x_125, sizeof(void*)*1, x_124); -x_54 = x_125; -x_55 = x_99; -goto block_93; -} -} -} -else -{ -obj* x_126; uint8 x_127; -x_126 = lean::cnstr_get(x_94, 1); -lean::inc(x_126); -lean::dec(x_94); -x_127 = !lean::is_exclusive(x_95); -if (x_127 == 0) -{ -uint8 x_128; obj* x_129; uint8 x_130; -x_128 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -x_129 = lean::cnstr_get(x_95, 0); -lean::dec(x_129); -x_130 = !lean::is_exclusive(x_97); -if (x_130 == 0) -{ -obj* x_131; uint8 x_132; -x_131 = lean::cnstr_get(x_97, 3); -lean::dec(x_131); -x_132 = !lean::is_exclusive(x_98); -if (x_132 == 0) -{ -obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; -x_133 = lean::cnstr_get(x_98, 0); -x_134 = lean::box(0); -x_135 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_135, 0, x_133); -lean::cnstr_set(x_135, 1, x_134); -x_136 = l_Lean_Parser_noKind; -x_137 = l_Lean_Parser_Syntax_mkNode(x_136, x_135); -lean::cnstr_set(x_98, 0, x_137); -if (x_128 == 0) -{ -uint8 x_138; -x_138 = 0; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_138); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -else -{ -uint8 x_139; -x_139 = 1; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_139); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -} -else -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; -x_140 = lean::cnstr_get(x_98, 0); -lean::inc(x_140); -lean::dec(x_98); -x_141 = lean::box(0); -x_142 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_142, 0, x_140); -lean::cnstr_set(x_142, 1, x_141); -x_143 = l_Lean_Parser_noKind; -x_144 = l_Lean_Parser_Syntax_mkNode(x_143, x_142); -x_145 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_145, 0, x_144); -lean::cnstr_set(x_97, 3, x_145); -if (x_128 == 0) -{ -uint8 x_146; -x_146 = 0; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_146); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -else -{ -uint8 x_147; -x_147 = 1; -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_147); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -} -} -else -{ -obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; -x_148 = lean::cnstr_get(x_97, 0); -x_149 = lean::cnstr_get(x_97, 1); -x_150 = lean::cnstr_get(x_97, 2); -lean::inc(x_150); -lean::inc(x_149); -lean::inc(x_148); -lean::dec(x_97); -x_151 = lean::cnstr_get(x_98, 0); -lean::inc(x_151); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - x_152 = x_98; -} else { - lean::dec_ref(x_98); - x_152 = lean::box(0); -} -x_153 = lean::box(0); -x_154 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_154, 0, x_151); -lean::cnstr_set(x_154, 1, x_153); -x_155 = l_Lean_Parser_noKind; -x_156 = l_Lean_Parser_Syntax_mkNode(x_155, x_154); -if (lean::is_scalar(x_152)) { - x_157 = lean::alloc_cnstr(1, 1, 0); -} else { - x_157 = x_152; -} -lean::cnstr_set(x_157, 0, x_156); -x_158 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_158, 0, x_148); -lean::cnstr_set(x_158, 1, x_149); -lean::cnstr_set(x_158, 2, x_150); -lean::cnstr_set(x_158, 3, x_157); -if (x_128 == 0) -{ -uint8 x_159; -x_159 = 0; -lean::cnstr_set(x_95, 0, x_158); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_159); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -else -{ -uint8 x_160; -x_160 = 1; -lean::cnstr_set(x_95, 0, x_158); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_160); -x_54 = x_95; -x_55 = x_126; -goto block_93; -} -} -} -else -{ -uint8 x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; -x_161 = lean::cnstr_get_scalar(x_95, sizeof(void*)*1); -lean::dec(x_95); -x_162 = lean::cnstr_get(x_97, 0); -lean::inc(x_162); -x_163 = lean::cnstr_get(x_97, 1); -lean::inc(x_163); -x_164 = lean::cnstr_get(x_97, 2); -lean::inc(x_164); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - lean::cnstr_release(x_97, 2); - lean::cnstr_release(x_97, 3); - x_165 = x_97; -} else { - lean::dec_ref(x_97); - x_165 = lean::box(0); -} -x_166 = lean::cnstr_get(x_98, 0); -lean::inc(x_166); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - x_167 = x_98; -} else { - lean::dec_ref(x_98); - x_167 = lean::box(0); -} -x_168 = lean::box(0); -x_169 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_169, 0, x_166); -lean::cnstr_set(x_169, 1, x_168); -x_170 = l_Lean_Parser_noKind; -x_171 = l_Lean_Parser_Syntax_mkNode(x_170, x_169); -if (lean::is_scalar(x_167)) { - x_172 = lean::alloc_cnstr(1, 1, 0); -} else { - x_172 = x_167; -} -lean::cnstr_set(x_172, 0, x_171); -if (lean::is_scalar(x_165)) { - x_173 = lean::alloc_cnstr(0, 4, 0); -} else { - x_173 = x_165; -} -lean::cnstr_set(x_173, 0, x_162); -lean::cnstr_set(x_173, 1, x_163); -lean::cnstr_set(x_173, 2, x_164); -lean::cnstr_set(x_173, 3, x_172); -if (x_161 == 0) -{ -uint8 x_174; obj* x_175; -x_174 = 0; -x_175 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_175, 0, x_173); -lean::cnstr_set_scalar(x_175, sizeof(void*)*1, x_174); -x_54 = x_175; -x_55 = x_126; -goto block_93; -} -else -{ -uint8 x_176; obj* x_177; -x_176 = 1; -x_177 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_177, 0, x_173); -lean::cnstr_set_scalar(x_177, sizeof(void*)*1, x_176); -x_54 = x_177; -x_55 = x_126; -goto block_93; -} -} -} -} -block_93: -{ -if (lean::obj_tag(x_54) == 0) -{ -uint8 x_56; -x_56 = !lean::is_exclusive(x_54); -if (x_56 == 0) -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_57 = lean::cnstr_get(x_54, 0); -x_58 = lean::cnstr_get(x_54, 2); -x_59 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_59, 0, x_57); -x_60 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_54, 2, x_60); -lean::cnstr_set(x_54, 0, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_54); -if (lean::obj_tag(x_61) == 0) -{ -lean::dec(x_5); -x_7 = x_61; -x_8 = x_55; -goto block_52; -} -else -{ -uint8 x_62; -x_62 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_63 = lean::cnstr_get(x_61, 0); -lean::inc(x_63); -lean::dec(x_61); -x_64 = lean::cnstr_get(x_63, 2); -lean::inc(x_64); -lean::dec(x_63); -x_65 = l_mjoin___rarg___closed__1; -x_66 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_66, 0, x_64); -lean::closure_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -x_68 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_68, 0, x_53); -lean::cnstr_set(x_68, 1, x_5); -lean::cnstr_set(x_68, 2, x_67); -x_7 = x_68; -x_8 = x_55; -goto block_52; -} -else -{ -lean::dec(x_5); -x_7 = x_61; -x_8 = x_55; -goto block_52; -} -} -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = lean::cnstr_get(x_54, 0); -x_70 = lean::cnstr_get(x_54, 1); -x_71 = lean::cnstr_get(x_54, 2); -lean::inc(x_71); -lean::inc(x_70); -lean::inc(x_69); -lean::dec(x_54); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_69); -x_73 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_74 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set(x_74, 1, x_70); -lean::cnstr_set(x_74, 2, x_73); -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_74); -if (lean::obj_tag(x_75) == 0) -{ -lean::dec(x_5); -x_7 = x_75; -x_8 = x_55; -goto block_52; -} -else -{ -uint8 x_76; -x_76 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); -if (x_76 == 0) -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; -x_77 = lean::cnstr_get(x_75, 0); -lean::inc(x_77); -lean::dec(x_75); -x_78 = lean::cnstr_get(x_77, 2); -lean::inc(x_78); -lean::dec(x_77); -x_79 = l_mjoin___rarg___closed__1; -x_80 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_80, 0, x_78); -lean::closure_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -x_82 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_82, 0, x_53); -lean::cnstr_set(x_82, 1, x_5); -lean::cnstr_set(x_82, 2, x_81); -x_7 = x_82; -x_8 = x_55; -goto block_52; -} -else -{ -lean::dec(x_5); -x_7 = x_75; -x_8 = x_55; -goto block_52; -} -} -} -} -else -{ -uint8 x_83; -x_83 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; -x_84 = lean::cnstr_get(x_54, 0); -lean::inc(x_84); -lean::dec(x_54); -x_85 = lean::cnstr_get(x_84, 2); -lean::inc(x_85); -lean::dec(x_84); -x_86 = l_mjoin___rarg___closed__1; -x_87 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_87, 0, x_85); -lean::closure_set(x_87, 1, x_86); -x_88 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_88, 0, x_87); -x_89 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_89, 0, x_53); -lean::cnstr_set(x_89, 1, x_5); -lean::cnstr_set(x_89, 2, x_88); -x_7 = x_89; -x_8 = x_55; -goto block_52; -} -else -{ -uint8 x_90; -lean::dec(x_5); -x_90 = !lean::is_exclusive(x_54); -if (x_90 == 0) -{ -x_7 = x_54; -x_8 = x_55; -goto block_52; -} -else -{ -obj* x_91; obj* x_92; -x_91 = lean::cnstr_get(x_54, 0); -lean::inc(x_91); -lean::dec(x_54); -x_92 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set_scalar(x_92, sizeof(void*)*1, x_83); -x_7 = x_92; -x_8 = x_55; -goto block_52; -} -} -} -} -} -else -{ -obj* x_178; -x_178 = lean::apply_4(x_1, x_3, x_4, x_5, x_6); -return x_178; -} -block_52: -{ -if (lean::obj_tag(x_7) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_7); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_11 = lean::cnstr_get(x_7, 2); -x_12 = lean::cnstr_get(x_7, 0); -lean::dec(x_12); -x_13 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_14); -lean::cnstr_set(x_7, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_7); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_8); -return x_16; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_17 = lean::cnstr_get(x_7, 1); -x_18 = lean::cnstr_get(x_7, 2); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_7); -x_19 = l_Lean_Parser_Combinators_many___rarg___closed__1; -x_20 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_17); -lean::cnstr_set(x_21, 2, x_20); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_21); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_8); -return x_23; -} -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_7); -if (x_24 == 0) -{ -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; -x_25 = lean::cnstr_get(x_7, 2); -x_26 = lean::cnstr_get(x_7, 0); -lean::dec(x_26); -x_27 = lean::cnstr_get(x_9, 0); -lean::inc(x_27); -lean::dec(x_9); -x_28 = lean::box(0); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_Lean_Parser_noKind; -x_31 = l_Lean_Parser_Syntax_mkNode(x_30, x_29); -x_32 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_32); -lean::cnstr_set(x_7, 0, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_7); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_8); -return x_34; -} -else -{ -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; -x_35 = lean::cnstr_get(x_7, 1); -x_36 = lean::cnstr_get(x_7, 2); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_7); -x_37 = lean::cnstr_get(x_9, 0); -lean::inc(x_37); -lean::dec(x_9); -x_38 = lean::box(0); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_38); -x_40 = l_Lean_Parser_noKind; -x_41 = l_Lean_Parser_Syntax_mkNode(x_40, x_39); -x_42 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_35); -lean::cnstr_set(x_43, 2, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_43); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_8); -return x_45; -} -} -} -else -{ -uint8 x_46; -x_46 = !lean::is_exclusive(x_7); -if (x_46 == 0) -{ -obj* x_47; -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_7); -lean::cnstr_set(x_47, 1, x_8); -return x_47; -} -else -{ -obj* x_48; uint8 x_49; obj* x_50; obj* x_51; -x_48 = lean::cnstr_get(x_7, 0); -x_49 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_48); -lean::dec(x_7); -x_50 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_50, 0, x_48); -lean::cnstr_set_scalar(x_50, sizeof(void*)*1, x_49); -x_51 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_8); -return x_51; -} -} -} -} -} -obj* _init_l_Lean_Parser_detailIdent_x27___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; uint8 x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentPart_Parser), 3, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__4___rarg___boxed), 5, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdentSuffix_Parser), 4, 0); -x_4 = 0; -x_5 = lean::box(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_optional___at_Lean_Parser_detailIdent_x27___spec__1___boxed), 6, 2); -lean::closure_set(x_6, 0, x_3); -lean::closure_set(x_6, 1, x_5); -x_7 = lean::box(0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -obj* l_Lean_Parser_detailIdent_x27(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_Lean_Parser_detailIdent; -x_6 = l_Lean_Parser_detailIdent_x27___closed__1; -x_7 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens___spec__8(x_5, x_6, x_1, x_2, x_3, x_4); -return x_7; -} -} -obj* l_Lean_Parser_Combinators_optional___at_Lean_Parser_detailIdent_x27___spec__1___boxed(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); -lean::dec(x_2); -x_8 = l_Lean_Parser_Combinators_optional___at_Lean_Parser_detailIdent_x27___spec__1(x_1, x_7, x_3, x_4, x_5, x_6); -return x_8; -} -} -obj* l_Lean_Parser_detailIdent_Parser___lambda__1(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; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_RecT_runParsec___rarg___lambda__1___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_2, x_3, x_4); -return x_8; -} -} -obj* l_Lean_Parser_detailIdent_Parser___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_detailIdent_x27(x_1, x_3, x_4, x_5); -return x_6; -} -} -obj* _init_l_Lean_Parser_detailIdent_Parser___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdent_Parser___lambda__1___boxed), 4, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_detailIdent_Parser___lambda__2___boxed), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_fixCore___rarg___boxed), 3, 2); -lean::closure_set(x_3, 0, x_1); -lean::closure_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_detailIdent_Parser(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_detailIdent_Parser___closed__1; -x_5 = l_Lean_Parser_detailIdent_x27(x_4, x_1, x_2, x_3); -return x_5; -} -} -obj* l_Lean_Parser_detailIdent_Parser___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_detailIdent_Parser___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_detailIdent_Parser___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_detailIdent_Parser___lambda__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = l_String_OldIterator_curr___main(x_1); -x_4 = l_Lean_Parser_finishCommentBlock___closed__2; -x_5 = lean::box_uint32(x_3); -x_6 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -lean::cnstr_set(x_6, 2, x_4); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_String_OldIterator_remaining___main(x_3); -x_6 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__7(x_5, x_1, x_3); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_4); -return x_7; -} -} -obj* l_Lean_Parser_idPartDefault___at___private_init_lean_parser_token_4__ident_x27___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = lean::cnstr_get(x_8, 1); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_10); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint32 x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::free_heap_obj(x_8); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_13, 2); -lean::inc(x_16); -lean::dec(x_13); -x_17 = l_String_splitAux___main___closed__1; -x_18 = lean::unbox_uint32(x_14); -lean::dec(x_14); -x_19 = lean::string_push(x_17, x_18); -x_20 = l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4(x_19, x_1, x_15, x_11); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -lean::cnstr_set(x_20, 0, x_23); -return x_20; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_24 = lean::cnstr_get(x_20, 0); -x_25 = lean::cnstr_get(x_20, 1); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_20); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_24); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -return x_27; -} -} -else -{ -uint8 x_28; -x_28 = !lean::is_exclusive(x_13); -if (x_28 == 0) -{ -lean::cnstr_set(x_8, 0, x_13); -return x_8; -} -else -{ -obj* x_29; uint8 x_30; obj* x_31; -x_29 = lean::cnstr_get(x_13, 0); -x_30 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -lean::inc(x_29); -lean::dec(x_13); -x_31 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set_scalar(x_31, sizeof(void*)*1, x_30); -lean::cnstr_set(x_8, 0, x_31); -return x_8; -} -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_32 = lean::cnstr_get(x_8, 0); -x_33 = lean::cnstr_get(x_8, 1); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_8); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_32); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; uint32 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_35, 1); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 2); -lean::inc(x_38); -lean::dec(x_35); -x_39 = l_String_splitAux___main___closed__1; -x_40 = lean::unbox_uint32(x_36); -lean::dec(x_36); -x_41 = lean::string_push(x_39, x_40); -x_42 = l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4(x_41, x_1, x_37, x_33); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_42, 1); -lean::inc(x_44); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - lean::cnstr_release(x_42, 1); - x_45 = x_42; -} else { - lean::dec_ref(x_42); - x_45 = lean::box(0); -} -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_43); -if (lean::is_scalar(x_45)) { - x_47 = lean::alloc_cnstr(0, 2, 0); -} else { - x_47 = x_45; -} -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_44); -return x_47; -} -else -{ -obj* x_48; uint8 x_49; obj* x_50; obj* x_51; obj* x_52; -x_48 = lean::cnstr_get(x_35, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get_scalar(x_35, sizeof(void*)*1); -if (lean::is_exclusive(x_35)) { - lean::cnstr_release(x_35, 0); - x_50 = x_35; -} else { - lean::dec_ref(x_35); - x_50 = lean::box(0); -} -if (lean::is_scalar(x_50)) { - x_51 = lean::alloc_cnstr(1, 1, 1); -} else { - x_51 = x_50; -} -lean::cnstr_set(x_51, 0, x_48); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_49); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_33); -return x_52; -} -} -} -else -{ -uint32 x_53; uint8 x_54; -x_53 = l_String_OldIterator_curr___main(x_2); -x_54 = l_Lean_isIdFirst(x_53); -if (x_54 == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; uint8 x_62; -x_55 = l_Char_quoteCore(x_53); -x_56 = l_Char_HasRepr___closed__1; -x_57 = lean::string_append(x_56, x_55); -lean::dec(x_55); -x_58 = lean::string_append(x_57, x_56); -x_59 = lean::box(0); -x_60 = l_mjoin___rarg___closed__1; -x_61 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_58, x_60, x_59, x_59, x_1, x_2, x_3); -x_62 = !lean::is_exclusive(x_61); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_63 = lean::cnstr_get(x_61, 0); -x_64 = lean::cnstr_get(x_61, 1); -x_65 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_63); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; uint32 x_71; obj* x_72; obj* x_73; uint8 x_74; -lean::free_heap_obj(x_61); -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_66, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_66, 2); -lean::inc(x_69); -lean::dec(x_66); -x_70 = l_String_splitAux___main___closed__1; -x_71 = lean::unbox_uint32(x_67); -lean::dec(x_67); -x_72 = lean::string_push(x_70, x_71); -x_73 = l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4(x_72, x_1, x_68, x_64); -x_74 = !lean::is_exclusive(x_73); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_73, 0); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_75); -lean::cnstr_set(x_73, 0, x_76); -return x_73; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_77 = lean::cnstr_get(x_73, 0); -x_78 = lean::cnstr_get(x_73, 1); -lean::inc(x_78); -lean::inc(x_77); -lean::dec(x_73); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_77); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_78); -return x_80; -} -} -else -{ -uint8 x_81; -x_81 = !lean::is_exclusive(x_66); -if (x_81 == 0) -{ -lean::cnstr_set(x_61, 0, x_66); -return x_61; -} -else -{ -obj* x_82; uint8 x_83; obj* x_84; -x_82 = lean::cnstr_get(x_66, 0); -x_83 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); -lean::inc(x_82); -lean::dec(x_66); -x_84 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_84, 0, x_82); -lean::cnstr_set_scalar(x_84, sizeof(void*)*1, x_83); -lean::cnstr_set(x_61, 0, x_84); -return x_61; -} -} -} -else -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_85 = lean::cnstr_get(x_61, 0); -x_86 = lean::cnstr_get(x_61, 1); -lean::inc(x_86); -lean::inc(x_85); -lean::dec(x_61); -x_87 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_88 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_85); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint32 x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -x_90 = lean::cnstr_get(x_88, 1); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_88, 2); -lean::inc(x_91); -lean::dec(x_88); -x_92 = l_String_splitAux___main___closed__1; -x_93 = lean::unbox_uint32(x_89); -lean::dec(x_89); -x_94 = lean::string_push(x_92, x_93); -x_95 = l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4(x_94, x_1, x_90, x_86); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -if (lean::is_exclusive(x_95)) { - lean::cnstr_release(x_95, 0); - lean::cnstr_release(x_95, 1); - x_98 = x_95; -} else { - lean::dec_ref(x_95); - x_98 = lean::box(0); -} -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_96); -if (lean::is_scalar(x_98)) { - x_100 = lean::alloc_cnstr(0, 2, 0); -} else { - x_100 = x_98; -} -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_97); -return x_100; -} -else -{ -obj* x_101; uint8 x_102; obj* x_103; obj* x_104; obj* x_105; -x_101 = lean::cnstr_get(x_88, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -if (lean::is_exclusive(x_88)) { - lean::cnstr_release(x_88, 0); - x_103 = x_88; -} else { - lean::dec_ref(x_88); - x_103 = lean::box(0); -} -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(1, 1, 1); -} else { - x_104 = x_103; -} -lean::cnstr_set(x_104, 0, x_101); -lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); -x_105 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_86); -return x_105; -} -} -} -else -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; uint8 x_111; -x_106 = l_String_OldIterator_next___main(x_2); -x_107 = lean::box(0); -x_108 = l_String_splitAux___main___closed__1; -x_109 = lean::string_push(x_108, x_53); -x_110 = l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4(x_109, x_1, x_106, x_3); -x_111 = !lean::is_exclusive(x_110); -if (x_111 == 0) -{ -obj* x_112; obj* x_113; -x_112 = lean::cnstr_get(x_110, 0); -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_107, x_112); -lean::cnstr_set(x_110, 0, x_113); -return x_110; -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; -x_114 = lean::cnstr_get(x_110, 0); -x_115 = lean::cnstr_get(x_110, 1); -lean::inc(x_115); -lean::inc(x_114); -lean::dec(x_110); -x_116 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_107, x_114); -x_117 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_117, 0, x_116); -lean::cnstr_set(x_117, 1, x_115); -return x_117; -} -} -} -} -} -obj* l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(uint32 x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = l_String_OldIterator_hasNext___main(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; uint8 x_10; -x_6 = lean::box(0); -x_7 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_7, x_8, x_6, x_6, x_2, x_3, x_4); -x_10 = !lean::is_exclusive(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; -x_11 = lean::cnstr_get(x_9, 0); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_11); -lean::cnstr_set(x_9, 0, x_13); -return x_9; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 1); -lean::inc(x_15); -lean::inc(x_14); -lean::dec(x_9); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_14); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_15); -return x_18; -} -} -else -{ -uint32 x_19; uint8 x_20; -x_19 = l_String_OldIterator_curr___main(x_3); -x_20 = x_19 == x_1; -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; uint8 x_28; -x_21 = l_Char_quoteCore(x_19); -x_22 = l_Char_HasRepr___closed__1; -x_23 = lean::string_append(x_22, x_21); -lean::dec(x_21); -x_24 = lean::string_append(x_23, x_22); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; -x_27 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_24, x_26, x_25, x_25, x_2, x_3, x_4); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::cnstr_get(x_27, 0); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_29); -lean::cnstr_set(x_27, 0, x_31); -return x_27; -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_32 = lean::cnstr_get(x_27, 0); -x_33 = lean::cnstr_get(x_27, 1); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_27); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_32); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_33); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_37 = l_String_OldIterator_next___main(x_3); -x_38 = lean::box(0); -x_39 = lean::box_uint32(x_19); -x_40 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_37); -lean::cnstr_set(x_40, 2, x_38); -x_41 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_4); -return x_41; -} -} -} -} -obj* l_Lean_Parser_idPartEscaped___at___private_init_lean_parser_token_4__ident_x27___spec__5(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_idBeginEscape; -x_5 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_4, x_1, x_2, x_3); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_6, 2); -lean::inc(x_9); -lean::dec(x_6); -x_10 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__1(x_1, x_8, x_7); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint32 x_16; obj* x_17; obj* x_18; -x_12 = lean::cnstr_get(x_10, 1); -lean::inc(x_12); -lean::dec(x_10); -x_13 = lean::cnstr_get(x_11, 0); -lean::inc(x_13); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_11, 2); -lean::inc(x_15); -lean::dec(x_11); -x_16 = l_Lean_idEndEscape; -x_17 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_16, x_1, x_14, x_12); -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_17); -if (x_19 == 0) -{ -obj* x_20; uint8 x_21; -x_20 = lean::cnstr_get(x_17, 0); -lean::dec(x_20); -x_21 = !lean::is_exclusive(x_18); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_18, 2); -x_23 = lean::cnstr_get(x_18, 0); -lean::dec(x_23); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_18, 2, x_24); -lean::cnstr_set(x_18, 0, x_13); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_18); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_25); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_26); -lean::cnstr_set(x_17, 0, x_27); -return x_17; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_28 = lean::cnstr_get(x_18, 1); -x_29 = lean::cnstr_get(x_18, 2); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_18); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_31 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_31, 0, x_13); -lean::cnstr_set(x_31, 1, x_28); -lean::cnstr_set(x_31, 2, x_30); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_32); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_33); -lean::cnstr_set(x_17, 0, x_34); -return x_17; -} -} -else -{ -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; -x_35 = lean::cnstr_get(x_17, 1); -lean::inc(x_35); -lean::dec(x_17); -x_36 = lean::cnstr_get(x_18, 1); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_18, 2); -lean::inc(x_37); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - lean::cnstr_release(x_18, 1); - lean::cnstr_release(x_18, 2); - x_38 = x_18; -} else { - lean::dec_ref(x_18); - x_38 = lean::box(0); -} -x_39 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_38)) { - x_40 = lean::alloc_cnstr(0, 3, 0); -} else { - x_40 = x_38; -} -lean::cnstr_set(x_40, 0, x_13); -lean::cnstr_set(x_40, 1, x_36); -lean::cnstr_set(x_40, 2, x_39); -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_40); -x_42 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_41); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_42); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_35); -return x_44; -} -} -else -{ -uint8 x_45; -lean::dec(x_13); -x_45 = !lean::is_exclusive(x_17); -if (x_45 == 0) -{ -obj* x_46; uint8 x_47; -x_46 = lean::cnstr_get(x_17, 0); -lean::dec(x_46); -x_47 = !lean::is_exclusive(x_18); -if (x_47 == 0) -{ -obj* x_48; obj* x_49; -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_18); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_48); -lean::cnstr_set(x_17, 0, x_49); -return x_17; -} -else -{ -obj* x_50; uint8 x_51; obj* x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_18, 0); -x_51 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -lean::inc(x_50); -lean::dec(x_18); -x_52 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_52, 0, x_50); -lean::cnstr_set_scalar(x_52, sizeof(void*)*1, x_51); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_52); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_53); -lean::cnstr_set(x_17, 0, x_54); -return x_17; -} -} -else -{ -obj* x_55; obj* x_56; uint8 x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_55 = lean::cnstr_get(x_17, 1); -lean::inc(x_55); -lean::dec(x_17); -x_56 = lean::cnstr_get(x_18, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -if (lean::is_exclusive(x_18)) { - lean::cnstr_release(x_18, 0); - x_58 = x_18; -} else { - lean::dec_ref(x_18); - x_58 = lean::box(0); -} -if (lean::is_scalar(x_58)) { - x_59 = lean::alloc_cnstr(1, 1, 1); -} else { - x_59 = x_58; -} -lean::cnstr_set(x_59, 0, x_56); -lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_57); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_60); -x_62 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_55); -return x_62; -} -} -} -else -{ -uint8 x_63; -x_63 = !lean::is_exclusive(x_10); -if (x_63 == 0) -{ -obj* x_64; uint8 x_65; -x_64 = lean::cnstr_get(x_10, 0); -lean::dec(x_64); -x_65 = !lean::is_exclusive(x_11); -if (x_65 == 0) -{ -obj* x_66; -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_11); -lean::cnstr_set(x_10, 0, x_66); -return x_10; -} -else -{ -obj* x_67; uint8 x_68; obj* x_69; obj* x_70; -x_67 = lean::cnstr_get(x_11, 0); -x_68 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_67); -lean::dec(x_11); -x_69 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_69, 0, x_67); -lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_68); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_69); -lean::cnstr_set(x_10, 0, x_70); -return x_10; -} -} -else -{ -obj* x_71; obj* x_72; uint8 x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_71 = lean::cnstr_get(x_10, 1); -lean::inc(x_71); -lean::dec(x_10); -x_72 = lean::cnstr_get(x_11, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_74 = x_11; -} else { - lean::dec_ref(x_11); - x_74 = lean::box(0); -} -if (lean::is_scalar(x_74)) { - x_75 = lean::alloc_cnstr(1, 1, 1); -} else { - x_75 = x_74; -} -lean::cnstr_set(x_75, 0, x_72); -lean::cnstr_set_scalar(x_75, sizeof(void*)*1, x_73); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_75); -x_77 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_71); -return x_77; -} -} -} -else -{ -uint8 x_78; -x_78 = !lean::is_exclusive(x_5); -if (x_78 == 0) -{ -obj* x_79; uint8 x_80; -x_79 = lean::cnstr_get(x_5, 0); -lean::dec(x_79); -x_80 = !lean::is_exclusive(x_6); -if (x_80 == 0) -{ -return x_5; -} -else -{ -obj* x_81; uint8 x_82; obj* x_83; -x_81 = lean::cnstr_get(x_6, 0); -x_82 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_81); -lean::dec(x_6); -x_83 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_83, 0, x_81); -lean::cnstr_set_scalar(x_83, sizeof(void*)*1, x_82); -lean::cnstr_set(x_5, 0, x_83); -return x_5; -} -} -else -{ -obj* x_84; obj* x_85; uint8 x_86; obj* x_87; obj* x_88; obj* x_89; -x_84 = lean::cnstr_get(x_5, 1); -lean::inc(x_84); -lean::dec(x_5); -x_85 = lean::cnstr_get(x_6, 0); -lean::inc(x_85); -x_86 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_87 = x_6; -} else { - lean::dec_ref(x_6); - x_87 = lean::box(0); -} -if (lean::is_scalar(x_87)) { - x_88 = lean::alloc_cnstr(1, 1, 1); -} else { - x_88 = x_87; -} -lean::cnstr_set(x_88, 0, x_85); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_86); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_84); -return x_89; -} -} -} -} -obj* l_Lean_Parser_idPart___at___private_init_lean_parser_token_4__ident_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2___rarg(x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_4, 1); -x_8 = lean::cnstr_get(x_4, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; uint32 x_12; uint8 x_13; obj* x_14; obj* x_15; obj* x_16; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_5, 2); -x_12 = lean::unbox_uint32(x_10); -lean::dec(x_10); -x_13 = l_Lean_isIdBeginEscape(x_12); -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = lean::box(x_13); -lean::cnstr_set(x_5, 2, x_14); -lean::cnstr_set(x_5, 0, x_15); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_5); -if (lean::obj_tag(x_16) == 0) -{ -obj* x_17; uint8 x_18; -lean::free_heap_obj(x_4); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -x_18 = lean::unbox(x_17); -lean::dec(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; uint8 x_22; -x_19 = lean::cnstr_get(x_16, 1); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_16, 2); -lean::inc(x_20); -lean::dec(x_16); -x_21 = l_Lean_Parser_idPartDefault___at___private_init_lean_parser_token_4__ident_x27___spec__3(x_1, x_19, x_7); -x_22 = !lean::is_exclusive(x_21); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_21, 0); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_23); -lean::cnstr_set(x_21, 0, x_24); -return x_21; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_25 = lean::cnstr_get(x_21, 0); -x_26 = lean::cnstr_get(x_21, 1); -lean::inc(x_26); -lean::inc(x_25); -lean::dec(x_21); -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_25); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_26); -return x_28; -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_29 = lean::cnstr_get(x_16, 1); -lean::inc(x_29); -x_30 = lean::cnstr_get(x_16, 2); -lean::inc(x_30); -lean::dec(x_16); -x_31 = l_Lean_Parser_idPartEscaped___at___private_init_lean_parser_token_4__ident_x27___spec__5(x_1, x_29, x_7); -x_32 = !lean::is_exclusive(x_31); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; -x_33 = lean::cnstr_get(x_31, 0); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_33); -lean::cnstr_set(x_31, 0, x_34); -return x_31; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_35 = lean::cnstr_get(x_31, 0); -x_36 = lean::cnstr_get(x_31, 1); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_31); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_35); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_36); -return x_38; -} -} -} -else -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_16); -if (x_39 == 0) -{ -lean::cnstr_set(x_4, 0, x_16); -return x_4; -} -else -{ -obj* x_40; uint8 x_41; obj* x_42; -x_40 = lean::cnstr_get(x_16, 0); -x_41 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); -lean::inc(x_40); -lean::dec(x_16); -x_42 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_41); -lean::cnstr_set(x_4, 0, x_42); -return x_4; -} -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; uint32 x_46; uint8 x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_43 = lean::cnstr_get(x_5, 0); -x_44 = lean::cnstr_get(x_5, 1); -x_45 = lean::cnstr_get(x_5, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::inc(x_43); -lean::dec(x_5); -x_46 = lean::unbox_uint32(x_43); -lean::dec(x_43); -x_47 = l_Lean_isIdBeginEscape(x_46); -x_48 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_49 = lean::box(x_47); -x_50 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_44); -lean::cnstr_set(x_50, 2, x_48); -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_50); -if (lean::obj_tag(x_51) == 0) -{ -obj* x_52; uint8 x_53; -lean::free_heap_obj(x_4); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_53 = lean::unbox(x_52); -lean::dec(x_52); -if (x_53 == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_54 = lean::cnstr_get(x_51, 1); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_51, 2); -lean::inc(x_55); -lean::dec(x_51); -x_56 = l_Lean_Parser_idPartDefault___at___private_init_lean_parser_token_4__ident_x27___spec__3(x_1, x_54, x_7); -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - lean::cnstr_release(x_56, 1); - x_59 = x_56; -} else { - lean::dec_ref(x_56); - x_59 = lean::box(0); -} -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_57); -if (lean::is_scalar(x_59)) { - x_61 = lean::alloc_cnstr(0, 2, 0); -} else { - x_61 = x_59; -} -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_58); -return x_61; -} -else -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_62 = lean::cnstr_get(x_51, 1); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_51, 2); -lean::inc(x_63); -lean::dec(x_51); -x_64 = l_Lean_Parser_idPartEscaped___at___private_init_lean_parser_token_4__ident_x27___spec__5(x_1, x_62, x_7); -x_65 = lean::cnstr_get(x_64, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_64, 1); -lean::inc(x_66); -if (lean::is_exclusive(x_64)) { - lean::cnstr_release(x_64, 0); - lean::cnstr_release(x_64, 1); - x_67 = x_64; -} else { - lean::dec_ref(x_64); - x_67 = lean::box(0); -} -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_65); -if (lean::is_scalar(x_67)) { - x_69 = lean::alloc_cnstr(0, 2, 0); -} else { - x_69 = x_67; -} -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_66); -return x_69; -} -} -else -{ -obj* x_70; uint8 x_71; obj* x_72; obj* x_73; -x_70 = lean::cnstr_get(x_51, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get_scalar(x_51, sizeof(void*)*1); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - x_72 = x_51; -} else { - lean::dec_ref(x_51); - x_72 = lean::box(0); -} -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_70); -lean::cnstr_set_scalar(x_73, sizeof(void*)*1, x_71); -lean::cnstr_set(x_4, 0, x_73); -return x_4; -} -} -} -else -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; uint32 x_79; uint8 x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; -x_74 = lean::cnstr_get(x_4, 1); -lean::inc(x_74); -lean::dec(x_4); -x_75 = lean::cnstr_get(x_5, 0); -lean::inc(x_75); -x_76 = lean::cnstr_get(x_5, 1); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_5, 2); -lean::inc(x_77); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_78 = x_5; -} else { - lean::dec_ref(x_5); - x_78 = lean::box(0); -} -x_79 = lean::unbox_uint32(x_75); -lean::dec(x_75); -x_80 = l_Lean_isIdBeginEscape(x_79); -x_81 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_82 = lean::box(x_80); -if (lean::is_scalar(x_78)) { - x_83 = lean::alloc_cnstr(0, 3, 0); -} else { - x_83 = x_78; -} -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_76); -lean::cnstr_set(x_83, 2, x_81); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_83); -if (lean::obj_tag(x_84) == 0) -{ -obj* x_85; uint8 x_86; -x_85 = lean::cnstr_get(x_84, 0); -lean::inc(x_85); -x_86 = lean::unbox(x_85); -lean::dec(x_85); -if (x_86 == 0) -{ -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_87 = lean::cnstr_get(x_84, 1); -lean::inc(x_87); -x_88 = lean::cnstr_get(x_84, 2); -lean::inc(x_88); -lean::dec(x_84); -x_89 = l_Lean_Parser_idPartDefault___at___private_init_lean_parser_token_4__ident_x27___spec__3(x_1, x_87, x_74); -x_90 = lean::cnstr_get(x_89, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_89, 1); -lean::inc(x_91); -if (lean::is_exclusive(x_89)) { - lean::cnstr_release(x_89, 0); - lean::cnstr_release(x_89, 1); - x_92 = x_89; -} else { - lean::dec_ref(x_89); - x_92 = lean::box(0); -} -x_93 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_90); -if (lean::is_scalar(x_92)) { - x_94 = lean::alloc_cnstr(0, 2, 0); -} else { - x_94 = x_92; -} -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_91); -return x_94; -} -else -{ -obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_95 = lean::cnstr_get(x_84, 1); -lean::inc(x_95); -x_96 = lean::cnstr_get(x_84, 2); -lean::inc(x_96); -lean::dec(x_84); -x_97 = l_Lean_Parser_idPartEscaped___at___private_init_lean_parser_token_4__ident_x27___spec__5(x_1, x_95, x_74); -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_99 = lean::cnstr_get(x_97, 1); -lean::inc(x_99); -if (lean::is_exclusive(x_97)) { - lean::cnstr_release(x_97, 0); - lean::cnstr_release(x_97, 1); - x_100 = x_97; -} else { - lean::dec_ref(x_97); - x_100 = lean::box(0); -} -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_96, x_98); -if (lean::is_scalar(x_100)) { - x_102 = lean::alloc_cnstr(0, 2, 0); -} else { - x_102 = x_100; -} -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_99); -return x_102; -} -} -else -{ -obj* x_103; uint8 x_104; obj* x_105; obj* x_106; obj* x_107; -x_103 = lean::cnstr_get(x_84, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get_scalar(x_84, sizeof(void*)*1); -if (lean::is_exclusive(x_84)) { - lean::cnstr_release(x_84, 0); - x_105 = x_84; -} else { - lean::dec_ref(x_84); - x_105 = lean::box(0); -} -if (lean::is_scalar(x_105)) { - x_106 = lean::alloc_cnstr(1, 1, 1); -} else { - x_106 = x_105; -} -lean::cnstr_set(x_106, 0, x_103); -lean::cnstr_set_scalar(x_106, sizeof(void*)*1, x_104); -x_107 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_107, 1, x_74); -return x_107; -} -} -} -else -{ -uint8 x_108; -x_108 = !lean::is_exclusive(x_4); -if (x_108 == 0) -{ -obj* x_109; uint8 x_110; -x_109 = lean::cnstr_get(x_4, 0); -lean::dec(x_109); -x_110 = !lean::is_exclusive(x_5); -if (x_110 == 0) -{ -return x_4; -} -else -{ -obj* x_111; uint8 x_112; obj* x_113; -x_111 = lean::cnstr_get(x_5, 0); -x_112 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_111); -lean::dec(x_5); -x_113 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_112); -lean::cnstr_set(x_4, 0, x_113); -return x_4; -} -} -else -{ -obj* x_114; obj* x_115; uint8 x_116; obj* x_117; obj* x_118; obj* x_119; -x_114 = lean::cnstr_get(x_4, 1); -lean::inc(x_114); -lean::dec(x_4); -x_115 = lean::cnstr_get(x_5, 0); -lean::inc(x_115); -x_116 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - x_117 = x_5; -} else { - lean::dec_ref(x_5); - x_117 = lean::box(0); -} -if (lean::is_scalar(x_117)) { - x_118 = lean::alloc_cnstr(1, 1, 1); -} else { - x_118 = x_117; -} -lean::cnstr_set(x_118, 0, x_115); -lean::cnstr_set_scalar(x_118, sizeof(void*)*1, x_116); -x_119 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_119, 0, x_118); -lean::cnstr_set(x_119, 1, x_114); -return x_119; -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_4__ident_x27___spec__7(obj* x_1, obj* x_2, uint32 x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_20; obj* x_21; -lean::inc(x_5); -x_20 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_3, x_4, x_5, x_6); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_22; uint8 x_23; -x_22 = lean::cnstr_get(x_20, 1); -lean::inc(x_22); -lean::dec(x_20); -x_23 = !lean::is_exclusive(x_21); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; obj* x_26; uint32 x_27; obj* x_28; obj* x_29; -x_24 = lean::cnstr_get(x_21, 1); -x_25 = lean::cnstr_get(x_21, 2); -x_26 = lean::cnstr_get(x_21, 0); -lean::dec(x_26); -x_27 = l_Lean_idBeginEscape; -lean::inc(x_24); -x_28 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_27, x_4, x_24, x_22); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -if (lean::obj_tag(x_29) == 0) -{ -obj* x_30; obj* x_31; -lean::free_heap_obj(x_21); -lean::dec(x_24); -lean::dec(x_2); -lean::dec(x_1); -x_30 = lean::cnstr_get(x_28, 1); -lean::inc(x_30); -lean::dec(x_28); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_29); -x_7 = x_31; -x_8 = x_30; -goto block_19; -} -else -{ -uint8 x_32; -x_32 = lean::cnstr_get_scalar(x_29, sizeof(void*)*1); -if (x_32 == 0) -{ -obj* x_33; obj* x_34; uint8 x_35; -x_33 = lean::cnstr_get(x_28, 1); -lean::inc(x_33); -lean::dec(x_28); -x_34 = lean::cnstr_get(x_29, 0); -lean::inc(x_34); -lean::dec(x_29); -x_35 = l_String_OldIterator_hasNext___main(x_24); -if (x_35 == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -lean::free_heap_obj(x_21); -x_36 = lean::box(0); -x_37 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_38 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_37, x_1, x_36, x_36, x_4, x_24, x_33); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_38, 1); -lean::inc(x_40); -lean::dec(x_38); -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_2, x_39); -x_42 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_34, x_41); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_42); -x_7 = x_43; -x_8 = x_40; -goto block_19; -} -else -{ -uint32 x_44; uint8 x_45; -x_44 = l_String_OldIterator_curr___main(x_24); -x_45 = l_Lean_isIdFirst(x_44); -if (x_45 == 0) -{ -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; -lean::free_heap_obj(x_21); -x_46 = l_Char_quoteCore(x_44); -x_47 = l_Char_HasRepr___closed__1; -x_48 = lean::string_append(x_47, x_46); -lean::dec(x_46); -x_49 = lean::string_append(x_48, x_47); -x_50 = lean::box(0); -x_51 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_49, x_1, x_50, x_50, x_4, x_24, x_33); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_51, 1); -lean::inc(x_53); -lean::dec(x_51); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_2, x_52); -x_55 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_34, x_54); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_55); -x_7 = x_56; -x_8 = x_53; -goto block_19; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_34); -lean::dec(x_2); -lean::dec(x_1); -x_57 = l_String_OldIterator_next___main(x_24); -x_58 = lean::box(0); -x_59 = lean::box_uint32(x_44); -lean::cnstr_set(x_21, 2, x_58); -lean::cnstr_set(x_21, 1, x_57); -lean::cnstr_set(x_21, 0, x_59); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_21); -x_7 = x_60; -x_8 = x_33; -goto block_19; -} -} -} -else -{ -obj* x_61; obj* x_62; -lean::free_heap_obj(x_21); -lean::dec(x_24); -lean::dec(x_2); -lean::dec(x_1); -x_61 = lean::cnstr_get(x_28, 1); -lean::inc(x_61); -lean::dec(x_28); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_29); -x_7 = x_62; -x_8 = x_61; -goto block_19; -} -} -} -else -{ -obj* x_63; obj* x_64; uint32 x_65; obj* x_66; obj* x_67; -x_63 = lean::cnstr_get(x_21, 1); -x_64 = lean::cnstr_get(x_21, 2); -lean::inc(x_64); -lean::inc(x_63); -lean::dec(x_21); -x_65 = l_Lean_idBeginEscape; -lean::inc(x_63); -x_66 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_65, x_4, x_63, x_22); -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -if (lean::obj_tag(x_67) == 0) -{ -obj* x_68; obj* x_69; -lean::dec(x_63); -lean::dec(x_2); -lean::dec(x_1); -x_68 = lean::cnstr_get(x_66, 1); -lean::inc(x_68); -lean::dec(x_66); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_67); -x_7 = x_69; -x_8 = x_68; -goto block_19; -} -else -{ -uint8 x_70; -x_70 = lean::cnstr_get_scalar(x_67, sizeof(void*)*1); -if (x_70 == 0) -{ -obj* x_71; obj* x_72; uint8 x_73; -x_71 = lean::cnstr_get(x_66, 1); -lean::inc(x_71); -lean::dec(x_66); -x_72 = lean::cnstr_get(x_67, 0); -lean::inc(x_72); -lean::dec(x_67); -x_73 = l_String_OldIterator_hasNext___main(x_63); -if (x_73 == 0) -{ -obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_74 = lean::box(0); -x_75 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_76 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_75, x_1, x_74, x_74, x_4, x_63, x_71); -x_77 = lean::cnstr_get(x_76, 0); -lean::inc(x_77); -x_78 = lean::cnstr_get(x_76, 1); -lean::inc(x_78); -lean::dec(x_76); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_2, x_77); -x_80 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_72, x_79); -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_80); -x_7 = x_81; -x_8 = x_78; -goto block_19; -} -else -{ -uint32 x_82; uint8 x_83; -x_82 = l_String_OldIterator_curr___main(x_63); -x_83 = l_Lean_isIdFirst(x_82); -if (x_83 == 0) -{ -obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_84 = l_Char_quoteCore(x_82); -x_85 = l_Char_HasRepr___closed__1; -x_86 = lean::string_append(x_85, x_84); -lean::dec(x_84); -x_87 = lean::string_append(x_86, x_85); -x_88 = lean::box(0); -x_89 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_87, x_1, x_88, x_88, x_4, x_63, x_71); -x_90 = lean::cnstr_get(x_89, 0); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_89, 1); -lean::inc(x_91); -lean::dec(x_89); -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_2, x_90); -x_93 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_72, x_92); -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_93); -x_7 = x_94; -x_8 = x_91; -goto block_19; -} -else -{ -obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; -lean::dec(x_72); -lean::dec(x_2); -lean::dec(x_1); -x_95 = l_String_OldIterator_next___main(x_63); -x_96 = lean::box(0); -x_97 = lean::box_uint32(x_82); -x_98 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_98, 0, x_97); -lean::cnstr_set(x_98, 1, x_95); -lean::cnstr_set(x_98, 2, x_96); -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_98); -x_7 = x_99; -x_8 = x_71; -goto block_19; -} -} -} -else -{ -obj* x_100; obj* x_101; -lean::dec(x_63); -lean::dec(x_2); -lean::dec(x_1); -x_100 = lean::cnstr_get(x_66, 1); -lean::inc(x_100); -lean::dec(x_66); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_67); -x_7 = x_101; -x_8 = x_100; -goto block_19; -} -} -} -} -else -{ -obj* x_102; uint8 x_103; -lean::dec(x_2); -lean::dec(x_1); -x_102 = lean::cnstr_get(x_20, 1); -lean::inc(x_102); -lean::dec(x_20); -x_103 = !lean::is_exclusive(x_21); -if (x_103 == 0) -{ -x_7 = x_21; -x_8 = x_102; -goto block_19; -} -else -{ -obj* x_104; uint8 x_105; obj* x_106; -x_104 = lean::cnstr_get(x_21, 0); -x_105 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); -lean::inc(x_104); -lean::dec(x_21); -x_106 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_106, 0, x_104); -lean::cnstr_set_scalar(x_106, sizeof(void*)*1, x_105); -x_7 = x_106; -x_8 = x_102; -goto block_19; -} -} -block_19: -{ -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_7, 2); -lean::dec(x_10); -x_11 = lean::cnstr_get(x_7, 1); -lean::dec(x_11); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_7, 2, x_12); -lean::cnstr_set(x_7, 1, x_5); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_8); -return x_13; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::cnstr_get(x_7, 0); -lean::inc(x_14); -lean::dec(x_7); -x_15 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_16 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_5); -lean::cnstr_set(x_16, 2, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_8); -return x_17; -} -} -else -{ -obj* x_18; -lean::dec(x_5); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_7); -lean::cnstr_set(x_18, 1, x_8); -return x_18; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at___private_init_lean_parser_token_4__ident_x27___spec__9(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; -x_7 = lean::mk_nat_obj(0u); -x_8 = lean::nat_dec_eq(x_3, x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::mk_nat_obj(1u); -x_10 = lean::nat_sub(x_3, x_9); -lean::inc(x_1); -lean::inc(x_5); -lean::inc(x_4); -x_11 = lean::apply_3(x_1, x_4, x_5, x_6); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; uint8 x_14; -x_13 = lean::cnstr_get(x_11, 1); -lean::inc(x_13); -lean::dec(x_11); -x_14 = !lean::is_exclusive(x_12); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_15 = lean::cnstr_get(x_12, 0); -x_16 = lean::cnstr_get(x_12, 1); -x_17 = lean::cnstr_get(x_12, 2); -lean::inc(x_2); -x_18 = lean_name_mk_string(x_2, x_15); -x_19 = l_Lean_Parser_MonadParsec_foldlAux___main___at___private_init_lean_parser_token_4__ident_x27___spec__9(x_1, x_18, x_10, x_4, x_16, x_13); -lean::dec(x_10); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_21); -if (lean::obj_tag(x_22) == 0) -{ -lean::free_heap_obj(x_12); -lean::dec(x_5); -lean::dec(x_2); -lean::cnstr_set(x_19, 0, x_22); -return x_19; -} -else -{ -uint8 x_23; -x_23 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -if (x_23 == 0) -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_24 = lean::cnstr_get(x_22, 0); -lean::inc(x_24); -lean::dec(x_22); -x_25 = lean::cnstr_get(x_24, 2); -lean::inc(x_25); -lean::dec(x_24); -x_26 = l_mjoin___rarg___closed__1; -x_27 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_12, 2, x_28); -lean::cnstr_set(x_12, 1, x_5); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_19, 0, x_12); -return x_19; -} -else -{ -lean::free_heap_obj(x_12); -lean::dec(x_5); -lean::dec(x_2); -lean::cnstr_set(x_19, 0, x_22); -return x_19; -} -} -} -else -{ -obj* x_29; obj* x_30; obj* x_31; -x_29 = lean::cnstr_get(x_19, 0); -x_30 = lean::cnstr_get(x_19, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_19); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_29); -if (lean::obj_tag(x_31) == 0) -{ -obj* x_32; -lean::free_heap_obj(x_12); -lean::dec(x_5); -lean::dec(x_2); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_30); -return x_32; -} -else -{ -uint8 x_33; -x_33 = lean::cnstr_get_scalar(x_31, sizeof(void*)*1); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_31, 0); -lean::inc(x_34); -lean::dec(x_31); -x_35 = lean::cnstr_get(x_34, 2); -lean::inc(x_35); -lean::dec(x_34); -x_36 = l_mjoin___rarg___closed__1; -x_37 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_37, 0, x_35); -lean::closure_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_12, 2, x_38); -lean::cnstr_set(x_12, 1, x_5); -lean::cnstr_set(x_12, 0, x_2); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_12); -lean::cnstr_set(x_39, 1, x_30); -return x_39; -} -else -{ -obj* x_40; -lean::free_heap_obj(x_12); -lean::dec(x_5); -lean::dec(x_2); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_31); -lean::cnstr_set(x_40, 1, x_30); -return x_40; -} -} -} -} -else -{ -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; -x_41 = lean::cnstr_get(x_12, 0); -x_42 = lean::cnstr_get(x_12, 1); -x_43 = lean::cnstr_get(x_12, 2); -lean::inc(x_43); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_12); -lean::inc(x_2); -x_44 = lean_name_mk_string(x_2, x_41); -x_45 = l_Lean_Parser_MonadParsec_foldlAux___main___at___private_init_lean_parser_token_4__ident_x27___spec__9(x_1, x_44, x_10, x_4, x_42, x_13); -lean::dec(x_10); -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_45, 1); -lean::inc(x_47); -if (lean::is_exclusive(x_45)) { - lean::cnstr_release(x_45, 0); - lean::cnstr_release(x_45, 1); - x_48 = x_45; -} else { - lean::dec_ref(x_45); - x_48 = lean::box(0); -} -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_46); -if (lean::obj_tag(x_49) == 0) -{ -obj* x_50; -lean::dec(x_5); -lean::dec(x_2); -if (lean::is_scalar(x_48)) { - x_50 = lean::alloc_cnstr(0, 2, 0); -} else { - x_50 = x_48; -} -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_47); -return x_50; -} -else -{ -uint8 x_51; -x_51 = lean::cnstr_get_scalar(x_49, sizeof(void*)*1); -if (x_51 == 0) -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_52 = lean::cnstr_get(x_49, 0); -lean::inc(x_52); -lean::dec(x_49); -x_53 = lean::cnstr_get(x_52, 2); -lean::inc(x_53); -lean::dec(x_52); -x_54 = l_mjoin___rarg___closed__1; -x_55 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_55, 0, x_53); -lean::closure_set(x_55, 1, x_54); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -x_57 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_57, 0, x_2); -lean::cnstr_set(x_57, 1, x_5); -lean::cnstr_set(x_57, 2, x_56); -if (lean::is_scalar(x_48)) { - x_58 = lean::alloc_cnstr(0, 2, 0); -} else { - x_58 = x_48; -} -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_47); -return x_58; -} -else -{ -obj* x_59; -lean::dec(x_5); -lean::dec(x_2); -if (lean::is_scalar(x_48)) { - x_59 = lean::alloc_cnstr(0, 2, 0); -} else { - x_59 = x_48; -} -lean::cnstr_set(x_59, 0, x_49); -lean::cnstr_set(x_59, 1, x_47); -return x_59; -} -} -} -} -else -{ -uint8 x_60; -lean::dec(x_10); -lean::dec(x_4); -lean::dec(x_1); -x_60 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -if (x_60 == 0) -{ -uint8 x_61; -x_61 = !lean::is_exclusive(x_11); -if (x_61 == 0) -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_62 = lean::cnstr_get(x_11, 0); -lean::dec(x_62); -x_63 = lean::cnstr_get(x_12, 0); -lean::inc(x_63); -lean::dec(x_12); -x_64 = lean::cnstr_get(x_63, 2); -lean::inc(x_64); -lean::dec(x_63); -x_65 = l_mjoin___rarg___closed__1; -x_66 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_66, 0, x_64); -lean::closure_set(x_66, 1, x_65); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -x_68 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_68, 0, x_2); -lean::cnstr_set(x_68, 1, x_5); -lean::cnstr_set(x_68, 2, x_67); -lean::cnstr_set(x_11, 0, x_68); -return x_11; -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_69 = lean::cnstr_get(x_11, 1); -lean::inc(x_69); -lean::dec(x_11); -x_70 = lean::cnstr_get(x_12, 0); -lean::inc(x_70); -lean::dec(x_12); -x_71 = lean::cnstr_get(x_70, 2); -lean::inc(x_71); -lean::dec(x_70); -x_72 = l_mjoin___rarg___closed__1; -x_73 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_73, 0, x_71); -lean::closure_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_74, 0, x_73); -x_75 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_75, 0, x_2); -lean::cnstr_set(x_75, 1, x_5); -lean::cnstr_set(x_75, 2, x_74); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_69); -return x_76; -} -} -else -{ -uint8 x_77; -lean::dec(x_5); -lean::dec(x_2); -x_77 = !lean::is_exclusive(x_11); -if (x_77 == 0) -{ -obj* x_78; uint8 x_79; -x_78 = lean::cnstr_get(x_11, 0); -lean::dec(x_78); -x_79 = !lean::is_exclusive(x_12); -if (x_79 == 0) -{ -return x_11; -} -else -{ -obj* x_80; obj* x_81; -x_80 = lean::cnstr_get(x_12, 0); -lean::inc(x_80); -lean::dec(x_12); -x_81 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set_scalar(x_81, sizeof(void*)*1, x_60); -lean::cnstr_set(x_11, 0, x_81); -return x_11; -} -} -else -{ -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -x_82 = lean::cnstr_get(x_11, 1); -lean::inc(x_82); -lean::dec(x_11); -x_83 = lean::cnstr_get(x_12, 0); -lean::inc(x_83); -if (lean::is_exclusive(x_12)) { - lean::cnstr_release(x_12, 0); - x_84 = x_12; -} else { - lean::dec_ref(x_12); - x_84 = lean::box(0); -} -if (lean::is_scalar(x_84)) { - x_85 = lean::alloc_cnstr(1, 1, 1); -} else { - x_85 = x_84; -} -lean::cnstr_set(x_85, 0, x_83); -lean::cnstr_set_scalar(x_85, sizeof(void*)*1, x_60); -x_86 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_82); -return x_86; -} -} -} -} -else -{ -obj* x_87; obj* x_88; obj* x_89; -lean::dec(x_4); -lean::dec(x_1); -x_87 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_88 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_88, 0, x_2); -lean::cnstr_set(x_88, 1, x_5); -lean::cnstr_set(x_88, 2, x_87); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_6); -return x_89; -} -} -} -obj* l_Lean_Parser_MonadParsec_foldl___at___private_init_lean_parser_token_4__ident_x27___spec__8(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = l_String_OldIterator_remaining___main(x_4); -x_7 = l_Lean_Parser_MonadParsec_foldlAux___main___at___private_init_lean_parser_token_4__ident_x27___spec__9(x_2, x_1, x_6, x_3, x_4, x_5); -lean::dec(x_6); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_11 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_10, x_9); -lean::cnstr_set(x_7, 0, x_11); -return x_7; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_12 = lean::cnstr_get(x_7, 0); -x_13 = lean::cnstr_get(x_7, 1); -lean::inc(x_13); -lean::inc(x_12); -lean::dec(x_7); -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_12); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_13); -return x_16; -} -} -} -obj* l___private_init_lean_parser_token_4__ident_x27___lambda__1(obj* x_1, uint32 x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = l_mjoin___rarg___closed__1; -x_7 = l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_4__ident_x27___spec__7(x_6, x_1, x_2, x_3, x_4, x_5); -x_8 = !lean::is_exclusive(x_7); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; -x_9 = lean::cnstr_get(x_7, 0); -x_10 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_9); -lean::cnstr_set(x_7, 0, x_10); -return x_7; -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_7, 0); -x_12 = lean::cnstr_get(x_7, 1); -lean::inc(x_12); -lean::inc(x_11); -lean::dec(x_7); -x_13 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_11); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_12); -return x_14; -} -} -} -obj* l___private_init_lean_parser_token_4__ident_x27___lambda__2(uint32 x_1, uint32 x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -x_6 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_1, x_3, x_4, x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -lean::dec(x_6); -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_7, 2); -lean::inc(x_10); -lean::dec(x_7); -x_11 = l_Lean_Parser_idPart___at___private_init_lean_parser_token_4__ident_x27___spec__1(x_3, x_9, x_8); -x_12 = !lean::is_exclusive(x_11); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_11, 0); -x_14 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_10, x_13); -lean::cnstr_set(x_11, 0, x_14); -return x_11; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_11, 0); -x_16 = lean::cnstr_get(x_11, 1); -lean::inc(x_16); -lean::inc(x_15); -lean::dec(x_11); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_10, x_15); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_16); -return x_18; -} -} -else -{ -uint8 x_19; -x_19 = !lean::is_exclusive(x_6); -if (x_19 == 0) -{ -obj* x_20; uint8 x_21; -x_20 = lean::cnstr_get(x_6, 0); -lean::dec(x_20); -x_21 = !lean::is_exclusive(x_7); -if (x_21 == 0) -{ -return x_6; -} -else -{ -obj* x_22; uint8 x_23; obj* x_24; -x_22 = lean::cnstr_get(x_7, 0); -x_23 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_22); -lean::dec(x_7); -x_24 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set_scalar(x_24, sizeof(void*)*1, x_23); -lean::cnstr_set(x_6, 0, x_24); -return x_6; -} -} -else -{ -obj* x_25; obj* x_26; uint8 x_27; obj* x_28; obj* x_29; obj* x_30; -x_25 = lean::cnstr_get(x_6, 1); -lean::inc(x_25); -lean::dec(x_6); -x_26 = lean::cnstr_get(x_7, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_28 = x_7; -} else { - lean::dec_ref(x_7); - x_28 = lean::box(0); -} -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_26); -lean::cnstr_set_scalar(x_29, sizeof(void*)*1, x_27); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_25); -return x_30; -} -} -} -} -obj* _init_l___private_init_lean_parser_token_4__ident_x27___closed__1() { -_start: -{ -obj* x_1; obj* x_2; uint32 x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_1 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = 46; -x_4 = lean::box_uint32(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_token_4__ident_x27___lambda__1___boxed), 5, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::box_uint32(x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_token_4__ident_x27___lambda__2___boxed), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_8, 0, x_5); -lean::closure_set(x_8, 1, x_7); -return x_8; -} -} -obj* l___private_init_lean_parser_token_4__ident_x27(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -x_4 = l_Lean_Parser_idPart___at___private_init_lean_parser_token_4__ident_x27___spec__1(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -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_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_5, 2); -lean::inc(x_9); -lean::dec(x_5); -x_10 = lean::box(0); -x_11 = lean_name_mk_string(x_10, x_7); -x_12 = l___private_init_lean_parser_token_4__ident_x27___closed__1; -x_13 = l_Lean_Parser_MonadParsec_foldl___at___private_init_lean_parser_token_4__ident_x27___spec__8(x_11, x_12, x_1, x_8, x_6); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -if (lean::obj_tag(x_14) == 0) -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; uint8 x_17; -x_16 = lean::cnstr_get(x_13, 0); -lean::dec(x_16); -x_17 = !lean::is_exclusive(x_14); -if (x_17 == 0) -{ -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_31; obj* x_32; obj* x_33; obj* x_34; -x_18 = lean::cnstr_get(x_14, 0); -x_19 = lean::cnstr_get(x_14, 1); -x_20 = lean::cnstr_get(x_14, 2); -lean::inc(x_2, 2); -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_2); -lean::cnstr_set(x_21, 1, x_2); -x_22 = lean::cnstr_get(x_2, 1); -lean::inc(x_22); -lean::inc(x_19, 2); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_19); -lean::cnstr_set(x_23, 1, x_19); -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_22); -lean::cnstr_set(x_24, 2, x_23); -x_25 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::inc(x_19); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_2); -lean::cnstr_set(x_26, 1, x_19); -x_27 = lean::box(0); -x_28 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_28, 0, x_25); -lean::cnstr_set(x_28, 1, x_26); -lean::cnstr_set(x_28, 2, x_18); -lean::cnstr_set(x_28, 3, x_27); -lean::cnstr_set(x_28, 4, x_27); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_14, 2, x_30); -lean::cnstr_set(x_14, 0, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_14); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_31); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_32); -lean::cnstr_set(x_13, 0, x_34); -return x_13; -} -else -{ -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_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; -x_35 = lean::cnstr_get(x_14, 0); -x_36 = lean::cnstr_get(x_14, 1); -x_37 = lean::cnstr_get(x_14, 2); -lean::inc(x_37); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_14); -lean::inc(x_2, 2); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_2); -lean::cnstr_set(x_38, 1, x_2); -x_39 = lean::cnstr_get(x_2, 1); -lean::inc(x_39); -lean::inc(x_36, 2); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_36); -lean::cnstr_set(x_40, 1, x_36); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set(x_41, 1, x_39); -lean::cnstr_set(x_41, 2, x_40); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::inc(x_36); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_2); -lean::cnstr_set(x_43, 1, x_36); -x_44 = lean::box(0); -x_45 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_45, 0, x_42); -lean::cnstr_set(x_45, 1, x_43); -lean::cnstr_set(x_45, 2, x_35); -lean::cnstr_set(x_45, 3, x_44); -lean::cnstr_set(x_45, 4, x_44); -x_46 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_46, 0, x_45); -x_47 = l_Lean_Parser_finishCommentBlock___closed__2; -x_48 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_36); -lean::cnstr_set(x_48, 2, x_47); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_48); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_49); -x_51 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_50); -lean::cnstr_set(x_13, 0, x_52); -return x_13; -} -} -else -{ -obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_53 = lean::cnstr_get(x_13, 1); -lean::inc(x_53); -lean::dec(x_13); -x_54 = lean::cnstr_get(x_14, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_14, 1); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_14, 2); -lean::inc(x_56); -if (lean::is_exclusive(x_14)) { - lean::cnstr_release(x_14, 0); - lean::cnstr_release(x_14, 1); - lean::cnstr_release(x_14, 2); - x_57 = x_14; -} else { - lean::dec_ref(x_14); - x_57 = lean::box(0); -} -lean::inc(x_2, 2); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_2); -lean::cnstr_set(x_58, 1, x_2); -x_59 = lean::cnstr_get(x_2, 1); -lean::inc(x_59); -lean::inc(x_55, 2); -x_60 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_60, 0, x_55); -lean::cnstr_set(x_60, 1, x_55); -x_61 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_61, 0, x_58); -lean::cnstr_set(x_61, 1, x_59); -lean::cnstr_set(x_61, 2, x_60); -x_62 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::inc(x_55); -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_2); -lean::cnstr_set(x_63, 1, x_55); -x_64 = lean::box(0); -x_65 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_65, 0, x_62); -lean::cnstr_set(x_65, 1, x_63); -lean::cnstr_set(x_65, 2, x_54); -lean::cnstr_set(x_65, 3, x_64); -lean::cnstr_set(x_65, 4, x_64); -x_66 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_66, 0, x_65); -x_67 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_57)) { - x_68 = lean::alloc_cnstr(0, 3, 0); -} else { - x_68 = x_57; -} -lean::cnstr_set(x_68, 0, x_66); -lean::cnstr_set(x_68, 1, x_55); -lean::cnstr_set(x_68, 2, x_67); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_68); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_69); -x_71 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_70); -x_73 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_53); -return x_73; -} -} -else -{ -uint8 x_74; -lean::dec(x_2); -x_74 = !lean::is_exclusive(x_13); -if (x_74 == 0) -{ -obj* x_75; uint8 x_76; -x_75 = lean::cnstr_get(x_13, 0); -lean::dec(x_75); -x_76 = !lean::is_exclusive(x_14); -if (x_76 == 0) -{ -obj* x_77; obj* x_78; obj* x_79; -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_14); -x_78 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_78, x_77); -lean::cnstr_set(x_13, 0, x_79); -return x_13; -} -else -{ -obj* x_80; uint8 x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -x_80 = lean::cnstr_get(x_14, 0); -x_81 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -lean::inc(x_80); -lean::dec(x_14); -x_82 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_82, 0, x_80); -lean::cnstr_set_scalar(x_82, sizeof(void*)*1, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_82); -x_84 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_84, x_83); -lean::cnstr_set(x_13, 0, x_85); -return x_13; -} -} -else -{ -obj* x_86; obj* x_87; uint8 x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; -x_86 = lean::cnstr_get(x_13, 1); -lean::inc(x_86); -lean::dec(x_13); -x_87 = lean::cnstr_get(x_14, 0); -lean::inc(x_87); -x_88 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -if (lean::is_exclusive(x_14)) { - lean::cnstr_release(x_14, 0); - x_89 = x_14; -} else { - lean::dec_ref(x_14); - x_89 = lean::box(0); -} -if (lean::is_scalar(x_89)) { - x_90 = lean::alloc_cnstr(1, 1, 1); -} else { - x_90 = x_89; -} -lean::cnstr_set(x_90, 0, x_87); -lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_88); -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_90); -x_92 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_93 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_92, x_91); -x_94 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_86); -return x_94; -} -} -} -else -{ -uint8 x_95; -lean::dec(x_2); -lean::dec(x_1); -x_95 = !lean::is_exclusive(x_4); -if (x_95 == 0) -{ -obj* x_96; uint8 x_97; -x_96 = lean::cnstr_get(x_4, 0); -lean::dec(x_96); -x_97 = !lean::is_exclusive(x_5); -if (x_97 == 0) -{ -obj* x_98; obj* x_99; -x_98 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_5); -lean::cnstr_set(x_4, 0, x_99); -return x_4; -} -else -{ -obj* x_100; uint8 x_101; obj* x_102; obj* x_103; obj* x_104; -x_100 = lean::cnstr_get(x_5, 0); -x_101 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_100); -lean::dec(x_5); -x_102 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_102, 0, x_100); -lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_101); -x_103 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_102); -lean::cnstr_set(x_4, 0, x_104); -return x_4; -} -} -else -{ -obj* x_105; obj* x_106; uint8 x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_105 = lean::cnstr_get(x_4, 1); -lean::inc(x_105); -lean::dec(x_4); -x_106 = lean::cnstr_get(x_5, 0); -lean::inc(x_106); -x_107 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - x_108 = x_5; -} else { - lean::dec_ref(x_5); - x_108 = lean::box(0); -} -if (lean::is_scalar(x_108)) { - x_109 = lean::alloc_cnstr(1, 1, 1); -} else { - x_109 = x_108; -} -lean::cnstr_set(x_109, 0, x_106); -lean::cnstr_set_scalar(x_109, sizeof(void*)*1, x_107); -x_110 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_110, x_109); -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_105); -return x_112; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_MonadParsec_curr___at___private_init_lean_parser_token_4__ident_x27___spec__2(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_takeWhileCont___at___private_init_lean_parser_token_4__ident_x27___spec__4(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_idPartDefault___at___private_init_lean_parser_token_4__ident_x27___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_idPartDefault___at___private_init_lean_parser_token_4__ident_x27___spec__3(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6___boxed(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_1); -lean::dec(x_1); -x_6 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_5, x_2, x_3, x_4); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_idPartEscaped___at___private_init_lean_parser_token_4__ident_x27___spec__5___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_idPartEscaped___at___private_init_lean_parser_token_4__ident_x27___spec__5(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_idPart___at___private_init_lean_parser_token_4__ident_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_idPart___at___private_init_lean_parser_token_4__ident_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_4__ident_x27___spec__7___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -uint32 x_7; obj* x_8; -x_7 = lean::unbox_uint32(x_3); -lean::dec(x_3); -x_8 = l_Lean_Parser_ParsecT_lookahead___at___private_init_lean_parser_token_4__ident_x27___spec__7(x_1, x_2, x_7, x_4, x_5, x_6); -lean::dec(x_4); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_foldlAux___main___at___private_init_lean_parser_token_4__ident_x27___spec__9___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_MonadParsec_foldlAux___main___at___private_init_lean_parser_token_4__ident_x27___spec__9(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_3); -return x_7; -} -} -obj* l___private_init_lean_parser_token_4__ident_x27___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; obj* x_7; -x_6 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_7 = l___private_init_lean_parser_token_4__ident_x27___lambda__1(x_1, x_6, x_3, x_4, x_5); -lean::dec(x_3); -return x_7; -} -} -obj* l___private_init_lean_parser_token_4__ident_x27___lambda__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; uint32 x_7; obj* x_8; -x_6 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_7 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_8 = l___private_init_lean_parser_token_4__ident_x27___lambda__2(x_6, x_7, x_3, x_4, x_5); -lean::dec(x_3); -return x_8; -} -} -obj* l_ReaderT_orelse___at_Lean_Parser_parseBinLit___spec__1___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_4); -lean::inc(x_3); -x_6 = lean::apply_3(x_1, x_3, x_4, x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_6, 0); -lean::dec(x_9); -return x_6; -} -else -{ -obj* x_10; obj* x_11; -x_10 = lean::cnstr_get(x_6, 1); -lean::inc(x_10); -lean::dec(x_6); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_7); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -else -{ -uint8 x_12; -x_12 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; uint8 x_16; -x_13 = lean::cnstr_get(x_6, 1); -lean::inc(x_13); -lean::dec(x_6); -x_14 = lean::cnstr_get(x_7, 0); -lean::inc(x_14); -lean::dec(x_7); -x_15 = lean::apply_3(x_2, x_3, x_4, x_13); -x_16 = !lean::is_exclusive(x_15); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 0); -x_18 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_17); -lean::cnstr_set(x_15, 0, x_18); -return x_15; -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_15, 0); -x_20 = lean::cnstr_get(x_15, 1); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_15); -x_21 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_14, x_19); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); -return x_22; -} -} -else -{ -uint8 x_23; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -x_23 = !lean::is_exclusive(x_6); -if (x_23 == 0) -{ -obj* x_24; -x_24 = lean::cnstr_get(x_6, 0); -lean::dec(x_24); -return x_6; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_6, 1); -lean::inc(x_25); -lean::dec(x_6); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_7); -lean::cnstr_set(x_26, 1, x_25); -return x_26; -} -} -} -} -} -obj* l_ReaderT_orelse___at_Lean_Parser_parseBinLit___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at_Lean_Parser_parseBinLit___spec__1___rarg), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_parseBinLit___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_2, x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_sub(x_2, x_8); -lean::inc(x_1); -lean::inc(x_3); -x_10 = lean::apply_3(x_1, x_3, x_4, x_5); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; uint8 x_13; -x_12 = lean::cnstr_get(x_10, 1); -lean::inc(x_12); -lean::dec(x_10); -x_13 = !lean::is_exclusive(x_11); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_14 = lean::cnstr_get(x_11, 1); -x_15 = lean::cnstr_get(x_11, 2); -x_16 = lean::cnstr_get(x_11, 0); -lean::dec(x_16); -lean::inc(x_14); -x_17 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_parseBinLit___spec__2(x_1, x_9, x_3, x_14, x_12); -lean::dec(x_9); -x_18 = lean::cnstr_get(x_17, 0); -lean::inc(x_18); -if (lean::obj_tag(x_18) == 0) -{ -uint8 x_19; -lean::free_heap_obj(x_11); -lean::dec(x_14); -x_19 = !lean::is_exclusive(x_17); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; -x_20 = lean::cnstr_get(x_17, 0); -lean::dec(x_20); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_18); -lean::cnstr_set(x_17, 0, x_21); -return x_17; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_18); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -return x_24; -} -} -else -{ -uint8 x_25; -x_25 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -if (x_25 == 0) -{ -uint8 x_26; -x_26 = !lean::is_exclusive(x_17); -if (x_26 == 0) -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_27 = lean::cnstr_get(x_17, 0); -lean::dec(x_27); -x_28 = lean::cnstr_get(x_18, 0); -lean::inc(x_28); -lean::dec(x_18); -x_29 = lean::cnstr_get(x_28, 2); -lean::inc(x_29); -lean::dec(x_28); -x_30 = l_mjoin___rarg___closed__1; -x_31 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_31, 0, x_29); -lean::closure_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_32, 0, x_31); -x_33 = lean::box(0); -lean::cnstr_set(x_11, 2, x_32); -lean::cnstr_set(x_11, 0, x_33); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_11); -lean::cnstr_set(x_17, 0, x_34); -return x_17; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_35 = lean::cnstr_get(x_17, 1); -lean::inc(x_35); -lean::dec(x_17); -x_36 = lean::cnstr_get(x_18, 0); -lean::inc(x_36); -lean::dec(x_18); -x_37 = lean::cnstr_get(x_36, 2); -lean::inc(x_37); -lean::dec(x_36); -x_38 = l_mjoin___rarg___closed__1; -x_39 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_39, 0, x_37); -lean::closure_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::box(0); -lean::cnstr_set(x_11, 2, x_40); -lean::cnstr_set(x_11, 0, x_41); -x_42 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_11); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_35); -return x_43; -} -} -else -{ -uint8 x_44; -lean::free_heap_obj(x_11); -lean::dec(x_14); -x_44 = !lean::is_exclusive(x_17); -if (x_44 == 0) -{ -obj* x_45; obj* x_46; -x_45 = lean::cnstr_get(x_17, 0); -lean::dec(x_45); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_18); -lean::cnstr_set(x_17, 0, x_46); -return x_17; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; -x_47 = lean::cnstr_get(x_17, 1); -lean::inc(x_47); -lean::dec(x_17); -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_18); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_47); -return x_49; -} -} -} -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_50 = lean::cnstr_get(x_11, 1); -x_51 = lean::cnstr_get(x_11, 2); -lean::inc(x_51); -lean::inc(x_50); -lean::dec(x_11); -lean::inc(x_50); -x_52 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_parseBinLit___spec__2(x_1, x_9, x_3, x_50, x_12); -lean::dec(x_9); -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -if (lean::obj_tag(x_53) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; -lean::dec(x_50); -x_54 = lean::cnstr_get(x_52, 1); -lean::inc(x_54); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - lean::cnstr_release(x_52, 1); - x_55 = x_52; -} else { - lean::dec_ref(x_52); - x_55 = lean::box(0); -} -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_53); -if (lean::is_scalar(x_55)) { - x_57 = lean::alloc_cnstr(0, 2, 0); -} else { - x_57 = x_55; -} -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_54); -return x_57; -} -else -{ -uint8 x_58; -x_58 = lean::cnstr_get_scalar(x_53, sizeof(void*)*1); -if (x_58 == 0) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_59 = lean::cnstr_get(x_52, 1); -lean::inc(x_59); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - lean::cnstr_release(x_52, 1); - x_60 = x_52; -} else { - lean::dec_ref(x_52); - x_60 = lean::box(0); -} -x_61 = lean::cnstr_get(x_53, 0); -lean::inc(x_61); -lean::dec(x_53); -x_62 = lean::cnstr_get(x_61, 2); -lean::inc(x_62); -lean::dec(x_61); -x_63 = l_mjoin___rarg___closed__1; -x_64 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_64, 0, x_62); -lean::closure_set(x_64, 1, x_63); -x_65 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_65, 0, x_64); -x_66 = lean::box(0); -x_67 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_50); -lean::cnstr_set(x_67, 2, x_65); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_67); -if (lean::is_scalar(x_60)) { - x_69 = lean::alloc_cnstr(0, 2, 0); -} else { - x_69 = x_60; -} -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_59); -return x_69; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; -lean::dec(x_50); -x_70 = lean::cnstr_get(x_52, 1); -lean::inc(x_70); -if (lean::is_exclusive(x_52)) { - lean::cnstr_release(x_52, 0); - lean::cnstr_release(x_52, 1); - x_71 = x_52; -} else { - lean::dec_ref(x_52); - x_71 = lean::box(0); -} -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_53); -if (lean::is_scalar(x_71)) { - x_73 = lean::alloc_cnstr(0, 2, 0); -} else { - x_73 = x_71; -} -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_70); -return x_73; -} -} -} -} -else -{ -uint8 x_74; -lean::dec(x_9); -lean::dec(x_3); -lean::dec(x_1); -x_74 = !lean::is_exclusive(x_10); -if (x_74 == 0) -{ -obj* x_75; uint8 x_76; -x_75 = lean::cnstr_get(x_10, 0); -lean::dec(x_75); -x_76 = !lean::is_exclusive(x_11); -if (x_76 == 0) -{ -return x_10; -} -else -{ -obj* x_77; uint8 x_78; obj* x_79; -x_77 = lean::cnstr_get(x_11, 0); -x_78 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_77); -lean::dec(x_11); -x_79 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_79, 0, x_77); -lean::cnstr_set_scalar(x_79, sizeof(void*)*1, x_78); -lean::cnstr_set(x_10, 0, x_79); -return x_10; -} -} -else -{ -obj* x_80; obj* x_81; uint8 x_82; obj* x_83; obj* x_84; obj* x_85; -x_80 = lean::cnstr_get(x_10, 1); -lean::inc(x_80); -lean::dec(x_10); -x_81 = lean::cnstr_get(x_11, 0); -lean::inc(x_81); -x_82 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_83 = x_11; -} else { - lean::dec_ref(x_11); - x_83 = lean::box(0); -} -if (lean::is_scalar(x_83)) { - x_84 = lean::alloc_cnstr(1, 1, 1); -} else { - x_84 = x_83; -} -lean::cnstr_set(x_84, 0, x_81); -lean::cnstr_set_scalar(x_84, sizeof(void*)*1, x_82); -x_85 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_80); -return x_85; -} -} -} -else -{ -obj* x_86; obj* x_87; -x_86 = lean::apply_3(x_1, x_3, x_4, x_5); -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -if (lean::obj_tag(x_87) == 0) -{ -uint8 x_88; -x_88 = !lean::is_exclusive(x_86); -if (x_88 == 0) -{ -obj* x_89; uint8 x_90; -x_89 = lean::cnstr_get(x_86, 0); -lean::dec(x_89); -x_90 = !lean::is_exclusive(x_87); -if (x_90 == 0) -{ -obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -x_91 = lean::cnstr_get(x_87, 2); -x_92 = lean::cnstr_get(x_87, 0); -lean::dec(x_92); -x_93 = lean::box(0); -x_94 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_87, 2, x_94); -lean::cnstr_set(x_87, 0, x_93); -x_95 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_87); -lean::cnstr_set(x_86, 0, x_95); -return x_86; -} -else -{ -obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_96 = lean::cnstr_get(x_87, 1); -x_97 = lean::cnstr_get(x_87, 2); -lean::inc(x_97); -lean::inc(x_96); -lean::dec(x_87); -x_98 = lean::box(0); -x_99 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_100 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_100, 0, x_98); -lean::cnstr_set(x_100, 1, x_96); -lean::cnstr_set(x_100, 2, x_99); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_97, x_100); -lean::cnstr_set(x_86, 0, x_101); -return x_86; -} -} -else -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; -x_102 = lean::cnstr_get(x_86, 1); -lean::inc(x_102); -lean::dec(x_86); -x_103 = lean::cnstr_get(x_87, 1); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_87, 2); -lean::inc(x_104); -if (lean::is_exclusive(x_87)) { - lean::cnstr_release(x_87, 0); - lean::cnstr_release(x_87, 1); - lean::cnstr_release(x_87, 2); - x_105 = x_87; -} else { - lean::dec_ref(x_87); - x_105 = lean::box(0); -} -x_106 = lean::box(0); -x_107 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_105)) { - x_108 = lean::alloc_cnstr(0, 3, 0); -} else { - x_108 = x_105; -} -lean::cnstr_set(x_108, 0, x_106); -lean::cnstr_set(x_108, 1, x_103); -lean::cnstr_set(x_108, 2, x_107); -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_104, x_108); -x_110 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_110, 0, x_109); -lean::cnstr_set(x_110, 1, x_102); -return x_110; -} -} -else -{ -uint8 x_111; -x_111 = !lean::is_exclusive(x_86); -if (x_111 == 0) -{ -obj* x_112; uint8 x_113; -x_112 = lean::cnstr_get(x_86, 0); -lean::dec(x_112); -x_113 = !lean::is_exclusive(x_87); -if (x_113 == 0) -{ -return x_86; -} -else -{ -obj* x_114; uint8 x_115; obj* x_116; -x_114 = lean::cnstr_get(x_87, 0); -x_115 = lean::cnstr_get_scalar(x_87, sizeof(void*)*1); -lean::inc(x_114); -lean::dec(x_87); -x_116 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_116, 0, x_114); -lean::cnstr_set_scalar(x_116, sizeof(void*)*1, x_115); -lean::cnstr_set(x_86, 0, x_116); -return x_86; -} -} -else -{ -obj* x_117; obj* x_118; uint8 x_119; obj* x_120; obj* x_121; obj* x_122; -x_117 = lean::cnstr_get(x_86, 1); -lean::inc(x_117); -lean::dec(x_86); -x_118 = lean::cnstr_get(x_87, 0); -lean::inc(x_118); -x_119 = lean::cnstr_get_scalar(x_87, sizeof(void*)*1); -if (lean::is_exclusive(x_87)) { - lean::cnstr_release(x_87, 0); - x_120 = x_87; -} else { - lean::dec_ref(x_87); - x_120 = lean::box(0); -} -if (lean::is_scalar(x_120)) { - x_121 = lean::alloc_cnstr(1, 1, 1); -} else { - x_121 = x_120; -} -lean::cnstr_set(x_121, 0, x_118); -lean::cnstr_set_scalar(x_121, sizeof(void*)*1, x_119); -x_122 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_122, 0, x_121); -lean::cnstr_set(x_122, 1, x_117); -return x_122; -} -} -} -} -} -obj* _init_l_Lean_Parser_parseBinLit___closed__1() { -_start: -{ -uint32 x_1; obj* x_2; obj* x_3; uint32 x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = 48; -x_2 = lean::box_uint32(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6___boxed), 4, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = 49; -x_5 = lean::box_uint32(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6___boxed), 4, 1); -lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at_Lean_Parser_parseBinLit___spec__1___rarg), 5, 2); -lean::closure_set(x_7, 0, x_3); -lean::closure_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_parseBinLit(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; uint32 x_5; uint32 x_6; obj* x_7; obj* x_8; -x_4 = 48; -x_5 = 98; -x_6 = 66; -x_7 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_4, x_1, x_2, x_3); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_42; obj* x_43; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - x_10 = x_7; -} else { - lean::dec_ref(x_7); - x_10 = lean::box(0); -} -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -x_12 = lean::cnstr_get(x_8, 2); -lean::inc(x_12); -lean::dec(x_8); -lean::inc(x_11); -x_42 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_5, x_1, x_11, x_9); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -if (lean::obj_tag(x_43) == 0) -{ -obj* x_44; -lean::dec(x_11); -x_44 = lean::cnstr_get(x_42, 1); -lean::inc(x_44); -lean::dec(x_42); -x_13 = x_43; -x_14 = x_44; -goto block_41; -} -else -{ -uint8 x_45; -x_45 = lean::cnstr_get_scalar(x_43, sizeof(void*)*1); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_46 = lean::cnstr_get(x_42, 1); -lean::inc(x_46); -lean::dec(x_42); -x_47 = lean::cnstr_get(x_43, 0); -lean::inc(x_47); -lean::dec(x_43); -x_48 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_6, x_1, x_11, x_46); -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_48, 1); -lean::inc(x_50); -lean::dec(x_48); -x_51 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_47, x_49); -x_13 = x_51; -x_14 = x_50; -goto block_41; -} -else -{ -obj* x_52; -lean::dec(x_11); -x_52 = lean::cnstr_get(x_42, 1); -lean::inc(x_52); -lean::dec(x_42); -x_13 = x_43; -x_14 = x_52; -goto block_41; -} -} -block_41: -{ -if (lean::obj_tag(x_13) == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -lean::dec(x_10); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_13, 2); -lean::inc(x_16); -lean::dec(x_13); -x_17 = l_String_OldIterator_remaining___main(x_15); -x_18 = l_Lean_Parser_parseBinLit___closed__1; -x_19 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_parseBinLit___spec__2(x_18, x_17, x_1, x_15, x_14); -lean::dec(x_17); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_finishCommentBlock___closed__2; -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_21); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_23); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_24); -lean::cnstr_set(x_19, 0, x_25); -return x_19; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_26 = lean::cnstr_get(x_19, 0); -x_27 = lean::cnstr_get(x_19, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_19); -x_28 = l_Lean_Parser_finishCommentBlock___closed__2; -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_28, x_26); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_27); -return x_32; -} -} -else -{ -uint8 x_33; -lean::dec(x_1); -x_33 = !lean::is_exclusive(x_13); -if (x_33 == 0) -{ -obj* x_34; obj* x_35; -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_13); -if (lean::is_scalar(x_10)) { - x_35 = lean::alloc_cnstr(0, 2, 0); -} else { - x_35 = x_10; -} -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_14); -return x_35; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; obj* x_39; obj* x_40; -x_36 = lean::cnstr_get(x_13, 0); -x_37 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_13); -x_38 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_37); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_38); -if (lean::is_scalar(x_10)) { - x_40 = lean::alloc_cnstr(0, 2, 0); -} else { - x_40 = x_10; -} -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_14); -return x_40; -} -} -} -} -else -{ -uint8 x_53; -lean::dec(x_1); -x_53 = !lean::is_exclusive(x_7); -if (x_53 == 0) -{ -obj* x_54; uint8 x_55; -x_54 = lean::cnstr_get(x_7, 0); -lean::dec(x_54); -x_55 = !lean::is_exclusive(x_8); -if (x_55 == 0) -{ -return x_7; -} -else -{ -obj* x_56; uint8 x_57; obj* x_58; -x_56 = lean::cnstr_get(x_8, 0); -x_57 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_56); -lean::dec(x_8); -x_58 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_58, 0, x_56); -lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_57); -lean::cnstr_set(x_7, 0, x_58); -return x_7; -} -} -else -{ -obj* x_59; obj* x_60; uint8 x_61; obj* x_62; obj* x_63; obj* x_64; -x_59 = lean::cnstr_get(x_7, 1); -lean::inc(x_59); -lean::dec(x_7); -x_60 = lean::cnstr_get(x_8, 0); -lean::inc(x_60); -x_61 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_62 = x_8; -} else { - lean::dec_ref(x_8); - x_62 = lean::box(0); -} -if (lean::is_scalar(x_62)) { - x_63 = lean::alloc_cnstr(1, 1, 1); -} else { - x_63 = x_62; -} -lean::cnstr_set(x_63, 0, x_60); -lean::cnstr_set_scalar(x_63, sizeof(void*)*1, x_61); -x_64 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_59); -return x_64; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_parseBinLit___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_many1Aux_x27___main___at_Lean_Parser_parseBinLit___spec__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseOctLit___spec__3(uint32 x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_2, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_2, x_7); -lean::dec(x_2); -x_9 = l_String_OldIterator_hasNext___main(x_4); -if (x_9 == 0) -{ -obj* x_10; -lean::dec(x_8); -x_10 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_10; -} -else -{ -uint32 x_11; uint8 x_12; -x_11 = l_String_OldIterator_curr___main(x_4); -x_12 = x_1 <= x_11; -if (x_12 == 0) -{ -obj* x_13; -lean::dec(x_8); -x_13 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_13; -} -else -{ -uint32 x_14; uint8 x_15; -x_14 = 56; -x_15 = x_11 < x_14; -if (x_15 == 0) -{ -obj* x_16; -lean::dec(x_8); -x_16 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::string_push(x_3, x_11); -x_18 = l_String_OldIterator_next___main(x_4); -x_2 = x_8; -x_3 = x_17; -x_4 = x_18; -goto _start; -} -} -} -} -else -{ -obj* x_20; -lean::dec(x_2); -x_20 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_3, x_4); -return x_20; -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseOctLit___spec__2(uint32 x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = l_String_OldIterator_remaining___main(x_4); -x_7 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseOctLit___spec__3(x_1, x_6, x_2, x_4); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_5); -return x_8; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseOctLit___spec__1(uint32 x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; uint8 x_28; -x_28 = l_String_OldIterator_hasNext___main(x_3); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_29 = lean::box(0); -x_30 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_31 = l_mjoin___rarg___closed__1; -x_32 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_30, x_31, x_29, x_29, x_2, x_3, x_4); -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_32, 1); -lean::inc(x_34); -lean::dec(x_32); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_33); -x_5 = x_36; -x_6 = x_34; -goto block_27; -} -else -{ -uint32 x_37; uint8 x_38; -x_37 = l_String_OldIterator_curr___main(x_3); -x_38 = x_1 <= x_37; -if (x_38 == 0) -{ -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; -x_39 = l_Char_quoteCore(x_37); -x_40 = l_Char_HasRepr___closed__1; -x_41 = lean::string_append(x_40, x_39); -lean::dec(x_39); -x_42 = lean::string_append(x_41, x_40); -x_43 = lean::box(0); -x_44 = l_mjoin___rarg___closed__1; -x_45 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_42, x_44, x_43, x_43, x_2, x_3, x_4); -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_45, 1); -lean::inc(x_47); -lean::dec(x_45); -x_48 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_46); -x_5 = x_49; -x_6 = x_47; -goto block_27; -} -else -{ -uint32 x_50; uint8 x_51; -x_50 = 56; -x_51 = x_37 < x_50; -if (x_51 == 0) -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; -x_52 = l_Char_quoteCore(x_37); -x_53 = l_Char_HasRepr___closed__1; -x_54 = lean::string_append(x_53, x_52); -lean::dec(x_52); -x_55 = lean::string_append(x_54, x_53); -x_56 = lean::box(0); -x_57 = l_mjoin___rarg___closed__1; -x_58 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_55, x_57, x_56, x_56, x_2, x_3, x_4); -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::cnstr_get(x_58, 1); -lean::inc(x_60); -lean::dec(x_58); -x_61 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_61, x_59); -x_5 = x_62; -x_6 = x_60; -goto block_27; -} -else -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_63 = l_String_OldIterator_next___main(x_3); -x_64 = lean::box(0); -x_65 = lean::box_uint32(x_37); -x_66 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_63); -lean::cnstr_set(x_66, 2, x_64); -x_5 = x_66; -x_6 = x_4; -goto block_27; -} -} -} -block_27: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; uint32 x_11; obj* x_12; obj* x_13; uint8 x_14; -x_7 = lean::cnstr_get(x_5, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_5, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_5, 2); -lean::inc(x_9); -lean::dec(x_5); -x_10 = l_String_splitAux___main___closed__1; -x_11 = lean::unbox_uint32(x_7); -lean::dec(x_7); -x_12 = lean::string_push(x_10, x_11); -x_13 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseOctLit___spec__2(x_1, x_12, x_2, x_8, x_6); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_15); -lean::cnstr_set(x_13, 0, x_16); -return x_13; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_13, 0); -x_18 = lean::cnstr_get(x_13, 1); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_13); -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_17); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -return x_20; -} -} -else -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_5); -if (x_21 == 0) -{ -obj* x_22; -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_5); -lean::cnstr_set(x_22, 1, x_6); -return x_22; -} -else -{ -obj* x_23; uint8 x_24; obj* x_25; obj* x_26; -x_23 = lean::cnstr_get(x_5, 0); -x_24 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_23); -lean::dec(x_5); -x_25 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set_scalar(x_25, sizeof(void*)*1, x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_6); -return x_26; -} -} -} -} -} -obj* l_Lean_Parser_parseOctLit(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; uint32 x_5; uint32 x_6; obj* x_7; obj* x_8; -x_4 = 48; -x_5 = 111; -x_6 = 79; -x_7 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_4, x_1, x_2, x_3); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_8, 2); -lean::inc(x_11); -lean::dec(x_8); -lean::inc(x_10); -x_12 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_5, x_1, x_10, x_9); -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; -lean::dec(x_10); -x_14 = lean::cnstr_get(x_12, 1); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_13, 2); -lean::inc(x_16); -lean::dec(x_13); -x_17 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseOctLit___spec__1(x_4, x_1, x_15, x_14); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_20); -lean::cnstr_set(x_17, 0, x_21); -return x_17; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = lean::cnstr_get(x_17, 0); -x_23 = lean::cnstr_get(x_17, 1); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_17); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_23); -return x_26; -} -} -else -{ -uint8 x_27; -x_27 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; uint8 x_31; -x_28 = lean::cnstr_get(x_12, 1); -lean::inc(x_28); -lean::dec(x_12); -x_29 = lean::cnstr_get(x_13, 0); -lean::inc(x_29); -lean::dec(x_13); -x_30 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_6, x_1, x_10, x_28); -x_31 = !lean::is_exclusive(x_30); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; -x_32 = lean::cnstr_get(x_30, 0); -x_33 = lean::cnstr_get(x_30, 1); -x_34 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_29, x_32); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; uint8 x_38; -lean::free_heap_obj(x_30); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 2); -lean::inc(x_36); -lean::dec(x_34); -x_37 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseOctLit___spec__1(x_4, x_1, x_35, x_33); -x_38 = !lean::is_exclusive(x_37); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; obj* x_41; -x_39 = lean::cnstr_get(x_37, 0); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_39); -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_40); -lean::cnstr_set(x_37, 0, x_41); -return x_37; -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_42 = lean::cnstr_get(x_37, 0); -x_43 = lean::cnstr_get(x_37, 1); -lean::inc(x_43); -lean::inc(x_42); -lean::dec(x_37); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_42); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_44); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_43); -return x_46; -} -} -else -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_34); -if (x_47 == 0) -{ -obj* x_48; -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_34); -lean::cnstr_set(x_30, 0, x_48); -return x_30; -} -else -{ -obj* x_49; uint8 x_50; obj* x_51; obj* x_52; -x_49 = lean::cnstr_get(x_34, 0); -x_50 = lean::cnstr_get_scalar(x_34, sizeof(void*)*1); -lean::inc(x_49); -lean::dec(x_34); -x_51 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_50); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_51); -lean::cnstr_set(x_30, 0, x_52); -return x_30; -} -} -} -else -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::cnstr_get(x_30, 0); -x_54 = lean::cnstr_get(x_30, 1); -lean::inc(x_54); -lean::inc(x_53); -lean::dec(x_30); -x_55 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_29, x_53); -if (lean::obj_tag(x_55) == 0) -{ -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_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 2); -lean::inc(x_57); -lean::dec(x_55); -x_58 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseOctLit___spec__1(x_4, x_1, x_56, x_54); -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::cnstr_get(x_58, 1); -lean::inc(x_60); -if (lean::is_exclusive(x_58)) { - lean::cnstr_release(x_58, 0); - lean::cnstr_release(x_58, 1); - x_61 = x_58; -} else { - lean::dec_ref(x_58); - x_61 = lean::box(0); -} -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_59); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_62); -if (lean::is_scalar(x_61)) { - x_64 = lean::alloc_cnstr(0, 2, 0); -} else { - x_64 = x_61; -} -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_60); -return x_64; -} -else -{ -obj* x_65; uint8 x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_65 = lean::cnstr_get(x_55, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get_scalar(x_55, sizeof(void*)*1); -if (lean::is_exclusive(x_55)) { - lean::cnstr_release(x_55, 0); - x_67 = x_55; -} else { - lean::dec_ref(x_55); - x_67 = lean::box(0); -} -if (lean::is_scalar(x_67)) { - x_68 = lean::alloc_cnstr(1, 1, 1); -} else { - x_68 = x_67; -} -lean::cnstr_set(x_68, 0, x_65); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_66); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_68); -x_70 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_54); -return x_70; -} -} -} -else -{ -uint8 x_71; -lean::dec(x_10); -x_71 = !lean::is_exclusive(x_12); -if (x_71 == 0) -{ -obj* x_72; uint8 x_73; -x_72 = lean::cnstr_get(x_12, 0); -lean::dec(x_72); -x_73 = !lean::is_exclusive(x_13); -if (x_73 == 0) -{ -obj* x_74; -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_13); -lean::cnstr_set(x_12, 0, x_74); -return x_12; -} -else -{ -obj* x_75; obj* x_76; obj* x_77; -x_75 = lean::cnstr_get(x_13, 0); -lean::inc(x_75); -lean::dec(x_13); -x_76 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_27); -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_76); -lean::cnstr_set(x_12, 0, x_77); -return x_12; -} -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_78 = lean::cnstr_get(x_12, 1); -lean::inc(x_78); -lean::dec(x_12); -x_79 = lean::cnstr_get(x_13, 0); -lean::inc(x_79); -if (lean::is_exclusive(x_13)) { - lean::cnstr_release(x_13, 0); - x_80 = x_13; -} else { - lean::dec_ref(x_13); - x_80 = lean::box(0); -} -if (lean::is_scalar(x_80)) { - x_81 = lean::alloc_cnstr(1, 1, 1); -} else { - x_81 = x_80; -} -lean::cnstr_set(x_81, 0, x_79); -lean::cnstr_set_scalar(x_81, sizeof(void*)*1, x_27); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_81); -x_83 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_78); -return x_83; -} -} -} -} -else -{ -uint8 x_84; -x_84 = !lean::is_exclusive(x_7); -if (x_84 == 0) -{ -obj* x_85; uint8 x_86; -x_85 = lean::cnstr_get(x_7, 0); -lean::dec(x_85); -x_86 = !lean::is_exclusive(x_8); -if (x_86 == 0) -{ -return x_7; -} -else -{ -obj* x_87; uint8 x_88; obj* x_89; -x_87 = lean::cnstr_get(x_8, 0); -x_88 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_87); -lean::dec(x_8); -x_89 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_89, 0, x_87); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_88); -lean::cnstr_set(x_7, 0, x_89); -return x_7; -} -} -else -{ -obj* x_90; obj* x_91; uint8 x_92; obj* x_93; obj* x_94; obj* x_95; -x_90 = lean::cnstr_get(x_7, 1); -lean::inc(x_90); -lean::dec(x_7); -x_91 = lean::cnstr_get(x_8, 0); -lean::inc(x_91); -x_92 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_93 = x_8; -} else { - lean::dec_ref(x_8); - x_93 = lean::box(0); -} -if (lean::is_scalar(x_93)) { - x_94 = lean::alloc_cnstr(1, 1, 1); -} else { - x_94 = x_93; -} -lean::cnstr_set(x_94, 0, x_91); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_92); -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_90); -return x_95; -} -} -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseOctLit___spec__3___boxed(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_1); -lean::dec(x_1); -x_6 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseOctLit___spec__3(x_5, x_2, x_3, x_4); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseOctLit___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint32 x_6; obj* x_7; -x_6 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_7 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseOctLit___spec__2(x_6, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseOctLit___spec__1___boxed(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_1); -lean::dec(x_1); -x_6 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseOctLit___spec__1(x_5, x_2, x_3, x_4); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_parseOctLit___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_parseOctLit(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseHexLit___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Char_isDigit(x_10); -if (x_11 == 0) -{ -uint8 x_12; -x_12 = l_Char_isAlpha(x_10); -if (x_12 == 0) -{ -obj* x_13; -lean::dec(x_7); -x_13 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_13; -} -else -{ -obj* x_14; obj* x_15; -x_14 = lean::string_push(x_2, x_10); -x_15 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_14; -x_3 = x_15; -goto _start; -} -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::string_push(x_2, x_10); -x_18 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_17; -x_3 = x_18; -goto _start; -} -} -} -else -{ -obj* x_20; -lean::dec(x_1); -x_20 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_20; -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseHexLit___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_String_OldIterator_remaining___main(x_3); -x_6 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_parseHexLit___spec__3(x_5, x_1, x_3); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_4); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseHexLit___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; uint8 x_27; -x_27 = l_String_OldIterator_hasNext___main(x_2); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_28 = lean::box(0); -x_29 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_30 = l_mjoin___rarg___closed__1; -x_31 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_29, x_30, x_28, x_28, x_1, x_2, x_3); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_31, 1); -lean::inc(x_33); -lean::dec(x_31); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_32); -x_4 = x_35; -x_5 = x_33; -goto block_26; -} -else -{ -uint32 x_36; uint8 x_37; -x_36 = l_String_OldIterator_curr___main(x_2); -x_37 = l_Char_isDigit(x_36); -if (x_37 == 0) -{ -uint8 x_38; -x_38 = l_Char_isAlpha(x_36); -if (x_38 == 0) -{ -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; -x_39 = l_Char_quoteCore(x_36); -x_40 = l_Char_HasRepr___closed__1; -x_41 = lean::string_append(x_40, x_39); -lean::dec(x_39); -x_42 = lean::string_append(x_41, x_40); -x_43 = lean::box(0); -x_44 = l_mjoin___rarg___closed__1; -x_45 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_42, x_44, x_43, x_43, x_1, x_2, x_3); -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_45, 1); -lean::inc(x_47); -lean::dec(x_45); -x_48 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_46); -x_4 = x_49; -x_5 = x_47; -goto block_26; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_50 = l_String_OldIterator_next___main(x_2); -x_51 = lean::box(0); -x_52 = lean::box_uint32(x_36); -x_53 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_50); -lean::cnstr_set(x_53, 2, x_51); -x_4 = x_53; -x_5 = x_3; -goto block_26; -} -} -else -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_54 = l_String_OldIterator_next___main(x_2); -x_55 = lean::box(0); -x_56 = lean::box_uint32(x_36); -x_57 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_54); -lean::cnstr_set(x_57, 2, x_55); -x_4 = x_57; -x_5 = x_3; -goto block_26; -} -} -block_26: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; uint32 x_10; obj* x_11; obj* x_12; uint8 x_13; -x_6 = lean::cnstr_get(x_4, 0); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_4, 1); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_4, 2); -lean::inc(x_8); -lean::dec(x_4); -x_9 = l_String_splitAux___main___closed__1; -x_10 = lean::unbox_uint32(x_6); -lean::dec(x_6); -x_11 = lean::string_push(x_9, x_10); -x_12 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseHexLit___spec__2(x_11, x_1, x_7, x_5); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; -x_14 = lean::cnstr_get(x_12, 0); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_8, x_14); -lean::cnstr_set(x_12, 0, x_15); -return x_12; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_16 = lean::cnstr_get(x_12, 0); -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_12); -x_18 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_8, x_16); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_17); -return x_19; -} -} -else -{ -uint8 x_20; -x_20 = !lean::is_exclusive(x_4); -if (x_20 == 0) -{ -obj* x_21; -x_21 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_21, 0, x_4); -lean::cnstr_set(x_21, 1, x_5); -return x_21; -} -else -{ -obj* x_22; uint8 x_23; obj* x_24; obj* x_25; -x_22 = lean::cnstr_get(x_4, 0); -x_23 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::inc(x_22); -lean::dec(x_4); -x_24 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set_scalar(x_24, sizeof(void*)*1, x_23); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_5); -return x_25; -} -} -} -} -} -obj* l_Lean_Parser_parseHexLit(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; uint32 x_5; uint32 x_6; obj* x_7; obj* x_8; -x_4 = 48; -x_5 = 120; -x_6 = 88; -x_7 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_4, x_1, x_2, x_3); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::cnstr_get(x_8, 1); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_8, 2); -lean::inc(x_11); -lean::dec(x_8); -lean::inc(x_10); -x_12 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_5, x_1, x_10, x_9); -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; -lean::dec(x_10); -x_14 = lean::cnstr_get(x_12, 1); -lean::inc(x_14); -lean::dec(x_12); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_13, 2); -lean::inc(x_16); -lean::dec(x_13); -x_17 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseHexLit___spec__1(x_1, x_15, x_14); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_20); -lean::cnstr_set(x_17, 0, x_21); -return x_17; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; -x_22 = lean::cnstr_get(x_17, 0); -x_23 = lean::cnstr_get(x_17, 1); -lean::inc(x_23); -lean::inc(x_22); -lean::dec(x_17); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_23); -return x_26; -} -} -else -{ -uint8 x_27; -x_27 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; uint8 x_31; -x_28 = lean::cnstr_get(x_12, 1); -lean::inc(x_28); -lean::dec(x_12); -x_29 = lean::cnstr_get(x_13, 0); -lean::inc(x_29); -lean::dec(x_13); -x_30 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_6, x_1, x_10, x_28); -x_31 = !lean::is_exclusive(x_30); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; -x_32 = lean::cnstr_get(x_30, 0); -x_33 = lean::cnstr_get(x_30, 1); -x_34 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_29, x_32); -if (lean::obj_tag(x_34) == 0) -{ -obj* x_35; obj* x_36; obj* x_37; uint8 x_38; -lean::free_heap_obj(x_30); -x_35 = lean::cnstr_get(x_34, 1); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_34, 2); -lean::inc(x_36); -lean::dec(x_34); -x_37 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseHexLit___spec__1(x_1, x_35, x_33); -x_38 = !lean::is_exclusive(x_37); -if (x_38 == 0) -{ -obj* x_39; obj* x_40; obj* x_41; -x_39 = lean::cnstr_get(x_37, 0); -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_39); -x_41 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_40); -lean::cnstr_set(x_37, 0, x_41); -return x_37; -} -else -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_42 = lean::cnstr_get(x_37, 0); -x_43 = lean::cnstr_get(x_37, 1); -lean::inc(x_43); -lean::inc(x_42); -lean::dec(x_37); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_42); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_44); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_43); -return x_46; -} -} -else -{ -uint8 x_47; -x_47 = !lean::is_exclusive(x_34); -if (x_47 == 0) -{ -obj* x_48; -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_34); -lean::cnstr_set(x_30, 0, x_48); -return x_30; -} -else -{ -obj* x_49; uint8 x_50; obj* x_51; obj* x_52; -x_49 = lean::cnstr_get(x_34, 0); -x_50 = lean::cnstr_get_scalar(x_34, sizeof(void*)*1); -lean::inc(x_49); -lean::dec(x_34); -x_51 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_50); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_51); -lean::cnstr_set(x_30, 0, x_52); -return x_30; -} -} -} -else -{ -obj* x_53; obj* x_54; obj* x_55; -x_53 = lean::cnstr_get(x_30, 0); -x_54 = lean::cnstr_get(x_30, 1); -lean::inc(x_54); -lean::inc(x_53); -lean::dec(x_30); -x_55 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_29, x_53); -if (lean::obj_tag(x_55) == 0) -{ -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_56 = lean::cnstr_get(x_55, 1); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_55, 2); -lean::inc(x_57); -lean::dec(x_55); -x_58 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseHexLit___spec__1(x_1, x_56, x_54); -x_59 = lean::cnstr_get(x_58, 0); -lean::inc(x_59); -x_60 = lean::cnstr_get(x_58, 1); -lean::inc(x_60); -if (lean::is_exclusive(x_58)) { - lean::cnstr_release(x_58, 0); - lean::cnstr_release(x_58, 1); - x_61 = x_58; -} else { - lean::dec_ref(x_58); - x_61 = lean::box(0); -} -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_59); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_62); -if (lean::is_scalar(x_61)) { - x_64 = lean::alloc_cnstr(0, 2, 0); -} else { - x_64 = x_61; -} -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_60); -return x_64; -} -else -{ -obj* x_65; uint8 x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; -x_65 = lean::cnstr_get(x_55, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get_scalar(x_55, sizeof(void*)*1); -if (lean::is_exclusive(x_55)) { - lean::cnstr_release(x_55, 0); - x_67 = x_55; -} else { - lean::dec_ref(x_55); - x_67 = lean::box(0); -} -if (lean::is_scalar(x_67)) { - x_68 = lean::alloc_cnstr(1, 1, 1); -} else { - x_68 = x_67; -} -lean::cnstr_set(x_68, 0, x_65); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_66); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_68); -x_70 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_54); -return x_70; -} -} -} -else -{ -uint8 x_71; -lean::dec(x_10); -x_71 = !lean::is_exclusive(x_12); -if (x_71 == 0) -{ -obj* x_72; uint8 x_73; -x_72 = lean::cnstr_get(x_12, 0); -lean::dec(x_72); -x_73 = !lean::is_exclusive(x_13); -if (x_73 == 0) -{ -obj* x_74; -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_13); -lean::cnstr_set(x_12, 0, x_74); -return x_12; -} -else -{ -obj* x_75; obj* x_76; obj* x_77; -x_75 = lean::cnstr_get(x_13, 0); -lean::inc(x_75); -lean::dec(x_13); -x_76 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_27); -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_76); -lean::cnstr_set(x_12, 0, x_77); -return x_12; -} -} -else -{ -obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_78 = lean::cnstr_get(x_12, 1); -lean::inc(x_78); -lean::dec(x_12); -x_79 = lean::cnstr_get(x_13, 0); -lean::inc(x_79); -if (lean::is_exclusive(x_13)) { - lean::cnstr_release(x_13, 0); - x_80 = x_13; -} else { - lean::dec_ref(x_13); - x_80 = lean::box(0); -} -if (lean::is_scalar(x_80)) { - x_81 = lean::alloc_cnstr(1, 1, 1); -} else { - x_81 = x_80; -} -lean::cnstr_set(x_81, 0, x_79); -lean::cnstr_set_scalar(x_81, sizeof(void*)*1, x_27); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_81); -x_83 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_78); -return x_83; -} -} -} -} -else -{ -uint8 x_84; -x_84 = !lean::is_exclusive(x_7); -if (x_84 == 0) -{ -obj* x_85; uint8 x_86; -x_85 = lean::cnstr_get(x_7, 0); -lean::dec(x_85); -x_86 = !lean::is_exclusive(x_8); -if (x_86 == 0) -{ -return x_7; -} -else -{ -obj* x_87; uint8 x_88; obj* x_89; -x_87 = lean::cnstr_get(x_8, 0); -x_88 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_87); -lean::dec(x_8); -x_89 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_89, 0, x_87); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_88); -lean::cnstr_set(x_7, 0, x_89); -return x_7; -} -} -else -{ -obj* x_90; obj* x_91; uint8 x_92; obj* x_93; obj* x_94; obj* x_95; -x_90 = lean::cnstr_get(x_7, 1); -lean::inc(x_90); -lean::dec(x_7); -x_91 = lean::cnstr_get(x_8, 0); -lean::inc(x_91); -x_92 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_93 = x_8; -} else { - lean::dec_ref(x_8); - x_93 = lean::box(0); -} -if (lean::is_scalar(x_93)) { - x_94 = lean::alloc_cnstr(1, 1, 1); -} else { - x_94 = x_93; -} -lean::cnstr_set(x_94, 0, x_91); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_92); -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_90); -return x_95; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseHexLit___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_parseHexLit___spec__2(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseHexLit___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_parseHexLit___spec__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_parseHexLit___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_parseHexLit(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* _init_l_Lean_Parser_number() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("number"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__1() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_number; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__2() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(1u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_number; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__3() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(2u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_number; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(2u); -x_3 = lean_name_mk_numeral(x_1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__5() { -_start: -{ -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; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::mk_nat_obj(3u); -x_4 = lean_name_mk_numeral(x_2, x_3); -x_5 = lean::box(3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_Lean_Parser_Syntax_mkNode(x_4, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_1); -x_9 = l_Lean_Parser_number; -x_10 = l_Lean_Parser_Syntax_mkNode(x_9, x_8); -return x_10; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_nat_obj(3u); -x_3 = lean_name_mk_numeral(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_number_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::box(0); -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_3; -x_3 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; -x_4 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__1; -return x_4; -} -else -{ -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_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_2); -x_8 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1; -x_9 = l_Lean_Parser_Syntax_mkNode(x_8, x_7); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_2); -x_11 = l_Lean_Parser_number; -x_12 = l_Lean_Parser_Syntax_mkNode(x_11, x_10); -return x_12; -} -} -case 1: -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__2; -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -x_16 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_2); -x_18 = l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3; -x_19 = l_Lean_Parser_Syntax_mkNode(x_18, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_2); -x_21 = l_Lean_Parser_number; -x_22 = l_Lean_Parser_Syntax_mkNode(x_21, x_20); -return x_22; -} -} -case 2: -{ -obj* x_23; -x_23 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; -x_24 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__3; -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -x_26 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_26, 0, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_2); -x_28 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__4; -x_29 = l_Lean_Parser_Syntax_mkNode(x_28, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_2); -x_31 = l_Lean_Parser_number; -x_32 = l_Lean_Parser_Syntax_mkNode(x_31, x_30); -return x_32; -} -} -default: -{ -obj* x_33; -x_33 = lean::cnstr_get(x_1, 0); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; -x_34 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__5; -return x_34; -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -x_35 = lean::cnstr_get(x_33, 0); -lean::inc(x_35); -x_36 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_36, 0, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_2); -x_38 = l_Lean_Parser_number_HasView_x27___elambda__1___closed__6; -x_39 = l_Lean_Parser_Syntax_mkNode(x_38, x_37); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_2); -x_41 = l_Lean_Parser_number; -x_42 = l_Lean_Parser_Syntax_mkNode(x_41, x_40); -return x_42; -} -} -} -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__3() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__4() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::box(0); -x_2 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__5() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__4; -return x_1; -} -} -obj* _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__6() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("number"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* l_Lean_Parser_number_HasView_x27___lambda__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_4, 1); -lean::inc(x_6); -lean::dec(x_4); -x_7 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__6; -x_8 = lean_name_dec_eq(x_5, x_7); -lean::dec(x_5); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_6); -x_9 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_9; -} -else -{ -if (lean::obj_tag(x_6) == 0) -{ -obj* x_10; -x_10 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_6, 1); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = lean::cnstr_get(x_6, 0); -lean::inc(x_12); -lean::dec(x_6); -x_13 = l_Lean_Parser_Syntax_asNode___main(x_12); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_14; -} -else -{ -uint8 x_15; -x_15 = !lean::is_exclusive(x_13); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; -x_16 = lean::cnstr_get(x_13, 0); -x_17 = lean::cnstr_get(x_16, 0); -lean::inc(x_17); -switch (lean::obj_tag(x_17)) { -case 0: -{ -obj* x_18; -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_18 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_18; -} -case 1: -{ -obj* x_19; -lean::dec(x_17); -lean::free_heap_obj(x_13); -lean::dec(x_16); -x_19 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_19; -} -default: -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; -x_20 = lean::cnstr_get(x_16, 1); -lean::inc(x_20); -lean::dec(x_16); -x_21 = lean::cnstr_get(x_17, 0); -lean::inc(x_21); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_dec_eq(x_21, x_23); -lean::dec(x_21); -if (x_24 == 0) -{ -obj* x_25; -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_25 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_25; -} -else -{ -if (lean::obj_tag(x_20) == 0) -{ -obj* x_26; -lean::dec(x_22); -lean::free_heap_obj(x_13); -x_26 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_26; -} -else -{ -obj* x_27; -x_27 = lean::cnstr_get(x_20, 1); -lean::inc(x_27); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_28; obj* x_29; uint8 x_30; -x_28 = lean::cnstr_get(x_20, 0); -lean::inc(x_28); -lean::dec(x_20); -x_29 = lean::mk_nat_obj(0u); -x_30 = lean::nat_dec_eq(x_22, x_29); -if (x_30 == 0) -{ -obj* x_31; uint8 x_32; -x_31 = lean::mk_nat_obj(1u); -x_32 = lean::nat_dec_eq(x_22, x_31); -if (x_32 == 0) -{ -obj* x_33; uint8 x_34; -x_33 = lean::mk_nat_obj(2u); -x_34 = lean::nat_dec_eq(x_22, x_33); -lean::dec(x_22); -if (x_34 == 0) -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_35; obj* x_36; -x_35 = lean::cnstr_get(x_28, 0); -lean::inc(x_35); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_35); -x_36 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_36, 0, x_13); -return x_36; -} -else -{ -obj* x_37; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_37 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__1; -return x_37; -} -} -else -{ -if (lean::obj_tag(x_28) == 0) -{ -obj* x_38; obj* x_39; -x_38 = lean::cnstr_get(x_28, 0); -lean::inc(x_38); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_38); -x_39 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_39, 0, x_13); -return x_39; -} -else -{ -obj* x_40; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_40 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__2; -return x_40; -} -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_41; obj* x_42; -x_41 = lean::cnstr_get(x_28, 0); -lean::inc(x_41); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_41); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_13); -return x_42; -} -else -{ -obj* x_43; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_43 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__3; -return x_43; -} -} -} -else -{ -lean::dec(x_22); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_44; obj* x_45; -x_44 = lean::cnstr_get(x_28, 0); -lean::inc(x_44); -lean::dec(x_28); -lean::cnstr_set(x_13, 0, x_44); -x_45 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_45, 0, x_13); -return x_45; -} -else -{ -obj* x_46; -lean::dec(x_28); -lean::free_heap_obj(x_13); -x_46 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__4; -return x_46; -} -} -} -else -{ -obj* x_47; -lean::dec(x_27); -lean::dec(x_22); -lean::dec(x_20); -lean::free_heap_obj(x_13); -x_47 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_47; -} -} -} -} -} -} -else -{ -obj* x_48; obj* x_49; -x_48 = lean::cnstr_get(x_13, 0); -lean::inc(x_48); -lean::dec(x_13); -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -switch (lean::obj_tag(x_49)) { -case 0: -{ -obj* x_50; -lean::dec(x_48); -x_50 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_50; -} -case 1: -{ -obj* x_51; -lean::dec(x_49); -lean::dec(x_48); -x_51 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_51; -} -default: -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; uint8 x_56; -x_52 = lean::cnstr_get(x_48, 1); -lean::inc(x_52); -lean::dec(x_48); -x_53 = lean::cnstr_get(x_49, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_49, 1); -lean::inc(x_54); -lean::dec(x_49); -x_55 = lean::box(0); -x_56 = lean_name_dec_eq(x_53, x_55); -lean::dec(x_53); -if (x_56 == 0) -{ -obj* x_57; -lean::dec(x_54); -lean::dec(x_52); -x_57 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_57; -} -else -{ -if (lean::obj_tag(x_52) == 0) -{ -obj* x_58; -lean::dec(x_54); -x_58 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_58; -} -else -{ -obj* x_59; -x_59 = lean::cnstr_get(x_52, 1); -lean::inc(x_59); -if (lean::obj_tag(x_59) == 0) -{ -obj* x_60; obj* x_61; uint8 x_62; -x_60 = lean::cnstr_get(x_52, 0); -lean::inc(x_60); -lean::dec(x_52); -x_61 = lean::mk_nat_obj(0u); -x_62 = lean::nat_dec_eq(x_54, x_61); -if (x_62 == 0) -{ -obj* x_63; uint8 x_64; -x_63 = lean::mk_nat_obj(1u); -x_64 = lean::nat_dec_eq(x_54, x_63); -if (x_64 == 0) -{ -obj* x_65; uint8 x_66; -x_65 = lean::mk_nat_obj(2u); -x_66 = lean::nat_dec_eq(x_54, x_65); -lean::dec(x_54); -if (x_66 == 0) -{ -if (lean::obj_tag(x_60) == 0) -{ -obj* x_67; obj* x_68; obj* x_69; -x_67 = lean::cnstr_get(x_60, 0); -lean::inc(x_67); -lean::dec(x_60); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -x_69 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_69, 0, x_68); -return x_69; -} -else -{ -obj* x_70; -lean::dec(x_60); -x_70 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__1; -return x_70; -} -} -else -{ -if (lean::obj_tag(x_60) == 0) -{ -obj* x_71; obj* x_72; obj* x_73; -x_71 = lean::cnstr_get(x_60, 0); -lean::inc(x_71); -lean::dec(x_60); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); -x_73 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_73, 0, x_72); -return x_73; -} -else -{ -obj* x_74; -lean::dec(x_60); -x_74 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__2; -return x_74; -} -} -} -else -{ -lean::dec(x_54); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_75; obj* x_76; obj* x_77; -x_75 = lean::cnstr_get(x_60, 0); -lean::inc(x_75); -lean::dec(x_60); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_75); -x_77 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_77, 0, x_76); -return x_77; -} -else -{ -obj* x_78; -lean::dec(x_60); -x_78 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__3; -return x_78; -} -} -} -else -{ -lean::dec(x_54); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_79; obj* x_80; obj* x_81; -x_79 = lean::cnstr_get(x_60, 0); -lean::inc(x_79); -lean::dec(x_60); -x_80 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_80, 0, x_79); -x_81 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -return x_81; -} -else -{ -obj* x_82; -lean::dec(x_60); -x_82 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__4; -return x_82; -} -} -} -else -{ -obj* x_83; -lean::dec(x_59); -lean::dec(x_54); -lean::dec(x_52); -x_83 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_83; -} -} -} -} -} -} -} -} -else -{ -obj* x_84; -lean::dec(x_11); -lean::dec(x_6); -x_84 = l_Lean_Parser_number_HasView_x27___lambda__1___closed__5; -return x_84; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_number_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_HasView_x27___lambda__1), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_number_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_number_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_number_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_number_HasView_x27; -return x_1; -} -} -obj* l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_number_x27___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_3); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -x_9 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_3); -x_11 = l_Char_isDigit(x_10); -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_12; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::string_push(x_2, x_10); -x_14 = l_String_OldIterator_next___main(x_3); -x_1 = x_7; -x_2 = x_13; -x_3 = x_14; -goto _start; -} -} -} -else -{ -obj* x_16; -lean::dec(x_1); -x_16 = l___private_init_lean_parser_parsec_4__mkStringResult___rarg(x_2, x_3); -return x_16; -} -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -x_5 = l_String_OldIterator_remaining___main(x_3); -x_6 = l___private_init_lean_parser_parsec_5__takeWhileAux___main___at_Lean_Parser_number_x27___spec__3(x_5, x_1, x_3); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_4); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_number_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = lean::cnstr_get(x_8, 1); -x_12 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_13 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_10); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint32 x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::free_heap_obj(x_8); -x_14 = lean::cnstr_get(x_13, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_13, 2); -lean::inc(x_16); -lean::dec(x_13); -x_17 = l_String_splitAux___main___closed__1; -x_18 = lean::unbox_uint32(x_14); -lean::dec(x_14); -x_19 = lean::string_push(x_17, x_18); -x_20 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2(x_19, x_1, x_15, x_11); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_22); -lean::cnstr_set(x_20, 0, x_23); -return x_20; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_24 = lean::cnstr_get(x_20, 0); -x_25 = lean::cnstr_get(x_20, 1); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_20); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_24); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -return x_27; -} -} -else -{ -uint8 x_28; -x_28 = !lean::is_exclusive(x_13); -if (x_28 == 0) -{ -lean::cnstr_set(x_8, 0, x_13); -return x_8; -} -else -{ -obj* x_29; uint8 x_30; obj* x_31; -x_29 = lean::cnstr_get(x_13, 0); -x_30 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); -lean::inc(x_29); -lean::dec(x_13); -x_31 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set_scalar(x_31, sizeof(void*)*1, x_30); -lean::cnstr_set(x_8, 0, x_31); -return x_8; -} -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_32 = lean::cnstr_get(x_8, 0); -x_33 = lean::cnstr_get(x_8, 1); -lean::inc(x_33); -lean::inc(x_32); -lean::dec(x_8); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_32); -if (lean::obj_tag(x_35) == 0) -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; uint32 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_36 = lean::cnstr_get(x_35, 0); -lean::inc(x_36); -x_37 = lean::cnstr_get(x_35, 1); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_35, 2); -lean::inc(x_38); -lean::dec(x_35); -x_39 = l_String_splitAux___main___closed__1; -x_40 = lean::unbox_uint32(x_36); -lean::dec(x_36); -x_41 = lean::string_push(x_39, x_40); -x_42 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2(x_41, x_1, x_37, x_33); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_42, 1); -lean::inc(x_44); -if (lean::is_exclusive(x_42)) { - lean::cnstr_release(x_42, 0); - lean::cnstr_release(x_42, 1); - x_45 = x_42; -} else { - lean::dec_ref(x_42); - x_45 = lean::box(0); -} -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_38, x_43); -if (lean::is_scalar(x_45)) { - x_47 = lean::alloc_cnstr(0, 2, 0); -} else { - x_47 = x_45; -} -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_44); -return x_47; -} -else -{ -obj* x_48; uint8 x_49; obj* x_50; obj* x_51; obj* x_52; -x_48 = lean::cnstr_get(x_35, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get_scalar(x_35, sizeof(void*)*1); -if (lean::is_exclusive(x_35)) { - lean::cnstr_release(x_35, 0); - x_50 = x_35; -} else { - lean::dec_ref(x_35); - x_50 = lean::box(0); -} -if (lean::is_scalar(x_50)) { - x_51 = lean::alloc_cnstr(1, 1, 1); -} else { - x_51 = x_50; -} -lean::cnstr_set(x_51, 0, x_48); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_49); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_33); -return x_52; -} -} -} -else -{ -uint32 x_53; uint8 x_54; -x_53 = l_String_OldIterator_curr___main(x_2); -x_54 = l_Char_isDigit(x_53); -if (x_54 == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; uint8 x_62; -x_55 = l_Char_quoteCore(x_53); -x_56 = l_Char_HasRepr___closed__1; -x_57 = lean::string_append(x_56, x_55); -lean::dec(x_55); -x_58 = lean::string_append(x_57, x_56); -x_59 = lean::box(0); -x_60 = l_mjoin___rarg___closed__1; -x_61 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_58, x_60, x_59, x_59, x_1, x_2, x_3); -x_62 = !lean::is_exclusive(x_61); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_63 = lean::cnstr_get(x_61, 0); -x_64 = lean::cnstr_get(x_61, 1); -x_65 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_63); -if (lean::obj_tag(x_66) == 0) -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; uint32 x_71; obj* x_72; obj* x_73; uint8 x_74; -lean::free_heap_obj(x_61); -x_67 = lean::cnstr_get(x_66, 0); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_66, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_66, 2); -lean::inc(x_69); -lean::dec(x_66); -x_70 = l_String_splitAux___main___closed__1; -x_71 = lean::unbox_uint32(x_67); -lean::dec(x_67); -x_72 = lean::string_push(x_70, x_71); -x_73 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2(x_72, x_1, x_68, x_64); -x_74 = !lean::is_exclusive(x_73); -if (x_74 == 0) -{ -obj* x_75; obj* x_76; -x_75 = lean::cnstr_get(x_73, 0); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_75); -lean::cnstr_set(x_73, 0, x_76); -return x_73; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_77 = lean::cnstr_get(x_73, 0); -x_78 = lean::cnstr_get(x_73, 1); -lean::inc(x_78); -lean::inc(x_77); -lean::dec(x_73); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_77); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_78); -return x_80; -} -} -else -{ -uint8 x_81; -x_81 = !lean::is_exclusive(x_66); -if (x_81 == 0) -{ -lean::cnstr_set(x_61, 0, x_66); -return x_61; -} -else -{ -obj* x_82; uint8 x_83; obj* x_84; -x_82 = lean::cnstr_get(x_66, 0); -x_83 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); -lean::inc(x_82); -lean::dec(x_66); -x_84 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_84, 0, x_82); -lean::cnstr_set_scalar(x_84, sizeof(void*)*1, x_83); -lean::cnstr_set(x_61, 0, x_84); -return x_61; -} -} -} -else -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_85 = lean::cnstr_get(x_61, 0); -x_86 = lean::cnstr_get(x_61, 1); -lean::inc(x_86); -lean::inc(x_85); -lean::dec(x_61); -x_87 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_88 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_85); -if (lean::obj_tag(x_88) == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint32 x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -x_90 = lean::cnstr_get(x_88, 1); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_88, 2); -lean::inc(x_91); -lean::dec(x_88); -x_92 = l_String_splitAux___main___closed__1; -x_93 = lean::unbox_uint32(x_89); -lean::dec(x_89); -x_94 = lean::string_push(x_92, x_93); -x_95 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2(x_94, x_1, x_90, x_86); -x_96 = lean::cnstr_get(x_95, 0); -lean::inc(x_96); -x_97 = lean::cnstr_get(x_95, 1); -lean::inc(x_97); -if (lean::is_exclusive(x_95)) { - lean::cnstr_release(x_95, 0); - lean::cnstr_release(x_95, 1); - x_98 = x_95; -} else { - lean::dec_ref(x_95); - x_98 = lean::box(0); -} -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_91, x_96); -if (lean::is_scalar(x_98)) { - x_100 = lean::alloc_cnstr(0, 2, 0); -} else { - x_100 = x_98; -} -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_97); -return x_100; -} -else -{ -obj* x_101; uint8 x_102; obj* x_103; obj* x_104; obj* x_105; -x_101 = lean::cnstr_get(x_88, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get_scalar(x_88, sizeof(void*)*1); -if (lean::is_exclusive(x_88)) { - lean::cnstr_release(x_88, 0); - x_103 = x_88; -} else { - lean::dec_ref(x_88); - x_103 = lean::box(0); -} -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(1, 1, 1); -} else { - x_104 = x_103; -} -lean::cnstr_set(x_104, 0, x_101); -lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); -x_105 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_86); -return x_105; -} -} -} -else -{ -obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; uint8 x_111; -x_106 = l_String_OldIterator_next___main(x_2); -x_107 = lean::box(0); -x_108 = l_String_splitAux___main___closed__1; -x_109 = lean::string_push(x_108, x_53); -x_110 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2(x_109, x_1, x_106, x_3); -x_111 = !lean::is_exclusive(x_110); -if (x_111 == 0) -{ -obj* x_112; obj* x_113; -x_112 = lean::cnstr_get(x_110, 0); -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_107, x_112); -lean::cnstr_set(x_110, 0, x_113); -return x_110; -} -else -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; -x_114 = lean::cnstr_get(x_110, 0); -x_115 = lean::cnstr_get(x_110, 1); -lean::inc(x_115); -lean::inc(x_114); -lean::dec(x_110); -x_116 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_107, x_114); -x_117 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_117, 0, x_116); -lean::cnstr_set(x_117, 1, x_115); -return x_117; -} -} -} -} -} -obj* l_List_map___main___at_Lean_Parser_number_x27___spec__5___lambda__1(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; -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 1); -lean::inc(x_6); -lean::dec(x_1); -x_7 = lean::apply_3(x_6, x_2, x_3, x_4); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; uint8 x_11; -x_10 = lean::cnstr_get(x_7, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_8); -if (x_11 == 0) -{ -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; -x_12 = lean::cnstr_get(x_8, 0); -x_13 = lean::cnstr_get(x_8, 2); -x_14 = lean::box(0); -x_15 = lean_name_mk_numeral(x_14, x_5); -x_16 = lean::box(0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_12); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_Lean_Parser_Syntax_mkNode(x_15, x_17); -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_19); -lean::cnstr_set(x_8, 0, x_18); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_8); -lean::cnstr_set(x_7, 0, x_20); -return x_7; -} -else -{ -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; -x_21 = lean::cnstr_get(x_8, 0); -x_22 = lean::cnstr_get(x_8, 1); -x_23 = lean::cnstr_get(x_8, 2); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_8); -x_24 = lean::box(0); -x_25 = lean_name_mk_numeral(x_24, x_5); -x_26 = lean::box(0); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_21); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_Lean_Parser_Syntax_mkNode(x_25, x_27); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_22); -lean::cnstr_set(x_30, 2, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_30); -lean::cnstr_set(x_7, 0, x_31); -return x_7; -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_32 = lean::cnstr_get(x_7, 1); -lean::inc(x_32); -lean::dec(x_7); -x_33 = lean::cnstr_get(x_8, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get(x_8, 1); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_8, 2); -lean::inc(x_35); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_36 = x_8; -} else { - lean::dec_ref(x_8); - x_36 = lean::box(0); -} -x_37 = lean::box(0); -x_38 = lean_name_mk_numeral(x_37, x_5); -x_39 = lean::box(0); -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 = l_Lean_Parser_Syntax_mkNode(x_38, x_40); -x_42 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_36)) { - x_43 = lean::alloc_cnstr(0, 3, 0); -} else { - x_43 = x_36; -} -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_34); -lean::cnstr_set(x_43, 2, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_43); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_32); -return x_45; -} -} -else -{ -uint8 x_46; -lean::dec(x_5); -x_46 = !lean::is_exclusive(x_7); -if (x_46 == 0) -{ -obj* x_47; uint8 x_48; -x_47 = lean::cnstr_get(x_7, 0); -lean::dec(x_47); -x_48 = !lean::is_exclusive(x_8); -if (x_48 == 0) -{ -return x_7; -} -else -{ -obj* x_49; uint8 x_50; obj* x_51; -x_49 = lean::cnstr_get(x_8, 0); -x_50 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_49); -lean::dec(x_8); -x_51 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_50); -lean::cnstr_set(x_7, 0, x_51); -return x_7; -} -} -else -{ -obj* x_52; obj* x_53; uint8 x_54; obj* x_55; obj* x_56; obj* x_57; -x_52 = lean::cnstr_get(x_7, 1); -lean::inc(x_52); -lean::dec(x_7); -x_53 = lean::cnstr_get(x_8, 0); -lean::inc(x_53); -x_54 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_55 = x_8; -} else { - lean::dec_ref(x_8); - x_55 = lean::box(0); -} -if (lean::is_scalar(x_55)) { - x_56 = lean::alloc_cnstr(1, 1, 1); -} else { - x_56 = x_55; -} -lean::cnstr_set(x_56, 0, x_53); -lean::cnstr_set_scalar(x_56, sizeof(void*)*1, x_54); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_52); -return x_57; -} -} -} -} -obj* l_List_map___main___at_Lean_Parser_number_x27___spec__5(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Parser_number_x27___spec__5___lambda__1), 4, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = l_List_map___main___at_Lean_Parser_number_x27___spec__5(x_5); -lean::cnstr_set(x_1, 1, x_7); -lean::cnstr_set(x_1, 0, x_6); -return x_1; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_1); -x_10 = lean::alloc_closure(reinterpret_cast(l_List_map___main___at_Lean_Parser_number_x27___spec__5___lambda__1), 4, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = l_List_map___main___at_Lean_Parser_number_x27___spec__5(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_11); -return x_12; -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7___rarg(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_21; obj* x_22; obj* x_27; obj* x_28; -lean::inc(x_6); -x_27 = lean::apply_3(x_3, x_5, x_6, x_7); -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_27, 1); -lean::inc(x_29); -lean::dec(x_27); -x_30 = lean::cnstr_get(x_28, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_28, 1); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_28, 2); -lean::inc(x_32); -if (lean::is_exclusive(x_28)) { - lean::cnstr_release(x_28, 0); - lean::cnstr_release(x_28, 1); - lean::cnstr_release(x_28, 2); - x_33 = x_28; -} else { - lean::dec_ref(x_28); - x_33 = lean::box(0); -} -if (lean::obj_tag(x_4) == 0) -{ -obj* x_44; -x_44 = lean::cnstr_get(x_4, 2); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_45; obj* x_46; obj* x_47; obj* x_48; uint8 x_49; -lean::dec(x_33); -x_45 = lean::cnstr_get(x_4, 0); -lean::inc(x_45); -x_46 = lean::cnstr_get(x_4, 1); -lean::inc(x_46); -x_47 = lean::cnstr_get(x_31, 1); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -lean::dec(x_46); -x_49 = lean::nat_dec_lt(x_47, x_48); -if (x_49 == 0) -{ -uint8 x_50; -x_50 = lean::nat_dec_lt(x_48, x_47); -lean::dec(x_47); -lean::dec(x_48); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_30); -lean::cnstr_set(x_51, 1, x_45); -lean::inc(x_31); -x_52 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_31); -lean::cnstr_set(x_52, 2, x_44); -lean::inc(x_1); -x_53 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_53, 0, x_1); -lean::closure_set(x_53, 1, x_1); -x_54 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_54, 0, x_53); -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_52); -lean::cnstr_set(x_55, 1, x_31); -lean::cnstr_set(x_55, 2, x_54); -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_55); -x_21 = x_56; -x_22 = x_29; -goto block_26; -} -else -{ -obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; -lean::dec(x_45); -x_57 = lean::box(0); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_30); -lean::cnstr_set(x_58, 1, x_57); -lean::inc(x_31); -x_59 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_31); -lean::cnstr_set(x_59, 2, x_44); -lean::inc(x_1); -x_60 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_60, 0, x_1); -lean::closure_set(x_60, 1, x_1); -x_61 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_61, 0, x_60); -x_62 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_62, 0, x_59); -lean::cnstr_set(x_62, 1, x_31); -lean::cnstr_set(x_62, 2, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_62); -x_21 = x_63; -x_22 = x_29; -goto block_26; -} -} -else -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; -lean::dec(x_48); -lean::dec(x_47); -lean::dec(x_45); -lean::dec(x_30); -lean::inc(x_1); -x_64 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_64, 0, x_1); -lean::closure_set(x_64, 1, x_1); -x_65 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_65, 0, x_64); -lean::inc(x_4); -x_66 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_66, 0, x_4); -lean::cnstr_set(x_66, 1, x_31); -lean::cnstr_set(x_66, 2, x_65); -x_67 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_66); -x_21 = x_67; -x_22 = x_29; -goto block_26; -} -} -else -{ -obj* x_68; -lean::dec(x_44); -x_68 = lean::box(0); -x_34 = x_68; -goto block_43; -} -} -else -{ -obj* x_69; -x_69 = lean::box(0); -x_34 = x_69; -goto block_43; -} -block_43: -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_34); -x_35 = lean::box(0); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_30); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::box(0); -lean::inc(x_31); -if (lean::is_scalar(x_33)) { - x_38 = lean::alloc_cnstr(0, 3, 0); -} else { - x_38 = x_33; -} -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set(x_38, 1, x_31); -lean::cnstr_set(x_38, 2, x_37); -lean::inc(x_1); -x_39 = lean::alloc_closure(reinterpret_cast(l_Function_comp___rarg), 3, 2); -lean::closure_set(x_39, 0, x_1); -lean::closure_set(x_39, 1, x_1); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set(x_41, 1, x_31); -lean::cnstr_set(x_41, 2, x_40); -x_42 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_41); -x_21 = x_42; -x_22 = x_29; -goto block_26; -} -} -else -{ -obj* x_70; uint8 x_71; -lean::dec(x_1); -x_70 = lean::cnstr_get(x_27, 1); -lean::inc(x_70); -lean::dec(x_27); -x_71 = !lean::is_exclusive(x_28); -if (x_71 == 0) -{ -x_21 = x_28; -x_22 = x_70; -goto block_26; -} -else -{ -obj* x_72; uint8 x_73; obj* x_74; -x_72 = lean::cnstr_get(x_28, 0); -x_73 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -lean::inc(x_72); -lean::dec(x_28); -x_74 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set_scalar(x_74, sizeof(void*)*1, x_73); -x_21 = x_74; -x_22 = x_70; -goto block_26; -} -} -block_20: -{ -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_8, 2); -lean::dec(x_11); -x_12 = lean::cnstr_get(x_8, 1); -lean::dec(x_12); -x_13 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_13); -lean::cnstr_set(x_8, 1, x_6); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_8); -lean::cnstr_set(x_14, 1, x_9); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_8, 0); -lean::inc(x_15); -lean::dec(x_8); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_6); -lean::cnstr_set(x_17, 2, x_16); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_9); -return x_18; -} -} -else -{ -obj* x_19; -lean::dec(x_6); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_8); -lean::cnstr_set(x_19, 1, x_9); -return x_19; -} -} -block_26: -{ -if (lean::obj_tag(x_21) == 0) -{ -lean::dec(x_4); -lean::dec(x_2); -x_8 = x_21; -x_9 = x_22; -goto block_20; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; -x_23 = lean::cnstr_get(x_21, 0); -lean::inc(x_23); -lean::dec(x_21); -x_24 = lean::cnstr_get(x_23, 0); -lean::inc(x_24); -lean::dec(x_23); -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_4); -lean::cnstr_set(x_25, 1, x_24); -lean::cnstr_set(x_25, 2, x_2); -x_8 = x_25; -x_9 = x_22; -goto block_20; -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7___rarg), 7, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_6; uint8 x_7; obj* x_8; -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -lean::cnstr_set(x_6, 2, x_2); -lean::cnstr_set(x_6, 3, x_4); -x_7 = 0; -x_8 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set_scalar(x_8, sizeof(void*)*1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; uint8 x_11; obj* x_12; -lean::dec(x_5); -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_1); -lean::cnstr_set(x_10, 2, x_2); -lean::cnstr_set(x_10, 3, x_4); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -return x_12; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_number_x27___spec__9(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_5) == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_2); -x_9 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_10 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_10, 0, x_4); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_9); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_8); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_12 = lean::cnstr_get(x_5, 0); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_5, 1); -lean::inc(x_13); -lean::dec(x_5); -lean::inc(x_6); -lean::inc(x_3); -lean::inc(x_2); -x_14 = l_List_mfoldr___main___at_Lean_Parser_number_x27___spec__9(x_1, x_2, x_3, x_4, x_13, x_6, x_7, x_8); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; uint8 x_21; -x_16 = lean::cnstr_get(x_14, 1); -lean::inc(x_16); -lean::dec(x_14); -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get(x_15, 1); -lean::inc(x_18); -x_19 = lean::cnstr_get(x_15, 2); -lean::inc(x_19); -lean::dec(x_15); -x_20 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7___rarg(x_2, x_3, x_12, x_17, x_6, x_18, x_16); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_22); -lean::cnstr_set(x_20, 0, x_23); -return x_20; -} -else -{ -obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_24 = lean::cnstr_get(x_20, 0); -x_25 = lean::cnstr_get(x_20, 1); -lean::inc(x_25); -lean::inc(x_24); -lean::dec(x_20); -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_24); -x_27 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_25); -return x_27; -} -} -else -{ -uint8 x_28; -lean::dec(x_12); -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_2); -x_28 = !lean::is_exclusive(x_14); -if (x_28 == 0) -{ -obj* x_29; uint8 x_30; -x_29 = lean::cnstr_get(x_14, 0); -lean::dec(x_29); -x_30 = !lean::is_exclusive(x_15); -if (x_30 == 0) -{ -return x_14; -} -else -{ -obj* x_31; uint8 x_32; obj* x_33; -x_31 = lean::cnstr_get(x_15, 0); -x_32 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -lean::inc(x_31); -lean::dec(x_15); -x_33 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_32); -lean::cnstr_set(x_14, 0, x_33); -return x_14; -} -} -else -{ -obj* x_34; obj* x_35; uint8 x_36; obj* x_37; obj* x_38; obj* x_39; -x_34 = lean::cnstr_get(x_14, 1); -lean::inc(x_34); -lean::dec(x_14); -x_35 = lean::cnstr_get(x_15, 0); -lean::inc(x_35); -x_36 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -if (lean::is_exclusive(x_15)) { - lean::cnstr_release(x_15, 0); - x_37 = x_15; -} else { - lean::dec_ref(x_15); - x_37 = lean::box(0); -} -if (lean::is_scalar(x_37)) { - x_38 = lean::alloc_cnstr(1, 1, 1); -} else { - x_38 = x_37; -} -lean::cnstr_set(x_38, 0, x_35); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_36); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_34); -return x_39; -} -} -} -} -} -obj* l_Lean_Parser_MonadParsec_longestMatch___at_Lean_Parser_number_x27___spec__6(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_9; obj* x_10; obj* x_11; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_longestMatch___rarg___lambda__2___closed__1; -x_7 = l_mjoin___rarg___closed__1; -lean::inc(x_3); -x_8 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg(x_6, x_7, x_5, x_5, x_3); -x_9 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_3); -x_10 = l_List_mfoldr___main___at_Lean_Parser_number_x27___spec__9(x_3, x_7, x_9, x_8, x_1, x_2, x_3, x_4); -lean::dec(x_3); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_10, 0); -lean::dec(x_13); -x_14 = lean::cnstr_get(x_11, 0); -lean::inc(x_14); -x_15 = lean::cnstr_get(x_11, 2); -lean::inc(x_15); -lean::dec(x_11); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_14); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_16); -lean::cnstr_set(x_10, 0, x_17); -return x_10; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::cnstr_get(x_10, 1); -lean::inc(x_18); -lean::dec(x_10); -x_19 = lean::cnstr_get(x_11, 0); -lean::inc(x_19); -x_20 = lean::cnstr_get(x_11, 2); -lean::inc(x_20); -lean::dec(x_11); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_19); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_21); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_18); -return x_23; -} -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_10); -if (x_24 == 0) -{ -obj* x_25; uint8 x_26; -x_25 = lean::cnstr_get(x_10, 0); -lean::dec(x_25); -x_26 = !lean::is_exclusive(x_11); -if (x_26 == 0) -{ -obj* x_27; -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_11); -lean::cnstr_set(x_10, 0, x_27); -return x_10; -} -else -{ -obj* x_28; uint8 x_29; obj* x_30; obj* x_31; -x_28 = lean::cnstr_get(x_11, 0); -x_29 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_28); -lean::dec(x_11); -x_30 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set_scalar(x_30, sizeof(void*)*1, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_30); -lean::cnstr_set(x_10, 0, x_31); -return x_10; -} -} -else -{ -obj* x_32; obj* x_33; uint8 x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_32 = lean::cnstr_get(x_10, 1); -lean::inc(x_32); -lean::dec(x_10); -x_33 = lean::cnstr_get(x_11, 0); -lean::inc(x_33); -x_34 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_35 = x_11; -} else { - lean::dec_ref(x_11); - x_35 = lean::box(0); -} -if (lean::is_scalar(x_35)) { - x_36 = lean::alloc_cnstr(1, 1, 1); -} else { - x_36 = x_35; -} -lean::cnstr_set(x_36, 0, x_33); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_34); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_32); -return x_38; -} -} -} -} -obj* l_Lean_Parser_Combinators_longestChoice___at_Lean_Parser_number_x27___spec__4(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_9; -x_5 = lean::mk_nat_obj(0u); -x_6 = l_List_enumFrom___main___rarg(x_5, x_1); -x_7 = l_List_map___main___at_Lean_Parser_number_x27___spec__5(x_6); -lean::inc(x_2); -x_8 = l_Lean_Parser_MonadParsec_longestMatch___at_Lean_Parser_number_x27___spec__6(x_7, x_2, x_3, x_4); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -if (lean::obj_tag(x_10) == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; -x_11 = lean::cnstr_get(x_8, 1); -lean::inc(x_11); -lean::dec(x_8); -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -x_13 = lean::cnstr_get(x_9, 2); -lean::inc(x_13); -lean::dec(x_9); -x_14 = lean::box(0); -x_15 = l___private_init_lean_parser_combinators_1__many1Aux___main___rarg___closed__1; -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_15, x_16, x_14, x_14, x_2, x_12, x_11); -lean::dec(x_2); -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_19); -lean::cnstr_set(x_17, 0, x_20); -return x_17; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_17, 0); -x_22 = lean::cnstr_get(x_17, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_17); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_21); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -return x_24; -} -} -else -{ -uint8 x_25; -lean::dec(x_2); -x_25 = !lean::is_exclusive(x_8); -if (x_25 == 0) -{ -obj* x_26; uint8 x_27; -x_26 = lean::cnstr_get(x_8, 0); -lean::dec(x_26); -x_27 = !lean::is_exclusive(x_9); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_28 = lean::cnstr_get(x_9, 2); -x_29 = lean::cnstr_get(x_9, 0); -lean::dec(x_29); -x_30 = lean::cnstr_get(x_10, 0); -lean::inc(x_30); -lean::dec(x_10); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_9, 2, x_31); -lean::cnstr_set(x_9, 0, x_30); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_28, x_9); -lean::cnstr_set(x_8, 0, x_32); -return x_8; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_33 = lean::cnstr_get(x_9, 1); -x_34 = lean::cnstr_get(x_9, 2); -lean::inc(x_34); -lean::inc(x_33); -lean::dec(x_9); -x_35 = lean::cnstr_get(x_10, 0); -lean::inc(x_35); -lean::dec(x_10); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_37 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_33); -lean::cnstr_set(x_37, 2, x_36); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_37); -lean::cnstr_set(x_8, 0, x_38); -return x_8; -} -} -else -{ -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; -x_39 = lean::cnstr_get(x_8, 1); -lean::inc(x_39); -lean::dec(x_8); -x_40 = lean::cnstr_get(x_9, 1); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_9, 2); -lean::inc(x_41); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_42 = x_9; -} else { - lean::dec_ref(x_9); - x_42 = lean::box(0); -} -x_43 = lean::cnstr_get(x_10, 0); -lean::inc(x_43); -lean::dec(x_10); -x_44 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_42)) { - x_45 = lean::alloc_cnstr(0, 3, 0); -} else { - x_45 = x_42; -} -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_40); -lean::cnstr_set(x_45, 2, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_45); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_39); -return x_47; -} -} -} -else -{ -uint8 x_48; -lean::dec(x_2); -x_48 = !lean::is_exclusive(x_8); -if (x_48 == 0) -{ -obj* x_49; uint8 x_50; -x_49 = lean::cnstr_get(x_8, 0); -lean::dec(x_49); -x_50 = !lean::is_exclusive(x_9); -if (x_50 == 0) -{ -return x_8; -} -else -{ -obj* x_51; uint8 x_52; obj* x_53; -x_51 = lean::cnstr_get(x_9, 0); -x_52 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_51); -lean::dec(x_9); -x_53 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_53, 0, x_51); -lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_52); -lean::cnstr_set(x_8, 0, x_53); -return x_8; -} -} -else -{ -obj* x_54; obj* x_55; uint8 x_56; obj* x_57; obj* x_58; obj* x_59; -x_54 = lean::cnstr_get(x_8, 1); -lean::inc(x_54); -lean::dec(x_8); -x_55 = lean::cnstr_get(x_9, 0); -lean::inc(x_55); -x_56 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_57 = x_9; -} else { - lean::dec_ref(x_9); - x_57 = lean::box(0); -} -if (lean::is_scalar(x_57)) { - x_58 = lean::alloc_cnstr(1, 1, 1); -} else { - x_58 = x_57; -} -lean::cnstr_set(x_58, 0, x_55); -lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_54); -return x_59; -} -} -} -} -obj* l_Lean_Parser_number_x27___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_number_x27___spec__1(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_6, 1); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -lean::inc(x_10); -x_13 = l_Lean_Parser_mkRawRes(x_1, x_10); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_14); -lean::cnstr_set(x_6, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -lean::cnstr_set(x_5, 0, x_15); -return x_5; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_6, 1); -x_17 = lean::cnstr_get(x_6, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_6); -lean::inc(x_16); -x_18 = l_Lean_Parser_mkRawRes(x_1, x_16); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -lean::cnstr_set(x_5, 0, x_21); -return x_5; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_5, 1); -lean::inc(x_22); -lean::dec(x_5); -x_23 = lean::cnstr_get(x_6, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_6, 2); -lean::inc(x_24); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_25 = x_6; -} else { - lean::dec_ref(x_6); - x_25 = lean::box(0); -} -lean::inc(x_23); -x_26 = l_Lean_Parser_mkRawRes(x_1, x_23); -x_27 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_25)) { - x_28 = lean::alloc_cnstr(0, 3, 0); -} else { - x_28 = x_25; -} -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_22); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_5); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_5, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_6); -if (x_33 == 0) -{ -return x_5; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_6, 0); -x_35 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_6); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_38 = lean::cnstr_get(x_6, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_40 = x_6; -} else { - lean::dec_ref(x_6); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -obj* l_Lean_Parser_number_x27___lambda__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_parseBinLit(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_6, 1); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -lean::inc(x_10); -x_13 = l_Lean_Parser_mkRawRes(x_1, x_10); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_14); -lean::cnstr_set(x_6, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -lean::cnstr_set(x_5, 0, x_15); -return x_5; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_6, 1); -x_17 = lean::cnstr_get(x_6, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_6); -lean::inc(x_16); -x_18 = l_Lean_Parser_mkRawRes(x_1, x_16); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -lean::cnstr_set(x_5, 0, x_21); -return x_5; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_5, 1); -lean::inc(x_22); -lean::dec(x_5); -x_23 = lean::cnstr_get(x_6, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_6, 2); -lean::inc(x_24); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_25 = x_6; -} else { - lean::dec_ref(x_6); - x_25 = lean::box(0); -} -lean::inc(x_23); -x_26 = l_Lean_Parser_mkRawRes(x_1, x_23); -x_27 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_25)) { - x_28 = lean::alloc_cnstr(0, 3, 0); -} else { - x_28 = x_25; -} -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_22); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_5); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_5, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_6); -if (x_33 == 0) -{ -return x_5; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_6, 0); -x_35 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_6); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_38 = lean::cnstr_get(x_6, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_40 = x_6; -} else { - lean::dec_ref(x_6); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -obj* l_Lean_Parser_number_x27___lambda__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_parseOctLit(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_6, 1); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -lean::inc(x_10); -x_13 = l_Lean_Parser_mkRawRes(x_1, x_10); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_14); -lean::cnstr_set(x_6, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -lean::cnstr_set(x_5, 0, x_15); -return x_5; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_6, 1); -x_17 = lean::cnstr_get(x_6, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_6); -lean::inc(x_16); -x_18 = l_Lean_Parser_mkRawRes(x_1, x_16); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -lean::cnstr_set(x_5, 0, x_21); -return x_5; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_5, 1); -lean::inc(x_22); -lean::dec(x_5); -x_23 = lean::cnstr_get(x_6, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_6, 2); -lean::inc(x_24); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_25 = x_6; -} else { - lean::dec_ref(x_6); - x_25 = lean::box(0); -} -lean::inc(x_23); -x_26 = l_Lean_Parser_mkRawRes(x_1, x_23); -x_27 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_25)) { - x_28 = lean::alloc_cnstr(0, 3, 0); -} else { - x_28 = x_25; -} -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_22); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_5); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_5, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_6); -if (x_33 == 0) -{ -return x_5; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_6, 0); -x_35 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_6); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_38 = lean::cnstr_get(x_6, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_40 = x_6; -} else { - lean::dec_ref(x_6); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -obj* l_Lean_Parser_number_x27___lambda__4(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_parseHexLit(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_6, 1); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -lean::inc(x_10); -x_13 = l_Lean_Parser_mkRawRes(x_1, x_10); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_14); -lean::cnstr_set(x_6, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -lean::cnstr_set(x_5, 0, x_15); -return x_5; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_6, 1); -x_17 = lean::cnstr_get(x_6, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_6); -lean::inc(x_16); -x_18 = l_Lean_Parser_mkRawRes(x_1, x_16); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -lean::cnstr_set(x_5, 0, x_21); -return x_5; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_5, 1); -lean::inc(x_22); -lean::dec(x_5); -x_23 = lean::cnstr_get(x_6, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_6, 2); -lean::inc(x_24); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_25 = x_6; -} else { - lean::dec_ref(x_6); - x_25 = lean::box(0); -} -lean::inc(x_23); -x_26 = l_Lean_Parser_mkRawRes(x_1, x_23); -x_27 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_25)) { - x_28 = lean::alloc_cnstr(0, 3, 0); -} else { - x_28 = x_25; -} -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_22); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_5); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_5, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_6); -if (x_33 == 0) -{ -return x_5; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_6, 0); -x_35 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_6); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_38 = lean::cnstr_get(x_6, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_40 = x_6; -} else { - lean::dec_ref(x_6); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -obj* _init_l_Lean_Parser_number_x27___closed__1() { -_start: -{ -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; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_x27___lambda__1___boxed), 4, 0); -lean::inc(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___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_Lean_Parser_number_x27___lambda__2), 4, 0); -lean::inc(x_2); -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_6, 0, x_2); -lean::closure_set(x_6, 1, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_x27___lambda__3___boxed), 4, 0); -lean::inc(x_2); -x_8 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_8, 0, x_2); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_x27___lambda__4___boxed), 4, 0); -x_10 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_10, 0, x_2); -lean::closure_set(x_10, 1, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_6); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_longestChoice___at_Lean_Parser_number_x27___spec__4), 4, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_11); -return x_17; -} -} -obj* l_Lean_Parser_number_x27(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_number; -x_5 = l_Lean_Parser_number_x27___closed__1; -x_6 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(x_4, x_5, x_1, x_2, x_3); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_MonadParsec_takeWhileCont___at_Lean_Parser_number_x27___spec__2(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_number_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_takeWhile1___at_Lean_Parser_number_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_number_x27___spec__7(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_number_x27___spec__8___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_List_mfoldr___main___at_Lean_Parser_number_x27___spec__9___boxed(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_9; -x_9 = l_List_mfoldr___main___at_Lean_Parser_number_x27___spec__9(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean::dec(x_1); -return x_9; -} -} -obj* l_Lean_Parser_number_x27___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_number_x27___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_number_x27___lambda__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_number_x27___lambda__3(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_number_x27___lambda__4___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_number_x27___lambda__4(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* _init_l_Lean_Parser_stringLit() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("Lean"); -x_3 = lean_name_mk_string(x_1, x_2); -x_4 = lean::mk_string("Parser"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::mk_string("stringLit"); -x_7 = lean_name_mk_string(x_5, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_stringLit_HasView_x27___elambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_1 = lean::box(0); -x_2 = lean::box(3); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_2); -lean::cnstr_set(x_3, 1, x_1); -x_4 = l_Lean_Parser_stringLit; -x_5 = l_Lean_Parser_Syntax_mkNode(x_4, x_3); -return x_5; -} -} -obj* l_Lean_Parser_stringLit_HasView_x27___elambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = l_Lean_Parser_stringLit_HasView_x27___elambda__1___closed__1; -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -x_4 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_5, 0, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = l_Lean_Parser_stringLit; -x_8 = l_Lean_Parser_Syntax_mkNode(x_7, x_6); -return x_8; -} -} -} -obj* l_Lean_Parser_stringLit_HasView_x27___elambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Syntax_asNode___main(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -uint8 x_4; -x_4 = !lean::is_exclusive(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::cnstr_get(x_2, 0); -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -lean::dec(x_5); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; -lean::free_heap_obj(x_2); -x_7 = lean::box(0); -return x_7; -} -else -{ -obj* x_8; -x_8 = lean::cnstr_get(x_6, 0); -lean::inc(x_8); -lean::dec(x_6); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -lean::dec(x_8); -lean::cnstr_set(x_2, 0, x_9); -return x_2; -} -else -{ -obj* x_10; -lean::dec(x_8); -lean::free_heap_obj(x_2); -x_10 = lean::box(0); -return x_10; -} -} -} -else -{ -obj* x_11; obj* x_12; -x_11 = lean::cnstr_get(x_2, 0); -lean::inc(x_11); -lean::dec(x_2); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_13; -x_13 = lean::box(0); -return x_13; -} -else -{ -obj* x_14; -x_14 = lean::cnstr_get(x_12, 0); -lean::inc(x_14); -lean::dec(x_12); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_15); -return x_16; -} -else -{ -obj* x_17; -lean::dec(x_14); -x_17 = lean::box(0); -return x_17; -} -} -} -} -} -} -obj* _init_l_Lean_Parser_stringLit_HasView_x27() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_HasView_x27___elambda__2), 1, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_HasView_x27___elambda__1___boxed), 1, 0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_stringLit_HasView_x27___elambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_stringLit_HasView_x27___elambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_stringLit_HasView() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_stringLit_HasView_x27; -return x_1; -} -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg(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; -x_6 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_6, 0, x_2); -x_7 = lean::box(0); -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_1, x_8, x_6, x_7, x_3, x_4, x_5); -lean::dec(x_6); -return x_9; -} -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_x27___spec__6(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_String_OldIterator_hasNext___main(x_2); -if (x_4 == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; uint8 x_9; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_12 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_10); -lean::cnstr_set(x_8, 0, x_12); -return x_8; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_13 = lean::cnstr_get(x_8, 0); -x_14 = lean::cnstr_get(x_8, 1); -lean::inc(x_14); -lean::inc(x_13); -lean::dec(x_8); -x_15 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_13); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_14); -return x_17; -} -} -else -{ -uint32 x_18; uint8 x_19; -x_18 = l_String_OldIterator_curr___main(x_2); -x_19 = l_Char_isDigit(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; uint8 x_27; -x_20 = l_Char_quoteCore(x_18); -x_21 = l_Char_HasRepr___closed__1; -x_22 = lean::string_append(x_21, x_20); -lean::dec(x_20); -x_23 = lean::string_append(x_22, x_21); -x_24 = lean::box(0); -x_25 = l_mjoin___rarg___closed__1; -x_26 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_23, x_25, x_24, x_24, x_1, x_2, x_3); -x_27 = !lean::is_exclusive(x_26); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; -x_28 = lean::cnstr_get(x_26, 0); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_28); -lean::cnstr_set(x_26, 0, x_30); -return x_26; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_31 = lean::cnstr_get(x_26, 0); -x_32 = lean::cnstr_get(x_26, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_26); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_31); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_32); -return x_35; -} -} -else -{ -obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_36 = l_String_OldIterator_next___main(x_2); -x_37 = lean::box(0); -x_38 = lean::box_uint32(x_18); -x_39 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_36); -lean::cnstr_set(x_39, 2, x_37); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_3); -return x_40; -} -} -} -} -obj* _init_l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("hexadecimal"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_188; obj* x_189; -lean::inc(x_2); -x_188 = l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_x27___spec__6(x_1, x_2, x_3); -x_189 = lean::cnstr_get(x_188, 0); -lean::inc(x_189); -if (lean::obj_tag(x_189) == 0) -{ -obj* x_190; uint8 x_191; -x_190 = lean::cnstr_get(x_188, 1); -lean::inc(x_190); -lean::dec(x_188); -x_191 = !lean::is_exclusive(x_189); -if (x_191 == 0) -{ -obj* x_192; obj* x_193; uint32 x_194; obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; -x_192 = lean::cnstr_get(x_189, 0); -x_193 = lean::cnstr_get(x_189, 2); -x_194 = lean::unbox_uint32(x_192); -lean::dec(x_192); -x_195 = lean::uint32_to_nat(x_194); -x_196 = lean::mk_nat_obj(48u); -x_197 = lean::nat_sub(x_195, x_196); -lean::dec(x_195); -x_198 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_189, 2, x_198); -lean::cnstr_set(x_189, 0, x_197); -x_199 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_193, x_189); -x_4 = x_199; -x_5 = x_190; -goto block_187; -} -else -{ -obj* x_200; obj* x_201; obj* x_202; uint32 x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; -x_200 = lean::cnstr_get(x_189, 0); -x_201 = lean::cnstr_get(x_189, 1); -x_202 = lean::cnstr_get(x_189, 2); -lean::inc(x_202); -lean::inc(x_201); -lean::inc(x_200); -lean::dec(x_189); -x_203 = lean::unbox_uint32(x_200); -lean::dec(x_200); -x_204 = lean::uint32_to_nat(x_203); -x_205 = lean::mk_nat_obj(48u); -x_206 = lean::nat_sub(x_204, x_205); -lean::dec(x_204); -x_207 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_208 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_208, 0, x_206); -lean::cnstr_set(x_208, 1, x_201); -lean::cnstr_set(x_208, 2, x_207); -x_209 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_202, x_208); -x_4 = x_209; -x_5 = x_190; -goto block_187; -} -} -else -{ -obj* x_210; uint8 x_211; -x_210 = lean::cnstr_get(x_188, 1); -lean::inc(x_210); -lean::dec(x_188); -x_211 = !lean::is_exclusive(x_189); -if (x_211 == 0) -{ -x_4 = x_189; -x_5 = x_210; -goto block_187; -} -else -{ -obj* x_212; uint8 x_213; obj* x_214; -x_212 = lean::cnstr_get(x_189, 0); -x_213 = lean::cnstr_get_scalar(x_189, sizeof(void*)*1); -lean::inc(x_212); -lean::dec(x_189); -x_214 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_214, 0, x_212); -lean::cnstr_set_scalar(x_214, sizeof(void*)*1, x_213); -x_4 = x_214; -x_5 = x_210; -goto block_187; -} -} -block_187: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; -lean::dec(x_2); -x_6 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_7 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_4, x_6); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_5); -return x_8; -} -else -{ -obj* x_9; uint8 x_10; obj* x_11; obj* x_12; obj* x_114; obj* x_115; -x_9 = lean::cnstr_get(x_4, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -if (x_10 == 0) -{ -uint8 x_144; -lean::dec(x_4); -x_144 = l_String_OldIterator_hasNext___main(x_2); -if (x_144 == 0) -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_145 = lean::box(0); -x_146 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_147 = l_mjoin___rarg___closed__1; -lean::inc(x_2); -x_148 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_146, x_147, x_145, x_145, x_1, x_2, x_5); -x_149 = lean::cnstr_get(x_148, 0); -lean::inc(x_149); -x_150 = lean::cnstr_get(x_148, 1); -lean::inc(x_150); -lean::dec(x_148); -x_151 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_152 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_151, x_149); -x_114 = x_152; -x_115 = x_150; -goto block_143; -} -else -{ -uint32 x_153; uint32 x_154; uint8 x_155; -x_153 = l_String_OldIterator_curr___main(x_2); -x_154 = 97; -x_155 = x_154 <= x_153; -if (x_155 == 0) -{ -obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; -x_156 = l_Char_quoteCore(x_153); -x_157 = l_Char_HasRepr___closed__1; -x_158 = lean::string_append(x_157, x_156); -lean::dec(x_156); -x_159 = lean::string_append(x_158, x_157); -x_160 = lean::box(0); -x_161 = l_mjoin___rarg___closed__1; -lean::inc(x_2); -x_162 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_159, x_161, x_160, x_160, x_1, x_2, x_5); -x_163 = lean::cnstr_get(x_162, 0); -lean::inc(x_163); -x_164 = lean::cnstr_get(x_162, 1); -lean::inc(x_164); -lean::dec(x_162); -x_165 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_166 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_165, x_163); -x_114 = x_166; -x_115 = x_164; -goto block_143; -} -else -{ -uint32 x_167; uint8 x_168; -x_167 = 102; -x_168 = x_153 <= x_167; -if (x_168 == 0) -{ -obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; -x_169 = l_Char_quoteCore(x_153); -x_170 = l_Char_HasRepr___closed__1; -x_171 = lean::string_append(x_170, x_169); -lean::dec(x_169); -x_172 = lean::string_append(x_171, x_170); -x_173 = lean::box(0); -x_174 = l_mjoin___rarg___closed__1; -lean::inc(x_2); -x_175 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_172, x_174, x_173, x_173, x_1, x_2, x_5); -x_176 = lean::cnstr_get(x_175, 0); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_175, 1); -lean::inc(x_177); -lean::dec(x_175); -x_178 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_179 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_178, x_176); -x_114 = x_179; -x_115 = x_177; -goto block_143; -} -else -{ -obj* x_180; obj* x_181; obj* x_182; obj* x_183; -lean::inc(x_2); -x_180 = l_String_OldIterator_next___main(x_2); -x_181 = lean::box(0); -x_182 = lean::box_uint32(x_153); -x_183 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_183, 0, x_182); -lean::cnstr_set(x_183, 1, x_180); -lean::cnstr_set(x_183, 2, x_181); -x_114 = x_183; -x_115 = x_5; -goto block_143; -} -} -} -} -else -{ -obj* x_184; obj* x_185; obj* x_186; -lean::dec(x_9); -lean::dec(x_2); -x_184 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_185 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_4, x_184); -x_186 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_186, 0, x_185); -lean::cnstr_set(x_186, 1, x_5); -return x_186; -} -block_113: -{ -if (lean::obj_tag(x_11) == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -lean::dec(x_2); -x_13 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_9, x_11); -x_14 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_15 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_13, x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_12); -return x_16; -} -else -{ -obj* x_17; uint8 x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_11, 0); -lean::inc(x_17); -x_18 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (x_18 == 0) -{ -uint8 x_69; -lean::dec(x_11); -x_69 = l_String_OldIterator_hasNext___main(x_2); -if (x_69 == 0) -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -x_70 = lean::box(0); -x_71 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_72 = l_mjoin___rarg___closed__1; -x_73 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_71, x_72, x_70, x_70, x_1, x_2, x_12); -x_74 = lean::cnstr_get(x_73, 0); -lean::inc(x_74); -x_75 = lean::cnstr_get(x_73, 1); -lean::inc(x_75); -lean::dec(x_73); -x_76 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_76, x_74); -x_19 = x_77; -x_20 = x_75; -goto block_68; -} -else -{ -uint32 x_78; uint32 x_79; uint8 x_80; -x_78 = l_String_OldIterator_curr___main(x_2); -x_79 = 65; -x_80 = x_79 <= x_78; -if (x_80 == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_81 = l_Char_quoteCore(x_78); -x_82 = l_Char_HasRepr___closed__1; -x_83 = lean::string_append(x_82, x_81); -lean::dec(x_81); -x_84 = lean::string_append(x_83, x_82); -x_85 = lean::box(0); -x_86 = l_mjoin___rarg___closed__1; -x_87 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_84, x_86, x_85, x_85, x_1, x_2, x_12); -x_88 = lean::cnstr_get(x_87, 0); -lean::inc(x_88); -x_89 = lean::cnstr_get(x_87, 1); -lean::inc(x_89); -lean::dec(x_87); -x_90 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_88); -x_19 = x_91; -x_20 = x_89; -goto block_68; -} -else -{ -uint32 x_92; uint8 x_93; -x_92 = 70; -x_93 = x_78 <= x_92; -if (x_93 == 0) -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_94 = l_Char_quoteCore(x_78); -x_95 = l_Char_HasRepr___closed__1; -x_96 = lean::string_append(x_95, x_94); -lean::dec(x_94); -x_97 = lean::string_append(x_96, x_95); -x_98 = lean::box(0); -x_99 = l_mjoin___rarg___closed__1; -x_100 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_97, x_99, x_98, x_98, x_1, x_2, x_12); -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_100, 1); -lean::inc(x_102); -lean::dec(x_100); -x_103 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_101); -x_19 = x_104; -x_20 = x_102; -goto block_68; -} -else -{ -obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_105 = l_String_OldIterator_next___main(x_2); -x_106 = lean::box(0); -x_107 = lean::box_uint32(x_78); -x_108 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_108, 0, x_107); -lean::cnstr_set(x_108, 1, x_105); -lean::cnstr_set(x_108, 2, x_106); -x_19 = x_108; -x_20 = x_12; -goto block_68; -} -} -} -} -else -{ -obj* x_109; obj* x_110; obj* x_111; obj* x_112; -lean::dec(x_17); -lean::dec(x_2); -x_109 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_9, x_11); -x_110 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_111 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_109, x_110); -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_12); -return x_112; -} -block_68: -{ -if (lean::obj_tag(x_19) == 0) -{ -uint8 x_21; -x_21 = !lean::is_exclusive(x_19); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; uint32 x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_22 = lean::cnstr_get(x_19, 0); -x_23 = lean::cnstr_get(x_19, 2); -x_24 = lean::unbox_uint32(x_22); -lean::dec(x_22); -x_25 = lean::uint32_to_nat(x_24); -x_26 = lean::mk_nat_obj(65u); -x_27 = lean::nat_sub(x_25, x_26); -lean::dec(x_25); -x_28 = lean::mk_nat_obj(10u); -x_29 = lean::nat_add(x_28, x_27); -lean::dec(x_27); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_19, 2, x_30); -lean::cnstr_set(x_19, 0, x_29); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_19); -x_32 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_17, x_31); -x_33 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_9, x_32); -x_34 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_35 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_33, x_34); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_20); -return x_36; -} -else -{ -obj* x_37; obj* x_38; obj* x_39; uint32 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_37 = lean::cnstr_get(x_19, 0); -x_38 = lean::cnstr_get(x_19, 1); -x_39 = lean::cnstr_get(x_19, 2); -lean::inc(x_39); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_19); -x_40 = lean::unbox_uint32(x_37); -lean::dec(x_37); -x_41 = lean::uint32_to_nat(x_40); -x_42 = lean::mk_nat_obj(65u); -x_43 = lean::nat_sub(x_41, x_42); -lean::dec(x_41); -x_44 = lean::mk_nat_obj(10u); -x_45 = lean::nat_add(x_44, x_43); -lean::dec(x_43); -x_46 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_47 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_38); -lean::cnstr_set(x_47, 2, x_46); -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_47); -x_49 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_17, x_48); -x_50 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_9, x_49); -x_51 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_52 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_50, x_51); -x_53 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_20); -return x_53; -} -} -else -{ -uint8 x_54; -x_54 = !lean::is_exclusive(x_19); -if (x_54 == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -x_55 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_17, x_19); -x_56 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_9, x_55); -x_57 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_58 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_56, x_57); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_20); -return x_59; -} -else -{ -obj* x_60; uint8 x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_60 = lean::cnstr_get(x_19, 0); -x_61 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -lean::inc(x_60); -lean::dec(x_19); -x_62 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_62, 0, x_60); -lean::cnstr_set_scalar(x_62, sizeof(void*)*1, x_61); -x_63 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_17, x_62); -x_64 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_9, x_63); -x_65 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_66 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_64, x_65); -x_67 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_20); -return x_67; -} -} -} -} -} -block_143: -{ -if (lean::obj_tag(x_114) == 0) -{ -uint8 x_116; -x_116 = !lean::is_exclusive(x_114); -if (x_116 == 0) -{ -obj* x_117; obj* x_118; uint32 x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_117 = lean::cnstr_get(x_114, 0); -x_118 = lean::cnstr_get(x_114, 2); -x_119 = lean::unbox_uint32(x_117); -lean::dec(x_117); -x_120 = lean::uint32_to_nat(x_119); -x_121 = lean::mk_nat_obj(97u); -x_122 = lean::nat_sub(x_120, x_121); -lean::dec(x_120); -x_123 = lean::mk_nat_obj(10u); -x_124 = lean::nat_add(x_123, x_122); -lean::dec(x_122); -x_125 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_114, 2, x_125); -lean::cnstr_set(x_114, 0, x_124); -x_126 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_118, x_114); -x_11 = x_126; -x_12 = x_115; -goto block_113; -} -else -{ -obj* x_127; obj* x_128; obj* x_129; uint32 x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; -x_127 = lean::cnstr_get(x_114, 0); -x_128 = lean::cnstr_get(x_114, 1); -x_129 = lean::cnstr_get(x_114, 2); -lean::inc(x_129); -lean::inc(x_128); -lean::inc(x_127); -lean::dec(x_114); -x_130 = lean::unbox_uint32(x_127); -lean::dec(x_127); -x_131 = lean::uint32_to_nat(x_130); -x_132 = lean::mk_nat_obj(97u); -x_133 = lean::nat_sub(x_131, x_132); -lean::dec(x_131); -x_134 = lean::mk_nat_obj(10u); -x_135 = lean::nat_add(x_134, x_133); -lean::dec(x_133); -x_136 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_137 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_137, 0, x_135); -lean::cnstr_set(x_137, 1, x_128); -lean::cnstr_set(x_137, 2, x_136); -x_138 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_129, x_137); -x_11 = x_138; -x_12 = x_115; -goto block_113; -} -} -else -{ -uint8 x_139; -x_139 = !lean::is_exclusive(x_114); -if (x_139 == 0) -{ -x_11 = x_114; -x_12 = x_115; -goto block_113; -} -else -{ -obj* x_140; uint8 x_141; obj* x_142; -x_140 = lean::cnstr_get(x_114, 0); -x_141 = lean::cnstr_get_scalar(x_114, sizeof(void*)*1); -lean::inc(x_140); -lean::dec(x_114); -x_142 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_142, 0, x_140); -lean::cnstr_set_scalar(x_142, sizeof(void*)*1, x_141); -x_11 = x_142; -x_12 = x_115; -goto block_113; -} -} -} -} -} -} -} -obj* l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_x27___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -x_4 = l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__2(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_4, 1); -x_8 = lean::cnstr_get(x_4, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; uint32 x_13; uint32 x_14; uint8 x_15; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_5, 1); -x_12 = lean::cnstr_get(x_5, 2); -x_13 = 92; -x_14 = lean::unbox_uint32(x_10); -x_15 = x_14 == x_13; -if (x_15 == 0) -{ -uint32 x_16; uint32 x_17; uint8 x_18; -x_16 = 34; -x_17 = lean::unbox_uint32(x_10); -x_18 = x_17 == x_16; -if (x_18 == 0) -{ -uint32 x_19; uint32 x_20; uint8 x_21; -x_19 = 39; -x_20 = lean::unbox_uint32(x_10); -x_21 = x_20 == x_19; -if (x_21 == 0) -{ -uint32 x_22; uint32 x_23; uint8 x_24; -x_22 = 110; -x_23 = lean::unbox_uint32(x_10); -x_24 = x_23 == x_22; -if (x_24 == 0) -{ -uint32 x_25; uint32 x_26; uint8 x_27; -x_25 = 116; -x_26 = lean::unbox_uint32(x_10); -x_27 = x_26 == x_25; -if (x_27 == 0) -{ -uint32 x_28; uint32 x_29; uint8 x_30; -lean::free_heap_obj(x_5); -lean::free_heap_obj(x_4); -x_28 = 120; -x_29 = lean::unbox_uint32(x_10); -x_30 = x_29 == x_28; -if (x_30 == 0) -{ -uint32 x_31; uint32 x_32; uint8 x_33; -x_31 = 117; -x_32 = lean::unbox_uint32(x_10); -lean::dec(x_10); -x_33 = x_32 == x_31; -if (x_33 == 0) -{ -obj* x_34; obj* x_35; uint8 x_36; -x_34 = l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1; -x_35 = l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg(x_34, x_2, x_1, x_11, x_7); -x_36 = !lean::is_exclusive(x_35); -if (x_36 == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_37 = lean::cnstr_get(x_35, 0); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_37); -x_39 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_38); -lean::cnstr_set(x_35, 0, x_40); -return x_35; -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; -x_41 = lean::cnstr_get(x_35, 0); -x_42 = lean::cnstr_get(x_35, 1); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_35); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_41); -x_44 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_43); -x_46 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_42); -return x_46; -} -} -else -{ -obj* x_47; obj* x_48; -lean::dec(x_2); -x_47 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_11, x_7); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -lean::dec(x_47); -x_50 = lean::cnstr_get(x_48, 0); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_48, 1); -lean::inc(x_51); -x_52 = lean::cnstr_get(x_48, 2); -lean::inc(x_52); -lean::dec(x_48); -x_53 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_51, x_49); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; -x_55 = lean::cnstr_get(x_53, 1); -lean::inc(x_55); -lean::dec(x_53); -x_56 = lean::cnstr_get(x_54, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_54, 1); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_54, 2); -lean::inc(x_58); -lean::dec(x_54); -x_59 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_57, x_55); -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -if (lean::obj_tag(x_60) == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; -x_61 = lean::cnstr_get(x_59, 1); -lean::inc(x_61); -lean::dec(x_59); -x_62 = lean::cnstr_get(x_60, 0); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_60, 1); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_60, 2); -lean::inc(x_64); -lean::dec(x_60); -x_65 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_63, x_61); -x_66 = lean::cnstr_get(x_65, 0); -lean::inc(x_66); -if (lean::obj_tag(x_66) == 0) -{ -uint8 x_67; -x_67 = !lean::is_exclusive(x_65); -if (x_67 == 0) -{ -obj* x_68; uint8 x_69; -x_68 = lean::cnstr_get(x_65, 0); -lean::dec(x_68); -x_69 = !lean::is_exclusive(x_66); -if (x_69 == 0) -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; uint32 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; -x_70 = lean::cnstr_get(x_66, 0); -x_71 = lean::cnstr_get(x_66, 2); -x_72 = lean::mk_nat_obj(16u); -x_73 = lean::nat_mul(x_72, x_50); -lean::dec(x_50); -x_74 = lean::nat_add(x_73, x_56); -lean::dec(x_56); -lean::dec(x_73); -x_75 = lean::nat_mul(x_72, x_74); -lean::dec(x_74); -x_76 = lean::nat_add(x_75, x_62); -lean::dec(x_62); -lean::dec(x_75); -x_77 = lean::nat_mul(x_72, x_76); -lean::dec(x_76); -x_78 = lean::nat_add(x_77, x_70); -lean::dec(x_70); -lean::dec(x_77); -x_79 = l_Char_ofNat(x_78); -lean::dec(x_78); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_81 = lean::box_uint32(x_79); -lean::cnstr_set(x_66, 2, x_80); -lean::cnstr_set(x_66, 0, x_81); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_71, x_66); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_82); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_83); -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_84); -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_85); -x_87 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_86); -lean::cnstr_set(x_65, 0, x_87); -return x_65; -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; uint32 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_88 = lean::cnstr_get(x_66, 0); -x_89 = lean::cnstr_get(x_66, 1); -x_90 = lean::cnstr_get(x_66, 2); -lean::inc(x_90); -lean::inc(x_89); -lean::inc(x_88); -lean::dec(x_66); -x_91 = lean::mk_nat_obj(16u); -x_92 = lean::nat_mul(x_91, x_50); -lean::dec(x_50); -x_93 = lean::nat_add(x_92, x_56); -lean::dec(x_56); -lean::dec(x_92); -x_94 = lean::nat_mul(x_91, x_93); -lean::dec(x_93); -x_95 = lean::nat_add(x_94, x_62); -lean::dec(x_62); -lean::dec(x_94); -x_96 = lean::nat_mul(x_91, x_95); -lean::dec(x_95); -x_97 = lean::nat_add(x_96, x_88); -lean::dec(x_88); -lean::dec(x_96); -x_98 = l_Char_ofNat(x_97); -lean::dec(x_97); -x_99 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_100 = lean::box_uint32(x_98); -x_101 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_89); -lean::cnstr_set(x_101, 2, x_99); -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_101); -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_102); -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_103); -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_104); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_105); -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_99, x_106); -lean::cnstr_set(x_65, 0, x_107); -return x_65; -} -} -else -{ -obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; uint32 x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; -x_108 = lean::cnstr_get(x_65, 1); -lean::inc(x_108); -lean::dec(x_65); -x_109 = lean::cnstr_get(x_66, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get(x_66, 1); -lean::inc(x_110); -x_111 = lean::cnstr_get(x_66, 2); -lean::inc(x_111); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - lean::cnstr_release(x_66, 1); - lean::cnstr_release(x_66, 2); - x_112 = x_66; -} else { - lean::dec_ref(x_66); - x_112 = lean::box(0); -} -x_113 = lean::mk_nat_obj(16u); -x_114 = lean::nat_mul(x_113, x_50); -lean::dec(x_50); -x_115 = lean::nat_add(x_114, x_56); -lean::dec(x_56); -lean::dec(x_114); -x_116 = lean::nat_mul(x_113, x_115); -lean::dec(x_115); -x_117 = lean::nat_add(x_116, x_62); -lean::dec(x_62); -lean::dec(x_116); -x_118 = lean::nat_mul(x_113, x_117); -lean::dec(x_117); -x_119 = lean::nat_add(x_118, x_109); -lean::dec(x_109); -lean::dec(x_118); -x_120 = l_Char_ofNat(x_119); -lean::dec(x_119); -x_121 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_122 = lean::box_uint32(x_120); -if (lean::is_scalar(x_112)) { - x_123 = lean::alloc_cnstr(0, 3, 0); -} else { - x_123 = x_112; -} -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_110); -lean::cnstr_set(x_123, 2, x_121); -x_124 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_111, x_123); -x_125 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_124); -x_126 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_125); -x_127 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_126); -x_128 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_127); -x_129 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_121, x_128); -x_130 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_108); -return x_130; -} -} -else -{ -uint8 x_131; -lean::dec(x_62); -lean::dec(x_56); -lean::dec(x_50); -x_131 = !lean::is_exclusive(x_65); -if (x_131 == 0) -{ -obj* x_132; uint8 x_133; -x_132 = lean::cnstr_get(x_65, 0); -lean::dec(x_132); -x_133 = !lean::is_exclusive(x_66); -if (x_133 == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; -x_134 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_66); -x_135 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_134); -x_136 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_135); -x_137 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_136); -x_138 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_139 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_138, x_137); -lean::cnstr_set(x_65, 0, x_139); -return x_65; -} -else -{ -obj* x_140; uint8 x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; -x_140 = lean::cnstr_get(x_66, 0); -x_141 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); -lean::inc(x_140); -lean::dec(x_66); -x_142 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_142, 0, x_140); -lean::cnstr_set_scalar(x_142, sizeof(void*)*1, x_141); -x_143 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_142); -x_144 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_143); -x_145 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_144); -x_146 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_145); -x_147 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_148 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_147, x_146); -lean::cnstr_set(x_65, 0, x_148); -return x_65; -} -} -else -{ -obj* x_149; obj* x_150; uint8 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; -x_149 = lean::cnstr_get(x_65, 1); -lean::inc(x_149); -lean::dec(x_65); -x_150 = lean::cnstr_get(x_66, 0); -lean::inc(x_150); -x_151 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); -if (lean::is_exclusive(x_66)) { - lean::cnstr_release(x_66, 0); - x_152 = x_66; -} else { - lean::dec_ref(x_66); - x_152 = lean::box(0); -} -if (lean::is_scalar(x_152)) { - x_153 = lean::alloc_cnstr(1, 1, 1); -} else { - x_153 = x_152; -} -lean::cnstr_set(x_153, 0, x_150); -lean::cnstr_set_scalar(x_153, sizeof(void*)*1, x_151); -x_154 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_153); -x_155 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_154); -x_156 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_155); -x_157 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_156); -x_158 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_159 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_158, x_157); -x_160 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_160, 0, x_159); -lean::cnstr_set(x_160, 1, x_149); -return x_160; -} -} -} -else -{ -uint8 x_161; -lean::dec(x_56); -lean::dec(x_50); -x_161 = !lean::is_exclusive(x_59); -if (x_161 == 0) -{ -obj* x_162; uint8 x_163; -x_162 = lean::cnstr_get(x_59, 0); -lean::dec(x_162); -x_163 = !lean::is_exclusive(x_60); -if (x_163 == 0) -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; -x_164 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_60); -x_165 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_164); -x_166 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_165); -x_167 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_168 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_167, x_166); -lean::cnstr_set(x_59, 0, x_168); -return x_59; -} -else -{ -obj* x_169; uint8 x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; -x_169 = lean::cnstr_get(x_60, 0); -x_170 = lean::cnstr_get_scalar(x_60, sizeof(void*)*1); -lean::inc(x_169); -lean::dec(x_60); -x_171 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_171, 0, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*1, x_170); -x_172 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_171); -x_173 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_172); -x_174 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_173); -x_175 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_176 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_175, x_174); -lean::cnstr_set(x_59, 0, x_176); -return x_59; -} -} -else -{ -obj* x_177; obj* x_178; uint8 x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; -x_177 = lean::cnstr_get(x_59, 1); -lean::inc(x_177); -lean::dec(x_59); -x_178 = lean::cnstr_get(x_60, 0); -lean::inc(x_178); -x_179 = lean::cnstr_get_scalar(x_60, sizeof(void*)*1); -if (lean::is_exclusive(x_60)) { - lean::cnstr_release(x_60, 0); - x_180 = x_60; -} else { - lean::dec_ref(x_60); - x_180 = lean::box(0); -} -if (lean::is_scalar(x_180)) { - x_181 = lean::alloc_cnstr(1, 1, 1); -} else { - x_181 = x_180; -} -lean::cnstr_set(x_181, 0, x_178); -lean::cnstr_set_scalar(x_181, sizeof(void*)*1, x_179); -x_182 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_181); -x_183 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_182); -x_184 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_183); -x_185 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_186 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_185, x_184); -x_187 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_187, 0, x_186); -lean::cnstr_set(x_187, 1, x_177); -return x_187; -} -} -} -else -{ -uint8 x_188; -lean::dec(x_50); -x_188 = !lean::is_exclusive(x_53); -if (x_188 == 0) -{ -obj* x_189; uint8 x_190; -x_189 = lean::cnstr_get(x_53, 0); -lean::dec(x_189); -x_190 = !lean::is_exclusive(x_54); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; -x_191 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_54); -x_192 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_191); -x_193 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_194 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_193, x_192); -lean::cnstr_set(x_53, 0, x_194); -return x_53; -} -else -{ -obj* x_195; uint8 x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; -x_195 = lean::cnstr_get(x_54, 0); -x_196 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); -lean::inc(x_195); -lean::dec(x_54); -x_197 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_197, 0, x_195); -lean::cnstr_set_scalar(x_197, sizeof(void*)*1, x_196); -x_198 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_197); -x_199 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_198); -x_200 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_201 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_200, x_199); -lean::cnstr_set(x_53, 0, x_201); -return x_53; -} -} -else -{ -obj* x_202; obj* x_203; uint8 x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; -x_202 = lean::cnstr_get(x_53, 1); -lean::inc(x_202); -lean::dec(x_53); -x_203 = lean::cnstr_get(x_54, 0); -lean::inc(x_203); -x_204 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); -if (lean::is_exclusive(x_54)) { - lean::cnstr_release(x_54, 0); - x_205 = x_54; -} else { - lean::dec_ref(x_54); - x_205 = lean::box(0); -} -if (lean::is_scalar(x_205)) { - x_206 = lean::alloc_cnstr(1, 1, 1); -} else { - x_206 = x_205; -} -lean::cnstr_set(x_206, 0, x_203); -lean::cnstr_set_scalar(x_206, sizeof(void*)*1, x_204); -x_207 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_52, x_206); -x_208 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_207); -x_209 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_210 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_209, x_208); -x_211 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_211, 0, x_210); -lean::cnstr_set(x_211, 1, x_202); -return x_211; -} -} -} -else -{ -uint8 x_212; -x_212 = !lean::is_exclusive(x_47); -if (x_212 == 0) -{ -obj* x_213; uint8 x_214; -x_213 = lean::cnstr_get(x_47, 0); -lean::dec(x_213); -x_214 = !lean::is_exclusive(x_48); -if (x_214 == 0) -{ -obj* x_215; obj* x_216; obj* x_217; -x_215 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_48); -x_216 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_217 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_216, x_215); -lean::cnstr_set(x_47, 0, x_217); -return x_47; -} -else -{ -obj* x_218; uint8 x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; -x_218 = lean::cnstr_get(x_48, 0); -x_219 = lean::cnstr_get_scalar(x_48, sizeof(void*)*1); -lean::inc(x_218); -lean::dec(x_48); -x_220 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_220, 0, x_218); -lean::cnstr_set_scalar(x_220, sizeof(void*)*1, x_219); -x_221 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_220); -x_222 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_223 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_222, x_221); -lean::cnstr_set(x_47, 0, x_223); -return x_47; -} -} -else -{ -obj* x_224; obj* x_225; uint8 x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; -x_224 = lean::cnstr_get(x_47, 1); -lean::inc(x_224); -lean::dec(x_47); -x_225 = lean::cnstr_get(x_48, 0); -lean::inc(x_225); -x_226 = lean::cnstr_get_scalar(x_48, sizeof(void*)*1); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - x_227 = x_48; -} else { - lean::dec_ref(x_48); - x_227 = lean::box(0); -} -if (lean::is_scalar(x_227)) { - x_228 = lean::alloc_cnstr(1, 1, 1); -} else { - x_228 = x_227; -} -lean::cnstr_set(x_228, 0, x_225); -lean::cnstr_set_scalar(x_228, sizeof(void*)*1, x_226); -x_229 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_228); -x_230 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_231 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_230, x_229); -x_232 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_232, 0, x_231); -lean::cnstr_set(x_232, 1, x_224); -return x_232; -} -} -} -} -else -{ -obj* x_233; obj* x_234; -lean::dec(x_10); -lean::dec(x_2); -x_233 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_11, x_7); -x_234 = lean::cnstr_get(x_233, 0); -lean::inc(x_234); -if (lean::obj_tag(x_234) == 0) -{ -obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; -x_235 = lean::cnstr_get(x_233, 1); -lean::inc(x_235); -lean::dec(x_233); -x_236 = lean::cnstr_get(x_234, 0); -lean::inc(x_236); -x_237 = lean::cnstr_get(x_234, 1); -lean::inc(x_237); -x_238 = lean::cnstr_get(x_234, 2); -lean::inc(x_238); -lean::dec(x_234); -x_239 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_237, x_235); -x_240 = lean::cnstr_get(x_239, 0); -lean::inc(x_240); -if (lean::obj_tag(x_240) == 0) -{ -uint8 x_241; -x_241 = !lean::is_exclusive(x_239); -if (x_241 == 0) -{ -obj* x_242; uint8 x_243; -x_242 = lean::cnstr_get(x_239, 0); -lean::dec(x_242); -x_243 = !lean::is_exclusive(x_240); -if (x_243 == 0) -{ -obj* x_244; obj* x_245; obj* x_246; obj* x_247; obj* x_248; uint32 x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; -x_244 = lean::cnstr_get(x_240, 0); -x_245 = lean::cnstr_get(x_240, 2); -x_246 = lean::mk_nat_obj(16u); -x_247 = lean::nat_mul(x_246, x_236); -lean::dec(x_236); -x_248 = lean::nat_add(x_247, x_244); -lean::dec(x_244); -lean::dec(x_247); -x_249 = l_Char_ofNat(x_248); -lean::dec(x_248); -x_250 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_251 = lean::box_uint32(x_249); -lean::cnstr_set(x_240, 2, x_250); -lean::cnstr_set(x_240, 0, x_251); -x_252 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_240); -x_253 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_238, x_252); -x_254 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_253); -x_255 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_250, x_254); -lean::cnstr_set(x_239, 0, x_255); -return x_239; -} -else -{ -obj* x_256; obj* x_257; obj* x_258; obj* x_259; obj* x_260; obj* x_261; uint32 x_262; obj* x_263; obj* x_264; obj* x_265; obj* x_266; obj* x_267; obj* x_268; obj* x_269; -x_256 = lean::cnstr_get(x_240, 0); -x_257 = lean::cnstr_get(x_240, 1); -x_258 = lean::cnstr_get(x_240, 2); -lean::inc(x_258); -lean::inc(x_257); -lean::inc(x_256); -lean::dec(x_240); -x_259 = lean::mk_nat_obj(16u); -x_260 = lean::nat_mul(x_259, x_236); -lean::dec(x_236); -x_261 = lean::nat_add(x_260, x_256); -lean::dec(x_256); -lean::dec(x_260); -x_262 = l_Char_ofNat(x_261); -lean::dec(x_261); -x_263 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_264 = lean::box_uint32(x_262); -x_265 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_265, 0, x_264); -lean::cnstr_set(x_265, 1, x_257); -lean::cnstr_set(x_265, 2, x_263); -x_266 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_258, x_265); -x_267 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_238, x_266); -x_268 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_267); -x_269 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_263, x_268); -lean::cnstr_set(x_239, 0, x_269); -return x_239; -} -} -else -{ -obj* x_270; obj* x_271; obj* x_272; obj* x_273; obj* x_274; obj* x_275; obj* x_276; obj* x_277; uint32 x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; obj* x_283; obj* x_284; obj* x_285; obj* x_286; -x_270 = lean::cnstr_get(x_239, 1); -lean::inc(x_270); -lean::dec(x_239); -x_271 = lean::cnstr_get(x_240, 0); -lean::inc(x_271); -x_272 = lean::cnstr_get(x_240, 1); -lean::inc(x_272); -x_273 = lean::cnstr_get(x_240, 2); -lean::inc(x_273); -if (lean::is_exclusive(x_240)) { - lean::cnstr_release(x_240, 0); - lean::cnstr_release(x_240, 1); - lean::cnstr_release(x_240, 2); - x_274 = x_240; -} else { - lean::dec_ref(x_240); - x_274 = lean::box(0); -} -x_275 = lean::mk_nat_obj(16u); -x_276 = lean::nat_mul(x_275, x_236); -lean::dec(x_236); -x_277 = lean::nat_add(x_276, x_271); -lean::dec(x_271); -lean::dec(x_276); -x_278 = l_Char_ofNat(x_277); -lean::dec(x_277); -x_279 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_280 = lean::box_uint32(x_278); -if (lean::is_scalar(x_274)) { - x_281 = lean::alloc_cnstr(0, 3, 0); -} else { - x_281 = x_274; -} -lean::cnstr_set(x_281, 0, x_280); -lean::cnstr_set(x_281, 1, x_272); -lean::cnstr_set(x_281, 2, x_279); -x_282 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_273, x_281); -x_283 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_238, x_282); -x_284 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_283); -x_285 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_279, x_284); -x_286 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_286, 0, x_285); -lean::cnstr_set(x_286, 1, x_270); -return x_286; -} -} -else -{ -uint8 x_287; -lean::dec(x_236); -x_287 = !lean::is_exclusive(x_239); -if (x_287 == 0) -{ -obj* x_288; uint8 x_289; -x_288 = lean::cnstr_get(x_239, 0); -lean::dec(x_288); -x_289 = !lean::is_exclusive(x_240); -if (x_289 == 0) -{ -obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_290 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_238, x_240); -x_291 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_290); -x_292 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_293 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_292, x_291); -lean::cnstr_set(x_239, 0, x_293); -return x_239; -} -else -{ -obj* x_294; uint8 x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; -x_294 = lean::cnstr_get(x_240, 0); -x_295 = lean::cnstr_get_scalar(x_240, sizeof(void*)*1); -lean::inc(x_294); -lean::dec(x_240); -x_296 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_296, 0, x_294); -lean::cnstr_set_scalar(x_296, sizeof(void*)*1, x_295); -x_297 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_238, x_296); -x_298 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_297); -x_299 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_300 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_299, x_298); -lean::cnstr_set(x_239, 0, x_300); -return x_239; -} -} -else -{ -obj* x_301; obj* x_302; uint8 x_303; obj* x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; -x_301 = lean::cnstr_get(x_239, 1); -lean::inc(x_301); -lean::dec(x_239); -x_302 = lean::cnstr_get(x_240, 0); -lean::inc(x_302); -x_303 = lean::cnstr_get_scalar(x_240, sizeof(void*)*1); -if (lean::is_exclusive(x_240)) { - lean::cnstr_release(x_240, 0); - x_304 = x_240; -} else { - lean::dec_ref(x_240); - x_304 = lean::box(0); -} -if (lean::is_scalar(x_304)) { - x_305 = lean::alloc_cnstr(1, 1, 1); -} else { - x_305 = x_304; -} -lean::cnstr_set(x_305, 0, x_302); -lean::cnstr_set_scalar(x_305, sizeof(void*)*1, x_303); -x_306 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_238, x_305); -x_307 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_306); -x_308 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_309 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_308, x_307); -x_310 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_310, 0, x_309); -lean::cnstr_set(x_310, 1, x_301); -return x_310; -} -} -} -else -{ -uint8 x_311; -x_311 = !lean::is_exclusive(x_233); -if (x_311 == 0) -{ -obj* x_312; uint8 x_313; -x_312 = lean::cnstr_get(x_233, 0); -lean::dec(x_312); -x_313 = !lean::is_exclusive(x_234); -if (x_313 == 0) -{ -obj* x_314; obj* x_315; obj* x_316; -x_314 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_234); -x_315 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_316 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_315, x_314); -lean::cnstr_set(x_233, 0, x_316); -return x_233; -} -else -{ -obj* x_317; uint8 x_318; obj* x_319; obj* x_320; obj* x_321; obj* x_322; -x_317 = lean::cnstr_get(x_234, 0); -x_318 = lean::cnstr_get_scalar(x_234, sizeof(void*)*1); -lean::inc(x_317); -lean::dec(x_234); -x_319 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_319, 0, x_317); -lean::cnstr_set_scalar(x_319, sizeof(void*)*1, x_318); -x_320 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_319); -x_321 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_322 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_321, x_320); -lean::cnstr_set(x_233, 0, x_322); -return x_233; -} -} -else -{ -obj* x_323; obj* x_324; uint8 x_325; obj* x_326; obj* x_327; obj* x_328; obj* x_329; obj* x_330; obj* x_331; -x_323 = lean::cnstr_get(x_233, 1); -lean::inc(x_323); -lean::dec(x_233); -x_324 = lean::cnstr_get(x_234, 0); -lean::inc(x_324); -x_325 = lean::cnstr_get_scalar(x_234, sizeof(void*)*1); -if (lean::is_exclusive(x_234)) { - lean::cnstr_release(x_234, 0); - x_326 = x_234; -} else { - lean::dec_ref(x_234); - x_326 = lean::box(0); -} -if (lean::is_scalar(x_326)) { - x_327 = lean::alloc_cnstr(1, 1, 1); -} else { - x_327 = x_326; -} -lean::cnstr_set(x_327, 0, x_324); -lean::cnstr_set_scalar(x_327, sizeof(void*)*1, x_325); -x_328 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_327); -x_329 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_330 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_329, x_328); -x_331 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_331, 0, x_330); -lean::cnstr_set(x_331, 1, x_323); -return x_331; -} -} -} -} -else -{ -uint32 x_332; obj* x_333; obj* x_334; obj* x_335; obj* x_336; -lean::dec(x_10); -lean::dec(x_2); -x_332 = 9; -x_333 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_334 = lean::box_uint32(x_332); -lean::cnstr_set(x_5, 2, x_333); -lean::cnstr_set(x_5, 0, x_334); -x_335 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_336 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_333, x_335); -lean::cnstr_set(x_4, 0, x_336); -return x_4; -} -} -else -{ -uint32 x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; -lean::dec(x_10); -lean::dec(x_2); -x_337 = 10; -x_338 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_339 = lean::box_uint32(x_337); -lean::cnstr_set(x_5, 2, x_338); -lean::cnstr_set(x_5, 0, x_339); -x_340 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_341 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_338, x_340); -lean::cnstr_set(x_4, 0, x_341); -return x_4; -} -} -else -{ -obj* x_342; obj* x_343; obj* x_344; obj* x_345; -lean::dec(x_10); -lean::dec(x_2); -x_342 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_343 = lean::box_uint32(x_19); -lean::cnstr_set(x_5, 2, x_342); -lean::cnstr_set(x_5, 0, x_343); -x_344 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_345 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_342, x_344); -lean::cnstr_set(x_4, 0, x_345); -return x_4; -} -} -else -{ -obj* x_346; obj* x_347; obj* x_348; obj* x_349; -lean::dec(x_10); -lean::dec(x_2); -x_346 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_347 = lean::box_uint32(x_16); -lean::cnstr_set(x_5, 2, x_346); -lean::cnstr_set(x_5, 0, x_347); -x_348 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_349 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_346, x_348); -lean::cnstr_set(x_4, 0, x_349); -return x_4; -} -} -else -{ -obj* x_350; obj* x_351; obj* x_352; obj* x_353; -lean::dec(x_10); -lean::dec(x_2); -x_350 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_351 = lean::box_uint32(x_13); -lean::cnstr_set(x_5, 2, x_350); -lean::cnstr_set(x_5, 0, x_351); -x_352 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_353 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_350, x_352); -lean::cnstr_set(x_4, 0, x_353); -return x_4; -} -} -else -{ -obj* x_354; obj* x_355; obj* x_356; uint32 x_357; uint32 x_358; uint8 x_359; -x_354 = lean::cnstr_get(x_5, 0); -x_355 = lean::cnstr_get(x_5, 1); -x_356 = lean::cnstr_get(x_5, 2); -lean::inc(x_356); -lean::inc(x_355); -lean::inc(x_354); -lean::dec(x_5); -x_357 = 92; -x_358 = lean::unbox_uint32(x_354); -x_359 = x_358 == x_357; -if (x_359 == 0) -{ -uint32 x_360; uint32 x_361; uint8 x_362; -x_360 = 34; -x_361 = lean::unbox_uint32(x_354); -x_362 = x_361 == x_360; -if (x_362 == 0) -{ -uint32 x_363; uint32 x_364; uint8 x_365; -x_363 = 39; -x_364 = lean::unbox_uint32(x_354); -x_365 = x_364 == x_363; -if (x_365 == 0) -{ -uint32 x_366; uint32 x_367; uint8 x_368; -x_366 = 110; -x_367 = lean::unbox_uint32(x_354); -x_368 = x_367 == x_366; -if (x_368 == 0) -{ -uint32 x_369; uint32 x_370; uint8 x_371; -x_369 = 116; -x_370 = lean::unbox_uint32(x_354); -x_371 = x_370 == x_369; -if (x_371 == 0) -{ -uint32 x_372; uint32 x_373; uint8 x_374; -lean::free_heap_obj(x_4); -x_372 = 120; -x_373 = lean::unbox_uint32(x_354); -x_374 = x_373 == x_372; -if (x_374 == 0) -{ -uint32 x_375; uint32 x_376; uint8 x_377; -x_375 = 117; -x_376 = lean::unbox_uint32(x_354); -lean::dec(x_354); -x_377 = x_376 == x_375; -if (x_377 == 0) -{ -obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; -x_378 = l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1; -x_379 = l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg(x_378, x_2, x_1, x_355, x_7); -x_380 = lean::cnstr_get(x_379, 0); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_379, 1); -lean::inc(x_381); -if (lean::is_exclusive(x_379)) { - lean::cnstr_release(x_379, 0); - lean::cnstr_release(x_379, 1); - x_382 = x_379; -} else { - lean::dec_ref(x_379); - x_382 = lean::box(0); -} -x_383 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_380); -x_384 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_385 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_384, x_383); -if (lean::is_scalar(x_382)) { - x_386 = lean::alloc_cnstr(0, 2, 0); -} else { - x_386 = x_382; -} -lean::cnstr_set(x_386, 0, x_385); -lean::cnstr_set(x_386, 1, x_381); -return x_386; -} -else -{ -obj* x_387; obj* x_388; -lean::dec(x_2); -x_387 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_355, x_7); -x_388 = lean::cnstr_get(x_387, 0); -lean::inc(x_388); -if (lean::obj_tag(x_388) == 0) -{ -obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; -x_389 = lean::cnstr_get(x_387, 1); -lean::inc(x_389); -lean::dec(x_387); -x_390 = lean::cnstr_get(x_388, 0); -lean::inc(x_390); -x_391 = lean::cnstr_get(x_388, 1); -lean::inc(x_391); -x_392 = lean::cnstr_get(x_388, 2); -lean::inc(x_392); -lean::dec(x_388); -x_393 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_391, x_389); -x_394 = lean::cnstr_get(x_393, 0); -lean::inc(x_394); -if (lean::obj_tag(x_394) == 0) -{ -obj* x_395; obj* x_396; obj* x_397; obj* x_398; obj* x_399; obj* x_400; -x_395 = lean::cnstr_get(x_393, 1); -lean::inc(x_395); -lean::dec(x_393); -x_396 = lean::cnstr_get(x_394, 0); -lean::inc(x_396); -x_397 = lean::cnstr_get(x_394, 1); -lean::inc(x_397); -x_398 = lean::cnstr_get(x_394, 2); -lean::inc(x_398); -lean::dec(x_394); -x_399 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_397, x_395); -x_400 = lean::cnstr_get(x_399, 0); -lean::inc(x_400); -if (lean::obj_tag(x_400) == 0) -{ -obj* x_401; obj* x_402; obj* x_403; obj* x_404; obj* x_405; obj* x_406; -x_401 = lean::cnstr_get(x_399, 1); -lean::inc(x_401); -lean::dec(x_399); -x_402 = lean::cnstr_get(x_400, 0); -lean::inc(x_402); -x_403 = lean::cnstr_get(x_400, 1); -lean::inc(x_403); -x_404 = lean::cnstr_get(x_400, 2); -lean::inc(x_404); -lean::dec(x_400); -x_405 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_403, x_401); -x_406 = lean::cnstr_get(x_405, 0); -lean::inc(x_406); -if (lean::obj_tag(x_406) == 0) -{ -obj* x_407; obj* x_408; obj* x_409; obj* x_410; obj* x_411; obj* x_412; obj* x_413; obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; uint32 x_420; obj* x_421; obj* x_422; obj* x_423; obj* x_424; obj* x_425; obj* x_426; obj* x_427; obj* x_428; obj* x_429; obj* x_430; -x_407 = lean::cnstr_get(x_405, 1); -lean::inc(x_407); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - x_408 = x_405; -} else { - lean::dec_ref(x_405); - x_408 = lean::box(0); -} -x_409 = lean::cnstr_get(x_406, 0); -lean::inc(x_409); -x_410 = lean::cnstr_get(x_406, 1); -lean::inc(x_410); -x_411 = lean::cnstr_get(x_406, 2); -lean::inc(x_411); -if (lean::is_exclusive(x_406)) { - lean::cnstr_release(x_406, 0); - lean::cnstr_release(x_406, 1); - lean::cnstr_release(x_406, 2); - x_412 = x_406; -} else { - lean::dec_ref(x_406); - x_412 = lean::box(0); -} -x_413 = lean::mk_nat_obj(16u); -x_414 = lean::nat_mul(x_413, x_390); -lean::dec(x_390); -x_415 = lean::nat_add(x_414, x_396); -lean::dec(x_396); -lean::dec(x_414); -x_416 = lean::nat_mul(x_413, x_415); -lean::dec(x_415); -x_417 = lean::nat_add(x_416, x_402); -lean::dec(x_402); -lean::dec(x_416); -x_418 = lean::nat_mul(x_413, x_417); -lean::dec(x_417); -x_419 = lean::nat_add(x_418, x_409); -lean::dec(x_409); -lean::dec(x_418); -x_420 = l_Char_ofNat(x_419); -lean::dec(x_419); -x_421 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_422 = lean::box_uint32(x_420); -if (lean::is_scalar(x_412)) { - x_423 = lean::alloc_cnstr(0, 3, 0); -} else { - x_423 = x_412; -} -lean::cnstr_set(x_423, 0, x_422); -lean::cnstr_set(x_423, 1, x_410); -lean::cnstr_set(x_423, 2, x_421); -x_424 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_411, x_423); -x_425 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_404, x_424); -x_426 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_398, x_425); -x_427 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_392, x_426); -x_428 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_427); -x_429 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_421, x_428); -if (lean::is_scalar(x_408)) { - x_430 = lean::alloc_cnstr(0, 2, 0); -} else { - x_430 = x_408; -} -lean::cnstr_set(x_430, 0, x_429); -lean::cnstr_set(x_430, 1, x_407); -return x_430; -} -else -{ -obj* x_431; obj* x_432; obj* x_433; uint8 x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; obj* x_442; obj* x_443; -lean::dec(x_402); -lean::dec(x_396); -lean::dec(x_390); -x_431 = lean::cnstr_get(x_405, 1); -lean::inc(x_431); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - x_432 = x_405; -} else { - lean::dec_ref(x_405); - x_432 = lean::box(0); -} -x_433 = lean::cnstr_get(x_406, 0); -lean::inc(x_433); -x_434 = lean::cnstr_get_scalar(x_406, sizeof(void*)*1); -if (lean::is_exclusive(x_406)) { - lean::cnstr_release(x_406, 0); - x_435 = x_406; -} else { - lean::dec_ref(x_406); - x_435 = lean::box(0); -} -if (lean::is_scalar(x_435)) { - x_436 = lean::alloc_cnstr(1, 1, 1); -} else { - x_436 = x_435; -} -lean::cnstr_set(x_436, 0, x_433); -lean::cnstr_set_scalar(x_436, sizeof(void*)*1, x_434); -x_437 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_404, x_436); -x_438 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_398, x_437); -x_439 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_392, x_438); -x_440 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_439); -x_441 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_442 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_441, x_440); -if (lean::is_scalar(x_432)) { - x_443 = lean::alloc_cnstr(0, 2, 0); -} else { - x_443 = x_432; -} -lean::cnstr_set(x_443, 0, x_442); -lean::cnstr_set(x_443, 1, x_431); -return x_443; -} -} -else -{ -obj* x_444; obj* x_445; obj* x_446; uint8 x_447; obj* x_448; obj* x_449; obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; obj* x_455; -lean::dec(x_396); -lean::dec(x_390); -x_444 = lean::cnstr_get(x_399, 1); -lean::inc(x_444); -if (lean::is_exclusive(x_399)) { - lean::cnstr_release(x_399, 0); - lean::cnstr_release(x_399, 1); - x_445 = x_399; -} else { - lean::dec_ref(x_399); - x_445 = lean::box(0); -} -x_446 = lean::cnstr_get(x_400, 0); -lean::inc(x_446); -x_447 = lean::cnstr_get_scalar(x_400, sizeof(void*)*1); -if (lean::is_exclusive(x_400)) { - lean::cnstr_release(x_400, 0); - x_448 = x_400; -} else { - lean::dec_ref(x_400); - x_448 = lean::box(0); -} -if (lean::is_scalar(x_448)) { - x_449 = lean::alloc_cnstr(1, 1, 1); -} else { - x_449 = x_448; -} -lean::cnstr_set(x_449, 0, x_446); -lean::cnstr_set_scalar(x_449, sizeof(void*)*1, x_447); -x_450 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_398, x_449); -x_451 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_392, x_450); -x_452 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_451); -x_453 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_454 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_453, x_452); -if (lean::is_scalar(x_445)) { - x_455 = lean::alloc_cnstr(0, 2, 0); -} else { - x_455 = x_445; -} -lean::cnstr_set(x_455, 0, x_454); -lean::cnstr_set(x_455, 1, x_444); -return x_455; -} -} -else -{ -obj* x_456; obj* x_457; obj* x_458; uint8 x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; obj* x_465; obj* x_466; -lean::dec(x_390); -x_456 = lean::cnstr_get(x_393, 1); -lean::inc(x_456); -if (lean::is_exclusive(x_393)) { - lean::cnstr_release(x_393, 0); - lean::cnstr_release(x_393, 1); - x_457 = x_393; -} else { - lean::dec_ref(x_393); - x_457 = lean::box(0); -} -x_458 = lean::cnstr_get(x_394, 0); -lean::inc(x_458); -x_459 = lean::cnstr_get_scalar(x_394, sizeof(void*)*1); -if (lean::is_exclusive(x_394)) { - lean::cnstr_release(x_394, 0); - x_460 = x_394; -} else { - lean::dec_ref(x_394); - x_460 = lean::box(0); -} -if (lean::is_scalar(x_460)) { - x_461 = lean::alloc_cnstr(1, 1, 1); -} else { - x_461 = x_460; -} -lean::cnstr_set(x_461, 0, x_458); -lean::cnstr_set_scalar(x_461, sizeof(void*)*1, x_459); -x_462 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_392, x_461); -x_463 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_462); -x_464 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_465 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_464, x_463); -if (lean::is_scalar(x_457)) { - x_466 = lean::alloc_cnstr(0, 2, 0); -} else { - x_466 = x_457; -} -lean::cnstr_set(x_466, 0, x_465); -lean::cnstr_set(x_466, 1, x_456); -return x_466; -} -} -else -{ -obj* x_467; obj* x_468; obj* x_469; uint8 x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; obj* x_475; obj* x_476; -x_467 = lean::cnstr_get(x_387, 1); -lean::inc(x_467); -if (lean::is_exclusive(x_387)) { - lean::cnstr_release(x_387, 0); - lean::cnstr_release(x_387, 1); - x_468 = x_387; -} else { - lean::dec_ref(x_387); - x_468 = lean::box(0); -} -x_469 = lean::cnstr_get(x_388, 0); -lean::inc(x_469); -x_470 = lean::cnstr_get_scalar(x_388, sizeof(void*)*1); -if (lean::is_exclusive(x_388)) { - lean::cnstr_release(x_388, 0); - x_471 = x_388; -} else { - lean::dec_ref(x_388); - x_471 = lean::box(0); -} -if (lean::is_scalar(x_471)) { - x_472 = lean::alloc_cnstr(1, 1, 1); -} else { - x_472 = x_471; -} -lean::cnstr_set(x_472, 0, x_469); -lean::cnstr_set_scalar(x_472, sizeof(void*)*1, x_470); -x_473 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_472); -x_474 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_475 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_474, x_473); -if (lean::is_scalar(x_468)) { - x_476 = lean::alloc_cnstr(0, 2, 0); -} else { - x_476 = x_468; -} -lean::cnstr_set(x_476, 0, x_475); -lean::cnstr_set(x_476, 1, x_467); -return x_476; -} -} -} -else -{ -obj* x_477; obj* x_478; -lean::dec(x_354); -lean::dec(x_2); -x_477 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_355, x_7); -x_478 = lean::cnstr_get(x_477, 0); -lean::inc(x_478); -if (lean::obj_tag(x_478) == 0) -{ -obj* x_479; obj* x_480; obj* x_481; obj* x_482; obj* x_483; obj* x_484; -x_479 = lean::cnstr_get(x_477, 1); -lean::inc(x_479); -lean::dec(x_477); -x_480 = lean::cnstr_get(x_478, 0); -lean::inc(x_480); -x_481 = lean::cnstr_get(x_478, 1); -lean::inc(x_481); -x_482 = lean::cnstr_get(x_478, 2); -lean::inc(x_482); -lean::dec(x_478); -x_483 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_481, x_479); -x_484 = lean::cnstr_get(x_483, 0); -lean::inc(x_484); -if (lean::obj_tag(x_484) == 0) -{ -obj* x_485; obj* x_486; obj* x_487; obj* x_488; obj* x_489; obj* x_490; obj* x_491; obj* x_492; obj* x_493; uint32 x_494; obj* x_495; obj* x_496; obj* x_497; obj* x_498; obj* x_499; obj* x_500; obj* x_501; obj* x_502; -x_485 = lean::cnstr_get(x_483, 1); -lean::inc(x_485); -if (lean::is_exclusive(x_483)) { - lean::cnstr_release(x_483, 0); - lean::cnstr_release(x_483, 1); - x_486 = x_483; -} else { - lean::dec_ref(x_483); - x_486 = lean::box(0); -} -x_487 = lean::cnstr_get(x_484, 0); -lean::inc(x_487); -x_488 = lean::cnstr_get(x_484, 1); -lean::inc(x_488); -x_489 = lean::cnstr_get(x_484, 2); -lean::inc(x_489); -if (lean::is_exclusive(x_484)) { - lean::cnstr_release(x_484, 0); - lean::cnstr_release(x_484, 1); - lean::cnstr_release(x_484, 2); - x_490 = x_484; -} else { - lean::dec_ref(x_484); - x_490 = lean::box(0); -} -x_491 = lean::mk_nat_obj(16u); -x_492 = lean::nat_mul(x_491, x_480); -lean::dec(x_480); -x_493 = lean::nat_add(x_492, x_487); -lean::dec(x_487); -lean::dec(x_492); -x_494 = l_Char_ofNat(x_493); -lean::dec(x_493); -x_495 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_496 = lean::box_uint32(x_494); -if (lean::is_scalar(x_490)) { - x_497 = lean::alloc_cnstr(0, 3, 0); -} else { - x_497 = x_490; -} -lean::cnstr_set(x_497, 0, x_496); -lean::cnstr_set(x_497, 1, x_488); -lean::cnstr_set(x_497, 2, x_495); -x_498 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_489, x_497); -x_499 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_482, x_498); -x_500 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_499); -x_501 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_495, x_500); -if (lean::is_scalar(x_486)) { - x_502 = lean::alloc_cnstr(0, 2, 0); -} else { - x_502 = x_486; -} -lean::cnstr_set(x_502, 0, x_501); -lean::cnstr_set(x_502, 1, x_485); -return x_502; -} -else -{ -obj* x_503; obj* x_504; obj* x_505; uint8 x_506; obj* x_507; obj* x_508; obj* x_509; obj* x_510; obj* x_511; obj* x_512; obj* x_513; -lean::dec(x_480); -x_503 = lean::cnstr_get(x_483, 1); -lean::inc(x_503); -if (lean::is_exclusive(x_483)) { - lean::cnstr_release(x_483, 0); - lean::cnstr_release(x_483, 1); - x_504 = x_483; -} else { - lean::dec_ref(x_483); - x_504 = lean::box(0); -} -x_505 = lean::cnstr_get(x_484, 0); -lean::inc(x_505); -x_506 = lean::cnstr_get_scalar(x_484, sizeof(void*)*1); -if (lean::is_exclusive(x_484)) { - lean::cnstr_release(x_484, 0); - x_507 = x_484; -} else { - lean::dec_ref(x_484); - x_507 = lean::box(0); -} -if (lean::is_scalar(x_507)) { - x_508 = lean::alloc_cnstr(1, 1, 1); -} else { - x_508 = x_507; -} -lean::cnstr_set(x_508, 0, x_505); -lean::cnstr_set_scalar(x_508, sizeof(void*)*1, x_506); -x_509 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_482, x_508); -x_510 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_509); -x_511 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_512 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_511, x_510); -if (lean::is_scalar(x_504)) { - x_513 = lean::alloc_cnstr(0, 2, 0); -} else { - x_513 = x_504; -} -lean::cnstr_set(x_513, 0, x_512); -lean::cnstr_set(x_513, 1, x_503); -return x_513; -} -} -else -{ -obj* x_514; obj* x_515; obj* x_516; uint8 x_517; obj* x_518; obj* x_519; obj* x_520; obj* x_521; obj* x_522; obj* x_523; -x_514 = lean::cnstr_get(x_477, 1); -lean::inc(x_514); -if (lean::is_exclusive(x_477)) { - lean::cnstr_release(x_477, 0); - lean::cnstr_release(x_477, 1); - x_515 = x_477; -} else { - lean::dec_ref(x_477); - x_515 = lean::box(0); -} -x_516 = lean::cnstr_get(x_478, 0); -lean::inc(x_516); -x_517 = lean::cnstr_get_scalar(x_478, sizeof(void*)*1); -if (lean::is_exclusive(x_478)) { - lean::cnstr_release(x_478, 0); - x_518 = x_478; -} else { - lean::dec_ref(x_478); - x_518 = lean::box(0); -} -if (lean::is_scalar(x_518)) { - x_519 = lean::alloc_cnstr(1, 1, 1); -} else { - x_519 = x_518; -} -lean::cnstr_set(x_519, 0, x_516); -lean::cnstr_set_scalar(x_519, sizeof(void*)*1, x_517); -x_520 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_519); -x_521 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_522 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_521, x_520); -if (lean::is_scalar(x_515)) { - x_523 = lean::alloc_cnstr(0, 2, 0); -} else { - x_523 = x_515; -} -lean::cnstr_set(x_523, 0, x_522); -lean::cnstr_set(x_523, 1, x_514); -return x_523; -} -} -} -else -{ -uint32 x_524; obj* x_525; obj* x_526; obj* x_527; obj* x_528; obj* x_529; -lean::dec(x_354); -lean::dec(x_2); -x_524 = 9; -x_525 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_526 = lean::box_uint32(x_524); -x_527 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_527, 0, x_526); -lean::cnstr_set(x_527, 1, x_355); -lean::cnstr_set(x_527, 2, x_525); -x_528 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_527); -x_529 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_525, x_528); -lean::cnstr_set(x_4, 0, x_529); -return x_4; -} -} -else -{ -uint32 x_530; obj* x_531; obj* x_532; obj* x_533; obj* x_534; obj* x_535; -lean::dec(x_354); -lean::dec(x_2); -x_530 = 10; -x_531 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_532 = lean::box_uint32(x_530); -x_533 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_533, 0, x_532); -lean::cnstr_set(x_533, 1, x_355); -lean::cnstr_set(x_533, 2, x_531); -x_534 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_533); -x_535 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_531, x_534); -lean::cnstr_set(x_4, 0, x_535); -return x_4; -} -} -else -{ -obj* x_536; obj* x_537; obj* x_538; obj* x_539; obj* x_540; -lean::dec(x_354); -lean::dec(x_2); -x_536 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_537 = lean::box_uint32(x_363); -x_538 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_538, 0, x_537); -lean::cnstr_set(x_538, 1, x_355); -lean::cnstr_set(x_538, 2, x_536); -x_539 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_538); -x_540 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_536, x_539); -lean::cnstr_set(x_4, 0, x_540); -return x_4; -} -} -else -{ -obj* x_541; obj* x_542; obj* x_543; obj* x_544; obj* x_545; -lean::dec(x_354); -lean::dec(x_2); -x_541 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_542 = lean::box_uint32(x_360); -x_543 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_543, 0, x_542); -lean::cnstr_set(x_543, 1, x_355); -lean::cnstr_set(x_543, 2, x_541); -x_544 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_543); -x_545 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_541, x_544); -lean::cnstr_set(x_4, 0, x_545); -return x_4; -} -} -else -{ -obj* x_546; obj* x_547; obj* x_548; obj* x_549; obj* x_550; -lean::dec(x_354); -lean::dec(x_2); -x_546 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_547 = lean::box_uint32(x_357); -x_548 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_548, 0, x_547); -lean::cnstr_set(x_548, 1, x_355); -lean::cnstr_set(x_548, 2, x_546); -x_549 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_356, x_548); -x_550 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_546, x_549); -lean::cnstr_set(x_4, 0, x_550); -return x_4; -} -} -} -else -{ -obj* x_551; obj* x_552; obj* x_553; obj* x_554; obj* x_555; uint32 x_556; uint32 x_557; uint8 x_558; -x_551 = lean::cnstr_get(x_4, 1); -lean::inc(x_551); -lean::dec(x_4); -x_552 = lean::cnstr_get(x_5, 0); -lean::inc(x_552); -x_553 = lean::cnstr_get(x_5, 1); -lean::inc(x_553); -x_554 = lean::cnstr_get(x_5, 2); -lean::inc(x_554); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_555 = x_5; -} else { - lean::dec_ref(x_5); - x_555 = lean::box(0); -} -x_556 = 92; -x_557 = lean::unbox_uint32(x_552); -x_558 = x_557 == x_556; -if (x_558 == 0) -{ -uint32 x_559; uint32 x_560; uint8 x_561; -x_559 = 34; -x_560 = lean::unbox_uint32(x_552); -x_561 = x_560 == x_559; -if (x_561 == 0) -{ -uint32 x_562; uint32 x_563; uint8 x_564; -x_562 = 39; -x_563 = lean::unbox_uint32(x_552); -x_564 = x_563 == x_562; -if (x_564 == 0) -{ -uint32 x_565; uint32 x_566; uint8 x_567; -x_565 = 110; -x_566 = lean::unbox_uint32(x_552); -x_567 = x_566 == x_565; -if (x_567 == 0) -{ -uint32 x_568; uint32 x_569; uint8 x_570; -x_568 = 116; -x_569 = lean::unbox_uint32(x_552); -x_570 = x_569 == x_568; -if (x_570 == 0) -{ -uint32 x_571; uint32 x_572; uint8 x_573; -lean::dec(x_555); -x_571 = 120; -x_572 = lean::unbox_uint32(x_552); -x_573 = x_572 == x_571; -if (x_573 == 0) -{ -uint32 x_574; uint32 x_575; uint8 x_576; -x_574 = 117; -x_575 = lean::unbox_uint32(x_552); -lean::dec(x_552); -x_576 = x_575 == x_574; -if (x_576 == 0) -{ -obj* x_577; obj* x_578; obj* x_579; obj* x_580; obj* x_581; obj* x_582; obj* x_583; obj* x_584; obj* x_585; -x_577 = l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1; -x_578 = l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg(x_577, x_2, x_1, x_553, x_551); -x_579 = lean::cnstr_get(x_578, 0); -lean::inc(x_579); -x_580 = lean::cnstr_get(x_578, 1); -lean::inc(x_580); -if (lean::is_exclusive(x_578)) { - lean::cnstr_release(x_578, 0); - lean::cnstr_release(x_578, 1); - x_581 = x_578; -} else { - lean::dec_ref(x_578); - x_581 = lean::box(0); -} -x_582 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_579); -x_583 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_584 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_583, x_582); -if (lean::is_scalar(x_581)) { - x_585 = lean::alloc_cnstr(0, 2, 0); -} else { - x_585 = x_581; -} -lean::cnstr_set(x_585, 0, x_584); -lean::cnstr_set(x_585, 1, x_580); -return x_585; -} -else -{ -obj* x_586; obj* x_587; -lean::dec(x_2); -x_586 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_553, x_551); -x_587 = lean::cnstr_get(x_586, 0); -lean::inc(x_587); -if (lean::obj_tag(x_587) == 0) -{ -obj* x_588; obj* x_589; obj* x_590; obj* x_591; obj* x_592; obj* x_593; -x_588 = lean::cnstr_get(x_586, 1); -lean::inc(x_588); -lean::dec(x_586); -x_589 = lean::cnstr_get(x_587, 0); -lean::inc(x_589); -x_590 = lean::cnstr_get(x_587, 1); -lean::inc(x_590); -x_591 = lean::cnstr_get(x_587, 2); -lean::inc(x_591); -lean::dec(x_587); -x_592 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_590, x_588); -x_593 = lean::cnstr_get(x_592, 0); -lean::inc(x_593); -if (lean::obj_tag(x_593) == 0) -{ -obj* x_594; obj* x_595; obj* x_596; obj* x_597; obj* x_598; obj* x_599; -x_594 = lean::cnstr_get(x_592, 1); -lean::inc(x_594); -lean::dec(x_592); -x_595 = lean::cnstr_get(x_593, 0); -lean::inc(x_595); -x_596 = lean::cnstr_get(x_593, 1); -lean::inc(x_596); -x_597 = lean::cnstr_get(x_593, 2); -lean::inc(x_597); -lean::dec(x_593); -x_598 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_596, x_594); -x_599 = lean::cnstr_get(x_598, 0); -lean::inc(x_599); -if (lean::obj_tag(x_599) == 0) -{ -obj* x_600; obj* x_601; obj* x_602; obj* x_603; obj* x_604; obj* x_605; -x_600 = lean::cnstr_get(x_598, 1); -lean::inc(x_600); -lean::dec(x_598); -x_601 = lean::cnstr_get(x_599, 0); -lean::inc(x_601); -x_602 = lean::cnstr_get(x_599, 1); -lean::inc(x_602); -x_603 = lean::cnstr_get(x_599, 2); -lean::inc(x_603); -lean::dec(x_599); -x_604 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_602, x_600); -x_605 = lean::cnstr_get(x_604, 0); -lean::inc(x_605); -if (lean::obj_tag(x_605) == 0) -{ -obj* x_606; obj* x_607; obj* x_608; obj* x_609; obj* x_610; obj* x_611; obj* x_612; obj* x_613; obj* x_614; obj* x_615; obj* x_616; obj* x_617; obj* x_618; uint32 x_619; obj* x_620; obj* x_621; obj* x_622; obj* x_623; obj* x_624; obj* x_625; obj* x_626; obj* x_627; obj* x_628; obj* x_629; -x_606 = lean::cnstr_get(x_604, 1); -lean::inc(x_606); -if (lean::is_exclusive(x_604)) { - lean::cnstr_release(x_604, 0); - lean::cnstr_release(x_604, 1); - x_607 = x_604; -} else { - lean::dec_ref(x_604); - x_607 = lean::box(0); -} -x_608 = lean::cnstr_get(x_605, 0); -lean::inc(x_608); -x_609 = lean::cnstr_get(x_605, 1); -lean::inc(x_609); -x_610 = lean::cnstr_get(x_605, 2); -lean::inc(x_610); -if (lean::is_exclusive(x_605)) { - lean::cnstr_release(x_605, 0); - lean::cnstr_release(x_605, 1); - lean::cnstr_release(x_605, 2); - x_611 = x_605; -} else { - lean::dec_ref(x_605); - x_611 = lean::box(0); -} -x_612 = lean::mk_nat_obj(16u); -x_613 = lean::nat_mul(x_612, x_589); -lean::dec(x_589); -x_614 = lean::nat_add(x_613, x_595); -lean::dec(x_595); -lean::dec(x_613); -x_615 = lean::nat_mul(x_612, x_614); -lean::dec(x_614); -x_616 = lean::nat_add(x_615, x_601); -lean::dec(x_601); -lean::dec(x_615); -x_617 = lean::nat_mul(x_612, x_616); -lean::dec(x_616); -x_618 = lean::nat_add(x_617, x_608); -lean::dec(x_608); -lean::dec(x_617); -x_619 = l_Char_ofNat(x_618); -lean::dec(x_618); -x_620 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_621 = lean::box_uint32(x_619); -if (lean::is_scalar(x_611)) { - x_622 = lean::alloc_cnstr(0, 3, 0); -} else { - x_622 = x_611; -} -lean::cnstr_set(x_622, 0, x_621); -lean::cnstr_set(x_622, 1, x_609); -lean::cnstr_set(x_622, 2, x_620); -x_623 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_610, x_622); -x_624 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_603, x_623); -x_625 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_597, x_624); -x_626 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_591, x_625); -x_627 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_626); -x_628 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_620, x_627); -if (lean::is_scalar(x_607)) { - x_629 = lean::alloc_cnstr(0, 2, 0); -} else { - x_629 = x_607; -} -lean::cnstr_set(x_629, 0, x_628); -lean::cnstr_set(x_629, 1, x_606); -return x_629; -} -else -{ -obj* x_630; obj* x_631; obj* x_632; uint8 x_633; obj* x_634; obj* x_635; obj* x_636; obj* x_637; obj* x_638; obj* x_639; obj* x_640; obj* x_641; obj* x_642; -lean::dec(x_601); -lean::dec(x_595); -lean::dec(x_589); -x_630 = lean::cnstr_get(x_604, 1); -lean::inc(x_630); -if (lean::is_exclusive(x_604)) { - lean::cnstr_release(x_604, 0); - lean::cnstr_release(x_604, 1); - x_631 = x_604; -} else { - lean::dec_ref(x_604); - x_631 = lean::box(0); -} -x_632 = lean::cnstr_get(x_605, 0); -lean::inc(x_632); -x_633 = lean::cnstr_get_scalar(x_605, sizeof(void*)*1); -if (lean::is_exclusive(x_605)) { - lean::cnstr_release(x_605, 0); - x_634 = x_605; -} else { - lean::dec_ref(x_605); - x_634 = lean::box(0); -} -if (lean::is_scalar(x_634)) { - x_635 = lean::alloc_cnstr(1, 1, 1); -} else { - x_635 = x_634; -} -lean::cnstr_set(x_635, 0, x_632); -lean::cnstr_set_scalar(x_635, sizeof(void*)*1, x_633); -x_636 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_603, x_635); -x_637 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_597, x_636); -x_638 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_591, x_637); -x_639 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_638); -x_640 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_641 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_640, x_639); -if (lean::is_scalar(x_631)) { - x_642 = lean::alloc_cnstr(0, 2, 0); -} else { - x_642 = x_631; -} -lean::cnstr_set(x_642, 0, x_641); -lean::cnstr_set(x_642, 1, x_630); -return x_642; -} -} -else -{ -obj* x_643; obj* x_644; obj* x_645; uint8 x_646; obj* x_647; obj* x_648; obj* x_649; obj* x_650; obj* x_651; obj* x_652; obj* x_653; obj* x_654; -lean::dec(x_595); -lean::dec(x_589); -x_643 = lean::cnstr_get(x_598, 1); -lean::inc(x_643); -if (lean::is_exclusive(x_598)) { - lean::cnstr_release(x_598, 0); - lean::cnstr_release(x_598, 1); - x_644 = x_598; -} else { - lean::dec_ref(x_598); - x_644 = lean::box(0); -} -x_645 = lean::cnstr_get(x_599, 0); -lean::inc(x_645); -x_646 = lean::cnstr_get_scalar(x_599, sizeof(void*)*1); -if (lean::is_exclusive(x_599)) { - lean::cnstr_release(x_599, 0); - x_647 = x_599; -} else { - lean::dec_ref(x_599); - x_647 = lean::box(0); -} -if (lean::is_scalar(x_647)) { - x_648 = lean::alloc_cnstr(1, 1, 1); -} else { - x_648 = x_647; -} -lean::cnstr_set(x_648, 0, x_645); -lean::cnstr_set_scalar(x_648, sizeof(void*)*1, x_646); -x_649 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_597, x_648); -x_650 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_591, x_649); -x_651 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_650); -x_652 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_653 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_652, x_651); -if (lean::is_scalar(x_644)) { - x_654 = lean::alloc_cnstr(0, 2, 0); -} else { - x_654 = x_644; -} -lean::cnstr_set(x_654, 0, x_653); -lean::cnstr_set(x_654, 1, x_643); -return x_654; -} -} -else -{ -obj* x_655; obj* x_656; obj* x_657; uint8 x_658; obj* x_659; obj* x_660; obj* x_661; obj* x_662; obj* x_663; obj* x_664; obj* x_665; -lean::dec(x_589); -x_655 = lean::cnstr_get(x_592, 1); -lean::inc(x_655); -if (lean::is_exclusive(x_592)) { - lean::cnstr_release(x_592, 0); - lean::cnstr_release(x_592, 1); - x_656 = x_592; -} else { - lean::dec_ref(x_592); - x_656 = lean::box(0); -} -x_657 = lean::cnstr_get(x_593, 0); -lean::inc(x_657); -x_658 = lean::cnstr_get_scalar(x_593, sizeof(void*)*1); -if (lean::is_exclusive(x_593)) { - lean::cnstr_release(x_593, 0); - x_659 = x_593; -} else { - lean::dec_ref(x_593); - x_659 = lean::box(0); -} -if (lean::is_scalar(x_659)) { - x_660 = lean::alloc_cnstr(1, 1, 1); -} else { - x_660 = x_659; -} -lean::cnstr_set(x_660, 0, x_657); -lean::cnstr_set_scalar(x_660, sizeof(void*)*1, x_658); -x_661 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_591, x_660); -x_662 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_661); -x_663 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_664 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_663, x_662); -if (lean::is_scalar(x_656)) { - x_665 = lean::alloc_cnstr(0, 2, 0); -} else { - x_665 = x_656; -} -lean::cnstr_set(x_665, 0, x_664); -lean::cnstr_set(x_665, 1, x_655); -return x_665; -} -} -else -{ -obj* x_666; obj* x_667; obj* x_668; uint8 x_669; obj* x_670; obj* x_671; obj* x_672; obj* x_673; obj* x_674; obj* x_675; -x_666 = lean::cnstr_get(x_586, 1); -lean::inc(x_666); -if (lean::is_exclusive(x_586)) { - lean::cnstr_release(x_586, 0); - lean::cnstr_release(x_586, 1); - x_667 = x_586; -} else { - lean::dec_ref(x_586); - x_667 = lean::box(0); -} -x_668 = lean::cnstr_get(x_587, 0); -lean::inc(x_668); -x_669 = lean::cnstr_get_scalar(x_587, sizeof(void*)*1); -if (lean::is_exclusive(x_587)) { - lean::cnstr_release(x_587, 0); - x_670 = x_587; -} else { - lean::dec_ref(x_587); - x_670 = lean::box(0); -} -if (lean::is_scalar(x_670)) { - x_671 = lean::alloc_cnstr(1, 1, 1); -} else { - x_671 = x_670; -} -lean::cnstr_set(x_671, 0, x_668); -lean::cnstr_set_scalar(x_671, sizeof(void*)*1, x_669); -x_672 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_671); -x_673 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_674 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_673, x_672); -if (lean::is_scalar(x_667)) { - x_675 = lean::alloc_cnstr(0, 2, 0); -} else { - x_675 = x_667; -} -lean::cnstr_set(x_675, 0, x_674); -lean::cnstr_set(x_675, 1, x_666); -return x_675; -} -} -} -else -{ -obj* x_676; obj* x_677; -lean::dec(x_552); -lean::dec(x_2); -x_676 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_553, x_551); -x_677 = lean::cnstr_get(x_676, 0); -lean::inc(x_677); -if (lean::obj_tag(x_677) == 0) -{ -obj* x_678; obj* x_679; obj* x_680; obj* x_681; obj* x_682; obj* x_683; -x_678 = lean::cnstr_get(x_676, 1); -lean::inc(x_678); -lean::dec(x_676); -x_679 = lean::cnstr_get(x_677, 0); -lean::inc(x_679); -x_680 = lean::cnstr_get(x_677, 1); -lean::inc(x_680); -x_681 = lean::cnstr_get(x_677, 2); -lean::inc(x_681); -lean::dec(x_677); -x_682 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_680, x_678); -x_683 = lean::cnstr_get(x_682, 0); -lean::inc(x_683); -if (lean::obj_tag(x_683) == 0) -{ -obj* x_684; obj* x_685; obj* x_686; obj* x_687; obj* x_688; obj* x_689; obj* x_690; obj* x_691; obj* x_692; uint32 x_693; obj* x_694; obj* x_695; obj* x_696; obj* x_697; obj* x_698; obj* x_699; obj* x_700; obj* x_701; -x_684 = lean::cnstr_get(x_682, 1); -lean::inc(x_684); -if (lean::is_exclusive(x_682)) { - lean::cnstr_release(x_682, 0); - lean::cnstr_release(x_682, 1); - x_685 = x_682; -} else { - lean::dec_ref(x_682); - x_685 = lean::box(0); -} -x_686 = lean::cnstr_get(x_683, 0); -lean::inc(x_686); -x_687 = lean::cnstr_get(x_683, 1); -lean::inc(x_687); -x_688 = lean::cnstr_get(x_683, 2); -lean::inc(x_688); -if (lean::is_exclusive(x_683)) { - lean::cnstr_release(x_683, 0); - lean::cnstr_release(x_683, 1); - lean::cnstr_release(x_683, 2); - x_689 = x_683; -} else { - lean::dec_ref(x_683); - x_689 = lean::box(0); -} -x_690 = lean::mk_nat_obj(16u); -x_691 = lean::nat_mul(x_690, x_679); -lean::dec(x_679); -x_692 = lean::nat_add(x_691, x_686); -lean::dec(x_686); -lean::dec(x_691); -x_693 = l_Char_ofNat(x_692); -lean::dec(x_692); -x_694 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_695 = lean::box_uint32(x_693); -if (lean::is_scalar(x_689)) { - x_696 = lean::alloc_cnstr(0, 3, 0); -} else { - x_696 = x_689; -} -lean::cnstr_set(x_696, 0, x_695); -lean::cnstr_set(x_696, 1, x_687); -lean::cnstr_set(x_696, 2, x_694); -x_697 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_688, x_696); -x_698 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_681, x_697); -x_699 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_698); -x_700 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_694, x_699); -if (lean::is_scalar(x_685)) { - x_701 = lean::alloc_cnstr(0, 2, 0); -} else { - x_701 = x_685; -} -lean::cnstr_set(x_701, 0, x_700); -lean::cnstr_set(x_701, 1, x_684); -return x_701; -} -else -{ -obj* x_702; obj* x_703; obj* x_704; uint8 x_705; obj* x_706; obj* x_707; obj* x_708; obj* x_709; obj* x_710; obj* x_711; obj* x_712; -lean::dec(x_679); -x_702 = lean::cnstr_get(x_682, 1); -lean::inc(x_702); -if (lean::is_exclusive(x_682)) { - lean::cnstr_release(x_682, 0); - lean::cnstr_release(x_682, 1); - x_703 = x_682; -} else { - lean::dec_ref(x_682); - x_703 = lean::box(0); -} -x_704 = lean::cnstr_get(x_683, 0); -lean::inc(x_704); -x_705 = lean::cnstr_get_scalar(x_683, sizeof(void*)*1); -if (lean::is_exclusive(x_683)) { - lean::cnstr_release(x_683, 0); - x_706 = x_683; -} else { - lean::dec_ref(x_683); - x_706 = lean::box(0); -} -if (lean::is_scalar(x_706)) { - x_707 = lean::alloc_cnstr(1, 1, 1); -} else { - x_707 = x_706; -} -lean::cnstr_set(x_707, 0, x_704); -lean::cnstr_set_scalar(x_707, sizeof(void*)*1, x_705); -x_708 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_681, x_707); -x_709 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_708); -x_710 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_711 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_710, x_709); -if (lean::is_scalar(x_703)) { - x_712 = lean::alloc_cnstr(0, 2, 0); -} else { - x_712 = x_703; -} -lean::cnstr_set(x_712, 0, x_711); -lean::cnstr_set(x_712, 1, x_702); -return x_712; -} -} -else -{ -obj* x_713; obj* x_714; obj* x_715; uint8 x_716; obj* x_717; obj* x_718; obj* x_719; obj* x_720; obj* x_721; obj* x_722; -x_713 = lean::cnstr_get(x_676, 1); -lean::inc(x_713); -if (lean::is_exclusive(x_676)) { - lean::cnstr_release(x_676, 0); - lean::cnstr_release(x_676, 1); - x_714 = x_676; -} else { - lean::dec_ref(x_676); - x_714 = lean::box(0); -} -x_715 = lean::cnstr_get(x_677, 0); -lean::inc(x_715); -x_716 = lean::cnstr_get_scalar(x_677, sizeof(void*)*1); -if (lean::is_exclusive(x_677)) { - lean::cnstr_release(x_677, 0); - x_717 = x_677; -} else { - lean::dec_ref(x_677); - x_717 = lean::box(0); -} -if (lean::is_scalar(x_717)) { - x_718 = lean::alloc_cnstr(1, 1, 1); -} else { - x_718 = x_717; -} -lean::cnstr_set(x_718, 0, x_715); -lean::cnstr_set_scalar(x_718, sizeof(void*)*1, x_716); -x_719 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_718); -x_720 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_721 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_720, x_719); -if (lean::is_scalar(x_714)) { - x_722 = lean::alloc_cnstr(0, 2, 0); -} else { - x_722 = x_714; -} -lean::cnstr_set(x_722, 0, x_721); -lean::cnstr_set(x_722, 1, x_713); -return x_722; -} -} -} -else -{ -uint32 x_723; obj* x_724; obj* x_725; obj* x_726; obj* x_727; obj* x_728; obj* x_729; -lean::dec(x_552); -lean::dec(x_2); -x_723 = 9; -x_724 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_725 = lean::box_uint32(x_723); -if (lean::is_scalar(x_555)) { - x_726 = lean::alloc_cnstr(0, 3, 0); -} else { - x_726 = x_555; -} -lean::cnstr_set(x_726, 0, x_725); -lean::cnstr_set(x_726, 1, x_553); -lean::cnstr_set(x_726, 2, x_724); -x_727 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_726); -x_728 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_724, x_727); -x_729 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_729, 0, x_728); -lean::cnstr_set(x_729, 1, x_551); -return x_729; -} -} -else -{ -uint32 x_730; obj* x_731; obj* x_732; obj* x_733; obj* x_734; obj* x_735; obj* x_736; -lean::dec(x_552); -lean::dec(x_2); -x_730 = 10; -x_731 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_732 = lean::box_uint32(x_730); -if (lean::is_scalar(x_555)) { - x_733 = lean::alloc_cnstr(0, 3, 0); -} else { - x_733 = x_555; -} -lean::cnstr_set(x_733, 0, x_732); -lean::cnstr_set(x_733, 1, x_553); -lean::cnstr_set(x_733, 2, x_731); -x_734 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_733); -x_735 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_731, x_734); -x_736 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_736, 0, x_735); -lean::cnstr_set(x_736, 1, x_551); -return x_736; -} -} -else -{ -obj* x_737; obj* x_738; obj* x_739; obj* x_740; obj* x_741; obj* x_742; -lean::dec(x_552); -lean::dec(x_2); -x_737 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_738 = lean::box_uint32(x_562); -if (lean::is_scalar(x_555)) { - x_739 = lean::alloc_cnstr(0, 3, 0); -} else { - x_739 = x_555; -} -lean::cnstr_set(x_739, 0, x_738); -lean::cnstr_set(x_739, 1, x_553); -lean::cnstr_set(x_739, 2, x_737); -x_740 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_739); -x_741 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_737, x_740); -x_742 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_742, 0, x_741); -lean::cnstr_set(x_742, 1, x_551); -return x_742; -} -} -else -{ -obj* x_743; obj* x_744; obj* x_745; obj* x_746; obj* x_747; obj* x_748; -lean::dec(x_552); -lean::dec(x_2); -x_743 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_744 = lean::box_uint32(x_559); -if (lean::is_scalar(x_555)) { - x_745 = lean::alloc_cnstr(0, 3, 0); -} else { - x_745 = x_555; -} -lean::cnstr_set(x_745, 0, x_744); -lean::cnstr_set(x_745, 1, x_553); -lean::cnstr_set(x_745, 2, x_743); -x_746 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_745); -x_747 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_743, x_746); -x_748 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_748, 0, x_747); -lean::cnstr_set(x_748, 1, x_551); -return x_748; -} -} -else -{ -obj* x_749; obj* x_750; obj* x_751; obj* x_752; obj* x_753; obj* x_754; -lean::dec(x_552); -lean::dec(x_2); -x_749 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_750 = lean::box_uint32(x_556); -if (lean::is_scalar(x_555)) { - x_751 = lean::alloc_cnstr(0, 3, 0); -} else { - x_751 = x_555; -} -lean::cnstr_set(x_751, 0, x_750); -lean::cnstr_set(x_751, 1, x_553); -lean::cnstr_set(x_751, 2, x_749); -x_752 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_554, x_751); -x_753 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_749, x_752); -x_754 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_754, 0, x_753); -lean::cnstr_set(x_754, 1, x_551); -return x_754; -} -} -} -else -{ -uint8 x_755; -lean::dec(x_2); -x_755 = !lean::is_exclusive(x_4); -if (x_755 == 0) -{ -obj* x_756; uint8 x_757; -x_756 = lean::cnstr_get(x_4, 0); -lean::dec(x_756); -x_757 = !lean::is_exclusive(x_5); -if (x_757 == 0) -{ -obj* x_758; obj* x_759; -x_758 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_759 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_758, x_5); -lean::cnstr_set(x_4, 0, x_759); -return x_4; -} -else -{ -obj* x_760; uint8 x_761; obj* x_762; obj* x_763; obj* x_764; -x_760 = lean::cnstr_get(x_5, 0); -x_761 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_760); -lean::dec(x_5); -x_762 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_762, 0, x_760); -lean::cnstr_set_scalar(x_762, sizeof(void*)*1, x_761); -x_763 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_764 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_763, x_762); -lean::cnstr_set(x_4, 0, x_764); -return x_4; -} -} -else -{ -obj* x_765; obj* x_766; uint8 x_767; obj* x_768; obj* x_769; obj* x_770; obj* x_771; obj* x_772; -x_765 = lean::cnstr_get(x_4, 1); -lean::inc(x_765); -lean::dec(x_4); -x_766 = lean::cnstr_get(x_5, 0); -lean::inc(x_766); -x_767 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - x_768 = x_5; -} else { - lean::dec_ref(x_5); - x_768 = lean::box(0); -} -if (lean::is_scalar(x_768)) { - x_769 = lean::alloc_cnstr(1, 1, 1); -} else { - x_769 = x_768; -} -lean::cnstr_set(x_769, 0, x_766); -lean::cnstr_set_scalar(x_769, sizeof(void*)*1, x_767); -x_770 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_771 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_770, x_769); -x_772 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_772, 0, x_771); -lean::cnstr_set(x_772, 1, x_765); -return x_772; -} -} -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; uint8 x_7; -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::nat_dec_eq(x_1, x_6); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::mk_nat_obj(1u); -x_9 = lean::nat_sub(x_1, x_8); -x_10 = l_Lean_Parser_MonadParsec_any___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__2(x_3, x_4, x_5); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -if (lean::obj_tag(x_11) == 0) -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_10); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; uint8 x_15; -x_13 = lean::cnstr_get(x_10, 1); -x_14 = lean::cnstr_get(x_10, 0); -lean::dec(x_14); -x_15 = !lean::is_exclusive(x_11); -if (x_15 == 0) -{ -obj* x_16; obj* x_17; obj* x_18; uint32 x_19; uint32 x_20; uint8 x_21; -x_16 = lean::cnstr_get(x_11, 0); -x_17 = lean::cnstr_get(x_11, 1); -x_18 = lean::cnstr_get(x_11, 2); -x_19 = 92; -x_20 = lean::unbox_uint32(x_16); -x_21 = x_20 == x_19; -if (x_21 == 0) -{ -uint32 x_22; uint32 x_23; uint8 x_24; -x_22 = 34; -x_23 = lean::unbox_uint32(x_16); -x_24 = x_23 == x_22; -if (x_24 == 0) -{ -uint32 x_25; obj* x_26; obj* x_27; uint8 x_28; -lean::free_heap_obj(x_11); -lean::free_heap_obj(x_10); -x_25 = lean::unbox_uint32(x_16); -lean::dec(x_16); -x_26 = lean::string_push(x_2, x_25); -x_27 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(x_9, x_26, x_3, x_17, x_13); -lean::dec(x_9); -x_28 = !lean::is_exclusive(x_27); -if (x_28 == 0) -{ -obj* x_29; obj* x_30; -x_29 = lean::cnstr_get(x_27, 0); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_29); -lean::cnstr_set(x_27, 0, x_30); -return x_27; -} -else -{ -obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_31 = lean::cnstr_get(x_27, 0); -x_32 = lean::cnstr_get(x_27, 1); -lean::inc(x_32); -lean::inc(x_31); -lean::dec(x_27); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_31); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_32); -return x_34; -} -} -else -{ -obj* x_35; obj* x_36; -lean::dec(x_16); -lean::dec(x_9); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_11, 2, x_35); -lean::cnstr_set(x_11, 0, x_2); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_11); -lean::cnstr_set(x_10, 0, x_36); -return x_10; -} -} -else -{ -obj* x_37; obj* x_38; -lean::free_heap_obj(x_11); -lean::dec(x_16); -lean::free_heap_obj(x_10); -x_37 = l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_x27___spec__3(x_3, x_17, x_13); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; obj* x_40; obj* x_41; obj* x_42; uint32 x_43; obj* x_44; obj* x_45; uint8 x_46; -x_39 = lean::cnstr_get(x_37, 1); -lean::inc(x_39); -lean::dec(x_37); -x_40 = lean::cnstr_get(x_38, 0); -lean::inc(x_40); -x_41 = lean::cnstr_get(x_38, 1); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_38, 2); -lean::inc(x_42); -lean::dec(x_38); -x_43 = lean::unbox_uint32(x_40); -lean::dec(x_40); -x_44 = lean::string_push(x_2, x_43); -x_45 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(x_9, x_44, x_3, x_41, x_39); -lean::dec(x_9); -x_46 = !lean::is_exclusive(x_45); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; obj* x_49; -x_47 = lean::cnstr_get(x_45, 0); -x_48 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_47); -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_48); -lean::cnstr_set(x_45, 0, x_49); -return x_45; -} -else -{ -obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_50 = lean::cnstr_get(x_45, 0); -x_51 = lean::cnstr_get(x_45, 1); -lean::inc(x_51); -lean::inc(x_50); -lean::dec(x_45); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_50); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_52); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -return x_54; -} -} -else -{ -uint8 x_55; -lean::dec(x_9); -lean::dec(x_2); -x_55 = !lean::is_exclusive(x_37); -if (x_55 == 0) -{ -obj* x_56; uint8 x_57; -x_56 = lean::cnstr_get(x_37, 0); -lean::dec(x_56); -x_57 = !lean::is_exclusive(x_38); -if (x_57 == 0) -{ -obj* x_58; -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_38); -lean::cnstr_set(x_37, 0, x_58); -return x_37; -} -else -{ -obj* x_59; uint8 x_60; obj* x_61; obj* x_62; -x_59 = lean::cnstr_get(x_38, 0); -x_60 = lean::cnstr_get_scalar(x_38, sizeof(void*)*1); -lean::inc(x_59); -lean::dec(x_38); -x_61 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_61, 0, x_59); -lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_61); -lean::cnstr_set(x_37, 0, x_62); -return x_37; -} -} -else -{ -obj* x_63; obj* x_64; uint8 x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_63 = lean::cnstr_get(x_37, 1); -lean::inc(x_63); -lean::dec(x_37); -x_64 = lean::cnstr_get(x_38, 0); -lean::inc(x_64); -x_65 = lean::cnstr_get_scalar(x_38, sizeof(void*)*1); -if (lean::is_exclusive(x_38)) { - lean::cnstr_release(x_38, 0); - x_66 = x_38; -} else { - lean::dec_ref(x_38); - x_66 = lean::box(0); -} -if (lean::is_scalar(x_66)) { - x_67 = lean::alloc_cnstr(1, 1, 1); -} else { - x_67 = x_66; -} -lean::cnstr_set(x_67, 0, x_64); -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_65); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_67); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_63); -return x_69; -} -} -} -} -else -{ -obj* x_70; obj* x_71; obj* x_72; uint32 x_73; uint32 x_74; uint8 x_75; -x_70 = lean::cnstr_get(x_11, 0); -x_71 = lean::cnstr_get(x_11, 1); -x_72 = lean::cnstr_get(x_11, 2); -lean::inc(x_72); -lean::inc(x_71); -lean::inc(x_70); -lean::dec(x_11); -x_73 = 92; -x_74 = lean::unbox_uint32(x_70); -x_75 = x_74 == x_73; -if (x_75 == 0) -{ -uint32 x_76; uint32 x_77; uint8 x_78; -x_76 = 34; -x_77 = lean::unbox_uint32(x_70); -x_78 = x_77 == x_76; -if (x_78 == 0) -{ -uint32 x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; -lean::free_heap_obj(x_10); -x_79 = lean::unbox_uint32(x_70); -lean::dec(x_70); -x_80 = lean::string_push(x_2, x_79); -x_81 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(x_9, x_80, x_3, x_71, x_13); -lean::dec(x_9); -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -x_83 = lean::cnstr_get(x_81, 1); -lean::inc(x_83); -if (lean::is_exclusive(x_81)) { - lean::cnstr_release(x_81, 0); - lean::cnstr_release(x_81, 1); - x_84 = x_81; -} else { - lean::dec_ref(x_81); - x_84 = lean::box(0); -} -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_82); -if (lean::is_scalar(x_84)) { - x_86 = lean::alloc_cnstr(0, 2, 0); -} else { - x_86 = x_84; -} -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_83); -return x_86; -} -else -{ -obj* x_87; obj* x_88; obj* x_89; -lean::dec(x_70); -lean::dec(x_9); -x_87 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_88 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_88, 0, x_2); -lean::cnstr_set(x_88, 1, x_71); -lean::cnstr_set(x_88, 2, x_87); -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_88); -lean::cnstr_set(x_10, 0, x_89); -return x_10; -} -} -else -{ -obj* x_90; obj* x_91; -lean::dec(x_70); -lean::free_heap_obj(x_10); -x_90 = l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_x27___spec__3(x_3, x_71, x_13); -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -if (lean::obj_tag(x_91) == 0) -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; uint32 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; -x_92 = lean::cnstr_get(x_90, 1); -lean::inc(x_92); -lean::dec(x_90); -x_93 = lean::cnstr_get(x_91, 0); -lean::inc(x_93); -x_94 = lean::cnstr_get(x_91, 1); -lean::inc(x_94); -x_95 = lean::cnstr_get(x_91, 2); -lean::inc(x_95); -lean::dec(x_91); -x_96 = lean::unbox_uint32(x_93); -lean::dec(x_93); -x_97 = lean::string_push(x_2, x_96); -x_98 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(x_9, x_97, x_3, x_94, x_92); -lean::dec(x_9); -x_99 = lean::cnstr_get(x_98, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get(x_98, 1); -lean::inc(x_100); -if (lean::is_exclusive(x_98)) { - lean::cnstr_release(x_98, 0); - lean::cnstr_release(x_98, 1); - x_101 = x_98; -} else { - lean::dec_ref(x_98); - x_101 = lean::box(0); -} -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_95, x_99); -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_102); -if (lean::is_scalar(x_101)) { - x_104 = lean::alloc_cnstr(0, 2, 0); -} else { - x_104 = x_101; -} -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_100); -return x_104; -} -else -{ -obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -lean::dec(x_9); -lean::dec(x_2); -x_105 = lean::cnstr_get(x_90, 1); -lean::inc(x_105); -if (lean::is_exclusive(x_90)) { - lean::cnstr_release(x_90, 0); - lean::cnstr_release(x_90, 1); - x_106 = x_90; -} else { - lean::dec_ref(x_90); - x_106 = lean::box(0); -} -x_107 = lean::cnstr_get(x_91, 0); -lean::inc(x_107); -x_108 = lean::cnstr_get_scalar(x_91, sizeof(void*)*1); -if (lean::is_exclusive(x_91)) { - lean::cnstr_release(x_91, 0); - x_109 = x_91; -} else { - lean::dec_ref(x_91); - x_109 = lean::box(0); -} -if (lean::is_scalar(x_109)) { - x_110 = lean::alloc_cnstr(1, 1, 1); -} else { - x_110 = x_109; -} -lean::cnstr_set(x_110, 0, x_107); -lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_108); -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_110); -if (lean::is_scalar(x_106)) { - x_112 = lean::alloc_cnstr(0, 2, 0); -} else { - x_112 = x_106; -} -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_105); -return x_112; -} -} -} -} -else -{ -obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; uint32 x_118; uint32 x_119; uint8 x_120; -x_113 = lean::cnstr_get(x_10, 1); -lean::inc(x_113); -lean::dec(x_10); -x_114 = lean::cnstr_get(x_11, 0); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_11, 1); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_11, 2); -lean::inc(x_116); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - lean::cnstr_release(x_11, 2); - x_117 = x_11; -} else { - lean::dec_ref(x_11); - x_117 = lean::box(0); -} -x_118 = 92; -x_119 = lean::unbox_uint32(x_114); -x_120 = x_119 == x_118; -if (x_120 == 0) -{ -uint32 x_121; uint32 x_122; uint8 x_123; -x_121 = 34; -x_122 = lean::unbox_uint32(x_114); -x_123 = x_122 == x_121; -if (x_123 == 0) -{ -uint32 x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; -lean::dec(x_117); -x_124 = lean::unbox_uint32(x_114); -lean::dec(x_114); -x_125 = lean::string_push(x_2, x_124); -x_126 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(x_9, x_125, x_3, x_115, x_113); -lean::dec(x_9); -x_127 = lean::cnstr_get(x_126, 0); -lean::inc(x_127); -x_128 = lean::cnstr_get(x_126, 1); -lean::inc(x_128); -if (lean::is_exclusive(x_126)) { - lean::cnstr_release(x_126, 0); - lean::cnstr_release(x_126, 1); - x_129 = x_126; -} else { - lean::dec_ref(x_126); - x_129 = lean::box(0); -} -x_130 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_127); -if (lean::is_scalar(x_129)) { - x_131 = lean::alloc_cnstr(0, 2, 0); -} else { - x_131 = x_129; -} -lean::cnstr_set(x_131, 0, x_130); -lean::cnstr_set(x_131, 1, x_128); -return x_131; -} -else -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; -lean::dec(x_114); -lean::dec(x_9); -x_132 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_117)) { - x_133 = lean::alloc_cnstr(0, 3, 0); -} else { - x_133 = x_117; -} -lean::cnstr_set(x_133, 0, x_2); -lean::cnstr_set(x_133, 1, x_115); -lean::cnstr_set(x_133, 2, x_132); -x_134 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_133); -x_135 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_135, 0, x_134); -lean::cnstr_set(x_135, 1, x_113); -return x_135; -} -} -else -{ -obj* x_136; obj* x_137; -lean::dec(x_117); -lean::dec(x_114); -x_136 = l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_x27___spec__3(x_3, x_115, x_113); -x_137 = lean::cnstr_get(x_136, 0); -lean::inc(x_137); -if (lean::obj_tag(x_137) == 0) -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; uint32 x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; -x_138 = lean::cnstr_get(x_136, 1); -lean::inc(x_138); -lean::dec(x_136); -x_139 = lean::cnstr_get(x_137, 0); -lean::inc(x_139); -x_140 = lean::cnstr_get(x_137, 1); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_137, 2); -lean::inc(x_141); -lean::dec(x_137); -x_142 = lean::unbox_uint32(x_139); -lean::dec(x_139); -x_143 = lean::string_push(x_2, x_142); -x_144 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(x_9, x_143, x_3, x_140, x_138); -lean::dec(x_9); -x_145 = lean::cnstr_get(x_144, 0); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_144, 1); -lean::inc(x_146); -if (lean::is_exclusive(x_144)) { - lean::cnstr_release(x_144, 0); - lean::cnstr_release(x_144, 1); - x_147 = x_144; -} else { - lean::dec_ref(x_144); - x_147 = lean::box(0); -} -x_148 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_141, x_145); -x_149 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_148); -if (lean::is_scalar(x_147)) { - x_150 = lean::alloc_cnstr(0, 2, 0); -} else { - x_150 = x_147; -} -lean::cnstr_set(x_150, 0, x_149); -lean::cnstr_set(x_150, 1, x_146); -return x_150; -} -else -{ -obj* x_151; obj* x_152; obj* x_153; uint8 x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; -lean::dec(x_9); -lean::dec(x_2); -x_151 = lean::cnstr_get(x_136, 1); -lean::inc(x_151); -if (lean::is_exclusive(x_136)) { - lean::cnstr_release(x_136, 0); - lean::cnstr_release(x_136, 1); - x_152 = x_136; -} else { - lean::dec_ref(x_136); - x_152 = lean::box(0); -} -x_153 = lean::cnstr_get(x_137, 0); -lean::inc(x_153); -x_154 = lean::cnstr_get_scalar(x_137, sizeof(void*)*1); -if (lean::is_exclusive(x_137)) { - lean::cnstr_release(x_137, 0); - x_155 = x_137; -} else { - lean::dec_ref(x_137); - x_155 = lean::box(0); -} -if (lean::is_scalar(x_155)) { - x_156 = lean::alloc_cnstr(1, 1, 1); -} else { - x_156 = x_155; -} -lean::cnstr_set(x_156, 0, x_153); -lean::cnstr_set_scalar(x_156, sizeof(void*)*1, x_154); -x_157 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_156); -if (lean::is_scalar(x_152)) { - x_158 = lean::alloc_cnstr(0, 2, 0); -} else { - x_158 = x_152; -} -lean::cnstr_set(x_158, 0, x_157); -lean::cnstr_set(x_158, 1, x_151); -return x_158; -} -} -} -} -else -{ -uint8 x_159; -lean::dec(x_9); -lean::dec(x_2); -x_159 = !lean::is_exclusive(x_10); -if (x_159 == 0) -{ -obj* x_160; uint8 x_161; -x_160 = lean::cnstr_get(x_10, 0); -lean::dec(x_160); -x_161 = !lean::is_exclusive(x_11); -if (x_161 == 0) -{ -return x_10; -} -else -{ -obj* x_162; uint8 x_163; obj* x_164; -x_162 = lean::cnstr_get(x_11, 0); -x_163 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -lean::inc(x_162); -lean::dec(x_11); -x_164 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_164, 0, x_162); -lean::cnstr_set_scalar(x_164, sizeof(void*)*1, x_163); -lean::cnstr_set(x_10, 0, x_164); -return x_10; -} -} -else -{ -obj* x_165; obj* x_166; uint8 x_167; obj* x_168; obj* x_169; obj* x_170; -x_165 = lean::cnstr_get(x_10, 1); -lean::inc(x_165); -lean::dec(x_10); -x_166 = lean::cnstr_get(x_11, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_exclusive(x_11)) { - lean::cnstr_release(x_11, 0); - x_168 = x_11; -} else { - lean::dec_ref(x_11); - x_168 = lean::box(0); -} -if (lean::is_scalar(x_168)) { - x_169 = lean::alloc_cnstr(1, 1, 1); -} else { - x_169 = x_168; -} -lean::cnstr_set(x_169, 0, x_166); -lean::cnstr_set_scalar(x_169, sizeof(void*)*1, x_167); -x_170 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_170, 0, x_169); -lean::cnstr_set(x_170, 1, x_165); -return x_170; -} -} -} -else -{ -uint32 x_171; obj* x_172; obj* x_173; -x_171 = 34; -x_172 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_171, x_3, x_4, x_5); -x_173 = lean::cnstr_get(x_172, 0); -lean::inc(x_173); -if (lean::obj_tag(x_173) == 0) -{ -uint8 x_174; -x_174 = !lean::is_exclusive(x_172); -if (x_174 == 0) -{ -obj* x_175; uint8 x_176; -x_175 = lean::cnstr_get(x_172, 0); -lean::dec(x_175); -x_176 = !lean::is_exclusive(x_173); -if (x_176 == 0) -{ -obj* x_177; obj* x_178; obj* x_179; obj* x_180; -x_177 = lean::cnstr_get(x_173, 2); -x_178 = lean::cnstr_get(x_173, 0); -lean::dec(x_178); -x_179 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_173, 2, x_179); -lean::cnstr_set(x_173, 0, x_2); -x_180 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_177, x_173); -lean::cnstr_set(x_172, 0, x_180); -return x_172; -} -else -{ -obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; -x_181 = lean::cnstr_get(x_173, 1); -x_182 = lean::cnstr_get(x_173, 2); -lean::inc(x_182); -lean::inc(x_181); -lean::dec(x_173); -x_183 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_184 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_184, 0, x_2); -lean::cnstr_set(x_184, 1, x_181); -lean::cnstr_set(x_184, 2, x_183); -x_185 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_182, x_184); -lean::cnstr_set(x_172, 0, x_185); -return x_172; -} -} -else -{ -obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; -x_186 = lean::cnstr_get(x_172, 1); -lean::inc(x_186); -lean::dec(x_172); -x_187 = lean::cnstr_get(x_173, 1); -lean::inc(x_187); -x_188 = lean::cnstr_get(x_173, 2); -lean::inc(x_188); -if (lean::is_exclusive(x_173)) { - lean::cnstr_release(x_173, 0); - lean::cnstr_release(x_173, 1); - lean::cnstr_release(x_173, 2); - x_189 = x_173; -} else { - lean::dec_ref(x_173); - x_189 = lean::box(0); -} -x_190 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_189)) { - x_191 = lean::alloc_cnstr(0, 3, 0); -} else { - x_191 = x_189; -} -lean::cnstr_set(x_191, 0, x_2); -lean::cnstr_set(x_191, 1, x_187); -lean::cnstr_set(x_191, 2, x_190); -x_192 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_188, x_191); -x_193 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_193, 0, x_192); -lean::cnstr_set(x_193, 1, x_186); -return x_193; -} -} -else -{ -uint8 x_194; -lean::dec(x_2); -x_194 = !lean::is_exclusive(x_172); -if (x_194 == 0) -{ -obj* x_195; uint8 x_196; -x_195 = lean::cnstr_get(x_172, 0); -lean::dec(x_195); -x_196 = !lean::is_exclusive(x_173); -if (x_196 == 0) -{ -return x_172; -} -else -{ -obj* x_197; uint8 x_198; obj* x_199; -x_197 = lean::cnstr_get(x_173, 0); -x_198 = lean::cnstr_get_scalar(x_173, sizeof(void*)*1); -lean::inc(x_197); -lean::dec(x_173); -x_199 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_199, 0, x_197); -lean::cnstr_set_scalar(x_199, sizeof(void*)*1, x_198); -lean::cnstr_set(x_172, 0, x_199); -return x_172; -} -} -else -{ -obj* x_200; obj* x_201; uint8 x_202; obj* x_203; obj* x_204; obj* x_205; -x_200 = lean::cnstr_get(x_172, 1); -lean::inc(x_200); -lean::dec(x_172); -x_201 = lean::cnstr_get(x_173, 0); -lean::inc(x_201); -x_202 = lean::cnstr_get_scalar(x_173, sizeof(void*)*1); -if (lean::is_exclusive(x_173)) { - lean::cnstr_release(x_173, 0); - x_203 = x_173; -} else { - lean::dec_ref(x_173); - x_203 = lean::box(0); -} -if (lean::is_scalar(x_203)) { - x_204 = lean::alloc_cnstr(1, 1, 1); -} else { - x_204 = x_203; -} -lean::cnstr_set(x_204, 0, x_201); -lean::cnstr_set_scalar(x_204, sizeof(void*)*1, x_202); -x_205 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_205, 0, x_204); -lean::cnstr_set(x_205, 1, x_200); -return x_205; -} -} -} -} -} -obj* l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_x27___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; obj* x_6; -x_4 = 34; -x_5 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_4, x_1, x_2, x_3); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint8 x_13; -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -lean::dec(x_5); -x_8 = lean::cnstr_get(x_6, 1); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_6, 2); -lean::inc(x_9); -lean::dec(x_6); -x_10 = l_String_OldIterator_remaining___main(x_8); -x_11 = l_String_splitAux___main___closed__1; -x_12 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(x_10, x_11, x_1, x_8, x_7); -lean::dec(x_10); -x_13 = !lean::is_exclusive(x_12); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::cnstr_get(x_12, 0); -x_15 = l_Lean_Parser_finishCommentBlock___closed__2; -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_14); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_16); -lean::cnstr_set(x_12, 0, x_17); -return x_12; -} -else -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_18 = lean::cnstr_get(x_12, 0); -x_19 = lean::cnstr_get(x_12, 1); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_12); -x_20 = l_Lean_Parser_finishCommentBlock___closed__2; -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_18); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_21); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_19); -return x_23; -} -} -else -{ -uint8 x_24; -x_24 = !lean::is_exclusive(x_5); -if (x_24 == 0) -{ -obj* x_25; uint8 x_26; -x_25 = lean::cnstr_get(x_5, 0); -lean::dec(x_25); -x_26 = !lean::is_exclusive(x_6); -if (x_26 == 0) -{ -return x_5; -} -else -{ -obj* x_27; uint8 x_28; obj* x_29; -x_27 = lean::cnstr_get(x_6, 0); -x_28 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_27); -lean::dec(x_6); -x_29 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set_scalar(x_29, sizeof(void*)*1, x_28); -lean::cnstr_set(x_5, 0, x_29); -return x_5; -} -} -else -{ -obj* x_30; obj* x_31; uint8 x_32; obj* x_33; obj* x_34; obj* x_35; -x_30 = lean::cnstr_get(x_5, 1); -lean::inc(x_30); -lean::dec(x_5); -x_31 = lean::cnstr_get(x_6, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_33 = x_6; -} else { - lean::dec_ref(x_6); - x_33 = lean::box(0); -} -if (lean::is_scalar(x_33)) { - x_34 = lean::alloc_cnstr(1, 1, 1); -} else { - x_34 = x_33; -} -lean::cnstr_set(x_34, 0, x_31); -lean::cnstr_set_scalar(x_34, sizeof(void*)*1, x_32); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_30); -return x_35; -} -} -} -} -obj* l_Lean_Parser_stringLit_x27___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_x27___spec__1(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_10 = lean::cnstr_get(x_6, 1); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -lean::inc(x_10); -x_13 = l_Lean_Parser_mkRawRes(x_1, x_10); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_14); -lean::cnstr_set(x_6, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -lean::cnstr_set(x_5, 0, x_15); -return x_5; -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_16 = lean::cnstr_get(x_6, 1); -x_17 = lean::cnstr_get(x_6, 2); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_6); -lean::inc(x_16); -x_18 = l_Lean_Parser_mkRawRes(x_1, x_16); -x_19 = l_Lean_Parser_finishCommentBlock___closed__2; -x_20 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -lean::cnstr_set(x_20, 2, x_19); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_17, x_20); -lean::cnstr_set(x_5, 0, x_21); -return x_5; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_22 = lean::cnstr_get(x_5, 1); -lean::inc(x_22); -lean::dec(x_5); -x_23 = lean::cnstr_get(x_6, 1); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_6, 2); -lean::inc(x_24); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_25 = x_6; -} else { - lean::dec_ref(x_6); - x_25 = lean::box(0); -} -lean::inc(x_23); -x_26 = l_Lean_Parser_mkRawRes(x_1, x_23); -x_27 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_25)) { - x_28 = lean::alloc_cnstr(0, 3, 0); -} else { - x_28 = x_25; -} -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_23); -lean::cnstr_set(x_28, 2, x_27); -x_29 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_22); -return x_30; -} -} -else -{ -uint8 x_31; -lean::dec(x_1); -x_31 = !lean::is_exclusive(x_5); -if (x_31 == 0) -{ -obj* x_32; uint8 x_33; -x_32 = lean::cnstr_get(x_5, 0); -lean::dec(x_32); -x_33 = !lean::is_exclusive(x_6); -if (x_33 == 0) -{ -return x_5; -} -else -{ -obj* x_34; uint8 x_35; obj* x_36; -x_34 = lean::cnstr_get(x_6, 0); -x_35 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_34); -lean::dec(x_6); -x_36 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); -lean::cnstr_set(x_5, 0, x_36); -return x_5; -} -} -else -{ -obj* x_37; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; -x_37 = lean::cnstr_get(x_5, 1); -lean::inc(x_37); -lean::dec(x_5); -x_38 = lean::cnstr_get(x_6, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_40 = x_6; -} else { - lean::dec_ref(x_6); - x_40 = lean::box(0); -} -if (lean::is_scalar(x_40)) { - x_41 = lean::alloc_cnstr(1, 1, 1); -} else { - x_41 = x_40; -} -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); -x_42 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_37); -return x_42; -} -} -} -} -obj* _init_l_Lean_Parser_stringLit_x27___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___rarg___lambda__1), 2, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_ReaderT_lift___at_Lean_Parser_withTrailing___spec__1___rarg___boxed), 4, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_x27___lambda__1___boxed), 4, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::box(0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* l_Lean_Parser_stringLit_x27(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_stringLit; -x_5 = l_Lean_Parser_stringLit_x27___closed__1; -x_6 = l_Lean_Parser_Combinators_node___at_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens___spec__4(x_4, x_5, x_1, x_2, x_3); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_x27___spec__4___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_x27___spec__6___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_x27___spec__6(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_x27___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_x27___spec__3(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_x27___spec__2(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_x27___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_x27___spec__1(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_stringLit_x27___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_stringLit_x27___lambda__1(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l___private_init_lean_parser_token_5__mkConsumeToken(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_10; obj* x_11; obj* x_12; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = lean::string_length(x_6); -lean::inc(x_2); -x_8 = l_String_OldIterator_nextn___main(x_2, x_7); -lean::inc(x_8); -x_9 = l_Lean_Parser_mkRawRes(x_2, x_8); -x_10 = lean::box(0); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_8); -lean::cnstr_set(x_11, 2, x_10); -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; -} -} -obj* l___private_init_lean_parser_token_5__mkConsumeToken___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l___private_init_lean_parser_token_5__mkConsumeToken(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_numberOrStringLit(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -lean::inc(x_1); -x_4 = l_Lean_Parser_number_x27(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -lean::dec(x_2); -lean::dec(x_1); -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; -x_7 = lean::cnstr_get(x_4, 0); -lean::dec(x_7); -return x_4; -} -else -{ -obj* x_8; obj* x_9; -x_8 = lean::cnstr_get(x_4, 1); -lean::inc(x_8); -lean::dec(x_4); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_5); -lean::cnstr_set(x_9, 1, x_8); -return x_9; -} -} -else -{ -uint8 x_10; -x_10 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; uint8 x_14; -x_11 = lean::cnstr_get(x_4, 1); -lean::inc(x_11); -lean::dec(x_4); -x_12 = lean::cnstr_get(x_5, 0); -lean::inc(x_12); -lean::dec(x_5); -x_13 = l_Lean_Parser_stringLit_x27(x_1, x_2, x_11); -x_14 = !lean::is_exclusive(x_13); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; -x_15 = lean::cnstr_get(x_13, 0); -x_16 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_12, x_15); -lean::cnstr_set(x_13, 0, x_16); -return x_13; -} -else -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_17 = lean::cnstr_get(x_13, 0); -x_18 = lean::cnstr_get(x_13, 1); -lean::inc(x_18); -lean::inc(x_17); -lean::dec(x_13); -x_19 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_12, x_17); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_18); -return x_20; -} -} -else -{ -uint8 x_21; -lean::dec(x_2); -lean::dec(x_1); -x_21 = !lean::is_exclusive(x_4); -if (x_21 == 0) -{ -obj* x_22; -x_22 = lean::cnstr_get(x_4, 0); -lean::dec(x_22); -return x_4; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_4, 1); -lean::inc(x_23); -lean::dec(x_4); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_5); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -} -} -} -} -obj* l_Lean_Parser_tokenCont(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; -lean::inc(x_3); -x_6 = l___private_init_lean_parser_token_4__ident_x27(x_3, x_4, x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -if (lean::obj_tag(x_7) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; uint8 x_11; -x_9 = lean::cnstr_get(x_6, 1); -x_10 = lean::cnstr_get(x_6, 0); -lean::dec(x_10); -x_11 = !lean::is_exclusive(x_7); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_12 = lean::cnstr_get(x_7, 0); -x_13 = lean::cnstr_get(x_7, 1); -x_14 = lean::cnstr_get(x_7, 2); -x_15 = lean::cnstr_get(x_13, 1); -lean::inc(x_15); -x_16 = lean::cnstr_get(x_1, 1); -lean::inc(x_16); -x_17 = lean::cnstr_get(x_2, 0); -x_18 = lean::string_length(x_17); -x_19 = lean::nat_add(x_16, x_18); -lean::dec(x_18); -lean::dec(x_16); -x_20 = lean::nat_dec_le(x_15, x_19); -lean::dec(x_19); -lean::dec(x_15); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; -lean::dec(x_3); -lean::dec(x_1); -x_21 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_7, 2, x_21); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_7); -lean::cnstr_set(x_6, 0, x_22); -return x_6; -} -else -{ -obj* x_23; uint8 x_24; -lean::free_heap_obj(x_7); -lean::dec(x_12); -lean::free_heap_obj(x_6); -x_23 = l___private_init_lean_parser_token_5__mkConsumeToken(x_2, x_1, x_3, x_13, x_9); -lean::dec(x_13); -lean::dec(x_3); -x_24 = !lean::is_exclusive(x_23); -if (x_24 == 0) -{ -obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_25 = lean::cnstr_get(x_23, 0); -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_25); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_27); -lean::cnstr_set(x_23, 0, x_28); -return x_23; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -x_29 = lean::cnstr_get(x_23, 0); -x_30 = lean::cnstr_get(x_23, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_23); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_29); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_30); -return x_34; -} -} -} -else -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; uint8 x_43; -x_35 = lean::cnstr_get(x_7, 0); -x_36 = lean::cnstr_get(x_7, 1); -x_37 = lean::cnstr_get(x_7, 2); -lean::inc(x_37); -lean::inc(x_36); -lean::inc(x_35); -lean::dec(x_7); -x_38 = lean::cnstr_get(x_36, 1); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_1, 1); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_2, 0); -x_41 = lean::string_length(x_40); -x_42 = lean::nat_add(x_39, x_41); -lean::dec(x_41); -lean::dec(x_39); -x_43 = lean::nat_dec_le(x_38, x_42); -lean::dec(x_42); -lean::dec(x_38); -if (x_43 == 0) -{ -obj* x_44; obj* x_45; obj* x_46; -lean::dec(x_3); -lean::dec(x_1); -x_44 = l_Lean_Parser_finishCommentBlock___closed__2; -x_45 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_45, 0, x_35); -lean::cnstr_set(x_45, 1, x_36); -lean::cnstr_set(x_45, 2, x_44); -x_46 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_45); -lean::cnstr_set(x_6, 0, x_46); -return x_6; -} -else -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_35); -lean::free_heap_obj(x_6); -x_47 = l___private_init_lean_parser_token_5__mkConsumeToken(x_2, x_1, x_3, x_36, x_9); -lean::dec(x_36); -lean::dec(x_3); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - x_50 = x_47; -} else { - lean::dec_ref(x_47); - x_50 = lean::box(0); -} -x_51 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_48); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_37, x_52); -if (lean::is_scalar(x_50)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_50; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_49); -return x_54; -} -} -} -else -{ -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; uint8 x_65; -x_55 = lean::cnstr_get(x_6, 1); -lean::inc(x_55); -lean::dec(x_6); -x_56 = lean::cnstr_get(x_7, 0); -lean::inc(x_56); -x_57 = lean::cnstr_get(x_7, 1); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_7, 2); -lean::inc(x_58); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_59 = x_7; -} else { - lean::dec_ref(x_7); - x_59 = lean::box(0); -} -x_60 = lean::cnstr_get(x_57, 1); -lean::inc(x_60); -x_61 = lean::cnstr_get(x_1, 1); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_2, 0); -x_63 = lean::string_length(x_62); -x_64 = lean::nat_add(x_61, x_63); -lean::dec(x_63); -lean::dec(x_61); -x_65 = lean::nat_dec_le(x_60, x_64); -lean::dec(x_64); -lean::dec(x_60); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; -lean::dec(x_3); -lean::dec(x_1); -x_66 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_59)) { - x_67 = lean::alloc_cnstr(0, 3, 0); -} else { - x_67 = x_59; -} -lean::cnstr_set(x_67, 0, x_56); -lean::cnstr_set(x_67, 1, x_57); -lean::cnstr_set(x_67, 2, x_66); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_67); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_55); -return x_69; -} -else -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; -lean::dec(x_59); -lean::dec(x_56); -x_70 = l___private_init_lean_parser_token_5__mkConsumeToken(x_2, x_1, x_3, x_57, x_55); -lean::dec(x_57); -lean::dec(x_3); -x_71 = lean::cnstr_get(x_70, 0); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_70, 1); -lean::inc(x_72); -if (lean::is_exclusive(x_70)) { - lean::cnstr_release(x_70, 0); - lean::cnstr_release(x_70, 1); - x_73 = x_70; -} else { - lean::dec_ref(x_70); - x_73 = lean::box(0); -} -x_74 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_74, x_71); -x_76 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_75); -if (lean::is_scalar(x_73)) { - x_77 = lean::alloc_cnstr(0, 2, 0); -} else { - x_77 = x_73; -} -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_72); -return x_77; -} -} -} -else -{ -uint8 x_78; -lean::dec(x_3); -lean::dec(x_1); -x_78 = !lean::is_exclusive(x_6); -if (x_78 == 0) -{ -obj* x_79; uint8 x_80; -x_79 = lean::cnstr_get(x_6, 0); -lean::dec(x_79); -x_80 = !lean::is_exclusive(x_7); -if (x_80 == 0) -{ -return x_6; -} -else -{ -obj* x_81; uint8 x_82; obj* x_83; -x_81 = lean::cnstr_get(x_7, 0); -x_82 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -lean::inc(x_81); -lean::dec(x_7); -x_83 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_83, 0, x_81); -lean::cnstr_set_scalar(x_83, sizeof(void*)*1, x_82); -lean::cnstr_set(x_6, 0, x_83); -return x_6; -} -} -else -{ -obj* x_84; obj* x_85; uint8 x_86; obj* x_87; obj* x_88; obj* x_89; -x_84 = lean::cnstr_get(x_6, 1); -lean::inc(x_84); -lean::dec(x_6); -x_85 = lean::cnstr_get(x_7, 0); -lean::inc(x_85); -x_86 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_exclusive(x_7)) { - lean::cnstr_release(x_7, 0); - x_87 = x_7; -} else { - lean::dec_ref(x_7); - x_87 = lean::box(0); -} -if (lean::is_scalar(x_87)) { - x_88 = lean::alloc_cnstr(1, 1, 1); -} else { - x_88 = x_87; -} -lean::cnstr_set(x_88, 0, x_85); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_86); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_84); -return x_89; -} -} -} -} -obj* l_Lean_Parser_tokenCont___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_tokenCont(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_2); -return x_6; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_token___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; obj* x_7; uint8 x_19; -x_19 = l_String_OldIterator_hasNext___main(x_4); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::box(0); -x_21 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -lean::inc(x_4); -x_22 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_21, x_1, x_20, x_20, x_3, x_4, x_5); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_24 = lean::cnstr_get(x_22, 1); -lean::inc(x_24); -lean::dec(x_22); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_2, x_23); -if (lean::obj_tag(x_25) == 0) -{ -x_6 = x_25; -x_7 = x_24; -goto block_18; -} -else -{ -uint8 x_26; -x_26 = lean::cnstr_get_scalar(x_25, sizeof(void*)*1); -if (x_26 == 0) -{ -obj* x_27; uint32 x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_27 = lean::cnstr_get(x_25, 0); -lean::inc(x_27); -lean::dec(x_25); -x_28 = l_Lean_idBeginEscape; -lean::inc(x_4); -x_29 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_28, x_3, x_4, x_24); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_31 = lean::cnstr_get(x_29, 1); -lean::inc(x_31); -lean::dec(x_29); -x_32 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_27, x_30); -x_6 = x_32; -x_7 = x_31; -goto block_18; -} -else -{ -x_6 = x_25; -x_7 = x_24; -goto block_18; -} -} -} -else -{ -uint32 x_33; uint8 x_34; -x_33 = l_String_OldIterator_curr___main(x_4); -x_34 = l_Lean_isIdFirst(x_33); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; -x_35 = l_Char_quoteCore(x_33); -x_36 = l_Char_HasRepr___closed__1; -x_37 = lean::string_append(x_36, x_35); -lean::dec(x_35); -x_38 = lean::string_append(x_37, x_36); -x_39 = lean::box(0); -lean::inc(x_4); -x_40 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_38, x_1, x_39, x_39, x_3, x_4, x_5); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -lean::dec(x_40); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_2, x_41); -if (lean::obj_tag(x_43) == 0) -{ -x_6 = x_43; -x_7 = x_42; -goto block_18; -} -else -{ -uint8 x_44; -x_44 = lean::cnstr_get_scalar(x_43, sizeof(void*)*1); -if (x_44 == 0) -{ -obj* x_45; uint32 x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_45 = lean::cnstr_get(x_43, 0); -lean::inc(x_45); -lean::dec(x_43); -x_46 = l_Lean_idBeginEscape; -lean::inc(x_4); -x_47 = l_Lean_Parser_MonadParsec_ch___at___private_init_lean_parser_token_4__ident_x27___spec__6(x_46, x_3, x_4, x_42); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_47, 1); -lean::inc(x_49); -lean::dec(x_47); -x_50 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_45, x_48); -x_6 = x_50; -x_7 = x_49; -goto block_18; -} -else -{ -x_6 = x_43; -x_7 = x_42; -goto block_18; -} -} -} -else -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_2); -lean::dec(x_1); -lean::inc(x_4); -x_51 = l_String_OldIterator_next___main(x_4); -x_52 = lean::box(0); -x_53 = lean::box_uint32(x_33); -x_54 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_51); -lean::cnstr_set(x_54, 2, x_52); -x_6 = x_54; -x_7 = x_5; -goto block_18; -} -} -block_18: -{ -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_6); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_6, 2); -lean::dec(x_9); -x_10 = lean::cnstr_get(x_6, 1); -lean::dec(x_10); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_11); -lean::cnstr_set(x_6, 1, x_4); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_6); -lean::cnstr_set(x_12, 1, x_7); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = lean::cnstr_get(x_6, 0); -lean::inc(x_13); -lean::dec(x_6); -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_4); -lean::cnstr_set(x_15, 2, x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_7); -return x_16; -} -} -else -{ -obj* x_17; -lean::dec(x_4); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_6); -lean::cnstr_set(x_17, 1, x_7); -return x_17; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_token___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = lean::apply_3(x_1, x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_6, 0); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_10); -x_13 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_13); -lean::cnstr_set(x_6, 0, x_12); -x_14 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -if (lean::obj_tag(x_14) == 0) -{ -lean::cnstr_set(x_5, 0, x_14); -return x_5; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_15); -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_16); -lean::cnstr_set(x_18, 2, x_13); -lean::cnstr_set(x_5, 0, x_18); -return x_5; -} -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_19 = lean::cnstr_get(x_6, 0); -x_20 = lean::cnstr_get(x_6, 1); -x_21 = lean::cnstr_get(x_6, 2); -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_6); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_19); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_20); -lean::cnstr_set(x_24, 2, x_23); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_24); -if (lean::obj_tag(x_25) == 0) -{ -lean::cnstr_set(x_5, 0, x_25); -return x_5; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::dec(x_25); -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_26); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -lean::cnstr_set(x_29, 2, x_23); -lean::cnstr_set(x_5, 0, x_29); -return x_5; -} -} -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_30 = lean::cnstr_get(x_5, 1); -lean::inc(x_30); -lean::dec(x_5); -x_31 = lean::cnstr_get(x_6, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_6, 1); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_6, 2); -lean::inc(x_33); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_34 = x_6; -} else { - lean::dec_ref(x_6); - x_34 = lean::box(0); -} -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_31); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_34)) { - x_37 = lean::alloc_cnstr(0, 3, 0); -} else { - x_37 = x_34; -} -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_32); -lean::cnstr_set(x_37, 2, x_36); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_30); -return x_39; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_40 = lean::cnstr_get(x_38, 0); -lean::inc(x_40); -lean::dec(x_38); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_42, 0, x_40); -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_41); -lean::cnstr_set(x_43, 2, x_36); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_30); -return x_44; -} -} -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_5); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_46 = lean::cnstr_get(x_5, 0); -lean::dec(x_46); -x_47 = lean::cnstr_get(x_6, 0); -lean::inc(x_47); -lean::dec(x_6); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_49, 0, x_47); -x_50 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_51 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set(x_51, 1, x_48); -lean::cnstr_set(x_51, 2, x_50); -lean::cnstr_set(x_5, 0, x_51); -return x_5; -} -else -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_52 = lean::cnstr_get(x_5, 1); -lean::inc(x_52); -lean::dec(x_5); -x_53 = lean::cnstr_get(x_6, 0); -lean::inc(x_53); -lean::dec(x_6); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_55, 0, x_53); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_57, 0, x_55); -lean::cnstr_set(x_57, 1, x_54); -lean::cnstr_set(x_57, 2, x_56); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_52); -return x_58; -} -} -} -} -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -x_5 = l_Lean_Parser_whitespace(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -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_10 = lean::cnstr_get(x_6, 1); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::cnstr_get(x_6, 0); -lean::dec(x_12); -lean::inc(x_10); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_3); -lean::cnstr_set(x_13, 1, x_10); -x_14 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_14); -lean::cnstr_set(x_6, 0, x_13); -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -x_16 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_15); -if (lean::obj_tag(x_17) == 0) -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_17); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = lean::cnstr_get(x_17, 0); -x_20 = lean::cnstr_get(x_17, 2); -x_21 = l___private_init_lean_parser_token_3__updateTrailing___main(x_19, x_1); -lean::cnstr_set(x_17, 2, x_16); -lean::cnstr_set(x_17, 0, x_21); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_20, x_17); -lean::cnstr_set(x_5, 0, x_22); -return x_5; -} -else -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_17, 0); -x_24 = lean::cnstr_get(x_17, 1); -x_25 = lean::cnstr_get(x_17, 2); -lean::inc(x_25); -lean::inc(x_24); -lean::inc(x_23); -lean::dec(x_17); -x_26 = l___private_init_lean_parser_token_3__updateTrailing___main(x_23, x_1); -x_27 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_24); -lean::cnstr_set(x_27, 2, x_16); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_27); -lean::cnstr_set(x_5, 0, x_28); -return x_5; -} -} -else -{ -uint8 x_29; -lean::dec(x_1); -x_29 = !lean::is_exclusive(x_17); -if (x_29 == 0) -{ -lean::cnstr_set(x_5, 0, x_17); -return x_5; -} -else -{ -obj* x_30; uint8 x_31; obj* x_32; -x_30 = lean::cnstr_get(x_17, 0); -x_31 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); -lean::inc(x_30); -lean::dec(x_17); -x_32 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_31); -lean::cnstr_set(x_5, 0, x_32); -return x_5; -} -} -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_33 = lean::cnstr_get(x_6, 1); -x_34 = lean::cnstr_get(x_6, 2); -lean::inc(x_34); -lean::inc(x_33); -lean::dec(x_6); -lean::inc(x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_3); -lean::cnstr_set(x_35, 1, x_33); -x_36 = l_Lean_Parser_finishCommentBlock___closed__2; -x_37 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_33); -lean::cnstr_set(x_37, 2, x_36); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_37); -x_39 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_38); -if (lean::obj_tag(x_40) == 0) -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_40, 2); -lean::inc(x_43); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - lean::cnstr_release(x_40, 2); - x_44 = x_40; -} else { - lean::dec_ref(x_40); - x_44 = lean::box(0); -} -x_45 = l___private_init_lean_parser_token_3__updateTrailing___main(x_41, x_1); -if (lean::is_scalar(x_44)) { - x_46 = lean::alloc_cnstr(0, 3, 0); -} else { - x_46 = x_44; -} -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_42); -lean::cnstr_set(x_46, 2, x_39); -x_47 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_46); -lean::cnstr_set(x_5, 0, x_47); -return x_5; -} -else -{ -obj* x_48; uint8 x_49; obj* x_50; obj* x_51; -lean::dec(x_1); -x_48 = lean::cnstr_get(x_40, 0); -lean::inc(x_48); -x_49 = lean::cnstr_get_scalar(x_40, sizeof(void*)*1); -if (lean::is_exclusive(x_40)) { - lean::cnstr_release(x_40, 0); - x_50 = x_40; -} else { - lean::dec_ref(x_40); - x_50 = lean::box(0); -} -if (lean::is_scalar(x_50)) { - x_51 = lean::alloc_cnstr(1, 1, 1); -} else { - x_51 = x_50; -} -lean::cnstr_set(x_51, 0, x_48); -lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_49); -lean::cnstr_set(x_5, 0, x_51); -return x_5; -} -} -} -else -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -x_52 = lean::cnstr_get(x_5, 1); -lean::inc(x_52); -lean::dec(x_5); -x_53 = lean::cnstr_get(x_6, 1); -lean::inc(x_53); -x_54 = lean::cnstr_get(x_6, 2); -lean::inc(x_54); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_55 = x_6; -} else { - lean::dec_ref(x_6); - x_55 = lean::box(0); -} -lean::inc(x_53); -x_56 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_56, 0, x_3); -lean::cnstr_set(x_56, 1, x_53); -x_57 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_55)) { - x_58 = lean::alloc_cnstr(0, 3, 0); -} else { - x_58 = x_55; -} -lean::cnstr_set(x_58, 0, x_56); -lean::cnstr_set(x_58, 1, x_53); -lean::cnstr_set(x_58, 2, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_54, x_58); -x_60 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_60, x_59); -if (lean::obj_tag(x_61) == 0) -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; -x_62 = lean::cnstr_get(x_61, 0); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_61, 1); -lean::inc(x_63); -x_64 = lean::cnstr_get(x_61, 2); -lean::inc(x_64); -if (lean::is_exclusive(x_61)) { - lean::cnstr_release(x_61, 0); - lean::cnstr_release(x_61, 1); - lean::cnstr_release(x_61, 2); - x_65 = x_61; -} else { - lean::dec_ref(x_61); - x_65 = lean::box(0); -} -x_66 = l___private_init_lean_parser_token_3__updateTrailing___main(x_62, x_1); -if (lean::is_scalar(x_65)) { - x_67 = lean::alloc_cnstr(0, 3, 0); -} else { - x_67 = x_65; -} -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_63); -lean::cnstr_set(x_67, 2, x_60); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_64, x_67); -x_69 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_69, 0, x_68); -lean::cnstr_set(x_69, 1, x_52); -return x_69; -} -else -{ -obj* x_70; uint8 x_71; obj* x_72; obj* x_73; obj* x_74; -lean::dec(x_1); -x_70 = lean::cnstr_get(x_61, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); -if (lean::is_exclusive(x_61)) { - lean::cnstr_release(x_61, 0); - x_72 = x_61; -} else { - lean::dec_ref(x_61); - x_72 = lean::box(0); -} -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_70); -lean::cnstr_set_scalar(x_73, sizeof(void*)*1, x_71); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_73); -lean::cnstr_set(x_74, 1, x_52); -return x_74; -} -} -} -else -{ -uint8 x_75; -lean::dec(x_3); -x_75 = !lean::is_exclusive(x_5); -if (x_75 == 0) -{ -obj* x_76; uint8 x_77; -x_76 = lean::cnstr_get(x_5, 0); -lean::dec(x_76); -x_77 = !lean::is_exclusive(x_6); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; -x_78 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_78, x_6); -if (lean::obj_tag(x_79) == 0) -{ -uint8 x_80; -x_80 = !lean::is_exclusive(x_79); -if (x_80 == 0) -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; -x_81 = lean::cnstr_get(x_79, 0); -x_82 = lean::cnstr_get(x_79, 2); -x_83 = l___private_init_lean_parser_token_3__updateTrailing___main(x_81, x_1); -lean::cnstr_set(x_79, 2, x_78); -lean::cnstr_set(x_79, 0, x_83); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_82, x_79); -lean::cnstr_set(x_5, 0, x_84); -return x_5; -} -else -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; -x_85 = lean::cnstr_get(x_79, 0); -x_86 = lean::cnstr_get(x_79, 1); -x_87 = lean::cnstr_get(x_79, 2); -lean::inc(x_87); -lean::inc(x_86); -lean::inc(x_85); -lean::dec(x_79); -x_88 = l___private_init_lean_parser_token_3__updateTrailing___main(x_85, x_1); -x_89 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_86); -lean::cnstr_set(x_89, 2, x_78); -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_89); -lean::cnstr_set(x_5, 0, x_90); -return x_5; -} -} -else -{ -uint8 x_91; -lean::dec(x_1); -x_91 = !lean::is_exclusive(x_79); -if (x_91 == 0) -{ -lean::cnstr_set(x_5, 0, x_79); -return x_5; -} -else -{ -obj* x_92; uint8 x_93; obj* x_94; -x_92 = lean::cnstr_get(x_79, 0); -x_93 = lean::cnstr_get_scalar(x_79, sizeof(void*)*1); -lean::inc(x_92); -lean::dec(x_79); -x_94 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_93); -lean::cnstr_set(x_5, 0, x_94); -return x_5; -} -} -} -else -{ -obj* x_95; uint8 x_96; obj* x_97; obj* x_98; obj* x_99; -x_95 = lean::cnstr_get(x_6, 0); -x_96 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_95); -lean::dec(x_6); -x_97 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_97, 0, x_95); -lean::cnstr_set_scalar(x_97, sizeof(void*)*1, x_96); -x_98 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_97); -if (lean::obj_tag(x_99) == 0) -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_100 = lean::cnstr_get(x_99, 0); -lean::inc(x_100); -x_101 = lean::cnstr_get(x_99, 1); -lean::inc(x_101); -x_102 = lean::cnstr_get(x_99, 2); -lean::inc(x_102); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - lean::cnstr_release(x_99, 1); - lean::cnstr_release(x_99, 2); - x_103 = x_99; -} else { - lean::dec_ref(x_99); - x_103 = lean::box(0); -} -x_104 = l___private_init_lean_parser_token_3__updateTrailing___main(x_100, x_1); -if (lean::is_scalar(x_103)) { - x_105 = lean::alloc_cnstr(0, 3, 0); -} else { - x_105 = x_103; -} -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_101); -lean::cnstr_set(x_105, 2, x_98); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_102, x_105); -lean::cnstr_set(x_5, 0, x_106); -return x_5; -} -else -{ -obj* x_107; uint8 x_108; obj* x_109; obj* x_110; -lean::dec(x_1); -x_107 = lean::cnstr_get(x_99, 0); -lean::inc(x_107); -x_108 = lean::cnstr_get_scalar(x_99, sizeof(void*)*1); -if (lean::is_exclusive(x_99)) { - lean::cnstr_release(x_99, 0); - x_109 = x_99; -} else { - lean::dec_ref(x_99); - x_109 = lean::box(0); -} -if (lean::is_scalar(x_109)) { - x_110 = lean::alloc_cnstr(1, 1, 1); -} else { - x_110 = x_109; -} -lean::cnstr_set(x_110, 0, x_107); -lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_108); -lean::cnstr_set(x_5, 0, x_110); -return x_5; -} -} -} -else -{ -obj* x_111; obj* x_112; uint8 x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; -x_111 = lean::cnstr_get(x_5, 1); -lean::inc(x_111); -lean::dec(x_5); -x_112 = lean::cnstr_get(x_6, 0); -lean::inc(x_112); -x_113 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_114 = x_6; -} else { - lean::dec_ref(x_6); - x_114 = lean::box(0); -} -if (lean::is_scalar(x_114)) { - x_115 = lean::alloc_cnstr(1, 1, 1); -} else { - x_115 = x_114; -} -lean::cnstr_set(x_115, 0, x_112); -lean::cnstr_set_scalar(x_115, sizeof(void*)*1, x_113); -x_116 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_117 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_116, x_115); -if (lean::obj_tag(x_117) == 0) -{ -obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; -x_118 = lean::cnstr_get(x_117, 0); -lean::inc(x_118); -x_119 = lean::cnstr_get(x_117, 1); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_117, 2); -lean::inc(x_120); -if (lean::is_exclusive(x_117)) { - lean::cnstr_release(x_117, 0); - lean::cnstr_release(x_117, 1); - lean::cnstr_release(x_117, 2); - x_121 = x_117; -} else { - lean::dec_ref(x_117); - x_121 = lean::box(0); -} -x_122 = l___private_init_lean_parser_token_3__updateTrailing___main(x_118, x_1); -if (lean::is_scalar(x_121)) { - x_123 = lean::alloc_cnstr(0, 3, 0); -} else { - x_123 = x_121; -} -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_119); -lean::cnstr_set(x_123, 2, x_116); -x_124 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_120, x_123); -x_125 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_125, 0, x_124); -lean::cnstr_set(x_125, 1, x_111); -return x_125; -} -else -{ -obj* x_126; uint8 x_127; obj* x_128; obj* x_129; obj* x_130; -lean::dec(x_1); -x_126 = lean::cnstr_get(x_117, 0); -lean::inc(x_126); -x_127 = lean::cnstr_get_scalar(x_117, sizeof(void*)*1); -if (lean::is_exclusive(x_117)) { - lean::cnstr_release(x_117, 0); - x_128 = x_117; -} else { - lean::dec_ref(x_117); - x_128 = lean::box(0); -} -if (lean::is_scalar(x_128)) { - x_129 = lean::alloc_cnstr(1, 1, 1); -} else { - x_129 = x_128; -} -lean::cnstr_set(x_129, 0, x_126); -lean::cnstr_set_scalar(x_129, sizeof(void*)*1, x_127); -x_130 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_111); -return x_130; -} -} -} -} -} -obj* l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; obj* x_8; obj* x_9; -x_3 = lean::box(0); -x_4 = l_Lean_Parser_ParsecT_failure___rarg___closed__1; -x_5 = l_mjoin___rarg___closed__1; -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_4); -lean::cnstr_set(x_6, 2, x_5); -lean::cnstr_set(x_6, 3, x_3); -x_7 = 0; -x_8 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set_scalar(x_8, sizeof(void*)*1, x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_2); -return x_9; -} -} -obj* l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg), 2, 0); -return x_3; -} -} -obj* _init_l_Lean_Parser_token___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l_id___rarg___boxed), 1, 0); -lean::inc(x_1); -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_token___spec__1___boxed), 5, 2); -lean::closure_set(x_3, 0, x_1); -lean::closure_set(x_3, 1, x_2); -return x_3; -} -} -obj* _init_l_Lean_Parser_token___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::mk_string("token: not implemented"); -return x_1; -} -} -obj* l_Lean_Parser_token(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_155; -x_155 = lean::cnstr_get(x_3, 0); -lean::inc(x_155); -if (lean::obj_tag(x_155) == 0) -{ -obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; -lean::inc(x_3); -lean::inc(x_2); -x_156 = l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(x_2, x_3); -x_157 = lean::cnstr_get(x_156, 0); -lean::inc(x_157); -x_158 = lean::cnstr_get(x_156, 1); -lean::inc(x_158); -lean::dec(x_156); -x_159 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_160 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_159, x_157); -x_4 = x_160; -x_5 = x_158; -goto block_154; -} -else -{ -obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; uint8 x_169; -x_161 = lean::cnstr_get(x_155, 0); -lean::inc(x_161); -x_162 = lean::cnstr_get(x_3, 1); -lean::inc(x_162); -x_163 = lean::cnstr_get(x_3, 2); -lean::inc(x_163); -x_164 = lean::cnstr_get(x_2, 1); -lean::inc(x_164); -x_165 = lean::cnstr_get(x_161, 0); -lean::inc(x_165); -x_166 = lean::cnstr_get(x_161, 1); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_161, 2); -lean::inc(x_167); -lean::dec(x_161); -x_168 = lean::cnstr_get(x_165, 1); -lean::inc(x_168); -lean::dec(x_165); -x_169 = lean::nat_dec_eq(x_164, x_168); -lean::dec(x_168); -lean::dec(x_164); -if (x_169 == 0) -{ -obj* x_170; obj* x_171; -lean::inc(x_3); -lean::inc(x_2); -x_170 = l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(x_2, x_3); -x_171 = lean::cnstr_get(x_170, 0); -lean::inc(x_171); -if (lean::obj_tag(x_171) == 0) -{ -uint8 x_172; -lean::dec(x_170); -x_172 = !lean::is_exclusive(x_171); -if (x_172 == 0) -{ -obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; -x_173 = lean::cnstr_get(x_171, 2); -x_174 = lean::cnstr_get(x_171, 1); -lean::dec(x_174); -x_175 = lean::cnstr_get(x_171, 0); -lean::dec(x_175); -x_176 = lean::box(0); -x_177 = lean::mk_nat_obj(1u); -x_178 = lean::nat_add(x_162, x_177); -lean::dec(x_162); -x_179 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_179, 0, x_155); -lean::cnstr_set(x_179, 1, x_178); -lean::cnstr_set(x_179, 2, x_163); -lean::cnstr_set(x_171, 2, x_176); -lean::cnstr_set(x_171, 1, x_166); -lean::cnstr_set(x_171, 0, x_167); -x_180 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_173, x_171); -x_181 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_182 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_181, x_180); -x_4 = x_182; -x_5 = x_179; -goto block_154; -} -else -{ -obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; -x_183 = lean::cnstr_get(x_171, 2); -lean::inc(x_183); -lean::dec(x_171); -x_184 = lean::box(0); -x_185 = lean::mk_nat_obj(1u); -x_186 = lean::nat_add(x_162, x_185); -lean::dec(x_162); -x_187 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_187, 0, x_155); -lean::cnstr_set(x_187, 1, x_186); -lean::cnstr_set(x_187, 2, x_163); -x_188 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_188, 0, x_167); -lean::cnstr_set(x_188, 1, x_166); -lean::cnstr_set(x_188, 2, x_184); -x_189 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_183, x_188); -x_190 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_191 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_190, x_189); -x_4 = x_191; -x_5 = x_187; -goto block_154; -} -} -else -{ -obj* x_192; uint8 x_193; -lean::dec(x_167); -lean::dec(x_166); -lean::dec(x_163); -lean::dec(x_162); -lean::dec(x_155); -x_192 = lean::cnstr_get(x_170, 1); -lean::inc(x_192); -lean::dec(x_170); -x_193 = !lean::is_exclusive(x_171); -if (x_193 == 0) -{ -obj* x_194; obj* x_195; -x_194 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_195 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_194, x_171); -x_4 = x_195; -x_5 = x_192; -goto block_154; -} -else -{ -obj* x_196; uint8 x_197; obj* x_198; obj* x_199; obj* x_200; -x_196 = lean::cnstr_get(x_171, 0); -x_197 = lean::cnstr_get_scalar(x_171, sizeof(void*)*1); -lean::inc(x_196); -lean::dec(x_171); -x_198 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_198, 0, x_196); -lean::cnstr_set_scalar(x_198, sizeof(void*)*1, x_197); -x_199 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_200 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_199, x_198); -x_4 = x_200; -x_5 = x_192; -goto block_154; -} -} -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; -x_201 = lean::box(0); -x_202 = lean::mk_nat_obj(1u); -x_203 = lean::nat_add(x_162, x_202); -lean::dec(x_162); -x_204 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_204, 0, x_155); -lean::cnstr_set(x_204, 1, x_203); -lean::cnstr_set(x_204, 2, x_163); -x_205 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_205, 0, x_167); -lean::cnstr_set(x_205, 1, x_166); -lean::cnstr_set(x_205, 2, x_201); -x_4 = x_205; -x_5 = x_204; -goto block_154; -} -} -block_154: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_6 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_7 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_4); -x_8 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_5); -return x_9; -} -else -{ -obj* x_10; uint8 x_11; obj* x_12; obj* x_13; obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_10 = lean::cnstr_get(x_4, 0); -lean::inc(x_10); -x_11 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -lean::dec(x_4); -x_38 = lean::cnstr_get(x_10, 0); -lean::inc(x_38); -lean::dec(x_10); -x_39 = l_Lean_Parser_token___closed__1; -lean::inc(x_1); -x_40 = l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_token___spec__2(x_39, x_1, x_38, x_5); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_42 = lean::cnstr_get(x_40, 1); -lean::inc(x_42); -lean::dec(x_40); -x_43 = lean::cnstr_get(x_41, 0); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_41, 1); -lean::inc(x_44); -x_45 = lean::cnstr_get(x_41, 2); -lean::inc(x_45); -lean::dec(x_41); -lean::inc(x_1); -x_46 = l_Lean_Parser_matchToken(x_1, x_44, x_42); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -lean::dec(x_46); -x_49 = lean::cnstr_get(x_47, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_47, 1); -lean::inc(x_50); -x_51 = lean::cnstr_get(x_47, 2); -lean::inc(x_51); -lean::dec(x_47); -if (lean::obj_tag(x_49) == 0) -{ -if (lean::obj_tag(x_43) == 0) -{ -obj* x_122; obj* x_123; obj* x_124; -lean::dec(x_43); -lean::inc(x_1); -x_122 = l_Lean_Parser_numberOrStringLit(x_1, x_50, x_48); -x_123 = lean::cnstr_get(x_122, 0); -lean::inc(x_123); -x_124 = lean::cnstr_get(x_122, 1); -lean::inc(x_124); -lean::dec(x_122); -x_52 = x_123; -x_53 = x_124; -goto block_121; -} -else -{ -obj* x_125; obj* x_126; obj* x_127; -lean::dec(x_43); -lean::inc(x_1); -x_125 = l___private_init_lean_parser_token_4__ident_x27(x_1, x_50, x_48); -x_126 = lean::cnstr_get(x_125, 0); -lean::inc(x_126); -x_127 = lean::cnstr_get(x_125, 1); -lean::inc(x_127); -lean::dec(x_125); -x_52 = x_126; -x_53 = x_127; -goto block_121; -} -} -else -{ -obj* x_128; obj* x_129; -x_128 = lean::cnstr_get(x_49, 0); -lean::inc(x_128); -lean::dec(x_49); -x_129 = lean::cnstr_get(x_128, 2); -lean::inc(x_129); -if (lean::obj_tag(x_129) == 0) -{ -if (lean::obj_tag(x_43) == 0) -{ -obj* x_130; obj* x_131; obj* x_132; -lean::dec(x_43); -lean::inc(x_2); -x_130 = l___private_init_lean_parser_token_5__mkConsumeToken(x_128, x_2, x_1, x_50, x_48); -lean::dec(x_50); -lean::dec(x_128); -x_131 = lean::cnstr_get(x_130, 0); -lean::inc(x_131); -x_132 = lean::cnstr_get(x_130, 1); -lean::inc(x_132); -lean::dec(x_130); -x_52 = x_131; -x_53 = x_132; -goto block_121; -} -else -{ -obj* x_133; obj* x_134; obj* x_135; -lean::dec(x_43); -lean::inc(x_1); -lean::inc(x_2); -x_133 = l_Lean_Parser_tokenCont(x_2, x_128, x_1, x_50, x_48); -lean::dec(x_128); -x_134 = lean::cnstr_get(x_133, 0); -lean::inc(x_134); -x_135 = lean::cnstr_get(x_133, 1); -lean::inc(x_135); -lean::dec(x_133); -x_52 = x_134; -x_53 = x_135; -goto block_121; -} -} -else -{ -obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -lean::dec(x_129); -lean::dec(x_128); -lean::dec(x_43); -x_136 = lean::box(0); -x_137 = l_Lean_Parser_token___closed__2; -x_138 = l_mjoin___rarg___closed__1; -x_139 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_137, x_138, x_136, x_136, x_1, x_50, x_48); -x_140 = lean::cnstr_get(x_139, 0); -lean::inc(x_140); -x_141 = lean::cnstr_get(x_139, 1); -lean::inc(x_141); -lean::dec(x_139); -x_52 = x_140; -x_53 = x_141; -goto block_121; -} -} -block_121: -{ -if (lean::obj_tag(x_52) == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_54 = lean::cnstr_get(x_52, 0); -lean::inc(x_54); -x_55 = lean::cnstr_get(x_52, 1); -lean::inc(x_55); -x_56 = lean::cnstr_get(x_52, 2); -lean::inc(x_56); -lean::dec(x_52); -x_57 = l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3(x_54, x_1, x_55, x_53); -lean::dec(x_1); -x_58 = lean::cnstr_get(x_57, 0); -lean::inc(x_58); -if (lean::obj_tag(x_58) == 0) -{ -uint8 x_59; -lean::dec(x_57); -x_59 = !lean::is_exclusive(x_58); -if (x_59 == 0) -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; -x_60 = lean::cnstr_get(x_58, 0); -x_61 = lean::cnstr_get(x_58, 1); -x_62 = lean::cnstr_get(x_58, 2); -lean::inc(x_60); -lean::inc(x_61); -x_63 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_63, 0, x_2); -lean::cnstr_set(x_63, 1, x_61); -lean::cnstr_set(x_63, 2, x_60); -x_64 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_64, 0, x_63); -x_65 = !lean::is_exclusive(x_3); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; -x_66 = lean::cnstr_get(x_3, 2); -x_67 = lean::cnstr_get(x_3, 0); -lean::dec(x_67); -x_68 = lean::mk_nat_obj(1u); -x_69 = lean::nat_add(x_66, x_68); -lean::dec(x_66); -lean::cnstr_set(x_3, 2, x_69); -lean::cnstr_set(x_3, 0, x_64); -x_70 = l_Lean_Parser_matchToken___closed__1; -lean::cnstr_set(x_58, 2, x_70); -x_71 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_58); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_71); -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_72); -x_74 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_73); -x_12 = x_74; -x_13 = x_3; -goto block_37; -} -else -{ -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_75 = lean::cnstr_get(x_3, 1); -x_76 = lean::cnstr_get(x_3, 2); -lean::inc(x_76); -lean::inc(x_75); -lean::dec(x_3); -x_77 = lean::mk_nat_obj(1u); -x_78 = lean::nat_add(x_76, x_77); -lean::dec(x_76); -x_79 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_79, 0, x_64); -lean::cnstr_set(x_79, 1, x_75); -lean::cnstr_set(x_79, 2, x_78); -x_80 = l_Lean_Parser_matchToken___closed__1; -lean::cnstr_set(x_58, 2, x_80); -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_58); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_82); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_83); -x_12 = x_84; -x_13 = x_79; -goto block_37; -} -} -else -{ -obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; -x_85 = lean::cnstr_get(x_58, 0); -x_86 = lean::cnstr_get(x_58, 1); -x_87 = lean::cnstr_get(x_58, 2); -lean::inc(x_87); -lean::inc(x_86); -lean::inc(x_85); -lean::dec(x_58); -lean::inc(x_85); -lean::inc(x_86); -x_88 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_88, 0, x_2); -lean::cnstr_set(x_88, 1, x_86); -lean::cnstr_set(x_88, 2, x_85); -x_89 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -x_90 = lean::cnstr_get(x_3, 1); -lean::inc(x_90); -x_91 = lean::cnstr_get(x_3, 2); -lean::inc(x_91); -if (lean::is_exclusive(x_3)) { - lean::cnstr_release(x_3, 0); - lean::cnstr_release(x_3, 1); - lean::cnstr_release(x_3, 2); - x_92 = x_3; -} else { - lean::dec_ref(x_3); - x_92 = lean::box(0); -} -x_93 = lean::mk_nat_obj(1u); -x_94 = lean::nat_add(x_91, x_93); -lean::dec(x_91); -if (lean::is_scalar(x_92)) { - x_95 = lean::alloc_cnstr(0, 3, 0); -} else { - x_95 = x_92; -} -lean::cnstr_set(x_95, 0, x_89); -lean::cnstr_set(x_95, 1, x_90); -lean::cnstr_set(x_95, 2, x_94); -x_96 = l_Lean_Parser_matchToken___closed__1; -x_97 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_97, 0, x_85); -lean::cnstr_set(x_97, 1, x_86); -lean::cnstr_set(x_97, 2, x_96); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_87, x_97); -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_98); -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_99); -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_100); -x_12 = x_101; -x_13 = x_95; -goto block_37; -} -} -else -{ -obj* x_102; uint8 x_103; -lean::dec(x_3); -lean::dec(x_2); -x_102 = lean::cnstr_get(x_57, 1); -lean::inc(x_102); -lean::dec(x_57); -x_103 = !lean::is_exclusive(x_58); -if (x_103 == 0) -{ -obj* x_104; obj* x_105; obj* x_106; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_58); -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_104); -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_105); -x_12 = x_106; -x_13 = x_102; -goto block_37; -} -else -{ -obj* x_107; uint8 x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_107 = lean::cnstr_get(x_58, 0); -x_108 = lean::cnstr_get_scalar(x_58, sizeof(void*)*1); -lean::inc(x_107); -lean::dec(x_58); -x_109 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_109, 0, x_107); -lean::cnstr_set_scalar(x_109, sizeof(void*)*1, x_108); -x_110 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_109); -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_110); -x_112 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_111); -x_12 = x_112; -x_13 = x_102; -goto block_37; -} -} -} -else -{ -uint8 x_113; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_113 = !lean::is_exclusive(x_52); -if (x_113 == 0) -{ -obj* x_114; obj* x_115; -x_114 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_52); -x_115 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_114); -x_12 = x_115; -x_13 = x_53; -goto block_37; -} -else -{ -obj* x_116; uint8 x_117; obj* x_118; obj* x_119; obj* x_120; -x_116 = lean::cnstr_get(x_52, 0); -x_117 = lean::cnstr_get_scalar(x_52, sizeof(void*)*1); -lean::inc(x_116); -lean::dec(x_52); -x_118 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_118, 0, x_116); -lean::cnstr_set_scalar(x_118, sizeof(void*)*1, x_117); -x_119 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_118); -x_120 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_119); -x_12 = x_120; -x_13 = x_53; -goto block_37; -} -} -} -} -else -{ -obj* x_142; uint8 x_143; -lean::dec(x_43); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_142 = lean::cnstr_get(x_46, 1); -lean::inc(x_142); -lean::dec(x_46); -x_143 = !lean::is_exclusive(x_47); -if (x_143 == 0) -{ -obj* x_144; -x_144 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_47); -x_12 = x_144; -x_13 = x_142; -goto block_37; -} -else -{ -obj* x_145; uint8 x_146; obj* x_147; obj* x_148; -x_145 = lean::cnstr_get(x_47, 0); -x_146 = lean::cnstr_get_scalar(x_47, sizeof(void*)*1); -lean::inc(x_145); -lean::dec(x_47); -x_147 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_147, 0, x_145); -lean::cnstr_set_scalar(x_147, sizeof(void*)*1, x_146); -x_148 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_147); -x_12 = x_148; -x_13 = x_142; -goto block_37; -} -} -} -else -{ -obj* x_149; uint8 x_150; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_149 = lean::cnstr_get(x_40, 1); -lean::inc(x_149); -lean::dec(x_40); -x_150 = !lean::is_exclusive(x_41); -if (x_150 == 0) -{ -x_12 = x_41; -x_13 = x_149; -goto block_37; -} -else -{ -obj* x_151; uint8 x_152; obj* x_153; -x_151 = lean::cnstr_get(x_41, 0); -x_152 = lean::cnstr_get_scalar(x_41, sizeof(void*)*1); -lean::inc(x_151); -lean::dec(x_41); -x_153 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_153, 0, x_151); -lean::cnstr_set_scalar(x_153, sizeof(void*)*1, x_152); -x_12 = x_153; -x_13 = x_149; -goto block_37; -} -} -block_37: -{ -if (lean::obj_tag(x_12) == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_15 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_12); -x_16 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_14, x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_13); -return x_17; -} -else -{ -if (x_11 == 0) -{ -uint8 x_18; -x_18 = !lean::is_exclusive(x_12); -if (x_18 == 0) -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_12); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_13); -return x_22; -} -else -{ -obj* x_23; uint8 x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_23 = lean::cnstr_get(x_12, 0); -x_24 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -lean::inc(x_23); -lean::dec(x_12); -x_25 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set_scalar(x_25, sizeof(void*)*1, x_24); -x_26 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_27 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_25); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_26, x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_13); -return x_29; -} -} -else -{ -uint8 x_30; -x_30 = !lean::is_exclusive(x_12); -if (x_30 == 0) -{ -uint8 x_31; obj* x_32; -x_31 = 1; -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_31); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_12); -lean::cnstr_set(x_32, 1, x_13); -return x_32; -} -else -{ -obj* x_33; uint8 x_34; obj* x_35; obj* x_36; -x_33 = lean::cnstr_get(x_12, 0); -lean::inc(x_33); -lean::dec(x_12); -x_34 = 1; -x_35 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set_scalar(x_35, sizeof(void*)*1, x_34); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_13); -return x_36; -} -} -} -} -} -} -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_token___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_token___spec__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3(x_1, x_2, x_3, x_4); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_peekToken___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -x_4 = l_Lean_Parser_token(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; uint8 x_8; -x_7 = lean::cnstr_get(x_4, 0); -lean::dec(x_7); -x_8 = !lean::is_exclusive(x_5); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_5, 2); -lean::dec(x_9); -x_10 = lean::cnstr_get(x_5, 1); -lean::dec(x_10); -x_11 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_5, 2, x_11); -lean::cnstr_set(x_5, 1, x_2); -return x_4; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::cnstr_get(x_5, 0); -lean::inc(x_12); -lean::dec(x_5); -x_13 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_14 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_2); -lean::cnstr_set(x_14, 2, x_13); -lean::cnstr_set(x_4, 0, x_14); -return x_4; -} -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = lean::cnstr_get(x_4, 1); -lean::inc(x_15); -lean::dec(x_4); -x_16 = lean::cnstr_get(x_5, 0); -lean::inc(x_16); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_17 = x_5; -} else { - lean::dec_ref(x_5); - x_17 = lean::box(0); -} -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_17)) { - x_19 = lean::alloc_cnstr(0, 3, 0); -} else { - x_19 = x_17; -} -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_2); -lean::cnstr_set(x_19, 2, x_18); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_15); -return x_20; -} -} -else -{ -uint8 x_21; -lean::dec(x_2); -x_21 = !lean::is_exclusive(x_4); -if (x_21 == 0) -{ -obj* x_22; -x_22 = lean::cnstr_get(x_4, 0); -lean::dec(x_22); -return x_4; -} -else -{ -obj* x_23; obj* x_24; -x_23 = lean::cnstr_get(x_4, 1); -lean::inc(x_23); -lean::dec(x_4); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_5); -lean::cnstr_set(x_24, 1, x_23); -return x_24; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -x_5 = lean::apply_3(x_1, x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; uint8 x_9; -x_8 = lean::cnstr_get(x_5, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_6); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_10 = lean::cnstr_get(x_6, 0); -x_11 = lean::cnstr_get(x_6, 2); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_10); -x_13 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_13); -lean::cnstr_set(x_6, 0, x_12); -x_14 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_6); -if (lean::obj_tag(x_14) == 0) -{ -lean::cnstr_set(x_5, 0, x_14); -return x_5; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -lean::dec(x_14); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_17 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_17, 0, x_15); -x_18 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_16); -lean::cnstr_set(x_18, 2, x_13); -lean::cnstr_set(x_5, 0, x_18); -return x_5; -} -} -else -{ -obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_19 = lean::cnstr_get(x_6, 0); -x_20 = lean::cnstr_get(x_6, 1); -x_21 = lean::cnstr_get(x_6, 2); -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::dec(x_6); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_19); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_20); -lean::cnstr_set(x_24, 2, x_23); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_21, x_24); -if (lean::obj_tag(x_25) == 0) -{ -lean::cnstr_set(x_5, 0, x_25); -return x_5; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -lean::dec(x_25); -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_28 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_28, 0, x_26); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -lean::cnstr_set(x_29, 2, x_23); -lean::cnstr_set(x_5, 0, x_29); -return x_5; -} -} -} -else -{ -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_30 = lean::cnstr_get(x_5, 1); -lean::inc(x_30); -lean::dec(x_5); -x_31 = lean::cnstr_get(x_6, 0); -lean::inc(x_31); -x_32 = lean::cnstr_get(x_6, 1); -lean::inc(x_32); -x_33 = lean::cnstr_get(x_6, 2); -lean::inc(x_33); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_34 = x_6; -} else { - lean::dec_ref(x_6); - x_34 = lean::box(0); -} -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_31); -x_36 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_34)) { - x_37 = lean::alloc_cnstr(0, 3, 0); -} else { - x_37 = x_34; -} -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_32); -lean::cnstr_set(x_37, 2, x_36); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_37); -if (lean::obj_tag(x_38) == 0) -{ -obj* x_39; -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_30); -return x_39; -} -else -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_40 = lean::cnstr_get(x_38, 0); -lean::inc(x_40); -lean::dec(x_38); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_42 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_42, 0, x_40); -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_41); -lean::cnstr_set(x_43, 2, x_36); -x_44 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_30); -return x_44; -} -} -} -else -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_5); -if (x_45 == 0) -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_46 = lean::cnstr_get(x_5, 0); -lean::dec(x_46); -x_47 = lean::cnstr_get(x_6, 0); -lean::inc(x_47); -lean::dec(x_6); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_49 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_49, 0, x_47); -x_50 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_51 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set(x_51, 1, x_48); -lean::cnstr_set(x_51, 2, x_50); -lean::cnstr_set(x_5, 0, x_51); -return x_5; -} -else -{ -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; -x_52 = lean::cnstr_get(x_5, 1); -lean::inc(x_52); -lean::dec(x_5); -x_53 = lean::cnstr_get(x_6, 0); -lean::inc(x_53); -lean::dec(x_6); -x_54 = lean::cnstr_get(x_53, 0); -lean::inc(x_54); -x_55 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_55, 0, x_53); -x_56 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_57 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_57, 0, x_55); -lean::cnstr_set(x_57, 1, x_54); -lean::cnstr_set(x_57, 2, x_56); -x_58 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_52); -return x_58; -} -} -} -} -obj* l_Lean_Parser_peekToken___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = l_Lean_Parser_ParsecT_lookahead___at_Lean_Parser_peekToken___spec__1(x_1, x_2, x_3); -x_5 = !lean::is_exclusive(x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; -x_6 = lean::cnstr_get(x_4, 0); -x_7 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_6); -lean::cnstr_set(x_4, 0, x_7); -return x_4; -} -else -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_8 = lean::cnstr_get(x_4, 0); -x_9 = lean::cnstr_get(x_4, 1); -lean::inc(x_9); -lean::inc(x_8); -lean::dec(x_4); -x_10 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_8); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_9); -return x_11; -} -} -} -obj* _init_l_Lean_Parser_peekToken___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_peekToken___lambda__1), 3, 0); -return x_1; -} -} -obj* l_Lean_Parser_peekToken(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = l_Lean_Parser_peekToken___closed__1; -x_5 = l_Lean_Parser_MonadParsec_observing___at_Lean_Parser_peekToken___spec__2(x_4, x_1, x_2, x_3); -return x_5; -} -} -obj* l_Lean_Parser_symbolCore___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; -lean::inc(x_5); -lean::inc(x_4); -x_7 = l_Lean_Parser_token(x_4, x_5, x_6); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_7); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; uint8 x_12; -x_10 = lean::cnstr_get(x_7, 1); -x_11 = lean::cnstr_get(x_7, 0); -lean::dec(x_11); -x_12 = !lean::is_exclusive(x_8); -if (x_12 == 0) -{ -obj* x_13; obj* x_14; obj* x_15; obj* x_16; -x_13 = lean::cnstr_get(x_8, 0); -x_14 = lean::cnstr_get(x_8, 1); -x_15 = lean::cnstr_get(x_8, 2); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_37; obj* x_38; uint8 x_39; -x_37 = lean::cnstr_get(x_13, 0); -lean::inc(x_37); -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -lean::dec(x_37); -x_39 = lean::string_dec_eq(x_3, x_38); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; obj* x_42; obj* x_43; -lean::free_heap_obj(x_8); -lean::free_heap_obj(x_7); -x_40 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_40, 0, x_5); -x_41 = lean::box(0); -x_42 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_38, x_1, x_40, x_41, x_4, x_14, x_10); -lean::dec(x_4); -lean::dec(x_40); -x_43 = lean::cnstr_get(x_42, 0); -lean::inc(x_43); -if (lean::obj_tag(x_43) == 0) -{ -uint8 x_44; -x_44 = !lean::is_exclusive(x_42); -if (x_44 == 0) -{ -obj* x_45; uint8 x_46; -x_45 = lean::cnstr_get(x_42, 0); -lean::dec(x_45); -x_46 = !lean::is_exclusive(x_43); -if (x_46 == 0) -{ -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -x_47 = lean::cnstr_get(x_43, 2); -x_48 = lean::cnstr_get(x_43, 0); -lean::dec(x_48); -x_49 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_43, 2, x_49); -lean::cnstr_set(x_43, 0, x_13); -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_47, x_43); -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_50); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_49, x_51); -x_53 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_52, x_2); -x_54 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_53); -lean::cnstr_set(x_42, 0, x_54); -return x_42; -} -else -{ -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; -x_55 = lean::cnstr_get(x_43, 1); -x_56 = lean::cnstr_get(x_43, 2); -lean::inc(x_56); -lean::inc(x_55); -lean::dec(x_43); -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_58, 0, x_13); -lean::cnstr_set(x_58, 1, x_55); -lean::cnstr_set(x_58, 2, x_57); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_56, x_58); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_60); -x_62 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_61, x_2); -x_63 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_62); -lean::cnstr_set(x_42, 0, x_63); -return x_42; -} -} -else -{ -obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_64 = lean::cnstr_get(x_42, 1); -lean::inc(x_64); -lean::dec(x_42); -x_65 = lean::cnstr_get(x_43, 1); -lean::inc(x_65); -x_66 = lean::cnstr_get(x_43, 2); -lean::inc(x_66); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - lean::cnstr_release(x_43, 1); - lean::cnstr_release(x_43, 2); - x_67 = x_43; -} else { - lean::dec_ref(x_43); - x_67 = lean::box(0); -} -x_68 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_67)) { - x_69 = lean::alloc_cnstr(0, 3, 0); -} else { - x_69 = x_67; -} -lean::cnstr_set(x_69, 0, x_13); -lean::cnstr_set(x_69, 1, x_65); -lean::cnstr_set(x_69, 2, x_68); -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_66, x_69); -x_71 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_70); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_68, x_71); -x_73 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_72, x_2); -x_74 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_73); -x_75 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_64); -return x_75; -} -} -else -{ -uint8 x_76; -lean::dec(x_13); -x_76 = !lean::is_exclusive(x_42); -if (x_76 == 0) -{ -obj* x_77; uint8 x_78; -x_77 = lean::cnstr_get(x_42, 0); -lean::dec(x_77); -x_78 = !lean::is_exclusive(x_43); -if (x_78 == 0) -{ -obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_43); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_79); -x_82 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_81, x_2); -x_83 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_82); -lean::cnstr_set(x_42, 0, x_83); -return x_42; -} -else -{ -obj* x_84; uint8 x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_84 = lean::cnstr_get(x_43, 0); -x_85 = lean::cnstr_get_scalar(x_43, sizeof(void*)*1); -lean::inc(x_84); -lean::dec(x_43); -x_86 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_86, 0, x_84); -lean::cnstr_set_scalar(x_86, sizeof(void*)*1, x_85); -x_87 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_86); -x_88 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_88, x_87); -x_90 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_89, x_2); -x_91 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_90); -lean::cnstr_set(x_42, 0, x_91); -return x_42; -} -} -else -{ -obj* x_92; obj* x_93; uint8 x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -x_92 = lean::cnstr_get(x_42, 1); -lean::inc(x_92); -lean::dec(x_42); -x_93 = lean::cnstr_get(x_43, 0); -lean::inc(x_93); -x_94 = lean::cnstr_get_scalar(x_43, sizeof(void*)*1); -if (lean::is_exclusive(x_43)) { - lean::cnstr_release(x_43, 0); - x_95 = x_43; -} else { - lean::dec_ref(x_43); - x_95 = lean::box(0); -} -if (lean::is_scalar(x_95)) { - x_96 = lean::alloc_cnstr(1, 1, 1); -} else { - x_96 = x_95; -} -lean::cnstr_set(x_96, 0, x_93); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_94); -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_96); -x_98 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_99 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_98, x_97); -x_100 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_99, x_2); -x_101 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_100); -x_102 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_92); -return x_102; -} -} -} -else -{ -obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -lean::dec(x_38); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_103 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_8, 2, x_103); -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_8); -x_105 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_105, x_104); -x_107 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_106, x_2); -x_108 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_107); -lean::cnstr_set(x_7, 0, x_108); -return x_7; -} -} -else -{ -obj* x_109; -lean::free_heap_obj(x_8); -lean::dec(x_13); -lean::free_heap_obj(x_7); -x_109 = lean::box(0); -x_16 = x_109; -goto block_36; -} -block_36: -{ -obj* x_17; obj* x_18; obj* x_19; obj* x_20; uint8 x_21; -lean::dec(x_16); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_5); -x_18 = lean::box(0); -x_19 = l_String_splitAux___main___closed__1; -x_20 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_19, x_1, x_17, x_18, x_4, x_14, x_10); -lean::dec(x_4); -lean::dec(x_17); -x_21 = !lean::is_exclusive(x_20); -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_22 = lean::cnstr_get(x_20, 0); -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_22); -x_24 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_24, x_23); -x_26 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_25, x_2); -x_27 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_26); -lean::cnstr_set(x_20, 0, x_27); -return x_20; -} -else -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_28 = lean::cnstr_get(x_20, 0); -x_29 = lean::cnstr_get(x_20, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_20); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_15, x_28); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_30); -x_33 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_32, x_2); -x_34 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_33); -x_35 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_29); -return x_35; -} -} -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_110 = lean::cnstr_get(x_8, 0); -x_111 = lean::cnstr_get(x_8, 1); -x_112 = lean::cnstr_get(x_8, 2); -lean::inc(x_112); -lean::inc(x_111); -lean::inc(x_110); -lean::dec(x_8); -if (lean::obj_tag(x_110) == 0) -{ -obj* x_128; obj* x_129; uint8 x_130; -x_128 = lean::cnstr_get(x_110, 0); -lean::inc(x_128); -x_129 = lean::cnstr_get(x_128, 1); -lean::inc(x_129); -lean::dec(x_128); -x_130 = lean::string_dec_eq(x_3, x_129); -if (x_130 == 0) -{ -obj* x_131; obj* x_132; obj* x_133; obj* x_134; -lean::free_heap_obj(x_7); -x_131 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_131, 0, x_5); -x_132 = lean::box(0); -x_133 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_129, x_1, x_131, x_132, x_4, x_111, x_10); -lean::dec(x_4); -lean::dec(x_131); -x_134 = lean::cnstr_get(x_133, 0); -lean::inc(x_134); -if (lean::obj_tag(x_134) == 0) -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; -x_135 = lean::cnstr_get(x_133, 1); -lean::inc(x_135); -if (lean::is_exclusive(x_133)) { - lean::cnstr_release(x_133, 0); - lean::cnstr_release(x_133, 1); - x_136 = x_133; -} else { - lean::dec_ref(x_133); - x_136 = lean::box(0); -} -x_137 = lean::cnstr_get(x_134, 1); -lean::inc(x_137); -x_138 = lean::cnstr_get(x_134, 2); -lean::inc(x_138); -if (lean::is_exclusive(x_134)) { - lean::cnstr_release(x_134, 0); - lean::cnstr_release(x_134, 1); - lean::cnstr_release(x_134, 2); - x_139 = x_134; -} else { - lean::dec_ref(x_134); - x_139 = lean::box(0); -} -x_140 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_139)) { - x_141 = lean::alloc_cnstr(0, 3, 0); -} else { - x_141 = x_139; -} -lean::cnstr_set(x_141, 0, x_110); -lean::cnstr_set(x_141, 1, x_137); -lean::cnstr_set(x_141, 2, x_140); -x_142 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_138, x_141); -x_143 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_112, x_142); -x_144 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_140, x_143); -x_145 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_144, x_2); -x_146 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_145); -if (lean::is_scalar(x_136)) { - x_147 = lean::alloc_cnstr(0, 2, 0); -} else { - x_147 = x_136; -} -lean::cnstr_set(x_147, 0, x_146); -lean::cnstr_set(x_147, 1, x_135); -return x_147; -} -else -{ -obj* x_148; obj* x_149; obj* x_150; uint8 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; -lean::dec(x_110); -x_148 = lean::cnstr_get(x_133, 1); -lean::inc(x_148); -if (lean::is_exclusive(x_133)) { - lean::cnstr_release(x_133, 0); - lean::cnstr_release(x_133, 1); - x_149 = x_133; -} else { - lean::dec_ref(x_133); - x_149 = lean::box(0); -} -x_150 = lean::cnstr_get(x_134, 0); -lean::inc(x_150); -x_151 = lean::cnstr_get_scalar(x_134, sizeof(void*)*1); -if (lean::is_exclusive(x_134)) { - lean::cnstr_release(x_134, 0); - x_152 = x_134; -} else { - lean::dec_ref(x_134); - x_152 = lean::box(0); -} -if (lean::is_scalar(x_152)) { - x_153 = lean::alloc_cnstr(1, 1, 1); -} else { - x_153 = x_152; -} -lean::cnstr_set(x_153, 0, x_150); -lean::cnstr_set_scalar(x_153, sizeof(void*)*1, x_151); -x_154 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_112, x_153); -x_155 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_156 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_155, x_154); -x_157 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_156, x_2); -x_158 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_157); -if (lean::is_scalar(x_149)) { - x_159 = lean::alloc_cnstr(0, 2, 0); -} else { - x_159 = x_149; -} -lean::cnstr_set(x_159, 0, x_158); -lean::cnstr_set(x_159, 1, x_148); -return x_159; -} -} -else -{ -obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; -lean::dec(x_129); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_160 = l_Lean_Parser_finishCommentBlock___closed__2; -x_161 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_161, 0, x_110); -lean::cnstr_set(x_161, 1, x_111); -lean::cnstr_set(x_161, 2, x_160); -x_162 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_112, x_161); -x_163 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_164 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_163, x_162); -x_165 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_164, x_2); -x_166 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_165); -lean::cnstr_set(x_7, 0, x_166); -return x_7; -} -} -else -{ -obj* x_167; -lean::dec(x_110); -lean::free_heap_obj(x_7); -x_167 = lean::box(0); -x_113 = x_167; -goto block_127; -} -block_127: -{ -obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; -lean::dec(x_113); -x_114 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_114, 0, x_5); -x_115 = lean::box(0); -x_116 = l_String_splitAux___main___closed__1; -x_117 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_116, x_1, x_114, x_115, x_4, x_111, x_10); -lean::dec(x_4); -lean::dec(x_114); -x_118 = lean::cnstr_get(x_117, 0); -lean::inc(x_118); -x_119 = lean::cnstr_get(x_117, 1); -lean::inc(x_119); -if (lean::is_exclusive(x_117)) { - lean::cnstr_release(x_117, 0); - lean::cnstr_release(x_117, 1); - x_120 = x_117; -} else { - lean::dec_ref(x_117); - x_120 = lean::box(0); -} -x_121 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_112, x_118); -x_122 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_123 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_122, x_121); -x_124 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_123, x_2); -x_125 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_124); -if (lean::is_scalar(x_120)) { - x_126 = lean::alloc_cnstr(0, 2, 0); -} else { - x_126 = x_120; -} -lean::cnstr_set(x_126, 0, x_125); -lean::cnstr_set(x_126, 1, x_119); -return x_126; -} -} -} -else -{ -obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; -x_168 = lean::cnstr_get(x_7, 1); -lean::inc(x_168); -lean::dec(x_7); -x_169 = lean::cnstr_get(x_8, 0); -lean::inc(x_169); -x_170 = lean::cnstr_get(x_8, 1); -lean::inc(x_170); -x_171 = lean::cnstr_get(x_8, 2); -lean::inc(x_171); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_172 = x_8; -} else { - lean::dec_ref(x_8); - x_172 = lean::box(0); -} -if (lean::obj_tag(x_169) == 0) -{ -obj* x_188; obj* x_189; uint8 x_190; -x_188 = lean::cnstr_get(x_169, 0); -lean::inc(x_188); -x_189 = lean::cnstr_get(x_188, 1); -lean::inc(x_189); -lean::dec(x_188); -x_190 = lean::string_dec_eq(x_3, x_189); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; -lean::dec(x_172); -x_191 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_191, 0, x_5); -x_192 = lean::box(0); -x_193 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_189, x_1, x_191, x_192, x_4, x_170, x_168); -lean::dec(x_4); -lean::dec(x_191); -x_194 = lean::cnstr_get(x_193, 0); -lean::inc(x_194); -if (lean::obj_tag(x_194) == 0) -{ -obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; -x_195 = lean::cnstr_get(x_193, 1); -lean::inc(x_195); -if (lean::is_exclusive(x_193)) { - lean::cnstr_release(x_193, 0); - lean::cnstr_release(x_193, 1); - x_196 = x_193; -} else { - lean::dec_ref(x_193); - x_196 = lean::box(0); -} -x_197 = lean::cnstr_get(x_194, 1); -lean::inc(x_197); -x_198 = lean::cnstr_get(x_194, 2); -lean::inc(x_198); -if (lean::is_exclusive(x_194)) { - lean::cnstr_release(x_194, 0); - lean::cnstr_release(x_194, 1); - lean::cnstr_release(x_194, 2); - x_199 = x_194; -} else { - lean::dec_ref(x_194); - x_199 = lean::box(0); -} -x_200 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_199)) { - x_201 = lean::alloc_cnstr(0, 3, 0); -} else { - x_201 = x_199; -} -lean::cnstr_set(x_201, 0, x_169); -lean::cnstr_set(x_201, 1, x_197); -lean::cnstr_set(x_201, 2, x_200); -x_202 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_198, x_201); -x_203 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_171, x_202); -x_204 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_200, x_203); -x_205 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_204, x_2); -x_206 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_205); -if (lean::is_scalar(x_196)) { - x_207 = lean::alloc_cnstr(0, 2, 0); -} else { - x_207 = x_196; -} -lean::cnstr_set(x_207, 0, x_206); -lean::cnstr_set(x_207, 1, x_195); -return x_207; -} -else -{ -obj* x_208; obj* x_209; obj* x_210; uint8 x_211; obj* x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; -lean::dec(x_169); -x_208 = lean::cnstr_get(x_193, 1); -lean::inc(x_208); -if (lean::is_exclusive(x_193)) { - lean::cnstr_release(x_193, 0); - lean::cnstr_release(x_193, 1); - x_209 = x_193; -} else { - lean::dec_ref(x_193); - x_209 = lean::box(0); -} -x_210 = lean::cnstr_get(x_194, 0); -lean::inc(x_210); -x_211 = lean::cnstr_get_scalar(x_194, sizeof(void*)*1); -if (lean::is_exclusive(x_194)) { - lean::cnstr_release(x_194, 0); - x_212 = x_194; -} else { - lean::dec_ref(x_194); - x_212 = lean::box(0); -} -if (lean::is_scalar(x_212)) { - x_213 = lean::alloc_cnstr(1, 1, 1); -} else { - x_213 = x_212; -} -lean::cnstr_set(x_213, 0, x_210); -lean::cnstr_set_scalar(x_213, sizeof(void*)*1, x_211); -x_214 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_171, x_213); -x_215 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_216 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_214); -x_217 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_216, x_2); -x_218 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_217); -if (lean::is_scalar(x_209)) { - x_219 = lean::alloc_cnstr(0, 2, 0); -} else { - x_219 = x_209; -} -lean::cnstr_set(x_219, 0, x_218); -lean::cnstr_set(x_219, 1, x_208); -return x_219; -} -} -else -{ -obj* x_220; obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; -lean::dec(x_189); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_220 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_172)) { - x_221 = lean::alloc_cnstr(0, 3, 0); -} else { - x_221 = x_172; -} -lean::cnstr_set(x_221, 0, x_169); -lean::cnstr_set(x_221, 1, x_170); -lean::cnstr_set(x_221, 2, x_220); -x_222 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_171, x_221); -x_223 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_224 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_223, x_222); -x_225 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_224, x_2); -x_226 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_225); -x_227 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_227, 0, x_226); -lean::cnstr_set(x_227, 1, x_168); -return x_227; -} -} -else -{ -obj* x_228; -lean::dec(x_172); -lean::dec(x_169); -x_228 = lean::box(0); -x_173 = x_228; -goto block_187; -} -block_187: -{ -obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; -lean::dec(x_173); -x_174 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_174, 0, x_5); -x_175 = lean::box(0); -x_176 = l_String_splitAux___main___closed__1; -x_177 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_176, x_1, x_174, x_175, x_4, x_170, x_168); -lean::dec(x_4); -lean::dec(x_174); -x_178 = lean::cnstr_get(x_177, 0); -lean::inc(x_178); -x_179 = lean::cnstr_get(x_177, 1); -lean::inc(x_179); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - x_180 = x_177; -} else { - lean::dec_ref(x_177); - x_180 = lean::box(0); -} -x_181 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_171, x_178); -x_182 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_183 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_182, x_181); -x_184 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_183, x_2); -x_185 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_184); -if (lean::is_scalar(x_180)) { - x_186 = lean::alloc_cnstr(0, 2, 0); -} else { - x_186 = x_180; -} -lean::cnstr_set(x_186, 0, x_185); -lean::cnstr_set(x_186, 1, x_179); -return x_186; -} -} -} -else -{ -uint8 x_229; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_1); -x_229 = !lean::is_exclusive(x_7); -if (x_229 == 0) -{ -obj* x_230; uint8 x_231; -x_230 = lean::cnstr_get(x_7, 0); -lean::dec(x_230); -x_231 = !lean::is_exclusive(x_8); -if (x_231 == 0) -{ -obj* x_232; obj* x_233; obj* x_234; obj* x_235; -x_232 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_233 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_232, x_8); -x_234 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_233, x_2); -x_235 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_234); -lean::cnstr_set(x_7, 0, x_235); -return x_7; -} -else -{ -obj* x_236; uint8 x_237; obj* x_238; obj* x_239; obj* x_240; obj* x_241; obj* x_242; -x_236 = lean::cnstr_get(x_8, 0); -x_237 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_236); -lean::dec(x_8); -x_238 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_238, 0, x_236); -lean::cnstr_set_scalar(x_238, sizeof(void*)*1, x_237); -x_239 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_240 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_239, x_238); -x_241 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_240, x_2); -x_242 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_241); -lean::cnstr_set(x_7, 0, x_242); -return x_7; -} -} -else -{ -obj* x_243; obj* x_244; uint8 x_245; obj* x_246; obj* x_247; obj* x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; -x_243 = lean::cnstr_get(x_7, 1); -lean::inc(x_243); -lean::dec(x_7); -x_244 = lean::cnstr_get(x_8, 0); -lean::inc(x_244); -x_245 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_exclusive(x_8)) { - lean::cnstr_release(x_8, 0); - x_246 = x_8; -} else { - lean::dec_ref(x_8); - x_246 = lean::box(0); -} -if (lean::is_scalar(x_246)) { - x_247 = lean::alloc_cnstr(1, 1, 1); -} else { - x_247 = x_246; -} -lean::cnstr_set(x_247, 0, x_244); -lean::cnstr_set_scalar(x_247, sizeof(void*)*1, x_245); -x_248 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_249 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_248, x_247); -x_250 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_249, x_2); -x_251 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_250); -x_252 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_252, 0, x_251); -lean::cnstr_set(x_252, 1, x_243); -return x_252; -} -} -} -} -obj* l_Lean_Parser_symbolCore___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_7; -lean::inc(x_2); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_2); -x_6 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___rarg___lambda__1___boxed), 6, 3); -lean::closure_set(x_6, 0, x_4); -lean::closure_set(x_6, 1, x_5); -lean::closure_set(x_6, 2, x_2); -x_7 = lean::apply_2(x_1, lean::box(0), x_6); -return x_7; -} -} -obj* l_Lean_Parser_symbolCore(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_symbolCore___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_symbolCore___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_3); -return x_7; -} -} -obj* l_Lean_Parser_symbolCore___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_symbolCore___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_3); -return x_5; -} -} -obj* l_Lean_Parser_symbolCore___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_symbolCore(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_symbol___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_String_trim(x_2); -lean::inc(x_4); -x_5 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = l_Lean_Parser_symbolCore___rarg(x_1, x_4, x_3, x_5); -return x_6; -} -} -obj* l_Lean_Parser_symbol(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbol___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_symbol___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_symbol___rarg(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_Lean_Parser_symbol___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_symbol(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_symbol_tokens___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_3 = l_String_trim(x_1); -x_4 = lean::box(0); -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_4); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -return x_7; -} -} -obj* l_Lean_Parser_symbol_tokens(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbol_tokens___rarg___boxed), 2, 0); -return x_3; -} -} -obj* l_Lean_Parser_symbol_tokens___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_symbol_tokens___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_symbol_tokens(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_symbol_View___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = l_Lean_Parser_raw_view___rarg___closed__1; -x_5 = l_Lean_Parser_raw_view___rarg___closed__2; -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_5); -return x_6; -} -} -obj* l_Lean_Parser_symbol_View(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbol_View___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_symbol_View___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_symbol_View___rarg(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_symbol_View___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_symbol_View(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_symbol_viewDefault___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -} -obj* l_Lean_Parser_symbol_viewDefault(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbol_viewDefault___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_symbol_viewDefault___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_symbol_viewDefault___rarg(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_symbol_viewDefault___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_symbol_viewDefault(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = lean::mk_string("number"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -return x_2; -} -} -obj* l_Lean_Parser_number_Parser___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -lean::inc(x_2); -lean::inc(x_1); -x_4 = l_Lean_Parser_token(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -if (lean::obj_tag(x_5) == 0) -{ -uint8 x_6; -x_6 = !lean::is_exclusive(x_4); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint8 x_9; -x_7 = lean::cnstr_get(x_4, 1); -x_8 = lean::cnstr_get(x_4, 0); -lean::dec(x_8); -x_9 = !lean::is_exclusive(x_5); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; obj* x_13; uint8 x_14; -x_10 = lean::cnstr_get(x_5, 0); -x_11 = lean::cnstr_get(x_5, 1); -x_12 = lean::cnstr_get(x_5, 2); -x_13 = l_Lean_Parser_number; -x_14 = l_Lean_Parser_Syntax_isOfKind___main(x_13, x_10); -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -lean::free_heap_obj(x_5); -lean::dec(x_10); -lean::free_heap_obj(x_4); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_2); -x_16 = lean::box(0); -x_17 = l_String_splitAux___main___closed__1; -x_18 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_19 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_17, x_18, x_15, x_16, x_1, x_11, x_7); -lean::dec(x_1); -lean::dec(x_15); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_21); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_22); -x_25 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_24); -lean::cnstr_set(x_19, 0, x_25); -return x_19; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_26 = lean::cnstr_get(x_19, 0); -x_27 = lean::cnstr_get(x_19, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_19); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_26); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_28); -x_31 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_30); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_27); -return x_32; -} -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; -lean::dec(x_2); -lean::dec(x_1); -x_33 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_5, 2, x_33); -x_34 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_5); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_33, x_34); -x_36 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_35); -lean::cnstr_set(x_4, 0, x_36); -return x_4; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; uint8 x_41; -x_37 = lean::cnstr_get(x_5, 0); -x_38 = lean::cnstr_get(x_5, 1); -x_39 = lean::cnstr_get(x_5, 2); -lean::inc(x_39); -lean::inc(x_38); -lean::inc(x_37); -lean::dec(x_5); -x_40 = l_Lean_Parser_number; -x_41 = l_Lean_Parser_Syntax_isOfKind___main(x_40, x_37); -if (x_41 == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_37); -lean::free_heap_obj(x_4); -x_42 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_42, 0, x_2); -x_43 = lean::box(0); -x_44 = l_String_splitAux___main___closed__1; -x_45 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_46 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_44, x_45, x_42, x_43, x_1, x_38, x_7); -lean::dec(x_1); -lean::dec(x_42); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_48 = lean::cnstr_get(x_46, 1); -lean::inc(x_48); -if (lean::is_exclusive(x_46)) { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - x_49 = x_46; -} else { - lean::dec_ref(x_46); - x_49 = lean::box(0); -} -x_50 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_47); -x_51 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_50); -x_53 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_52); -if (lean::is_scalar(x_49)) { - x_54 = lean::alloc_cnstr(0, 2, 0); -} else { - x_54 = x_49; -} -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_48); -return x_54; -} -else -{ -obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; -lean::dec(x_2); -lean::dec(x_1); -x_55 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_56 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_56, 0, x_37); -lean::cnstr_set(x_56, 1, x_38); -lean::cnstr_set(x_56, 2, x_55); -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_56); -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_57); -x_59 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_58); -lean::cnstr_set(x_4, 0, x_59); -return x_4; -} -} -} -else -{ -obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; uint8 x_66; -x_60 = lean::cnstr_get(x_4, 1); -lean::inc(x_60); -lean::dec(x_4); -x_61 = lean::cnstr_get(x_5, 0); -lean::inc(x_61); -x_62 = lean::cnstr_get(x_5, 1); -lean::inc(x_62); -x_63 = lean::cnstr_get(x_5, 2); -lean::inc(x_63); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_64 = x_5; -} else { - lean::dec_ref(x_5); - x_64 = lean::box(0); -} -x_65 = l_Lean_Parser_number; -x_66 = l_Lean_Parser_Syntax_isOfKind___main(x_65, x_61); -if (x_66 == 0) -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; -lean::dec(x_64); -lean::dec(x_61); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_2); -x_68 = lean::box(0); -x_69 = l_String_splitAux___main___closed__1; -x_70 = l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1; -x_71 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_69, x_70, x_67, x_68, x_1, x_62, x_60); -lean::dec(x_1); -lean::dec(x_67); -x_72 = lean::cnstr_get(x_71, 0); -lean::inc(x_72); -x_73 = lean::cnstr_get(x_71, 1); -lean::inc(x_73); -if (lean::is_exclusive(x_71)) { - lean::cnstr_release(x_71, 0); - lean::cnstr_release(x_71, 1); - x_74 = x_71; -} else { - lean::dec_ref(x_71); - x_74 = lean::box(0); -} -x_75 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_72); -x_76 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_76, x_75); -x_78 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_77); -if (lean::is_scalar(x_74)) { - x_79 = lean::alloc_cnstr(0, 2, 0); -} else { - x_79 = x_74; -} -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_73); -return x_79; -} -else -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -lean::dec(x_2); -lean::dec(x_1); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_64)) { - x_81 = lean::alloc_cnstr(0, 3, 0); -} else { - x_81 = x_64; -} -lean::cnstr_set(x_81, 0, x_61); -lean::cnstr_set(x_81, 1, x_62); -lean::cnstr_set(x_81, 2, x_80); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_63, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_82); -x_84 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_83); -x_85 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_60); -return x_85; -} -} -} -else -{ -uint8 x_86; -lean::dec(x_2); -lean::dec(x_1); -x_86 = !lean::is_exclusive(x_4); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_4, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_5); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; -x_89 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_89, x_5); -x_91 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_90); -lean::cnstr_set(x_4, 0, x_91); -return x_4; -} -else -{ -obj* x_92; uint8 x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_92 = lean::cnstr_get(x_5, 0); -x_93 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -lean::inc(x_92); -lean::dec(x_5); -x_94 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_93); -x_95 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_96 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_95, x_94); -x_97 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_96); -lean::cnstr_set(x_4, 0, x_97); -return x_4; -} -} -else -{ -obj* x_98; obj* x_99; uint8 x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_98 = lean::cnstr_get(x_4, 1); -lean::inc(x_98); -lean::dec(x_4); -x_99 = lean::cnstr_get(x_5, 0); -lean::inc(x_99); -x_100 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - x_101 = x_5; -} else { - lean::dec_ref(x_5); - x_101 = lean::box(0); -} -if (lean::is_scalar(x_101)) { - x_102 = lean::alloc_cnstr(1, 1, 1); -} else { - x_102 = x_101; -} -lean::cnstr_set(x_102, 0, x_99); -lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_100); -x_103 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_103, x_102); -x_105 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_104); -x_106 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_106, 0, x_105); -lean::cnstr_set(x_106, 1, x_98); -return x_106; -} -} -} -} -obj* _init_l_Lean_Parser_number_Parser___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___rarg___lambda__1), 3, 0); -return x_1; -} -} -obj* l_Lean_Parser_number_Parser___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_number_Parser___rarg___closed__1; -x_3 = lean::apply_2(x_1, lean::box(0), x_2); -return x_3; -} -} -obj* l_Lean_Parser_number_Parser(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_number_Parser___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_number_Parser(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_number_Parser_tokens(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -} -obj* l_Lean_Parser_number_Parser_tokens___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_number_Parser_tokens(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_number_Parser_view___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_number_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_number_Parser_view___rarg___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_number_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_number_Parser_view___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = l_Lean_Parser_number_Parser_view___rarg___closed__1; -x_3 = l_Lean_Parser_number_Parser_view___rarg___closed__2; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_number_Parser_view(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_number_Parser_view___rarg___boxed), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_number_Parser_view___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_number_Parser_view___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_number_Parser_view___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_number_Parser_view(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l___private_init_lean_parser_token_7__toNatCore___main(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_3, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; uint32 x_9; uint8 x_10; obj* x_11; obj* x_12; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_3, x_7); -lean::dec(x_3); -x_9 = l_String_OldIterator_curr___main(x_2); -x_10 = l_Char_isDigit(x_9); -x_11 = lean::nat_mul(x_4, x_1); -lean::dec(x_4); -x_12 = l_String_OldIterator_next___main(x_2); -if (x_10 == 0) -{ -uint32 x_13; uint8 x_14; -x_13 = 97; -x_14 = x_13 <= x_9; -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::uint32_to_nat(x_9); -x_16 = lean::mk_nat_obj(65u); -x_17 = lean::nat_sub(x_15, x_16); -lean::dec(x_15); -x_18 = lean::nat_add(x_11, x_17); -lean::dec(x_17); -lean::dec(x_11); -x_2 = x_12; -x_3 = x_8; -x_4 = x_18; -goto _start; -} -else -{ -uint32 x_20; uint8 x_21; -x_20 = 102; -x_21 = x_9 <= x_20; -if (x_21 == 0) -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_22 = lean::uint32_to_nat(x_9); -x_23 = lean::mk_nat_obj(65u); -x_24 = lean::nat_sub(x_22, x_23); -lean::dec(x_22); -x_25 = lean::nat_add(x_11, x_24); -lean::dec(x_24); -lean::dec(x_11); -x_2 = x_12; -x_3 = x_8; -x_4 = x_25; -goto _start; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::uint32_to_nat(x_9); -x_28 = lean::mk_nat_obj(97u); -x_29 = lean::nat_sub(x_27, x_28); -lean::dec(x_27); -x_30 = lean::nat_add(x_11, x_29); -lean::dec(x_29); -lean::dec(x_11); -x_2 = x_12; -x_3 = x_8; -x_4 = x_30; -goto _start; -} -} -} -else -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_32 = lean::uint32_to_nat(x_9); -x_33 = lean::mk_nat_obj(48u); -x_34 = lean::nat_sub(x_32, x_33); -lean::dec(x_32); -x_35 = lean::nat_add(x_11, x_34); -lean::dec(x_34); -lean::dec(x_11); -x_2 = x_12; -x_3 = x_8; -x_4 = x_35; -goto _start; -} -} -else -{ -lean::dec(x_3); -lean::dec(x_2); -return x_4; -} -} -} -obj* l___private_init_lean_parser_token_7__toNatCore___main___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_token_7__toNatCore___main(x_1, x_2, x_3, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l___private_init_lean_parser_token_7__toNatCore(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_token_7__toNatCore___main(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l___private_init_lean_parser_token_7__toNatCore___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_token_7__toNatCore(x_1, x_2, x_3, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l___private_init_lean_parser_token_8__toNatBase(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_3 = lean::mk_nat_obj(0u); -lean::inc(x_1); -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -lean::cnstr_set(x_4, 2, x_3); -x_5 = lean::string_length(x_1); -lean::dec(x_1); -x_6 = l___private_init_lean_parser_token_7__toNatCore___main(x_2, x_4, x_5, x_3); -return x_6; -} -} -obj* l___private_init_lean_parser_token_8__toNatBase___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l___private_init_lean_parser_token_8__toNatBase(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l_Lean_Parser_number_View_toNat___main(obj* x_1) { -_start: -{ -switch (lean::obj_tag(x_1)) { -case 0: -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -lean::dec(x_1); -if (lean::obj_tag(x_2) == 0) -{ -obj* x_3; -x_3 = lean::mk_nat_obj(1138u); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -lean::dec(x_2); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_String_toNat(x_5); -lean::dec(x_5); -return x_6; -} -} -case 1: -{ -obj* x_7; -x_7 = lean::cnstr_get(x_1, 0); -lean::inc(x_7); -lean::dec(x_1); -if (lean::obj_tag(x_7) == 0) -{ -obj* x_8; -x_8 = lean::mk_nat_obj(1138u); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; -x_9 = lean::cnstr_get(x_7, 0); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::cnstr_get(x_9, 1); -lean::inc(x_10); -lean::dec(x_9); -x_11 = lean::mk_nat_obj(2u); -x_12 = l___private_init_lean_parser_token_8__toNatBase(x_10, x_11); -return x_12; -} -} -case 2: -{ -obj* x_13; -x_13 = lean::cnstr_get(x_1, 0); -lean::inc(x_13); -lean::dec(x_1); -if (lean::obj_tag(x_13) == 0) -{ -obj* x_14; -x_14 = lean::mk_nat_obj(1138u); -return x_14; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; -x_15 = lean::cnstr_get(x_13, 0); -lean::inc(x_15); -lean::dec(x_13); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -lean::dec(x_15); -x_17 = lean::mk_nat_obj(8u); -x_18 = l___private_init_lean_parser_token_8__toNatBase(x_16, x_17); -return x_18; -} -} -default: -{ -obj* x_19; -x_19 = lean::cnstr_get(x_1, 0); -lean::inc(x_19); -lean::dec(x_1); -if (lean::obj_tag(x_19) == 0) -{ -obj* x_20; -x_20 = lean::mk_nat_obj(1138u); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = lean::cnstr_get(x_19, 0); -lean::inc(x_21); -lean::dec(x_19); -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -lean::dec(x_21); -x_23 = lean::mk_nat_obj(16u); -x_24 = l___private_init_lean_parser_token_8__toNatBase(x_22, x_23); -return x_24; -} -} -} -} -} -obj* l_Lean_Parser_number_View_toNat(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_number_View_toNat___main(x_1); -return x_2; -} -} -obj* l_Lean_Parser_number_View_ofNat(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = lean::box(0); -x_3 = l_Nat_repr(x_1); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_6, 0, x_5); -return x_6; -} -} -obj* l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(obj* x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = l_Lean_Parser_Syntax_isOfKind___main(x_1, x_2); -if (x_3 == 0) -{ -obj* x_4; -lean::dec(x_2); -x_4 = lean::box(0); -return x_4; -} -else -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = l_Lean_Parser_stringLit_HasView; -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -x_7 = lean::apply_1(x_6, x_2); -x_8 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_8, 0, x_7); -return x_8; -} -} -} -obj* l_Lean_Parser_stringLit_Parser___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_2); -x_5 = l_Lean_Parser_token(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_6, 0); -x_12 = lean::cnstr_get(x_6, 1); -x_13 = lean::cnstr_get(x_6, 2); -x_14 = l_Lean_Parser_stringLit; -lean::inc(x_11); -x_15 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_14, x_11); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -lean::free_heap_obj(x_6); -lean::dec(x_11); -lean::free_heap_obj(x_5); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_3); -x_17 = lean::box(0); -x_18 = l_String_splitAux___main___closed__1; -lean::inc(x_1); -x_19 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_18, x_1, x_16, x_17, x_2, x_12, x_8); -lean::dec(x_2); -lean::dec(x_16); -x_20 = !lean::is_exclusive(x_19); -if (x_20 == 0) -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; -x_21 = lean::cnstr_get(x_19, 0); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_21); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_23); -x_25 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_24); -x_26 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_25, x_1); -x_27 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_26); -lean::cnstr_set(x_19, 0, x_27); -return x_19; -} -else -{ -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; -x_28 = lean::cnstr_get(x_19, 0); -x_29 = lean::cnstr_get(x_19, 1); -lean::inc(x_29); -lean::inc(x_28); -lean::dec(x_19); -x_30 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_28); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_30, x_32); -x_34 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_33, x_1); -x_35 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_34); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_29); -return x_36; -} -} -else -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; -lean::dec(x_15); -lean::dec(x_3); -lean::dec(x_2); -x_37 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_6, 2, x_37); -x_38 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_6); -x_39 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_40 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_39, x_38); -x_41 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_40, x_1); -x_42 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_41); -lean::cnstr_set(x_5, 0, x_42); -return x_5; -} -} -else -{ -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; -x_43 = lean::cnstr_get(x_6, 0); -x_44 = lean::cnstr_get(x_6, 1); -x_45 = lean::cnstr_get(x_6, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::inc(x_43); -lean::dec(x_6); -x_46 = l_Lean_Parser_stringLit; -lean::inc(x_43); -x_47 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_46, x_43); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; -lean::dec(x_43); -lean::free_heap_obj(x_5); -x_48 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_48, 0, x_3); -x_49 = lean::box(0); -x_50 = l_String_splitAux___main___closed__1; -lean::inc(x_1); -x_51 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_50, x_1, x_48, x_49, x_2, x_44, x_8); -lean::dec(x_2); -lean::dec(x_48); -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_53 = lean::cnstr_get(x_51, 1); -lean::inc(x_53); -if (lean::is_exclusive(x_51)) { - lean::cnstr_release(x_51, 0); - lean::cnstr_release(x_51, 1); - x_54 = x_51; -} else { - lean::dec_ref(x_51); - x_54 = lean::box(0); -} -x_55 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_56 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_52); -x_57 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_56); -x_58 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_55, x_57); -x_59 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_58, x_1); -x_60 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_59); -if (lean::is_scalar(x_54)) { - x_61 = lean::alloc_cnstr(0, 2, 0); -} else { - x_61 = x_54; -} -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_53); -return x_61; -} -else -{ -obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; -lean::dec(x_47); -lean::dec(x_3); -lean::dec(x_2); -x_62 = l_Lean_Parser_finishCommentBlock___closed__2; -x_63 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_63, 0, x_43); -lean::cnstr_set(x_63, 1, x_44); -lean::cnstr_set(x_63, 2, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_45, x_63); -x_65 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_66 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_65, x_64); -x_67 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_66, x_1); -x_68 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_67); -lean::cnstr_set(x_5, 0, x_68); -return x_5; -} -} -} -else -{ -obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; -x_69 = lean::cnstr_get(x_5, 1); -lean::inc(x_69); -lean::dec(x_5); -x_70 = lean::cnstr_get(x_6, 0); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_6, 1); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_6, 2); -lean::inc(x_72); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_73 = x_6; -} else { - lean::dec_ref(x_6); - x_73 = lean::box(0); -} -x_74 = l_Lean_Parser_stringLit; -lean::inc(x_70); -x_75 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_74, x_70); -if (lean::obj_tag(x_75) == 0) -{ -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; -lean::dec(x_73); -lean::dec(x_70); -x_76 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_76, 0, x_3); -x_77 = lean::box(0); -x_78 = l_String_splitAux___main___closed__1; -lean::inc(x_1); -x_79 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_78, x_1, x_76, x_77, x_2, x_71, x_69); -lean::dec(x_2); -lean::dec(x_76); -x_80 = lean::cnstr_get(x_79, 0); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_79, 1); -lean::inc(x_81); -if (lean::is_exclusive(x_79)) { - lean::cnstr_release(x_79, 0); - lean::cnstr_release(x_79, 1); - x_82 = x_79; -} else { - lean::dec_ref(x_79); - x_82 = lean::box(0); -} -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_80); -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_84); -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_83, x_85); -x_87 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_86, x_1); -x_88 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_87); -if (lean::is_scalar(x_82)) { - x_89 = lean::alloc_cnstr(0, 2, 0); -} else { - x_89 = x_82; -} -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_81); -return x_89; -} -else -{ -obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -lean::dec(x_75); -lean::dec(x_3); -lean::dec(x_2); -x_90 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_73)) { - x_91 = lean::alloc_cnstr(0, 3, 0); -} else { - x_91 = x_73; -} -lean::cnstr_set(x_91, 0, x_70); -lean::cnstr_set(x_91, 1, x_71); -lean::cnstr_set(x_91, 2, x_90); -x_92 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_72, x_91); -x_93 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_94 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_93, x_92); -x_95 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_94, x_1); -x_96 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_95); -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_69); -return x_97; -} -} -} -else -{ -uint8 x_98; -lean::dec(x_3); -lean::dec(x_2); -x_98 = !lean::is_exclusive(x_5); -if (x_98 == 0) -{ -obj* x_99; uint8 x_100; -x_99 = lean::cnstr_get(x_5, 0); -lean::dec(x_99); -x_100 = !lean::is_exclusive(x_6); -if (x_100 == 0) -{ -obj* x_101; obj* x_102; obj* x_103; obj* x_104; -x_101 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_101, x_6); -x_103 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_102, x_1); -x_104 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_103); -lean::cnstr_set(x_5, 0, x_104); -return x_5; -} -else -{ -obj* x_105; uint8 x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; -x_105 = lean::cnstr_get(x_6, 0); -x_106 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_105); -lean::dec(x_6); -x_107 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_107, 0, x_105); -lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_106); -x_108 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_109 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_108, x_107); -x_110 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_109, x_1); -x_111 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_110); -lean::cnstr_set(x_5, 0, x_111); -return x_5; -} -} -else -{ -obj* x_112; obj* x_113; uint8 x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; -x_112 = lean::cnstr_get(x_5, 1); -lean::inc(x_112); -lean::dec(x_5); -x_113 = lean::cnstr_get(x_6, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_115 = x_6; -} else { - lean::dec_ref(x_6); - x_115 = lean::box(0); -} -if (lean::is_scalar(x_115)) { - x_116 = lean::alloc_cnstr(1, 1, 1); -} else { - x_116 = x_115; -} -lean::cnstr_set(x_116, 0, x_113); -lean::cnstr_set_scalar(x_116, sizeof(void*)*1, x_114); -x_117 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_118 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_117, x_116); -x_119 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_118, x_1); -x_120 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_119); -x_121 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_121, 0, x_120); -lean::cnstr_set(x_121, 1, x_112); -return x_121; -} -} -} -} -obj* _init_l_Lean_Parser_stringLit_Parser___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("String"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_Parser___rarg___lambda__1), 4, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_Lean_Parser_stringLit_Parser___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_stringLit_Parser___rarg___closed__1; -x_3 = lean::apply_2(x_1, lean::box(0), x_2); -return x_3; -} -} -obj* l_Lean_Parser_stringLit_Parser(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_Parser___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_tryView___at_Lean_Parser_stringLit_Parser___spec__1(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_stringLit_Parser___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_stringLit_Parser(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_stringLit_Parser_tokens(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -} -obj* l_Lean_Parser_stringLit_Parser_tokens___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_stringLit_Parser_tokens(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_stringLit_Parser_View___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_stringLit_HasView; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_Lean_Parser_stringLit_Parser_View___rarg___closed__2() { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_Lean_Parser_stringLit_HasView; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -return x_2; -} -} -obj* l_Lean_Parser_stringLit_Parser_View___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = l_Lean_Parser_stringLit_Parser_View___rarg___closed__1; -x_3 = l_Lean_Parser_stringLit_Parser_View___rarg___closed__2; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_stringLit_Parser_View(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_stringLit_Parser_View___rarg___boxed), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_stringLit_Parser_View___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_stringLit_Parser_View___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_stringLit_Parser_View___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_stringLit_Parser_View(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_3) == 0) -{ -obj* x_6; uint8 x_7; obj* x_8; -x_6 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -lean::cnstr_set(x_6, 2, x_2); -lean::cnstr_set(x_6, 3, x_4); -x_7 = 0; -x_8 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set_scalar(x_8, sizeof(void*)*1, x_7); -return x_8; -} -else -{ -obj* x_9; obj* x_10; uint8 x_11; obj* x_12; -lean::dec(x_5); -x_9 = lean::cnstr_get(x_3, 0); -lean::inc(x_9); -x_10 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_1); -lean::cnstr_set(x_10, 2, x_2); -lean::cnstr_set(x_10, 3, x_4); -x_11 = 0; -x_12 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set_scalar(x_12, sizeof(void*)*1, x_11); -return x_12; -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg___boxed), 5, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_stringLit_View_value___spec__2(uint32 x_1, obj* x_2) { -_start: -{ -uint8 x_3; -x_3 = l_String_OldIterator_hasNext___main(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_4 = lean::box(0); -x_5 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_6 = l_mjoin___rarg___closed__1; -x_7 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_5, x_6, x_4, x_4, x_2); -x_8 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_9 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_8, x_7); -return x_9; -} -else -{ -uint32 x_10; uint8 x_11; -x_10 = l_String_OldIterator_curr___main(x_2); -x_11 = x_10 == x_1; -if (x_11 == 0) -{ -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; -x_12 = l_Char_quoteCore(x_10); -x_13 = l_Char_HasRepr___closed__1; -x_14 = lean::string_append(x_13, x_12); -lean::dec(x_12); -x_15 = lean::string_append(x_14, x_13); -x_16 = lean::box(0); -x_17 = l_mjoin___rarg___closed__1; -x_18 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_15, x_17, x_16, x_16, x_2); -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_18); -return x_20; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; -x_21 = l_String_OldIterator_next___main(x_2); -x_22 = lean::box(0); -x_23 = lean::box_uint32(x_10); -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_21); -lean::cnstr_set(x_24, 2, x_22); -return x_24; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_any___at_Lean_Parser_stringLit_View_value___spec__5(obj* x_1) { -_start: -{ -uint8 x_2; -x_2 = l_String_OldIterator_hasNext___main(x_1); -if (x_2 == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::box(0); -x_4 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_5 = l_mjoin___rarg___closed__1; -x_6 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_4, x_5, x_3, x_3, x_1); -x_7 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_8 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_7, x_6); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_1); -x_10 = l_True_Decidable; -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_11 = l_Char_quoteCore(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_12, x_11); -lean::dec(x_11); -x_14 = lean::string_append(x_13, x_12); -x_15 = lean::box(0); -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_14, x_16, x_15, x_15, x_1); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_17); -return x_19; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = l_String_OldIterator_next___main(x_1); -x_21 = lean::box(0); -x_22 = lean::box_uint32(x_9); -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_20); -lean::cnstr_set(x_23, 2, x_21); -return x_23; -} -} -} -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_View_value___spec__7___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_4, 0, x_2); -x_5 = lean::box(0); -x_6 = l_mjoin___rarg___closed__1; -x_7 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_1, x_6, x_4, x_5, x_3); -lean::dec(x_4); -return x_7; -} -} -obj* l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_View_value___spec__7(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_View_value___spec__7___rarg), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_View_value___spec__9(obj* x_1) { -_start: -{ -uint8 x_2; -x_2 = l_String_OldIterator_hasNext___main(x_1); -if (x_2 == 0) -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::box(0); -x_4 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_5 = l_mjoin___rarg___closed__1; -x_6 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_4, x_5, x_3, x_3, x_1); -x_7 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_8 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_7, x_6); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = l_String_OldIterator_curr___main(x_1); -x_10 = l_Char_isDigit(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; -x_11 = l_Char_quoteCore(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean::string_append(x_12, x_11); -lean::dec(x_11); -x_14 = lean::string_append(x_13, x_12); -x_15 = lean::box(0); -x_16 = l_mjoin___rarg___closed__1; -x_17 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_14, x_16, x_15, x_15, x_1); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_17); -return x_19; -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_20 = l_String_OldIterator_next___main(x_1); -x_21 = lean::box(0); -x_22 = lean::box_uint32(x_9); -x_23 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_20); -lean::cnstr_set(x_23, 2, x_21); -return x_23; -} -} -} -} -obj* l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; uint8 x_4; obj* x_157; -lean::inc(x_1); -x_157 = l_Lean_Parser_MonadParsec_digit___at_Lean_Parser_stringLit_View_value___spec__9(x_1); -if (lean::obj_tag(x_157) == 0) -{ -uint8 x_158; -x_158 = !lean::is_exclusive(x_157); -if (x_158 == 0) -{ -obj* x_159; obj* x_160; uint32 x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; -x_159 = lean::cnstr_get(x_157, 0); -x_160 = lean::cnstr_get(x_157, 2); -x_161 = lean::unbox_uint32(x_159); -lean::dec(x_159); -x_162 = lean::uint32_to_nat(x_161); -x_163 = lean::mk_nat_obj(48u); -x_164 = lean::nat_sub(x_162, x_163); -lean::dec(x_162); -x_165 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_157, 2, x_165); -lean::cnstr_set(x_157, 0, x_164); -x_166 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_160, x_157); -if (lean::obj_tag(x_166) == 0) -{ -obj* x_167; obj* x_168; -lean::dec(x_1); -x_167 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_168 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_166, x_167); -return x_168; -} -else -{ -obj* x_169; uint8 x_170; -x_169 = lean::cnstr_get(x_166, 0); -lean::inc(x_169); -x_170 = lean::cnstr_get_scalar(x_166, sizeof(void*)*1); -x_2 = x_166; -x_3 = x_169; -x_4 = x_170; -goto block_156; -} -} -else -{ -obj* x_171; obj* x_172; obj* x_173; uint32 x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; -x_171 = lean::cnstr_get(x_157, 0); -x_172 = lean::cnstr_get(x_157, 1); -x_173 = lean::cnstr_get(x_157, 2); -lean::inc(x_173); -lean::inc(x_172); -lean::inc(x_171); -lean::dec(x_157); -x_174 = lean::unbox_uint32(x_171); -lean::dec(x_171); -x_175 = lean::uint32_to_nat(x_174); -x_176 = lean::mk_nat_obj(48u); -x_177 = lean::nat_sub(x_175, x_176); -lean::dec(x_175); -x_178 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_179 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_179, 0, x_177); -lean::cnstr_set(x_179, 1, x_172); -lean::cnstr_set(x_179, 2, x_178); -x_180 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_173, x_179); -if (lean::obj_tag(x_180) == 0) -{ -obj* x_181; obj* x_182; -lean::dec(x_1); -x_181 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_182 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_180, x_181); -return x_182; -} -else -{ -obj* x_183; uint8 x_184; -x_183 = lean::cnstr_get(x_180, 0); -lean::inc(x_183); -x_184 = lean::cnstr_get_scalar(x_180, sizeof(void*)*1); -x_2 = x_180; -x_3 = x_183; -x_4 = x_184; -goto block_156; -} -} -} -else -{ -uint8 x_185; -x_185 = !lean::is_exclusive(x_157); -if (x_185 == 0) -{ -obj* x_186; uint8 x_187; -x_186 = lean::cnstr_get(x_157, 0); -x_187 = lean::cnstr_get_scalar(x_157, sizeof(void*)*1); -lean::inc(x_186); -x_2 = x_157; -x_3 = x_186; -x_4 = x_187; -goto block_156; -} -else -{ -obj* x_188; uint8 x_189; obj* x_190; -x_188 = lean::cnstr_get(x_157, 0); -x_189 = lean::cnstr_get_scalar(x_157, sizeof(void*)*1); -lean::inc(x_188); -lean::dec(x_157); -lean::inc(x_188); -x_190 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_190, 0, x_188); -lean::cnstr_set_scalar(x_190, sizeof(void*)*1, x_189); -x_2 = x_190; -x_3 = x_188; -x_4 = x_189; -goto block_156; -} -} -block_156: -{ -obj* x_5; obj* x_6; uint8 x_7; -if (x_4 == 0) -{ -obj* x_85; uint8 x_126; -lean::dec(x_2); -x_126 = l_String_OldIterator_hasNext___main(x_1); -if (x_126 == 0) -{ -obj* x_127; obj* x_128; obj* x_129; obj* x_130; -x_127 = lean::box(0); -x_128 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_129 = l_mjoin___rarg___closed__1; -lean::inc(x_1); -x_130 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_128, x_129, x_127, x_127, x_1); -x_85 = x_130; -goto block_125; -} -else -{ -uint32 x_131; uint32 x_132; uint8 x_133; -x_131 = l_String_OldIterator_curr___main(x_1); -x_132 = 97; -x_133 = x_132 <= x_131; -if (x_133 == 0) -{ -obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; -x_134 = l_Char_quoteCore(x_131); -x_135 = l_Char_HasRepr___closed__1; -x_136 = lean::string_append(x_135, x_134); -lean::dec(x_134); -x_137 = lean::string_append(x_136, x_135); -x_138 = lean::box(0); -x_139 = l_mjoin___rarg___closed__1; -lean::inc(x_1); -x_140 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_137, x_139, x_138, x_138, x_1); -x_85 = x_140; -goto block_125; -} -else -{ -uint32 x_141; uint8 x_142; -x_141 = 102; -x_142 = x_131 <= x_141; -if (x_142 == 0) -{ -obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; -x_143 = l_Char_quoteCore(x_131); -x_144 = l_Char_HasRepr___closed__1; -x_145 = lean::string_append(x_144, x_143); -lean::dec(x_143); -x_146 = lean::string_append(x_145, x_144); -x_147 = lean::box(0); -x_148 = l_mjoin___rarg___closed__1; -lean::inc(x_1); -x_149 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_146, x_148, x_147, x_147, x_1); -x_85 = x_149; -goto block_125; -} -else -{ -obj* x_150; obj* x_151; obj* x_152; obj* x_153; -lean::inc(x_1); -x_150 = l_String_OldIterator_next___main(x_1); -x_151 = lean::box(0); -x_152 = lean::box_uint32(x_131); -x_153 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_153, 0, x_152); -lean::cnstr_set(x_153, 1, x_150); -lean::cnstr_set(x_153, 2, x_151); -x_85 = x_153; -goto block_125; -} -} -} -block_125: -{ -obj* x_86; obj* x_87; -x_86 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_87 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_86, x_85); -if (lean::obj_tag(x_87) == 0) -{ -uint8 x_88; -x_88 = !lean::is_exclusive(x_87); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; uint32 x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_89 = lean::cnstr_get(x_87, 0); -x_90 = lean::cnstr_get(x_87, 2); -x_91 = lean::unbox_uint32(x_89); -lean::dec(x_89); -x_92 = lean::uint32_to_nat(x_91); -x_93 = lean::mk_nat_obj(97u); -x_94 = lean::nat_sub(x_92, x_93); -lean::dec(x_92); -x_95 = lean::mk_nat_obj(10u); -x_96 = lean::nat_add(x_95, x_94); -lean::dec(x_94); -lean::cnstr_set(x_87, 2, x_86); -lean::cnstr_set(x_87, 0, x_96); -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_87); -if (lean::obj_tag(x_97) == 0) -{ -obj* x_98; obj* x_99; obj* x_100; -lean::dec(x_1); -x_98 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_3, x_97); -x_99 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_100 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_98, x_99); -return x_100; -} -else -{ -obj* x_101; uint8 x_102; -x_101 = lean::cnstr_get(x_97, 0); -lean::inc(x_101); -x_102 = lean::cnstr_get_scalar(x_97, sizeof(void*)*1); -x_5 = x_97; -x_6 = x_101; -x_7 = x_102; -goto block_84; -} -} -else -{ -obj* x_103; obj* x_104; obj* x_105; uint32 x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; -x_103 = lean::cnstr_get(x_87, 0); -x_104 = lean::cnstr_get(x_87, 1); -x_105 = lean::cnstr_get(x_87, 2); -lean::inc(x_105); -lean::inc(x_104); -lean::inc(x_103); -lean::dec(x_87); -x_106 = lean::unbox_uint32(x_103); -lean::dec(x_103); -x_107 = lean::uint32_to_nat(x_106); -x_108 = lean::mk_nat_obj(97u); -x_109 = lean::nat_sub(x_107, x_108); -lean::dec(x_107); -x_110 = lean::mk_nat_obj(10u); -x_111 = lean::nat_add(x_110, x_109); -lean::dec(x_109); -x_112 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_104); -lean::cnstr_set(x_112, 2, x_86); -x_113 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_105, x_112); -if (lean::obj_tag(x_113) == 0) -{ -obj* x_114; obj* x_115; obj* x_116; -lean::dec(x_1); -x_114 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_3, x_113); -x_115 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_116 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_114, x_115); -return x_116; -} -else -{ -obj* x_117; uint8 x_118; -x_117 = lean::cnstr_get(x_113, 0); -lean::inc(x_117); -x_118 = lean::cnstr_get_scalar(x_113, sizeof(void*)*1); -x_5 = x_113; -x_6 = x_117; -x_7 = x_118; -goto block_84; -} -} -} -else -{ -uint8 x_119; -x_119 = !lean::is_exclusive(x_87); -if (x_119 == 0) -{ -obj* x_120; uint8 x_121; -x_120 = lean::cnstr_get(x_87, 0); -x_121 = lean::cnstr_get_scalar(x_87, sizeof(void*)*1); -lean::inc(x_120); -x_5 = x_87; -x_6 = x_120; -x_7 = x_121; -goto block_84; -} -else -{ -obj* x_122; uint8 x_123; obj* x_124; -x_122 = lean::cnstr_get(x_87, 0); -x_123 = lean::cnstr_get_scalar(x_87, sizeof(void*)*1); -lean::inc(x_122); -lean::dec(x_87); -lean::inc(x_122); -x_124 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_124, 0, x_122); -lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_123); -x_5 = x_124; -x_6 = x_122; -x_7 = x_123; -goto block_84; -} -} -} -} -else -{ -obj* x_154; obj* x_155; -lean::dec(x_3); -lean::dec(x_1); -x_154 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_155 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_2, x_154); -return x_155; -} -block_84: -{ -if (x_7 == 0) -{ -obj* x_8; uint8 x_53; -lean::dec(x_5); -x_53 = l_String_OldIterator_hasNext___main(x_1); -if (x_53 == 0) -{ -obj* x_54; obj* x_55; obj* x_56; obj* x_57; -x_54 = lean::box(0); -x_55 = l_Lean_Parser_MonadParsec_eoiError___rarg___closed__1; -x_56 = l_mjoin___rarg___closed__1; -x_57 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_55, x_56, x_54, x_54, x_1); -x_8 = x_57; -goto block_52; -} -else -{ -uint32 x_58; uint32 x_59; uint8 x_60; -x_58 = l_String_OldIterator_curr___main(x_1); -x_59 = 65; -x_60 = x_59 <= x_58; -if (x_60 == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; -x_61 = l_Char_quoteCore(x_58); -x_62 = l_Char_HasRepr___closed__1; -x_63 = lean::string_append(x_62, x_61); -lean::dec(x_61); -x_64 = lean::string_append(x_63, x_62); -x_65 = lean::box(0); -x_66 = l_mjoin___rarg___closed__1; -x_67 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_64, x_66, x_65, x_65, x_1); -x_8 = x_67; -goto block_52; -} -else -{ -uint32 x_68; uint8 x_69; -x_68 = 70; -x_69 = x_58 <= x_68; -if (x_69 == 0) -{ -obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_70 = l_Char_quoteCore(x_58); -x_71 = l_Char_HasRepr___closed__1; -x_72 = lean::string_append(x_71, x_70); -lean::dec(x_70); -x_73 = lean::string_append(x_72, x_71); -x_74 = lean::box(0); -x_75 = l_mjoin___rarg___closed__1; -x_76 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_73, x_75, x_74, x_74, x_1); -x_8 = x_76; -goto block_52; -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_77 = l_String_OldIterator_next___main(x_1); -x_78 = lean::box(0); -x_79 = lean::box_uint32(x_58); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_77); -lean::cnstr_set(x_80, 2, x_78); -x_8 = x_80; -goto block_52; -} -} -} -block_52: -{ -obj* x_9; obj* x_10; -x_9 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_10 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_8); -if (lean::obj_tag(x_10) == 0) -{ -uint8 x_11; -x_11 = !lean::is_exclusive(x_10); -if (x_11 == 0) -{ -obj* x_12; obj* x_13; uint32 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_12 = lean::cnstr_get(x_10, 0); -x_13 = lean::cnstr_get(x_10, 2); -x_14 = lean::unbox_uint32(x_12); -lean::dec(x_12); -x_15 = lean::uint32_to_nat(x_14); -x_16 = lean::mk_nat_obj(65u); -x_17 = lean::nat_sub(x_15, x_16); -lean::dec(x_15); -x_18 = lean::mk_nat_obj(10u); -x_19 = lean::nat_add(x_18, x_17); -lean::dec(x_17); -lean::cnstr_set(x_10, 2, x_9); -lean::cnstr_set(x_10, 0, x_19); -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_10); -x_21 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_6, x_20); -x_22 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_3, x_21); -x_23 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_24 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_22, x_23); -return x_24; -} -else -{ -obj* x_25; obj* x_26; obj* x_27; uint32 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; -x_25 = lean::cnstr_get(x_10, 0); -x_26 = lean::cnstr_get(x_10, 1); -x_27 = lean::cnstr_get(x_10, 2); -lean::inc(x_27); -lean::inc(x_26); -lean::inc(x_25); -lean::dec(x_10); -x_28 = lean::unbox_uint32(x_25); -lean::dec(x_25); -x_29 = lean::uint32_to_nat(x_28); -x_30 = lean::mk_nat_obj(65u); -x_31 = lean::nat_sub(x_29, x_30); -lean::dec(x_29); -x_32 = lean::mk_nat_obj(10u); -x_33 = lean::nat_add(x_32, x_31); -lean::dec(x_31); -x_34 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_26); -lean::cnstr_set(x_34, 2, x_9); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_27, x_34); -x_36 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_6, x_35); -x_37 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_3, x_36); -x_38 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_39 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_37, x_38); -return x_39; -} -} -else -{ -uint8 x_40; -x_40 = !lean::is_exclusive(x_10); -if (x_40 == 0) -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_6, x_10); -x_42 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_3, x_41); -x_43 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_44 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_42, x_43); -return x_44; -} -else -{ -obj* x_45; uint8 x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; -x_45 = lean::cnstr_get(x_10, 0); -x_46 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -lean::inc(x_45); -lean::dec(x_10); -x_47 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_46); -x_48 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_6, x_47); -x_49 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_3, x_48); -x_50 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_51 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_49, x_50); -return x_51; -} -} -} -} -else -{ -obj* x_81; obj* x_82; obj* x_83; -lean::dec(x_6); -lean::dec(x_1); -x_81 = l_Lean_Parser_ParsecT_orelseMkRes___rarg(x_3, x_5); -x_82 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1; -x_83 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_81, x_82); -return x_83; -} -} -} -} -} -obj* l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_View_value___spec__6(obj* x_1) { -_start: -{ -obj* x_2; -lean::inc(x_1); -x_2 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_stringLit_View_value___spec__5(x_1); -if (lean::obj_tag(x_2) == 0) -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_2); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; uint32 x_7; uint32 x_8; uint8 x_9; -x_4 = lean::cnstr_get(x_2, 0); -x_5 = lean::cnstr_get(x_2, 1); -x_6 = lean::cnstr_get(x_2, 2); -x_7 = 92; -x_8 = lean::unbox_uint32(x_4); -x_9 = x_8 == x_7; -if (x_9 == 0) -{ -uint32 x_10; uint32 x_11; uint8 x_12; -x_10 = 34; -x_11 = lean::unbox_uint32(x_4); -x_12 = x_11 == x_10; -if (x_12 == 0) -{ -uint32 x_13; uint32 x_14; uint8 x_15; -x_13 = 39; -x_14 = lean::unbox_uint32(x_4); -x_15 = x_14 == x_13; -if (x_15 == 0) -{ -uint32 x_16; uint32 x_17; uint8 x_18; -x_16 = 110; -x_17 = lean::unbox_uint32(x_4); -x_18 = x_17 == x_16; -if (x_18 == 0) -{ -uint32 x_19; uint32 x_20; uint8 x_21; -x_19 = 116; -x_20 = lean::unbox_uint32(x_4); -x_21 = x_20 == x_19; -if (x_21 == 0) -{ -uint32 x_22; uint32 x_23; uint8 x_24; -lean::free_heap_obj(x_2); -x_22 = 120; -x_23 = lean::unbox_uint32(x_4); -x_24 = x_23 == x_22; -if (x_24 == 0) -{ -uint32 x_25; uint32 x_26; uint8 x_27; -x_25 = 117; -x_26 = lean::unbox_uint32(x_4); -lean::dec(x_4); -x_27 = x_26 == x_25; -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_28 = l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1; -x_29 = l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_View_value___spec__7___rarg(x_28, x_1, x_5); -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_29); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_30); -return x_32; -} -else -{ -obj* x_33; -lean::dec(x_1); -x_33 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_5); -if (lean::obj_tag(x_33) == 0) -{ -obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -x_35 = lean::cnstr_get(x_33, 1); -lean::inc(x_35); -x_36 = lean::cnstr_get(x_33, 2); -lean::inc(x_36); -lean::dec(x_33); -x_37 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_35); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_37, 1); -lean::inc(x_39); -x_40 = lean::cnstr_get(x_37, 2); -lean::inc(x_40); -lean::dec(x_37); -x_41 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_39); -if (lean::obj_tag(x_41) == 0) -{ -obj* x_42; obj* x_43; obj* x_44; obj* x_45; -x_42 = lean::cnstr_get(x_41, 0); -lean::inc(x_42); -x_43 = lean::cnstr_get(x_41, 1); -lean::inc(x_43); -x_44 = lean::cnstr_get(x_41, 2); -lean::inc(x_44); -lean::dec(x_41); -x_45 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_43); -if (lean::obj_tag(x_45) == 0) -{ -uint8 x_46; -x_46 = !lean::is_exclusive(x_45); -if (x_46 == 0) -{ -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; uint32 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_47 = lean::cnstr_get(x_45, 0); -x_48 = lean::cnstr_get(x_45, 2); -x_49 = lean::mk_nat_obj(16u); -x_50 = lean::nat_mul(x_49, x_34); -lean::dec(x_34); -x_51 = lean::nat_add(x_50, x_38); -lean::dec(x_38); -lean::dec(x_50); -x_52 = lean::nat_mul(x_49, x_51); -lean::dec(x_51); -x_53 = lean::nat_add(x_52, x_42); -lean::dec(x_42); -lean::dec(x_52); -x_54 = lean::nat_mul(x_49, x_53); -lean::dec(x_53); -x_55 = lean::nat_add(x_54, x_47); -lean::dec(x_47); -lean::dec(x_54); -x_56 = l_Char_ofNat(x_55); -lean::dec(x_55); -x_57 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_58 = lean::box_uint32(x_56); -lean::cnstr_set(x_45, 2, x_57); -lean::cnstr_set(x_45, 0, x_58); -x_59 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_45); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_61); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_63); -return x_64; -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; uint32 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_65 = lean::cnstr_get(x_45, 0); -x_66 = lean::cnstr_get(x_45, 1); -x_67 = lean::cnstr_get(x_45, 2); -lean::inc(x_67); -lean::inc(x_66); -lean::inc(x_65); -lean::dec(x_45); -x_68 = lean::mk_nat_obj(16u); -x_69 = lean::nat_mul(x_68, x_34); -lean::dec(x_34); -x_70 = lean::nat_add(x_69, x_38); -lean::dec(x_38); -lean::dec(x_69); -x_71 = lean::nat_mul(x_68, x_70); -lean::dec(x_70); -x_72 = lean::nat_add(x_71, x_42); -lean::dec(x_42); -lean::dec(x_71); -x_73 = lean::nat_mul(x_68, x_72); -lean::dec(x_72); -x_74 = lean::nat_add(x_73, x_65); -lean::dec(x_65); -lean::dec(x_73); -x_75 = l_Char_ofNat(x_74); -lean::dec(x_74); -x_76 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_77 = lean::box_uint32(x_75); -x_78 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_66); -lean::cnstr_set(x_78, 2, x_76); -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_78); -x_80 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_79); -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_80); -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_81); -x_83 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_82); -x_84 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_76, x_83); -return x_84; -} -} -else -{ -uint8 x_85; -lean::dec(x_42); -lean::dec(x_38); -lean::dec(x_34); -x_85 = !lean::is_exclusive(x_45); -if (x_85 == 0) -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; -x_86 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_45); -x_87 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_86); -x_88 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_87); -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_88); -x_90 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_91 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_90, x_89); -return x_91; -} -else -{ -obj* x_92; uint8 x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_92 = lean::cnstr_get(x_45, 0); -x_93 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); -lean::inc(x_92); -lean::dec(x_45); -x_94 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_93); -x_95 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_94); -x_96 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_95); -x_97 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_96); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_97); -x_99 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_99, x_98); -return x_100; -} -} -} -else -{ -uint8 x_101; -lean::dec(x_38); -lean::dec(x_34); -x_101 = !lean::is_exclusive(x_41); -if (x_101 == 0) -{ -obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; -x_102 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_41); -x_103 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_102); -x_104 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_103); -x_105 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_106 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_105, x_104); -return x_106; -} -else -{ -obj* x_107; uint8 x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_107 = lean::cnstr_get(x_41, 0); -x_108 = lean::cnstr_get_scalar(x_41, sizeof(void*)*1); -lean::inc(x_107); -lean::dec(x_41); -x_109 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_109, 0, x_107); -lean::cnstr_set_scalar(x_109, sizeof(void*)*1, x_108); -x_110 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_109); -x_111 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_110); -x_112 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_111); -x_113 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_114 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_113, x_112); -return x_114; -} -} -} -else -{ -uint8 x_115; -lean::dec(x_34); -x_115 = !lean::is_exclusive(x_37); -if (x_115 == 0) -{ -obj* x_116; obj* x_117; obj* x_118; obj* x_119; -x_116 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_37); -x_117 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_116); -x_118 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_119 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_118, x_117); -return x_119; -} -else -{ -obj* x_120; uint8 x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; -x_120 = lean::cnstr_get(x_37, 0); -x_121 = lean::cnstr_get_scalar(x_37, sizeof(void*)*1); -lean::inc(x_120); -lean::dec(x_37); -x_122 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_122, 0, x_120); -lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_121); -x_123 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_36, x_122); -x_124 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_123); -x_125 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_126 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_125, x_124); -return x_126; -} -} -} -else -{ -uint8 x_127; -x_127 = !lean::is_exclusive(x_33); -if (x_127 == 0) -{ -obj* x_128; obj* x_129; obj* x_130; -x_128 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_33); -x_129 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_130 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_129, x_128); -return x_130; -} -else -{ -obj* x_131; uint8 x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; -x_131 = lean::cnstr_get(x_33, 0); -x_132 = lean::cnstr_get_scalar(x_33, sizeof(void*)*1); -lean::inc(x_131); -lean::dec(x_33); -x_133 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_133, 0, x_131); -lean::cnstr_set_scalar(x_133, sizeof(void*)*1, x_132); -x_134 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_133); -x_135 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_136 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_135, x_134); -return x_136; -} -} -} -} -else -{ -obj* x_137; -lean::dec(x_4); -lean::dec(x_1); -x_137 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_5); -if (lean::obj_tag(x_137) == 0) -{ -obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_138 = lean::cnstr_get(x_137, 0); -lean::inc(x_138); -x_139 = lean::cnstr_get(x_137, 1); -lean::inc(x_139); -x_140 = lean::cnstr_get(x_137, 2); -lean::inc(x_140); -lean::dec(x_137); -x_141 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_139); -if (lean::obj_tag(x_141) == 0) -{ -uint8 x_142; -x_142 = !lean::is_exclusive(x_141); -if (x_142 == 0) -{ -obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; uint32 x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; -x_143 = lean::cnstr_get(x_141, 0); -x_144 = lean::cnstr_get(x_141, 2); -x_145 = lean::mk_nat_obj(16u); -x_146 = lean::nat_mul(x_145, x_138); -lean::dec(x_138); -x_147 = lean::nat_add(x_146, x_143); -lean::dec(x_143); -lean::dec(x_146); -x_148 = l_Char_ofNat(x_147); -lean::dec(x_147); -x_149 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_150 = lean::box_uint32(x_148); -lean::cnstr_set(x_141, 2, x_149); -lean::cnstr_set(x_141, 0, x_150); -x_151 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_144, x_141); -x_152 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_140, x_151); -x_153 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_152); -x_154 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_149, x_153); -return x_154; -} -else -{ -obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; uint32 x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; -x_155 = lean::cnstr_get(x_141, 0); -x_156 = lean::cnstr_get(x_141, 1); -x_157 = lean::cnstr_get(x_141, 2); -lean::inc(x_157); -lean::inc(x_156); -lean::inc(x_155); -lean::dec(x_141); -x_158 = lean::mk_nat_obj(16u); -x_159 = lean::nat_mul(x_158, x_138); -lean::dec(x_138); -x_160 = lean::nat_add(x_159, x_155); -lean::dec(x_155); -lean::dec(x_159); -x_161 = l_Char_ofNat(x_160); -lean::dec(x_160); -x_162 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_163 = lean::box_uint32(x_161); -x_164 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_164, 0, x_163); -lean::cnstr_set(x_164, 1, x_156); -lean::cnstr_set(x_164, 2, x_162); -x_165 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_157, x_164); -x_166 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_140, x_165); -x_167 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_166); -x_168 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_162, x_167); -return x_168; -} -} -else -{ -uint8 x_169; -lean::dec(x_138); -x_169 = !lean::is_exclusive(x_141); -if (x_169 == 0) -{ -obj* x_170; obj* x_171; obj* x_172; obj* x_173; -x_170 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_140, x_141); -x_171 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_170); -x_172 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_173 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_172, x_171); -return x_173; -} -else -{ -obj* x_174; uint8 x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; -x_174 = lean::cnstr_get(x_141, 0); -x_175 = lean::cnstr_get_scalar(x_141, sizeof(void*)*1); -lean::inc(x_174); -lean::dec(x_141); -x_176 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_176, 0, x_174); -lean::cnstr_set_scalar(x_176, sizeof(void*)*1, x_175); -x_177 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_140, x_176); -x_178 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_177); -x_179 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_180 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_179, x_178); -return x_180; -} -} -} -else -{ -uint8 x_181; -x_181 = !lean::is_exclusive(x_137); -if (x_181 == 0) -{ -obj* x_182; obj* x_183; obj* x_184; -x_182 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_137); -x_183 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_184 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_183, x_182); -return x_184; -} -else -{ -obj* x_185; uint8 x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; -x_185 = lean::cnstr_get(x_137, 0); -x_186 = lean::cnstr_get_scalar(x_137, sizeof(void*)*1); -lean::inc(x_185); -lean::dec(x_137); -x_187 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_187, 0, x_185); -lean::cnstr_set_scalar(x_187, sizeof(void*)*1, x_186); -x_188 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_187); -x_189 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_190 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_189, x_188); -return x_190; -} -} -} -} -else -{ -uint32 x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; -lean::dec(x_4); -lean::dec(x_1); -x_191 = 9; -x_192 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_193 = lean::box_uint32(x_191); -lean::cnstr_set(x_2, 2, x_192); -lean::cnstr_set(x_2, 0, x_193); -x_194 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_2); -x_195 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_192, x_194); -return x_195; -} -} -else -{ -uint32 x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; -lean::dec(x_4); -lean::dec(x_1); -x_196 = 10; -x_197 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_198 = lean::box_uint32(x_196); -lean::cnstr_set(x_2, 2, x_197); -lean::cnstr_set(x_2, 0, x_198); -x_199 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_2); -x_200 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_197, x_199); -return x_200; -} -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; -lean::dec(x_4); -lean::dec(x_1); -x_201 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_202 = lean::box_uint32(x_13); -lean::cnstr_set(x_2, 2, x_201); -lean::cnstr_set(x_2, 0, x_202); -x_203 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_2); -x_204 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_201, x_203); -return x_204; -} -} -else -{ -obj* x_205; obj* x_206; obj* x_207; obj* x_208; -lean::dec(x_4); -lean::dec(x_1); -x_205 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_206 = lean::box_uint32(x_10); -lean::cnstr_set(x_2, 2, x_205); -lean::cnstr_set(x_2, 0, x_206); -x_207 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_2); -x_208 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_205, x_207); -return x_208; -} -} -else -{ -obj* x_209; obj* x_210; obj* x_211; obj* x_212; -lean::dec(x_4); -lean::dec(x_1); -x_209 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_210 = lean::box_uint32(x_7); -lean::cnstr_set(x_2, 2, x_209); -lean::cnstr_set(x_2, 0, x_210); -x_211 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_6, x_2); -x_212 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_209, x_211); -return x_212; -} -} -else -{ -obj* x_213; obj* x_214; obj* x_215; uint32 x_216; uint32 x_217; uint8 x_218; -x_213 = lean::cnstr_get(x_2, 0); -x_214 = lean::cnstr_get(x_2, 1); -x_215 = lean::cnstr_get(x_2, 2); -lean::inc(x_215); -lean::inc(x_214); -lean::inc(x_213); -lean::dec(x_2); -x_216 = 92; -x_217 = lean::unbox_uint32(x_213); -x_218 = x_217 == x_216; -if (x_218 == 0) -{ -uint32 x_219; uint32 x_220; uint8 x_221; -x_219 = 34; -x_220 = lean::unbox_uint32(x_213); -x_221 = x_220 == x_219; -if (x_221 == 0) -{ -uint32 x_222; uint32 x_223; uint8 x_224; -x_222 = 39; -x_223 = lean::unbox_uint32(x_213); -x_224 = x_223 == x_222; -if (x_224 == 0) -{ -uint32 x_225; uint32 x_226; uint8 x_227; -x_225 = 110; -x_226 = lean::unbox_uint32(x_213); -x_227 = x_226 == x_225; -if (x_227 == 0) -{ -uint32 x_228; uint32 x_229; uint8 x_230; -x_228 = 116; -x_229 = lean::unbox_uint32(x_213); -x_230 = x_229 == x_228; -if (x_230 == 0) -{ -uint32 x_231; uint32 x_232; uint8 x_233; -x_231 = 120; -x_232 = lean::unbox_uint32(x_213); -x_233 = x_232 == x_231; -if (x_233 == 0) -{ -uint32 x_234; uint32 x_235; uint8 x_236; -x_234 = 117; -x_235 = lean::unbox_uint32(x_213); -lean::dec(x_213); -x_236 = x_235 == x_234; -if (x_236 == 0) -{ -obj* x_237; obj* x_238; obj* x_239; obj* x_240; obj* x_241; -x_237 = l_Lean_Parser_parseQuotedChar___rarg___lambda__7___closed__1; -x_238 = l_Lean_Parser_MonadParsec_unexpectedAt___at_Lean_Parser_stringLit_View_value___spec__7___rarg(x_237, x_1, x_214); -x_239 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_238); -x_240 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_241 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_240, x_239); -return x_241; -} -else -{ -obj* x_242; -lean::dec(x_1); -x_242 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_214); -if (lean::obj_tag(x_242) == 0) -{ -obj* x_243; obj* x_244; obj* x_245; obj* x_246; -x_243 = lean::cnstr_get(x_242, 0); -lean::inc(x_243); -x_244 = lean::cnstr_get(x_242, 1); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_242, 2); -lean::inc(x_245); -lean::dec(x_242); -x_246 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_244); -if (lean::obj_tag(x_246) == 0) -{ -obj* x_247; obj* x_248; obj* x_249; obj* x_250; -x_247 = lean::cnstr_get(x_246, 0); -lean::inc(x_247); -x_248 = lean::cnstr_get(x_246, 1); -lean::inc(x_248); -x_249 = lean::cnstr_get(x_246, 2); -lean::inc(x_249); -lean::dec(x_246); -x_250 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_248); -if (lean::obj_tag(x_250) == 0) -{ -obj* x_251; obj* x_252; obj* x_253; obj* x_254; -x_251 = lean::cnstr_get(x_250, 0); -lean::inc(x_251); -x_252 = lean::cnstr_get(x_250, 1); -lean::inc(x_252); -x_253 = lean::cnstr_get(x_250, 2); -lean::inc(x_253); -lean::dec(x_250); -x_254 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_252); -if (lean::obj_tag(x_254) == 0) -{ -obj* x_255; obj* x_256; obj* x_257; obj* x_258; obj* x_259; obj* x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_264; obj* x_265; uint32 x_266; obj* x_267; obj* x_268; obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_273; obj* x_274; obj* x_275; -x_255 = lean::cnstr_get(x_254, 0); -lean::inc(x_255); -x_256 = lean::cnstr_get(x_254, 1); -lean::inc(x_256); -x_257 = lean::cnstr_get(x_254, 2); -lean::inc(x_257); -if (lean::is_exclusive(x_254)) { - lean::cnstr_release(x_254, 0); - lean::cnstr_release(x_254, 1); - lean::cnstr_release(x_254, 2); - x_258 = x_254; -} else { - lean::dec_ref(x_254); - x_258 = lean::box(0); -} -x_259 = lean::mk_nat_obj(16u); -x_260 = lean::nat_mul(x_259, x_243); -lean::dec(x_243); -x_261 = lean::nat_add(x_260, x_247); -lean::dec(x_247); -lean::dec(x_260); -x_262 = lean::nat_mul(x_259, x_261); -lean::dec(x_261); -x_263 = lean::nat_add(x_262, x_251); -lean::dec(x_251); -lean::dec(x_262); -x_264 = lean::nat_mul(x_259, x_263); -lean::dec(x_263); -x_265 = lean::nat_add(x_264, x_255); -lean::dec(x_255); -lean::dec(x_264); -x_266 = l_Char_ofNat(x_265); -lean::dec(x_265); -x_267 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_268 = lean::box_uint32(x_266); -if (lean::is_scalar(x_258)) { - x_269 = lean::alloc_cnstr(0, 3, 0); -} else { - x_269 = x_258; -} -lean::cnstr_set(x_269, 0, x_268); -lean::cnstr_set(x_269, 1, x_256); -lean::cnstr_set(x_269, 2, x_267); -x_270 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_257, x_269); -x_271 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_253, x_270); -x_272 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_249, x_271); -x_273 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_272); -x_274 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_273); -x_275 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_267, x_274); -return x_275; -} -else -{ -obj* x_276; uint8 x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; obj* x_283; obj* x_284; obj* x_285; -lean::dec(x_251); -lean::dec(x_247); -lean::dec(x_243); -x_276 = lean::cnstr_get(x_254, 0); -lean::inc(x_276); -x_277 = lean::cnstr_get_scalar(x_254, sizeof(void*)*1); -if (lean::is_exclusive(x_254)) { - lean::cnstr_release(x_254, 0); - x_278 = x_254; -} else { - lean::dec_ref(x_254); - x_278 = lean::box(0); -} -if (lean::is_scalar(x_278)) { - x_279 = lean::alloc_cnstr(1, 1, 1); -} else { - x_279 = x_278; -} -lean::cnstr_set(x_279, 0, x_276); -lean::cnstr_set_scalar(x_279, sizeof(void*)*1, x_277); -x_280 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_253, x_279); -x_281 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_249, x_280); -x_282 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_281); -x_283 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_282); -x_284 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_285 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_284, x_283); -return x_285; -} -} -else -{ -obj* x_286; uint8 x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; obj* x_294; -lean::dec(x_247); -lean::dec(x_243); -x_286 = lean::cnstr_get(x_250, 0); -lean::inc(x_286); -x_287 = lean::cnstr_get_scalar(x_250, sizeof(void*)*1); -if (lean::is_exclusive(x_250)) { - lean::cnstr_release(x_250, 0); - x_288 = x_250; -} else { - lean::dec_ref(x_250); - x_288 = lean::box(0); -} -if (lean::is_scalar(x_288)) { - x_289 = lean::alloc_cnstr(1, 1, 1); -} else { - x_289 = x_288; -} -lean::cnstr_set(x_289, 0, x_286); -lean::cnstr_set_scalar(x_289, sizeof(void*)*1, x_287); -x_290 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_249, x_289); -x_291 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_290); -x_292 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_291); -x_293 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_294 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_293, x_292); -return x_294; -} -} -else -{ -obj* x_295; uint8 x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302; -lean::dec(x_243); -x_295 = lean::cnstr_get(x_246, 0); -lean::inc(x_295); -x_296 = lean::cnstr_get_scalar(x_246, sizeof(void*)*1); -if (lean::is_exclusive(x_246)) { - lean::cnstr_release(x_246, 0); - x_297 = x_246; -} else { - lean::dec_ref(x_246); - x_297 = lean::box(0); -} -if (lean::is_scalar(x_297)) { - x_298 = lean::alloc_cnstr(1, 1, 1); -} else { - x_298 = x_297; -} -lean::cnstr_set(x_298, 0, x_295); -lean::cnstr_set_scalar(x_298, sizeof(void*)*1, x_296); -x_299 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_245, x_298); -x_300 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_299); -x_301 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_302 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_301, x_300); -return x_302; -} -} -else -{ -obj* x_303; uint8 x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; -x_303 = lean::cnstr_get(x_242, 0); -lean::inc(x_303); -x_304 = lean::cnstr_get_scalar(x_242, sizeof(void*)*1); -if (lean::is_exclusive(x_242)) { - lean::cnstr_release(x_242, 0); - x_305 = x_242; -} else { - lean::dec_ref(x_242); - x_305 = lean::box(0); -} -if (lean::is_scalar(x_305)) { - x_306 = lean::alloc_cnstr(1, 1, 1); -} else { - x_306 = x_305; -} -lean::cnstr_set(x_306, 0, x_303); -lean::cnstr_set_scalar(x_306, sizeof(void*)*1, x_304); -x_307 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_306); -x_308 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_309 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_308, x_307); -return x_309; -} -} -} -else -{ -obj* x_310; -lean::dec(x_213); -lean::dec(x_1); -x_310 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_214); -if (lean::obj_tag(x_310) == 0) -{ -obj* x_311; obj* x_312; obj* x_313; obj* x_314; -x_311 = lean::cnstr_get(x_310, 0); -lean::inc(x_311); -x_312 = lean::cnstr_get(x_310, 1); -lean::inc(x_312); -x_313 = lean::cnstr_get(x_310, 2); -lean::inc(x_313); -lean::dec(x_310); -x_314 = l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_View_value___spec__8(x_312); -if (lean::obj_tag(x_314) == 0) -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; obj* x_319; obj* x_320; obj* x_321; uint32 x_322; obj* x_323; obj* x_324; obj* x_325; obj* x_326; obj* x_327; obj* x_328; obj* x_329; -x_315 = lean::cnstr_get(x_314, 0); -lean::inc(x_315); -x_316 = lean::cnstr_get(x_314, 1); -lean::inc(x_316); -x_317 = lean::cnstr_get(x_314, 2); -lean::inc(x_317); -if (lean::is_exclusive(x_314)) { - lean::cnstr_release(x_314, 0); - lean::cnstr_release(x_314, 1); - lean::cnstr_release(x_314, 2); - x_318 = x_314; -} else { - lean::dec_ref(x_314); - x_318 = lean::box(0); -} -x_319 = lean::mk_nat_obj(16u); -x_320 = lean::nat_mul(x_319, x_311); -lean::dec(x_311); -x_321 = lean::nat_add(x_320, x_315); -lean::dec(x_315); -lean::dec(x_320); -x_322 = l_Char_ofNat(x_321); -lean::dec(x_321); -x_323 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_324 = lean::box_uint32(x_322); -if (lean::is_scalar(x_318)) { - x_325 = lean::alloc_cnstr(0, 3, 0); -} else { - x_325 = x_318; -} -lean::cnstr_set(x_325, 0, x_324); -lean::cnstr_set(x_325, 1, x_316); -lean::cnstr_set(x_325, 2, x_323); -x_326 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_317, x_325); -x_327 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_313, x_326); -x_328 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_327); -x_329 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_323, x_328); -return x_329; -} -else -{ -obj* x_330; uint8 x_331; obj* x_332; obj* x_333; obj* x_334; obj* x_335; obj* x_336; obj* x_337; -lean::dec(x_311); -x_330 = lean::cnstr_get(x_314, 0); -lean::inc(x_330); -x_331 = lean::cnstr_get_scalar(x_314, sizeof(void*)*1); -if (lean::is_exclusive(x_314)) { - lean::cnstr_release(x_314, 0); - x_332 = x_314; -} else { - lean::dec_ref(x_314); - x_332 = lean::box(0); -} -if (lean::is_scalar(x_332)) { - x_333 = lean::alloc_cnstr(1, 1, 1); -} else { - x_333 = x_332; -} -lean::cnstr_set(x_333, 0, x_330); -lean::cnstr_set_scalar(x_333, sizeof(void*)*1, x_331); -x_334 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_313, x_333); -x_335 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_334); -x_336 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_337 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_336, x_335); -return x_337; -} -} -else -{ -obj* x_338; uint8 x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; obj* x_344; -x_338 = lean::cnstr_get(x_310, 0); -lean::inc(x_338); -x_339 = lean::cnstr_get_scalar(x_310, sizeof(void*)*1); -if (lean::is_exclusive(x_310)) { - lean::cnstr_release(x_310, 0); - x_340 = x_310; -} else { - lean::dec_ref(x_310); - x_340 = lean::box(0); -} -if (lean::is_scalar(x_340)) { - x_341 = lean::alloc_cnstr(1, 1, 1); -} else { - x_341 = x_340; -} -lean::cnstr_set(x_341, 0, x_338); -lean::cnstr_set_scalar(x_341, sizeof(void*)*1, x_339); -x_342 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_341); -x_343 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_344 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_343, x_342); -return x_344; -} -} -} -else -{ -uint32 x_345; obj* x_346; obj* x_347; obj* x_348; obj* x_349; obj* x_350; -lean::dec(x_213); -lean::dec(x_1); -x_345 = 9; -x_346 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_347 = lean::box_uint32(x_345); -x_348 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_348, 0, x_347); -lean::cnstr_set(x_348, 1, x_214); -lean::cnstr_set(x_348, 2, x_346); -x_349 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_348); -x_350 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_346, x_349); -return x_350; -} -} -else -{ -uint32 x_351; obj* x_352; obj* x_353; obj* x_354; obj* x_355; obj* x_356; -lean::dec(x_213); -lean::dec(x_1); -x_351 = 10; -x_352 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_353 = lean::box_uint32(x_351); -x_354 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_354, 0, x_353); -lean::cnstr_set(x_354, 1, x_214); -lean::cnstr_set(x_354, 2, x_352); -x_355 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_354); -x_356 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_352, x_355); -return x_356; -} -} -else -{ -obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; -lean::dec(x_213); -lean::dec(x_1); -x_357 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_358 = lean::box_uint32(x_222); -x_359 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_359, 0, x_358); -lean::cnstr_set(x_359, 1, x_214); -lean::cnstr_set(x_359, 2, x_357); -x_360 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_359); -x_361 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_357, x_360); -return x_361; -} -} -else -{ -obj* x_362; obj* x_363; obj* x_364; obj* x_365; obj* x_366; -lean::dec(x_213); -lean::dec(x_1); -x_362 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_363 = lean::box_uint32(x_219); -x_364 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_364, 0, x_363); -lean::cnstr_set(x_364, 1, x_214); -lean::cnstr_set(x_364, 2, x_362); -x_365 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_364); -x_366 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_362, x_365); -return x_366; -} -} -else -{ -obj* x_367; obj* x_368; obj* x_369; obj* x_370; obj* x_371; -lean::dec(x_213); -lean::dec(x_1); -x_367 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_368 = lean::box_uint32(x_216); -x_369 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_369, 0, x_368); -lean::cnstr_set(x_369, 1, x_214); -lean::cnstr_set(x_369, 2, x_367); -x_370 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_215, x_369); -x_371 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_367, x_370); -return x_371; -} -} -} -else -{ -uint8 x_372; -lean::dec(x_1); -x_372 = !lean::is_exclusive(x_2); -if (x_372 == 0) -{ -obj* x_373; obj* x_374; -x_373 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_374 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_373, x_2); -return x_374; -} -else -{ -obj* x_375; uint8 x_376; obj* x_377; obj* x_378; obj* x_379; -x_375 = lean::cnstr_get(x_2, 0); -x_376 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); -lean::inc(x_375); -lean::dec(x_2); -x_377 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_377, 0, x_375); -lean::cnstr_set_scalar(x_377, sizeof(void*)*1, x_376); -x_378 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_379 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_378, x_377); -return x_379; -} -} -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; obj* x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -x_8 = l_Lean_Parser_MonadParsec_any___at_Lean_Parser_stringLit_View_value___spec__5(x_3); -if (lean::obj_tag(x_8) == 0) -{ -uint8 x_9; -x_9 = !lean::is_exclusive(x_8); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; obj* x_12; uint32 x_13; uint32 x_14; uint8 x_15; -x_10 = lean::cnstr_get(x_8, 0); -x_11 = lean::cnstr_get(x_8, 1); -x_12 = lean::cnstr_get(x_8, 2); -x_13 = 92; -x_14 = lean::unbox_uint32(x_10); -x_15 = x_14 == x_13; -if (x_15 == 0) -{ -uint32 x_16; uint32 x_17; uint8 x_18; -x_16 = 34; -x_17 = lean::unbox_uint32(x_10); -x_18 = x_17 == x_16; -if (x_18 == 0) -{ -uint32 x_19; obj* x_20; obj* x_21; obj* x_22; -lean::free_heap_obj(x_8); -x_19 = lean::unbox_uint32(x_10); -lean::dec(x_10); -x_20 = lean::string_push(x_2, x_19); -x_21 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4(x_7, x_20, x_11); -lean::dec(x_7); -x_22 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_21); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -lean::dec(x_10); -lean::dec(x_7); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_8, 2, x_23); -lean::cnstr_set(x_8, 0, x_2); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_8); -return x_24; -} -} -else -{ -obj* x_25; -lean::free_heap_obj(x_8); -lean::dec(x_10); -x_25 = l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_View_value___spec__6(x_11); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_27; obj* x_28; uint32 x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -x_27 = lean::cnstr_get(x_25, 1); -lean::inc(x_27); -x_28 = lean::cnstr_get(x_25, 2); -lean::inc(x_28); -lean::dec(x_25); -x_29 = lean::unbox_uint32(x_26); -lean::dec(x_26); -x_30 = lean::string_push(x_2, x_29); -x_31 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4(x_7, x_30, x_27); -lean::dec(x_7); -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_28, x_31); -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_32); -return x_33; -} -else -{ -uint8 x_34; -lean::dec(x_7); -lean::dec(x_2); -x_34 = !lean::is_exclusive(x_25); -if (x_34 == 0) -{ -obj* x_35; -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_25); -return x_35; -} -else -{ -obj* x_36; uint8 x_37; obj* x_38; obj* x_39; -x_36 = lean::cnstr_get(x_25, 0); -x_37 = lean::cnstr_get_scalar(x_25, sizeof(void*)*1); -lean::inc(x_36); -lean::dec(x_25); -x_38 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_37); -x_39 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_12, x_38); -return x_39; -} -} -} -} -else -{ -obj* x_40; obj* x_41; obj* x_42; uint32 x_43; uint32 x_44; uint8 x_45; -x_40 = lean::cnstr_get(x_8, 0); -x_41 = lean::cnstr_get(x_8, 1); -x_42 = lean::cnstr_get(x_8, 2); -lean::inc(x_42); -lean::inc(x_41); -lean::inc(x_40); -lean::dec(x_8); -x_43 = 92; -x_44 = lean::unbox_uint32(x_40); -x_45 = x_44 == x_43; -if (x_45 == 0) -{ -uint32 x_46; uint32 x_47; uint8 x_48; -x_46 = 34; -x_47 = lean::unbox_uint32(x_40); -x_48 = x_47 == x_46; -if (x_48 == 0) -{ -uint32 x_49; obj* x_50; obj* x_51; obj* x_52; -x_49 = lean::unbox_uint32(x_40); -lean::dec(x_40); -x_50 = lean::string_push(x_2, x_49); -x_51 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4(x_7, x_50, x_41); -lean::dec(x_7); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_51); -return x_52; -} -else -{ -obj* x_53; obj* x_54; obj* x_55; -lean::dec(x_40); -lean::dec(x_7); -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_54 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_54, 0, x_2); -lean::cnstr_set(x_54, 1, x_41); -lean::cnstr_set(x_54, 2, x_53); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_54); -return x_55; -} -} -else -{ -obj* x_56; -lean::dec(x_40); -x_56 = l_Lean_Parser_parseQuotedChar___at_Lean_Parser_stringLit_View_value___spec__6(x_41); -if (lean::obj_tag(x_56) == 0) -{ -obj* x_57; obj* x_58; obj* x_59; uint32 x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_57 = lean::cnstr_get(x_56, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_56, 1); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_56, 2); -lean::inc(x_59); -lean::dec(x_56); -x_60 = lean::unbox_uint32(x_57); -lean::dec(x_57); -x_61 = lean::string_push(x_2, x_60); -x_62 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4(x_7, x_61, x_58); -lean::dec(x_7); -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_62); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_63); -return x_64; -} -else -{ -obj* x_65; uint8 x_66; obj* x_67; obj* x_68; obj* x_69; -lean::dec(x_7); -lean::dec(x_2); -x_65 = lean::cnstr_get(x_56, 0); -lean::inc(x_65); -x_66 = lean::cnstr_get_scalar(x_56, sizeof(void*)*1); -if (lean::is_exclusive(x_56)) { - lean::cnstr_release(x_56, 0); - x_67 = x_56; -} else { - lean::dec_ref(x_56); - x_67 = lean::box(0); -} -if (lean::is_scalar(x_67)) { - x_68 = lean::alloc_cnstr(1, 1, 1); -} else { - x_68 = x_67; -} -lean::cnstr_set(x_68, 0, x_65); -lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_66); -x_69 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_42, x_68); -return x_69; -} -} -} -} -else -{ -uint8 x_70; -lean::dec(x_7); -lean::dec(x_2); -x_70 = !lean::is_exclusive(x_8); -if (x_70 == 0) -{ -return x_8; -} -else -{ -obj* x_71; uint8 x_72; obj* x_73; -x_71 = lean::cnstr_get(x_8, 0); -x_72 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -lean::inc(x_71); -lean::dec(x_8); -x_73 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_73, 0, x_71); -lean::cnstr_set_scalar(x_73, sizeof(void*)*1, x_72); -return x_73; -} -} -} -else -{ -uint32 x_74; obj* x_75; -x_74 = 34; -x_75 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_stringLit_View_value___spec__2(x_74, x_3); -if (lean::obj_tag(x_75) == 0) -{ -uint8 x_76; -x_76 = !lean::is_exclusive(x_75); -if (x_76 == 0) -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; -x_77 = lean::cnstr_get(x_75, 2); -x_78 = lean::cnstr_get(x_75, 0); -lean::dec(x_78); -x_79 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_75, 2, x_79); -lean::cnstr_set(x_75, 0, x_2); -x_80 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_77, x_75); -return x_80; -} -else -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; -x_81 = lean::cnstr_get(x_75, 1); -x_82 = lean::cnstr_get(x_75, 2); -lean::inc(x_82); -lean::inc(x_81); -lean::dec(x_75); -x_83 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_84 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_84, 0, x_2); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_83); -x_85 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_82, x_84); -return x_85; -} -} -else -{ -uint8 x_86; -lean::dec(x_2); -x_86 = !lean::is_exclusive(x_75); -if (x_86 == 0) -{ -return x_75; -} -else -{ -obj* x_87; uint8 x_88; obj* x_89; -x_87 = lean::cnstr_get(x_75, 0); -x_88 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); -lean::inc(x_87); -lean::dec(x_75); -x_89 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_89, 0, x_87); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_88); -return x_89; -} -} -} -} -} -obj* l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_View_value___spec__1(obj* x_1) { -_start: -{ -uint32 x_2; obj* x_3; -x_2 = 34; -x_3 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_stringLit_View_value___spec__2(x_2, x_1); -if (lean::obj_tag(x_3) == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_4 = lean::cnstr_get(x_3, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_3, 2); -lean::inc(x_5); -lean::dec(x_3); -x_6 = l_String_OldIterator_remaining___main(x_4); -x_7 = l_String_splitAux___main___closed__1; -x_8 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4(x_6, x_7, x_4); -lean::dec(x_6); -x_9 = l_Lean_Parser_finishCommentBlock___closed__2; -x_10 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_9, x_8); -x_11 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_5, x_10); -return x_11; -} -else -{ -uint8 x_12; -x_12 = !lean::is_exclusive(x_3); -if (x_12 == 0) -{ -return x_3; -} -else -{ -obj* x_13; uint8 x_14; obj* x_15; -x_13 = lean::cnstr_get(x_3, 0); -x_14 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); -lean::inc(x_13); -lean::dec(x_3); -x_15 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set_scalar(x_15, sizeof(void*)*1, x_14); -return x_15; -} -} -} -} -obj* _init_l_Lean_Parser_stringLit_View_value___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_parseStringLiteral___at_Lean_Parser_stringLit_View_value___spec__1), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_stringLit_View_value(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -uint8 x_3; -x_3 = !lean::is_exclusive(x_1); -if (x_3 == 0) -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_4, 1); -lean::inc(x_5); -lean::dec(x_4); -x_6 = l_Lean_Parser_stringLit_View_value___closed__1; -x_7 = l_String_splitAux___main___closed__1; -x_8 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg(x_6, x_5, x_7); -if (lean::obj_tag(x_8) == 0) -{ -obj* x_9; -lean::dec(x_8); -lean::free_heap_obj(x_1); -x_9 = lean::box(0); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_8, 0); -lean::inc(x_10); -lean::dec(x_8); -lean::cnstr_set(x_1, 0, x_10); -return x_1; -} -} -else -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = lean::cnstr_get(x_1, 0); -lean::inc(x_11); -lean::dec(x_1); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -x_13 = l_Lean_Parser_stringLit_View_value___closed__1; -x_14 = l_String_splitAux___main___closed__1; -x_15 = l_Lean_Parser_ParsecT_run___at_Lean_Parser_Parsec_parse___spec__1___rarg(x_13, x_12, x_14); -if (lean::obj_tag(x_15) == 0) -{ -obj* x_16; -lean::dec(x_15); -x_16 = lean::box(0); -return x_16; -} -else -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_15, 0); -lean::inc(x_17); -lean::dec(x_15); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_17); -return x_18; -} -} -} -} -} -obj* l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_MonadParsec_error___at_Lean_Parser_stringLit_View_value___spec__3___rarg(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -return x_6; -} -} -obj* l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_stringLit_View_value___spec__2___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_1); -lean::dec(x_1); -x_4 = l_Lean_Parser_MonadParsec_ch___at_Lean_Parser_stringLit_View_value___spec__2(x_3, x_2); -return x_4; -} -} -obj* l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_parseStringLiteralAux___main___at_Lean_Parser_stringLit_View_value___spec__4(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_ident_Parser___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_2); -x_5 = l_Lean_Parser_token(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_5); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; uint8 x_10; -x_8 = lean::cnstr_get(x_5, 1); -x_9 = lean::cnstr_get(x_5, 0); -lean::dec(x_9); -x_10 = !lean::is_exclusive(x_6); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; -x_11 = lean::cnstr_get(x_6, 0); -x_12 = lean::cnstr_get(x_6, 1); -x_13 = lean::cnstr_get(x_6, 2); -if (lean::obj_tag(x_11) == 1) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; -lean::dec(x_3); -lean::dec(x_2); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_6, 2, x_35); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_6); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_36); -x_38 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_37, x_1); -x_39 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_38); -lean::cnstr_set(x_5, 0, x_39); -return x_5; -} -else -{ -obj* x_40; -lean::free_heap_obj(x_6); -lean::dec(x_11); -lean::free_heap_obj(x_5); -x_40 = lean::box(0); -x_14 = x_40; -goto block_34; -} -block_34: -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; -lean::dec(x_14); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_3); -x_16 = lean::box(0); -x_17 = l_String_splitAux___main___closed__1; -lean::inc(x_1); -x_18 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_17, x_1, x_15, x_16, x_2, x_12, x_8); -lean::dec(x_2); -lean::dec(x_15); -x_19 = !lean::is_exclusive(x_18); -if (x_19 == 0) -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_20 = lean::cnstr_get(x_18, 0); -x_21 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_20); -x_22 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_23 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_22, x_21); -x_24 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_23, x_1); -x_25 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_24); -lean::cnstr_set(x_18, 0, x_25); -return x_18; -} -else -{ -obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_26 = lean::cnstr_get(x_18, 0); -x_27 = lean::cnstr_get(x_18, 1); -lean::inc(x_27); -lean::inc(x_26); -lean::dec(x_18); -x_28 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_13, x_26); -x_29 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_30 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_29, x_28); -x_31 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_30, x_1); -x_32 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_31); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_27); -return x_33; -} -} -} -else -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -x_41 = lean::cnstr_get(x_6, 0); -x_42 = lean::cnstr_get(x_6, 1); -x_43 = lean::cnstr_get(x_6, 2); -lean::inc(x_43); -lean::inc(x_42); -lean::inc(x_41); -lean::dec(x_6); -if (lean::obj_tag(x_41) == 1) -{ -obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; -lean::dec(x_3); -lean::dec(x_2); -x_59 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_60 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_60, 0, x_41); -lean::cnstr_set(x_60, 1, x_42); -lean::cnstr_set(x_60, 2, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_61); -x_63 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_62, x_1); -x_64 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_63); -lean::cnstr_set(x_5, 0, x_64); -return x_5; -} -else -{ -obj* x_65; -lean::dec(x_41); -lean::free_heap_obj(x_5); -x_65 = lean::box(0); -x_44 = x_65; -goto block_58; -} -block_58: -{ -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; -lean::dec(x_44); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_3); -x_46 = lean::box(0); -x_47 = l_String_splitAux___main___closed__1; -lean::inc(x_1); -x_48 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_47, x_1, x_45, x_46, x_2, x_42, x_8); -lean::dec(x_2); -lean::dec(x_45); -x_49 = lean::cnstr_get(x_48, 0); -lean::inc(x_49); -x_50 = lean::cnstr_get(x_48, 1); -lean::inc(x_50); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - x_51 = x_48; -} else { - lean::dec_ref(x_48); - x_51 = lean::box(0); -} -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_43, x_49); -x_53 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_53, x_52); -x_55 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_54, x_1); -x_56 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_55); -if (lean::is_scalar(x_51)) { - x_57 = lean::alloc_cnstr(0, 2, 0); -} else { - x_57 = x_51; -} -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_50); -return x_57; -} -} -} -else -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_66 = lean::cnstr_get(x_5, 1); -lean::inc(x_66); -lean::dec(x_5); -x_67 = lean::cnstr_get(x_6, 0); -lean::inc(x_67); -x_68 = lean::cnstr_get(x_6, 1); -lean::inc(x_68); -x_69 = lean::cnstr_get(x_6, 2); -lean::inc(x_69); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_70 = x_6; -} else { - lean::dec_ref(x_6); - x_70 = lean::box(0); -} -if (lean::obj_tag(x_67) == 1) -{ -obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -lean::dec(x_3); -lean::dec(x_2); -x_86 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_70)) { - x_87 = lean::alloc_cnstr(0, 3, 0); -} else { - x_87 = x_70; -} -lean::cnstr_set(x_87, 0, x_67); -lean::cnstr_set(x_87, 1, x_68); -lean::cnstr_set(x_87, 2, x_86); -x_88 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_87); -x_89 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_86, x_88); -x_90 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_89, x_1); -x_91 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_90); -x_92 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_66); -return x_92; -} -else -{ -obj* x_93; -lean::dec(x_70); -lean::dec(x_67); -x_93 = lean::box(0); -x_71 = x_93; -goto block_85; -} -block_85: -{ -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; -lean::dec(x_71); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_3); -x_73 = lean::box(0); -x_74 = l_String_splitAux___main___closed__1; -lean::inc(x_1); -x_75 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_74, x_1, x_72, x_73, x_2, x_68, x_66); -lean::dec(x_2); -lean::dec(x_72); -x_76 = lean::cnstr_get(x_75, 0); -lean::inc(x_76); -x_77 = lean::cnstr_get(x_75, 1); -lean::inc(x_77); -if (lean::is_exclusive(x_75)) { - lean::cnstr_release(x_75, 0); - lean::cnstr_release(x_75, 1); - x_78 = x_75; -} else { - lean::dec_ref(x_75); - x_78 = lean::box(0); -} -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_76); -x_80 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_81 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_80, x_79); -x_82 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_81, x_1); -x_83 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_82); -if (lean::is_scalar(x_78)) { - x_84 = lean::alloc_cnstr(0, 2, 0); -} else { - x_84 = x_78; -} -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_77); -return x_84; -} -} -} -else -{ -uint8 x_94; -lean::dec(x_3); -lean::dec(x_2); -x_94 = !lean::is_exclusive(x_5); -if (x_94 == 0) -{ -obj* x_95; uint8 x_96; -x_95 = lean::cnstr_get(x_5, 0); -lean::dec(x_95); -x_96 = !lean::is_exclusive(x_6); -if (x_96 == 0) -{ -obj* x_97; obj* x_98; obj* x_99; obj* x_100; -x_97 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_97, x_6); -x_99 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_98, x_1); -x_100 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_99); -lean::cnstr_set(x_5, 0, x_100); -return x_5; -} -else -{ -obj* x_101; uint8 x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -x_101 = lean::cnstr_get(x_6, 0); -x_102 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_101); -lean::dec(x_6); -x_103 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_103, 0, x_101); -lean::cnstr_set_scalar(x_103, sizeof(void*)*1, x_102); -x_104 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_104, x_103); -x_106 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_105, x_1); -x_107 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_106); -lean::cnstr_set(x_5, 0, x_107); -return x_5; -} -} -else -{ -obj* x_108; obj* x_109; uint8 x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; -x_108 = lean::cnstr_get(x_5, 1); -lean::inc(x_108); -lean::dec(x_5); -x_109 = lean::cnstr_get(x_6, 0); -lean::inc(x_109); -x_110 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_111 = x_6; -} else { - lean::dec_ref(x_6); - x_111 = lean::box(0); -} -if (lean::is_scalar(x_111)) { - x_112 = lean::alloc_cnstr(1, 1, 1); -} else { - x_112 = x_111; -} -lean::cnstr_set(x_112, 0, x_109); -lean::cnstr_set_scalar(x_112, sizeof(void*)*1, x_110); -x_113 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_114 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_113, x_112); -x_115 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_114, x_1); -x_116 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_115); -x_117 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_117, 0, x_116); -lean::cnstr_set(x_117, 1, x_108); -return x_117; -} -} -} -} -obj* _init_l_Lean_Parser_ident_Parser___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::mk_string("identifier"); -x_2 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___rarg___lambda__1), 4, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; -} -} -obj* l_Lean_Parser_ident_Parser___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_ident_Parser___rarg___closed__1; -x_3 = lean::apply_2(x_1, lean::box(0), x_2); -return x_3; -} -} -obj* l_Lean_Parser_ident_Parser(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_ident_Parser___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ident_Parser(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ident_Parser_tokens(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -} -obj* l_Lean_Parser_ident_Parser_tokens___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_ident_Parser_tokens(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* _init_l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_1 = lean::box(0); -x_2 = lean::mk_string("NOTAnIdent"); -lean::inc(x_2); -x_3 = l_Lean_Parser_Substring_ofString(x_2); -x_4 = lean::box(0); -x_5 = lean_name_mk_string(x_4, x_2); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_3); -lean::cnstr_set(x_7, 2, x_5); -lean::cnstr_set(x_7, 3, x_6); -lean::cnstr_set(x_7, 4, x_6); -return x_7; -} -} -obj* _init_l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__2() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1; -return x_1; -} -} -obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 1) -{ -obj* x_2; -x_2 = lean::cnstr_get(x_1, 0); -lean::inc(x_2); -return x_2; -} -else -{ -obj* x_3; -x_3 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__2; -return x_3; -} -} -} -obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2, 0, x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_ident_Parser_View___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser_View___rarg___lambda__1___boxed), 1, 0); -return x_1; -} -} -obj* _init_l_Lean_Parser_ident_Parser_View___rarg___closed__2() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser_View___rarg___lambda__2), 1, 0); -return x_1; -} -} -obj* l_Lean_Parser_ident_Parser_View___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = l_Lean_Parser_ident_Parser_View___rarg___closed__1; -x_3 = l_Lean_Parser_ident_Parser_View___rarg___closed__2; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_ident_Parser_View(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_ident_Parser_View___rarg___boxed), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_ident_Parser_View___rarg___lambda__1___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ident_Parser_View___rarg___lambda__1(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ident_Parser_View___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ident_Parser_View___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_ident_Parser_View___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_ident_Parser_View(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* _init_l_Lean_Parser_rawIdent_Parser___rarg___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_token_4__ident_x27), 3, 0); -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_withTrailing___at_Lean_Parser_token___spec__3___boxed), 4, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_3, 0, x_1); -lean::closure_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_rawIdent_Parser___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; -x_2 = l_Lean_Parser_rawIdent_Parser___rarg___closed__1; -x_3 = lean::apply_2(x_1, lean::box(0), x_2); -return x_3; -} -} -obj* l_Lean_Parser_rawIdent_Parser(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_rawIdent_Parser___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_rawIdent_Parser___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_rawIdent_Parser(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_rawIdent_Parser_tokens(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -} -obj* l_Lean_Parser_rawIdent_Parser_tokens___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_rawIdent_Parser_tokens(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_rawIdent_Parser_View___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = l_Lean_Parser_ident_Parser_View___rarg___closed__1; -x_3 = l_Lean_Parser_ident_Parser_View___rarg___closed__2; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_rawIdent_Parser_View(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_rawIdent_Parser_View___rarg___boxed), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_rawIdent_Parser_View___rarg___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_rawIdent_Parser_View___rarg(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_rawIdent_Parser_View___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_rawIdent_Parser_View(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_symbolOrIdent___rarg___lambda__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; -lean::inc(x_3); -lean::inc(x_2); -x_5 = l_Lean_Parser_token(x_2, x_3, x_4); -x_6 = lean::cnstr_get(x_5, 0); -lean::inc(x_6); -if (lean::obj_tag(x_6) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; -x_7 = lean::cnstr_get(x_5, 1); -lean::inc(x_7); -if (lean::is_exclusive(x_5)) { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - x_8 = x_5; -} else { - lean::dec_ref(x_5); - x_8 = lean::box(0); -} -x_9 = lean::cnstr_get(x_6, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_6, 1); -lean::inc(x_10); -x_11 = lean::cnstr_get(x_6, 2); -lean::inc(x_11); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - lean::cnstr_release(x_6, 2); - x_12 = x_6; -} else { - lean::dec_ref(x_6); - x_12 = lean::box(0); -} -switch (lean::obj_tag(x_9)) { -case 0: -{ -obj* x_89; obj* x_90; obj* x_91; -x_89 = lean::cnstr_get(x_9, 0); -lean::inc(x_89); -x_90 = lean::cnstr_get(x_89, 1); -lean::inc(x_90); -lean::dec(x_89); -x_91 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_91, 0, x_90); -x_13 = x_91; -goto block_88; -} -case 1: -{ -obj* x_92; obj* x_93; obj* x_94; obj* x_95; -x_92 = lean::cnstr_get(x_9, 0); -lean::inc(x_92); -x_93 = lean::cnstr_get(x_92, 1); -lean::inc(x_93); -lean::dec(x_92); -x_94 = l_Lean_Parser_Substring_toString(x_93); -lean::dec(x_93); -x_95 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -x_13 = x_95; -goto block_88; -} -default: -{ -obj* x_96; -x_96 = lean::box(0); -x_13 = x_96; -goto block_88; -} -} -block_88: -{ -uint8 x_14; -if (lean::obj_tag(x_13) == 0) -{ -uint8 x_83; -x_83 = 1; -x_14 = x_83; -goto block_82; -} -else -{ -obj* x_84; uint8 x_85; -x_84 = lean::cnstr_get(x_13, 0); -lean::inc(x_84); -lean::dec(x_13); -x_85 = lean::string_dec_eq(x_84, x_1); -lean::dec(x_84); -if (x_85 == 0) -{ -uint8 x_86; -x_86 = 1; -x_14 = x_86; -goto block_82; -} -else -{ -uint8 x_87; -x_87 = 0; -x_14 = x_87; -goto block_82; -} -} -block_82: -{ -if (x_14 == 0) -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_15 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_12)) { - x_16 = lean::alloc_cnstr(0, 3, 0); -} else { - x_16 = x_12; -} -lean::cnstr_set(x_16, 0, x_9); -lean::cnstr_set(x_16, 1, x_10); -lean::cnstr_set(x_16, 2, x_15); -x_17 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_16); -x_18 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_19 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_18, x_17); -x_20 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_19); -if (lean::is_scalar(x_8)) { - x_21 = lean::alloc_cnstr(0, 2, 0); -} else { - x_21 = x_8; -} -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_7); -return x_21; -} -else -{ -obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -lean::dec(x_12); -lean::dec(x_8); -x_22 = l_String_quote(x_1); -x_23 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_3); -x_25 = lean::box(0); -x_26 = l_String_splitAux___main___closed__1; -x_27 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_26, x_23, x_24, x_25, x_2, x_10, x_7); -lean::dec(x_2); -lean::dec(x_24); -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -if (lean::obj_tag(x_28) == 0) -{ -uint8 x_29; -x_29 = !lean::is_exclusive(x_27); -if (x_29 == 0) -{ -obj* x_30; uint8 x_31; -x_30 = lean::cnstr_get(x_27, 0); -lean::dec(x_30); -x_31 = !lean::is_exclusive(x_28); -if (x_31 == 0) -{ -obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; -x_32 = lean::cnstr_get(x_28, 2); -x_33 = lean::cnstr_get(x_28, 0); -lean::dec(x_33); -x_34 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_28, 2, x_34); -lean::cnstr_set(x_28, 0, x_9); -x_35 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_28); -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_35); -x_37 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_34, x_36); -x_38 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_37); -lean::cnstr_set(x_27, 0, x_38); -return x_27; -} -else -{ -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_39 = lean::cnstr_get(x_28, 1); -x_40 = lean::cnstr_get(x_28, 2); -lean::inc(x_40); -lean::inc(x_39); -lean::dec(x_28); -x_41 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_42 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_42, 0, x_9); -lean::cnstr_set(x_42, 1, x_39); -lean::cnstr_set(x_42, 2, x_41); -x_43 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_40, x_42); -x_44 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_43); -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_41, x_44); -x_46 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_45); -lean::cnstr_set(x_27, 0, x_46); -return x_27; -} -} -else -{ -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; -x_47 = lean::cnstr_get(x_27, 1); -lean::inc(x_47); -lean::dec(x_27); -x_48 = lean::cnstr_get(x_28, 1); -lean::inc(x_48); -x_49 = lean::cnstr_get(x_28, 2); -lean::inc(x_49); -if (lean::is_exclusive(x_28)) { - lean::cnstr_release(x_28, 0); - lean::cnstr_release(x_28, 1); - lean::cnstr_release(x_28, 2); - x_50 = x_28; -} else { - lean::dec_ref(x_28); - x_50 = lean::box(0); -} -x_51 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_50)) { - x_52 = lean::alloc_cnstr(0, 3, 0); -} else { - x_52 = x_50; -} -lean::cnstr_set(x_52, 0, x_9); -lean::cnstr_set(x_52, 1, x_48); -lean::cnstr_set(x_52, 2, x_51); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_49, x_52); -x_54 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_53); -x_55 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_51, x_54); -x_56 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_55); -x_57 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_47); -return x_57; -} -} -else -{ -uint8 x_58; -lean::dec(x_9); -x_58 = !lean::is_exclusive(x_27); -if (x_58 == 0) -{ -obj* x_59; uint8 x_60; -x_59 = lean::cnstr_get(x_27, 0); -lean::dec(x_59); -x_60 = !lean::is_exclusive(x_28); -if (x_60 == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_28); -x_62 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_63 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_62, x_61); -x_64 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_63); -lean::cnstr_set(x_27, 0, x_64); -return x_27; -} -else -{ -obj* x_65; uint8 x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_65 = lean::cnstr_get(x_28, 0); -x_66 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -lean::inc(x_65); -lean::dec(x_28); -x_67 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_67, 0, x_65); -lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_66); -x_68 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_67); -x_69 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_70 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_68); -x_71 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_70); -lean::cnstr_set(x_27, 0, x_71); -return x_27; -} -} -else -{ -obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; -x_72 = lean::cnstr_get(x_27, 1); -lean::inc(x_72); -lean::dec(x_27); -x_73 = lean::cnstr_get(x_28, 0); -lean::inc(x_73); -x_74 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -if (lean::is_exclusive(x_28)) { - lean::cnstr_release(x_28, 0); - x_75 = x_28; -} else { - lean::dec_ref(x_28); - x_75 = lean::box(0); -} -if (lean::is_scalar(x_75)) { - x_76 = lean::alloc_cnstr(1, 1, 1); -} else { - x_76 = x_75; -} -lean::cnstr_set(x_76, 0, x_73); -lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_74); -x_77 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_11, x_76); -x_78 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_79 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_78, x_77); -x_80 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_79); -x_81 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_72); -return x_81; -} -} -} -} -} -} -else -{ -uint8 x_97; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -x_97 = !lean::is_exclusive(x_5); -if (x_97 == 0) -{ -obj* x_98; uint8 x_99; -x_98 = lean::cnstr_get(x_5, 0); -lean::dec(x_98); -x_99 = !lean::is_exclusive(x_6); -if (x_99 == 0) -{ -obj* x_100; obj* x_101; obj* x_102; -x_100 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_101 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_100, x_6); -x_102 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_101); -lean::cnstr_set(x_5, 0, x_102); -return x_5; -} -else -{ -obj* x_103; uint8 x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -x_103 = lean::cnstr_get(x_6, 0); -x_104 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -lean::inc(x_103); -lean::dec(x_6); -x_105 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_105, 0, x_103); -lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_104); -x_106 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_106, x_105); -x_108 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_107); -lean::cnstr_set(x_5, 0, x_108); -return x_5; -} -} -else -{ -obj* x_109; obj* x_110; uint8 x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; -x_109 = lean::cnstr_get(x_5, 1); -lean::inc(x_109); -lean::dec(x_5); -x_110 = lean::cnstr_get(x_6, 0); -lean::inc(x_110); -x_111 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); -if (lean::is_exclusive(x_6)) { - lean::cnstr_release(x_6, 0); - x_112 = x_6; -} else { - lean::dec_ref(x_6); - x_112 = lean::box(0); -} -if (lean::is_scalar(x_112)) { - x_113 = lean::alloc_cnstr(1, 1, 1); -} else { - x_113 = x_112; -} -lean::cnstr_set(x_113, 0, x_110); -lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_111); -x_114 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_115 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_114, x_113); -x_116 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_115); -x_117 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_117, 0, x_116); -lean::cnstr_set(x_117, 1, x_109); -return x_117; -} -} -} -} -obj* l_Lean_Parser_symbolOrIdent___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___rarg___lambda__1), 4, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::apply_2(x_1, lean::box(0), x_3); -return x_4; -} -} -obj* l_Lean_Parser_symbolOrIdent(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_symbolOrIdent___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_symbolOrIdent(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_symbolOrIdent_tokens(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = lean::box(0); -return x_4; -} -} -obj* l_Lean_Parser_symbolOrIdent_tokens___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_symbolOrIdent_tokens(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_symbolOrIdent_View___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = l_mjoin___rarg___closed__1; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_symbolOrIdent_View(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolOrIdent_View___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_symbolOrIdent_View___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_symbolOrIdent_View___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_symbolOrIdent_View___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_symbolOrIdent_View(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; obj* x_8; obj* x_9; -lean::inc(x_1); -x_7 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_7, 0, x_1); -lean::inc(x_5); -lean::inc(x_4); -x_8 = l_Lean_Parser_token(x_4, x_5, x_6); -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -if (lean::obj_tag(x_9) == 0) -{ -uint8 x_10; -x_10 = !lean::is_exclusive(x_8); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; uint8 x_13; -x_11 = lean::cnstr_get(x_8, 1); -x_12 = lean::cnstr_get(x_8, 0); -lean::dec(x_12); -x_13 = !lean::is_exclusive(x_9); -if (x_13 == 0) -{ -obj* x_14; obj* x_15; obj* x_16; obj* x_17; -x_14 = lean::cnstr_get(x_9, 0); -x_15 = lean::cnstr_get(x_9, 1); -x_16 = lean::cnstr_get(x_9, 2); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_38; obj* x_39; uint8 x_40; -x_38 = lean::cnstr_get(x_14, 0); -lean::inc(x_38); -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -lean::dec(x_38); -x_40 = lean::string_dec_eq(x_1, x_39); -lean::dec(x_1); -if (x_40 == 0) -{ -obj* x_41; obj* x_42; obj* x_43; obj* x_44; -lean::free_heap_obj(x_9); -lean::free_heap_obj(x_8); -x_41 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_41, 0, x_5); -x_42 = lean::box(0); -x_43 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_39, x_3, x_41, x_42, x_4, x_15, x_11); -lean::dec(x_4); -lean::dec(x_41); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -if (lean::obj_tag(x_44) == 0) -{ -uint8 x_45; -x_45 = !lean::is_exclusive(x_43); -if (x_45 == 0) -{ -obj* x_46; uint8 x_47; -x_46 = lean::cnstr_get(x_43, 0); -lean::dec(x_46); -x_47 = !lean::is_exclusive(x_44); -if (x_47 == 0) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_48 = lean::cnstr_get(x_44, 2); -x_49 = lean::cnstr_get(x_44, 0); -lean::dec(x_49); -x_50 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::cnstr_set(x_44, 2, x_50); -lean::cnstr_set(x_44, 0, x_14); -x_51 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_44); -x_52 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_51); -x_53 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_50, x_52); -x_54 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_53, x_7); -x_55 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_54); -lean::cnstr_set(x_43, 0, x_55); -return x_43; -} -else -{ -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_56 = lean::cnstr_get(x_44, 1); -x_57 = lean::cnstr_get(x_44, 2); -lean::inc(x_57); -lean::inc(x_56); -lean::dec(x_44); -x_58 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_59 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_59, 0, x_14); -lean::cnstr_set(x_59, 1, x_56); -lean::cnstr_set(x_59, 2, x_58); -x_60 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_57, x_59); -x_61 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_60); -x_62 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_58, x_61); -x_63 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_62, x_7); -x_64 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_63); -lean::cnstr_set(x_43, 0, x_64); -return x_43; -} -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; -x_65 = lean::cnstr_get(x_43, 1); -lean::inc(x_65); -lean::dec(x_43); -x_66 = lean::cnstr_get(x_44, 1); -lean::inc(x_66); -x_67 = lean::cnstr_get(x_44, 2); -lean::inc(x_67); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - lean::cnstr_release(x_44, 1); - lean::cnstr_release(x_44, 2); - x_68 = x_44; -} else { - lean::dec_ref(x_44); - x_68 = lean::box(0); -} -x_69 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_68)) { - x_70 = lean::alloc_cnstr(0, 3, 0); -} else { - x_70 = x_68; -} -lean::cnstr_set(x_70, 0, x_14); -lean::cnstr_set(x_70, 1, x_66); -lean::cnstr_set(x_70, 2, x_69); -x_71 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_67, x_70); -x_72 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_71); -x_73 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_69, x_72); -x_74 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_73, x_7); -x_75 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_74); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_65); -return x_76; -} -} -else -{ -uint8 x_77; -lean::dec(x_14); -x_77 = !lean::is_exclusive(x_43); -if (x_77 == 0) -{ -obj* x_78; uint8 x_79; -x_78 = lean::cnstr_get(x_43, 0); -lean::dec(x_78); -x_79 = !lean::is_exclusive(x_44); -if (x_79 == 0) -{ -obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; -x_80 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_44); -x_81 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_82 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_81, x_80); -x_83 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_82, x_7); -x_84 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_83); -lean::cnstr_set(x_43, 0, x_84); -return x_43; -} -else -{ -obj* x_85; uint8 x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -x_85 = lean::cnstr_get(x_44, 0); -x_86 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); -lean::inc(x_85); -lean::dec(x_44); -x_87 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_87, 0, x_85); -lean::cnstr_set_scalar(x_87, sizeof(void*)*1, x_86); -x_88 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_87); -x_89 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_90 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_89, x_88); -x_91 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_90, x_7); -x_92 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_91); -lean::cnstr_set(x_43, 0, x_92); -return x_43; -} -} -else -{ -obj* x_93; obj* x_94; uint8 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; -x_93 = lean::cnstr_get(x_43, 1); -lean::inc(x_93); -lean::dec(x_43); -x_94 = lean::cnstr_get(x_44, 0); -lean::inc(x_94); -x_95 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); -if (lean::is_exclusive(x_44)) { - lean::cnstr_release(x_44, 0); - x_96 = x_44; -} else { - lean::dec_ref(x_44); - x_96 = lean::box(0); -} -if (lean::is_scalar(x_96)) { - x_97 = lean::alloc_cnstr(1, 1, 1); -} else { - x_97 = x_96; -} -lean::cnstr_set(x_97, 0, x_94); -lean::cnstr_set_scalar(x_97, sizeof(void*)*1, x_95); -x_98 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_97); -x_99 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_100 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_99, x_98); -x_101 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_100, x_7); -x_102 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_101); -x_103 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_103, 0, x_102); -lean::cnstr_set(x_103, 1, x_93); -return x_103; -} -} -} -else -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; -lean::dec(x_39); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_104 = l_Lean_Parser_finishCommentBlock___closed__2; -lean::cnstr_set(x_9, 2, x_104); -x_105 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_9); -x_106 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_107 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_106, x_105); -x_108 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_107, x_7); -x_109 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_108); -lean::cnstr_set(x_8, 0, x_109); -return x_8; -} -} -else -{ -obj* x_110; -lean::free_heap_obj(x_9); -lean::dec(x_14); -lean::free_heap_obj(x_8); -lean::dec(x_1); -x_110 = lean::box(0); -x_17 = x_110; -goto block_37; -} -block_37: -{ -obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 x_22; -lean::dec(x_17); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_5); -x_19 = lean::box(0); -x_20 = l_String_splitAux___main___closed__1; -x_21 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_20, x_3, x_18, x_19, x_4, x_15, x_11); -lean::dec(x_4); -lean::dec(x_18); -x_22 = !lean::is_exclusive(x_21); -if (x_22 == 0) -{ -obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_21, 0); -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_23); -x_25 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_26 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_25, x_24); -x_27 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_26, x_7); -x_28 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_27); -lean::cnstr_set(x_21, 0, x_28); -return x_21; -} -else -{ -obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; -x_29 = lean::cnstr_get(x_21, 0); -x_30 = lean::cnstr_get(x_21, 1); -lean::inc(x_30); -lean::inc(x_29); -lean::dec(x_21); -x_31 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_16, x_29); -x_32 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_33 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_32, x_31); -x_34 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_33, x_7); -x_35 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_34); -x_36 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_30); -return x_36; -} -} -} -else -{ -obj* x_111; obj* x_112; obj* x_113; obj* x_114; -x_111 = lean::cnstr_get(x_9, 0); -x_112 = lean::cnstr_get(x_9, 1); -x_113 = lean::cnstr_get(x_9, 2); -lean::inc(x_113); -lean::inc(x_112); -lean::inc(x_111); -lean::dec(x_9); -if (lean::obj_tag(x_111) == 0) -{ -obj* x_129; obj* x_130; uint8 x_131; -x_129 = lean::cnstr_get(x_111, 0); -lean::inc(x_129); -x_130 = lean::cnstr_get(x_129, 1); -lean::inc(x_130); -lean::dec(x_129); -x_131 = lean::string_dec_eq(x_1, x_130); -lean::dec(x_1); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; obj* x_134; obj* x_135; -lean::free_heap_obj(x_8); -x_132 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_132, 0, x_5); -x_133 = lean::box(0); -x_134 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_130, x_3, x_132, x_133, x_4, x_112, x_11); -lean::dec(x_4); -lean::dec(x_132); -x_135 = lean::cnstr_get(x_134, 0); -lean::inc(x_135); -if (lean::obj_tag(x_135) == 0) -{ -obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; -x_136 = lean::cnstr_get(x_134, 1); -lean::inc(x_136); -if (lean::is_exclusive(x_134)) { - lean::cnstr_release(x_134, 0); - lean::cnstr_release(x_134, 1); - x_137 = x_134; -} else { - lean::dec_ref(x_134); - x_137 = lean::box(0); -} -x_138 = lean::cnstr_get(x_135, 1); -lean::inc(x_138); -x_139 = lean::cnstr_get(x_135, 2); -lean::inc(x_139); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - lean::cnstr_release(x_135, 1); - lean::cnstr_release(x_135, 2); - x_140 = x_135; -} else { - lean::dec_ref(x_135); - x_140 = lean::box(0); -} -x_141 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_140)) { - x_142 = lean::alloc_cnstr(0, 3, 0); -} else { - x_142 = x_140; -} -lean::cnstr_set(x_142, 0, x_111); -lean::cnstr_set(x_142, 1, x_138); -lean::cnstr_set(x_142, 2, x_141); -x_143 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_139, x_142); -x_144 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_113, x_143); -x_145 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_141, x_144); -x_146 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_145, x_7); -x_147 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_146); -if (lean::is_scalar(x_137)) { - x_148 = lean::alloc_cnstr(0, 2, 0); -} else { - x_148 = x_137; -} -lean::cnstr_set(x_148, 0, x_147); -lean::cnstr_set(x_148, 1, x_136); -return x_148; -} -else -{ -obj* x_149; obj* x_150; obj* x_151; uint8 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; -lean::dec(x_111); -x_149 = lean::cnstr_get(x_134, 1); -lean::inc(x_149); -if (lean::is_exclusive(x_134)) { - lean::cnstr_release(x_134, 0); - lean::cnstr_release(x_134, 1); - x_150 = x_134; -} else { - lean::dec_ref(x_134); - x_150 = lean::box(0); -} -x_151 = lean::cnstr_get(x_135, 0); -lean::inc(x_151); -x_152 = lean::cnstr_get_scalar(x_135, sizeof(void*)*1); -if (lean::is_exclusive(x_135)) { - lean::cnstr_release(x_135, 0); - x_153 = x_135; -} else { - lean::dec_ref(x_135); - x_153 = lean::box(0); -} -if (lean::is_scalar(x_153)) { - x_154 = lean::alloc_cnstr(1, 1, 1); -} else { - x_154 = x_153; -} -lean::cnstr_set(x_154, 0, x_151); -lean::cnstr_set_scalar(x_154, sizeof(void*)*1, x_152); -x_155 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_113, x_154); -x_156 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_157 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_156, x_155); -x_158 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_157, x_7); -x_159 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_158); -if (lean::is_scalar(x_150)) { - x_160 = lean::alloc_cnstr(0, 2, 0); -} else { - x_160 = x_150; -} -lean::cnstr_set(x_160, 0, x_159); -lean::cnstr_set(x_160, 1, x_149); -return x_160; -} -} -else -{ -obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; -lean::dec(x_130); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_161 = l_Lean_Parser_finishCommentBlock___closed__2; -x_162 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_162, 0, x_111); -lean::cnstr_set(x_162, 1, x_112); -lean::cnstr_set(x_162, 2, x_161); -x_163 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_113, x_162); -x_164 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_165 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_164, x_163); -x_166 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_165, x_7); -x_167 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_166); -lean::cnstr_set(x_8, 0, x_167); -return x_8; -} -} -else -{ -obj* x_168; -lean::dec(x_111); -lean::free_heap_obj(x_8); -lean::dec(x_1); -x_168 = lean::box(0); -x_114 = x_168; -goto block_128; -} -block_128: -{ -obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; -lean::dec(x_114); -x_115 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_115, 0, x_5); -x_116 = lean::box(0); -x_117 = l_String_splitAux___main___closed__1; -x_118 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_117, x_3, x_115, x_116, x_4, x_112, x_11); -lean::dec(x_4); -lean::dec(x_115); -x_119 = lean::cnstr_get(x_118, 0); -lean::inc(x_119); -x_120 = lean::cnstr_get(x_118, 1); -lean::inc(x_120); -if (lean::is_exclusive(x_118)) { - lean::cnstr_release(x_118, 0); - lean::cnstr_release(x_118, 1); - x_121 = x_118; -} else { - lean::dec_ref(x_118); - x_121 = lean::box(0); -} -x_122 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_113, x_119); -x_123 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_124 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_123, x_122); -x_125 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_124, x_7); -x_126 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_125); -if (lean::is_scalar(x_121)) { - x_127 = lean::alloc_cnstr(0, 2, 0); -} else { - x_127 = x_121; -} -lean::cnstr_set(x_127, 0, x_126); -lean::cnstr_set(x_127, 1, x_120); -return x_127; -} -} -} -else -{ -obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; -x_169 = lean::cnstr_get(x_8, 1); -lean::inc(x_169); -lean::dec(x_8); -x_170 = lean::cnstr_get(x_9, 0); -lean::inc(x_170); -x_171 = lean::cnstr_get(x_9, 1); -lean::inc(x_171); -x_172 = lean::cnstr_get(x_9, 2); -lean::inc(x_172); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - lean::cnstr_release(x_9, 2); - x_173 = x_9; -} else { - lean::dec_ref(x_9); - x_173 = lean::box(0); -} -if (lean::obj_tag(x_170) == 0) -{ -obj* x_189; obj* x_190; uint8 x_191; -x_189 = lean::cnstr_get(x_170, 0); -lean::inc(x_189); -x_190 = lean::cnstr_get(x_189, 1); -lean::inc(x_190); -lean::dec(x_189); -x_191 = lean::string_dec_eq(x_1, x_190); -lean::dec(x_1); -if (x_191 == 0) -{ -obj* x_192; obj* x_193; obj* x_194; obj* x_195; -lean::dec(x_173); -x_192 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_192, 0, x_5); -x_193 = lean::box(0); -x_194 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_190, x_3, x_192, x_193, x_4, x_171, x_169); -lean::dec(x_4); -lean::dec(x_192); -x_195 = lean::cnstr_get(x_194, 0); -lean::inc(x_195); -if (lean::obj_tag(x_195) == 0) -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; -x_196 = lean::cnstr_get(x_194, 1); -lean::inc(x_196); -if (lean::is_exclusive(x_194)) { - lean::cnstr_release(x_194, 0); - lean::cnstr_release(x_194, 1); - x_197 = x_194; -} else { - lean::dec_ref(x_194); - x_197 = lean::box(0); -} -x_198 = lean::cnstr_get(x_195, 1); -lean::inc(x_198); -x_199 = lean::cnstr_get(x_195, 2); -lean::inc(x_199); -if (lean::is_exclusive(x_195)) { - lean::cnstr_release(x_195, 0); - lean::cnstr_release(x_195, 1); - lean::cnstr_release(x_195, 2); - x_200 = x_195; -} else { - lean::dec_ref(x_195); - x_200 = lean::box(0); -} -x_201 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -if (lean::is_scalar(x_200)) { - x_202 = lean::alloc_cnstr(0, 3, 0); -} else { - x_202 = x_200; -} -lean::cnstr_set(x_202, 0, x_170); -lean::cnstr_set(x_202, 1, x_198); -lean::cnstr_set(x_202, 2, x_201); -x_203 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_199, x_202); -x_204 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_172, x_203); -x_205 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_201, x_204); -x_206 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_205, x_7); -x_207 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_206); -if (lean::is_scalar(x_197)) { - x_208 = lean::alloc_cnstr(0, 2, 0); -} else { - x_208 = x_197; -} -lean::cnstr_set(x_208, 0, x_207); -lean::cnstr_set(x_208, 1, x_196); -return x_208; -} -else -{ -obj* x_209; obj* x_210; obj* x_211; uint8 x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; -lean::dec(x_170); -x_209 = lean::cnstr_get(x_194, 1); -lean::inc(x_209); -if (lean::is_exclusive(x_194)) { - lean::cnstr_release(x_194, 0); - lean::cnstr_release(x_194, 1); - x_210 = x_194; -} else { - lean::dec_ref(x_194); - x_210 = lean::box(0); -} -x_211 = lean::cnstr_get(x_195, 0); -lean::inc(x_211); -x_212 = lean::cnstr_get_scalar(x_195, sizeof(void*)*1); -if (lean::is_exclusive(x_195)) { - lean::cnstr_release(x_195, 0); - x_213 = x_195; -} else { - lean::dec_ref(x_195); - x_213 = lean::box(0); -} -if (lean::is_scalar(x_213)) { - x_214 = lean::alloc_cnstr(1, 1, 1); -} else { - x_214 = x_213; -} -lean::cnstr_set(x_214, 0, x_211); -lean::cnstr_set_scalar(x_214, sizeof(void*)*1, x_212); -x_215 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_172, x_214); -x_216 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_217 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_216, x_215); -x_218 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_217, x_7); -x_219 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_218); -if (lean::is_scalar(x_210)) { - x_220 = lean::alloc_cnstr(0, 2, 0); -} else { - x_220 = x_210; -} -lean::cnstr_set(x_220, 0, x_219); -lean::cnstr_set(x_220, 1, x_209); -return x_220; -} -} -else -{ -obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; -lean::dec(x_190); -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -x_221 = l_Lean_Parser_finishCommentBlock___closed__2; -if (lean::is_scalar(x_173)) { - x_222 = lean::alloc_cnstr(0, 3, 0); -} else { - x_222 = x_173; -} -lean::cnstr_set(x_222, 0, x_170); -lean::cnstr_set(x_222, 1, x_171); -lean::cnstr_set(x_222, 2, x_221); -x_223 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_172, x_222); -x_224 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_225 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_224, x_223); -x_226 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_225, x_7); -x_227 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_226); -x_228 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_228, 0, x_227); -lean::cnstr_set(x_228, 1, x_169); -return x_228; -} -} -else -{ -obj* x_229; -lean::dec(x_173); -lean::dec(x_170); -lean::dec(x_1); -x_229 = lean::box(0); -x_174 = x_229; -goto block_188; -} -block_188: -{ -obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; -lean::dec(x_174); -x_175 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_175, 0, x_5); -x_176 = lean::box(0); -x_177 = l_String_splitAux___main___closed__1; -x_178 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_177, x_3, x_175, x_176, x_4, x_171, x_169); -lean::dec(x_4); -lean::dec(x_175); -x_179 = lean::cnstr_get(x_178, 0); -lean::inc(x_179); -x_180 = lean::cnstr_get(x_178, 1); -lean::inc(x_180); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - x_181 = x_178; -} else { - lean::dec_ref(x_178); - x_181 = lean::box(0); -} -x_182 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_172, x_179); -x_183 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_184 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_183, x_182); -x_185 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_184, x_7); -x_186 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_185); -if (lean::is_scalar(x_181)) { - x_187 = lean::alloc_cnstr(0, 2, 0); -} else { - x_187 = x_181; -} -lean::cnstr_set(x_187, 0, x_186); -lean::cnstr_set(x_187, 1, x_180); -return x_187; -} -} -} -else -{ -uint8 x_230; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_1); -x_230 = !lean::is_exclusive(x_8); -if (x_230 == 0) -{ -obj* x_231; uint8 x_232; -x_231 = lean::cnstr_get(x_8, 0); -lean::dec(x_231); -x_232 = !lean::is_exclusive(x_9); -if (x_232 == 0) -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; -x_233 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_234 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_233, x_9); -x_235 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_234, x_7); -x_236 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_235); -lean::cnstr_set(x_8, 0, x_236); -return x_8; -} -else -{ -obj* x_237; uint8 x_238; obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; -x_237 = lean::cnstr_get(x_9, 0); -x_238 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -lean::inc(x_237); -lean::dec(x_9); -x_239 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_239, 0, x_237); -lean::cnstr_set_scalar(x_239, sizeof(void*)*1, x_238); -x_240 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_241 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_240, x_239); -x_242 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_241, x_7); -x_243 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_242); -lean::cnstr_set(x_8, 0, x_243); -return x_8; -} -} -else -{ -obj* x_244; obj* x_245; uint8 x_246; obj* x_247; obj* x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; -x_244 = lean::cnstr_get(x_8, 1); -lean::inc(x_244); -lean::dec(x_8); -x_245 = lean::cnstr_get(x_9, 0); -lean::inc(x_245); -x_246 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (lean::is_exclusive(x_9)) { - lean::cnstr_release(x_9, 0); - x_247 = x_9; -} else { - lean::dec_ref(x_9); - x_247 = lean::box(0); -} -if (lean::is_scalar(x_247)) { - x_248 = lean::alloc_cnstr(1, 1, 1); -} else { - x_248 = x_247; -} -lean::cnstr_set(x_248, 0, x_245); -lean::cnstr_set_scalar(x_248, sizeof(void*)*1, x_246); -x_249 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_250 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_249, x_248); -x_251 = l_Lean_Parser_ParsecT_labelsMkRes___rarg(x_250, x_7); -x_252 = l_Lean_Parser_ParsecT_tryMkRes___rarg(x_251); -x_253 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_253, 0, x_252); -lean::cnstr_set(x_253, 1, x_244); -return x_253; -} -} -} -} -obj* l_List_foldl___main___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__3(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_6; -x_6 = lean::apply_3(x_1, x_3, x_4, x_5); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; -x_7 = lean::cnstr_get(x_2, 0); -lean::inc(x_7); -x_8 = lean::cnstr_get(x_2, 1); -lean::inc(x_8); -lean::dec(x_2); -x_9 = lean::alloc_closure(reinterpret_cast(l_ReaderT_orelse___at_Lean_Parser_parseBinLit___spec__1___rarg), 5, 2); -lean::closure_set(x_9, 0, x_1); -lean::closure_set(x_9, 1, x_7); -x_1 = x_9; -x_2 = x_8; -goto _start; -} -} -} -obj* l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__2(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_5 = lean::box(0); -x_6 = l_Lean_Parser_Combinators_anyOf___rarg___closed__1; -x_7 = l_mjoin___rarg___closed__1; -x_8 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_2, x_3, x_4); -lean::dec(x_2); -return x_8; -} -else -{ -obj* x_9; obj* x_10; obj* x_11; -x_9 = lean::cnstr_get(x_1, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); -lean::dec(x_1); -x_11 = l_List_foldl___main___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__3(x_9, x_10, x_2, x_3, x_4); -return x_11; -} -} -} -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::inc(x_3); -x_4 = l_Lean_Parser_symbol_tokens___rarg(x_1, x_3); -x_5 = l_Lean_Parser_symbol_tokens___rarg(x_2, x_3); -x_6 = lean::box(0); -x_7 = l_Lean_Parser_List_cons_tokens___rarg(x_5, x_6); -lean::dec(x_5); -x_8 = l_Lean_Parser_List_cons_tokens___rarg(x_4, x_7); -lean::dec(x_7); -lean::dec(x_4); -x_9 = l_Lean_Parser_tokens___rarg(x_8); -lean::dec(x_8); -x_10 = l_Lean_Parser_tokens___rarg(x_9); -lean::dec(x_9); -return x_10; -} -} -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg___boxed), 3, 0); -return x_3; -} -} -obj* l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -obj* x_7; -x_7 = l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean::dec(x_2); -return x_7; -} -} -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___rarg(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView___rarg(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_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; -x_5 = l_String_trim(x_2); -lean::inc(x_5); -x_6 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_6, 0, x_5); -lean::inc(x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_4); -lean::closure_set(x_7, 2, x_6); -x_8 = l_String_trim(x_3); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -lean::inc(x_13); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__2), 4, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = l_Lean_Parser_BasicParserM_Lean_Parser_MonadParsec; -x_16 = l_Lean_Parser_BasicParserM_Alternative; -x_17 = l_Lean_Parser_Combinators_anyOf_view___rarg(x_15, x_16, x_13); -lean::dec(x_13); -x_18 = l_Lean_Parser_Combinators_monadLift_view___rarg(x_1, x_14, x_17); -lean::dec(x_14); -return x_18; -} -} -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_unicodeSymbol_Lean_Parser_HasView(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_unicodeSymbol___rarg(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_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_5 = l_String_trim(x_2); -lean::inc(x_5); -x_6 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_6, 0, x_5); -lean::inc(x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_4); -lean::closure_set(x_7, 2, x_6); -x_8 = l_String_trim(x_3); -lean::inc(x_8); -x_9 = lean::alloc_closure(reinterpret_cast(l_DList_singleton___elambda__1___rarg), 2, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_symbolCore___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__1___boxed), 6, 3); -lean::closure_set(x_10, 0, x_8); -lean::closure_set(x_10, 1, x_4); -lean::closure_set(x_10, 2, x_9); -x_11 = lean::box(0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Combinators_anyOf___at_Lean_Parser_unicodeSymbol_Lean_Parser_HasTokens___spec__2), 4, 1); -lean::closure_set(x_14, 0, x_13); -x_15 = lean::apply_2(x_1, lean::box(0), x_14); -return x_15; -} -} -obj* l_Lean_Parser_unicodeSymbol(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_unicodeSymbol___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_unicodeSymbol___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_3); -lean::dec(x_2); -return x_5; -} -} -obj* l_Lean_Parser_unicodeSymbol___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_unicodeSymbol(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_Lean_Parser_unicodeSymbol_viewDefault___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = lean::box(0); -return x_5; -} -} -obj* l_Lean_Parser_unicodeSymbol_viewDefault(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_unicodeSymbol_viewDefault___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_unicodeSymbol_viewDefault___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Lean_Parser_unicodeSymbol_viewDefault___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_unicodeSymbol_viewDefault___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_unicodeSymbol_viewDefault(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_5; -x_5 = l_Lean_Parser_ParsecT_failure___at_Lean_Parser_token___spec__4___rarg(x_3, x_4); -return x_5; -} -else -{ -obj* x_6; obj* x_7; obj* x_8; obj* x_9; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -lean::inc(x_6); -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_4); -return x_9; -} -} -} -obj* l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__4___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_indexed___spec__4___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__5___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = l_Lean_Name_quickLt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -x_9 = l_Lean_Name_quickLt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; -lean::inc(x_6); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_6); -return x_10; -} -else -{ -x_1 = x_7; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at_Lean_Parser_indexed___spec__5___rarg___boxed), 2, 0); -return x_2; -} -} -obj* _init_l_Lean_Parser_indexed___rarg___lambda__1___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::mk_string("ident"); -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_indexed___rarg___lambda__1(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_6; obj* x_7; obj* x_8; obj* x_9; -lean::dec(x_2); -x_6 = lean::box(0); -x_7 = l_String_splitAux___main___closed__1; -x_8 = l_mjoin___rarg___closed__1; -x_9 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_7, x_8, x_6, x_6, x_3, x_4, x_5); -return x_9; -} -else -{ -obj* x_10; -x_10 = lean::cnstr_get(x_2, 0); -lean::inc(x_10); -lean::dec(x_2); -switch (lean::obj_tag(x_10)) { -case 0: -{ -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; uint8 x_17; -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -lean::dec(x_10); -x_12 = lean::cnstr_get(x_11, 1); -lean::inc(x_12); -lean::dec(x_11); -x_13 = lean::box(0); -x_14 = lean_name_mk_string(x_13, x_12); -x_15 = l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg(x_1, x_14); -lean::dec(x_14); -x_16 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_15, x_3, x_4, x_5); -lean::dec(x_15); -x_17 = !lean::is_exclusive(x_16); -if (x_17 == 0) -{ -obj* x_18; obj* x_19; obj* x_20; -x_18 = lean::cnstr_get(x_16, 0); -x_19 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_20 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_19, x_18); -lean::cnstr_set(x_16, 0, x_20); -return x_16; -} -else -{ -obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; -x_21 = lean::cnstr_get(x_16, 0); -x_22 = lean::cnstr_get(x_16, 1); -lean::inc(x_22); -lean::inc(x_21); -lean::dec(x_16); -x_23 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_24 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_23, x_21); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_22); -return x_25; -} -} -case 1: -{ -obj* x_26; obj* x_27; obj* x_28; uint8 x_29; -lean::dec(x_10); -x_26 = l_Lean_Parser_indexed___rarg___lambda__1___closed__1; -x_27 = l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg(x_1, x_26); -x_28 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_27, x_3, x_4, x_5); -lean::dec(x_27); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; obj* x_32; -x_30 = lean::cnstr_get(x_28, 0); -x_31 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_32 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_31, x_30); -lean::cnstr_set(x_28, 0, x_32); -return x_28; -} -else -{ -obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; -x_33 = lean::cnstr_get(x_28, 0); -x_34 = lean::cnstr_get(x_28, 1); -lean::inc(x_34); -lean::inc(x_33); -lean::dec(x_28); -x_35 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_36 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_35, x_33); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_34); -return x_37; -} -} -case 2: -{ -obj* x_38; obj* x_39; obj* x_40; obj* x_41; uint8 x_42; -x_38 = lean::cnstr_get(x_10, 0); -lean::inc(x_38); -lean::dec(x_10); -x_39 = lean::cnstr_get(x_38, 0); -lean::inc(x_39); -lean::dec(x_38); -x_40 = l_RBNode_find___main___at_Lean_Parser_indexed___spec__4___rarg(x_1, x_39); -lean::dec(x_39); -x_41 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_40, x_3, x_4, x_5); -lean::dec(x_40); -x_42 = !lean::is_exclusive(x_41); -if (x_42 == 0) -{ -obj* x_43; obj* x_44; obj* x_45; -x_43 = lean::cnstr_get(x_41, 0); -x_44 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_45 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_44, x_43); -lean::cnstr_set(x_41, 0, x_45); -return x_41; -} -else -{ -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; -x_46 = lean::cnstr_get(x_41, 0); -x_47 = lean::cnstr_get(x_41, 1); -lean::inc(x_47); -lean::inc(x_46); -lean::dec(x_41); -x_48 = l_Lean_Parser_Parsec_Result_mkEps___rarg___closed__1; -x_49 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_48, x_46); -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_47); -return x_50; -} -} -default: -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; -x_51 = lean::box(0); -x_52 = l_String_splitAux___main___closed__1; -x_53 = l_mjoin___rarg___closed__1; -x_54 = l_Lean_Parser_MonadParsec_error___at___private_init_lean_parser_token_1__finishCommentBlockAux___main___spec__1___rarg(x_52, x_53, x_51, x_51, x_3, x_4, x_5); -x_55 = lean::cnstr_get(x_54, 0); -lean::inc(x_55); -if (lean::obj_tag(x_55) == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; uint8 x_62; -x_56 = lean::cnstr_get(x_54, 1); -lean::inc(x_56); -lean::dec(x_54); -x_57 = lean::cnstr_get(x_55, 0); -lean::inc(x_57); -x_58 = lean::cnstr_get(x_55, 1); -lean::inc(x_58); -x_59 = lean::cnstr_get(x_55, 2); -lean::inc(x_59); -lean::dec(x_55); -x_60 = l_RBNode_find___main___at_Lean_Parser_indexed___spec__5___rarg(x_1, x_57); -lean::dec(x_57); -x_61 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_60, x_3, x_58, x_56); -lean::dec(x_60); -x_62 = !lean::is_exclusive(x_61); -if (x_62 == 0) -{ -obj* x_63; obj* x_64; -x_63 = lean::cnstr_get(x_61, 0); -x_64 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_63); -lean::cnstr_set(x_61, 0, x_64); -return x_61; -} -else -{ -obj* x_65; obj* x_66; obj* x_67; obj* x_68; -x_65 = lean::cnstr_get(x_61, 0); -x_66 = lean::cnstr_get(x_61, 1); -lean::inc(x_66); -lean::inc(x_65); -lean::dec(x_61); -x_67 = l_Lean_Parser_ParsecT_bindMkRes___rarg(x_59, x_65); -x_68 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_66); -return x_68; -} -} -else -{ -uint8 x_69; -x_69 = !lean::is_exclusive(x_54); -if (x_69 == 0) -{ -obj* x_70; uint8 x_71; -x_70 = lean::cnstr_get(x_54, 0); -lean::dec(x_70); -x_71 = !lean::is_exclusive(x_55); -if (x_71 == 0) -{ -return x_54; -} -else -{ -obj* x_72; uint8 x_73; obj* x_74; -x_72 = lean::cnstr_get(x_55, 0); -x_73 = lean::cnstr_get_scalar(x_55, sizeof(void*)*1); -lean::inc(x_72); -lean::dec(x_55); -x_74 = lean::alloc_cnstr(1, 1, 1); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set_scalar(x_74, sizeof(void*)*1, x_73); -lean::cnstr_set(x_54, 0, x_74); -return x_54; -} -} -else -{ -obj* x_75; obj* x_76; uint8 x_77; obj* x_78; obj* x_79; obj* x_80; -x_75 = lean::cnstr_get(x_54, 1); -lean::inc(x_75); -lean::dec(x_54); -x_76 = lean::cnstr_get(x_55, 0); -lean::inc(x_76); -x_77 = lean::cnstr_get_scalar(x_55, sizeof(void*)*1); -if (lean::is_exclusive(x_55)) { - lean::cnstr_release(x_55, 0); - x_78 = x_55; -} else { - lean::dec_ref(x_55); - x_78 = lean::box(0); -} -if (lean::is_scalar(x_78)) { - x_79 = lean::alloc_cnstr(1, 1, 1); -} else { - x_79 = x_78; -} -lean::cnstr_set(x_79, 0, x_76); -lean::cnstr_set_scalar(x_79, sizeof(void*)*1, x_77); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_75); -return x_80; -} -} -} -} -} -} -} -obj* _init_l_Lean_Parser_indexed___rarg___closed__1() { -_start: -{ -obj* x_1; -x_1 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_peekToken), 3, 0); -return x_1; -} -} -obj* l_Lean_Parser_indexed___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_4 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_indexed___rarg___lambda__1___boxed), 5, 1); -lean::closure_set(x_4, 0, x_3); -x_5 = l_Lean_Parser_indexed___rarg___closed__1; -x_6 = lean::alloc_closure(reinterpret_cast(l_ReaderT_bind___at_Lean_Parser_withTrailing___spec__2___rarg), 5, 2); -lean::closure_set(x_6, 0, x_5); -lean::closure_set(x_6, 1, x_4); -x_7 = lean::apply_2(x_1, lean::box(0), x_6); -return x_7; -} -} -obj* l_Lean_Parser_indexed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_indexed___rarg), 3, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_indexed___spec__1___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l_Option_toMonad___main___at_Lean_Parser_indexed___spec__2___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_2); -lean::dec(x_1); -return x_5; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_indexed___spec__3___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__4___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_indexed___spec__4___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_RBNode_find___main___at_Lean_Parser_indexed___spec__5___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_RBNode_find___main___at_Lean_Parser_indexed___spec__5___rarg(x_1, x_2); -lean::dec(x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l_Lean_Parser_indexed___rarg___lambda__1___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -obj* x_6; -x_6 = l_Lean_Parser_indexed___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean::dec(x_3); -lean::dec(x_1); -return x_6; -} -} -obj* l_Lean_Parser_indexed___boxed(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_indexed(x_1); -lean::dec(x_1); -return x_2; -} -} -obj* initialize_init_lean_parser_combinators(obj*); -obj* initialize_init_lean_parser_stringliteral(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_token(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_combinators(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_stringliteral(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_matchToken___closed__1 = _init_l_Lean_Parser_matchToken___closed__1(); -lean::mark_persistent(l_Lean_Parser_matchToken___closed__1); -l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1 = _init_l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__1); -l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__2 = _init_l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__2(); -lean::mark_persistent(l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__2); -l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__3 = _init_l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__3(); -lean::mark_persistent(l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__3); -l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__4 = _init_l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__4(); -lean::mark_persistent(l___private_init_lean_parser_token_1__finishCommentBlockAux___main___closed__4); -l_Lean_Parser_finishCommentBlock___closed__1 = _init_l_Lean_Parser_finishCommentBlock___closed__1(); -lean::mark_persistent(l_Lean_Parser_finishCommentBlock___closed__1); -l_Lean_Parser_finishCommentBlock___closed__2 = _init_l_Lean_Parser_finishCommentBlock___closed__2(); -lean::mark_persistent(l_Lean_Parser_finishCommentBlock___closed__2); -l___private_init_lean_parser_token_2__whitespaceAux___main___closed__1 = _init_l___private_init_lean_parser_token_2__whitespaceAux___main___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_token_2__whitespaceAux___main___closed__1); -l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2 = _init_l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2(); -lean::mark_persistent(l___private_init_lean_parser_token_2__whitespaceAux___main___closed__2); -l___private_init_lean_parser_token_2__whitespaceAux___main___closed__3 = _init_l___private_init_lean_parser_token_2__whitespaceAux___main___closed__3(); -lean::mark_persistent(l___private_init_lean_parser_token_2__whitespaceAux___main___closed__3); -l___private_init_lean_parser_token_2__whitespaceAux___main___closed__4 = _init_l___private_init_lean_parser_token_2__whitespaceAux___main___closed__4(); -lean::mark_persistent(l___private_init_lean_parser_token_2__whitespaceAux___main___closed__4); -l_Lean_Parser_withTrailing___rarg___closed__1 = _init_l_Lean_Parser_withTrailing___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_withTrailing___rarg___closed__1); -l_Lean_Parser_raw_view___rarg___closed__1 = _init_l_Lean_Parser_raw_view___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_raw_view___rarg___closed__1); -l_Lean_Parser_raw_view___rarg___closed__2 = _init_l_Lean_Parser_raw_view___rarg___closed__2(); -lean::mark_persistent(l_Lean_Parser_raw_view___rarg___closed__2); -l_Lean_Parser_detailIdentPartEscaped = _init_l_Lean_Parser_detailIdentPartEscaped(); -lean::mark_persistent(l_Lean_Parser_detailIdentPartEscaped); -l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__3 = _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_detailIdentPartEscaped_HasView_x27___elambda__1___closed__3); -l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdentPartEscaped_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_detailIdentPartEscaped_HasView_x27 = _init_l_Lean_Parser_detailIdentPartEscaped_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_detailIdentPartEscaped_HasView_x27); -l_Lean_Parser_detailIdentPartEscaped_HasView = _init_l_Lean_Parser_detailIdentPartEscaped_HasView(); -lean::mark_persistent(l_Lean_Parser_detailIdentPartEscaped_HasView); -l_Lean_Parser_detailIdentPart = _init_l_Lean_Parser_detailIdentPart(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart); -l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3 = _init_l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_HasView_x27___elambda__1___closed__3); -l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_detailIdentPart_HasView_x27 = _init_l_Lean_Parser_detailIdentPart_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_HasView_x27); -l_Lean_Parser_detailIdentPart_HasView = _init_l_Lean_Parser_detailIdentPart_HasView(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_HasView); -l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_Parser_Lean_Parser_HasView); -l_Lean_Parser_detailIdentPart_Parser___closed__1 = _init_l_Lean_Parser_detailIdentPart_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdentPart_Parser___closed__1); -l_Lean_Parser_detailIdentSuffix = _init_l_Lean_Parser_detailIdentSuffix(); -lean::mark_persistent(l_Lean_Parser_detailIdentSuffix); -l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1 = _init_l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdentSuffix_HasView_x27___elambda__2___closed__1); -l_Lean_Parser_detailIdentSuffix_HasView_x27 = _init_l_Lean_Parser_detailIdentSuffix_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_detailIdentSuffix_HasView_x27); -l_Lean_Parser_detailIdentSuffix_HasView = _init_l_Lean_Parser_detailIdentSuffix_HasView(); -lean::mark_persistent(l_Lean_Parser_detailIdentSuffix_HasView); -l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens = _init_l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens(); -lean::mark_persistent(l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasTokens); -l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView = _init_l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView(); -lean::mark_persistent(l_Lean_Parser_detailIdentSuffix_Parser_Lean_Parser_HasView); -l_Lean_Parser_detailIdentSuffix_Parser___closed__1 = _init_l_Lean_Parser_detailIdentSuffix_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdentSuffix_Parser___closed__1); -l_Lean_Parser_detailIdent = _init_l_Lean_Parser_detailIdent(); -lean::mark_persistent(l_Lean_Parser_detailIdent); -l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdent_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_detailIdent_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_detailIdent_HasView_x27 = _init_l_Lean_Parser_detailIdent_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_detailIdent_HasView_x27); -l_Lean_Parser_detailIdent_HasView = _init_l_Lean_Parser_detailIdent_HasView(); -lean::mark_persistent(l_Lean_Parser_detailIdent_HasView); -l_Lean_Parser_detailIdent_x27___closed__1 = _init_l_Lean_Parser_detailIdent_x27___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdent_x27___closed__1); -l_Lean_Parser_detailIdent_Parser___closed__1 = _init_l_Lean_Parser_detailIdent_Parser___closed__1(); -lean::mark_persistent(l_Lean_Parser_detailIdent_Parser___closed__1); -l___private_init_lean_parser_token_4__ident_x27___closed__1 = _init_l___private_init_lean_parser_token_4__ident_x27___closed__1(); -lean::mark_persistent(l___private_init_lean_parser_token_4__ident_x27___closed__1); -l_Lean_Parser_parseBinLit___closed__1 = _init_l_Lean_Parser_parseBinLit___closed__1(); -lean::mark_persistent(l_Lean_Parser_parseBinLit___closed__1); -l_Lean_Parser_number = _init_l_Lean_Parser_number(); -lean::mark_persistent(l_Lean_Parser_number); -l_Lean_Parser_number_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_number_HasView_x27___elambda__1___closed__2 = _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___elambda__1___closed__2); -l_Lean_Parser_number_HasView_x27___elambda__1___closed__3 = _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___elambda__1___closed__3); -l_Lean_Parser_number_HasView_x27___elambda__1___closed__4 = _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___elambda__1___closed__4); -l_Lean_Parser_number_HasView_x27___elambda__1___closed__5 = _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___elambda__1___closed__5); -l_Lean_Parser_number_HasView_x27___elambda__1___closed__6 = _init_l_Lean_Parser_number_HasView_x27___elambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___elambda__1___closed__6); -l_Lean_Parser_number_HasView_x27___lambda__1___closed__1 = _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___lambda__1___closed__1); -l_Lean_Parser_number_HasView_x27___lambda__1___closed__2 = _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___lambda__1___closed__2); -l_Lean_Parser_number_HasView_x27___lambda__1___closed__3 = _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__3(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___lambda__1___closed__3); -l_Lean_Parser_number_HasView_x27___lambda__1___closed__4 = _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__4(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___lambda__1___closed__4); -l_Lean_Parser_number_HasView_x27___lambda__1___closed__5 = _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__5(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___lambda__1___closed__5); -l_Lean_Parser_number_HasView_x27___lambda__1___closed__6 = _init_l_Lean_Parser_number_HasView_x27___lambda__1___closed__6(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27___lambda__1___closed__6); -l_Lean_Parser_number_HasView_x27 = _init_l_Lean_Parser_number_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_number_HasView_x27); -l_Lean_Parser_number_HasView = _init_l_Lean_Parser_number_HasView(); -lean::mark_persistent(l_Lean_Parser_number_HasView); -l_Lean_Parser_number_x27___closed__1 = _init_l_Lean_Parser_number_x27___closed__1(); -lean::mark_persistent(l_Lean_Parser_number_x27___closed__1); -l_Lean_Parser_stringLit = _init_l_Lean_Parser_stringLit(); -lean::mark_persistent(l_Lean_Parser_stringLit); -l_Lean_Parser_stringLit_HasView_x27___elambda__1___closed__1 = _init_l_Lean_Parser_stringLit_HasView_x27___elambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_stringLit_HasView_x27___elambda__1___closed__1); -l_Lean_Parser_stringLit_HasView_x27 = _init_l_Lean_Parser_stringLit_HasView_x27(); -lean::mark_persistent(l_Lean_Parser_stringLit_HasView_x27); -l_Lean_Parser_stringLit_HasView = _init_l_Lean_Parser_stringLit_HasView(); -lean::mark_persistent(l_Lean_Parser_stringLit_HasView); -l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1 = _init_l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1(); -lean::mark_persistent(l_Lean_Parser_parseHexDigit___at_Lean_Parser_stringLit_x27___spec__5___closed__1); -l_Lean_Parser_stringLit_x27___closed__1 = _init_l_Lean_Parser_stringLit_x27___closed__1(); -lean::mark_persistent(l_Lean_Parser_stringLit_x27___closed__1); -l_Lean_Parser_token___closed__1 = _init_l_Lean_Parser_token___closed__1(); -lean::mark_persistent(l_Lean_Parser_token___closed__1); -l_Lean_Parser_token___closed__2 = _init_l_Lean_Parser_token___closed__2(); -lean::mark_persistent(l_Lean_Parser_token___closed__2); -l_Lean_Parser_peekToken___closed__1 = _init_l_Lean_Parser_peekToken___closed__1(); -lean::mark_persistent(l_Lean_Parser_peekToken___closed__1); -l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_number_Parser___rarg___lambda__1___closed__1); -l_Lean_Parser_number_Parser___rarg___closed__1 = _init_l_Lean_Parser_number_Parser___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_number_Parser___rarg___closed__1); -l_Lean_Parser_number_Parser_view___rarg___closed__1 = _init_l_Lean_Parser_number_Parser_view___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_number_Parser_view___rarg___closed__1); -l_Lean_Parser_number_Parser_view___rarg___closed__2 = _init_l_Lean_Parser_number_Parser_view___rarg___closed__2(); -lean::mark_persistent(l_Lean_Parser_number_Parser_view___rarg___closed__2); -l_Lean_Parser_stringLit_Parser___rarg___closed__1 = _init_l_Lean_Parser_stringLit_Parser___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_stringLit_Parser___rarg___closed__1); -l_Lean_Parser_stringLit_Parser_View___rarg___closed__1 = _init_l_Lean_Parser_stringLit_Parser_View___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_stringLit_Parser_View___rarg___closed__1); -l_Lean_Parser_stringLit_Parser_View___rarg___closed__2 = _init_l_Lean_Parser_stringLit_Parser_View___rarg___closed__2(); -lean::mark_persistent(l_Lean_Parser_stringLit_Parser_View___rarg___closed__2); -l_Lean_Parser_stringLit_View_value___closed__1 = _init_l_Lean_Parser_stringLit_View_value___closed__1(); -lean::mark_persistent(l_Lean_Parser_stringLit_View_value___closed__1); -l_Lean_Parser_ident_Parser___rarg___closed__1 = _init_l_Lean_Parser_ident_Parser___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_ident_Parser___rarg___closed__1); -l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__1); -l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__2 = _init_l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__2(); -lean::mark_persistent(l_Lean_Parser_ident_Parser_View___rarg___lambda__1___closed__2); -l_Lean_Parser_ident_Parser_View___rarg___closed__1 = _init_l_Lean_Parser_ident_Parser_View___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_ident_Parser_View___rarg___closed__1); -l_Lean_Parser_ident_Parser_View___rarg___closed__2 = _init_l_Lean_Parser_ident_Parser_View___rarg___closed__2(); -lean::mark_persistent(l_Lean_Parser_ident_Parser_View___rarg___closed__2); -l_Lean_Parser_rawIdent_Parser___rarg___closed__1 = _init_l_Lean_Parser_rawIdent_Parser___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_rawIdent_Parser___rarg___closed__1); -l_Lean_Parser_indexed___rarg___lambda__1___closed__1 = _init_l_Lean_Parser_indexed___rarg___lambda__1___closed__1(); -lean::mark_persistent(l_Lean_Parser_indexed___rarg___lambda__1___closed__1); -l_Lean_Parser_indexed___rarg___closed__1 = _init_l_Lean_Parser_indexed___rarg___closed__1(); -lean::mark_persistent(l_Lean_Parser_indexed___rarg___closed__1); -return w; -} diff --git a/src/stage0/init/lean/parser/trie.cpp b/src/stage0/init/lean/parser/trie.cpp deleted file mode 100644 index 59eba76c4f..0000000000 --- a/src/stage0/init/lean/parser/trie.cpp +++ /dev/null @@ -1,11306 +0,0 @@ -// Lean compiler output -// Module: init.lean.parser.trie -// Imports: init.data.rbmap.default init.lean.format init.lean.parser.parsec -#include "runtime/object.h" -#include "runtime/apply.h" -typedef lean::object obj; typedef lean::usize usize; -typedef lean::uint8 uint8; typedef lean::uint16 uint16; -typedef lean::uint32 uint32; typedef lean::uint64 uint64; -#if defined(__clang__) -#pragma clang diagnostic ignored "-Wunused-parameter" -#pragma clang diagnostic ignored "-Wunused-label" -#elif defined(__GNUC__) && !defined(__CLANG__) -#pragma GCC diagnostic ignored "-Wunused-parameter" -#pragma GCC diagnostic ignored "-Wunused-label" -#pragma GCC diagnostic ignored "-Wunused-but-set-variable" -#endif -obj* l_RBNode_fold___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__2(obj*); -obj* l_RBNode_setBlack___main___rarg(obj*); -obj* l_Lean_Parser_Trie_oldMatchPrefix___rarg(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} -obj* l_Lean_Format_pretty(obj*, obj*); -obj* l___private_init_lean_parser_trie_3__findAux___rarg(obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_4__updtAcc___rarg___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___main(obj*); -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___main___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_6__oldMatchPrefixAux___main(obj*); -obj* l___private_init_lean_parser_trie_2__insertAux(obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Format_group___main(obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Format_joinSep___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__1(obj*, obj*); -uint32 l_String_OldIterator_curr___main(obj*); -obj* l_Lean_Parser_Trie_find(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1___rarg(obj*, uint32); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1(obj*); -obj* l_String_OldIterator_remaining___main(obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4(obj*); -extern obj* l_Lean_Options_empty; -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(obj*, uint32, obj*); -obj* l_Lean_Parser_Trie_insert___rarg(obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Trie_Inhabited(obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg___boxed(obj*, obj*, obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(obj*, uint32, obj*); -obj* l___private_init_lean_parser_trie_4__updtAcc(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1___rarg(obj*, uint32); -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___rarg(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_7__toStringAux___main(obj*); -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___rarg(obj*, obj*, obj*); -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5___rarg___boxed(obj*, obj*, obj*); -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2(obj*); -obj* l_Lean_Parser_Trie_oldMatchPrefix(obj*); -namespace lean { -obj* string_append(obj*, obj*); -} -obj* l___private_init_lean_parser_trie_3__findAux___main___rarg(obj*, obj*, obj*); -obj* l_String_OldIterator_next___main(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1(obj*); -obj* l___private_init_lean_parser_trie_3__findAux(obj*); -namespace lean { -uint8 string_utf8_at_end(obj*, obj*); -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3(obj*); -obj* l_Lean_Parser_Trie_HasEmptyc(obj*); -obj* l_Lean_Parser_Trie_HasToString___rarg(obj*); -extern obj* l_Char_HasRepr___closed__1; -obj* l___private_init_lean_parser_trie_2__insertAux___rarg(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_6__oldMatchPrefixAux___rarg(obj*, obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1___rarg___boxed(obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1___rarg___boxed(obj*, obj*); -obj* l_RBNode_singleton___rarg(obj*, obj*); -obj* l_RBNode_fold___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__2___rarg(obj*, obj*); -obj* l___private_init_lean_parser_trie_3__findAux___main(obj*); -obj* l_Char_quoteCore(uint32); -obj* l___private_init_lean_parser_trie_2__insertAux___main___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Trie_matchPrefix___rarg(obj*, obj*, obj*); -namespace lean { -uint8 nat_dec_eq(obj*, obj*); -} -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg(obj*, obj*, obj*); -uint8 l_UInt32_decLt(uint32, uint32); -obj* l_Lean_Parser_Trie_empty(obj*); -uint8 l_RBNode_isRed___main___rarg(obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1(obj*); -obj* l___private_init_lean_parser_trie_3__findAux___main___rarg___boxed(obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1___rarg(obj*, uint32); -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___rarg___boxed(obj*, obj*, obj*); -namespace lean { -uint32 string_utf8_get(obj*, obj*); -} -obj* l___private_init_lean_parser_trie_7__toStringAux___main___rarg(obj*); -obj* l___private_init_lean_parser_trie_4__updtAcc___rarg(obj*, obj*, obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Trie_find___rarg___boxed(obj*, obj*); -obj* l_Lean_Format_joinSep___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__1___boxed(obj*, obj*); -obj* l___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___rarg(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_5__matchPrefixAux(obj*); -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Trie_HasToString(obj*); -obj* l_Lean_Parser_Trie_insert___rarg___boxed(obj*, obj*, obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1___rarg___boxed(obj*, obj*); -obj* l_Lean_Parser_Trie_HasEmptyc___closed__1; -obj* l_Lean_Parser_Trie_matchPrefix(obj*); -obj* l_Lean_Parser_Trie_matchPrefix___rarg___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_3__findAux___rarg___boxed(obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_1__insertEmptyAux(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1(obj*); -obj* l_Lean_Parser_Trie_empty___closed__1; -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(obj*, uint32, obj*); -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2___rarg(obj*, uint32, obj*); -namespace lean { -obj* string_utf8_next(obj*, obj*); -} -obj* l___private_init_lean_parser_trie_7__toStringAux___rarg(obj*); -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5(obj*); -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___main(obj*); -obj* l___private_init_lean_parser_trie_2__insertAux___main(obj*); -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(obj*, uint32, obj*); -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5___rarg(obj*, uint32, obj*); -obj* l___private_init_lean_parser_trie_6__oldMatchPrefixAux(obj*); -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1___rarg(obj*, uint32); -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg___boxed(obj*, obj*, obj*); -obj* l_Lean_Parser_Trie_find___rarg(obj*, obj*); -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7(obj*); -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___main___rarg(obj*, obj*, obj*, obj*); -obj* l_Lean_Parser_Trie_insert(obj*); -obj* l___private_init_lean_parser_trie_7__toStringAux(obj*); -obj* l___private_init_lean_parser_trie_2__insertAux___rarg___boxed(obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_trie_2__insertAux___main___rarg(obj*, obj*, obj*, obj*); -obj* _init_l_Lean_Parser_Trie_empty___closed__1() { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = lean::box(0); -x_2 = lean::box(0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_2); -return x_3; -} -} -obj* l_Lean_Parser_Trie_empty(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Trie_empty___closed__1; -return x_2; -} -} -obj* _init_l_Lean_Parser_Trie_HasEmptyc___closed__1() { -_start: -{ -obj* x_1; -x_1 = l_Lean_Parser_Trie_empty(lean::box(0)); -return x_1; -} -} -obj* l_Lean_Parser_Trie_HasEmptyc(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Trie_HasEmptyc___closed__1; -return x_2; -} -} -obj* l_Lean_Parser_Trie_Inhabited(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l_Lean_Parser_Trie_empty___closed__1; -return x_2; -} -} -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = lean::string_utf8_at_end(x_1, x_3); -if (x_4 == 0) -{ -uint32 x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_5 = lean::string_utf8_get(x_1, x_3); -x_6 = lean::string_utf8_next(x_1, x_3); -x_7 = l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg(x_1, x_2, x_6); -lean::dec(x_6); -x_8 = lean::box(0); -x_9 = lean::box_uint32(x_5); -x_10 = l_RBNode_singleton___rarg(x_9, x_7); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -else -{ -obj* x_12; obj* x_13; obj* x_14; -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_2); -x_13 = lean::box(0); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -return x_14; -} -} -} -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg(x_1, x_2, x_3); -return x_4; -} -} -obj* l___private_init_lean_parser_trie_1__insertEmptyAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_1__insertEmptyAux___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_1__insertEmptyAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_trie_1__insertEmptyAux___rarg(x_1, x_2, x_3); -lean::dec(x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1___rarg(obj* x_1, uint32 x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint32 x_8; uint8 x_9; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 2); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 3); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::unbox_uint32(x_5); -x_9 = x_2 < x_8; -if (x_9 == 0) -{ -uint32 x_10; uint8 x_11; -lean::dec(x_4); -x_10 = lean::unbox_uint32(x_5); -lean::dec(x_5); -x_11 = x_10 < x_2; -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_6); -return x_12; -} -else -{ -lean::dec(x_6); -x_1 = x_7; -goto _start; -} -} -else -{ -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(obj* x_1, uint32 x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; obj* x_6; -x_4 = 0; -x_5 = lean::box_uint32(x_2); -x_6 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_3); -lean::cnstr_set(x_6, 3, x_1); -lean::cnstr_set_scalar(x_6, sizeof(void*)*4, x_4); -return x_6; -} -else -{ -uint8 x_7; -x_7 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_7 == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint32 x_13; uint8 x_14; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_1, 2); -x_12 = lean::cnstr_get(x_1, 3); -x_13 = lean::unbox_uint32(x_10); -x_14 = x_2 < x_13; -if (x_14 == 0) -{ -uint32 x_15; uint8 x_16; -x_15 = lean::unbox_uint32(x_10); -x_16 = x_15 < x_2; -if (x_16 == 0) -{ -obj* x_17; -lean::dec(x_11); -lean::dec(x_10); -x_17 = lean::box_uint32(x_2); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_17); -return x_1; -} -else -{ -obj* x_18; -x_18 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_12, x_2, x_3); -lean::cnstr_set(x_1, 3, x_18); -return x_1; -} -} -else -{ -obj* x_19; -x_19 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_9, x_2, x_3); -lean::cnstr_set(x_1, 0, x_19); -return x_1; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint32 x_24; uint8 x_25; -x_20 = lean::cnstr_get(x_1, 0); -x_21 = lean::cnstr_get(x_1, 1); -x_22 = lean::cnstr_get(x_1, 2); -x_23 = lean::cnstr_get(x_1, 3); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_1); -x_24 = lean::unbox_uint32(x_21); -x_25 = x_2 < x_24; -if (x_25 == 0) -{ -uint32 x_26; uint8 x_27; -x_26 = lean::unbox_uint32(x_21); -x_27 = x_26 < x_2; -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -lean::dec(x_22); -lean::dec(x_21); -x_28 = lean::box_uint32(x_2); -x_29 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_29, 0, x_20); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_29, 2, x_3); -lean::cnstr_set(x_29, 3, x_23); -lean::cnstr_set_scalar(x_29, sizeof(void*)*4, x_7); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_23, x_2, x_3); -x_31 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_31, 0, x_20); -lean::cnstr_set(x_31, 1, x_21); -lean::cnstr_set(x_31, 2, x_22); -lean::cnstr_set(x_31, 3, x_30); -lean::cnstr_set_scalar(x_31, sizeof(void*)*4, x_7); -return x_31; -} -} -else -{ -obj* x_32; obj* x_33; -x_32 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_20, x_2, x_3); -x_33 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_21); -lean::cnstr_set(x_33, 2, x_22); -lean::cnstr_set(x_33, 3, x_23); -lean::cnstr_set_scalar(x_33, sizeof(void*)*4, x_7); -return x_33; -} -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_1); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; uint32 x_39; uint8 x_40; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -x_37 = lean::cnstr_get(x_1, 2); -x_38 = lean::cnstr_get(x_1, 3); -x_39 = lean::unbox_uint32(x_36); -x_40 = x_2 < x_39; -if (x_40 == 0) -{ -uint32 x_41; uint8 x_42; -x_41 = lean::unbox_uint32(x_36); -x_42 = x_41 < x_2; -if (x_42 == 0) -{ -obj* x_43; -lean::dec(x_37); -lean::dec(x_36); -x_43 = lean::box_uint32(x_2); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_43); -return x_1; -} -else -{ -uint8 x_44; -x_44 = l_RBNode_isRed___main___rarg(x_38); -if (x_44 == 0) -{ -obj* x_45; -x_45 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_38, x_2, x_3); -lean::cnstr_set(x_1, 3, x_45); -return x_1; -} -else -{ -obj* x_46; -x_46 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_38, x_2, x_3); -if (lean::obj_tag(x_46) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_37); -lean::dec(x_36); -lean::dec(x_35); -return x_46; -} -else -{ -obj* x_47; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -x_48 = lean::cnstr_get(x_46, 3); -lean::inc(x_48); -if (lean::obj_tag(x_48) == 0) -{ -uint8 x_49; -x_49 = !lean::is_exclusive(x_46); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; uint8 x_53; -x_50 = lean::cnstr_get(x_46, 3); -lean::dec(x_50); -x_51 = lean::cnstr_get(x_46, 0); -lean::dec(x_51); -x_52 = 0; -lean::cnstr_set(x_46, 0, x_48); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_52); -x_53 = 1; -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_53); -return x_1; -} -else -{ -obj* x_54; obj* x_55; uint8 x_56; obj* x_57; uint8 x_58; -x_54 = lean::cnstr_get(x_46, 1); -x_55 = lean::cnstr_get(x_46, 2); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_46); -x_56 = 0; -x_57 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_57, 0, x_48); -lean::cnstr_set(x_57, 1, x_54); -lean::cnstr_set(x_57, 2, x_55); -lean::cnstr_set(x_57, 3, x_48); -lean::cnstr_set_scalar(x_57, sizeof(void*)*4, x_56); -x_58 = 1; -lean::cnstr_set(x_1, 3, x_57); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_58); -return x_1; -} -} -else -{ -uint8 x_59; -x_59 = lean::cnstr_get_scalar(x_48, sizeof(void*)*4); -if (x_59 == 0) -{ -uint8 x_60; -x_60 = !lean::is_exclusive(x_46); -if (x_60 == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; -x_61 = lean::cnstr_get(x_46, 1); -x_62 = lean::cnstr_get(x_46, 2); -x_63 = lean::cnstr_get(x_46, 3); -lean::dec(x_63); -x_64 = lean::cnstr_get(x_46, 0); -lean::dec(x_64); -x_65 = !lean::is_exclusive(x_48); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; uint8 x_70; -x_66 = lean::cnstr_get(x_48, 0); -x_67 = lean::cnstr_get(x_48, 1); -x_68 = lean::cnstr_get(x_48, 2); -x_69 = lean::cnstr_get(x_48, 3); -x_70 = 1; -lean::cnstr_set(x_48, 3, x_47); -lean::cnstr_set(x_48, 2, x_37); -lean::cnstr_set(x_48, 1, x_36); -lean::cnstr_set(x_48, 0, x_35); -lean::cnstr_set_scalar(x_48, sizeof(void*)*4, x_70); -lean::cnstr_set(x_46, 3, x_69); -lean::cnstr_set(x_46, 2, x_68); -lean::cnstr_set(x_46, 1, x_67); -lean::cnstr_set(x_46, 0, x_66); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_70); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_62); -lean::cnstr_set(x_1, 1, x_61); -lean::cnstr_set(x_1, 0, x_48); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; uint8 x_75; obj* x_76; -x_71 = lean::cnstr_get(x_48, 0); -x_72 = lean::cnstr_get(x_48, 1); -x_73 = lean::cnstr_get(x_48, 2); -x_74 = lean::cnstr_get(x_48, 3); -lean::inc(x_74); -lean::inc(x_73); -lean::inc(x_72); -lean::inc(x_71); -lean::dec(x_48); -x_75 = 1; -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_35); -lean::cnstr_set(x_76, 1, x_36); -lean::cnstr_set(x_76, 2, x_37); -lean::cnstr_set(x_76, 3, x_47); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_75); -lean::cnstr_set(x_46, 3, x_74); -lean::cnstr_set(x_46, 2, x_73); -lean::cnstr_set(x_46, 1, x_72); -lean::cnstr_set(x_46, 0, x_71); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_75); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_62); -lean::cnstr_set(x_1, 1, x_61); -lean::cnstr_set(x_1, 0, x_76); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; uint8 x_84; obj* x_85; obj* x_86; -x_77 = lean::cnstr_get(x_46, 1); -x_78 = lean::cnstr_get(x_46, 2); -lean::inc(x_78); -lean::inc(x_77); -lean::dec(x_46); -x_79 = lean::cnstr_get(x_48, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_48, 1); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_48, 2); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_48, 3); -lean::inc(x_82); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - lean::cnstr_release(x_48, 2); - lean::cnstr_release(x_48, 3); - x_83 = x_48; -} else { - lean::dec_ref(x_48); - x_83 = lean::box(0); -} -x_84 = 1; -if (lean::is_scalar(x_83)) { - x_85 = lean::alloc_cnstr(1, 4, 1); -} else { - x_85 = x_83; -} -lean::cnstr_set(x_85, 0, x_35); -lean::cnstr_set(x_85, 1, x_36); -lean::cnstr_set(x_85, 2, x_37); -lean::cnstr_set(x_85, 3, x_47); -lean::cnstr_set_scalar(x_85, sizeof(void*)*4, x_84); -x_86 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_86, 0, x_79); -lean::cnstr_set(x_86, 1, x_80); -lean::cnstr_set(x_86, 2, x_81); -lean::cnstr_set(x_86, 3, x_82); -lean::cnstr_set_scalar(x_86, sizeof(void*)*4, x_84); -lean::cnstr_set(x_1, 3, x_86); -lean::cnstr_set(x_1, 2, x_78); -lean::cnstr_set(x_1, 1, x_77); -lean::cnstr_set(x_1, 0, x_85); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -else -{ -uint8 x_87; -x_87 = !lean::is_exclusive(x_46); -if (x_87 == 0) -{ -obj* x_88; obj* x_89; uint8 x_90; -x_88 = lean::cnstr_get(x_46, 3); -lean::dec(x_88); -x_89 = lean::cnstr_get(x_46, 0); -lean::dec(x_89); -x_90 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_90); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -else -{ -obj* x_91; obj* x_92; uint8 x_93; obj* x_94; -x_91 = lean::cnstr_get(x_46, 1); -x_92 = lean::cnstr_get(x_46, 2); -lean::inc(x_92); -lean::inc(x_91); -lean::dec(x_46); -x_93 = 0; -x_94 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_94, 0, x_47); -lean::cnstr_set(x_94, 1, x_91); -lean::cnstr_set(x_94, 2, x_92); -lean::cnstr_set(x_94, 3, x_48); -lean::cnstr_set_scalar(x_94, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_94); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -} -} -else -{ -uint8 x_95; -x_95 = lean::cnstr_get_scalar(x_47, sizeof(void*)*4); -if (x_95 == 0) -{ -uint8 x_96; -x_96 = !lean::is_exclusive(x_46); -if (x_96 == 0) -{ -obj* x_97; uint8 x_98; -x_97 = lean::cnstr_get(x_46, 0); -lean::dec(x_97); -x_98 = !lean::is_exclusive(x_47); -if (x_98 == 0) -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; uint8 x_103; -x_99 = lean::cnstr_get(x_47, 0); -x_100 = lean::cnstr_get(x_47, 1); -x_101 = lean::cnstr_get(x_47, 2); -x_102 = lean::cnstr_get(x_47, 3); -x_103 = 1; -lean::cnstr_set(x_47, 3, x_99); -lean::cnstr_set(x_47, 2, x_37); -lean::cnstr_set(x_47, 1, x_36); -lean::cnstr_set(x_47, 0, x_35); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_103); -lean::cnstr_set(x_46, 0, x_102); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_103); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_101); -lean::cnstr_set(x_1, 1, x_100); -lean::cnstr_set(x_1, 0, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -else -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; -x_104 = lean::cnstr_get(x_47, 0); -x_105 = lean::cnstr_get(x_47, 1); -x_106 = lean::cnstr_get(x_47, 2); -x_107 = lean::cnstr_get(x_47, 3); -lean::inc(x_107); -lean::inc(x_106); -lean::inc(x_105); -lean::inc(x_104); -lean::dec(x_47); -x_108 = 1; -x_109 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_109, 0, x_35); -lean::cnstr_set(x_109, 1, x_36); -lean::cnstr_set(x_109, 2, x_37); -lean::cnstr_set(x_109, 3, x_104); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -lean::cnstr_set(x_46, 0, x_107); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_106); -lean::cnstr_set(x_1, 1, x_105); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; uint8 x_118; obj* x_119; obj* x_120; -x_110 = lean::cnstr_get(x_46, 1); -x_111 = lean::cnstr_get(x_46, 2); -x_112 = lean::cnstr_get(x_46, 3); -lean::inc(x_112); -lean::inc(x_111); -lean::inc(x_110); -lean::dec(x_46); -x_113 = lean::cnstr_get(x_47, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get(x_47, 1); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_47, 2); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_47, 3); -lean::inc(x_116); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_117 = x_47; -} else { - lean::dec_ref(x_47); - x_117 = lean::box(0); -} -x_118 = 1; -if (lean::is_scalar(x_117)) { - x_119 = lean::alloc_cnstr(1, 4, 1); -} else { - x_119 = x_117; -} -lean::cnstr_set(x_119, 0, x_35); -lean::cnstr_set(x_119, 1, x_36); -lean::cnstr_set(x_119, 2, x_37); -lean::cnstr_set(x_119, 3, x_113); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -x_120 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_120, 0, x_116); -lean::cnstr_set(x_120, 1, x_110); -lean::cnstr_set(x_120, 2, x_111); -lean::cnstr_set(x_120, 3, x_112); -lean::cnstr_set_scalar(x_120, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_120); -lean::cnstr_set(x_1, 2, x_115); -lean::cnstr_set(x_1, 1, x_114); -lean::cnstr_set(x_1, 0, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -obj* x_121; -x_121 = lean::cnstr_get(x_46, 3); -lean::inc(x_121); -if (lean::obj_tag(x_121) == 0) -{ -uint8 x_122; -x_122 = !lean::is_exclusive(x_46); -if (x_122 == 0) -{ -obj* x_123; obj* x_124; uint8 x_125; -x_123 = lean::cnstr_get(x_46, 3); -lean::dec(x_123); -x_124 = lean::cnstr_get(x_46, 0); -lean::dec(x_124); -x_125 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_125); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -else -{ -obj* x_126; obj* x_127; uint8 x_128; obj* x_129; -x_126 = lean::cnstr_get(x_46, 1); -x_127 = lean::cnstr_get(x_46, 2); -lean::inc(x_127); -lean::inc(x_126); -lean::dec(x_46); -x_128 = 0; -x_129 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_129, 0, x_47); -lean::cnstr_set(x_129, 1, x_126); -lean::cnstr_set(x_129, 2, x_127); -lean::cnstr_set(x_129, 3, x_121); -lean::cnstr_set_scalar(x_129, sizeof(void*)*4, x_128); -lean::cnstr_set(x_1, 3, x_129); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -uint8 x_130; -x_130 = lean::cnstr_get_scalar(x_121, sizeof(void*)*4); -if (x_130 == 0) -{ -uint8 x_131; -lean::free_heap_obj(x_1); -x_131 = !lean::is_exclusive(x_46); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; uint8 x_134; -x_132 = lean::cnstr_get(x_46, 3); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_46, 0); -lean::dec(x_133); -x_134 = !lean::is_exclusive(x_121); -if (x_134 == 0) -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; uint8 x_139; -x_135 = lean::cnstr_get(x_121, 0); -x_136 = lean::cnstr_get(x_121, 1); -x_137 = lean::cnstr_get(x_121, 2); -x_138 = lean::cnstr_get(x_121, 3); -lean::inc(x_47); -lean::cnstr_set(x_121, 3, x_47); -lean::cnstr_set(x_121, 2, x_37); -lean::cnstr_set(x_121, 1, x_36); -lean::cnstr_set(x_121, 0, x_35); -x_139 = !lean::is_exclusive(x_47); -if (x_139 == 0) -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; -x_140 = lean::cnstr_get(x_47, 3); -lean::dec(x_140); -x_141 = lean::cnstr_get(x_47, 2); -lean::dec(x_141); -x_142 = lean::cnstr_get(x_47, 1); -lean::dec(x_142); -x_143 = lean::cnstr_get(x_47, 0); -lean::dec(x_143); -lean::cnstr_set_scalar(x_121, sizeof(void*)*4, x_95); -lean::cnstr_set(x_47, 3, x_138); -lean::cnstr_set(x_47, 2, x_137); -lean::cnstr_set(x_47, 1, x_136); -lean::cnstr_set(x_47, 0, x_135); -lean::cnstr_set(x_46, 3, x_47); -lean::cnstr_set(x_46, 0, x_121); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -else -{ -obj* x_144; -lean::dec(x_47); -lean::cnstr_set_scalar(x_121, sizeof(void*)*4, x_95); -x_144 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_144, 0, x_135); -lean::cnstr_set(x_144, 1, x_136); -lean::cnstr_set(x_144, 2, x_137); -lean::cnstr_set(x_144, 3, x_138); -lean::cnstr_set_scalar(x_144, sizeof(void*)*4, x_95); -lean::cnstr_set(x_46, 3, x_144); -lean::cnstr_set(x_46, 0, x_121); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -} -else -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_145 = lean::cnstr_get(x_121, 0); -x_146 = lean::cnstr_get(x_121, 1); -x_147 = lean::cnstr_get(x_121, 2); -x_148 = lean::cnstr_get(x_121, 3); -lean::inc(x_148); -lean::inc(x_147); -lean::inc(x_146); -lean::inc(x_145); -lean::dec(x_121); -lean::inc(x_47); -x_149 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_149, 0, x_35); -lean::cnstr_set(x_149, 1, x_36); -lean::cnstr_set(x_149, 2, x_37); -lean::cnstr_set(x_149, 3, x_47); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_150 = x_47; -} else { - lean::dec_ref(x_47); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_95); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_145); -lean::cnstr_set(x_151, 1, x_146); -lean::cnstr_set(x_151, 2, x_147); -lean::cnstr_set(x_151, 3, x_148); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_95); -lean::cnstr_set(x_46, 3, x_151); -lean::cnstr_set(x_46, 0, x_149); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -} -else -{ -obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -x_152 = lean::cnstr_get(x_46, 1); -x_153 = lean::cnstr_get(x_46, 2); -lean::inc(x_153); -lean::inc(x_152); -lean::dec(x_46); -x_154 = lean::cnstr_get(x_121, 0); -lean::inc(x_154); -x_155 = lean::cnstr_get(x_121, 1); -lean::inc(x_155); -x_156 = lean::cnstr_get(x_121, 2); -lean::inc(x_156); -x_157 = lean::cnstr_get(x_121, 3); -lean::inc(x_157); -if (lean::is_exclusive(x_121)) { - lean::cnstr_release(x_121, 0); - lean::cnstr_release(x_121, 1); - lean::cnstr_release(x_121, 2); - lean::cnstr_release(x_121, 3); - x_158 = x_121; -} else { - lean::dec_ref(x_121); - x_158 = lean::box(0); -} -lean::inc(x_47); -if (lean::is_scalar(x_158)) { - x_159 = lean::alloc_cnstr(1, 4, 1); -} else { - x_159 = x_158; -} -lean::cnstr_set(x_159, 0, x_35); -lean::cnstr_set(x_159, 1, x_36); -lean::cnstr_set(x_159, 2, x_37); -lean::cnstr_set(x_159, 3, x_47); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_160 = x_47; -} else { - lean::dec_ref(x_47); - x_160 = lean::box(0); -} -lean::cnstr_set_scalar(x_159, sizeof(void*)*4, x_95); -if (lean::is_scalar(x_160)) { - x_161 = lean::alloc_cnstr(1, 4, 1); -} else { - x_161 = x_160; -} -lean::cnstr_set(x_161, 0, x_154); -lean::cnstr_set(x_161, 1, x_155); -lean::cnstr_set(x_161, 2, x_156); -lean::cnstr_set(x_161, 3, x_157); -lean::cnstr_set_scalar(x_161, sizeof(void*)*4, x_95); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_159); -lean::cnstr_set(x_162, 1, x_152); -lean::cnstr_set(x_162, 2, x_153); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_130); -return x_162; -} -} -else -{ -uint8 x_163; -x_163 = !lean::is_exclusive(x_46); -if (x_163 == 0) -{ -obj* x_164; obj* x_165; uint8 x_166; -x_164 = lean::cnstr_get(x_46, 3); -lean::dec(x_164); -x_165 = lean::cnstr_get(x_46, 0); -lean::dec(x_165); -x_166 = !lean::is_exclusive(x_47); -if (x_166 == 0) -{ -uint8 x_167; -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_130); -x_167 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_167); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -else -{ -obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; uint8 x_173; -x_168 = lean::cnstr_get(x_47, 0); -x_169 = lean::cnstr_get(x_47, 1); -x_170 = lean::cnstr_get(x_47, 2); -x_171 = lean::cnstr_get(x_47, 3); -lean::inc(x_171); -lean::inc(x_170); -lean::inc(x_169); -lean::inc(x_168); -lean::dec(x_47); -x_172 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_172, 0, x_168); -lean::cnstr_set(x_172, 1, x_169); -lean::cnstr_set(x_172, 2, x_170); -lean::cnstr_set(x_172, 3, x_171); -lean::cnstr_set_scalar(x_172, sizeof(void*)*4, x_130); -x_173 = 0; -lean::cnstr_set(x_46, 0, x_172); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_173); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -} -else -{ -obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; uint8 x_182; obj* x_183; -x_174 = lean::cnstr_get(x_46, 1); -x_175 = lean::cnstr_get(x_46, 2); -lean::inc(x_175); -lean::inc(x_174); -lean::dec(x_46); -x_176 = lean::cnstr_get(x_47, 0); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_47, 1); -lean::inc(x_177); -x_178 = lean::cnstr_get(x_47, 2); -lean::inc(x_178); -x_179 = lean::cnstr_get(x_47, 3); -lean::inc(x_179); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_180 = x_47; -} else { - lean::dec_ref(x_47); - x_180 = lean::box(0); -} -if (lean::is_scalar(x_180)) { - x_181 = lean::alloc_cnstr(1, 4, 1); -} else { - x_181 = x_180; -} -lean::cnstr_set(x_181, 0, x_176); -lean::cnstr_set(x_181, 1, x_177); -lean::cnstr_set(x_181, 2, x_178); -lean::cnstr_set(x_181, 3, x_179); -lean::cnstr_set_scalar(x_181, sizeof(void*)*4, x_130); -x_182 = 0; -x_183 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_183, 0, x_181); -lean::cnstr_set(x_183, 1, x_174); -lean::cnstr_set(x_183, 2, x_175); -lean::cnstr_set(x_183, 3, x_121); -lean::cnstr_set_scalar(x_183, sizeof(void*)*4, x_182); -lean::cnstr_set(x_1, 3, x_183); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_184; -x_184 = l_RBNode_isRed___main___rarg(x_35); -if (x_184 == 0) -{ -obj* x_185; -x_185 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_35, x_2, x_3); -lean::cnstr_set(x_1, 0, x_185); -return x_1; -} -else -{ -obj* x_186; -x_186 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_35, x_2, x_3); -if (lean::obj_tag(x_186) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_38); -lean::dec(x_37); -lean::dec(x_36); -return x_186; -} -else -{ -obj* x_187; -x_187 = lean::cnstr_get(x_186, 0); -lean::inc(x_187); -if (lean::obj_tag(x_187) == 0) -{ -obj* x_188; -x_188 = lean::cnstr_get(x_186, 3); -lean::inc(x_188); -if (lean::obj_tag(x_188) == 0) -{ -uint8 x_189; -x_189 = !lean::is_exclusive(x_186); -if (x_189 == 0) -{ -obj* x_190; obj* x_191; uint8 x_192; uint8 x_193; -x_190 = lean::cnstr_get(x_186, 3); -lean::dec(x_190); -x_191 = lean::cnstr_get(x_186, 0); -lean::dec(x_191); -x_192 = 0; -lean::cnstr_set(x_186, 0, x_188); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_192); -x_193 = 1; -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_193); -return x_1; -} -else -{ -obj* x_194; obj* x_195; uint8 x_196; obj* x_197; uint8 x_198; -x_194 = lean::cnstr_get(x_186, 1); -x_195 = lean::cnstr_get(x_186, 2); -lean::inc(x_195); -lean::inc(x_194); -lean::dec(x_186); -x_196 = 0; -x_197 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_197, 0, x_188); -lean::cnstr_set(x_197, 1, x_194); -lean::cnstr_set(x_197, 2, x_195); -lean::cnstr_set(x_197, 3, x_188); -lean::cnstr_set_scalar(x_197, sizeof(void*)*4, x_196); -x_198 = 1; -lean::cnstr_set(x_1, 0, x_197); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_198); -return x_1; -} -} -else -{ -uint8 x_199; -x_199 = lean::cnstr_get_scalar(x_188, sizeof(void*)*4); -if (x_199 == 0) -{ -uint8 x_200; -x_200 = !lean::is_exclusive(x_186); -if (x_200 == 0) -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; -x_201 = lean::cnstr_get(x_186, 1); -x_202 = lean::cnstr_get(x_186, 2); -x_203 = lean::cnstr_get(x_186, 3); -lean::dec(x_203); -x_204 = lean::cnstr_get(x_186, 0); -lean::dec(x_204); -x_205 = !lean::is_exclusive(x_188); -if (x_205 == 0) -{ -obj* x_206; obj* x_207; obj* x_208; obj* x_209; uint8 x_210; -x_206 = lean::cnstr_get(x_188, 0); -x_207 = lean::cnstr_get(x_188, 1); -x_208 = lean::cnstr_get(x_188, 2); -x_209 = lean::cnstr_get(x_188, 3); -x_210 = 1; -lean::cnstr_set(x_188, 3, x_206); -lean::cnstr_set(x_188, 2, x_202); -lean::cnstr_set(x_188, 1, x_201); -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set_scalar(x_188, sizeof(void*)*4, x_210); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_209); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_210); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_208); -lean::cnstr_set(x_1, 1, x_207); -lean::cnstr_set(x_1, 0, x_188); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; obj* x_214; uint8 x_215; obj* x_216; -x_211 = lean::cnstr_get(x_188, 0); -x_212 = lean::cnstr_get(x_188, 1); -x_213 = lean::cnstr_get(x_188, 2); -x_214 = lean::cnstr_get(x_188, 3); -lean::inc(x_214); -lean::inc(x_213); -lean::inc(x_212); -lean::inc(x_211); -lean::dec(x_188); -x_215 = 1; -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_187); -lean::cnstr_set(x_216, 1, x_201); -lean::cnstr_set(x_216, 2, x_202); -lean::cnstr_set(x_216, 3, x_211); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_215); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_214); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_215); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_213); -lean::cnstr_set(x_1, 1, x_212); -lean::cnstr_set(x_1, 0, x_216); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -else -{ -obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; uint8 x_224; obj* x_225; obj* x_226; -x_217 = lean::cnstr_get(x_186, 1); -x_218 = lean::cnstr_get(x_186, 2); -lean::inc(x_218); -lean::inc(x_217); -lean::dec(x_186); -x_219 = lean::cnstr_get(x_188, 0); -lean::inc(x_219); -x_220 = lean::cnstr_get(x_188, 1); -lean::inc(x_220); -x_221 = lean::cnstr_get(x_188, 2); -lean::inc(x_221); -x_222 = lean::cnstr_get(x_188, 3); -lean::inc(x_222); -if (lean::is_exclusive(x_188)) { - lean::cnstr_release(x_188, 0); - lean::cnstr_release(x_188, 1); - lean::cnstr_release(x_188, 2); - lean::cnstr_release(x_188, 3); - x_223 = x_188; -} else { - lean::dec_ref(x_188); - x_223 = lean::box(0); -} -x_224 = 1; -if (lean::is_scalar(x_223)) { - x_225 = lean::alloc_cnstr(1, 4, 1); -} else { - x_225 = x_223; -} -lean::cnstr_set(x_225, 0, x_187); -lean::cnstr_set(x_225, 1, x_217); -lean::cnstr_set(x_225, 2, x_218); -lean::cnstr_set(x_225, 3, x_219); -lean::cnstr_set_scalar(x_225, sizeof(void*)*4, x_224); -x_226 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_226, 0, x_222); -lean::cnstr_set(x_226, 1, x_36); -lean::cnstr_set(x_226, 2, x_37); -lean::cnstr_set(x_226, 3, x_38); -lean::cnstr_set_scalar(x_226, sizeof(void*)*4, x_224); -lean::cnstr_set(x_1, 3, x_226); -lean::cnstr_set(x_1, 2, x_221); -lean::cnstr_set(x_1, 1, x_220); -lean::cnstr_set(x_1, 0, x_225); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -else -{ -uint8 x_227; -x_227 = !lean::is_exclusive(x_186); -if (x_227 == 0) -{ -obj* x_228; obj* x_229; uint8 x_230; -x_228 = lean::cnstr_get(x_186, 3); -lean::dec(x_228); -x_229 = lean::cnstr_get(x_186, 0); -lean::dec(x_229); -x_230 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_230); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -else -{ -obj* x_231; obj* x_232; uint8 x_233; obj* x_234; -x_231 = lean::cnstr_get(x_186, 1); -x_232 = lean::cnstr_get(x_186, 2); -lean::inc(x_232); -lean::inc(x_231); -lean::dec(x_186); -x_233 = 0; -x_234 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_234, 0, x_187); -lean::cnstr_set(x_234, 1, x_231); -lean::cnstr_set(x_234, 2, x_232); -lean::cnstr_set(x_234, 3, x_188); -lean::cnstr_set_scalar(x_234, sizeof(void*)*4, x_233); -lean::cnstr_set(x_1, 0, x_234); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -} -} -else -{ -uint8 x_235; -x_235 = lean::cnstr_get_scalar(x_187, sizeof(void*)*4); -if (x_235 == 0) -{ -uint8 x_236; -x_236 = !lean::is_exclusive(x_186); -if (x_236 == 0) -{ -obj* x_237; obj* x_238; obj* x_239; obj* x_240; uint8 x_241; -x_237 = lean::cnstr_get(x_186, 1); -x_238 = lean::cnstr_get(x_186, 2); -x_239 = lean::cnstr_get(x_186, 3); -x_240 = lean::cnstr_get(x_186, 0); -lean::dec(x_240); -x_241 = !lean::is_exclusive(x_187); -if (x_241 == 0) -{ -uint8 x_242; -x_242 = 1; -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_242); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_239); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_242); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_238); -lean::cnstr_set(x_1, 1, x_237); -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -else -{ -obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; -x_243 = lean::cnstr_get(x_187, 0); -x_244 = lean::cnstr_get(x_187, 1); -x_245 = lean::cnstr_get(x_187, 2); -x_246 = lean::cnstr_get(x_187, 3); -lean::inc(x_246); -lean::inc(x_245); -lean::inc(x_244); -lean::inc(x_243); -lean::dec(x_187); -x_247 = 1; -x_248 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_248, 0, x_243); -lean::cnstr_set(x_248, 1, x_244); -lean::cnstr_set(x_248, 2, x_245); -lean::cnstr_set(x_248, 3, x_246); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_239); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_238); -lean::cnstr_set(x_1, 1, x_237); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; obj* x_256; uint8 x_257; obj* x_258; obj* x_259; -x_249 = lean::cnstr_get(x_186, 1); -x_250 = lean::cnstr_get(x_186, 2); -x_251 = lean::cnstr_get(x_186, 3); -lean::inc(x_251); -lean::inc(x_250); -lean::inc(x_249); -lean::dec(x_186); -x_252 = lean::cnstr_get(x_187, 0); -lean::inc(x_252); -x_253 = lean::cnstr_get(x_187, 1); -lean::inc(x_253); -x_254 = lean::cnstr_get(x_187, 2); -lean::inc(x_254); -x_255 = lean::cnstr_get(x_187, 3); -lean::inc(x_255); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_256 = x_187; -} else { - lean::dec_ref(x_187); - x_256 = lean::box(0); -} -x_257 = 1; -if (lean::is_scalar(x_256)) { - x_258 = lean::alloc_cnstr(1, 4, 1); -} else { - x_258 = x_256; -} -lean::cnstr_set(x_258, 0, x_252); -lean::cnstr_set(x_258, 1, x_253); -lean::cnstr_set(x_258, 2, x_254); -lean::cnstr_set(x_258, 3, x_255); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -x_259 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_259, 0, x_251); -lean::cnstr_set(x_259, 1, x_36); -lean::cnstr_set(x_259, 2, x_37); -lean::cnstr_set(x_259, 3, x_38); -lean::cnstr_set_scalar(x_259, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 3, x_259); -lean::cnstr_set(x_1, 2, x_250); -lean::cnstr_set(x_1, 1, x_249); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -obj* x_260; -x_260 = lean::cnstr_get(x_186, 3); -lean::inc(x_260); -if (lean::obj_tag(x_260) == 0) -{ -uint8 x_261; -x_261 = !lean::is_exclusive(x_186); -if (x_261 == 0) -{ -obj* x_262; obj* x_263; uint8 x_264; -x_262 = lean::cnstr_get(x_186, 3); -lean::dec(x_262); -x_263 = lean::cnstr_get(x_186, 0); -lean::dec(x_263); -x_264 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_264); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -else -{ -obj* x_265; obj* x_266; uint8 x_267; obj* x_268; -x_265 = lean::cnstr_get(x_186, 1); -x_266 = lean::cnstr_get(x_186, 2); -lean::inc(x_266); -lean::inc(x_265); -lean::dec(x_186); -x_267 = 0; -x_268 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_268, 0, x_187); -lean::cnstr_set(x_268, 1, x_265); -lean::cnstr_set(x_268, 2, x_266); -lean::cnstr_set(x_268, 3, x_260); -lean::cnstr_set_scalar(x_268, sizeof(void*)*4, x_267); -lean::cnstr_set(x_1, 0, x_268); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -uint8 x_269; -x_269 = lean::cnstr_get_scalar(x_260, sizeof(void*)*4); -if (x_269 == 0) -{ -uint8 x_270; -lean::free_heap_obj(x_1); -x_270 = !lean::is_exclusive(x_186); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; uint8 x_275; -x_271 = lean::cnstr_get(x_186, 1); -x_272 = lean::cnstr_get(x_186, 2); -x_273 = lean::cnstr_get(x_186, 3); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_186, 0); -lean::dec(x_274); -x_275 = !lean::is_exclusive(x_260); -if (x_275 == 0) -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; uint8 x_280; -x_276 = lean::cnstr_get(x_260, 0); -x_277 = lean::cnstr_get(x_260, 1); -x_278 = lean::cnstr_get(x_260, 2); -x_279 = lean::cnstr_get(x_260, 3); -lean::inc(x_187); -lean::cnstr_set(x_260, 3, x_276); -lean::cnstr_set(x_260, 2, x_272); -lean::cnstr_set(x_260, 1, x_271); -lean::cnstr_set(x_260, 0, x_187); -x_280 = !lean::is_exclusive(x_187); -if (x_280 == 0) -{ -obj* x_281; obj* x_282; obj* x_283; obj* x_284; -x_281 = lean::cnstr_get(x_187, 3); -lean::dec(x_281); -x_282 = lean::cnstr_get(x_187, 2); -lean::dec(x_282); -x_283 = lean::cnstr_get(x_187, 1); -lean::dec(x_283); -x_284 = lean::cnstr_get(x_187, 0); -lean::dec(x_284); -lean::cnstr_set_scalar(x_260, sizeof(void*)*4, x_235); -lean::cnstr_set(x_187, 3, x_38); -lean::cnstr_set(x_187, 2, x_37); -lean::cnstr_set(x_187, 1, x_36); -lean::cnstr_set(x_187, 0, x_279); -lean::cnstr_set(x_186, 3, x_187); -lean::cnstr_set(x_186, 2, x_278); -lean::cnstr_set(x_186, 1, x_277); -lean::cnstr_set(x_186, 0, x_260); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -else -{ -obj* x_285; -lean::dec(x_187); -lean::cnstr_set_scalar(x_260, sizeof(void*)*4, x_235); -x_285 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_285, 0, x_279); -lean::cnstr_set(x_285, 1, x_36); -lean::cnstr_set(x_285, 2, x_37); -lean::cnstr_set(x_285, 3, x_38); -lean::cnstr_set_scalar(x_285, sizeof(void*)*4, x_235); -lean::cnstr_set(x_186, 3, x_285); -lean::cnstr_set(x_186, 2, x_278); -lean::cnstr_set(x_186, 1, x_277); -lean::cnstr_set(x_186, 0, x_260); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -} -else -{ -obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; -x_286 = lean::cnstr_get(x_260, 0); -x_287 = lean::cnstr_get(x_260, 1); -x_288 = lean::cnstr_get(x_260, 2); -x_289 = lean::cnstr_get(x_260, 3); -lean::inc(x_289); -lean::inc(x_288); -lean::inc(x_287); -lean::inc(x_286); -lean::dec(x_260); -lean::inc(x_187); -x_290 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_290, 0, x_187); -lean::cnstr_set(x_290, 1, x_271); -lean::cnstr_set(x_290, 2, x_272); -lean::cnstr_set(x_290, 3, x_286); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_291 = x_187; -} else { - lean::dec_ref(x_187); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_235); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_289); -lean::cnstr_set(x_292, 1, x_36); -lean::cnstr_set(x_292, 2, x_37); -lean::cnstr_set(x_292, 3, x_38); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_235); -lean::cnstr_set(x_186, 3, x_292); -lean::cnstr_set(x_186, 2, x_288); -lean::cnstr_set(x_186, 1, x_287); -lean::cnstr_set(x_186, 0, x_290); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -} -else -{ -obj* x_293; obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; -x_293 = lean::cnstr_get(x_186, 1); -x_294 = lean::cnstr_get(x_186, 2); -lean::inc(x_294); -lean::inc(x_293); -lean::dec(x_186); -x_295 = lean::cnstr_get(x_260, 0); -lean::inc(x_295); -x_296 = lean::cnstr_get(x_260, 1); -lean::inc(x_296); -x_297 = lean::cnstr_get(x_260, 2); -lean::inc(x_297); -x_298 = lean::cnstr_get(x_260, 3); -lean::inc(x_298); -if (lean::is_exclusive(x_260)) { - lean::cnstr_release(x_260, 0); - lean::cnstr_release(x_260, 1); - lean::cnstr_release(x_260, 2); - lean::cnstr_release(x_260, 3); - x_299 = x_260; -} else { - lean::dec_ref(x_260); - x_299 = lean::box(0); -} -lean::inc(x_187); -if (lean::is_scalar(x_299)) { - x_300 = lean::alloc_cnstr(1, 4, 1); -} else { - x_300 = x_299; -} -lean::cnstr_set(x_300, 0, x_187); -lean::cnstr_set(x_300, 1, x_293); -lean::cnstr_set(x_300, 2, x_294); -lean::cnstr_set(x_300, 3, x_295); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_301 = x_187; -} else { - lean::dec_ref(x_187); - x_301 = lean::box(0); -} -lean::cnstr_set_scalar(x_300, sizeof(void*)*4, x_235); -if (lean::is_scalar(x_301)) { - x_302 = lean::alloc_cnstr(1, 4, 1); -} else { - x_302 = x_301; -} -lean::cnstr_set(x_302, 0, x_298); -lean::cnstr_set(x_302, 1, x_36); -lean::cnstr_set(x_302, 2, x_37); -lean::cnstr_set(x_302, 3, x_38); -lean::cnstr_set_scalar(x_302, sizeof(void*)*4, x_235); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_300); -lean::cnstr_set(x_303, 1, x_296); -lean::cnstr_set(x_303, 2, x_297); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_269); -return x_303; -} -} -else -{ -uint8 x_304; -x_304 = !lean::is_exclusive(x_186); -if (x_304 == 0) -{ -obj* x_305; obj* x_306; uint8 x_307; -x_305 = lean::cnstr_get(x_186, 3); -lean::dec(x_305); -x_306 = lean::cnstr_get(x_186, 0); -lean::dec(x_306); -x_307 = !lean::is_exclusive(x_187); -if (x_307 == 0) -{ -uint8 x_308; -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_269); -x_308 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_308); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -else -{ -obj* x_309; obj* x_310; obj* x_311; obj* x_312; obj* x_313; uint8 x_314; -x_309 = lean::cnstr_get(x_187, 0); -x_310 = lean::cnstr_get(x_187, 1); -x_311 = lean::cnstr_get(x_187, 2); -x_312 = lean::cnstr_get(x_187, 3); -lean::inc(x_312); -lean::inc(x_311); -lean::inc(x_310); -lean::inc(x_309); -lean::dec(x_187); -x_313 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_313, 0, x_309); -lean::cnstr_set(x_313, 1, x_310); -lean::cnstr_set(x_313, 2, x_311); -lean::cnstr_set(x_313, 3, x_312); -lean::cnstr_set_scalar(x_313, sizeof(void*)*4, x_269); -x_314 = 0; -lean::cnstr_set(x_186, 0, x_313); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_314); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; obj* x_319; obj* x_320; obj* x_321; obj* x_322; uint8 x_323; obj* x_324; -x_315 = lean::cnstr_get(x_186, 1); -x_316 = lean::cnstr_get(x_186, 2); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_186); -x_317 = lean::cnstr_get(x_187, 0); -lean::inc(x_317); -x_318 = lean::cnstr_get(x_187, 1); -lean::inc(x_318); -x_319 = lean::cnstr_get(x_187, 2); -lean::inc(x_319); -x_320 = lean::cnstr_get(x_187, 3); -lean::inc(x_320); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_321 = x_187; -} else { - lean::dec_ref(x_187); - x_321 = lean::box(0); -} -if (lean::is_scalar(x_321)) { - x_322 = lean::alloc_cnstr(1, 4, 1); -} else { - x_322 = x_321; -} -lean::cnstr_set(x_322, 0, x_317); -lean::cnstr_set(x_322, 1, x_318); -lean::cnstr_set(x_322, 2, x_319); -lean::cnstr_set(x_322, 3, x_320); -lean::cnstr_set_scalar(x_322, sizeof(void*)*4, x_269); -x_323 = 0; -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_322); -lean::cnstr_set(x_324, 1, x_315); -lean::cnstr_set(x_324, 2, x_316); -lean::cnstr_set(x_324, 3, x_260); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_323); -lean::cnstr_set(x_1, 0, x_324); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_325; obj* x_326; obj* x_327; obj* x_328; uint32 x_329; uint8 x_330; -x_325 = lean::cnstr_get(x_1, 0); -x_326 = lean::cnstr_get(x_1, 1); -x_327 = lean::cnstr_get(x_1, 2); -x_328 = lean::cnstr_get(x_1, 3); -lean::inc(x_328); -lean::inc(x_327); -lean::inc(x_326); -lean::inc(x_325); -lean::dec(x_1); -x_329 = lean::unbox_uint32(x_326); -x_330 = x_2 < x_329; -if (x_330 == 0) -{ -uint32 x_331; uint8 x_332; -x_331 = lean::unbox_uint32(x_326); -x_332 = x_331 < x_2; -if (x_332 == 0) -{ -obj* x_333; obj* x_334; -lean::dec(x_327); -lean::dec(x_326); -x_333 = lean::box_uint32(x_2); -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_325); -lean::cnstr_set(x_334, 1, x_333); -lean::cnstr_set(x_334, 2, x_3); -lean::cnstr_set(x_334, 3, x_328); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_7); -return x_334; -} -else -{ -uint8 x_335; -x_335 = l_RBNode_isRed___main___rarg(x_328); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; -x_336 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_328, x_2, x_3); -x_337 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_337, 0, x_325); -lean::cnstr_set(x_337, 1, x_326); -lean::cnstr_set(x_337, 2, x_327); -lean::cnstr_set(x_337, 3, x_336); -lean::cnstr_set_scalar(x_337, sizeof(void*)*4, x_7); -return x_337; -} -else -{ -obj* x_338; -x_338 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_328, x_2, x_3); -if (lean::obj_tag(x_338) == 0) -{ -lean::dec(x_327); -lean::dec(x_326); -lean::dec(x_325); -return x_338; -} -else -{ -obj* x_339; -x_339 = lean::cnstr_get(x_338, 0); -lean::inc(x_339); -if (lean::obj_tag(x_339) == 0) -{ -obj* x_340; -x_340 = lean::cnstr_get(x_338, 3); -lean::inc(x_340); -if (lean::obj_tag(x_340) == 0) -{ -obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; uint8 x_346; obj* x_347; -x_341 = lean::cnstr_get(x_338, 1); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_338, 2); -lean::inc(x_342); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_343 = x_338; -} else { - lean::dec_ref(x_338); - x_343 = lean::box(0); -} -x_344 = 0; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_340); -lean::cnstr_set(x_345, 1, x_341); -lean::cnstr_set(x_345, 2, x_342); -lean::cnstr_set(x_345, 3, x_340); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -x_346 = 1; -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_325); -lean::cnstr_set(x_347, 1, x_326); -lean::cnstr_set(x_347, 2, x_327); -lean::cnstr_set(x_347, 3, x_345); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_346); -return x_347; -} -else -{ -uint8 x_348; -x_348 = lean::cnstr_get_scalar(x_340, sizeof(void*)*4); -if (x_348 == 0) -{ -obj* x_349; obj* x_350; obj* x_351; obj* x_352; obj* x_353; obj* x_354; obj* x_355; obj* x_356; uint8 x_357; obj* x_358; obj* x_359; obj* x_360; -x_349 = lean::cnstr_get(x_338, 1); -lean::inc(x_349); -x_350 = lean::cnstr_get(x_338, 2); -lean::inc(x_350); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_351 = x_338; -} else { - lean::dec_ref(x_338); - x_351 = lean::box(0); -} -x_352 = lean::cnstr_get(x_340, 0); -lean::inc(x_352); -x_353 = lean::cnstr_get(x_340, 1); -lean::inc(x_353); -x_354 = lean::cnstr_get(x_340, 2); -lean::inc(x_354); -x_355 = lean::cnstr_get(x_340, 3); -lean::inc(x_355); -if (lean::is_exclusive(x_340)) { - lean::cnstr_release(x_340, 0); - lean::cnstr_release(x_340, 1); - lean::cnstr_release(x_340, 2); - lean::cnstr_release(x_340, 3); - x_356 = x_340; -} else { - lean::dec_ref(x_340); - x_356 = lean::box(0); -} -x_357 = 1; -if (lean::is_scalar(x_356)) { - x_358 = lean::alloc_cnstr(1, 4, 1); -} else { - x_358 = x_356; -} -lean::cnstr_set(x_358, 0, x_325); -lean::cnstr_set(x_358, 1, x_326); -lean::cnstr_set(x_358, 2, x_327); -lean::cnstr_set(x_358, 3, x_339); -lean::cnstr_set_scalar(x_358, sizeof(void*)*4, x_357); -if (lean::is_scalar(x_351)) { - x_359 = lean::alloc_cnstr(1, 4, 1); -} else { - x_359 = x_351; -} -lean::cnstr_set(x_359, 0, x_352); -lean::cnstr_set(x_359, 1, x_353); -lean::cnstr_set(x_359, 2, x_354); -lean::cnstr_set(x_359, 3, x_355); -lean::cnstr_set_scalar(x_359, sizeof(void*)*4, x_357); -x_360 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_360, 0, x_358); -lean::cnstr_set(x_360, 1, x_349); -lean::cnstr_set(x_360, 2, x_350); -lean::cnstr_set(x_360, 3, x_359); -lean::cnstr_set_scalar(x_360, sizeof(void*)*4, x_348); -return x_360; -} -else -{ -obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; -x_361 = lean::cnstr_get(x_338, 1); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_338, 2); -lean::inc(x_362); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_363 = x_338; -} else { - lean::dec_ref(x_338); - x_363 = lean::box(0); -} -x_364 = 0; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_339); -lean::cnstr_set(x_365, 1, x_361); -lean::cnstr_set(x_365, 2, x_362); -lean::cnstr_set(x_365, 3, x_340); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -x_366 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_366, 0, x_325); -lean::cnstr_set(x_366, 1, x_326); -lean::cnstr_set(x_366, 2, x_327); -lean::cnstr_set(x_366, 3, x_365); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_348); -return x_366; -} -} -} -else -{ -uint8 x_367; -x_367 = lean::cnstr_get_scalar(x_339, sizeof(void*)*4); -if (x_367 == 0) -{ -obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_372; obj* x_373; obj* x_374; obj* x_375; obj* x_376; uint8 x_377; obj* x_378; obj* x_379; obj* x_380; -x_368 = lean::cnstr_get(x_338, 1); -lean::inc(x_368); -x_369 = lean::cnstr_get(x_338, 2); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_338, 3); -lean::inc(x_370); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_371 = x_338; -} else { - lean::dec_ref(x_338); - x_371 = lean::box(0); -} -x_372 = lean::cnstr_get(x_339, 0); -lean::inc(x_372); -x_373 = lean::cnstr_get(x_339, 1); -lean::inc(x_373); -x_374 = lean::cnstr_get(x_339, 2); -lean::inc(x_374); -x_375 = lean::cnstr_get(x_339, 3); -lean::inc(x_375); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_376 = x_339; -} else { - lean::dec_ref(x_339); - x_376 = lean::box(0); -} -x_377 = 1; -if (lean::is_scalar(x_376)) { - x_378 = lean::alloc_cnstr(1, 4, 1); -} else { - x_378 = x_376; -} -lean::cnstr_set(x_378, 0, x_325); -lean::cnstr_set(x_378, 1, x_326); -lean::cnstr_set(x_378, 2, x_327); -lean::cnstr_set(x_378, 3, x_372); -lean::cnstr_set_scalar(x_378, sizeof(void*)*4, x_377); -if (lean::is_scalar(x_371)) { - x_379 = lean::alloc_cnstr(1, 4, 1); -} else { - x_379 = x_371; -} -lean::cnstr_set(x_379, 0, x_375); -lean::cnstr_set(x_379, 1, x_368); -lean::cnstr_set(x_379, 2, x_369); -lean::cnstr_set(x_379, 3, x_370); -lean::cnstr_set_scalar(x_379, sizeof(void*)*4, x_377); -x_380 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_380, 0, x_378); -lean::cnstr_set(x_380, 1, x_373); -lean::cnstr_set(x_380, 2, x_374); -lean::cnstr_set(x_380, 3, x_379); -lean::cnstr_set_scalar(x_380, sizeof(void*)*4, x_367); -return x_380; -} -else -{ -obj* x_381; -x_381 = lean::cnstr_get(x_338, 3); -lean::inc(x_381); -if (lean::obj_tag(x_381) == 0) -{ -obj* x_382; obj* x_383; obj* x_384; uint8 x_385; obj* x_386; obj* x_387; -x_382 = lean::cnstr_get(x_338, 1); -lean::inc(x_382); -x_383 = lean::cnstr_get(x_338, 2); -lean::inc(x_383); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_384 = x_338; -} else { - lean::dec_ref(x_338); - x_384 = lean::box(0); -} -x_385 = 0; -if (lean::is_scalar(x_384)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_384; -} -lean::cnstr_set(x_386, 0, x_339); -lean::cnstr_set(x_386, 1, x_382); -lean::cnstr_set(x_386, 2, x_383); -lean::cnstr_set(x_386, 3, x_381); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_385); -x_387 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_387, 0, x_325); -lean::cnstr_set(x_387, 1, x_326); -lean::cnstr_set(x_387, 2, x_327); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_367); -return x_387; -} -else -{ -uint8 x_388; -x_388 = lean::cnstr_get_scalar(x_381, sizeof(void*)*4); -if (x_388 == 0) -{ -obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; obj* x_397; obj* x_398; obj* x_399; obj* x_400; -x_389 = lean::cnstr_get(x_338, 1); -lean::inc(x_389); -x_390 = lean::cnstr_get(x_338, 2); -lean::inc(x_390); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_391 = x_338; -} else { - lean::dec_ref(x_338); - x_391 = lean::box(0); -} -x_392 = lean::cnstr_get(x_381, 0); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_381, 1); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_381, 2); -lean::inc(x_394); -x_395 = lean::cnstr_get(x_381, 3); -lean::inc(x_395); -if (lean::is_exclusive(x_381)) { - lean::cnstr_release(x_381, 0); - lean::cnstr_release(x_381, 1); - lean::cnstr_release(x_381, 2); - lean::cnstr_release(x_381, 3); - x_396 = x_381; -} else { - lean::dec_ref(x_381); - x_396 = lean::box(0); -} -lean::inc(x_339); -if (lean::is_scalar(x_396)) { - x_397 = lean::alloc_cnstr(1, 4, 1); -} else { - x_397 = x_396; -} -lean::cnstr_set(x_397, 0, x_325); -lean::cnstr_set(x_397, 1, x_326); -lean::cnstr_set(x_397, 2, x_327); -lean::cnstr_set(x_397, 3, x_339); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_398 = x_339; -} else { - lean::dec_ref(x_339); - x_398 = lean::box(0); -} -lean::cnstr_set_scalar(x_397, sizeof(void*)*4, x_367); -if (lean::is_scalar(x_398)) { - x_399 = lean::alloc_cnstr(1, 4, 1); -} else { - x_399 = x_398; -} -lean::cnstr_set(x_399, 0, x_392); -lean::cnstr_set(x_399, 1, x_393); -lean::cnstr_set(x_399, 2, x_394); -lean::cnstr_set(x_399, 3, x_395); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_367); -if (lean::is_scalar(x_391)) { - x_400 = lean::alloc_cnstr(1, 4, 1); -} else { - x_400 = x_391; -} -lean::cnstr_set(x_400, 0, x_397); -lean::cnstr_set(x_400, 1, x_389); -lean::cnstr_set(x_400, 2, x_390); -lean::cnstr_set(x_400, 3, x_399); -lean::cnstr_set_scalar(x_400, sizeof(void*)*4, x_388); -return x_400; -} -else -{ -obj* x_401; obj* x_402; obj* x_403; obj* x_404; obj* x_405; obj* x_406; obj* x_407; obj* x_408; obj* x_409; uint8 x_410; obj* x_411; obj* x_412; -x_401 = lean::cnstr_get(x_338, 1); -lean::inc(x_401); -x_402 = lean::cnstr_get(x_338, 2); -lean::inc(x_402); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_403 = x_338; -} else { - lean::dec_ref(x_338); - x_403 = lean::box(0); -} -x_404 = lean::cnstr_get(x_339, 0); -lean::inc(x_404); -x_405 = lean::cnstr_get(x_339, 1); -lean::inc(x_405); -x_406 = lean::cnstr_get(x_339, 2); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_339, 3); -lean::inc(x_407); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_408 = x_339; -} else { - lean::dec_ref(x_339); - x_408 = lean::box(0); -} -if (lean::is_scalar(x_408)) { - x_409 = lean::alloc_cnstr(1, 4, 1); -} else { - x_409 = x_408; -} -lean::cnstr_set(x_409, 0, x_404); -lean::cnstr_set(x_409, 1, x_405); -lean::cnstr_set(x_409, 2, x_406); -lean::cnstr_set(x_409, 3, x_407); -lean::cnstr_set_scalar(x_409, sizeof(void*)*4, x_388); -x_410 = 0; -if (lean::is_scalar(x_403)) { - x_411 = lean::alloc_cnstr(1, 4, 1); -} else { - x_411 = x_403; -} -lean::cnstr_set(x_411, 0, x_409); -lean::cnstr_set(x_411, 1, x_401); -lean::cnstr_set(x_411, 2, x_402); -lean::cnstr_set(x_411, 3, x_381); -lean::cnstr_set_scalar(x_411, sizeof(void*)*4, x_410); -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_325); -lean::cnstr_set(x_412, 1, x_326); -lean::cnstr_set(x_412, 2, x_327); -lean::cnstr_set(x_412, 3, x_411); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_388); -return x_412; -} -} -} -} -} -} -} -} -else -{ -uint8 x_413; -x_413 = l_RBNode_isRed___main___rarg(x_325); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; -x_414 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_325, x_2, x_3); -x_415 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_415, 0, x_414); -lean::cnstr_set(x_415, 1, x_326); -lean::cnstr_set(x_415, 2, x_327); -lean::cnstr_set(x_415, 3, x_328); -lean::cnstr_set_scalar(x_415, sizeof(void*)*4, x_7); -return x_415; -} -else -{ -obj* x_416; -x_416 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_325, x_2, x_3); -if (lean::obj_tag(x_416) == 0) -{ -lean::dec(x_328); -lean::dec(x_327); -lean::dec(x_326); -return x_416; -} -else -{ -obj* x_417; -x_417 = lean::cnstr_get(x_416, 0); -lean::inc(x_417); -if (lean::obj_tag(x_417) == 0) -{ -obj* x_418; -x_418 = lean::cnstr_get(x_416, 3); -lean::inc(x_418); -if (lean::obj_tag(x_418) == 0) -{ -obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; uint8 x_424; obj* x_425; -x_419 = lean::cnstr_get(x_416, 1); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_416, 2); -lean::inc(x_420); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_421 = x_416; -} else { - lean::dec_ref(x_416); - x_421 = lean::box(0); -} -x_422 = 0; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_418); -lean::cnstr_set(x_423, 1, x_419); -lean::cnstr_set(x_423, 2, x_420); -lean::cnstr_set(x_423, 3, x_418); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -x_424 = 1; -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_326); -lean::cnstr_set(x_425, 2, x_327); -lean::cnstr_set(x_425, 3, x_328); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_424); -return x_425; -} -else -{ -uint8 x_426; -x_426 = lean::cnstr_get_scalar(x_418, sizeof(void*)*4); -if (x_426 == 0) -{ -obj* x_427; obj* x_428; obj* x_429; obj* x_430; obj* x_431; obj* x_432; obj* x_433; obj* x_434; uint8 x_435; obj* x_436; obj* x_437; obj* x_438; -x_427 = lean::cnstr_get(x_416, 1); -lean::inc(x_427); -x_428 = lean::cnstr_get(x_416, 2); -lean::inc(x_428); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_429 = x_416; -} else { - lean::dec_ref(x_416); - x_429 = lean::box(0); -} -x_430 = lean::cnstr_get(x_418, 0); -lean::inc(x_430); -x_431 = lean::cnstr_get(x_418, 1); -lean::inc(x_431); -x_432 = lean::cnstr_get(x_418, 2); -lean::inc(x_432); -x_433 = lean::cnstr_get(x_418, 3); -lean::inc(x_433); -if (lean::is_exclusive(x_418)) { - lean::cnstr_release(x_418, 0); - lean::cnstr_release(x_418, 1); - lean::cnstr_release(x_418, 2); - lean::cnstr_release(x_418, 3); - x_434 = x_418; -} else { - lean::dec_ref(x_418); - x_434 = lean::box(0); -} -x_435 = 1; -if (lean::is_scalar(x_434)) { - x_436 = lean::alloc_cnstr(1, 4, 1); -} else { - x_436 = x_434; -} -lean::cnstr_set(x_436, 0, x_417); -lean::cnstr_set(x_436, 1, x_427); -lean::cnstr_set(x_436, 2, x_428); -lean::cnstr_set(x_436, 3, x_430); -lean::cnstr_set_scalar(x_436, sizeof(void*)*4, x_435); -if (lean::is_scalar(x_429)) { - x_437 = lean::alloc_cnstr(1, 4, 1); -} else { - x_437 = x_429; -} -lean::cnstr_set(x_437, 0, x_433); -lean::cnstr_set(x_437, 1, x_326); -lean::cnstr_set(x_437, 2, x_327); -lean::cnstr_set(x_437, 3, x_328); -lean::cnstr_set_scalar(x_437, sizeof(void*)*4, x_435); -x_438 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_438, 0, x_436); -lean::cnstr_set(x_438, 1, x_431); -lean::cnstr_set(x_438, 2, x_432); -lean::cnstr_set(x_438, 3, x_437); -lean::cnstr_set_scalar(x_438, sizeof(void*)*4, x_426); -return x_438; -} -else -{ -obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; -x_439 = lean::cnstr_get(x_416, 1); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_416, 2); -lean::inc(x_440); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_441 = x_416; -} else { - lean::dec_ref(x_416); - x_441 = lean::box(0); -} -x_442 = 0; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_417); -lean::cnstr_set(x_443, 1, x_439); -lean::cnstr_set(x_443, 2, x_440); -lean::cnstr_set(x_443, 3, x_418); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -x_444 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_444, 0, x_443); -lean::cnstr_set(x_444, 1, x_326); -lean::cnstr_set(x_444, 2, x_327); -lean::cnstr_set(x_444, 3, x_328); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_426); -return x_444; -} -} -} -else -{ -uint8 x_445; -x_445 = lean::cnstr_get_scalar(x_417, sizeof(void*)*4); -if (x_445 == 0) -{ -obj* x_446; obj* x_447; obj* x_448; obj* x_449; obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; uint8 x_455; obj* x_456; obj* x_457; obj* x_458; -x_446 = lean::cnstr_get(x_416, 1); -lean::inc(x_446); -x_447 = lean::cnstr_get(x_416, 2); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_416, 3); -lean::inc(x_448); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_449 = x_416; -} else { - lean::dec_ref(x_416); - x_449 = lean::box(0); -} -x_450 = lean::cnstr_get(x_417, 0); -lean::inc(x_450); -x_451 = lean::cnstr_get(x_417, 1); -lean::inc(x_451); -x_452 = lean::cnstr_get(x_417, 2); -lean::inc(x_452); -x_453 = lean::cnstr_get(x_417, 3); -lean::inc(x_453); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_454 = x_417; -} else { - lean::dec_ref(x_417); - x_454 = lean::box(0); -} -x_455 = 1; -if (lean::is_scalar(x_454)) { - x_456 = lean::alloc_cnstr(1, 4, 1); -} else { - x_456 = x_454; -} -lean::cnstr_set(x_456, 0, x_450); -lean::cnstr_set(x_456, 1, x_451); -lean::cnstr_set(x_456, 2, x_452); -lean::cnstr_set(x_456, 3, x_453); -lean::cnstr_set_scalar(x_456, sizeof(void*)*4, x_455); -if (lean::is_scalar(x_449)) { - x_457 = lean::alloc_cnstr(1, 4, 1); -} else { - x_457 = x_449; -} -lean::cnstr_set(x_457, 0, x_448); -lean::cnstr_set(x_457, 1, x_326); -lean::cnstr_set(x_457, 2, x_327); -lean::cnstr_set(x_457, 3, x_328); -lean::cnstr_set_scalar(x_457, sizeof(void*)*4, x_455); -x_458 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_458, 0, x_456); -lean::cnstr_set(x_458, 1, x_446); -lean::cnstr_set(x_458, 2, x_447); -lean::cnstr_set(x_458, 3, x_457); -lean::cnstr_set_scalar(x_458, sizeof(void*)*4, x_445); -return x_458; -} -else -{ -obj* x_459; -x_459 = lean::cnstr_get(x_416, 3); -lean::inc(x_459); -if (lean::obj_tag(x_459) == 0) -{ -obj* x_460; obj* x_461; obj* x_462; uint8 x_463; obj* x_464; obj* x_465; -x_460 = lean::cnstr_get(x_416, 1); -lean::inc(x_460); -x_461 = lean::cnstr_get(x_416, 2); -lean::inc(x_461); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_462 = x_416; -} else { - lean::dec_ref(x_416); - x_462 = lean::box(0); -} -x_463 = 0; -if (lean::is_scalar(x_462)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_462; -} -lean::cnstr_set(x_464, 0, x_417); -lean::cnstr_set(x_464, 1, x_460); -lean::cnstr_set(x_464, 2, x_461); -lean::cnstr_set(x_464, 3, x_459); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_463); -x_465 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_465, 0, x_464); -lean::cnstr_set(x_465, 1, x_326); -lean::cnstr_set(x_465, 2, x_327); -lean::cnstr_set(x_465, 3, x_328); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_445); -return x_465; -} -else -{ -uint8 x_466; -x_466 = lean::cnstr_get_scalar(x_459, sizeof(void*)*4); -if (x_466 == 0) -{ -obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; obj* x_475; obj* x_476; obj* x_477; obj* x_478; -x_467 = lean::cnstr_get(x_416, 1); -lean::inc(x_467); -x_468 = lean::cnstr_get(x_416, 2); -lean::inc(x_468); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_469 = x_416; -} else { - lean::dec_ref(x_416); - x_469 = lean::box(0); -} -x_470 = lean::cnstr_get(x_459, 0); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_459, 1); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_459, 2); -lean::inc(x_472); -x_473 = lean::cnstr_get(x_459, 3); -lean::inc(x_473); -if (lean::is_exclusive(x_459)) { - lean::cnstr_release(x_459, 0); - lean::cnstr_release(x_459, 1); - lean::cnstr_release(x_459, 2); - lean::cnstr_release(x_459, 3); - x_474 = x_459; -} else { - lean::dec_ref(x_459); - x_474 = lean::box(0); -} -lean::inc(x_417); -if (lean::is_scalar(x_474)) { - x_475 = lean::alloc_cnstr(1, 4, 1); -} else { - x_475 = x_474; -} -lean::cnstr_set(x_475, 0, x_417); -lean::cnstr_set(x_475, 1, x_467); -lean::cnstr_set(x_475, 2, x_468); -lean::cnstr_set(x_475, 3, x_470); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_476 = x_417; -} else { - lean::dec_ref(x_417); - x_476 = lean::box(0); -} -lean::cnstr_set_scalar(x_475, sizeof(void*)*4, x_445); -if (lean::is_scalar(x_476)) { - x_477 = lean::alloc_cnstr(1, 4, 1); -} else { - x_477 = x_476; -} -lean::cnstr_set(x_477, 0, x_473); -lean::cnstr_set(x_477, 1, x_326); -lean::cnstr_set(x_477, 2, x_327); -lean::cnstr_set(x_477, 3, x_328); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_445); -if (lean::is_scalar(x_469)) { - x_478 = lean::alloc_cnstr(1, 4, 1); -} else { - x_478 = x_469; -} -lean::cnstr_set(x_478, 0, x_475); -lean::cnstr_set(x_478, 1, x_471); -lean::cnstr_set(x_478, 2, x_472); -lean::cnstr_set(x_478, 3, x_477); -lean::cnstr_set_scalar(x_478, sizeof(void*)*4, x_466); -return x_478; -} -else -{ -obj* x_479; obj* x_480; obj* x_481; obj* x_482; obj* x_483; obj* x_484; obj* x_485; obj* x_486; obj* x_487; uint8 x_488; obj* x_489; obj* x_490; -x_479 = lean::cnstr_get(x_416, 1); -lean::inc(x_479); -x_480 = lean::cnstr_get(x_416, 2); -lean::inc(x_480); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_481 = x_416; -} else { - lean::dec_ref(x_416); - x_481 = lean::box(0); -} -x_482 = lean::cnstr_get(x_417, 0); -lean::inc(x_482); -x_483 = lean::cnstr_get(x_417, 1); -lean::inc(x_483); -x_484 = lean::cnstr_get(x_417, 2); -lean::inc(x_484); -x_485 = lean::cnstr_get(x_417, 3); -lean::inc(x_485); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_486 = x_417; -} else { - lean::dec_ref(x_417); - x_486 = lean::box(0); -} -if (lean::is_scalar(x_486)) { - x_487 = lean::alloc_cnstr(1, 4, 1); -} else { - x_487 = x_486; -} -lean::cnstr_set(x_487, 0, x_482); -lean::cnstr_set(x_487, 1, x_483); -lean::cnstr_set(x_487, 2, x_484); -lean::cnstr_set(x_487, 3, x_485); -lean::cnstr_set_scalar(x_487, sizeof(void*)*4, x_466); -x_488 = 0; -if (lean::is_scalar(x_481)) { - x_489 = lean::alloc_cnstr(1, 4, 1); -} else { - x_489 = x_481; -} -lean::cnstr_set(x_489, 0, x_487); -lean::cnstr_set(x_489, 1, x_479); -lean::cnstr_set(x_489, 2, x_480); -lean::cnstr_set(x_489, 3, x_459); -lean::cnstr_set_scalar(x_489, sizeof(void*)*4, x_488); -x_490 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_490, 0, x_489); -lean::cnstr_set(x_490, 1, x_326); -lean::cnstr_set(x_490, 2, x_327); -lean::cnstr_set(x_490, 3, x_328); -lean::cnstr_set_scalar(x_490, sizeof(void*)*4, x_466); -return x_490; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(obj* x_1, uint32 x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; obj* x_6; -x_4 = 0; -x_5 = lean::box_uint32(x_2); -x_6 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_3); -lean::cnstr_set(x_6, 3, x_1); -lean::cnstr_set_scalar(x_6, sizeof(void*)*4, x_4); -return x_6; -} -else -{ -uint8 x_7; -x_7 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_7 == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint32 x_13; uint8 x_14; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_1, 2); -x_12 = lean::cnstr_get(x_1, 3); -x_13 = lean::unbox_uint32(x_10); -x_14 = x_2 < x_13; -if (x_14 == 0) -{ -uint32 x_15; uint8 x_16; -x_15 = lean::unbox_uint32(x_10); -x_16 = x_15 < x_2; -if (x_16 == 0) -{ -obj* x_17; -lean::dec(x_11); -lean::dec(x_10); -x_17 = lean::box_uint32(x_2); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_17); -return x_1; -} -else -{ -obj* x_18; -x_18 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_12, x_2, x_3); -lean::cnstr_set(x_1, 3, x_18); -return x_1; -} -} -else -{ -obj* x_19; -x_19 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_9, x_2, x_3); -lean::cnstr_set(x_1, 0, x_19); -return x_1; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint32 x_24; uint8 x_25; -x_20 = lean::cnstr_get(x_1, 0); -x_21 = lean::cnstr_get(x_1, 1); -x_22 = lean::cnstr_get(x_1, 2); -x_23 = lean::cnstr_get(x_1, 3); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_1); -x_24 = lean::unbox_uint32(x_21); -x_25 = x_2 < x_24; -if (x_25 == 0) -{ -uint32 x_26; uint8 x_27; -x_26 = lean::unbox_uint32(x_21); -x_27 = x_26 < x_2; -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -lean::dec(x_22); -lean::dec(x_21); -x_28 = lean::box_uint32(x_2); -x_29 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_29, 0, x_20); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_29, 2, x_3); -lean::cnstr_set(x_29, 3, x_23); -lean::cnstr_set_scalar(x_29, sizeof(void*)*4, x_7); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_23, x_2, x_3); -x_31 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_31, 0, x_20); -lean::cnstr_set(x_31, 1, x_21); -lean::cnstr_set(x_31, 2, x_22); -lean::cnstr_set(x_31, 3, x_30); -lean::cnstr_set_scalar(x_31, sizeof(void*)*4, x_7); -return x_31; -} -} -else -{ -obj* x_32; obj* x_33; -x_32 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_20, x_2, x_3); -x_33 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_21); -lean::cnstr_set(x_33, 2, x_22); -lean::cnstr_set(x_33, 3, x_23); -lean::cnstr_set_scalar(x_33, sizeof(void*)*4, x_7); -return x_33; -} -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_1); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; uint32 x_39; uint8 x_40; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -x_37 = lean::cnstr_get(x_1, 2); -x_38 = lean::cnstr_get(x_1, 3); -x_39 = lean::unbox_uint32(x_36); -x_40 = x_2 < x_39; -if (x_40 == 0) -{ -uint32 x_41; uint8 x_42; -x_41 = lean::unbox_uint32(x_36); -x_42 = x_41 < x_2; -if (x_42 == 0) -{ -obj* x_43; -lean::dec(x_37); -lean::dec(x_36); -x_43 = lean::box_uint32(x_2); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_43); -return x_1; -} -else -{ -uint8 x_44; -x_44 = l_RBNode_isRed___main___rarg(x_38); -if (x_44 == 0) -{ -obj* x_45; -x_45 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_38, x_2, x_3); -lean::cnstr_set(x_1, 3, x_45); -return x_1; -} -else -{ -obj* x_46; -x_46 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_38, x_2, x_3); -if (lean::obj_tag(x_46) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_37); -lean::dec(x_36); -lean::dec(x_35); -return x_46; -} -else -{ -obj* x_47; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -x_48 = lean::cnstr_get(x_46, 3); -lean::inc(x_48); -if (lean::obj_tag(x_48) == 0) -{ -uint8 x_49; -x_49 = !lean::is_exclusive(x_46); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; uint8 x_53; -x_50 = lean::cnstr_get(x_46, 3); -lean::dec(x_50); -x_51 = lean::cnstr_get(x_46, 0); -lean::dec(x_51); -x_52 = 0; -lean::cnstr_set(x_46, 0, x_48); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_52); -x_53 = 1; -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_53); -return x_1; -} -else -{ -obj* x_54; obj* x_55; uint8 x_56; obj* x_57; uint8 x_58; -x_54 = lean::cnstr_get(x_46, 1); -x_55 = lean::cnstr_get(x_46, 2); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_46); -x_56 = 0; -x_57 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_57, 0, x_48); -lean::cnstr_set(x_57, 1, x_54); -lean::cnstr_set(x_57, 2, x_55); -lean::cnstr_set(x_57, 3, x_48); -lean::cnstr_set_scalar(x_57, sizeof(void*)*4, x_56); -x_58 = 1; -lean::cnstr_set(x_1, 3, x_57); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_58); -return x_1; -} -} -else -{ -uint8 x_59; -x_59 = lean::cnstr_get_scalar(x_48, sizeof(void*)*4); -if (x_59 == 0) -{ -uint8 x_60; -x_60 = !lean::is_exclusive(x_46); -if (x_60 == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; -x_61 = lean::cnstr_get(x_46, 1); -x_62 = lean::cnstr_get(x_46, 2); -x_63 = lean::cnstr_get(x_46, 3); -lean::dec(x_63); -x_64 = lean::cnstr_get(x_46, 0); -lean::dec(x_64); -x_65 = !lean::is_exclusive(x_48); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; uint8 x_70; -x_66 = lean::cnstr_get(x_48, 0); -x_67 = lean::cnstr_get(x_48, 1); -x_68 = lean::cnstr_get(x_48, 2); -x_69 = lean::cnstr_get(x_48, 3); -x_70 = 1; -lean::cnstr_set(x_48, 3, x_47); -lean::cnstr_set(x_48, 2, x_37); -lean::cnstr_set(x_48, 1, x_36); -lean::cnstr_set(x_48, 0, x_35); -lean::cnstr_set_scalar(x_48, sizeof(void*)*4, x_70); -lean::cnstr_set(x_46, 3, x_69); -lean::cnstr_set(x_46, 2, x_68); -lean::cnstr_set(x_46, 1, x_67); -lean::cnstr_set(x_46, 0, x_66); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_70); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_62); -lean::cnstr_set(x_1, 1, x_61); -lean::cnstr_set(x_1, 0, x_48); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; uint8 x_75; obj* x_76; -x_71 = lean::cnstr_get(x_48, 0); -x_72 = lean::cnstr_get(x_48, 1); -x_73 = lean::cnstr_get(x_48, 2); -x_74 = lean::cnstr_get(x_48, 3); -lean::inc(x_74); -lean::inc(x_73); -lean::inc(x_72); -lean::inc(x_71); -lean::dec(x_48); -x_75 = 1; -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_35); -lean::cnstr_set(x_76, 1, x_36); -lean::cnstr_set(x_76, 2, x_37); -lean::cnstr_set(x_76, 3, x_47); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_75); -lean::cnstr_set(x_46, 3, x_74); -lean::cnstr_set(x_46, 2, x_73); -lean::cnstr_set(x_46, 1, x_72); -lean::cnstr_set(x_46, 0, x_71); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_75); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_62); -lean::cnstr_set(x_1, 1, x_61); -lean::cnstr_set(x_1, 0, x_76); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; uint8 x_84; obj* x_85; obj* x_86; -x_77 = lean::cnstr_get(x_46, 1); -x_78 = lean::cnstr_get(x_46, 2); -lean::inc(x_78); -lean::inc(x_77); -lean::dec(x_46); -x_79 = lean::cnstr_get(x_48, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_48, 1); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_48, 2); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_48, 3); -lean::inc(x_82); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - lean::cnstr_release(x_48, 2); - lean::cnstr_release(x_48, 3); - x_83 = x_48; -} else { - lean::dec_ref(x_48); - x_83 = lean::box(0); -} -x_84 = 1; -if (lean::is_scalar(x_83)) { - x_85 = lean::alloc_cnstr(1, 4, 1); -} else { - x_85 = x_83; -} -lean::cnstr_set(x_85, 0, x_35); -lean::cnstr_set(x_85, 1, x_36); -lean::cnstr_set(x_85, 2, x_37); -lean::cnstr_set(x_85, 3, x_47); -lean::cnstr_set_scalar(x_85, sizeof(void*)*4, x_84); -x_86 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_86, 0, x_79); -lean::cnstr_set(x_86, 1, x_80); -lean::cnstr_set(x_86, 2, x_81); -lean::cnstr_set(x_86, 3, x_82); -lean::cnstr_set_scalar(x_86, sizeof(void*)*4, x_84); -lean::cnstr_set(x_1, 3, x_86); -lean::cnstr_set(x_1, 2, x_78); -lean::cnstr_set(x_1, 1, x_77); -lean::cnstr_set(x_1, 0, x_85); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -else -{ -uint8 x_87; -x_87 = !lean::is_exclusive(x_46); -if (x_87 == 0) -{ -obj* x_88; obj* x_89; uint8 x_90; -x_88 = lean::cnstr_get(x_46, 3); -lean::dec(x_88); -x_89 = lean::cnstr_get(x_46, 0); -lean::dec(x_89); -x_90 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_90); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -else -{ -obj* x_91; obj* x_92; uint8 x_93; obj* x_94; -x_91 = lean::cnstr_get(x_46, 1); -x_92 = lean::cnstr_get(x_46, 2); -lean::inc(x_92); -lean::inc(x_91); -lean::dec(x_46); -x_93 = 0; -x_94 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_94, 0, x_47); -lean::cnstr_set(x_94, 1, x_91); -lean::cnstr_set(x_94, 2, x_92); -lean::cnstr_set(x_94, 3, x_48); -lean::cnstr_set_scalar(x_94, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_94); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -} -} -else -{ -uint8 x_95; -x_95 = lean::cnstr_get_scalar(x_47, sizeof(void*)*4); -if (x_95 == 0) -{ -uint8 x_96; -x_96 = !lean::is_exclusive(x_46); -if (x_96 == 0) -{ -obj* x_97; uint8 x_98; -x_97 = lean::cnstr_get(x_46, 0); -lean::dec(x_97); -x_98 = !lean::is_exclusive(x_47); -if (x_98 == 0) -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; uint8 x_103; -x_99 = lean::cnstr_get(x_47, 0); -x_100 = lean::cnstr_get(x_47, 1); -x_101 = lean::cnstr_get(x_47, 2); -x_102 = lean::cnstr_get(x_47, 3); -x_103 = 1; -lean::cnstr_set(x_47, 3, x_99); -lean::cnstr_set(x_47, 2, x_37); -lean::cnstr_set(x_47, 1, x_36); -lean::cnstr_set(x_47, 0, x_35); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_103); -lean::cnstr_set(x_46, 0, x_102); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_103); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_101); -lean::cnstr_set(x_1, 1, x_100); -lean::cnstr_set(x_1, 0, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -else -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; -x_104 = lean::cnstr_get(x_47, 0); -x_105 = lean::cnstr_get(x_47, 1); -x_106 = lean::cnstr_get(x_47, 2); -x_107 = lean::cnstr_get(x_47, 3); -lean::inc(x_107); -lean::inc(x_106); -lean::inc(x_105); -lean::inc(x_104); -lean::dec(x_47); -x_108 = 1; -x_109 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_109, 0, x_35); -lean::cnstr_set(x_109, 1, x_36); -lean::cnstr_set(x_109, 2, x_37); -lean::cnstr_set(x_109, 3, x_104); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -lean::cnstr_set(x_46, 0, x_107); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_106); -lean::cnstr_set(x_1, 1, x_105); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; uint8 x_118; obj* x_119; obj* x_120; -x_110 = lean::cnstr_get(x_46, 1); -x_111 = lean::cnstr_get(x_46, 2); -x_112 = lean::cnstr_get(x_46, 3); -lean::inc(x_112); -lean::inc(x_111); -lean::inc(x_110); -lean::dec(x_46); -x_113 = lean::cnstr_get(x_47, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get(x_47, 1); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_47, 2); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_47, 3); -lean::inc(x_116); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_117 = x_47; -} else { - lean::dec_ref(x_47); - x_117 = lean::box(0); -} -x_118 = 1; -if (lean::is_scalar(x_117)) { - x_119 = lean::alloc_cnstr(1, 4, 1); -} else { - x_119 = x_117; -} -lean::cnstr_set(x_119, 0, x_35); -lean::cnstr_set(x_119, 1, x_36); -lean::cnstr_set(x_119, 2, x_37); -lean::cnstr_set(x_119, 3, x_113); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -x_120 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_120, 0, x_116); -lean::cnstr_set(x_120, 1, x_110); -lean::cnstr_set(x_120, 2, x_111); -lean::cnstr_set(x_120, 3, x_112); -lean::cnstr_set_scalar(x_120, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_120); -lean::cnstr_set(x_1, 2, x_115); -lean::cnstr_set(x_1, 1, x_114); -lean::cnstr_set(x_1, 0, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -obj* x_121; -x_121 = lean::cnstr_get(x_46, 3); -lean::inc(x_121); -if (lean::obj_tag(x_121) == 0) -{ -uint8 x_122; -x_122 = !lean::is_exclusive(x_46); -if (x_122 == 0) -{ -obj* x_123; obj* x_124; uint8 x_125; -x_123 = lean::cnstr_get(x_46, 3); -lean::dec(x_123); -x_124 = lean::cnstr_get(x_46, 0); -lean::dec(x_124); -x_125 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_125); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -else -{ -obj* x_126; obj* x_127; uint8 x_128; obj* x_129; -x_126 = lean::cnstr_get(x_46, 1); -x_127 = lean::cnstr_get(x_46, 2); -lean::inc(x_127); -lean::inc(x_126); -lean::dec(x_46); -x_128 = 0; -x_129 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_129, 0, x_47); -lean::cnstr_set(x_129, 1, x_126); -lean::cnstr_set(x_129, 2, x_127); -lean::cnstr_set(x_129, 3, x_121); -lean::cnstr_set_scalar(x_129, sizeof(void*)*4, x_128); -lean::cnstr_set(x_1, 3, x_129); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -uint8 x_130; -x_130 = lean::cnstr_get_scalar(x_121, sizeof(void*)*4); -if (x_130 == 0) -{ -uint8 x_131; -lean::free_heap_obj(x_1); -x_131 = !lean::is_exclusive(x_46); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; uint8 x_134; -x_132 = lean::cnstr_get(x_46, 3); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_46, 0); -lean::dec(x_133); -x_134 = !lean::is_exclusive(x_121); -if (x_134 == 0) -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; uint8 x_139; -x_135 = lean::cnstr_get(x_121, 0); -x_136 = lean::cnstr_get(x_121, 1); -x_137 = lean::cnstr_get(x_121, 2); -x_138 = lean::cnstr_get(x_121, 3); -lean::inc(x_47); -lean::cnstr_set(x_121, 3, x_47); -lean::cnstr_set(x_121, 2, x_37); -lean::cnstr_set(x_121, 1, x_36); -lean::cnstr_set(x_121, 0, x_35); -x_139 = !lean::is_exclusive(x_47); -if (x_139 == 0) -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; -x_140 = lean::cnstr_get(x_47, 3); -lean::dec(x_140); -x_141 = lean::cnstr_get(x_47, 2); -lean::dec(x_141); -x_142 = lean::cnstr_get(x_47, 1); -lean::dec(x_142); -x_143 = lean::cnstr_get(x_47, 0); -lean::dec(x_143); -lean::cnstr_set_scalar(x_121, sizeof(void*)*4, x_95); -lean::cnstr_set(x_47, 3, x_138); -lean::cnstr_set(x_47, 2, x_137); -lean::cnstr_set(x_47, 1, x_136); -lean::cnstr_set(x_47, 0, x_135); -lean::cnstr_set(x_46, 3, x_47); -lean::cnstr_set(x_46, 0, x_121); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -else -{ -obj* x_144; -lean::dec(x_47); -lean::cnstr_set_scalar(x_121, sizeof(void*)*4, x_95); -x_144 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_144, 0, x_135); -lean::cnstr_set(x_144, 1, x_136); -lean::cnstr_set(x_144, 2, x_137); -lean::cnstr_set(x_144, 3, x_138); -lean::cnstr_set_scalar(x_144, sizeof(void*)*4, x_95); -lean::cnstr_set(x_46, 3, x_144); -lean::cnstr_set(x_46, 0, x_121); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -} -else -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_145 = lean::cnstr_get(x_121, 0); -x_146 = lean::cnstr_get(x_121, 1); -x_147 = lean::cnstr_get(x_121, 2); -x_148 = lean::cnstr_get(x_121, 3); -lean::inc(x_148); -lean::inc(x_147); -lean::inc(x_146); -lean::inc(x_145); -lean::dec(x_121); -lean::inc(x_47); -x_149 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_149, 0, x_35); -lean::cnstr_set(x_149, 1, x_36); -lean::cnstr_set(x_149, 2, x_37); -lean::cnstr_set(x_149, 3, x_47); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_150 = x_47; -} else { - lean::dec_ref(x_47); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_95); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_145); -lean::cnstr_set(x_151, 1, x_146); -lean::cnstr_set(x_151, 2, x_147); -lean::cnstr_set(x_151, 3, x_148); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_95); -lean::cnstr_set(x_46, 3, x_151); -lean::cnstr_set(x_46, 0, x_149); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -} -else -{ -obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -x_152 = lean::cnstr_get(x_46, 1); -x_153 = lean::cnstr_get(x_46, 2); -lean::inc(x_153); -lean::inc(x_152); -lean::dec(x_46); -x_154 = lean::cnstr_get(x_121, 0); -lean::inc(x_154); -x_155 = lean::cnstr_get(x_121, 1); -lean::inc(x_155); -x_156 = lean::cnstr_get(x_121, 2); -lean::inc(x_156); -x_157 = lean::cnstr_get(x_121, 3); -lean::inc(x_157); -if (lean::is_exclusive(x_121)) { - lean::cnstr_release(x_121, 0); - lean::cnstr_release(x_121, 1); - lean::cnstr_release(x_121, 2); - lean::cnstr_release(x_121, 3); - x_158 = x_121; -} else { - lean::dec_ref(x_121); - x_158 = lean::box(0); -} -lean::inc(x_47); -if (lean::is_scalar(x_158)) { - x_159 = lean::alloc_cnstr(1, 4, 1); -} else { - x_159 = x_158; -} -lean::cnstr_set(x_159, 0, x_35); -lean::cnstr_set(x_159, 1, x_36); -lean::cnstr_set(x_159, 2, x_37); -lean::cnstr_set(x_159, 3, x_47); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_160 = x_47; -} else { - lean::dec_ref(x_47); - x_160 = lean::box(0); -} -lean::cnstr_set_scalar(x_159, sizeof(void*)*4, x_95); -if (lean::is_scalar(x_160)) { - x_161 = lean::alloc_cnstr(1, 4, 1); -} else { - x_161 = x_160; -} -lean::cnstr_set(x_161, 0, x_154); -lean::cnstr_set(x_161, 1, x_155); -lean::cnstr_set(x_161, 2, x_156); -lean::cnstr_set(x_161, 3, x_157); -lean::cnstr_set_scalar(x_161, sizeof(void*)*4, x_95); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_159); -lean::cnstr_set(x_162, 1, x_152); -lean::cnstr_set(x_162, 2, x_153); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_130); -return x_162; -} -} -else -{ -uint8 x_163; -x_163 = !lean::is_exclusive(x_46); -if (x_163 == 0) -{ -obj* x_164; obj* x_165; uint8 x_166; -x_164 = lean::cnstr_get(x_46, 3); -lean::dec(x_164); -x_165 = lean::cnstr_get(x_46, 0); -lean::dec(x_165); -x_166 = !lean::is_exclusive(x_47); -if (x_166 == 0) -{ -uint8 x_167; -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_130); -x_167 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_167); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -else -{ -obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; uint8 x_173; -x_168 = lean::cnstr_get(x_47, 0); -x_169 = lean::cnstr_get(x_47, 1); -x_170 = lean::cnstr_get(x_47, 2); -x_171 = lean::cnstr_get(x_47, 3); -lean::inc(x_171); -lean::inc(x_170); -lean::inc(x_169); -lean::inc(x_168); -lean::dec(x_47); -x_172 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_172, 0, x_168); -lean::cnstr_set(x_172, 1, x_169); -lean::cnstr_set(x_172, 2, x_170); -lean::cnstr_set(x_172, 3, x_171); -lean::cnstr_set_scalar(x_172, sizeof(void*)*4, x_130); -x_173 = 0; -lean::cnstr_set(x_46, 0, x_172); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_173); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -} -else -{ -obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; uint8 x_182; obj* x_183; -x_174 = lean::cnstr_get(x_46, 1); -x_175 = lean::cnstr_get(x_46, 2); -lean::inc(x_175); -lean::inc(x_174); -lean::dec(x_46); -x_176 = lean::cnstr_get(x_47, 0); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_47, 1); -lean::inc(x_177); -x_178 = lean::cnstr_get(x_47, 2); -lean::inc(x_178); -x_179 = lean::cnstr_get(x_47, 3); -lean::inc(x_179); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_180 = x_47; -} else { - lean::dec_ref(x_47); - x_180 = lean::box(0); -} -if (lean::is_scalar(x_180)) { - x_181 = lean::alloc_cnstr(1, 4, 1); -} else { - x_181 = x_180; -} -lean::cnstr_set(x_181, 0, x_176); -lean::cnstr_set(x_181, 1, x_177); -lean::cnstr_set(x_181, 2, x_178); -lean::cnstr_set(x_181, 3, x_179); -lean::cnstr_set_scalar(x_181, sizeof(void*)*4, x_130); -x_182 = 0; -x_183 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_183, 0, x_181); -lean::cnstr_set(x_183, 1, x_174); -lean::cnstr_set(x_183, 2, x_175); -lean::cnstr_set(x_183, 3, x_121); -lean::cnstr_set_scalar(x_183, sizeof(void*)*4, x_182); -lean::cnstr_set(x_1, 3, x_183); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_184; -x_184 = l_RBNode_isRed___main___rarg(x_35); -if (x_184 == 0) -{ -obj* x_185; -x_185 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_35, x_2, x_3); -lean::cnstr_set(x_1, 0, x_185); -return x_1; -} -else -{ -obj* x_186; -x_186 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_35, x_2, x_3); -if (lean::obj_tag(x_186) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_38); -lean::dec(x_37); -lean::dec(x_36); -return x_186; -} -else -{ -obj* x_187; -x_187 = lean::cnstr_get(x_186, 0); -lean::inc(x_187); -if (lean::obj_tag(x_187) == 0) -{ -obj* x_188; -x_188 = lean::cnstr_get(x_186, 3); -lean::inc(x_188); -if (lean::obj_tag(x_188) == 0) -{ -uint8 x_189; -x_189 = !lean::is_exclusive(x_186); -if (x_189 == 0) -{ -obj* x_190; obj* x_191; uint8 x_192; uint8 x_193; -x_190 = lean::cnstr_get(x_186, 3); -lean::dec(x_190); -x_191 = lean::cnstr_get(x_186, 0); -lean::dec(x_191); -x_192 = 0; -lean::cnstr_set(x_186, 0, x_188); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_192); -x_193 = 1; -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_193); -return x_1; -} -else -{ -obj* x_194; obj* x_195; uint8 x_196; obj* x_197; uint8 x_198; -x_194 = lean::cnstr_get(x_186, 1); -x_195 = lean::cnstr_get(x_186, 2); -lean::inc(x_195); -lean::inc(x_194); -lean::dec(x_186); -x_196 = 0; -x_197 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_197, 0, x_188); -lean::cnstr_set(x_197, 1, x_194); -lean::cnstr_set(x_197, 2, x_195); -lean::cnstr_set(x_197, 3, x_188); -lean::cnstr_set_scalar(x_197, sizeof(void*)*4, x_196); -x_198 = 1; -lean::cnstr_set(x_1, 0, x_197); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_198); -return x_1; -} -} -else -{ -uint8 x_199; -x_199 = lean::cnstr_get_scalar(x_188, sizeof(void*)*4); -if (x_199 == 0) -{ -uint8 x_200; -x_200 = !lean::is_exclusive(x_186); -if (x_200 == 0) -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; -x_201 = lean::cnstr_get(x_186, 1); -x_202 = lean::cnstr_get(x_186, 2); -x_203 = lean::cnstr_get(x_186, 3); -lean::dec(x_203); -x_204 = lean::cnstr_get(x_186, 0); -lean::dec(x_204); -x_205 = !lean::is_exclusive(x_188); -if (x_205 == 0) -{ -obj* x_206; obj* x_207; obj* x_208; obj* x_209; uint8 x_210; -x_206 = lean::cnstr_get(x_188, 0); -x_207 = lean::cnstr_get(x_188, 1); -x_208 = lean::cnstr_get(x_188, 2); -x_209 = lean::cnstr_get(x_188, 3); -x_210 = 1; -lean::cnstr_set(x_188, 3, x_206); -lean::cnstr_set(x_188, 2, x_202); -lean::cnstr_set(x_188, 1, x_201); -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set_scalar(x_188, sizeof(void*)*4, x_210); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_209); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_210); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_208); -lean::cnstr_set(x_1, 1, x_207); -lean::cnstr_set(x_1, 0, x_188); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; obj* x_214; uint8 x_215; obj* x_216; -x_211 = lean::cnstr_get(x_188, 0); -x_212 = lean::cnstr_get(x_188, 1); -x_213 = lean::cnstr_get(x_188, 2); -x_214 = lean::cnstr_get(x_188, 3); -lean::inc(x_214); -lean::inc(x_213); -lean::inc(x_212); -lean::inc(x_211); -lean::dec(x_188); -x_215 = 1; -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_187); -lean::cnstr_set(x_216, 1, x_201); -lean::cnstr_set(x_216, 2, x_202); -lean::cnstr_set(x_216, 3, x_211); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_215); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_214); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_215); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_213); -lean::cnstr_set(x_1, 1, x_212); -lean::cnstr_set(x_1, 0, x_216); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -else -{ -obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; uint8 x_224; obj* x_225; obj* x_226; -x_217 = lean::cnstr_get(x_186, 1); -x_218 = lean::cnstr_get(x_186, 2); -lean::inc(x_218); -lean::inc(x_217); -lean::dec(x_186); -x_219 = lean::cnstr_get(x_188, 0); -lean::inc(x_219); -x_220 = lean::cnstr_get(x_188, 1); -lean::inc(x_220); -x_221 = lean::cnstr_get(x_188, 2); -lean::inc(x_221); -x_222 = lean::cnstr_get(x_188, 3); -lean::inc(x_222); -if (lean::is_exclusive(x_188)) { - lean::cnstr_release(x_188, 0); - lean::cnstr_release(x_188, 1); - lean::cnstr_release(x_188, 2); - lean::cnstr_release(x_188, 3); - x_223 = x_188; -} else { - lean::dec_ref(x_188); - x_223 = lean::box(0); -} -x_224 = 1; -if (lean::is_scalar(x_223)) { - x_225 = lean::alloc_cnstr(1, 4, 1); -} else { - x_225 = x_223; -} -lean::cnstr_set(x_225, 0, x_187); -lean::cnstr_set(x_225, 1, x_217); -lean::cnstr_set(x_225, 2, x_218); -lean::cnstr_set(x_225, 3, x_219); -lean::cnstr_set_scalar(x_225, sizeof(void*)*4, x_224); -x_226 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_226, 0, x_222); -lean::cnstr_set(x_226, 1, x_36); -lean::cnstr_set(x_226, 2, x_37); -lean::cnstr_set(x_226, 3, x_38); -lean::cnstr_set_scalar(x_226, sizeof(void*)*4, x_224); -lean::cnstr_set(x_1, 3, x_226); -lean::cnstr_set(x_1, 2, x_221); -lean::cnstr_set(x_1, 1, x_220); -lean::cnstr_set(x_1, 0, x_225); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -else -{ -uint8 x_227; -x_227 = !lean::is_exclusive(x_186); -if (x_227 == 0) -{ -obj* x_228; obj* x_229; uint8 x_230; -x_228 = lean::cnstr_get(x_186, 3); -lean::dec(x_228); -x_229 = lean::cnstr_get(x_186, 0); -lean::dec(x_229); -x_230 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_230); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -else -{ -obj* x_231; obj* x_232; uint8 x_233; obj* x_234; -x_231 = lean::cnstr_get(x_186, 1); -x_232 = lean::cnstr_get(x_186, 2); -lean::inc(x_232); -lean::inc(x_231); -lean::dec(x_186); -x_233 = 0; -x_234 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_234, 0, x_187); -lean::cnstr_set(x_234, 1, x_231); -lean::cnstr_set(x_234, 2, x_232); -lean::cnstr_set(x_234, 3, x_188); -lean::cnstr_set_scalar(x_234, sizeof(void*)*4, x_233); -lean::cnstr_set(x_1, 0, x_234); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -} -} -else -{ -uint8 x_235; -x_235 = lean::cnstr_get_scalar(x_187, sizeof(void*)*4); -if (x_235 == 0) -{ -uint8 x_236; -x_236 = !lean::is_exclusive(x_186); -if (x_236 == 0) -{ -obj* x_237; obj* x_238; obj* x_239; obj* x_240; uint8 x_241; -x_237 = lean::cnstr_get(x_186, 1); -x_238 = lean::cnstr_get(x_186, 2); -x_239 = lean::cnstr_get(x_186, 3); -x_240 = lean::cnstr_get(x_186, 0); -lean::dec(x_240); -x_241 = !lean::is_exclusive(x_187); -if (x_241 == 0) -{ -uint8 x_242; -x_242 = 1; -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_242); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_239); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_242); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_238); -lean::cnstr_set(x_1, 1, x_237); -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -else -{ -obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; -x_243 = lean::cnstr_get(x_187, 0); -x_244 = lean::cnstr_get(x_187, 1); -x_245 = lean::cnstr_get(x_187, 2); -x_246 = lean::cnstr_get(x_187, 3); -lean::inc(x_246); -lean::inc(x_245); -lean::inc(x_244); -lean::inc(x_243); -lean::dec(x_187); -x_247 = 1; -x_248 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_248, 0, x_243); -lean::cnstr_set(x_248, 1, x_244); -lean::cnstr_set(x_248, 2, x_245); -lean::cnstr_set(x_248, 3, x_246); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_239); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_238); -lean::cnstr_set(x_1, 1, x_237); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; obj* x_256; uint8 x_257; obj* x_258; obj* x_259; -x_249 = lean::cnstr_get(x_186, 1); -x_250 = lean::cnstr_get(x_186, 2); -x_251 = lean::cnstr_get(x_186, 3); -lean::inc(x_251); -lean::inc(x_250); -lean::inc(x_249); -lean::dec(x_186); -x_252 = lean::cnstr_get(x_187, 0); -lean::inc(x_252); -x_253 = lean::cnstr_get(x_187, 1); -lean::inc(x_253); -x_254 = lean::cnstr_get(x_187, 2); -lean::inc(x_254); -x_255 = lean::cnstr_get(x_187, 3); -lean::inc(x_255); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_256 = x_187; -} else { - lean::dec_ref(x_187); - x_256 = lean::box(0); -} -x_257 = 1; -if (lean::is_scalar(x_256)) { - x_258 = lean::alloc_cnstr(1, 4, 1); -} else { - x_258 = x_256; -} -lean::cnstr_set(x_258, 0, x_252); -lean::cnstr_set(x_258, 1, x_253); -lean::cnstr_set(x_258, 2, x_254); -lean::cnstr_set(x_258, 3, x_255); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -x_259 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_259, 0, x_251); -lean::cnstr_set(x_259, 1, x_36); -lean::cnstr_set(x_259, 2, x_37); -lean::cnstr_set(x_259, 3, x_38); -lean::cnstr_set_scalar(x_259, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 3, x_259); -lean::cnstr_set(x_1, 2, x_250); -lean::cnstr_set(x_1, 1, x_249); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -obj* x_260; -x_260 = lean::cnstr_get(x_186, 3); -lean::inc(x_260); -if (lean::obj_tag(x_260) == 0) -{ -uint8 x_261; -x_261 = !lean::is_exclusive(x_186); -if (x_261 == 0) -{ -obj* x_262; obj* x_263; uint8 x_264; -x_262 = lean::cnstr_get(x_186, 3); -lean::dec(x_262); -x_263 = lean::cnstr_get(x_186, 0); -lean::dec(x_263); -x_264 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_264); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -else -{ -obj* x_265; obj* x_266; uint8 x_267; obj* x_268; -x_265 = lean::cnstr_get(x_186, 1); -x_266 = lean::cnstr_get(x_186, 2); -lean::inc(x_266); -lean::inc(x_265); -lean::dec(x_186); -x_267 = 0; -x_268 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_268, 0, x_187); -lean::cnstr_set(x_268, 1, x_265); -lean::cnstr_set(x_268, 2, x_266); -lean::cnstr_set(x_268, 3, x_260); -lean::cnstr_set_scalar(x_268, sizeof(void*)*4, x_267); -lean::cnstr_set(x_1, 0, x_268); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -uint8 x_269; -x_269 = lean::cnstr_get_scalar(x_260, sizeof(void*)*4); -if (x_269 == 0) -{ -uint8 x_270; -lean::free_heap_obj(x_1); -x_270 = !lean::is_exclusive(x_186); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; uint8 x_275; -x_271 = lean::cnstr_get(x_186, 1); -x_272 = lean::cnstr_get(x_186, 2); -x_273 = lean::cnstr_get(x_186, 3); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_186, 0); -lean::dec(x_274); -x_275 = !lean::is_exclusive(x_260); -if (x_275 == 0) -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; uint8 x_280; -x_276 = lean::cnstr_get(x_260, 0); -x_277 = lean::cnstr_get(x_260, 1); -x_278 = lean::cnstr_get(x_260, 2); -x_279 = lean::cnstr_get(x_260, 3); -lean::inc(x_187); -lean::cnstr_set(x_260, 3, x_276); -lean::cnstr_set(x_260, 2, x_272); -lean::cnstr_set(x_260, 1, x_271); -lean::cnstr_set(x_260, 0, x_187); -x_280 = !lean::is_exclusive(x_187); -if (x_280 == 0) -{ -obj* x_281; obj* x_282; obj* x_283; obj* x_284; -x_281 = lean::cnstr_get(x_187, 3); -lean::dec(x_281); -x_282 = lean::cnstr_get(x_187, 2); -lean::dec(x_282); -x_283 = lean::cnstr_get(x_187, 1); -lean::dec(x_283); -x_284 = lean::cnstr_get(x_187, 0); -lean::dec(x_284); -lean::cnstr_set_scalar(x_260, sizeof(void*)*4, x_235); -lean::cnstr_set(x_187, 3, x_38); -lean::cnstr_set(x_187, 2, x_37); -lean::cnstr_set(x_187, 1, x_36); -lean::cnstr_set(x_187, 0, x_279); -lean::cnstr_set(x_186, 3, x_187); -lean::cnstr_set(x_186, 2, x_278); -lean::cnstr_set(x_186, 1, x_277); -lean::cnstr_set(x_186, 0, x_260); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -else -{ -obj* x_285; -lean::dec(x_187); -lean::cnstr_set_scalar(x_260, sizeof(void*)*4, x_235); -x_285 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_285, 0, x_279); -lean::cnstr_set(x_285, 1, x_36); -lean::cnstr_set(x_285, 2, x_37); -lean::cnstr_set(x_285, 3, x_38); -lean::cnstr_set_scalar(x_285, sizeof(void*)*4, x_235); -lean::cnstr_set(x_186, 3, x_285); -lean::cnstr_set(x_186, 2, x_278); -lean::cnstr_set(x_186, 1, x_277); -lean::cnstr_set(x_186, 0, x_260); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -} -else -{ -obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; -x_286 = lean::cnstr_get(x_260, 0); -x_287 = lean::cnstr_get(x_260, 1); -x_288 = lean::cnstr_get(x_260, 2); -x_289 = lean::cnstr_get(x_260, 3); -lean::inc(x_289); -lean::inc(x_288); -lean::inc(x_287); -lean::inc(x_286); -lean::dec(x_260); -lean::inc(x_187); -x_290 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_290, 0, x_187); -lean::cnstr_set(x_290, 1, x_271); -lean::cnstr_set(x_290, 2, x_272); -lean::cnstr_set(x_290, 3, x_286); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_291 = x_187; -} else { - lean::dec_ref(x_187); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_235); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_289); -lean::cnstr_set(x_292, 1, x_36); -lean::cnstr_set(x_292, 2, x_37); -lean::cnstr_set(x_292, 3, x_38); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_235); -lean::cnstr_set(x_186, 3, x_292); -lean::cnstr_set(x_186, 2, x_288); -lean::cnstr_set(x_186, 1, x_287); -lean::cnstr_set(x_186, 0, x_290); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -} -else -{ -obj* x_293; obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; -x_293 = lean::cnstr_get(x_186, 1); -x_294 = lean::cnstr_get(x_186, 2); -lean::inc(x_294); -lean::inc(x_293); -lean::dec(x_186); -x_295 = lean::cnstr_get(x_260, 0); -lean::inc(x_295); -x_296 = lean::cnstr_get(x_260, 1); -lean::inc(x_296); -x_297 = lean::cnstr_get(x_260, 2); -lean::inc(x_297); -x_298 = lean::cnstr_get(x_260, 3); -lean::inc(x_298); -if (lean::is_exclusive(x_260)) { - lean::cnstr_release(x_260, 0); - lean::cnstr_release(x_260, 1); - lean::cnstr_release(x_260, 2); - lean::cnstr_release(x_260, 3); - x_299 = x_260; -} else { - lean::dec_ref(x_260); - x_299 = lean::box(0); -} -lean::inc(x_187); -if (lean::is_scalar(x_299)) { - x_300 = lean::alloc_cnstr(1, 4, 1); -} else { - x_300 = x_299; -} -lean::cnstr_set(x_300, 0, x_187); -lean::cnstr_set(x_300, 1, x_293); -lean::cnstr_set(x_300, 2, x_294); -lean::cnstr_set(x_300, 3, x_295); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_301 = x_187; -} else { - lean::dec_ref(x_187); - x_301 = lean::box(0); -} -lean::cnstr_set_scalar(x_300, sizeof(void*)*4, x_235); -if (lean::is_scalar(x_301)) { - x_302 = lean::alloc_cnstr(1, 4, 1); -} else { - x_302 = x_301; -} -lean::cnstr_set(x_302, 0, x_298); -lean::cnstr_set(x_302, 1, x_36); -lean::cnstr_set(x_302, 2, x_37); -lean::cnstr_set(x_302, 3, x_38); -lean::cnstr_set_scalar(x_302, sizeof(void*)*4, x_235); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_300); -lean::cnstr_set(x_303, 1, x_296); -lean::cnstr_set(x_303, 2, x_297); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_269); -return x_303; -} -} -else -{ -uint8 x_304; -x_304 = !lean::is_exclusive(x_186); -if (x_304 == 0) -{ -obj* x_305; obj* x_306; uint8 x_307; -x_305 = lean::cnstr_get(x_186, 3); -lean::dec(x_305); -x_306 = lean::cnstr_get(x_186, 0); -lean::dec(x_306); -x_307 = !lean::is_exclusive(x_187); -if (x_307 == 0) -{ -uint8 x_308; -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_269); -x_308 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_308); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -else -{ -obj* x_309; obj* x_310; obj* x_311; obj* x_312; obj* x_313; uint8 x_314; -x_309 = lean::cnstr_get(x_187, 0); -x_310 = lean::cnstr_get(x_187, 1); -x_311 = lean::cnstr_get(x_187, 2); -x_312 = lean::cnstr_get(x_187, 3); -lean::inc(x_312); -lean::inc(x_311); -lean::inc(x_310); -lean::inc(x_309); -lean::dec(x_187); -x_313 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_313, 0, x_309); -lean::cnstr_set(x_313, 1, x_310); -lean::cnstr_set(x_313, 2, x_311); -lean::cnstr_set(x_313, 3, x_312); -lean::cnstr_set_scalar(x_313, sizeof(void*)*4, x_269); -x_314 = 0; -lean::cnstr_set(x_186, 0, x_313); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_314); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; obj* x_319; obj* x_320; obj* x_321; obj* x_322; uint8 x_323; obj* x_324; -x_315 = lean::cnstr_get(x_186, 1); -x_316 = lean::cnstr_get(x_186, 2); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_186); -x_317 = lean::cnstr_get(x_187, 0); -lean::inc(x_317); -x_318 = lean::cnstr_get(x_187, 1); -lean::inc(x_318); -x_319 = lean::cnstr_get(x_187, 2); -lean::inc(x_319); -x_320 = lean::cnstr_get(x_187, 3); -lean::inc(x_320); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_321 = x_187; -} else { - lean::dec_ref(x_187); - x_321 = lean::box(0); -} -if (lean::is_scalar(x_321)) { - x_322 = lean::alloc_cnstr(1, 4, 1); -} else { - x_322 = x_321; -} -lean::cnstr_set(x_322, 0, x_317); -lean::cnstr_set(x_322, 1, x_318); -lean::cnstr_set(x_322, 2, x_319); -lean::cnstr_set(x_322, 3, x_320); -lean::cnstr_set_scalar(x_322, sizeof(void*)*4, x_269); -x_323 = 0; -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_322); -lean::cnstr_set(x_324, 1, x_315); -lean::cnstr_set(x_324, 2, x_316); -lean::cnstr_set(x_324, 3, x_260); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_323); -lean::cnstr_set(x_1, 0, x_324); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_325; obj* x_326; obj* x_327; obj* x_328; uint32 x_329; uint8 x_330; -x_325 = lean::cnstr_get(x_1, 0); -x_326 = lean::cnstr_get(x_1, 1); -x_327 = lean::cnstr_get(x_1, 2); -x_328 = lean::cnstr_get(x_1, 3); -lean::inc(x_328); -lean::inc(x_327); -lean::inc(x_326); -lean::inc(x_325); -lean::dec(x_1); -x_329 = lean::unbox_uint32(x_326); -x_330 = x_2 < x_329; -if (x_330 == 0) -{ -uint32 x_331; uint8 x_332; -x_331 = lean::unbox_uint32(x_326); -x_332 = x_331 < x_2; -if (x_332 == 0) -{ -obj* x_333; obj* x_334; -lean::dec(x_327); -lean::dec(x_326); -x_333 = lean::box_uint32(x_2); -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_325); -lean::cnstr_set(x_334, 1, x_333); -lean::cnstr_set(x_334, 2, x_3); -lean::cnstr_set(x_334, 3, x_328); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_7); -return x_334; -} -else -{ -uint8 x_335; -x_335 = l_RBNode_isRed___main___rarg(x_328); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; -x_336 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_328, x_2, x_3); -x_337 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_337, 0, x_325); -lean::cnstr_set(x_337, 1, x_326); -lean::cnstr_set(x_337, 2, x_327); -lean::cnstr_set(x_337, 3, x_336); -lean::cnstr_set_scalar(x_337, sizeof(void*)*4, x_7); -return x_337; -} -else -{ -obj* x_338; -x_338 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_328, x_2, x_3); -if (lean::obj_tag(x_338) == 0) -{ -lean::dec(x_327); -lean::dec(x_326); -lean::dec(x_325); -return x_338; -} -else -{ -obj* x_339; -x_339 = lean::cnstr_get(x_338, 0); -lean::inc(x_339); -if (lean::obj_tag(x_339) == 0) -{ -obj* x_340; -x_340 = lean::cnstr_get(x_338, 3); -lean::inc(x_340); -if (lean::obj_tag(x_340) == 0) -{ -obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; uint8 x_346; obj* x_347; -x_341 = lean::cnstr_get(x_338, 1); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_338, 2); -lean::inc(x_342); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_343 = x_338; -} else { - lean::dec_ref(x_338); - x_343 = lean::box(0); -} -x_344 = 0; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_340); -lean::cnstr_set(x_345, 1, x_341); -lean::cnstr_set(x_345, 2, x_342); -lean::cnstr_set(x_345, 3, x_340); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -x_346 = 1; -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_325); -lean::cnstr_set(x_347, 1, x_326); -lean::cnstr_set(x_347, 2, x_327); -lean::cnstr_set(x_347, 3, x_345); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_346); -return x_347; -} -else -{ -uint8 x_348; -x_348 = lean::cnstr_get_scalar(x_340, sizeof(void*)*4); -if (x_348 == 0) -{ -obj* x_349; obj* x_350; obj* x_351; obj* x_352; obj* x_353; obj* x_354; obj* x_355; obj* x_356; uint8 x_357; obj* x_358; obj* x_359; obj* x_360; -x_349 = lean::cnstr_get(x_338, 1); -lean::inc(x_349); -x_350 = lean::cnstr_get(x_338, 2); -lean::inc(x_350); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_351 = x_338; -} else { - lean::dec_ref(x_338); - x_351 = lean::box(0); -} -x_352 = lean::cnstr_get(x_340, 0); -lean::inc(x_352); -x_353 = lean::cnstr_get(x_340, 1); -lean::inc(x_353); -x_354 = lean::cnstr_get(x_340, 2); -lean::inc(x_354); -x_355 = lean::cnstr_get(x_340, 3); -lean::inc(x_355); -if (lean::is_exclusive(x_340)) { - lean::cnstr_release(x_340, 0); - lean::cnstr_release(x_340, 1); - lean::cnstr_release(x_340, 2); - lean::cnstr_release(x_340, 3); - x_356 = x_340; -} else { - lean::dec_ref(x_340); - x_356 = lean::box(0); -} -x_357 = 1; -if (lean::is_scalar(x_356)) { - x_358 = lean::alloc_cnstr(1, 4, 1); -} else { - x_358 = x_356; -} -lean::cnstr_set(x_358, 0, x_325); -lean::cnstr_set(x_358, 1, x_326); -lean::cnstr_set(x_358, 2, x_327); -lean::cnstr_set(x_358, 3, x_339); -lean::cnstr_set_scalar(x_358, sizeof(void*)*4, x_357); -if (lean::is_scalar(x_351)) { - x_359 = lean::alloc_cnstr(1, 4, 1); -} else { - x_359 = x_351; -} -lean::cnstr_set(x_359, 0, x_352); -lean::cnstr_set(x_359, 1, x_353); -lean::cnstr_set(x_359, 2, x_354); -lean::cnstr_set(x_359, 3, x_355); -lean::cnstr_set_scalar(x_359, sizeof(void*)*4, x_357); -x_360 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_360, 0, x_358); -lean::cnstr_set(x_360, 1, x_349); -lean::cnstr_set(x_360, 2, x_350); -lean::cnstr_set(x_360, 3, x_359); -lean::cnstr_set_scalar(x_360, sizeof(void*)*4, x_348); -return x_360; -} -else -{ -obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; -x_361 = lean::cnstr_get(x_338, 1); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_338, 2); -lean::inc(x_362); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_363 = x_338; -} else { - lean::dec_ref(x_338); - x_363 = lean::box(0); -} -x_364 = 0; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_339); -lean::cnstr_set(x_365, 1, x_361); -lean::cnstr_set(x_365, 2, x_362); -lean::cnstr_set(x_365, 3, x_340); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -x_366 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_366, 0, x_325); -lean::cnstr_set(x_366, 1, x_326); -lean::cnstr_set(x_366, 2, x_327); -lean::cnstr_set(x_366, 3, x_365); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_348); -return x_366; -} -} -} -else -{ -uint8 x_367; -x_367 = lean::cnstr_get_scalar(x_339, sizeof(void*)*4); -if (x_367 == 0) -{ -obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_372; obj* x_373; obj* x_374; obj* x_375; obj* x_376; uint8 x_377; obj* x_378; obj* x_379; obj* x_380; -x_368 = lean::cnstr_get(x_338, 1); -lean::inc(x_368); -x_369 = lean::cnstr_get(x_338, 2); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_338, 3); -lean::inc(x_370); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_371 = x_338; -} else { - lean::dec_ref(x_338); - x_371 = lean::box(0); -} -x_372 = lean::cnstr_get(x_339, 0); -lean::inc(x_372); -x_373 = lean::cnstr_get(x_339, 1); -lean::inc(x_373); -x_374 = lean::cnstr_get(x_339, 2); -lean::inc(x_374); -x_375 = lean::cnstr_get(x_339, 3); -lean::inc(x_375); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_376 = x_339; -} else { - lean::dec_ref(x_339); - x_376 = lean::box(0); -} -x_377 = 1; -if (lean::is_scalar(x_376)) { - x_378 = lean::alloc_cnstr(1, 4, 1); -} else { - x_378 = x_376; -} -lean::cnstr_set(x_378, 0, x_325); -lean::cnstr_set(x_378, 1, x_326); -lean::cnstr_set(x_378, 2, x_327); -lean::cnstr_set(x_378, 3, x_372); -lean::cnstr_set_scalar(x_378, sizeof(void*)*4, x_377); -if (lean::is_scalar(x_371)) { - x_379 = lean::alloc_cnstr(1, 4, 1); -} else { - x_379 = x_371; -} -lean::cnstr_set(x_379, 0, x_375); -lean::cnstr_set(x_379, 1, x_368); -lean::cnstr_set(x_379, 2, x_369); -lean::cnstr_set(x_379, 3, x_370); -lean::cnstr_set_scalar(x_379, sizeof(void*)*4, x_377); -x_380 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_380, 0, x_378); -lean::cnstr_set(x_380, 1, x_373); -lean::cnstr_set(x_380, 2, x_374); -lean::cnstr_set(x_380, 3, x_379); -lean::cnstr_set_scalar(x_380, sizeof(void*)*4, x_367); -return x_380; -} -else -{ -obj* x_381; -x_381 = lean::cnstr_get(x_338, 3); -lean::inc(x_381); -if (lean::obj_tag(x_381) == 0) -{ -obj* x_382; obj* x_383; obj* x_384; uint8 x_385; obj* x_386; obj* x_387; -x_382 = lean::cnstr_get(x_338, 1); -lean::inc(x_382); -x_383 = lean::cnstr_get(x_338, 2); -lean::inc(x_383); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_384 = x_338; -} else { - lean::dec_ref(x_338); - x_384 = lean::box(0); -} -x_385 = 0; -if (lean::is_scalar(x_384)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_384; -} -lean::cnstr_set(x_386, 0, x_339); -lean::cnstr_set(x_386, 1, x_382); -lean::cnstr_set(x_386, 2, x_383); -lean::cnstr_set(x_386, 3, x_381); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_385); -x_387 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_387, 0, x_325); -lean::cnstr_set(x_387, 1, x_326); -lean::cnstr_set(x_387, 2, x_327); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_367); -return x_387; -} -else -{ -uint8 x_388; -x_388 = lean::cnstr_get_scalar(x_381, sizeof(void*)*4); -if (x_388 == 0) -{ -obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; obj* x_397; obj* x_398; obj* x_399; obj* x_400; -x_389 = lean::cnstr_get(x_338, 1); -lean::inc(x_389); -x_390 = lean::cnstr_get(x_338, 2); -lean::inc(x_390); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_391 = x_338; -} else { - lean::dec_ref(x_338); - x_391 = lean::box(0); -} -x_392 = lean::cnstr_get(x_381, 0); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_381, 1); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_381, 2); -lean::inc(x_394); -x_395 = lean::cnstr_get(x_381, 3); -lean::inc(x_395); -if (lean::is_exclusive(x_381)) { - lean::cnstr_release(x_381, 0); - lean::cnstr_release(x_381, 1); - lean::cnstr_release(x_381, 2); - lean::cnstr_release(x_381, 3); - x_396 = x_381; -} else { - lean::dec_ref(x_381); - x_396 = lean::box(0); -} -lean::inc(x_339); -if (lean::is_scalar(x_396)) { - x_397 = lean::alloc_cnstr(1, 4, 1); -} else { - x_397 = x_396; -} -lean::cnstr_set(x_397, 0, x_325); -lean::cnstr_set(x_397, 1, x_326); -lean::cnstr_set(x_397, 2, x_327); -lean::cnstr_set(x_397, 3, x_339); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_398 = x_339; -} else { - lean::dec_ref(x_339); - x_398 = lean::box(0); -} -lean::cnstr_set_scalar(x_397, sizeof(void*)*4, x_367); -if (lean::is_scalar(x_398)) { - x_399 = lean::alloc_cnstr(1, 4, 1); -} else { - x_399 = x_398; -} -lean::cnstr_set(x_399, 0, x_392); -lean::cnstr_set(x_399, 1, x_393); -lean::cnstr_set(x_399, 2, x_394); -lean::cnstr_set(x_399, 3, x_395); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_367); -if (lean::is_scalar(x_391)) { - x_400 = lean::alloc_cnstr(1, 4, 1); -} else { - x_400 = x_391; -} -lean::cnstr_set(x_400, 0, x_397); -lean::cnstr_set(x_400, 1, x_389); -lean::cnstr_set(x_400, 2, x_390); -lean::cnstr_set(x_400, 3, x_399); -lean::cnstr_set_scalar(x_400, sizeof(void*)*4, x_388); -return x_400; -} -else -{ -obj* x_401; obj* x_402; obj* x_403; obj* x_404; obj* x_405; obj* x_406; obj* x_407; obj* x_408; obj* x_409; uint8 x_410; obj* x_411; obj* x_412; -x_401 = lean::cnstr_get(x_338, 1); -lean::inc(x_401); -x_402 = lean::cnstr_get(x_338, 2); -lean::inc(x_402); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_403 = x_338; -} else { - lean::dec_ref(x_338); - x_403 = lean::box(0); -} -x_404 = lean::cnstr_get(x_339, 0); -lean::inc(x_404); -x_405 = lean::cnstr_get(x_339, 1); -lean::inc(x_405); -x_406 = lean::cnstr_get(x_339, 2); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_339, 3); -lean::inc(x_407); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_408 = x_339; -} else { - lean::dec_ref(x_339); - x_408 = lean::box(0); -} -if (lean::is_scalar(x_408)) { - x_409 = lean::alloc_cnstr(1, 4, 1); -} else { - x_409 = x_408; -} -lean::cnstr_set(x_409, 0, x_404); -lean::cnstr_set(x_409, 1, x_405); -lean::cnstr_set(x_409, 2, x_406); -lean::cnstr_set(x_409, 3, x_407); -lean::cnstr_set_scalar(x_409, sizeof(void*)*4, x_388); -x_410 = 0; -if (lean::is_scalar(x_403)) { - x_411 = lean::alloc_cnstr(1, 4, 1); -} else { - x_411 = x_403; -} -lean::cnstr_set(x_411, 0, x_409); -lean::cnstr_set(x_411, 1, x_401); -lean::cnstr_set(x_411, 2, x_402); -lean::cnstr_set(x_411, 3, x_381); -lean::cnstr_set_scalar(x_411, sizeof(void*)*4, x_410); -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_325); -lean::cnstr_set(x_412, 1, x_326); -lean::cnstr_set(x_412, 2, x_327); -lean::cnstr_set(x_412, 3, x_411); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_388); -return x_412; -} -} -} -} -} -} -} -} -else -{ -uint8 x_413; -x_413 = l_RBNode_isRed___main___rarg(x_325); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; -x_414 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_325, x_2, x_3); -x_415 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_415, 0, x_414); -lean::cnstr_set(x_415, 1, x_326); -lean::cnstr_set(x_415, 2, x_327); -lean::cnstr_set(x_415, 3, x_328); -lean::cnstr_set_scalar(x_415, sizeof(void*)*4, x_7); -return x_415; -} -else -{ -obj* x_416; -x_416 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_325, x_2, x_3); -if (lean::obj_tag(x_416) == 0) -{ -lean::dec(x_328); -lean::dec(x_327); -lean::dec(x_326); -return x_416; -} -else -{ -obj* x_417; -x_417 = lean::cnstr_get(x_416, 0); -lean::inc(x_417); -if (lean::obj_tag(x_417) == 0) -{ -obj* x_418; -x_418 = lean::cnstr_get(x_416, 3); -lean::inc(x_418); -if (lean::obj_tag(x_418) == 0) -{ -obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; uint8 x_424; obj* x_425; -x_419 = lean::cnstr_get(x_416, 1); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_416, 2); -lean::inc(x_420); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_421 = x_416; -} else { - lean::dec_ref(x_416); - x_421 = lean::box(0); -} -x_422 = 0; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_418); -lean::cnstr_set(x_423, 1, x_419); -lean::cnstr_set(x_423, 2, x_420); -lean::cnstr_set(x_423, 3, x_418); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -x_424 = 1; -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_326); -lean::cnstr_set(x_425, 2, x_327); -lean::cnstr_set(x_425, 3, x_328); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_424); -return x_425; -} -else -{ -uint8 x_426; -x_426 = lean::cnstr_get_scalar(x_418, sizeof(void*)*4); -if (x_426 == 0) -{ -obj* x_427; obj* x_428; obj* x_429; obj* x_430; obj* x_431; obj* x_432; obj* x_433; obj* x_434; uint8 x_435; obj* x_436; obj* x_437; obj* x_438; -x_427 = lean::cnstr_get(x_416, 1); -lean::inc(x_427); -x_428 = lean::cnstr_get(x_416, 2); -lean::inc(x_428); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_429 = x_416; -} else { - lean::dec_ref(x_416); - x_429 = lean::box(0); -} -x_430 = lean::cnstr_get(x_418, 0); -lean::inc(x_430); -x_431 = lean::cnstr_get(x_418, 1); -lean::inc(x_431); -x_432 = lean::cnstr_get(x_418, 2); -lean::inc(x_432); -x_433 = lean::cnstr_get(x_418, 3); -lean::inc(x_433); -if (lean::is_exclusive(x_418)) { - lean::cnstr_release(x_418, 0); - lean::cnstr_release(x_418, 1); - lean::cnstr_release(x_418, 2); - lean::cnstr_release(x_418, 3); - x_434 = x_418; -} else { - lean::dec_ref(x_418); - x_434 = lean::box(0); -} -x_435 = 1; -if (lean::is_scalar(x_434)) { - x_436 = lean::alloc_cnstr(1, 4, 1); -} else { - x_436 = x_434; -} -lean::cnstr_set(x_436, 0, x_417); -lean::cnstr_set(x_436, 1, x_427); -lean::cnstr_set(x_436, 2, x_428); -lean::cnstr_set(x_436, 3, x_430); -lean::cnstr_set_scalar(x_436, sizeof(void*)*4, x_435); -if (lean::is_scalar(x_429)) { - x_437 = lean::alloc_cnstr(1, 4, 1); -} else { - x_437 = x_429; -} -lean::cnstr_set(x_437, 0, x_433); -lean::cnstr_set(x_437, 1, x_326); -lean::cnstr_set(x_437, 2, x_327); -lean::cnstr_set(x_437, 3, x_328); -lean::cnstr_set_scalar(x_437, sizeof(void*)*4, x_435); -x_438 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_438, 0, x_436); -lean::cnstr_set(x_438, 1, x_431); -lean::cnstr_set(x_438, 2, x_432); -lean::cnstr_set(x_438, 3, x_437); -lean::cnstr_set_scalar(x_438, sizeof(void*)*4, x_426); -return x_438; -} -else -{ -obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; -x_439 = lean::cnstr_get(x_416, 1); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_416, 2); -lean::inc(x_440); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_441 = x_416; -} else { - lean::dec_ref(x_416); - x_441 = lean::box(0); -} -x_442 = 0; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_417); -lean::cnstr_set(x_443, 1, x_439); -lean::cnstr_set(x_443, 2, x_440); -lean::cnstr_set(x_443, 3, x_418); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -x_444 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_444, 0, x_443); -lean::cnstr_set(x_444, 1, x_326); -lean::cnstr_set(x_444, 2, x_327); -lean::cnstr_set(x_444, 3, x_328); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_426); -return x_444; -} -} -} -else -{ -uint8 x_445; -x_445 = lean::cnstr_get_scalar(x_417, sizeof(void*)*4); -if (x_445 == 0) -{ -obj* x_446; obj* x_447; obj* x_448; obj* x_449; obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; uint8 x_455; obj* x_456; obj* x_457; obj* x_458; -x_446 = lean::cnstr_get(x_416, 1); -lean::inc(x_446); -x_447 = lean::cnstr_get(x_416, 2); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_416, 3); -lean::inc(x_448); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_449 = x_416; -} else { - lean::dec_ref(x_416); - x_449 = lean::box(0); -} -x_450 = lean::cnstr_get(x_417, 0); -lean::inc(x_450); -x_451 = lean::cnstr_get(x_417, 1); -lean::inc(x_451); -x_452 = lean::cnstr_get(x_417, 2); -lean::inc(x_452); -x_453 = lean::cnstr_get(x_417, 3); -lean::inc(x_453); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_454 = x_417; -} else { - lean::dec_ref(x_417); - x_454 = lean::box(0); -} -x_455 = 1; -if (lean::is_scalar(x_454)) { - x_456 = lean::alloc_cnstr(1, 4, 1); -} else { - x_456 = x_454; -} -lean::cnstr_set(x_456, 0, x_450); -lean::cnstr_set(x_456, 1, x_451); -lean::cnstr_set(x_456, 2, x_452); -lean::cnstr_set(x_456, 3, x_453); -lean::cnstr_set_scalar(x_456, sizeof(void*)*4, x_455); -if (lean::is_scalar(x_449)) { - x_457 = lean::alloc_cnstr(1, 4, 1); -} else { - x_457 = x_449; -} -lean::cnstr_set(x_457, 0, x_448); -lean::cnstr_set(x_457, 1, x_326); -lean::cnstr_set(x_457, 2, x_327); -lean::cnstr_set(x_457, 3, x_328); -lean::cnstr_set_scalar(x_457, sizeof(void*)*4, x_455); -x_458 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_458, 0, x_456); -lean::cnstr_set(x_458, 1, x_446); -lean::cnstr_set(x_458, 2, x_447); -lean::cnstr_set(x_458, 3, x_457); -lean::cnstr_set_scalar(x_458, sizeof(void*)*4, x_445); -return x_458; -} -else -{ -obj* x_459; -x_459 = lean::cnstr_get(x_416, 3); -lean::inc(x_459); -if (lean::obj_tag(x_459) == 0) -{ -obj* x_460; obj* x_461; obj* x_462; uint8 x_463; obj* x_464; obj* x_465; -x_460 = lean::cnstr_get(x_416, 1); -lean::inc(x_460); -x_461 = lean::cnstr_get(x_416, 2); -lean::inc(x_461); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_462 = x_416; -} else { - lean::dec_ref(x_416); - x_462 = lean::box(0); -} -x_463 = 0; -if (lean::is_scalar(x_462)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_462; -} -lean::cnstr_set(x_464, 0, x_417); -lean::cnstr_set(x_464, 1, x_460); -lean::cnstr_set(x_464, 2, x_461); -lean::cnstr_set(x_464, 3, x_459); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_463); -x_465 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_465, 0, x_464); -lean::cnstr_set(x_465, 1, x_326); -lean::cnstr_set(x_465, 2, x_327); -lean::cnstr_set(x_465, 3, x_328); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_445); -return x_465; -} -else -{ -uint8 x_466; -x_466 = lean::cnstr_get_scalar(x_459, sizeof(void*)*4); -if (x_466 == 0) -{ -obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; obj* x_475; obj* x_476; obj* x_477; obj* x_478; -x_467 = lean::cnstr_get(x_416, 1); -lean::inc(x_467); -x_468 = lean::cnstr_get(x_416, 2); -lean::inc(x_468); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_469 = x_416; -} else { - lean::dec_ref(x_416); - x_469 = lean::box(0); -} -x_470 = lean::cnstr_get(x_459, 0); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_459, 1); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_459, 2); -lean::inc(x_472); -x_473 = lean::cnstr_get(x_459, 3); -lean::inc(x_473); -if (lean::is_exclusive(x_459)) { - lean::cnstr_release(x_459, 0); - lean::cnstr_release(x_459, 1); - lean::cnstr_release(x_459, 2); - lean::cnstr_release(x_459, 3); - x_474 = x_459; -} else { - lean::dec_ref(x_459); - x_474 = lean::box(0); -} -lean::inc(x_417); -if (lean::is_scalar(x_474)) { - x_475 = lean::alloc_cnstr(1, 4, 1); -} else { - x_475 = x_474; -} -lean::cnstr_set(x_475, 0, x_417); -lean::cnstr_set(x_475, 1, x_467); -lean::cnstr_set(x_475, 2, x_468); -lean::cnstr_set(x_475, 3, x_470); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_476 = x_417; -} else { - lean::dec_ref(x_417); - x_476 = lean::box(0); -} -lean::cnstr_set_scalar(x_475, sizeof(void*)*4, x_445); -if (lean::is_scalar(x_476)) { - x_477 = lean::alloc_cnstr(1, 4, 1); -} else { - x_477 = x_476; -} -lean::cnstr_set(x_477, 0, x_473); -lean::cnstr_set(x_477, 1, x_326); -lean::cnstr_set(x_477, 2, x_327); -lean::cnstr_set(x_477, 3, x_328); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_445); -if (lean::is_scalar(x_469)) { - x_478 = lean::alloc_cnstr(1, 4, 1); -} else { - x_478 = x_469; -} -lean::cnstr_set(x_478, 0, x_475); -lean::cnstr_set(x_478, 1, x_471); -lean::cnstr_set(x_478, 2, x_472); -lean::cnstr_set(x_478, 3, x_477); -lean::cnstr_set_scalar(x_478, sizeof(void*)*4, x_466); -return x_478; -} -else -{ -obj* x_479; obj* x_480; obj* x_481; obj* x_482; obj* x_483; obj* x_484; obj* x_485; obj* x_486; obj* x_487; uint8 x_488; obj* x_489; obj* x_490; -x_479 = lean::cnstr_get(x_416, 1); -lean::inc(x_479); -x_480 = lean::cnstr_get(x_416, 2); -lean::inc(x_480); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_481 = x_416; -} else { - lean::dec_ref(x_416); - x_481 = lean::box(0); -} -x_482 = lean::cnstr_get(x_417, 0); -lean::inc(x_482); -x_483 = lean::cnstr_get(x_417, 1); -lean::inc(x_483); -x_484 = lean::cnstr_get(x_417, 2); -lean::inc(x_484); -x_485 = lean::cnstr_get(x_417, 3); -lean::inc(x_485); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_486 = x_417; -} else { - lean::dec_ref(x_417); - x_486 = lean::box(0); -} -if (lean::is_scalar(x_486)) { - x_487 = lean::alloc_cnstr(1, 4, 1); -} else { - x_487 = x_486; -} -lean::cnstr_set(x_487, 0, x_482); -lean::cnstr_set(x_487, 1, x_483); -lean::cnstr_set(x_487, 2, x_484); -lean::cnstr_set(x_487, 3, x_485); -lean::cnstr_set_scalar(x_487, sizeof(void*)*4, x_466); -x_488 = 0; -if (lean::is_scalar(x_481)) { - x_489 = lean::alloc_cnstr(1, 4, 1); -} else { - x_489 = x_481; -} -lean::cnstr_set(x_489, 0, x_487); -lean::cnstr_set(x_489, 1, x_479); -lean::cnstr_set(x_489, 2, x_480); -lean::cnstr_set(x_489, 3, x_459); -lean::cnstr_set_scalar(x_489, sizeof(void*)*4, x_488); -x_490 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_490, 0, x_489); -lean::cnstr_set(x_490, 1, x_326); -lean::cnstr_set(x_490, 2, x_327); -lean::cnstr_set(x_490, 3, x_328); -lean::cnstr_set_scalar(x_490, sizeof(void*)*4, x_466); -return x_490; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2___rarg(obj* x_1, uint32 x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_RBNode_isRed___main___rarg(x_1); -if (x_4 == 0) -{ -obj* x_5; -x_5 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_1, x_2, x_3); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_1, x_2, x_3); -x_7 = l_RBNode_setBlack___main___rarg(x_6); -return x_7; -} -} -} -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(obj* x_1, uint32 x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; obj* x_6; -x_4 = 0; -x_5 = lean::box_uint32(x_2); -x_6 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_3); -lean::cnstr_set(x_6, 3, x_1); -lean::cnstr_set_scalar(x_6, sizeof(void*)*4, x_4); -return x_6; -} -else -{ -uint8 x_7; -x_7 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_7 == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint32 x_13; uint8 x_14; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_1, 2); -x_12 = lean::cnstr_get(x_1, 3); -x_13 = lean::unbox_uint32(x_10); -x_14 = x_2 < x_13; -if (x_14 == 0) -{ -uint32 x_15; uint8 x_16; -x_15 = lean::unbox_uint32(x_10); -x_16 = x_15 < x_2; -if (x_16 == 0) -{ -obj* x_17; -lean::dec(x_11); -lean::dec(x_10); -x_17 = lean::box_uint32(x_2); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_17); -return x_1; -} -else -{ -obj* x_18; -x_18 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_12, x_2, x_3); -lean::cnstr_set(x_1, 3, x_18); -return x_1; -} -} -else -{ -obj* x_19; -x_19 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_9, x_2, x_3); -lean::cnstr_set(x_1, 0, x_19); -return x_1; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint32 x_24; uint8 x_25; -x_20 = lean::cnstr_get(x_1, 0); -x_21 = lean::cnstr_get(x_1, 1); -x_22 = lean::cnstr_get(x_1, 2); -x_23 = lean::cnstr_get(x_1, 3); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_1); -x_24 = lean::unbox_uint32(x_21); -x_25 = x_2 < x_24; -if (x_25 == 0) -{ -uint32 x_26; uint8 x_27; -x_26 = lean::unbox_uint32(x_21); -x_27 = x_26 < x_2; -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -lean::dec(x_22); -lean::dec(x_21); -x_28 = lean::box_uint32(x_2); -x_29 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_29, 0, x_20); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_29, 2, x_3); -lean::cnstr_set(x_29, 3, x_23); -lean::cnstr_set_scalar(x_29, sizeof(void*)*4, x_7); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_23, x_2, x_3); -x_31 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_31, 0, x_20); -lean::cnstr_set(x_31, 1, x_21); -lean::cnstr_set(x_31, 2, x_22); -lean::cnstr_set(x_31, 3, x_30); -lean::cnstr_set_scalar(x_31, sizeof(void*)*4, x_7); -return x_31; -} -} -else -{ -obj* x_32; obj* x_33; -x_32 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_20, x_2, x_3); -x_33 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_21); -lean::cnstr_set(x_33, 2, x_22); -lean::cnstr_set(x_33, 3, x_23); -lean::cnstr_set_scalar(x_33, sizeof(void*)*4, x_7); -return x_33; -} -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_1); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; uint32 x_39; uint8 x_40; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -x_37 = lean::cnstr_get(x_1, 2); -x_38 = lean::cnstr_get(x_1, 3); -x_39 = lean::unbox_uint32(x_36); -x_40 = x_2 < x_39; -if (x_40 == 0) -{ -uint32 x_41; uint8 x_42; -x_41 = lean::unbox_uint32(x_36); -x_42 = x_41 < x_2; -if (x_42 == 0) -{ -obj* x_43; -lean::dec(x_37); -lean::dec(x_36); -x_43 = lean::box_uint32(x_2); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_43); -return x_1; -} -else -{ -uint8 x_44; -x_44 = l_RBNode_isRed___main___rarg(x_38); -if (x_44 == 0) -{ -obj* x_45; -x_45 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_38, x_2, x_3); -lean::cnstr_set(x_1, 3, x_45); -return x_1; -} -else -{ -obj* x_46; -x_46 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_38, x_2, x_3); -if (lean::obj_tag(x_46) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_37); -lean::dec(x_36); -lean::dec(x_35); -return x_46; -} -else -{ -obj* x_47; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -x_48 = lean::cnstr_get(x_46, 3); -lean::inc(x_48); -if (lean::obj_tag(x_48) == 0) -{ -uint8 x_49; -x_49 = !lean::is_exclusive(x_46); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; uint8 x_53; -x_50 = lean::cnstr_get(x_46, 3); -lean::dec(x_50); -x_51 = lean::cnstr_get(x_46, 0); -lean::dec(x_51); -x_52 = 0; -lean::cnstr_set(x_46, 0, x_48); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_52); -x_53 = 1; -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_53); -return x_1; -} -else -{ -obj* x_54; obj* x_55; uint8 x_56; obj* x_57; uint8 x_58; -x_54 = lean::cnstr_get(x_46, 1); -x_55 = lean::cnstr_get(x_46, 2); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_46); -x_56 = 0; -x_57 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_57, 0, x_48); -lean::cnstr_set(x_57, 1, x_54); -lean::cnstr_set(x_57, 2, x_55); -lean::cnstr_set(x_57, 3, x_48); -lean::cnstr_set_scalar(x_57, sizeof(void*)*4, x_56); -x_58 = 1; -lean::cnstr_set(x_1, 3, x_57); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_58); -return x_1; -} -} -else -{ -uint8 x_59; -x_59 = lean::cnstr_get_scalar(x_48, sizeof(void*)*4); -if (x_59 == 0) -{ -uint8 x_60; -x_60 = !lean::is_exclusive(x_46); -if (x_60 == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; -x_61 = lean::cnstr_get(x_46, 1); -x_62 = lean::cnstr_get(x_46, 2); -x_63 = lean::cnstr_get(x_46, 3); -lean::dec(x_63); -x_64 = lean::cnstr_get(x_46, 0); -lean::dec(x_64); -x_65 = !lean::is_exclusive(x_48); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; uint8 x_70; -x_66 = lean::cnstr_get(x_48, 0); -x_67 = lean::cnstr_get(x_48, 1); -x_68 = lean::cnstr_get(x_48, 2); -x_69 = lean::cnstr_get(x_48, 3); -x_70 = 1; -lean::cnstr_set(x_48, 3, x_47); -lean::cnstr_set(x_48, 2, x_37); -lean::cnstr_set(x_48, 1, x_36); -lean::cnstr_set(x_48, 0, x_35); -lean::cnstr_set_scalar(x_48, sizeof(void*)*4, x_70); -lean::cnstr_set(x_46, 3, x_69); -lean::cnstr_set(x_46, 2, x_68); -lean::cnstr_set(x_46, 1, x_67); -lean::cnstr_set(x_46, 0, x_66); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_70); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_62); -lean::cnstr_set(x_1, 1, x_61); -lean::cnstr_set(x_1, 0, x_48); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; uint8 x_75; obj* x_76; -x_71 = lean::cnstr_get(x_48, 0); -x_72 = lean::cnstr_get(x_48, 1); -x_73 = lean::cnstr_get(x_48, 2); -x_74 = lean::cnstr_get(x_48, 3); -lean::inc(x_74); -lean::inc(x_73); -lean::inc(x_72); -lean::inc(x_71); -lean::dec(x_48); -x_75 = 1; -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_35); -lean::cnstr_set(x_76, 1, x_36); -lean::cnstr_set(x_76, 2, x_37); -lean::cnstr_set(x_76, 3, x_47); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_75); -lean::cnstr_set(x_46, 3, x_74); -lean::cnstr_set(x_46, 2, x_73); -lean::cnstr_set(x_46, 1, x_72); -lean::cnstr_set(x_46, 0, x_71); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_75); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_62); -lean::cnstr_set(x_1, 1, x_61); -lean::cnstr_set(x_1, 0, x_76); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; uint8 x_84; obj* x_85; obj* x_86; -x_77 = lean::cnstr_get(x_46, 1); -x_78 = lean::cnstr_get(x_46, 2); -lean::inc(x_78); -lean::inc(x_77); -lean::dec(x_46); -x_79 = lean::cnstr_get(x_48, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_48, 1); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_48, 2); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_48, 3); -lean::inc(x_82); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - lean::cnstr_release(x_48, 2); - lean::cnstr_release(x_48, 3); - x_83 = x_48; -} else { - lean::dec_ref(x_48); - x_83 = lean::box(0); -} -x_84 = 1; -if (lean::is_scalar(x_83)) { - x_85 = lean::alloc_cnstr(1, 4, 1); -} else { - x_85 = x_83; -} -lean::cnstr_set(x_85, 0, x_35); -lean::cnstr_set(x_85, 1, x_36); -lean::cnstr_set(x_85, 2, x_37); -lean::cnstr_set(x_85, 3, x_47); -lean::cnstr_set_scalar(x_85, sizeof(void*)*4, x_84); -x_86 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_86, 0, x_79); -lean::cnstr_set(x_86, 1, x_80); -lean::cnstr_set(x_86, 2, x_81); -lean::cnstr_set(x_86, 3, x_82); -lean::cnstr_set_scalar(x_86, sizeof(void*)*4, x_84); -lean::cnstr_set(x_1, 3, x_86); -lean::cnstr_set(x_1, 2, x_78); -lean::cnstr_set(x_1, 1, x_77); -lean::cnstr_set(x_1, 0, x_85); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -else -{ -uint8 x_87; -x_87 = !lean::is_exclusive(x_46); -if (x_87 == 0) -{ -obj* x_88; obj* x_89; uint8 x_90; -x_88 = lean::cnstr_get(x_46, 3); -lean::dec(x_88); -x_89 = lean::cnstr_get(x_46, 0); -lean::dec(x_89); -x_90 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_90); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -else -{ -obj* x_91; obj* x_92; uint8 x_93; obj* x_94; -x_91 = lean::cnstr_get(x_46, 1); -x_92 = lean::cnstr_get(x_46, 2); -lean::inc(x_92); -lean::inc(x_91); -lean::dec(x_46); -x_93 = 0; -x_94 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_94, 0, x_47); -lean::cnstr_set(x_94, 1, x_91); -lean::cnstr_set(x_94, 2, x_92); -lean::cnstr_set(x_94, 3, x_48); -lean::cnstr_set_scalar(x_94, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_94); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -} -} -else -{ -uint8 x_95; -x_95 = lean::cnstr_get_scalar(x_47, sizeof(void*)*4); -if (x_95 == 0) -{ -uint8 x_96; -x_96 = !lean::is_exclusive(x_46); -if (x_96 == 0) -{ -obj* x_97; uint8 x_98; -x_97 = lean::cnstr_get(x_46, 0); -lean::dec(x_97); -x_98 = !lean::is_exclusive(x_47); -if (x_98 == 0) -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; uint8 x_103; -x_99 = lean::cnstr_get(x_47, 0); -x_100 = lean::cnstr_get(x_47, 1); -x_101 = lean::cnstr_get(x_47, 2); -x_102 = lean::cnstr_get(x_47, 3); -x_103 = 1; -lean::cnstr_set(x_47, 3, x_99); -lean::cnstr_set(x_47, 2, x_37); -lean::cnstr_set(x_47, 1, x_36); -lean::cnstr_set(x_47, 0, x_35); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_103); -lean::cnstr_set(x_46, 0, x_102); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_103); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_101); -lean::cnstr_set(x_1, 1, x_100); -lean::cnstr_set(x_1, 0, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -else -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; -x_104 = lean::cnstr_get(x_47, 0); -x_105 = lean::cnstr_get(x_47, 1); -x_106 = lean::cnstr_get(x_47, 2); -x_107 = lean::cnstr_get(x_47, 3); -lean::inc(x_107); -lean::inc(x_106); -lean::inc(x_105); -lean::inc(x_104); -lean::dec(x_47); -x_108 = 1; -x_109 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_109, 0, x_35); -lean::cnstr_set(x_109, 1, x_36); -lean::cnstr_set(x_109, 2, x_37); -lean::cnstr_set(x_109, 3, x_104); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -lean::cnstr_set(x_46, 0, x_107); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_106); -lean::cnstr_set(x_1, 1, x_105); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; uint8 x_118; obj* x_119; obj* x_120; -x_110 = lean::cnstr_get(x_46, 1); -x_111 = lean::cnstr_get(x_46, 2); -x_112 = lean::cnstr_get(x_46, 3); -lean::inc(x_112); -lean::inc(x_111); -lean::inc(x_110); -lean::dec(x_46); -x_113 = lean::cnstr_get(x_47, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get(x_47, 1); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_47, 2); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_47, 3); -lean::inc(x_116); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_117 = x_47; -} else { - lean::dec_ref(x_47); - x_117 = lean::box(0); -} -x_118 = 1; -if (lean::is_scalar(x_117)) { - x_119 = lean::alloc_cnstr(1, 4, 1); -} else { - x_119 = x_117; -} -lean::cnstr_set(x_119, 0, x_35); -lean::cnstr_set(x_119, 1, x_36); -lean::cnstr_set(x_119, 2, x_37); -lean::cnstr_set(x_119, 3, x_113); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -x_120 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_120, 0, x_116); -lean::cnstr_set(x_120, 1, x_110); -lean::cnstr_set(x_120, 2, x_111); -lean::cnstr_set(x_120, 3, x_112); -lean::cnstr_set_scalar(x_120, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_120); -lean::cnstr_set(x_1, 2, x_115); -lean::cnstr_set(x_1, 1, x_114); -lean::cnstr_set(x_1, 0, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -obj* x_121; -x_121 = lean::cnstr_get(x_46, 3); -lean::inc(x_121); -if (lean::obj_tag(x_121) == 0) -{ -uint8 x_122; -x_122 = !lean::is_exclusive(x_46); -if (x_122 == 0) -{ -obj* x_123; obj* x_124; uint8 x_125; -x_123 = lean::cnstr_get(x_46, 3); -lean::dec(x_123); -x_124 = lean::cnstr_get(x_46, 0); -lean::dec(x_124); -x_125 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_125); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -else -{ -obj* x_126; obj* x_127; uint8 x_128; obj* x_129; -x_126 = lean::cnstr_get(x_46, 1); -x_127 = lean::cnstr_get(x_46, 2); -lean::inc(x_127); -lean::inc(x_126); -lean::dec(x_46); -x_128 = 0; -x_129 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_129, 0, x_47); -lean::cnstr_set(x_129, 1, x_126); -lean::cnstr_set(x_129, 2, x_127); -lean::cnstr_set(x_129, 3, x_121); -lean::cnstr_set_scalar(x_129, sizeof(void*)*4, x_128); -lean::cnstr_set(x_1, 3, x_129); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -uint8 x_130; -x_130 = lean::cnstr_get_scalar(x_121, sizeof(void*)*4); -if (x_130 == 0) -{ -uint8 x_131; -lean::free_heap_obj(x_1); -x_131 = !lean::is_exclusive(x_46); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; uint8 x_134; -x_132 = lean::cnstr_get(x_46, 3); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_46, 0); -lean::dec(x_133); -x_134 = !lean::is_exclusive(x_121); -if (x_134 == 0) -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; uint8 x_139; -x_135 = lean::cnstr_get(x_121, 0); -x_136 = lean::cnstr_get(x_121, 1); -x_137 = lean::cnstr_get(x_121, 2); -x_138 = lean::cnstr_get(x_121, 3); -lean::inc(x_47); -lean::cnstr_set(x_121, 3, x_47); -lean::cnstr_set(x_121, 2, x_37); -lean::cnstr_set(x_121, 1, x_36); -lean::cnstr_set(x_121, 0, x_35); -x_139 = !lean::is_exclusive(x_47); -if (x_139 == 0) -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; -x_140 = lean::cnstr_get(x_47, 3); -lean::dec(x_140); -x_141 = lean::cnstr_get(x_47, 2); -lean::dec(x_141); -x_142 = lean::cnstr_get(x_47, 1); -lean::dec(x_142); -x_143 = lean::cnstr_get(x_47, 0); -lean::dec(x_143); -lean::cnstr_set_scalar(x_121, sizeof(void*)*4, x_95); -lean::cnstr_set(x_47, 3, x_138); -lean::cnstr_set(x_47, 2, x_137); -lean::cnstr_set(x_47, 1, x_136); -lean::cnstr_set(x_47, 0, x_135); -lean::cnstr_set(x_46, 3, x_47); -lean::cnstr_set(x_46, 0, x_121); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -else -{ -obj* x_144; -lean::dec(x_47); -lean::cnstr_set_scalar(x_121, sizeof(void*)*4, x_95); -x_144 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_144, 0, x_135); -lean::cnstr_set(x_144, 1, x_136); -lean::cnstr_set(x_144, 2, x_137); -lean::cnstr_set(x_144, 3, x_138); -lean::cnstr_set_scalar(x_144, sizeof(void*)*4, x_95); -lean::cnstr_set(x_46, 3, x_144); -lean::cnstr_set(x_46, 0, x_121); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -} -else -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_145 = lean::cnstr_get(x_121, 0); -x_146 = lean::cnstr_get(x_121, 1); -x_147 = lean::cnstr_get(x_121, 2); -x_148 = lean::cnstr_get(x_121, 3); -lean::inc(x_148); -lean::inc(x_147); -lean::inc(x_146); -lean::inc(x_145); -lean::dec(x_121); -lean::inc(x_47); -x_149 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_149, 0, x_35); -lean::cnstr_set(x_149, 1, x_36); -lean::cnstr_set(x_149, 2, x_37); -lean::cnstr_set(x_149, 3, x_47); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_150 = x_47; -} else { - lean::dec_ref(x_47); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_95); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_145); -lean::cnstr_set(x_151, 1, x_146); -lean::cnstr_set(x_151, 2, x_147); -lean::cnstr_set(x_151, 3, x_148); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_95); -lean::cnstr_set(x_46, 3, x_151); -lean::cnstr_set(x_46, 0, x_149); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -} -else -{ -obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -x_152 = lean::cnstr_get(x_46, 1); -x_153 = lean::cnstr_get(x_46, 2); -lean::inc(x_153); -lean::inc(x_152); -lean::dec(x_46); -x_154 = lean::cnstr_get(x_121, 0); -lean::inc(x_154); -x_155 = lean::cnstr_get(x_121, 1); -lean::inc(x_155); -x_156 = lean::cnstr_get(x_121, 2); -lean::inc(x_156); -x_157 = lean::cnstr_get(x_121, 3); -lean::inc(x_157); -if (lean::is_exclusive(x_121)) { - lean::cnstr_release(x_121, 0); - lean::cnstr_release(x_121, 1); - lean::cnstr_release(x_121, 2); - lean::cnstr_release(x_121, 3); - x_158 = x_121; -} else { - lean::dec_ref(x_121); - x_158 = lean::box(0); -} -lean::inc(x_47); -if (lean::is_scalar(x_158)) { - x_159 = lean::alloc_cnstr(1, 4, 1); -} else { - x_159 = x_158; -} -lean::cnstr_set(x_159, 0, x_35); -lean::cnstr_set(x_159, 1, x_36); -lean::cnstr_set(x_159, 2, x_37); -lean::cnstr_set(x_159, 3, x_47); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_160 = x_47; -} else { - lean::dec_ref(x_47); - x_160 = lean::box(0); -} -lean::cnstr_set_scalar(x_159, sizeof(void*)*4, x_95); -if (lean::is_scalar(x_160)) { - x_161 = lean::alloc_cnstr(1, 4, 1); -} else { - x_161 = x_160; -} -lean::cnstr_set(x_161, 0, x_154); -lean::cnstr_set(x_161, 1, x_155); -lean::cnstr_set(x_161, 2, x_156); -lean::cnstr_set(x_161, 3, x_157); -lean::cnstr_set_scalar(x_161, sizeof(void*)*4, x_95); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_159); -lean::cnstr_set(x_162, 1, x_152); -lean::cnstr_set(x_162, 2, x_153); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_130); -return x_162; -} -} -else -{ -uint8 x_163; -x_163 = !lean::is_exclusive(x_46); -if (x_163 == 0) -{ -obj* x_164; obj* x_165; uint8 x_166; -x_164 = lean::cnstr_get(x_46, 3); -lean::dec(x_164); -x_165 = lean::cnstr_get(x_46, 0); -lean::dec(x_165); -x_166 = !lean::is_exclusive(x_47); -if (x_166 == 0) -{ -uint8 x_167; -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_130); -x_167 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_167); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -else -{ -obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; uint8 x_173; -x_168 = lean::cnstr_get(x_47, 0); -x_169 = lean::cnstr_get(x_47, 1); -x_170 = lean::cnstr_get(x_47, 2); -x_171 = lean::cnstr_get(x_47, 3); -lean::inc(x_171); -lean::inc(x_170); -lean::inc(x_169); -lean::inc(x_168); -lean::dec(x_47); -x_172 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_172, 0, x_168); -lean::cnstr_set(x_172, 1, x_169); -lean::cnstr_set(x_172, 2, x_170); -lean::cnstr_set(x_172, 3, x_171); -lean::cnstr_set_scalar(x_172, sizeof(void*)*4, x_130); -x_173 = 0; -lean::cnstr_set(x_46, 0, x_172); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_173); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -} -else -{ -obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; uint8 x_182; obj* x_183; -x_174 = lean::cnstr_get(x_46, 1); -x_175 = lean::cnstr_get(x_46, 2); -lean::inc(x_175); -lean::inc(x_174); -lean::dec(x_46); -x_176 = lean::cnstr_get(x_47, 0); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_47, 1); -lean::inc(x_177); -x_178 = lean::cnstr_get(x_47, 2); -lean::inc(x_178); -x_179 = lean::cnstr_get(x_47, 3); -lean::inc(x_179); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_180 = x_47; -} else { - lean::dec_ref(x_47); - x_180 = lean::box(0); -} -if (lean::is_scalar(x_180)) { - x_181 = lean::alloc_cnstr(1, 4, 1); -} else { - x_181 = x_180; -} -lean::cnstr_set(x_181, 0, x_176); -lean::cnstr_set(x_181, 1, x_177); -lean::cnstr_set(x_181, 2, x_178); -lean::cnstr_set(x_181, 3, x_179); -lean::cnstr_set_scalar(x_181, sizeof(void*)*4, x_130); -x_182 = 0; -x_183 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_183, 0, x_181); -lean::cnstr_set(x_183, 1, x_174); -lean::cnstr_set(x_183, 2, x_175); -lean::cnstr_set(x_183, 3, x_121); -lean::cnstr_set_scalar(x_183, sizeof(void*)*4, x_182); -lean::cnstr_set(x_1, 3, x_183); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_184; -x_184 = l_RBNode_isRed___main___rarg(x_35); -if (x_184 == 0) -{ -obj* x_185; -x_185 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_35, x_2, x_3); -lean::cnstr_set(x_1, 0, x_185); -return x_1; -} -else -{ -obj* x_186; -x_186 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_35, x_2, x_3); -if (lean::obj_tag(x_186) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_38); -lean::dec(x_37); -lean::dec(x_36); -return x_186; -} -else -{ -obj* x_187; -x_187 = lean::cnstr_get(x_186, 0); -lean::inc(x_187); -if (lean::obj_tag(x_187) == 0) -{ -obj* x_188; -x_188 = lean::cnstr_get(x_186, 3); -lean::inc(x_188); -if (lean::obj_tag(x_188) == 0) -{ -uint8 x_189; -x_189 = !lean::is_exclusive(x_186); -if (x_189 == 0) -{ -obj* x_190; obj* x_191; uint8 x_192; uint8 x_193; -x_190 = lean::cnstr_get(x_186, 3); -lean::dec(x_190); -x_191 = lean::cnstr_get(x_186, 0); -lean::dec(x_191); -x_192 = 0; -lean::cnstr_set(x_186, 0, x_188); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_192); -x_193 = 1; -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_193); -return x_1; -} -else -{ -obj* x_194; obj* x_195; uint8 x_196; obj* x_197; uint8 x_198; -x_194 = lean::cnstr_get(x_186, 1); -x_195 = lean::cnstr_get(x_186, 2); -lean::inc(x_195); -lean::inc(x_194); -lean::dec(x_186); -x_196 = 0; -x_197 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_197, 0, x_188); -lean::cnstr_set(x_197, 1, x_194); -lean::cnstr_set(x_197, 2, x_195); -lean::cnstr_set(x_197, 3, x_188); -lean::cnstr_set_scalar(x_197, sizeof(void*)*4, x_196); -x_198 = 1; -lean::cnstr_set(x_1, 0, x_197); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_198); -return x_1; -} -} -else -{ -uint8 x_199; -x_199 = lean::cnstr_get_scalar(x_188, sizeof(void*)*4); -if (x_199 == 0) -{ -uint8 x_200; -x_200 = !lean::is_exclusive(x_186); -if (x_200 == 0) -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; -x_201 = lean::cnstr_get(x_186, 1); -x_202 = lean::cnstr_get(x_186, 2); -x_203 = lean::cnstr_get(x_186, 3); -lean::dec(x_203); -x_204 = lean::cnstr_get(x_186, 0); -lean::dec(x_204); -x_205 = !lean::is_exclusive(x_188); -if (x_205 == 0) -{ -obj* x_206; obj* x_207; obj* x_208; obj* x_209; uint8 x_210; -x_206 = lean::cnstr_get(x_188, 0); -x_207 = lean::cnstr_get(x_188, 1); -x_208 = lean::cnstr_get(x_188, 2); -x_209 = lean::cnstr_get(x_188, 3); -x_210 = 1; -lean::cnstr_set(x_188, 3, x_206); -lean::cnstr_set(x_188, 2, x_202); -lean::cnstr_set(x_188, 1, x_201); -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set_scalar(x_188, sizeof(void*)*4, x_210); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_209); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_210); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_208); -lean::cnstr_set(x_1, 1, x_207); -lean::cnstr_set(x_1, 0, x_188); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; obj* x_214; uint8 x_215; obj* x_216; -x_211 = lean::cnstr_get(x_188, 0); -x_212 = lean::cnstr_get(x_188, 1); -x_213 = lean::cnstr_get(x_188, 2); -x_214 = lean::cnstr_get(x_188, 3); -lean::inc(x_214); -lean::inc(x_213); -lean::inc(x_212); -lean::inc(x_211); -lean::dec(x_188); -x_215 = 1; -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_187); -lean::cnstr_set(x_216, 1, x_201); -lean::cnstr_set(x_216, 2, x_202); -lean::cnstr_set(x_216, 3, x_211); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_215); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_214); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_215); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_213); -lean::cnstr_set(x_1, 1, x_212); -lean::cnstr_set(x_1, 0, x_216); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -else -{ -obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; uint8 x_224; obj* x_225; obj* x_226; -x_217 = lean::cnstr_get(x_186, 1); -x_218 = lean::cnstr_get(x_186, 2); -lean::inc(x_218); -lean::inc(x_217); -lean::dec(x_186); -x_219 = lean::cnstr_get(x_188, 0); -lean::inc(x_219); -x_220 = lean::cnstr_get(x_188, 1); -lean::inc(x_220); -x_221 = lean::cnstr_get(x_188, 2); -lean::inc(x_221); -x_222 = lean::cnstr_get(x_188, 3); -lean::inc(x_222); -if (lean::is_exclusive(x_188)) { - lean::cnstr_release(x_188, 0); - lean::cnstr_release(x_188, 1); - lean::cnstr_release(x_188, 2); - lean::cnstr_release(x_188, 3); - x_223 = x_188; -} else { - lean::dec_ref(x_188); - x_223 = lean::box(0); -} -x_224 = 1; -if (lean::is_scalar(x_223)) { - x_225 = lean::alloc_cnstr(1, 4, 1); -} else { - x_225 = x_223; -} -lean::cnstr_set(x_225, 0, x_187); -lean::cnstr_set(x_225, 1, x_217); -lean::cnstr_set(x_225, 2, x_218); -lean::cnstr_set(x_225, 3, x_219); -lean::cnstr_set_scalar(x_225, sizeof(void*)*4, x_224); -x_226 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_226, 0, x_222); -lean::cnstr_set(x_226, 1, x_36); -lean::cnstr_set(x_226, 2, x_37); -lean::cnstr_set(x_226, 3, x_38); -lean::cnstr_set_scalar(x_226, sizeof(void*)*4, x_224); -lean::cnstr_set(x_1, 3, x_226); -lean::cnstr_set(x_1, 2, x_221); -lean::cnstr_set(x_1, 1, x_220); -lean::cnstr_set(x_1, 0, x_225); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -else -{ -uint8 x_227; -x_227 = !lean::is_exclusive(x_186); -if (x_227 == 0) -{ -obj* x_228; obj* x_229; uint8 x_230; -x_228 = lean::cnstr_get(x_186, 3); -lean::dec(x_228); -x_229 = lean::cnstr_get(x_186, 0); -lean::dec(x_229); -x_230 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_230); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -else -{ -obj* x_231; obj* x_232; uint8 x_233; obj* x_234; -x_231 = lean::cnstr_get(x_186, 1); -x_232 = lean::cnstr_get(x_186, 2); -lean::inc(x_232); -lean::inc(x_231); -lean::dec(x_186); -x_233 = 0; -x_234 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_234, 0, x_187); -lean::cnstr_set(x_234, 1, x_231); -lean::cnstr_set(x_234, 2, x_232); -lean::cnstr_set(x_234, 3, x_188); -lean::cnstr_set_scalar(x_234, sizeof(void*)*4, x_233); -lean::cnstr_set(x_1, 0, x_234); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -} -} -else -{ -uint8 x_235; -x_235 = lean::cnstr_get_scalar(x_187, sizeof(void*)*4); -if (x_235 == 0) -{ -uint8 x_236; -x_236 = !lean::is_exclusive(x_186); -if (x_236 == 0) -{ -obj* x_237; obj* x_238; obj* x_239; obj* x_240; uint8 x_241; -x_237 = lean::cnstr_get(x_186, 1); -x_238 = lean::cnstr_get(x_186, 2); -x_239 = lean::cnstr_get(x_186, 3); -x_240 = lean::cnstr_get(x_186, 0); -lean::dec(x_240); -x_241 = !lean::is_exclusive(x_187); -if (x_241 == 0) -{ -uint8 x_242; -x_242 = 1; -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_242); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_239); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_242); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_238); -lean::cnstr_set(x_1, 1, x_237); -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -else -{ -obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; -x_243 = lean::cnstr_get(x_187, 0); -x_244 = lean::cnstr_get(x_187, 1); -x_245 = lean::cnstr_get(x_187, 2); -x_246 = lean::cnstr_get(x_187, 3); -lean::inc(x_246); -lean::inc(x_245); -lean::inc(x_244); -lean::inc(x_243); -lean::dec(x_187); -x_247 = 1; -x_248 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_248, 0, x_243); -lean::cnstr_set(x_248, 1, x_244); -lean::cnstr_set(x_248, 2, x_245); -lean::cnstr_set(x_248, 3, x_246); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_239); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_238); -lean::cnstr_set(x_1, 1, x_237); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; obj* x_256; uint8 x_257; obj* x_258; obj* x_259; -x_249 = lean::cnstr_get(x_186, 1); -x_250 = lean::cnstr_get(x_186, 2); -x_251 = lean::cnstr_get(x_186, 3); -lean::inc(x_251); -lean::inc(x_250); -lean::inc(x_249); -lean::dec(x_186); -x_252 = lean::cnstr_get(x_187, 0); -lean::inc(x_252); -x_253 = lean::cnstr_get(x_187, 1); -lean::inc(x_253); -x_254 = lean::cnstr_get(x_187, 2); -lean::inc(x_254); -x_255 = lean::cnstr_get(x_187, 3); -lean::inc(x_255); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_256 = x_187; -} else { - lean::dec_ref(x_187); - x_256 = lean::box(0); -} -x_257 = 1; -if (lean::is_scalar(x_256)) { - x_258 = lean::alloc_cnstr(1, 4, 1); -} else { - x_258 = x_256; -} -lean::cnstr_set(x_258, 0, x_252); -lean::cnstr_set(x_258, 1, x_253); -lean::cnstr_set(x_258, 2, x_254); -lean::cnstr_set(x_258, 3, x_255); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -x_259 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_259, 0, x_251); -lean::cnstr_set(x_259, 1, x_36); -lean::cnstr_set(x_259, 2, x_37); -lean::cnstr_set(x_259, 3, x_38); -lean::cnstr_set_scalar(x_259, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 3, x_259); -lean::cnstr_set(x_1, 2, x_250); -lean::cnstr_set(x_1, 1, x_249); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -obj* x_260; -x_260 = lean::cnstr_get(x_186, 3); -lean::inc(x_260); -if (lean::obj_tag(x_260) == 0) -{ -uint8 x_261; -x_261 = !lean::is_exclusive(x_186); -if (x_261 == 0) -{ -obj* x_262; obj* x_263; uint8 x_264; -x_262 = lean::cnstr_get(x_186, 3); -lean::dec(x_262); -x_263 = lean::cnstr_get(x_186, 0); -lean::dec(x_263); -x_264 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_264); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -else -{ -obj* x_265; obj* x_266; uint8 x_267; obj* x_268; -x_265 = lean::cnstr_get(x_186, 1); -x_266 = lean::cnstr_get(x_186, 2); -lean::inc(x_266); -lean::inc(x_265); -lean::dec(x_186); -x_267 = 0; -x_268 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_268, 0, x_187); -lean::cnstr_set(x_268, 1, x_265); -lean::cnstr_set(x_268, 2, x_266); -lean::cnstr_set(x_268, 3, x_260); -lean::cnstr_set_scalar(x_268, sizeof(void*)*4, x_267); -lean::cnstr_set(x_1, 0, x_268); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -uint8 x_269; -x_269 = lean::cnstr_get_scalar(x_260, sizeof(void*)*4); -if (x_269 == 0) -{ -uint8 x_270; -lean::free_heap_obj(x_1); -x_270 = !lean::is_exclusive(x_186); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; uint8 x_275; -x_271 = lean::cnstr_get(x_186, 1); -x_272 = lean::cnstr_get(x_186, 2); -x_273 = lean::cnstr_get(x_186, 3); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_186, 0); -lean::dec(x_274); -x_275 = !lean::is_exclusive(x_260); -if (x_275 == 0) -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; uint8 x_280; -x_276 = lean::cnstr_get(x_260, 0); -x_277 = lean::cnstr_get(x_260, 1); -x_278 = lean::cnstr_get(x_260, 2); -x_279 = lean::cnstr_get(x_260, 3); -lean::inc(x_187); -lean::cnstr_set(x_260, 3, x_276); -lean::cnstr_set(x_260, 2, x_272); -lean::cnstr_set(x_260, 1, x_271); -lean::cnstr_set(x_260, 0, x_187); -x_280 = !lean::is_exclusive(x_187); -if (x_280 == 0) -{ -obj* x_281; obj* x_282; obj* x_283; obj* x_284; -x_281 = lean::cnstr_get(x_187, 3); -lean::dec(x_281); -x_282 = lean::cnstr_get(x_187, 2); -lean::dec(x_282); -x_283 = lean::cnstr_get(x_187, 1); -lean::dec(x_283); -x_284 = lean::cnstr_get(x_187, 0); -lean::dec(x_284); -lean::cnstr_set_scalar(x_260, sizeof(void*)*4, x_235); -lean::cnstr_set(x_187, 3, x_38); -lean::cnstr_set(x_187, 2, x_37); -lean::cnstr_set(x_187, 1, x_36); -lean::cnstr_set(x_187, 0, x_279); -lean::cnstr_set(x_186, 3, x_187); -lean::cnstr_set(x_186, 2, x_278); -lean::cnstr_set(x_186, 1, x_277); -lean::cnstr_set(x_186, 0, x_260); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -else -{ -obj* x_285; -lean::dec(x_187); -lean::cnstr_set_scalar(x_260, sizeof(void*)*4, x_235); -x_285 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_285, 0, x_279); -lean::cnstr_set(x_285, 1, x_36); -lean::cnstr_set(x_285, 2, x_37); -lean::cnstr_set(x_285, 3, x_38); -lean::cnstr_set_scalar(x_285, sizeof(void*)*4, x_235); -lean::cnstr_set(x_186, 3, x_285); -lean::cnstr_set(x_186, 2, x_278); -lean::cnstr_set(x_186, 1, x_277); -lean::cnstr_set(x_186, 0, x_260); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -} -else -{ -obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; -x_286 = lean::cnstr_get(x_260, 0); -x_287 = lean::cnstr_get(x_260, 1); -x_288 = lean::cnstr_get(x_260, 2); -x_289 = lean::cnstr_get(x_260, 3); -lean::inc(x_289); -lean::inc(x_288); -lean::inc(x_287); -lean::inc(x_286); -lean::dec(x_260); -lean::inc(x_187); -x_290 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_290, 0, x_187); -lean::cnstr_set(x_290, 1, x_271); -lean::cnstr_set(x_290, 2, x_272); -lean::cnstr_set(x_290, 3, x_286); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_291 = x_187; -} else { - lean::dec_ref(x_187); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_235); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_289); -lean::cnstr_set(x_292, 1, x_36); -lean::cnstr_set(x_292, 2, x_37); -lean::cnstr_set(x_292, 3, x_38); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_235); -lean::cnstr_set(x_186, 3, x_292); -lean::cnstr_set(x_186, 2, x_288); -lean::cnstr_set(x_186, 1, x_287); -lean::cnstr_set(x_186, 0, x_290); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -} -else -{ -obj* x_293; obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; -x_293 = lean::cnstr_get(x_186, 1); -x_294 = lean::cnstr_get(x_186, 2); -lean::inc(x_294); -lean::inc(x_293); -lean::dec(x_186); -x_295 = lean::cnstr_get(x_260, 0); -lean::inc(x_295); -x_296 = lean::cnstr_get(x_260, 1); -lean::inc(x_296); -x_297 = lean::cnstr_get(x_260, 2); -lean::inc(x_297); -x_298 = lean::cnstr_get(x_260, 3); -lean::inc(x_298); -if (lean::is_exclusive(x_260)) { - lean::cnstr_release(x_260, 0); - lean::cnstr_release(x_260, 1); - lean::cnstr_release(x_260, 2); - lean::cnstr_release(x_260, 3); - x_299 = x_260; -} else { - lean::dec_ref(x_260); - x_299 = lean::box(0); -} -lean::inc(x_187); -if (lean::is_scalar(x_299)) { - x_300 = lean::alloc_cnstr(1, 4, 1); -} else { - x_300 = x_299; -} -lean::cnstr_set(x_300, 0, x_187); -lean::cnstr_set(x_300, 1, x_293); -lean::cnstr_set(x_300, 2, x_294); -lean::cnstr_set(x_300, 3, x_295); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_301 = x_187; -} else { - lean::dec_ref(x_187); - x_301 = lean::box(0); -} -lean::cnstr_set_scalar(x_300, sizeof(void*)*4, x_235); -if (lean::is_scalar(x_301)) { - x_302 = lean::alloc_cnstr(1, 4, 1); -} else { - x_302 = x_301; -} -lean::cnstr_set(x_302, 0, x_298); -lean::cnstr_set(x_302, 1, x_36); -lean::cnstr_set(x_302, 2, x_37); -lean::cnstr_set(x_302, 3, x_38); -lean::cnstr_set_scalar(x_302, sizeof(void*)*4, x_235); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_300); -lean::cnstr_set(x_303, 1, x_296); -lean::cnstr_set(x_303, 2, x_297); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_269); -return x_303; -} -} -else -{ -uint8 x_304; -x_304 = !lean::is_exclusive(x_186); -if (x_304 == 0) -{ -obj* x_305; obj* x_306; uint8 x_307; -x_305 = lean::cnstr_get(x_186, 3); -lean::dec(x_305); -x_306 = lean::cnstr_get(x_186, 0); -lean::dec(x_306); -x_307 = !lean::is_exclusive(x_187); -if (x_307 == 0) -{ -uint8 x_308; -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_269); -x_308 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_308); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -else -{ -obj* x_309; obj* x_310; obj* x_311; obj* x_312; obj* x_313; uint8 x_314; -x_309 = lean::cnstr_get(x_187, 0); -x_310 = lean::cnstr_get(x_187, 1); -x_311 = lean::cnstr_get(x_187, 2); -x_312 = lean::cnstr_get(x_187, 3); -lean::inc(x_312); -lean::inc(x_311); -lean::inc(x_310); -lean::inc(x_309); -lean::dec(x_187); -x_313 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_313, 0, x_309); -lean::cnstr_set(x_313, 1, x_310); -lean::cnstr_set(x_313, 2, x_311); -lean::cnstr_set(x_313, 3, x_312); -lean::cnstr_set_scalar(x_313, sizeof(void*)*4, x_269); -x_314 = 0; -lean::cnstr_set(x_186, 0, x_313); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_314); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; obj* x_319; obj* x_320; obj* x_321; obj* x_322; uint8 x_323; obj* x_324; -x_315 = lean::cnstr_get(x_186, 1); -x_316 = lean::cnstr_get(x_186, 2); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_186); -x_317 = lean::cnstr_get(x_187, 0); -lean::inc(x_317); -x_318 = lean::cnstr_get(x_187, 1); -lean::inc(x_318); -x_319 = lean::cnstr_get(x_187, 2); -lean::inc(x_319); -x_320 = lean::cnstr_get(x_187, 3); -lean::inc(x_320); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_321 = x_187; -} else { - lean::dec_ref(x_187); - x_321 = lean::box(0); -} -if (lean::is_scalar(x_321)) { - x_322 = lean::alloc_cnstr(1, 4, 1); -} else { - x_322 = x_321; -} -lean::cnstr_set(x_322, 0, x_317); -lean::cnstr_set(x_322, 1, x_318); -lean::cnstr_set(x_322, 2, x_319); -lean::cnstr_set(x_322, 3, x_320); -lean::cnstr_set_scalar(x_322, sizeof(void*)*4, x_269); -x_323 = 0; -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_322); -lean::cnstr_set(x_324, 1, x_315); -lean::cnstr_set(x_324, 2, x_316); -lean::cnstr_set(x_324, 3, x_260); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_323); -lean::cnstr_set(x_1, 0, x_324); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_325; obj* x_326; obj* x_327; obj* x_328; uint32 x_329; uint8 x_330; -x_325 = lean::cnstr_get(x_1, 0); -x_326 = lean::cnstr_get(x_1, 1); -x_327 = lean::cnstr_get(x_1, 2); -x_328 = lean::cnstr_get(x_1, 3); -lean::inc(x_328); -lean::inc(x_327); -lean::inc(x_326); -lean::inc(x_325); -lean::dec(x_1); -x_329 = lean::unbox_uint32(x_326); -x_330 = x_2 < x_329; -if (x_330 == 0) -{ -uint32 x_331; uint8 x_332; -x_331 = lean::unbox_uint32(x_326); -x_332 = x_331 < x_2; -if (x_332 == 0) -{ -obj* x_333; obj* x_334; -lean::dec(x_327); -lean::dec(x_326); -x_333 = lean::box_uint32(x_2); -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_325); -lean::cnstr_set(x_334, 1, x_333); -lean::cnstr_set(x_334, 2, x_3); -lean::cnstr_set(x_334, 3, x_328); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_7); -return x_334; -} -else -{ -uint8 x_335; -x_335 = l_RBNode_isRed___main___rarg(x_328); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; -x_336 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_328, x_2, x_3); -x_337 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_337, 0, x_325); -lean::cnstr_set(x_337, 1, x_326); -lean::cnstr_set(x_337, 2, x_327); -lean::cnstr_set(x_337, 3, x_336); -lean::cnstr_set_scalar(x_337, sizeof(void*)*4, x_7); -return x_337; -} -else -{ -obj* x_338; -x_338 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_328, x_2, x_3); -if (lean::obj_tag(x_338) == 0) -{ -lean::dec(x_327); -lean::dec(x_326); -lean::dec(x_325); -return x_338; -} -else -{ -obj* x_339; -x_339 = lean::cnstr_get(x_338, 0); -lean::inc(x_339); -if (lean::obj_tag(x_339) == 0) -{ -obj* x_340; -x_340 = lean::cnstr_get(x_338, 3); -lean::inc(x_340); -if (lean::obj_tag(x_340) == 0) -{ -obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; uint8 x_346; obj* x_347; -x_341 = lean::cnstr_get(x_338, 1); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_338, 2); -lean::inc(x_342); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_343 = x_338; -} else { - lean::dec_ref(x_338); - x_343 = lean::box(0); -} -x_344 = 0; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_340); -lean::cnstr_set(x_345, 1, x_341); -lean::cnstr_set(x_345, 2, x_342); -lean::cnstr_set(x_345, 3, x_340); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -x_346 = 1; -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_325); -lean::cnstr_set(x_347, 1, x_326); -lean::cnstr_set(x_347, 2, x_327); -lean::cnstr_set(x_347, 3, x_345); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_346); -return x_347; -} -else -{ -uint8 x_348; -x_348 = lean::cnstr_get_scalar(x_340, sizeof(void*)*4); -if (x_348 == 0) -{ -obj* x_349; obj* x_350; obj* x_351; obj* x_352; obj* x_353; obj* x_354; obj* x_355; obj* x_356; uint8 x_357; obj* x_358; obj* x_359; obj* x_360; -x_349 = lean::cnstr_get(x_338, 1); -lean::inc(x_349); -x_350 = lean::cnstr_get(x_338, 2); -lean::inc(x_350); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_351 = x_338; -} else { - lean::dec_ref(x_338); - x_351 = lean::box(0); -} -x_352 = lean::cnstr_get(x_340, 0); -lean::inc(x_352); -x_353 = lean::cnstr_get(x_340, 1); -lean::inc(x_353); -x_354 = lean::cnstr_get(x_340, 2); -lean::inc(x_354); -x_355 = lean::cnstr_get(x_340, 3); -lean::inc(x_355); -if (lean::is_exclusive(x_340)) { - lean::cnstr_release(x_340, 0); - lean::cnstr_release(x_340, 1); - lean::cnstr_release(x_340, 2); - lean::cnstr_release(x_340, 3); - x_356 = x_340; -} else { - lean::dec_ref(x_340); - x_356 = lean::box(0); -} -x_357 = 1; -if (lean::is_scalar(x_356)) { - x_358 = lean::alloc_cnstr(1, 4, 1); -} else { - x_358 = x_356; -} -lean::cnstr_set(x_358, 0, x_325); -lean::cnstr_set(x_358, 1, x_326); -lean::cnstr_set(x_358, 2, x_327); -lean::cnstr_set(x_358, 3, x_339); -lean::cnstr_set_scalar(x_358, sizeof(void*)*4, x_357); -if (lean::is_scalar(x_351)) { - x_359 = lean::alloc_cnstr(1, 4, 1); -} else { - x_359 = x_351; -} -lean::cnstr_set(x_359, 0, x_352); -lean::cnstr_set(x_359, 1, x_353); -lean::cnstr_set(x_359, 2, x_354); -lean::cnstr_set(x_359, 3, x_355); -lean::cnstr_set_scalar(x_359, sizeof(void*)*4, x_357); -x_360 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_360, 0, x_358); -lean::cnstr_set(x_360, 1, x_349); -lean::cnstr_set(x_360, 2, x_350); -lean::cnstr_set(x_360, 3, x_359); -lean::cnstr_set_scalar(x_360, sizeof(void*)*4, x_348); -return x_360; -} -else -{ -obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; -x_361 = lean::cnstr_get(x_338, 1); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_338, 2); -lean::inc(x_362); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_363 = x_338; -} else { - lean::dec_ref(x_338); - x_363 = lean::box(0); -} -x_364 = 0; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_339); -lean::cnstr_set(x_365, 1, x_361); -lean::cnstr_set(x_365, 2, x_362); -lean::cnstr_set(x_365, 3, x_340); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -x_366 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_366, 0, x_325); -lean::cnstr_set(x_366, 1, x_326); -lean::cnstr_set(x_366, 2, x_327); -lean::cnstr_set(x_366, 3, x_365); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_348); -return x_366; -} -} -} -else -{ -uint8 x_367; -x_367 = lean::cnstr_get_scalar(x_339, sizeof(void*)*4); -if (x_367 == 0) -{ -obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_372; obj* x_373; obj* x_374; obj* x_375; obj* x_376; uint8 x_377; obj* x_378; obj* x_379; obj* x_380; -x_368 = lean::cnstr_get(x_338, 1); -lean::inc(x_368); -x_369 = lean::cnstr_get(x_338, 2); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_338, 3); -lean::inc(x_370); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_371 = x_338; -} else { - lean::dec_ref(x_338); - x_371 = lean::box(0); -} -x_372 = lean::cnstr_get(x_339, 0); -lean::inc(x_372); -x_373 = lean::cnstr_get(x_339, 1); -lean::inc(x_373); -x_374 = lean::cnstr_get(x_339, 2); -lean::inc(x_374); -x_375 = lean::cnstr_get(x_339, 3); -lean::inc(x_375); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_376 = x_339; -} else { - lean::dec_ref(x_339); - x_376 = lean::box(0); -} -x_377 = 1; -if (lean::is_scalar(x_376)) { - x_378 = lean::alloc_cnstr(1, 4, 1); -} else { - x_378 = x_376; -} -lean::cnstr_set(x_378, 0, x_325); -lean::cnstr_set(x_378, 1, x_326); -lean::cnstr_set(x_378, 2, x_327); -lean::cnstr_set(x_378, 3, x_372); -lean::cnstr_set_scalar(x_378, sizeof(void*)*4, x_377); -if (lean::is_scalar(x_371)) { - x_379 = lean::alloc_cnstr(1, 4, 1); -} else { - x_379 = x_371; -} -lean::cnstr_set(x_379, 0, x_375); -lean::cnstr_set(x_379, 1, x_368); -lean::cnstr_set(x_379, 2, x_369); -lean::cnstr_set(x_379, 3, x_370); -lean::cnstr_set_scalar(x_379, sizeof(void*)*4, x_377); -x_380 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_380, 0, x_378); -lean::cnstr_set(x_380, 1, x_373); -lean::cnstr_set(x_380, 2, x_374); -lean::cnstr_set(x_380, 3, x_379); -lean::cnstr_set_scalar(x_380, sizeof(void*)*4, x_367); -return x_380; -} -else -{ -obj* x_381; -x_381 = lean::cnstr_get(x_338, 3); -lean::inc(x_381); -if (lean::obj_tag(x_381) == 0) -{ -obj* x_382; obj* x_383; obj* x_384; uint8 x_385; obj* x_386; obj* x_387; -x_382 = lean::cnstr_get(x_338, 1); -lean::inc(x_382); -x_383 = lean::cnstr_get(x_338, 2); -lean::inc(x_383); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_384 = x_338; -} else { - lean::dec_ref(x_338); - x_384 = lean::box(0); -} -x_385 = 0; -if (lean::is_scalar(x_384)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_384; -} -lean::cnstr_set(x_386, 0, x_339); -lean::cnstr_set(x_386, 1, x_382); -lean::cnstr_set(x_386, 2, x_383); -lean::cnstr_set(x_386, 3, x_381); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_385); -x_387 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_387, 0, x_325); -lean::cnstr_set(x_387, 1, x_326); -lean::cnstr_set(x_387, 2, x_327); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_367); -return x_387; -} -else -{ -uint8 x_388; -x_388 = lean::cnstr_get_scalar(x_381, sizeof(void*)*4); -if (x_388 == 0) -{ -obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; obj* x_397; obj* x_398; obj* x_399; obj* x_400; -x_389 = lean::cnstr_get(x_338, 1); -lean::inc(x_389); -x_390 = lean::cnstr_get(x_338, 2); -lean::inc(x_390); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_391 = x_338; -} else { - lean::dec_ref(x_338); - x_391 = lean::box(0); -} -x_392 = lean::cnstr_get(x_381, 0); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_381, 1); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_381, 2); -lean::inc(x_394); -x_395 = lean::cnstr_get(x_381, 3); -lean::inc(x_395); -if (lean::is_exclusive(x_381)) { - lean::cnstr_release(x_381, 0); - lean::cnstr_release(x_381, 1); - lean::cnstr_release(x_381, 2); - lean::cnstr_release(x_381, 3); - x_396 = x_381; -} else { - lean::dec_ref(x_381); - x_396 = lean::box(0); -} -lean::inc(x_339); -if (lean::is_scalar(x_396)) { - x_397 = lean::alloc_cnstr(1, 4, 1); -} else { - x_397 = x_396; -} -lean::cnstr_set(x_397, 0, x_325); -lean::cnstr_set(x_397, 1, x_326); -lean::cnstr_set(x_397, 2, x_327); -lean::cnstr_set(x_397, 3, x_339); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_398 = x_339; -} else { - lean::dec_ref(x_339); - x_398 = lean::box(0); -} -lean::cnstr_set_scalar(x_397, sizeof(void*)*4, x_367); -if (lean::is_scalar(x_398)) { - x_399 = lean::alloc_cnstr(1, 4, 1); -} else { - x_399 = x_398; -} -lean::cnstr_set(x_399, 0, x_392); -lean::cnstr_set(x_399, 1, x_393); -lean::cnstr_set(x_399, 2, x_394); -lean::cnstr_set(x_399, 3, x_395); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_367); -if (lean::is_scalar(x_391)) { - x_400 = lean::alloc_cnstr(1, 4, 1); -} else { - x_400 = x_391; -} -lean::cnstr_set(x_400, 0, x_397); -lean::cnstr_set(x_400, 1, x_389); -lean::cnstr_set(x_400, 2, x_390); -lean::cnstr_set(x_400, 3, x_399); -lean::cnstr_set_scalar(x_400, sizeof(void*)*4, x_388); -return x_400; -} -else -{ -obj* x_401; obj* x_402; obj* x_403; obj* x_404; obj* x_405; obj* x_406; obj* x_407; obj* x_408; obj* x_409; uint8 x_410; obj* x_411; obj* x_412; -x_401 = lean::cnstr_get(x_338, 1); -lean::inc(x_401); -x_402 = lean::cnstr_get(x_338, 2); -lean::inc(x_402); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_403 = x_338; -} else { - lean::dec_ref(x_338); - x_403 = lean::box(0); -} -x_404 = lean::cnstr_get(x_339, 0); -lean::inc(x_404); -x_405 = lean::cnstr_get(x_339, 1); -lean::inc(x_405); -x_406 = lean::cnstr_get(x_339, 2); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_339, 3); -lean::inc(x_407); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_408 = x_339; -} else { - lean::dec_ref(x_339); - x_408 = lean::box(0); -} -if (lean::is_scalar(x_408)) { - x_409 = lean::alloc_cnstr(1, 4, 1); -} else { - x_409 = x_408; -} -lean::cnstr_set(x_409, 0, x_404); -lean::cnstr_set(x_409, 1, x_405); -lean::cnstr_set(x_409, 2, x_406); -lean::cnstr_set(x_409, 3, x_407); -lean::cnstr_set_scalar(x_409, sizeof(void*)*4, x_388); -x_410 = 0; -if (lean::is_scalar(x_403)) { - x_411 = lean::alloc_cnstr(1, 4, 1); -} else { - x_411 = x_403; -} -lean::cnstr_set(x_411, 0, x_409); -lean::cnstr_set(x_411, 1, x_401); -lean::cnstr_set(x_411, 2, x_402); -lean::cnstr_set(x_411, 3, x_381); -lean::cnstr_set_scalar(x_411, sizeof(void*)*4, x_410); -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_325); -lean::cnstr_set(x_412, 1, x_326); -lean::cnstr_set(x_412, 2, x_327); -lean::cnstr_set(x_412, 3, x_411); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_388); -return x_412; -} -} -} -} -} -} -} -} -else -{ -uint8 x_413; -x_413 = l_RBNode_isRed___main___rarg(x_325); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; -x_414 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_325, x_2, x_3); -x_415 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_415, 0, x_414); -lean::cnstr_set(x_415, 1, x_326); -lean::cnstr_set(x_415, 2, x_327); -lean::cnstr_set(x_415, 3, x_328); -lean::cnstr_set_scalar(x_415, sizeof(void*)*4, x_7); -return x_415; -} -else -{ -obj* x_416; -x_416 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_325, x_2, x_3); -if (lean::obj_tag(x_416) == 0) -{ -lean::dec(x_328); -lean::dec(x_327); -lean::dec(x_326); -return x_416; -} -else -{ -obj* x_417; -x_417 = lean::cnstr_get(x_416, 0); -lean::inc(x_417); -if (lean::obj_tag(x_417) == 0) -{ -obj* x_418; -x_418 = lean::cnstr_get(x_416, 3); -lean::inc(x_418); -if (lean::obj_tag(x_418) == 0) -{ -obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; uint8 x_424; obj* x_425; -x_419 = lean::cnstr_get(x_416, 1); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_416, 2); -lean::inc(x_420); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_421 = x_416; -} else { - lean::dec_ref(x_416); - x_421 = lean::box(0); -} -x_422 = 0; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_418); -lean::cnstr_set(x_423, 1, x_419); -lean::cnstr_set(x_423, 2, x_420); -lean::cnstr_set(x_423, 3, x_418); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -x_424 = 1; -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_326); -lean::cnstr_set(x_425, 2, x_327); -lean::cnstr_set(x_425, 3, x_328); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_424); -return x_425; -} -else -{ -uint8 x_426; -x_426 = lean::cnstr_get_scalar(x_418, sizeof(void*)*4); -if (x_426 == 0) -{ -obj* x_427; obj* x_428; obj* x_429; obj* x_430; obj* x_431; obj* x_432; obj* x_433; obj* x_434; uint8 x_435; obj* x_436; obj* x_437; obj* x_438; -x_427 = lean::cnstr_get(x_416, 1); -lean::inc(x_427); -x_428 = lean::cnstr_get(x_416, 2); -lean::inc(x_428); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_429 = x_416; -} else { - lean::dec_ref(x_416); - x_429 = lean::box(0); -} -x_430 = lean::cnstr_get(x_418, 0); -lean::inc(x_430); -x_431 = lean::cnstr_get(x_418, 1); -lean::inc(x_431); -x_432 = lean::cnstr_get(x_418, 2); -lean::inc(x_432); -x_433 = lean::cnstr_get(x_418, 3); -lean::inc(x_433); -if (lean::is_exclusive(x_418)) { - lean::cnstr_release(x_418, 0); - lean::cnstr_release(x_418, 1); - lean::cnstr_release(x_418, 2); - lean::cnstr_release(x_418, 3); - x_434 = x_418; -} else { - lean::dec_ref(x_418); - x_434 = lean::box(0); -} -x_435 = 1; -if (lean::is_scalar(x_434)) { - x_436 = lean::alloc_cnstr(1, 4, 1); -} else { - x_436 = x_434; -} -lean::cnstr_set(x_436, 0, x_417); -lean::cnstr_set(x_436, 1, x_427); -lean::cnstr_set(x_436, 2, x_428); -lean::cnstr_set(x_436, 3, x_430); -lean::cnstr_set_scalar(x_436, sizeof(void*)*4, x_435); -if (lean::is_scalar(x_429)) { - x_437 = lean::alloc_cnstr(1, 4, 1); -} else { - x_437 = x_429; -} -lean::cnstr_set(x_437, 0, x_433); -lean::cnstr_set(x_437, 1, x_326); -lean::cnstr_set(x_437, 2, x_327); -lean::cnstr_set(x_437, 3, x_328); -lean::cnstr_set_scalar(x_437, sizeof(void*)*4, x_435); -x_438 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_438, 0, x_436); -lean::cnstr_set(x_438, 1, x_431); -lean::cnstr_set(x_438, 2, x_432); -lean::cnstr_set(x_438, 3, x_437); -lean::cnstr_set_scalar(x_438, sizeof(void*)*4, x_426); -return x_438; -} -else -{ -obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; -x_439 = lean::cnstr_get(x_416, 1); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_416, 2); -lean::inc(x_440); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_441 = x_416; -} else { - lean::dec_ref(x_416); - x_441 = lean::box(0); -} -x_442 = 0; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_417); -lean::cnstr_set(x_443, 1, x_439); -lean::cnstr_set(x_443, 2, x_440); -lean::cnstr_set(x_443, 3, x_418); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -x_444 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_444, 0, x_443); -lean::cnstr_set(x_444, 1, x_326); -lean::cnstr_set(x_444, 2, x_327); -lean::cnstr_set(x_444, 3, x_328); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_426); -return x_444; -} -} -} -else -{ -uint8 x_445; -x_445 = lean::cnstr_get_scalar(x_417, sizeof(void*)*4); -if (x_445 == 0) -{ -obj* x_446; obj* x_447; obj* x_448; obj* x_449; obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; uint8 x_455; obj* x_456; obj* x_457; obj* x_458; -x_446 = lean::cnstr_get(x_416, 1); -lean::inc(x_446); -x_447 = lean::cnstr_get(x_416, 2); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_416, 3); -lean::inc(x_448); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_449 = x_416; -} else { - lean::dec_ref(x_416); - x_449 = lean::box(0); -} -x_450 = lean::cnstr_get(x_417, 0); -lean::inc(x_450); -x_451 = lean::cnstr_get(x_417, 1); -lean::inc(x_451); -x_452 = lean::cnstr_get(x_417, 2); -lean::inc(x_452); -x_453 = lean::cnstr_get(x_417, 3); -lean::inc(x_453); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_454 = x_417; -} else { - lean::dec_ref(x_417); - x_454 = lean::box(0); -} -x_455 = 1; -if (lean::is_scalar(x_454)) { - x_456 = lean::alloc_cnstr(1, 4, 1); -} else { - x_456 = x_454; -} -lean::cnstr_set(x_456, 0, x_450); -lean::cnstr_set(x_456, 1, x_451); -lean::cnstr_set(x_456, 2, x_452); -lean::cnstr_set(x_456, 3, x_453); -lean::cnstr_set_scalar(x_456, sizeof(void*)*4, x_455); -if (lean::is_scalar(x_449)) { - x_457 = lean::alloc_cnstr(1, 4, 1); -} else { - x_457 = x_449; -} -lean::cnstr_set(x_457, 0, x_448); -lean::cnstr_set(x_457, 1, x_326); -lean::cnstr_set(x_457, 2, x_327); -lean::cnstr_set(x_457, 3, x_328); -lean::cnstr_set_scalar(x_457, sizeof(void*)*4, x_455); -x_458 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_458, 0, x_456); -lean::cnstr_set(x_458, 1, x_446); -lean::cnstr_set(x_458, 2, x_447); -lean::cnstr_set(x_458, 3, x_457); -lean::cnstr_set_scalar(x_458, sizeof(void*)*4, x_445); -return x_458; -} -else -{ -obj* x_459; -x_459 = lean::cnstr_get(x_416, 3); -lean::inc(x_459); -if (lean::obj_tag(x_459) == 0) -{ -obj* x_460; obj* x_461; obj* x_462; uint8 x_463; obj* x_464; obj* x_465; -x_460 = lean::cnstr_get(x_416, 1); -lean::inc(x_460); -x_461 = lean::cnstr_get(x_416, 2); -lean::inc(x_461); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_462 = x_416; -} else { - lean::dec_ref(x_416); - x_462 = lean::box(0); -} -x_463 = 0; -if (lean::is_scalar(x_462)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_462; -} -lean::cnstr_set(x_464, 0, x_417); -lean::cnstr_set(x_464, 1, x_460); -lean::cnstr_set(x_464, 2, x_461); -lean::cnstr_set(x_464, 3, x_459); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_463); -x_465 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_465, 0, x_464); -lean::cnstr_set(x_465, 1, x_326); -lean::cnstr_set(x_465, 2, x_327); -lean::cnstr_set(x_465, 3, x_328); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_445); -return x_465; -} -else -{ -uint8 x_466; -x_466 = lean::cnstr_get_scalar(x_459, sizeof(void*)*4); -if (x_466 == 0) -{ -obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; obj* x_475; obj* x_476; obj* x_477; obj* x_478; -x_467 = lean::cnstr_get(x_416, 1); -lean::inc(x_467); -x_468 = lean::cnstr_get(x_416, 2); -lean::inc(x_468); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_469 = x_416; -} else { - lean::dec_ref(x_416); - x_469 = lean::box(0); -} -x_470 = lean::cnstr_get(x_459, 0); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_459, 1); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_459, 2); -lean::inc(x_472); -x_473 = lean::cnstr_get(x_459, 3); -lean::inc(x_473); -if (lean::is_exclusive(x_459)) { - lean::cnstr_release(x_459, 0); - lean::cnstr_release(x_459, 1); - lean::cnstr_release(x_459, 2); - lean::cnstr_release(x_459, 3); - x_474 = x_459; -} else { - lean::dec_ref(x_459); - x_474 = lean::box(0); -} -lean::inc(x_417); -if (lean::is_scalar(x_474)) { - x_475 = lean::alloc_cnstr(1, 4, 1); -} else { - x_475 = x_474; -} -lean::cnstr_set(x_475, 0, x_417); -lean::cnstr_set(x_475, 1, x_467); -lean::cnstr_set(x_475, 2, x_468); -lean::cnstr_set(x_475, 3, x_470); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_476 = x_417; -} else { - lean::dec_ref(x_417); - x_476 = lean::box(0); -} -lean::cnstr_set_scalar(x_475, sizeof(void*)*4, x_445); -if (lean::is_scalar(x_476)) { - x_477 = lean::alloc_cnstr(1, 4, 1); -} else { - x_477 = x_476; -} -lean::cnstr_set(x_477, 0, x_473); -lean::cnstr_set(x_477, 1, x_326); -lean::cnstr_set(x_477, 2, x_327); -lean::cnstr_set(x_477, 3, x_328); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_445); -if (lean::is_scalar(x_469)) { - x_478 = lean::alloc_cnstr(1, 4, 1); -} else { - x_478 = x_469; -} -lean::cnstr_set(x_478, 0, x_475); -lean::cnstr_set(x_478, 1, x_471); -lean::cnstr_set(x_478, 2, x_472); -lean::cnstr_set(x_478, 3, x_477); -lean::cnstr_set_scalar(x_478, sizeof(void*)*4, x_466); -return x_478; -} -else -{ -obj* x_479; obj* x_480; obj* x_481; obj* x_482; obj* x_483; obj* x_484; obj* x_485; obj* x_486; obj* x_487; uint8 x_488; obj* x_489; obj* x_490; -x_479 = lean::cnstr_get(x_416, 1); -lean::inc(x_479); -x_480 = lean::cnstr_get(x_416, 2); -lean::inc(x_480); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_481 = x_416; -} else { - lean::dec_ref(x_416); - x_481 = lean::box(0); -} -x_482 = lean::cnstr_get(x_417, 0); -lean::inc(x_482); -x_483 = lean::cnstr_get(x_417, 1); -lean::inc(x_483); -x_484 = lean::cnstr_get(x_417, 2); -lean::inc(x_484); -x_485 = lean::cnstr_get(x_417, 3); -lean::inc(x_485); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_486 = x_417; -} else { - lean::dec_ref(x_417); - x_486 = lean::box(0); -} -if (lean::is_scalar(x_486)) { - x_487 = lean::alloc_cnstr(1, 4, 1); -} else { - x_487 = x_486; -} -lean::cnstr_set(x_487, 0, x_482); -lean::cnstr_set(x_487, 1, x_483); -lean::cnstr_set(x_487, 2, x_484); -lean::cnstr_set(x_487, 3, x_485); -lean::cnstr_set_scalar(x_487, sizeof(void*)*4, x_466); -x_488 = 0; -if (lean::is_scalar(x_481)) { - x_489 = lean::alloc_cnstr(1, 4, 1); -} else { - x_489 = x_481; -} -lean::cnstr_set(x_489, 0, x_487); -lean::cnstr_set(x_489, 1, x_479); -lean::cnstr_set(x_489, 2, x_480); -lean::cnstr_set(x_489, 3, x_459); -lean::cnstr_set_scalar(x_489, sizeof(void*)*4, x_488); -x_490 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_490, 0, x_489); -lean::cnstr_set(x_490, 1, x_326); -lean::cnstr_set(x_490, 2, x_327); -lean::cnstr_set(x_490, 3, x_328); -lean::cnstr_set_scalar(x_490, sizeof(void*)*4, x_466); -return x_490; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(obj* x_1, uint32 x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; obj* x_6; -x_4 = 0; -x_5 = lean::box_uint32(x_2); -x_6 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_6, 0, x_1); -lean::cnstr_set(x_6, 1, x_5); -lean::cnstr_set(x_6, 2, x_3); -lean::cnstr_set(x_6, 3, x_1); -lean::cnstr_set_scalar(x_6, sizeof(void*)*4, x_4); -return x_6; -} -else -{ -uint8 x_7; -x_7 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_7 == 0) -{ -uint8 x_8; -x_8 = !lean::is_exclusive(x_1); -if (x_8 == 0) -{ -obj* x_9; obj* x_10; obj* x_11; obj* x_12; uint32 x_13; uint8 x_14; -x_9 = lean::cnstr_get(x_1, 0); -x_10 = lean::cnstr_get(x_1, 1); -x_11 = lean::cnstr_get(x_1, 2); -x_12 = lean::cnstr_get(x_1, 3); -x_13 = lean::unbox_uint32(x_10); -x_14 = x_2 < x_13; -if (x_14 == 0) -{ -uint32 x_15; uint8 x_16; -x_15 = lean::unbox_uint32(x_10); -x_16 = x_15 < x_2; -if (x_16 == 0) -{ -obj* x_17; -lean::dec(x_11); -lean::dec(x_10); -x_17 = lean::box_uint32(x_2); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_17); -return x_1; -} -else -{ -obj* x_18; -x_18 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_12, x_2, x_3); -lean::cnstr_set(x_1, 3, x_18); -return x_1; -} -} -else -{ -obj* x_19; -x_19 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_9, x_2, x_3); -lean::cnstr_set(x_1, 0, x_19); -return x_1; -} -} -else -{ -obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint32 x_24; uint8 x_25; -x_20 = lean::cnstr_get(x_1, 0); -x_21 = lean::cnstr_get(x_1, 1); -x_22 = lean::cnstr_get(x_1, 2); -x_23 = lean::cnstr_get(x_1, 3); -lean::inc(x_23); -lean::inc(x_22); -lean::inc(x_21); -lean::inc(x_20); -lean::dec(x_1); -x_24 = lean::unbox_uint32(x_21); -x_25 = x_2 < x_24; -if (x_25 == 0) -{ -uint32 x_26; uint8 x_27; -x_26 = lean::unbox_uint32(x_21); -x_27 = x_26 < x_2; -if (x_27 == 0) -{ -obj* x_28; obj* x_29; -lean::dec(x_22); -lean::dec(x_21); -x_28 = lean::box_uint32(x_2); -x_29 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_29, 0, x_20); -lean::cnstr_set(x_29, 1, x_28); -lean::cnstr_set(x_29, 2, x_3); -lean::cnstr_set(x_29, 3, x_23); -lean::cnstr_set_scalar(x_29, sizeof(void*)*4, x_7); -return x_29; -} -else -{ -obj* x_30; obj* x_31; -x_30 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_23, x_2, x_3); -x_31 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_31, 0, x_20); -lean::cnstr_set(x_31, 1, x_21); -lean::cnstr_set(x_31, 2, x_22); -lean::cnstr_set(x_31, 3, x_30); -lean::cnstr_set_scalar(x_31, sizeof(void*)*4, x_7); -return x_31; -} -} -else -{ -obj* x_32; obj* x_33; -x_32 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_20, x_2, x_3); -x_33 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_21); -lean::cnstr_set(x_33, 2, x_22); -lean::cnstr_set(x_33, 3, x_23); -lean::cnstr_set_scalar(x_33, sizeof(void*)*4, x_7); -return x_33; -} -} -} -else -{ -uint8 x_34; -x_34 = !lean::is_exclusive(x_1); -if (x_34 == 0) -{ -obj* x_35; obj* x_36; obj* x_37; obj* x_38; uint32 x_39; uint8 x_40; -x_35 = lean::cnstr_get(x_1, 0); -x_36 = lean::cnstr_get(x_1, 1); -x_37 = lean::cnstr_get(x_1, 2); -x_38 = lean::cnstr_get(x_1, 3); -x_39 = lean::unbox_uint32(x_36); -x_40 = x_2 < x_39; -if (x_40 == 0) -{ -uint32 x_41; uint8 x_42; -x_41 = lean::unbox_uint32(x_36); -x_42 = x_41 < x_2; -if (x_42 == 0) -{ -obj* x_43; -lean::dec(x_37); -lean::dec(x_36); -x_43 = lean::box_uint32(x_2); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_43); -return x_1; -} -else -{ -uint8 x_44; -x_44 = l_RBNode_isRed___main___rarg(x_38); -if (x_44 == 0) -{ -obj* x_45; -x_45 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_38, x_2, x_3); -lean::cnstr_set(x_1, 3, x_45); -return x_1; -} -else -{ -obj* x_46; -x_46 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_38, x_2, x_3); -if (lean::obj_tag(x_46) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_37); -lean::dec(x_36); -lean::dec(x_35); -return x_46; -} -else -{ -obj* x_47; -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -if (lean::obj_tag(x_47) == 0) -{ -obj* x_48; -x_48 = lean::cnstr_get(x_46, 3); -lean::inc(x_48); -if (lean::obj_tag(x_48) == 0) -{ -uint8 x_49; -x_49 = !lean::is_exclusive(x_46); -if (x_49 == 0) -{ -obj* x_50; obj* x_51; uint8 x_52; uint8 x_53; -x_50 = lean::cnstr_get(x_46, 3); -lean::dec(x_50); -x_51 = lean::cnstr_get(x_46, 0); -lean::dec(x_51); -x_52 = 0; -lean::cnstr_set(x_46, 0, x_48); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_52); -x_53 = 1; -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_53); -return x_1; -} -else -{ -obj* x_54; obj* x_55; uint8 x_56; obj* x_57; uint8 x_58; -x_54 = lean::cnstr_get(x_46, 1); -x_55 = lean::cnstr_get(x_46, 2); -lean::inc(x_55); -lean::inc(x_54); -lean::dec(x_46); -x_56 = 0; -x_57 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_57, 0, x_48); -lean::cnstr_set(x_57, 1, x_54); -lean::cnstr_set(x_57, 2, x_55); -lean::cnstr_set(x_57, 3, x_48); -lean::cnstr_set_scalar(x_57, sizeof(void*)*4, x_56); -x_58 = 1; -lean::cnstr_set(x_1, 3, x_57); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_58); -return x_1; -} -} -else -{ -uint8 x_59; -x_59 = lean::cnstr_get_scalar(x_48, sizeof(void*)*4); -if (x_59 == 0) -{ -uint8 x_60; -x_60 = !lean::is_exclusive(x_46); -if (x_60 == 0) -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; -x_61 = lean::cnstr_get(x_46, 1); -x_62 = lean::cnstr_get(x_46, 2); -x_63 = lean::cnstr_get(x_46, 3); -lean::dec(x_63); -x_64 = lean::cnstr_get(x_46, 0); -lean::dec(x_64); -x_65 = !lean::is_exclusive(x_48); -if (x_65 == 0) -{ -obj* x_66; obj* x_67; obj* x_68; obj* x_69; uint8 x_70; -x_66 = lean::cnstr_get(x_48, 0); -x_67 = lean::cnstr_get(x_48, 1); -x_68 = lean::cnstr_get(x_48, 2); -x_69 = lean::cnstr_get(x_48, 3); -x_70 = 1; -lean::cnstr_set(x_48, 3, x_47); -lean::cnstr_set(x_48, 2, x_37); -lean::cnstr_set(x_48, 1, x_36); -lean::cnstr_set(x_48, 0, x_35); -lean::cnstr_set_scalar(x_48, sizeof(void*)*4, x_70); -lean::cnstr_set(x_46, 3, x_69); -lean::cnstr_set(x_46, 2, x_68); -lean::cnstr_set(x_46, 1, x_67); -lean::cnstr_set(x_46, 0, x_66); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_70); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_62); -lean::cnstr_set(x_1, 1, x_61); -lean::cnstr_set(x_1, 0, x_48); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -else -{ -obj* x_71; obj* x_72; obj* x_73; obj* x_74; uint8 x_75; obj* x_76; -x_71 = lean::cnstr_get(x_48, 0); -x_72 = lean::cnstr_get(x_48, 1); -x_73 = lean::cnstr_get(x_48, 2); -x_74 = lean::cnstr_get(x_48, 3); -lean::inc(x_74); -lean::inc(x_73); -lean::inc(x_72); -lean::inc(x_71); -lean::dec(x_48); -x_75 = 1; -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_35); -lean::cnstr_set(x_76, 1, x_36); -lean::cnstr_set(x_76, 2, x_37); -lean::cnstr_set(x_76, 3, x_47); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_75); -lean::cnstr_set(x_46, 3, x_74); -lean::cnstr_set(x_46, 2, x_73); -lean::cnstr_set(x_46, 1, x_72); -lean::cnstr_set(x_46, 0, x_71); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_75); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_62); -lean::cnstr_set(x_1, 1, x_61); -lean::cnstr_set(x_1, 0, x_76); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -else -{ -obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; uint8 x_84; obj* x_85; obj* x_86; -x_77 = lean::cnstr_get(x_46, 1); -x_78 = lean::cnstr_get(x_46, 2); -lean::inc(x_78); -lean::inc(x_77); -lean::dec(x_46); -x_79 = lean::cnstr_get(x_48, 0); -lean::inc(x_79); -x_80 = lean::cnstr_get(x_48, 1); -lean::inc(x_80); -x_81 = lean::cnstr_get(x_48, 2); -lean::inc(x_81); -x_82 = lean::cnstr_get(x_48, 3); -lean::inc(x_82); -if (lean::is_exclusive(x_48)) { - lean::cnstr_release(x_48, 0); - lean::cnstr_release(x_48, 1); - lean::cnstr_release(x_48, 2); - lean::cnstr_release(x_48, 3); - x_83 = x_48; -} else { - lean::dec_ref(x_48); - x_83 = lean::box(0); -} -x_84 = 1; -if (lean::is_scalar(x_83)) { - x_85 = lean::alloc_cnstr(1, 4, 1); -} else { - x_85 = x_83; -} -lean::cnstr_set(x_85, 0, x_35); -lean::cnstr_set(x_85, 1, x_36); -lean::cnstr_set(x_85, 2, x_37); -lean::cnstr_set(x_85, 3, x_47); -lean::cnstr_set_scalar(x_85, sizeof(void*)*4, x_84); -x_86 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_86, 0, x_79); -lean::cnstr_set(x_86, 1, x_80); -lean::cnstr_set(x_86, 2, x_81); -lean::cnstr_set(x_86, 3, x_82); -lean::cnstr_set_scalar(x_86, sizeof(void*)*4, x_84); -lean::cnstr_set(x_1, 3, x_86); -lean::cnstr_set(x_1, 2, x_78); -lean::cnstr_set(x_1, 1, x_77); -lean::cnstr_set(x_1, 0, x_85); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -else -{ -uint8 x_87; -x_87 = !lean::is_exclusive(x_46); -if (x_87 == 0) -{ -obj* x_88; obj* x_89; uint8 x_90; -x_88 = lean::cnstr_get(x_46, 3); -lean::dec(x_88); -x_89 = lean::cnstr_get(x_46, 0); -lean::dec(x_89); -x_90 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_90); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -else -{ -obj* x_91; obj* x_92; uint8 x_93; obj* x_94; -x_91 = lean::cnstr_get(x_46, 1); -x_92 = lean::cnstr_get(x_46, 2); -lean::inc(x_92); -lean::inc(x_91); -lean::dec(x_46); -x_93 = 0; -x_94 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_94, 0, x_47); -lean::cnstr_set(x_94, 1, x_91); -lean::cnstr_set(x_94, 2, x_92); -lean::cnstr_set(x_94, 3, x_48); -lean::cnstr_set_scalar(x_94, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_94); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_59); -return x_1; -} -} -} -} -else -{ -uint8 x_95; -x_95 = lean::cnstr_get_scalar(x_47, sizeof(void*)*4); -if (x_95 == 0) -{ -uint8 x_96; -x_96 = !lean::is_exclusive(x_46); -if (x_96 == 0) -{ -obj* x_97; uint8 x_98; -x_97 = lean::cnstr_get(x_46, 0); -lean::dec(x_97); -x_98 = !lean::is_exclusive(x_47); -if (x_98 == 0) -{ -obj* x_99; obj* x_100; obj* x_101; obj* x_102; uint8 x_103; -x_99 = lean::cnstr_get(x_47, 0); -x_100 = lean::cnstr_get(x_47, 1); -x_101 = lean::cnstr_get(x_47, 2); -x_102 = lean::cnstr_get(x_47, 3); -x_103 = 1; -lean::cnstr_set(x_47, 3, x_99); -lean::cnstr_set(x_47, 2, x_37); -lean::cnstr_set(x_47, 1, x_36); -lean::cnstr_set(x_47, 0, x_35); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_103); -lean::cnstr_set(x_46, 0, x_102); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_103); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_101); -lean::cnstr_set(x_1, 1, x_100); -lean::cnstr_set(x_1, 0, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -else -{ -obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; -x_104 = lean::cnstr_get(x_47, 0); -x_105 = lean::cnstr_get(x_47, 1); -x_106 = lean::cnstr_get(x_47, 2); -x_107 = lean::cnstr_get(x_47, 3); -lean::inc(x_107); -lean::inc(x_106); -lean::inc(x_105); -lean::inc(x_104); -lean::dec(x_47); -x_108 = 1; -x_109 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_109, 0, x_35); -lean::cnstr_set(x_109, 1, x_36); -lean::cnstr_set(x_109, 2, x_37); -lean::cnstr_set(x_109, 3, x_104); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -lean::cnstr_set(x_46, 0, x_107); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set(x_1, 2, x_106); -lean::cnstr_set(x_1, 1, x_105); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; uint8 x_118; obj* x_119; obj* x_120; -x_110 = lean::cnstr_get(x_46, 1); -x_111 = lean::cnstr_get(x_46, 2); -x_112 = lean::cnstr_get(x_46, 3); -lean::inc(x_112); -lean::inc(x_111); -lean::inc(x_110); -lean::dec(x_46); -x_113 = lean::cnstr_get(x_47, 0); -lean::inc(x_113); -x_114 = lean::cnstr_get(x_47, 1); -lean::inc(x_114); -x_115 = lean::cnstr_get(x_47, 2); -lean::inc(x_115); -x_116 = lean::cnstr_get(x_47, 3); -lean::inc(x_116); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_117 = x_47; -} else { - lean::dec_ref(x_47); - x_117 = lean::box(0); -} -x_118 = 1; -if (lean::is_scalar(x_117)) { - x_119 = lean::alloc_cnstr(1, 4, 1); -} else { - x_119 = x_117; -} -lean::cnstr_set(x_119, 0, x_35); -lean::cnstr_set(x_119, 1, x_36); -lean::cnstr_set(x_119, 2, x_37); -lean::cnstr_set(x_119, 3, x_113); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -x_120 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_120, 0, x_116); -lean::cnstr_set(x_120, 1, x_110); -lean::cnstr_set(x_120, 2, x_111); -lean::cnstr_set(x_120, 3, x_112); -lean::cnstr_set_scalar(x_120, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_120); -lean::cnstr_set(x_1, 2, x_115); -lean::cnstr_set(x_1, 1, x_114); -lean::cnstr_set(x_1, 0, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -obj* x_121; -x_121 = lean::cnstr_get(x_46, 3); -lean::inc(x_121); -if (lean::obj_tag(x_121) == 0) -{ -uint8 x_122; -x_122 = !lean::is_exclusive(x_46); -if (x_122 == 0) -{ -obj* x_123; obj* x_124; uint8 x_125; -x_123 = lean::cnstr_get(x_46, 3); -lean::dec(x_123); -x_124 = lean::cnstr_get(x_46, 0); -lean::dec(x_124); -x_125 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_125); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -else -{ -obj* x_126; obj* x_127; uint8 x_128; obj* x_129; -x_126 = lean::cnstr_get(x_46, 1); -x_127 = lean::cnstr_get(x_46, 2); -lean::inc(x_127); -lean::inc(x_126); -lean::dec(x_46); -x_128 = 0; -x_129 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_129, 0, x_47); -lean::cnstr_set(x_129, 1, x_126); -lean::cnstr_set(x_129, 2, x_127); -lean::cnstr_set(x_129, 3, x_121); -lean::cnstr_set_scalar(x_129, sizeof(void*)*4, x_128); -lean::cnstr_set(x_1, 3, x_129); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_95); -return x_1; -} -} -else -{ -uint8 x_130; -x_130 = lean::cnstr_get_scalar(x_121, sizeof(void*)*4); -if (x_130 == 0) -{ -uint8 x_131; -lean::free_heap_obj(x_1); -x_131 = !lean::is_exclusive(x_46); -if (x_131 == 0) -{ -obj* x_132; obj* x_133; uint8 x_134; -x_132 = lean::cnstr_get(x_46, 3); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_46, 0); -lean::dec(x_133); -x_134 = !lean::is_exclusive(x_121); -if (x_134 == 0) -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; uint8 x_139; -x_135 = lean::cnstr_get(x_121, 0); -x_136 = lean::cnstr_get(x_121, 1); -x_137 = lean::cnstr_get(x_121, 2); -x_138 = lean::cnstr_get(x_121, 3); -lean::inc(x_47); -lean::cnstr_set(x_121, 3, x_47); -lean::cnstr_set(x_121, 2, x_37); -lean::cnstr_set(x_121, 1, x_36); -lean::cnstr_set(x_121, 0, x_35); -x_139 = !lean::is_exclusive(x_47); -if (x_139 == 0) -{ -obj* x_140; obj* x_141; obj* x_142; obj* x_143; -x_140 = lean::cnstr_get(x_47, 3); -lean::dec(x_140); -x_141 = lean::cnstr_get(x_47, 2); -lean::dec(x_141); -x_142 = lean::cnstr_get(x_47, 1); -lean::dec(x_142); -x_143 = lean::cnstr_get(x_47, 0); -lean::dec(x_143); -lean::cnstr_set_scalar(x_121, sizeof(void*)*4, x_95); -lean::cnstr_set(x_47, 3, x_138); -lean::cnstr_set(x_47, 2, x_137); -lean::cnstr_set(x_47, 1, x_136); -lean::cnstr_set(x_47, 0, x_135); -lean::cnstr_set(x_46, 3, x_47); -lean::cnstr_set(x_46, 0, x_121); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -else -{ -obj* x_144; -lean::dec(x_47); -lean::cnstr_set_scalar(x_121, sizeof(void*)*4, x_95); -x_144 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_144, 0, x_135); -lean::cnstr_set(x_144, 1, x_136); -lean::cnstr_set(x_144, 2, x_137); -lean::cnstr_set(x_144, 3, x_138); -lean::cnstr_set_scalar(x_144, sizeof(void*)*4, x_95); -lean::cnstr_set(x_46, 3, x_144); -lean::cnstr_set(x_46, 0, x_121); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -} -else -{ -obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; -x_145 = lean::cnstr_get(x_121, 0); -x_146 = lean::cnstr_get(x_121, 1); -x_147 = lean::cnstr_get(x_121, 2); -x_148 = lean::cnstr_get(x_121, 3); -lean::inc(x_148); -lean::inc(x_147); -lean::inc(x_146); -lean::inc(x_145); -lean::dec(x_121); -lean::inc(x_47); -x_149 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_149, 0, x_35); -lean::cnstr_set(x_149, 1, x_36); -lean::cnstr_set(x_149, 2, x_37); -lean::cnstr_set(x_149, 3, x_47); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_150 = x_47; -} else { - lean::dec_ref(x_47); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_95); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_145); -lean::cnstr_set(x_151, 1, x_146); -lean::cnstr_set(x_151, 2, x_147); -lean::cnstr_set(x_151, 3, x_148); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_95); -lean::cnstr_set(x_46, 3, x_151); -lean::cnstr_set(x_46, 0, x_149); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_130); -return x_46; -} -} -else -{ -obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; -x_152 = lean::cnstr_get(x_46, 1); -x_153 = lean::cnstr_get(x_46, 2); -lean::inc(x_153); -lean::inc(x_152); -lean::dec(x_46); -x_154 = lean::cnstr_get(x_121, 0); -lean::inc(x_154); -x_155 = lean::cnstr_get(x_121, 1); -lean::inc(x_155); -x_156 = lean::cnstr_get(x_121, 2); -lean::inc(x_156); -x_157 = lean::cnstr_get(x_121, 3); -lean::inc(x_157); -if (lean::is_exclusive(x_121)) { - lean::cnstr_release(x_121, 0); - lean::cnstr_release(x_121, 1); - lean::cnstr_release(x_121, 2); - lean::cnstr_release(x_121, 3); - x_158 = x_121; -} else { - lean::dec_ref(x_121); - x_158 = lean::box(0); -} -lean::inc(x_47); -if (lean::is_scalar(x_158)) { - x_159 = lean::alloc_cnstr(1, 4, 1); -} else { - x_159 = x_158; -} -lean::cnstr_set(x_159, 0, x_35); -lean::cnstr_set(x_159, 1, x_36); -lean::cnstr_set(x_159, 2, x_37); -lean::cnstr_set(x_159, 3, x_47); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_160 = x_47; -} else { - lean::dec_ref(x_47); - x_160 = lean::box(0); -} -lean::cnstr_set_scalar(x_159, sizeof(void*)*4, x_95); -if (lean::is_scalar(x_160)) { - x_161 = lean::alloc_cnstr(1, 4, 1); -} else { - x_161 = x_160; -} -lean::cnstr_set(x_161, 0, x_154); -lean::cnstr_set(x_161, 1, x_155); -lean::cnstr_set(x_161, 2, x_156); -lean::cnstr_set(x_161, 3, x_157); -lean::cnstr_set_scalar(x_161, sizeof(void*)*4, x_95); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_159); -lean::cnstr_set(x_162, 1, x_152); -lean::cnstr_set(x_162, 2, x_153); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_130); -return x_162; -} -} -else -{ -uint8 x_163; -x_163 = !lean::is_exclusive(x_46); -if (x_163 == 0) -{ -obj* x_164; obj* x_165; uint8 x_166; -x_164 = lean::cnstr_get(x_46, 3); -lean::dec(x_164); -x_165 = lean::cnstr_get(x_46, 0); -lean::dec(x_165); -x_166 = !lean::is_exclusive(x_47); -if (x_166 == 0) -{ -uint8 x_167; -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_130); -x_167 = 0; -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_167); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -else -{ -obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; uint8 x_173; -x_168 = lean::cnstr_get(x_47, 0); -x_169 = lean::cnstr_get(x_47, 1); -x_170 = lean::cnstr_get(x_47, 2); -x_171 = lean::cnstr_get(x_47, 3); -lean::inc(x_171); -lean::inc(x_170); -lean::inc(x_169); -lean::inc(x_168); -lean::dec(x_47); -x_172 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_172, 0, x_168); -lean::cnstr_set(x_172, 1, x_169); -lean::cnstr_set(x_172, 2, x_170); -lean::cnstr_set(x_172, 3, x_171); -lean::cnstr_set_scalar(x_172, sizeof(void*)*4, x_130); -x_173 = 0; -lean::cnstr_set(x_46, 0, x_172); -lean::cnstr_set_scalar(x_46, sizeof(void*)*4, x_173); -lean::cnstr_set(x_1, 3, x_46); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -} -else -{ -obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; uint8 x_182; obj* x_183; -x_174 = lean::cnstr_get(x_46, 1); -x_175 = lean::cnstr_get(x_46, 2); -lean::inc(x_175); -lean::inc(x_174); -lean::dec(x_46); -x_176 = lean::cnstr_get(x_47, 0); -lean::inc(x_176); -x_177 = lean::cnstr_get(x_47, 1); -lean::inc(x_177); -x_178 = lean::cnstr_get(x_47, 2); -lean::inc(x_178); -x_179 = lean::cnstr_get(x_47, 3); -lean::inc(x_179); -if (lean::is_exclusive(x_47)) { - lean::cnstr_release(x_47, 0); - lean::cnstr_release(x_47, 1); - lean::cnstr_release(x_47, 2); - lean::cnstr_release(x_47, 3); - x_180 = x_47; -} else { - lean::dec_ref(x_47); - x_180 = lean::box(0); -} -if (lean::is_scalar(x_180)) { - x_181 = lean::alloc_cnstr(1, 4, 1); -} else { - x_181 = x_180; -} -lean::cnstr_set(x_181, 0, x_176); -lean::cnstr_set(x_181, 1, x_177); -lean::cnstr_set(x_181, 2, x_178); -lean::cnstr_set(x_181, 3, x_179); -lean::cnstr_set_scalar(x_181, sizeof(void*)*4, x_130); -x_182 = 0; -x_183 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_183, 0, x_181); -lean::cnstr_set(x_183, 1, x_174); -lean::cnstr_set(x_183, 2, x_175); -lean::cnstr_set(x_183, 3, x_121); -lean::cnstr_set_scalar(x_183, sizeof(void*)*4, x_182); -lean::cnstr_set(x_1, 3, x_183); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_130); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_184; -x_184 = l_RBNode_isRed___main___rarg(x_35); -if (x_184 == 0) -{ -obj* x_185; -x_185 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_35, x_2, x_3); -lean::cnstr_set(x_1, 0, x_185); -return x_1; -} -else -{ -obj* x_186; -x_186 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_35, x_2, x_3); -if (lean::obj_tag(x_186) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_38); -lean::dec(x_37); -lean::dec(x_36); -return x_186; -} -else -{ -obj* x_187; -x_187 = lean::cnstr_get(x_186, 0); -lean::inc(x_187); -if (lean::obj_tag(x_187) == 0) -{ -obj* x_188; -x_188 = lean::cnstr_get(x_186, 3); -lean::inc(x_188); -if (lean::obj_tag(x_188) == 0) -{ -uint8 x_189; -x_189 = !lean::is_exclusive(x_186); -if (x_189 == 0) -{ -obj* x_190; obj* x_191; uint8 x_192; uint8 x_193; -x_190 = lean::cnstr_get(x_186, 3); -lean::dec(x_190); -x_191 = lean::cnstr_get(x_186, 0); -lean::dec(x_191); -x_192 = 0; -lean::cnstr_set(x_186, 0, x_188); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_192); -x_193 = 1; -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_193); -return x_1; -} -else -{ -obj* x_194; obj* x_195; uint8 x_196; obj* x_197; uint8 x_198; -x_194 = lean::cnstr_get(x_186, 1); -x_195 = lean::cnstr_get(x_186, 2); -lean::inc(x_195); -lean::inc(x_194); -lean::dec(x_186); -x_196 = 0; -x_197 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_197, 0, x_188); -lean::cnstr_set(x_197, 1, x_194); -lean::cnstr_set(x_197, 2, x_195); -lean::cnstr_set(x_197, 3, x_188); -lean::cnstr_set_scalar(x_197, sizeof(void*)*4, x_196); -x_198 = 1; -lean::cnstr_set(x_1, 0, x_197); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_198); -return x_1; -} -} -else -{ -uint8 x_199; -x_199 = lean::cnstr_get_scalar(x_188, sizeof(void*)*4); -if (x_199 == 0) -{ -uint8 x_200; -x_200 = !lean::is_exclusive(x_186); -if (x_200 == 0) -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; -x_201 = lean::cnstr_get(x_186, 1); -x_202 = lean::cnstr_get(x_186, 2); -x_203 = lean::cnstr_get(x_186, 3); -lean::dec(x_203); -x_204 = lean::cnstr_get(x_186, 0); -lean::dec(x_204); -x_205 = !lean::is_exclusive(x_188); -if (x_205 == 0) -{ -obj* x_206; obj* x_207; obj* x_208; obj* x_209; uint8 x_210; -x_206 = lean::cnstr_get(x_188, 0); -x_207 = lean::cnstr_get(x_188, 1); -x_208 = lean::cnstr_get(x_188, 2); -x_209 = lean::cnstr_get(x_188, 3); -x_210 = 1; -lean::cnstr_set(x_188, 3, x_206); -lean::cnstr_set(x_188, 2, x_202); -lean::cnstr_set(x_188, 1, x_201); -lean::cnstr_set(x_188, 0, x_187); -lean::cnstr_set_scalar(x_188, sizeof(void*)*4, x_210); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_209); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_210); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_208); -lean::cnstr_set(x_1, 1, x_207); -lean::cnstr_set(x_1, 0, x_188); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -else -{ -obj* x_211; obj* x_212; obj* x_213; obj* x_214; uint8 x_215; obj* x_216; -x_211 = lean::cnstr_get(x_188, 0); -x_212 = lean::cnstr_get(x_188, 1); -x_213 = lean::cnstr_get(x_188, 2); -x_214 = lean::cnstr_get(x_188, 3); -lean::inc(x_214); -lean::inc(x_213); -lean::inc(x_212); -lean::inc(x_211); -lean::dec(x_188); -x_215 = 1; -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_187); -lean::cnstr_set(x_216, 1, x_201); -lean::cnstr_set(x_216, 2, x_202); -lean::cnstr_set(x_216, 3, x_211); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_215); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_214); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_215); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_213); -lean::cnstr_set(x_1, 1, x_212); -lean::cnstr_set(x_1, 0, x_216); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -else -{ -obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; uint8 x_224; obj* x_225; obj* x_226; -x_217 = lean::cnstr_get(x_186, 1); -x_218 = lean::cnstr_get(x_186, 2); -lean::inc(x_218); -lean::inc(x_217); -lean::dec(x_186); -x_219 = lean::cnstr_get(x_188, 0); -lean::inc(x_219); -x_220 = lean::cnstr_get(x_188, 1); -lean::inc(x_220); -x_221 = lean::cnstr_get(x_188, 2); -lean::inc(x_221); -x_222 = lean::cnstr_get(x_188, 3); -lean::inc(x_222); -if (lean::is_exclusive(x_188)) { - lean::cnstr_release(x_188, 0); - lean::cnstr_release(x_188, 1); - lean::cnstr_release(x_188, 2); - lean::cnstr_release(x_188, 3); - x_223 = x_188; -} else { - lean::dec_ref(x_188); - x_223 = lean::box(0); -} -x_224 = 1; -if (lean::is_scalar(x_223)) { - x_225 = lean::alloc_cnstr(1, 4, 1); -} else { - x_225 = x_223; -} -lean::cnstr_set(x_225, 0, x_187); -lean::cnstr_set(x_225, 1, x_217); -lean::cnstr_set(x_225, 2, x_218); -lean::cnstr_set(x_225, 3, x_219); -lean::cnstr_set_scalar(x_225, sizeof(void*)*4, x_224); -x_226 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_226, 0, x_222); -lean::cnstr_set(x_226, 1, x_36); -lean::cnstr_set(x_226, 2, x_37); -lean::cnstr_set(x_226, 3, x_38); -lean::cnstr_set_scalar(x_226, sizeof(void*)*4, x_224); -lean::cnstr_set(x_1, 3, x_226); -lean::cnstr_set(x_1, 2, x_221); -lean::cnstr_set(x_1, 1, x_220); -lean::cnstr_set(x_1, 0, x_225); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -else -{ -uint8 x_227; -x_227 = !lean::is_exclusive(x_186); -if (x_227 == 0) -{ -obj* x_228; obj* x_229; uint8 x_230; -x_228 = lean::cnstr_get(x_186, 3); -lean::dec(x_228); -x_229 = lean::cnstr_get(x_186, 0); -lean::dec(x_229); -x_230 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_230); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -else -{ -obj* x_231; obj* x_232; uint8 x_233; obj* x_234; -x_231 = lean::cnstr_get(x_186, 1); -x_232 = lean::cnstr_get(x_186, 2); -lean::inc(x_232); -lean::inc(x_231); -lean::dec(x_186); -x_233 = 0; -x_234 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_234, 0, x_187); -lean::cnstr_set(x_234, 1, x_231); -lean::cnstr_set(x_234, 2, x_232); -lean::cnstr_set(x_234, 3, x_188); -lean::cnstr_set_scalar(x_234, sizeof(void*)*4, x_233); -lean::cnstr_set(x_1, 0, x_234); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_199); -return x_1; -} -} -} -} -else -{ -uint8 x_235; -x_235 = lean::cnstr_get_scalar(x_187, sizeof(void*)*4); -if (x_235 == 0) -{ -uint8 x_236; -x_236 = !lean::is_exclusive(x_186); -if (x_236 == 0) -{ -obj* x_237; obj* x_238; obj* x_239; obj* x_240; uint8 x_241; -x_237 = lean::cnstr_get(x_186, 1); -x_238 = lean::cnstr_get(x_186, 2); -x_239 = lean::cnstr_get(x_186, 3); -x_240 = lean::cnstr_get(x_186, 0); -lean::dec(x_240); -x_241 = !lean::is_exclusive(x_187); -if (x_241 == 0) -{ -uint8 x_242; -x_242 = 1; -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_242); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_239); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_242); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_238); -lean::cnstr_set(x_1, 1, x_237); -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -else -{ -obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; -x_243 = lean::cnstr_get(x_187, 0); -x_244 = lean::cnstr_get(x_187, 1); -x_245 = lean::cnstr_get(x_187, 2); -x_246 = lean::cnstr_get(x_187, 3); -lean::inc(x_246); -lean::inc(x_245); -lean::inc(x_244); -lean::inc(x_243); -lean::dec(x_187); -x_247 = 1; -x_248 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_248, 0, x_243); -lean::cnstr_set(x_248, 1, x_244); -lean::cnstr_set(x_248, 2, x_245); -lean::cnstr_set(x_248, 3, x_246); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -lean::cnstr_set(x_186, 3, x_38); -lean::cnstr_set(x_186, 2, x_37); -lean::cnstr_set(x_186, 1, x_36); -lean::cnstr_set(x_186, 0, x_239); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_186); -lean::cnstr_set(x_1, 2, x_238); -lean::cnstr_set(x_1, 1, x_237); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; obj* x_256; uint8 x_257; obj* x_258; obj* x_259; -x_249 = lean::cnstr_get(x_186, 1); -x_250 = lean::cnstr_get(x_186, 2); -x_251 = lean::cnstr_get(x_186, 3); -lean::inc(x_251); -lean::inc(x_250); -lean::inc(x_249); -lean::dec(x_186); -x_252 = lean::cnstr_get(x_187, 0); -lean::inc(x_252); -x_253 = lean::cnstr_get(x_187, 1); -lean::inc(x_253); -x_254 = lean::cnstr_get(x_187, 2); -lean::inc(x_254); -x_255 = lean::cnstr_get(x_187, 3); -lean::inc(x_255); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_256 = x_187; -} else { - lean::dec_ref(x_187); - x_256 = lean::box(0); -} -x_257 = 1; -if (lean::is_scalar(x_256)) { - x_258 = lean::alloc_cnstr(1, 4, 1); -} else { - x_258 = x_256; -} -lean::cnstr_set(x_258, 0, x_252); -lean::cnstr_set(x_258, 1, x_253); -lean::cnstr_set(x_258, 2, x_254); -lean::cnstr_set(x_258, 3, x_255); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -x_259 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_259, 0, x_251); -lean::cnstr_set(x_259, 1, x_36); -lean::cnstr_set(x_259, 2, x_37); -lean::cnstr_set(x_259, 3, x_38); -lean::cnstr_set_scalar(x_259, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 3, x_259); -lean::cnstr_set(x_1, 2, x_250); -lean::cnstr_set(x_1, 1, x_249); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -obj* x_260; -x_260 = lean::cnstr_get(x_186, 3); -lean::inc(x_260); -if (lean::obj_tag(x_260) == 0) -{ -uint8 x_261; -x_261 = !lean::is_exclusive(x_186); -if (x_261 == 0) -{ -obj* x_262; obj* x_263; uint8 x_264; -x_262 = lean::cnstr_get(x_186, 3); -lean::dec(x_262); -x_263 = lean::cnstr_get(x_186, 0); -lean::dec(x_263); -x_264 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_264); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -else -{ -obj* x_265; obj* x_266; uint8 x_267; obj* x_268; -x_265 = lean::cnstr_get(x_186, 1); -x_266 = lean::cnstr_get(x_186, 2); -lean::inc(x_266); -lean::inc(x_265); -lean::dec(x_186); -x_267 = 0; -x_268 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_268, 0, x_187); -lean::cnstr_set(x_268, 1, x_265); -lean::cnstr_set(x_268, 2, x_266); -lean::cnstr_set(x_268, 3, x_260); -lean::cnstr_set_scalar(x_268, sizeof(void*)*4, x_267); -lean::cnstr_set(x_1, 0, x_268); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_235); -return x_1; -} -} -else -{ -uint8 x_269; -x_269 = lean::cnstr_get_scalar(x_260, sizeof(void*)*4); -if (x_269 == 0) -{ -uint8 x_270; -lean::free_heap_obj(x_1); -x_270 = !lean::is_exclusive(x_186); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; uint8 x_275; -x_271 = lean::cnstr_get(x_186, 1); -x_272 = lean::cnstr_get(x_186, 2); -x_273 = lean::cnstr_get(x_186, 3); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_186, 0); -lean::dec(x_274); -x_275 = !lean::is_exclusive(x_260); -if (x_275 == 0) -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; uint8 x_280; -x_276 = lean::cnstr_get(x_260, 0); -x_277 = lean::cnstr_get(x_260, 1); -x_278 = lean::cnstr_get(x_260, 2); -x_279 = lean::cnstr_get(x_260, 3); -lean::inc(x_187); -lean::cnstr_set(x_260, 3, x_276); -lean::cnstr_set(x_260, 2, x_272); -lean::cnstr_set(x_260, 1, x_271); -lean::cnstr_set(x_260, 0, x_187); -x_280 = !lean::is_exclusive(x_187); -if (x_280 == 0) -{ -obj* x_281; obj* x_282; obj* x_283; obj* x_284; -x_281 = lean::cnstr_get(x_187, 3); -lean::dec(x_281); -x_282 = lean::cnstr_get(x_187, 2); -lean::dec(x_282); -x_283 = lean::cnstr_get(x_187, 1); -lean::dec(x_283); -x_284 = lean::cnstr_get(x_187, 0); -lean::dec(x_284); -lean::cnstr_set_scalar(x_260, sizeof(void*)*4, x_235); -lean::cnstr_set(x_187, 3, x_38); -lean::cnstr_set(x_187, 2, x_37); -lean::cnstr_set(x_187, 1, x_36); -lean::cnstr_set(x_187, 0, x_279); -lean::cnstr_set(x_186, 3, x_187); -lean::cnstr_set(x_186, 2, x_278); -lean::cnstr_set(x_186, 1, x_277); -lean::cnstr_set(x_186, 0, x_260); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -else -{ -obj* x_285; -lean::dec(x_187); -lean::cnstr_set_scalar(x_260, sizeof(void*)*4, x_235); -x_285 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_285, 0, x_279); -lean::cnstr_set(x_285, 1, x_36); -lean::cnstr_set(x_285, 2, x_37); -lean::cnstr_set(x_285, 3, x_38); -lean::cnstr_set_scalar(x_285, sizeof(void*)*4, x_235); -lean::cnstr_set(x_186, 3, x_285); -lean::cnstr_set(x_186, 2, x_278); -lean::cnstr_set(x_186, 1, x_277); -lean::cnstr_set(x_186, 0, x_260); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -} -else -{ -obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; -x_286 = lean::cnstr_get(x_260, 0); -x_287 = lean::cnstr_get(x_260, 1); -x_288 = lean::cnstr_get(x_260, 2); -x_289 = lean::cnstr_get(x_260, 3); -lean::inc(x_289); -lean::inc(x_288); -lean::inc(x_287); -lean::inc(x_286); -lean::dec(x_260); -lean::inc(x_187); -x_290 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_290, 0, x_187); -lean::cnstr_set(x_290, 1, x_271); -lean::cnstr_set(x_290, 2, x_272); -lean::cnstr_set(x_290, 3, x_286); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_291 = x_187; -} else { - lean::dec_ref(x_187); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_235); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_289); -lean::cnstr_set(x_292, 1, x_36); -lean::cnstr_set(x_292, 2, x_37); -lean::cnstr_set(x_292, 3, x_38); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_235); -lean::cnstr_set(x_186, 3, x_292); -lean::cnstr_set(x_186, 2, x_288); -lean::cnstr_set(x_186, 1, x_287); -lean::cnstr_set(x_186, 0, x_290); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_269); -return x_186; -} -} -else -{ -obj* x_293; obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; -x_293 = lean::cnstr_get(x_186, 1); -x_294 = lean::cnstr_get(x_186, 2); -lean::inc(x_294); -lean::inc(x_293); -lean::dec(x_186); -x_295 = lean::cnstr_get(x_260, 0); -lean::inc(x_295); -x_296 = lean::cnstr_get(x_260, 1); -lean::inc(x_296); -x_297 = lean::cnstr_get(x_260, 2); -lean::inc(x_297); -x_298 = lean::cnstr_get(x_260, 3); -lean::inc(x_298); -if (lean::is_exclusive(x_260)) { - lean::cnstr_release(x_260, 0); - lean::cnstr_release(x_260, 1); - lean::cnstr_release(x_260, 2); - lean::cnstr_release(x_260, 3); - x_299 = x_260; -} else { - lean::dec_ref(x_260); - x_299 = lean::box(0); -} -lean::inc(x_187); -if (lean::is_scalar(x_299)) { - x_300 = lean::alloc_cnstr(1, 4, 1); -} else { - x_300 = x_299; -} -lean::cnstr_set(x_300, 0, x_187); -lean::cnstr_set(x_300, 1, x_293); -lean::cnstr_set(x_300, 2, x_294); -lean::cnstr_set(x_300, 3, x_295); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_301 = x_187; -} else { - lean::dec_ref(x_187); - x_301 = lean::box(0); -} -lean::cnstr_set_scalar(x_300, sizeof(void*)*4, x_235); -if (lean::is_scalar(x_301)) { - x_302 = lean::alloc_cnstr(1, 4, 1); -} else { - x_302 = x_301; -} -lean::cnstr_set(x_302, 0, x_298); -lean::cnstr_set(x_302, 1, x_36); -lean::cnstr_set(x_302, 2, x_37); -lean::cnstr_set(x_302, 3, x_38); -lean::cnstr_set_scalar(x_302, sizeof(void*)*4, x_235); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_300); -lean::cnstr_set(x_303, 1, x_296); -lean::cnstr_set(x_303, 2, x_297); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_269); -return x_303; -} -} -else -{ -uint8 x_304; -x_304 = !lean::is_exclusive(x_186); -if (x_304 == 0) -{ -obj* x_305; obj* x_306; uint8 x_307; -x_305 = lean::cnstr_get(x_186, 3); -lean::dec(x_305); -x_306 = lean::cnstr_get(x_186, 0); -lean::dec(x_306); -x_307 = !lean::is_exclusive(x_187); -if (x_307 == 0) -{ -uint8 x_308; -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_269); -x_308 = 0; -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_308); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -else -{ -obj* x_309; obj* x_310; obj* x_311; obj* x_312; obj* x_313; uint8 x_314; -x_309 = lean::cnstr_get(x_187, 0); -x_310 = lean::cnstr_get(x_187, 1); -x_311 = lean::cnstr_get(x_187, 2); -x_312 = lean::cnstr_get(x_187, 3); -lean::inc(x_312); -lean::inc(x_311); -lean::inc(x_310); -lean::inc(x_309); -lean::dec(x_187); -x_313 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_313, 0, x_309); -lean::cnstr_set(x_313, 1, x_310); -lean::cnstr_set(x_313, 2, x_311); -lean::cnstr_set(x_313, 3, x_312); -lean::cnstr_set_scalar(x_313, sizeof(void*)*4, x_269); -x_314 = 0; -lean::cnstr_set(x_186, 0, x_313); -lean::cnstr_set_scalar(x_186, sizeof(void*)*4, x_314); -lean::cnstr_set(x_1, 0, x_186); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; obj* x_319; obj* x_320; obj* x_321; obj* x_322; uint8 x_323; obj* x_324; -x_315 = lean::cnstr_get(x_186, 1); -x_316 = lean::cnstr_get(x_186, 2); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_186); -x_317 = lean::cnstr_get(x_187, 0); -lean::inc(x_317); -x_318 = lean::cnstr_get(x_187, 1); -lean::inc(x_318); -x_319 = lean::cnstr_get(x_187, 2); -lean::inc(x_319); -x_320 = lean::cnstr_get(x_187, 3); -lean::inc(x_320); -if (lean::is_exclusive(x_187)) { - lean::cnstr_release(x_187, 0); - lean::cnstr_release(x_187, 1); - lean::cnstr_release(x_187, 2); - lean::cnstr_release(x_187, 3); - x_321 = x_187; -} else { - lean::dec_ref(x_187); - x_321 = lean::box(0); -} -if (lean::is_scalar(x_321)) { - x_322 = lean::alloc_cnstr(1, 4, 1); -} else { - x_322 = x_321; -} -lean::cnstr_set(x_322, 0, x_317); -lean::cnstr_set(x_322, 1, x_318); -lean::cnstr_set(x_322, 2, x_319); -lean::cnstr_set(x_322, 3, x_320); -lean::cnstr_set_scalar(x_322, sizeof(void*)*4, x_269); -x_323 = 0; -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_322); -lean::cnstr_set(x_324, 1, x_315); -lean::cnstr_set(x_324, 2, x_316); -lean::cnstr_set(x_324, 3, x_260); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_323); -lean::cnstr_set(x_1, 0, x_324); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_269); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_325; obj* x_326; obj* x_327; obj* x_328; uint32 x_329; uint8 x_330; -x_325 = lean::cnstr_get(x_1, 0); -x_326 = lean::cnstr_get(x_1, 1); -x_327 = lean::cnstr_get(x_1, 2); -x_328 = lean::cnstr_get(x_1, 3); -lean::inc(x_328); -lean::inc(x_327); -lean::inc(x_326); -lean::inc(x_325); -lean::dec(x_1); -x_329 = lean::unbox_uint32(x_326); -x_330 = x_2 < x_329; -if (x_330 == 0) -{ -uint32 x_331; uint8 x_332; -x_331 = lean::unbox_uint32(x_326); -x_332 = x_331 < x_2; -if (x_332 == 0) -{ -obj* x_333; obj* x_334; -lean::dec(x_327); -lean::dec(x_326); -x_333 = lean::box_uint32(x_2); -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_325); -lean::cnstr_set(x_334, 1, x_333); -lean::cnstr_set(x_334, 2, x_3); -lean::cnstr_set(x_334, 3, x_328); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_7); -return x_334; -} -else -{ -uint8 x_335; -x_335 = l_RBNode_isRed___main___rarg(x_328); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; -x_336 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_328, x_2, x_3); -x_337 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_337, 0, x_325); -lean::cnstr_set(x_337, 1, x_326); -lean::cnstr_set(x_337, 2, x_327); -lean::cnstr_set(x_337, 3, x_336); -lean::cnstr_set_scalar(x_337, sizeof(void*)*4, x_7); -return x_337; -} -else -{ -obj* x_338; -x_338 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_328, x_2, x_3); -if (lean::obj_tag(x_338) == 0) -{ -lean::dec(x_327); -lean::dec(x_326); -lean::dec(x_325); -return x_338; -} -else -{ -obj* x_339; -x_339 = lean::cnstr_get(x_338, 0); -lean::inc(x_339); -if (lean::obj_tag(x_339) == 0) -{ -obj* x_340; -x_340 = lean::cnstr_get(x_338, 3); -lean::inc(x_340); -if (lean::obj_tag(x_340) == 0) -{ -obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; uint8 x_346; obj* x_347; -x_341 = lean::cnstr_get(x_338, 1); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_338, 2); -lean::inc(x_342); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_343 = x_338; -} else { - lean::dec_ref(x_338); - x_343 = lean::box(0); -} -x_344 = 0; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_340); -lean::cnstr_set(x_345, 1, x_341); -lean::cnstr_set(x_345, 2, x_342); -lean::cnstr_set(x_345, 3, x_340); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -x_346 = 1; -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_325); -lean::cnstr_set(x_347, 1, x_326); -lean::cnstr_set(x_347, 2, x_327); -lean::cnstr_set(x_347, 3, x_345); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_346); -return x_347; -} -else -{ -uint8 x_348; -x_348 = lean::cnstr_get_scalar(x_340, sizeof(void*)*4); -if (x_348 == 0) -{ -obj* x_349; obj* x_350; obj* x_351; obj* x_352; obj* x_353; obj* x_354; obj* x_355; obj* x_356; uint8 x_357; obj* x_358; obj* x_359; obj* x_360; -x_349 = lean::cnstr_get(x_338, 1); -lean::inc(x_349); -x_350 = lean::cnstr_get(x_338, 2); -lean::inc(x_350); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_351 = x_338; -} else { - lean::dec_ref(x_338); - x_351 = lean::box(0); -} -x_352 = lean::cnstr_get(x_340, 0); -lean::inc(x_352); -x_353 = lean::cnstr_get(x_340, 1); -lean::inc(x_353); -x_354 = lean::cnstr_get(x_340, 2); -lean::inc(x_354); -x_355 = lean::cnstr_get(x_340, 3); -lean::inc(x_355); -if (lean::is_exclusive(x_340)) { - lean::cnstr_release(x_340, 0); - lean::cnstr_release(x_340, 1); - lean::cnstr_release(x_340, 2); - lean::cnstr_release(x_340, 3); - x_356 = x_340; -} else { - lean::dec_ref(x_340); - x_356 = lean::box(0); -} -x_357 = 1; -if (lean::is_scalar(x_356)) { - x_358 = lean::alloc_cnstr(1, 4, 1); -} else { - x_358 = x_356; -} -lean::cnstr_set(x_358, 0, x_325); -lean::cnstr_set(x_358, 1, x_326); -lean::cnstr_set(x_358, 2, x_327); -lean::cnstr_set(x_358, 3, x_339); -lean::cnstr_set_scalar(x_358, sizeof(void*)*4, x_357); -if (lean::is_scalar(x_351)) { - x_359 = lean::alloc_cnstr(1, 4, 1); -} else { - x_359 = x_351; -} -lean::cnstr_set(x_359, 0, x_352); -lean::cnstr_set(x_359, 1, x_353); -lean::cnstr_set(x_359, 2, x_354); -lean::cnstr_set(x_359, 3, x_355); -lean::cnstr_set_scalar(x_359, sizeof(void*)*4, x_357); -x_360 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_360, 0, x_358); -lean::cnstr_set(x_360, 1, x_349); -lean::cnstr_set(x_360, 2, x_350); -lean::cnstr_set(x_360, 3, x_359); -lean::cnstr_set_scalar(x_360, sizeof(void*)*4, x_348); -return x_360; -} -else -{ -obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; -x_361 = lean::cnstr_get(x_338, 1); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_338, 2); -lean::inc(x_362); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_363 = x_338; -} else { - lean::dec_ref(x_338); - x_363 = lean::box(0); -} -x_364 = 0; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_339); -lean::cnstr_set(x_365, 1, x_361); -lean::cnstr_set(x_365, 2, x_362); -lean::cnstr_set(x_365, 3, x_340); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -x_366 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_366, 0, x_325); -lean::cnstr_set(x_366, 1, x_326); -lean::cnstr_set(x_366, 2, x_327); -lean::cnstr_set(x_366, 3, x_365); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_348); -return x_366; -} -} -} -else -{ -uint8 x_367; -x_367 = lean::cnstr_get_scalar(x_339, sizeof(void*)*4); -if (x_367 == 0) -{ -obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_372; obj* x_373; obj* x_374; obj* x_375; obj* x_376; uint8 x_377; obj* x_378; obj* x_379; obj* x_380; -x_368 = lean::cnstr_get(x_338, 1); -lean::inc(x_368); -x_369 = lean::cnstr_get(x_338, 2); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_338, 3); -lean::inc(x_370); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_371 = x_338; -} else { - lean::dec_ref(x_338); - x_371 = lean::box(0); -} -x_372 = lean::cnstr_get(x_339, 0); -lean::inc(x_372); -x_373 = lean::cnstr_get(x_339, 1); -lean::inc(x_373); -x_374 = lean::cnstr_get(x_339, 2); -lean::inc(x_374); -x_375 = lean::cnstr_get(x_339, 3); -lean::inc(x_375); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_376 = x_339; -} else { - lean::dec_ref(x_339); - x_376 = lean::box(0); -} -x_377 = 1; -if (lean::is_scalar(x_376)) { - x_378 = lean::alloc_cnstr(1, 4, 1); -} else { - x_378 = x_376; -} -lean::cnstr_set(x_378, 0, x_325); -lean::cnstr_set(x_378, 1, x_326); -lean::cnstr_set(x_378, 2, x_327); -lean::cnstr_set(x_378, 3, x_372); -lean::cnstr_set_scalar(x_378, sizeof(void*)*4, x_377); -if (lean::is_scalar(x_371)) { - x_379 = lean::alloc_cnstr(1, 4, 1); -} else { - x_379 = x_371; -} -lean::cnstr_set(x_379, 0, x_375); -lean::cnstr_set(x_379, 1, x_368); -lean::cnstr_set(x_379, 2, x_369); -lean::cnstr_set(x_379, 3, x_370); -lean::cnstr_set_scalar(x_379, sizeof(void*)*4, x_377); -x_380 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_380, 0, x_378); -lean::cnstr_set(x_380, 1, x_373); -lean::cnstr_set(x_380, 2, x_374); -lean::cnstr_set(x_380, 3, x_379); -lean::cnstr_set_scalar(x_380, sizeof(void*)*4, x_367); -return x_380; -} -else -{ -obj* x_381; -x_381 = lean::cnstr_get(x_338, 3); -lean::inc(x_381); -if (lean::obj_tag(x_381) == 0) -{ -obj* x_382; obj* x_383; obj* x_384; uint8 x_385; obj* x_386; obj* x_387; -x_382 = lean::cnstr_get(x_338, 1); -lean::inc(x_382); -x_383 = lean::cnstr_get(x_338, 2); -lean::inc(x_383); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_384 = x_338; -} else { - lean::dec_ref(x_338); - x_384 = lean::box(0); -} -x_385 = 0; -if (lean::is_scalar(x_384)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_384; -} -lean::cnstr_set(x_386, 0, x_339); -lean::cnstr_set(x_386, 1, x_382); -lean::cnstr_set(x_386, 2, x_383); -lean::cnstr_set(x_386, 3, x_381); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_385); -x_387 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_387, 0, x_325); -lean::cnstr_set(x_387, 1, x_326); -lean::cnstr_set(x_387, 2, x_327); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_367); -return x_387; -} -else -{ -uint8 x_388; -x_388 = lean::cnstr_get_scalar(x_381, sizeof(void*)*4); -if (x_388 == 0) -{ -obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; obj* x_397; obj* x_398; obj* x_399; obj* x_400; -x_389 = lean::cnstr_get(x_338, 1); -lean::inc(x_389); -x_390 = lean::cnstr_get(x_338, 2); -lean::inc(x_390); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_391 = x_338; -} else { - lean::dec_ref(x_338); - x_391 = lean::box(0); -} -x_392 = lean::cnstr_get(x_381, 0); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_381, 1); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_381, 2); -lean::inc(x_394); -x_395 = lean::cnstr_get(x_381, 3); -lean::inc(x_395); -if (lean::is_exclusive(x_381)) { - lean::cnstr_release(x_381, 0); - lean::cnstr_release(x_381, 1); - lean::cnstr_release(x_381, 2); - lean::cnstr_release(x_381, 3); - x_396 = x_381; -} else { - lean::dec_ref(x_381); - x_396 = lean::box(0); -} -lean::inc(x_339); -if (lean::is_scalar(x_396)) { - x_397 = lean::alloc_cnstr(1, 4, 1); -} else { - x_397 = x_396; -} -lean::cnstr_set(x_397, 0, x_325); -lean::cnstr_set(x_397, 1, x_326); -lean::cnstr_set(x_397, 2, x_327); -lean::cnstr_set(x_397, 3, x_339); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_398 = x_339; -} else { - lean::dec_ref(x_339); - x_398 = lean::box(0); -} -lean::cnstr_set_scalar(x_397, sizeof(void*)*4, x_367); -if (lean::is_scalar(x_398)) { - x_399 = lean::alloc_cnstr(1, 4, 1); -} else { - x_399 = x_398; -} -lean::cnstr_set(x_399, 0, x_392); -lean::cnstr_set(x_399, 1, x_393); -lean::cnstr_set(x_399, 2, x_394); -lean::cnstr_set(x_399, 3, x_395); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_367); -if (lean::is_scalar(x_391)) { - x_400 = lean::alloc_cnstr(1, 4, 1); -} else { - x_400 = x_391; -} -lean::cnstr_set(x_400, 0, x_397); -lean::cnstr_set(x_400, 1, x_389); -lean::cnstr_set(x_400, 2, x_390); -lean::cnstr_set(x_400, 3, x_399); -lean::cnstr_set_scalar(x_400, sizeof(void*)*4, x_388); -return x_400; -} -else -{ -obj* x_401; obj* x_402; obj* x_403; obj* x_404; obj* x_405; obj* x_406; obj* x_407; obj* x_408; obj* x_409; uint8 x_410; obj* x_411; obj* x_412; -x_401 = lean::cnstr_get(x_338, 1); -lean::inc(x_401); -x_402 = lean::cnstr_get(x_338, 2); -lean::inc(x_402); -if (lean::is_exclusive(x_338)) { - lean::cnstr_release(x_338, 0); - lean::cnstr_release(x_338, 1); - lean::cnstr_release(x_338, 2); - lean::cnstr_release(x_338, 3); - x_403 = x_338; -} else { - lean::dec_ref(x_338); - x_403 = lean::box(0); -} -x_404 = lean::cnstr_get(x_339, 0); -lean::inc(x_404); -x_405 = lean::cnstr_get(x_339, 1); -lean::inc(x_405); -x_406 = lean::cnstr_get(x_339, 2); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_339, 3); -lean::inc(x_407); -if (lean::is_exclusive(x_339)) { - lean::cnstr_release(x_339, 0); - lean::cnstr_release(x_339, 1); - lean::cnstr_release(x_339, 2); - lean::cnstr_release(x_339, 3); - x_408 = x_339; -} else { - lean::dec_ref(x_339); - x_408 = lean::box(0); -} -if (lean::is_scalar(x_408)) { - x_409 = lean::alloc_cnstr(1, 4, 1); -} else { - x_409 = x_408; -} -lean::cnstr_set(x_409, 0, x_404); -lean::cnstr_set(x_409, 1, x_405); -lean::cnstr_set(x_409, 2, x_406); -lean::cnstr_set(x_409, 3, x_407); -lean::cnstr_set_scalar(x_409, sizeof(void*)*4, x_388); -x_410 = 0; -if (lean::is_scalar(x_403)) { - x_411 = lean::alloc_cnstr(1, 4, 1); -} else { - x_411 = x_403; -} -lean::cnstr_set(x_411, 0, x_409); -lean::cnstr_set(x_411, 1, x_401); -lean::cnstr_set(x_411, 2, x_402); -lean::cnstr_set(x_411, 3, x_381); -lean::cnstr_set_scalar(x_411, sizeof(void*)*4, x_410); -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_325); -lean::cnstr_set(x_412, 1, x_326); -lean::cnstr_set(x_412, 2, x_327); -lean::cnstr_set(x_412, 3, x_411); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_388); -return x_412; -} -} -} -} -} -} -} -} -else -{ -uint8 x_413; -x_413 = l_RBNode_isRed___main___rarg(x_325); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; -x_414 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_325, x_2, x_3); -x_415 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_415, 0, x_414); -lean::cnstr_set(x_415, 1, x_326); -lean::cnstr_set(x_415, 2, x_327); -lean::cnstr_set(x_415, 3, x_328); -lean::cnstr_set_scalar(x_415, sizeof(void*)*4, x_7); -return x_415; -} -else -{ -obj* x_416; -x_416 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_325, x_2, x_3); -if (lean::obj_tag(x_416) == 0) -{ -lean::dec(x_328); -lean::dec(x_327); -lean::dec(x_326); -return x_416; -} -else -{ -obj* x_417; -x_417 = lean::cnstr_get(x_416, 0); -lean::inc(x_417); -if (lean::obj_tag(x_417) == 0) -{ -obj* x_418; -x_418 = lean::cnstr_get(x_416, 3); -lean::inc(x_418); -if (lean::obj_tag(x_418) == 0) -{ -obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; uint8 x_424; obj* x_425; -x_419 = lean::cnstr_get(x_416, 1); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_416, 2); -lean::inc(x_420); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_421 = x_416; -} else { - lean::dec_ref(x_416); - x_421 = lean::box(0); -} -x_422 = 0; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_418); -lean::cnstr_set(x_423, 1, x_419); -lean::cnstr_set(x_423, 2, x_420); -lean::cnstr_set(x_423, 3, x_418); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -x_424 = 1; -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_326); -lean::cnstr_set(x_425, 2, x_327); -lean::cnstr_set(x_425, 3, x_328); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_424); -return x_425; -} -else -{ -uint8 x_426; -x_426 = lean::cnstr_get_scalar(x_418, sizeof(void*)*4); -if (x_426 == 0) -{ -obj* x_427; obj* x_428; obj* x_429; obj* x_430; obj* x_431; obj* x_432; obj* x_433; obj* x_434; uint8 x_435; obj* x_436; obj* x_437; obj* x_438; -x_427 = lean::cnstr_get(x_416, 1); -lean::inc(x_427); -x_428 = lean::cnstr_get(x_416, 2); -lean::inc(x_428); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_429 = x_416; -} else { - lean::dec_ref(x_416); - x_429 = lean::box(0); -} -x_430 = lean::cnstr_get(x_418, 0); -lean::inc(x_430); -x_431 = lean::cnstr_get(x_418, 1); -lean::inc(x_431); -x_432 = lean::cnstr_get(x_418, 2); -lean::inc(x_432); -x_433 = lean::cnstr_get(x_418, 3); -lean::inc(x_433); -if (lean::is_exclusive(x_418)) { - lean::cnstr_release(x_418, 0); - lean::cnstr_release(x_418, 1); - lean::cnstr_release(x_418, 2); - lean::cnstr_release(x_418, 3); - x_434 = x_418; -} else { - lean::dec_ref(x_418); - x_434 = lean::box(0); -} -x_435 = 1; -if (lean::is_scalar(x_434)) { - x_436 = lean::alloc_cnstr(1, 4, 1); -} else { - x_436 = x_434; -} -lean::cnstr_set(x_436, 0, x_417); -lean::cnstr_set(x_436, 1, x_427); -lean::cnstr_set(x_436, 2, x_428); -lean::cnstr_set(x_436, 3, x_430); -lean::cnstr_set_scalar(x_436, sizeof(void*)*4, x_435); -if (lean::is_scalar(x_429)) { - x_437 = lean::alloc_cnstr(1, 4, 1); -} else { - x_437 = x_429; -} -lean::cnstr_set(x_437, 0, x_433); -lean::cnstr_set(x_437, 1, x_326); -lean::cnstr_set(x_437, 2, x_327); -lean::cnstr_set(x_437, 3, x_328); -lean::cnstr_set_scalar(x_437, sizeof(void*)*4, x_435); -x_438 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_438, 0, x_436); -lean::cnstr_set(x_438, 1, x_431); -lean::cnstr_set(x_438, 2, x_432); -lean::cnstr_set(x_438, 3, x_437); -lean::cnstr_set_scalar(x_438, sizeof(void*)*4, x_426); -return x_438; -} -else -{ -obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; -x_439 = lean::cnstr_get(x_416, 1); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_416, 2); -lean::inc(x_440); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_441 = x_416; -} else { - lean::dec_ref(x_416); - x_441 = lean::box(0); -} -x_442 = 0; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_417); -lean::cnstr_set(x_443, 1, x_439); -lean::cnstr_set(x_443, 2, x_440); -lean::cnstr_set(x_443, 3, x_418); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -x_444 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_444, 0, x_443); -lean::cnstr_set(x_444, 1, x_326); -lean::cnstr_set(x_444, 2, x_327); -lean::cnstr_set(x_444, 3, x_328); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_426); -return x_444; -} -} -} -else -{ -uint8 x_445; -x_445 = lean::cnstr_get_scalar(x_417, sizeof(void*)*4); -if (x_445 == 0) -{ -obj* x_446; obj* x_447; obj* x_448; obj* x_449; obj* x_450; obj* x_451; obj* x_452; obj* x_453; obj* x_454; uint8 x_455; obj* x_456; obj* x_457; obj* x_458; -x_446 = lean::cnstr_get(x_416, 1); -lean::inc(x_446); -x_447 = lean::cnstr_get(x_416, 2); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_416, 3); -lean::inc(x_448); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_449 = x_416; -} else { - lean::dec_ref(x_416); - x_449 = lean::box(0); -} -x_450 = lean::cnstr_get(x_417, 0); -lean::inc(x_450); -x_451 = lean::cnstr_get(x_417, 1); -lean::inc(x_451); -x_452 = lean::cnstr_get(x_417, 2); -lean::inc(x_452); -x_453 = lean::cnstr_get(x_417, 3); -lean::inc(x_453); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_454 = x_417; -} else { - lean::dec_ref(x_417); - x_454 = lean::box(0); -} -x_455 = 1; -if (lean::is_scalar(x_454)) { - x_456 = lean::alloc_cnstr(1, 4, 1); -} else { - x_456 = x_454; -} -lean::cnstr_set(x_456, 0, x_450); -lean::cnstr_set(x_456, 1, x_451); -lean::cnstr_set(x_456, 2, x_452); -lean::cnstr_set(x_456, 3, x_453); -lean::cnstr_set_scalar(x_456, sizeof(void*)*4, x_455); -if (lean::is_scalar(x_449)) { - x_457 = lean::alloc_cnstr(1, 4, 1); -} else { - x_457 = x_449; -} -lean::cnstr_set(x_457, 0, x_448); -lean::cnstr_set(x_457, 1, x_326); -lean::cnstr_set(x_457, 2, x_327); -lean::cnstr_set(x_457, 3, x_328); -lean::cnstr_set_scalar(x_457, sizeof(void*)*4, x_455); -x_458 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_458, 0, x_456); -lean::cnstr_set(x_458, 1, x_446); -lean::cnstr_set(x_458, 2, x_447); -lean::cnstr_set(x_458, 3, x_457); -lean::cnstr_set_scalar(x_458, sizeof(void*)*4, x_445); -return x_458; -} -else -{ -obj* x_459; -x_459 = lean::cnstr_get(x_416, 3); -lean::inc(x_459); -if (lean::obj_tag(x_459) == 0) -{ -obj* x_460; obj* x_461; obj* x_462; uint8 x_463; obj* x_464; obj* x_465; -x_460 = lean::cnstr_get(x_416, 1); -lean::inc(x_460); -x_461 = lean::cnstr_get(x_416, 2); -lean::inc(x_461); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_462 = x_416; -} else { - lean::dec_ref(x_416); - x_462 = lean::box(0); -} -x_463 = 0; -if (lean::is_scalar(x_462)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_462; -} -lean::cnstr_set(x_464, 0, x_417); -lean::cnstr_set(x_464, 1, x_460); -lean::cnstr_set(x_464, 2, x_461); -lean::cnstr_set(x_464, 3, x_459); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_463); -x_465 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_465, 0, x_464); -lean::cnstr_set(x_465, 1, x_326); -lean::cnstr_set(x_465, 2, x_327); -lean::cnstr_set(x_465, 3, x_328); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_445); -return x_465; -} -else -{ -uint8 x_466; -x_466 = lean::cnstr_get_scalar(x_459, sizeof(void*)*4); -if (x_466 == 0) -{ -obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; obj* x_475; obj* x_476; obj* x_477; obj* x_478; -x_467 = lean::cnstr_get(x_416, 1); -lean::inc(x_467); -x_468 = lean::cnstr_get(x_416, 2); -lean::inc(x_468); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_469 = x_416; -} else { - lean::dec_ref(x_416); - x_469 = lean::box(0); -} -x_470 = lean::cnstr_get(x_459, 0); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_459, 1); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_459, 2); -lean::inc(x_472); -x_473 = lean::cnstr_get(x_459, 3); -lean::inc(x_473); -if (lean::is_exclusive(x_459)) { - lean::cnstr_release(x_459, 0); - lean::cnstr_release(x_459, 1); - lean::cnstr_release(x_459, 2); - lean::cnstr_release(x_459, 3); - x_474 = x_459; -} else { - lean::dec_ref(x_459); - x_474 = lean::box(0); -} -lean::inc(x_417); -if (lean::is_scalar(x_474)) { - x_475 = lean::alloc_cnstr(1, 4, 1); -} else { - x_475 = x_474; -} -lean::cnstr_set(x_475, 0, x_417); -lean::cnstr_set(x_475, 1, x_467); -lean::cnstr_set(x_475, 2, x_468); -lean::cnstr_set(x_475, 3, x_470); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_476 = x_417; -} else { - lean::dec_ref(x_417); - x_476 = lean::box(0); -} -lean::cnstr_set_scalar(x_475, sizeof(void*)*4, x_445); -if (lean::is_scalar(x_476)) { - x_477 = lean::alloc_cnstr(1, 4, 1); -} else { - x_477 = x_476; -} -lean::cnstr_set(x_477, 0, x_473); -lean::cnstr_set(x_477, 1, x_326); -lean::cnstr_set(x_477, 2, x_327); -lean::cnstr_set(x_477, 3, x_328); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_445); -if (lean::is_scalar(x_469)) { - x_478 = lean::alloc_cnstr(1, 4, 1); -} else { - x_478 = x_469; -} -lean::cnstr_set(x_478, 0, x_475); -lean::cnstr_set(x_478, 1, x_471); -lean::cnstr_set(x_478, 2, x_472); -lean::cnstr_set(x_478, 3, x_477); -lean::cnstr_set_scalar(x_478, sizeof(void*)*4, x_466); -return x_478; -} -else -{ -obj* x_479; obj* x_480; obj* x_481; obj* x_482; obj* x_483; obj* x_484; obj* x_485; obj* x_486; obj* x_487; uint8 x_488; obj* x_489; obj* x_490; -x_479 = lean::cnstr_get(x_416, 1); -lean::inc(x_479); -x_480 = lean::cnstr_get(x_416, 2); -lean::inc(x_480); -if (lean::is_exclusive(x_416)) { - lean::cnstr_release(x_416, 0); - lean::cnstr_release(x_416, 1); - lean::cnstr_release(x_416, 2); - lean::cnstr_release(x_416, 3); - x_481 = x_416; -} else { - lean::dec_ref(x_416); - x_481 = lean::box(0); -} -x_482 = lean::cnstr_get(x_417, 0); -lean::inc(x_482); -x_483 = lean::cnstr_get(x_417, 1); -lean::inc(x_483); -x_484 = lean::cnstr_get(x_417, 2); -lean::inc(x_484); -x_485 = lean::cnstr_get(x_417, 3); -lean::inc(x_485); -if (lean::is_exclusive(x_417)) { - lean::cnstr_release(x_417, 0); - lean::cnstr_release(x_417, 1); - lean::cnstr_release(x_417, 2); - lean::cnstr_release(x_417, 3); - x_486 = x_417; -} else { - lean::dec_ref(x_417); - x_486 = lean::box(0); -} -if (lean::is_scalar(x_486)) { - x_487 = lean::alloc_cnstr(1, 4, 1); -} else { - x_487 = x_486; -} -lean::cnstr_set(x_487, 0, x_482); -lean::cnstr_set(x_487, 1, x_483); -lean::cnstr_set(x_487, 2, x_484); -lean::cnstr_set(x_487, 3, x_485); -lean::cnstr_set_scalar(x_487, sizeof(void*)*4, x_466); -x_488 = 0; -if (lean::is_scalar(x_481)) { - x_489 = lean::alloc_cnstr(1, 4, 1); -} else { - x_489 = x_481; -} -lean::cnstr_set(x_489, 0, x_487); -lean::cnstr_set(x_489, 1, x_479); -lean::cnstr_set(x_489, 2, x_480); -lean::cnstr_set(x_489, 3, x_459); -lean::cnstr_set_scalar(x_489, sizeof(void*)*4, x_488); -x_490 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_490, 0, x_489); -lean::cnstr_set(x_490, 1, x_326); -lean::cnstr_set(x_490, 2, x_327); -lean::cnstr_set(x_490, 3, x_328); -lean::cnstr_set_scalar(x_490, sizeof(void*)*4, x_466); -return x_490; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5___rarg(obj* x_1, uint32 x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_RBNode_isRed___main___rarg(x_1); -if (x_4 == 0) -{ -obj* x_5; -x_5 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_1, x_2, x_3); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_1, x_2, x_3); -x_7 = l_RBNode_setBlack___main___rarg(x_6); -return x_7; -} -} -} -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_2__insertAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint8 x_5; -x_5 = !lean::is_exclusive(x_3); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::cnstr_get(x_3, 0); -x_7 = lean::cnstr_get(x_3, 1); -x_8 = lean::string_utf8_at_end(x_1, x_4); -if (x_8 == 0) -{ -uint32 x_9; obj* x_10; obj* x_11; -x_9 = lean::string_utf8_get(x_1, x_4); -x_10 = lean::string_utf8_next(x_1, x_4); -lean::inc(x_7); -x_11 = l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1___rarg(x_7, x_9); -if (lean::obj_tag(x_11) == 0) -{ -obj* x_12; obj* x_13; -x_12 = l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg(x_1, x_2, x_10); -lean::dec(x_10); -x_13 = l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2___rarg(x_7, x_9, x_12); -lean::cnstr_set(x_3, 1, x_13); -return x_3; -} -else -{ -obj* x_14; obj* x_15; obj* x_16; -x_14 = lean::cnstr_get(x_11, 0); -lean::inc(x_14); -lean::dec(x_11); -x_15 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_1, x_2, x_14, x_10); -lean::dec(x_10); -x_16 = l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5___rarg(x_7, x_9, x_15); -lean::cnstr_set(x_3, 1, x_16); -return x_3; -} -} -else -{ -obj* x_17; -lean::dec(x_6); -x_17 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_17, 0, x_2); -lean::cnstr_set(x_3, 0, x_17); -return x_3; -} -} -else -{ -obj* x_18; obj* x_19; uint8 x_20; -x_18 = lean::cnstr_get(x_3, 0); -x_19 = lean::cnstr_get(x_3, 1); -lean::inc(x_19); -lean::inc(x_18); -lean::dec(x_3); -x_20 = lean::string_utf8_at_end(x_1, x_4); -if (x_20 == 0) -{ -uint32 x_21; obj* x_22; obj* x_23; -x_21 = lean::string_utf8_get(x_1, x_4); -x_22 = lean::string_utf8_next(x_1, x_4); -lean::inc(x_19); -x_23 = l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1___rarg(x_19, x_21); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_24; obj* x_25; obj* x_26; -x_24 = l___private_init_lean_parser_trie_1__insertEmptyAux___main___rarg(x_1, x_2, x_22); -lean::dec(x_22); -x_25 = l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2___rarg(x_19, x_21, x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_18); -lean::cnstr_set(x_26, 1, x_25); -return x_26; -} -else -{ -obj* x_27; obj* x_28; obj* x_29; obj* x_30; -x_27 = lean::cnstr_get(x_23, 0); -lean::inc(x_27); -lean::dec(x_23); -x_28 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_1, x_2, x_27, x_22); -lean::dec(x_22); -x_29 = l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5___rarg(x_19, x_21, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_18); -lean::cnstr_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -obj* x_31; obj* x_32; -lean::dec(x_18); -x_31 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_31, 0, x_2); -x_32 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_19); -return x_32; -} -} -} -} -obj* l___private_init_lean_parser_trie_2__insertAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_2__insertAux___main___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_RBNode_find___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__1___rarg(x_1, x_3); -return x_4; -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_5 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__3___rarg(x_1, x_4, x_3); -return x_5; -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_5 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__4___rarg(x_1, x_4, x_3); -return x_5; -} -} -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_5 = l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__2___rarg(x_1, x_4, x_3); -return x_5; -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_5 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__6___rarg(x_1, x_4, x_3); -return x_5; -} -} -obj* l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_5 = l_RBNode_ins___main___at___private_init_lean_parser_trie_2__insertAux___main___spec__7___rarg(x_1, x_4, x_3); -return x_5; -} -} -obj* l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_5 = l_RBNode_insert___at___private_init_lean_parser_trie_2__insertAux___main___spec__5___rarg(x_1, x_4, x_3); -return x_5; -} -} -obj* l___private_init_lean_parser_trie_2__insertAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l___private_init_lean_parser_trie_2__insertAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l___private_init_lean_parser_trie_2__insertAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_2__insertAux___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_2__insertAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_trie_2__insertAux___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_Trie_insert___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = l___private_init_lean_parser_trie_2__insertAux___main___rarg(x_2, x_3, x_1, x_4); -return x_5; -} -} -obj* l_Lean_Parser_Trie_insert(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Trie_insert___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_Trie_insert___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Trie_insert___rarg(x_1, x_2, x_3); -lean::dec(x_2); -return x_4; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1___rarg(obj* x_1, uint32 x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint32 x_8; uint8 x_9; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 2); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 3); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::unbox_uint32(x_5); -x_9 = x_2 < x_8; -if (x_9 == 0) -{ -uint32 x_10; uint8 x_11; -lean::dec(x_4); -x_10 = lean::unbox_uint32(x_5); -lean::dec(x_5); -x_11 = x_10 < x_2; -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_6); -return x_12; -} -else -{ -lean::dec(x_6); -x_1 = x_7; -goto _start; -} -} -else -{ -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_3__findAux___main___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; uint8 x_6; -x_4 = lean::cnstr_get(x_2, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 1); -lean::inc(x_5); -lean::dec(x_2); -x_6 = lean::string_utf8_at_end(x_1, x_3); -if (x_6 == 0) -{ -uint32 x_7; obj* x_8; obj* x_9; -lean::dec(x_4); -x_7 = lean::string_utf8_get(x_1, x_3); -x_8 = lean::string_utf8_next(x_1, x_3); -lean::dec(x_3); -x_9 = l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1___rarg(x_5, x_7); -if (lean::obj_tag(x_9) == 0) -{ -obj* x_10; -lean::dec(x_8); -x_10 = lean::box(0); -return x_10; -} -else -{ -obj* x_11; -x_11 = lean::cnstr_get(x_9, 0); -lean::inc(x_11); -lean::dec(x_9); -x_2 = x_11; -x_3 = x_8; -goto _start; -} -} -else -{ -lean::dec(x_5); -lean::dec(x_3); -return x_4; -} -} -} -obj* l___private_init_lean_parser_trie_3__findAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_3__findAux___main___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_RBNode_find___main___at___private_init_lean_parser_trie_3__findAux___main___spec__1___rarg(x_1, x_3); -return x_4; -} -} -obj* l___private_init_lean_parser_trie_3__findAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_trie_3__findAux___main___rarg(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l___private_init_lean_parser_trie_3__findAux___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_trie_3__findAux___main___rarg(x_1, x_2, x_3); -return x_4; -} -} -obj* l___private_init_lean_parser_trie_3__findAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_3__findAux___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_3__findAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_trie_3__findAux___rarg(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_Parser_Trie_find___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = l___private_init_lean_parser_trie_3__findAux___main___rarg(x_2, x_1, x_3); -return x_4; -} -} -obj* l_Lean_Parser_Trie_find(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Trie_find___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l_Lean_Parser_Trie_find___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Parser_Trie_find___rarg(x_1, x_2); -lean::dec(x_2); -return x_3; -} -} -obj* l___private_init_lean_parser_trie_4__updtAcc___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -lean::dec(x_2); -lean::inc(x_3); -return x_3; -} -else -{ -obj* x_4; -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_2); -lean::cnstr_set(x_4, 1, x_1); -return x_4; -} -} -} -obj* l___private_init_lean_parser_trie_4__updtAcc(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_4__updtAcc___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_4__updtAcc___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_parser_trie_4__updtAcc___rarg(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1___rarg(obj* x_1, uint32 x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint32 x_8; uint8 x_9; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 2); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 3); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::unbox_uint32(x_5); -x_9 = x_2 < x_8; -if (x_9 == 0) -{ -uint32 x_10; uint8 x_11; -lean::dec(x_4); -x_10 = lean::unbox_uint32(x_5); -lean::dec(x_5); -x_11 = x_10 < x_2; -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_6); -return x_12; -} -else -{ -lean::dec(x_6); -x_1 = x_7; -goto _start; -} -} -else -{ -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; uint8 x_7; -x_5 = lean::cnstr_get(x_2, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_2, 1); -lean::inc(x_6); -lean::dec(x_2); -x_7 = lean::string_utf8_at_end(x_1, x_3); -if (x_7 == 0) -{ -obj* x_8; uint32 x_9; obj* x_10; obj* x_11; -lean::inc(x_3); -x_8 = l___private_init_lean_parser_trie_4__updtAcc___rarg(x_5, x_3, x_4); -lean::dec(x_4); -x_9 = lean::string_utf8_get(x_1, x_3); -x_10 = lean::string_utf8_next(x_1, x_3); -lean::dec(x_3); -x_11 = l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1___rarg(x_6, x_9); -if (lean::obj_tag(x_11) == 0) -{ -lean::dec(x_10); -return x_8; -} -else -{ -obj* x_12; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -lean::dec(x_11); -x_2 = x_12; -x_3 = x_10; -x_4 = x_8; -goto _start; -} -} -else -{ -obj* x_14; -lean::dec(x_6); -x_14 = l___private_init_lean_parser_trie_4__updtAcc___rarg(x_5, x_3, x_4); -lean::dec(x_4); -return x_14; -} -} -} -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_5__matchPrefixAux___main___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_RBNode_find___main___at___private_init_lean_parser_trie_5__matchPrefixAux___main___spec__1___rarg(x_1, x_3); -return x_4; -} -} -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___main___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_trie_5__matchPrefixAux___main___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_trie_5__matchPrefixAux___main___rarg(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l___private_init_lean_parser_trie_5__matchPrefixAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_5__matchPrefixAux___rarg___boxed), 4, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_5__matchPrefixAux___rarg___boxed(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_trie_5__matchPrefixAux___rarg(x_1, x_2, x_3, x_4); -lean::dec(x_1); -return x_5; -} -} -obj* l_Lean_Parser_Trie_matchPrefix___rarg(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_6; -x_4 = lean::box(0); -lean::inc(x_3); -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___private_init_lean_parser_trie_5__matchPrefixAux___main___rarg(x_1, x_2, x_3, x_5); -return x_6; -} -} -obj* l_Lean_Parser_Trie_matchPrefix(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Trie_matchPrefix___rarg___boxed), 3, 0); -return x_2; -} -} -obj* l_Lean_Parser_Trie_matchPrefix___rarg___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_Lean_Parser_Trie_matchPrefix___rarg(x_1, x_2, x_3); -lean::dec(x_1); -return x_4; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1___rarg(obj* x_1, uint32 x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint32 x_8; uint8 x_9; -x_4 = lean::cnstr_get(x_1, 0); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_1, 1); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_1, 2); -lean::inc(x_6); -x_7 = lean::cnstr_get(x_1, 3); -lean::inc(x_7); -lean::dec(x_1); -x_8 = lean::unbox_uint32(x_5); -x_9 = x_2 < x_8; -if (x_9 == 0) -{ -uint32 x_10; uint8 x_11; -lean::dec(x_4); -x_10 = lean::unbox_uint32(x_5); -lean::dec(x_5); -x_11 = x_10 < x_2; -if (x_11 == 0) -{ -obj* x_12; -lean::dec(x_7); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_6); -return x_12; -} -else -{ -lean::dec(x_6); -x_1 = x_7; -goto _start; -} -} -else -{ -lean::dec(x_7); -lean::dec(x_6); -lean::dec(x_5); -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1___rarg___boxed), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; uint8 x_6; -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::nat_dec_eq(x_1, x_5); -if (x_6 == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; uint32 x_11; obj* x_12; -x_7 = lean::mk_nat_obj(1u); -x_8 = lean::nat_sub(x_1, x_7); -lean::dec(x_1); -x_9 = lean::cnstr_get(x_2, 0); -lean::inc(x_9); -x_10 = lean::cnstr_get(x_2, 1); -lean::inc(x_10); -lean::dec(x_2); -x_11 = l_String_OldIterator_curr___main(x_3); -x_12 = l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1___rarg(x_10, x_11); -if (lean::obj_tag(x_9) == 0) -{ -if (lean::obj_tag(x_12) == 0) -{ -lean::dec(x_8); -lean::dec(x_3); -return x_4; -} -else -{ -obj* x_13; obj* x_14; -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -lean::dec(x_12); -x_14 = l_String_OldIterator_next___main(x_3); -x_1 = x_8; -x_2 = x_13; -x_3 = x_14; -goto _start; -} -} -else -{ -uint8 x_16; -lean::dec(x_4); -x_16 = !lean::is_exclusive(x_9); -if (x_16 == 0) -{ -obj* x_17; obj* x_18; -x_17 = lean::cnstr_get(x_9, 0); -lean::inc(x_3); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_3); -lean::cnstr_set(x_18, 1, x_17); -lean::cnstr_set(x_9, 0, x_18); -if (lean::obj_tag(x_12) == 0) -{ -lean::dec(x_8); -lean::dec(x_3); -return x_9; -} -else -{ -obj* x_19; obj* x_20; -x_19 = lean::cnstr_get(x_12, 0); -lean::inc(x_19); -lean::dec(x_12); -x_20 = l_String_OldIterator_next___main(x_3); -x_1 = x_8; -x_2 = x_19; -x_3 = x_20; -x_4 = x_9; -goto _start; -} -} -else -{ -obj* x_22; obj* x_23; obj* x_24; -x_22 = lean::cnstr_get(x_9, 0); -lean::inc(x_22); -lean::dec(x_9); -lean::inc(x_3); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_3); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -if (lean::obj_tag(x_12) == 0) -{ -lean::dec(x_8); -lean::dec(x_3); -return x_24; -} -else -{ -obj* x_25; obj* x_26; -x_25 = lean::cnstr_get(x_12, 0); -lean::inc(x_25); -lean::dec(x_12); -x_26 = l_String_OldIterator_next___main(x_3); -x_1 = x_8; -x_2 = x_25; -x_3 = x_26; -x_4 = x_24; -goto _start; -} -} -} -} -else -{ -obj* x_28; -lean::dec(x_1); -x_28 = lean::cnstr_get(x_2, 0); -lean::inc(x_28); -lean::dec(x_2); -if (lean::obj_tag(x_28) == 0) -{ -lean::dec(x_3); -return x_4; -} -else -{ -uint8 x_29; -lean::dec(x_4); -x_29 = !lean::is_exclusive(x_28); -if (x_29 == 0) -{ -obj* x_30; obj* x_31; -x_30 = lean::cnstr_get(x_28, 0); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_3); -lean::cnstr_set(x_31, 1, x_30); -lean::cnstr_set(x_28, 0, x_31); -return x_28; -} -else -{ -obj* x_32; obj* x_33; obj* x_34; -x_32 = lean::cnstr_get(x_28, 0); -lean::inc(x_32); -lean::dec(x_28); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_3); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_34, 0, x_33); -return x_34; -} -} -} -} -} -obj* l___private_init_lean_parser_trie_6__oldMatchPrefixAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___rarg), 4, 0); -return x_2; -} -} -obj* l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1___rarg___boxed(obj* x_1, obj* x_2) { -_start: -{ -uint32 x_3; obj* x_4; -x_3 = lean::unbox_uint32(x_2); -lean::dec(x_2); -x_4 = l_RBNode_find___main___at___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___spec__1___rarg(x_1, x_3); -return x_4; -} -} -obj* l___private_init_lean_parser_trie_6__oldMatchPrefixAux___rarg(obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; -x_5 = l___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___rarg(x_1, x_2, x_3, x_4); -return x_5; -} -} -obj* l___private_init_lean_parser_trie_6__oldMatchPrefixAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_6__oldMatchPrefixAux___rarg), 4, 0); -return x_2; -} -} -obj* l_Lean_Parser_Trie_oldMatchPrefix___rarg(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; obj* x_5; -x_3 = l_String_OldIterator_remaining___main(x_2); -x_4 = lean::box(0); -x_5 = l___private_init_lean_parser_trie_6__oldMatchPrefixAux___main___rarg(x_3, x_1, x_2, x_4); -return x_5; -} -} -obj* l_Lean_Parser_Trie_oldMatchPrefix(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Trie_oldMatchPrefix___rarg), 2, 0); -return x_2; -} -} -obj* l_Lean_Format_joinSep___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__1(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_3; -lean::dec(x_2); -x_3 = lean::box(0); -return x_3; -} -else -{ -obj* x_4; -x_4 = lean::cnstr_get(x_1, 1); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; -lean::dec(x_2); -x_5 = lean::cnstr_get(x_1, 0); -lean::inc(x_5); -return x_5; -} -else -{ -obj* x_6; uint8 x_7; obj* x_8; obj* x_9; obj* x_10; -x_6 = lean::cnstr_get(x_1, 0); -x_7 = 0; -lean::inc(x_2); -lean::inc(x_6); -x_8 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set_scalar(x_8, sizeof(void*)*2, x_7); -x_9 = l_Lean_Format_joinSep___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__1(x_4, x_2); -x_10 = lean::alloc_cnstr(4, 2, 1); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -lean::cnstr_set_scalar(x_10, sizeof(void*)*2, x_7); -return x_10; -} -} -} -} -obj* l_RBNode_fold___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__2___rarg(obj* x_1, obj* x_2) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -return x_1; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint32 x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; -x_3 = lean::cnstr_get(x_2, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_2, 1); -lean::inc(x_4); -x_5 = lean::cnstr_get(x_2, 2); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_2, 3); -lean::inc(x_6); -lean::dec(x_2); -x_7 = l_RBNode_fold___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__2___rarg(x_1, x_3); -x_8 = lean::unbox_uint32(x_4); -lean::dec(x_4); -x_9 = l_Char_quoteCore(x_8); -x_10 = l_Char_HasRepr___closed__1; -x_11 = lean::string_append(x_10, x_9); -lean::dec(x_9); -x_12 = lean::string_append(x_11, x_10); -x_13 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_14 = l___private_init_lean_parser_trie_7__toStringAux___main___rarg(x_5); -x_15 = lean::box(1); -x_16 = l_Lean_Format_joinSep___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__1(x_14, x_15); -lean::dec(x_14); -x_17 = lean::mk_nat_obj(2u); -x_18 = lean::alloc_cnstr(3, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_16); -x_19 = l_Lean_Format_group___main(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_7); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_13); -lean::cnstr_set(x_21, 1, x_20); -x_1 = x_21; -x_2 = x_6; -goto _start; -} -} -} -obj* l_RBNode_fold___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__2(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_RBNode_fold___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__2___rarg), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_7__toStringAux___main___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -x_2 = lean::cnstr_get(x_1, 1); -lean::inc(x_2); -lean::dec(x_1); -x_3 = lean::box(0); -x_4 = l_RBNode_fold___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__2___rarg(x_3, x_2); -return x_4; -} -} -obj* l___private_init_lean_parser_trie_7__toStringAux___main(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_7__toStringAux___main___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Format_joinSep___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__1___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_Format_joinSep___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__1(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} -obj* l___private_init_lean_parser_trie_7__toStringAux___rarg(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = l___private_init_lean_parser_trie_7__toStringAux___main___rarg(x_1); -return x_2; -} -} -obj* l___private_init_lean_parser_trie_7__toStringAux(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l___private_init_lean_parser_trie_7__toStringAux___rarg), 1, 0); -return x_2; -} -} -obj* l_Lean_Parser_Trie_HasToString___rarg(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_2 = l___private_init_lean_parser_trie_7__toStringAux___main___rarg(x_1); -x_3 = lean::box(1); -x_4 = l_Lean_Format_joinSep___main___at___private_init_lean_parser_trie_7__toStringAux___main___spec__1(x_2, x_3); -lean::dec(x_2); -x_5 = l_Lean_Options_empty; -x_6 = l_Lean_Format_pretty(x_4, x_5); -return x_6; -} -} -obj* l_Lean_Parser_Trie_HasToString(obj* x_1) { -_start: -{ -obj* x_2; -x_2 = lean::alloc_closure(reinterpret_cast(l_Lean_Parser_Trie_HasToString___rarg), 1, 0); -return x_2; -} -} -obj* initialize_init_data_rbmap_default(obj*); -obj* initialize_init_lean_format(obj*); -obj* initialize_init_lean_parser_parsec(obj*); -static bool _G_initialized = false; -obj* initialize_init_lean_parser_trie(obj* w) { -if (_G_initialized) return w; -_G_initialized = true; -if (io_result_is_error(w)) return w; -w = initialize_init_data_rbmap_default(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_format(w); -if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_parsec(w); -if (io_result_is_error(w)) return w; -l_Lean_Parser_Trie_empty___closed__1 = _init_l_Lean_Parser_Trie_empty___closed__1(); -lean::mark_persistent(l_Lean_Parser_Trie_empty___closed__1); -l_Lean_Parser_Trie_HasEmptyc___closed__1 = _init_l_Lean_Parser_Trie_HasEmptyc___closed__1(); -lean::mark_persistent(l_Lean_Parser_Trie_HasEmptyc___closed__1); -return w; -} diff --git a/src/stage0/init/lean/position.cpp b/src/stage0/init/lean/position.cpp index 63a9156ec5..d1323e9df7 100644 --- a/src/stage0/init/lean/position.cpp +++ b/src/stage0/init/lean/position.cpp @@ -1,6 +1,6 @@ // Lean compiler output // Module: init.lean.position -// Imports: init.data.nat.default init.data.rbmap.default init.lean.format init.lean.parser.parsec +// Imports: init.data.nat.default init.data.rbmap.default init.lean.format #include "runtime/object.h" #include "runtime/apply.h" typedef lean::object obj; typedef lean::usize usize; @@ -14,57 +14,27 @@ 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_RBNode_setBlack___main___rarg(obj*); uint8 l_Lean_Position_lt(obj*, obj*); -namespace lean { -obj* nat_sub(obj*, obj*); -} obj* l_Lean_Position_DecidableEq___boxed(obj*, obj*); obj* l_Lean_Position_Lean_HasFormat(obj*); -uint32 l_String_OldIterator_curr___main(obj*); -obj* l___private_init_lean_position_1__fromStringAux___main___boxed(obj*, obj*, obj*); obj* l_Lean_Position_Lean_HasFormat___closed__1; obj* l_Nat_decEq___boxed(obj*, obj*); obj* l_Lean_Position_Inhabited; -obj* l_RBNode_lowerBound___main___at_Lean_FileMap_toPosition___spec__1___boxed(obj*, obj*, obj*); obj* l_Lean_Position_lt___boxed(obj*, obj*); obj* l_Lean_Position_lt___main___boxed(obj*, obj*); obj* l_Nat_repr(obj*); -obj* l_String_OldIterator_next___main(obj*); obj* l_Lean_Position_Lean_HasFormat___closed__2; -namespace lean { -uint8 nat_dec_lt(obj*, obj*); -} -obj* l_RBNode_insert___at_Lean_FileMap_fromString___spec__2(obj*, obj*, obj*); obj* l_Lean_Position_lt___main___closed__1; -obj* l___private_init_lean_position_1__fromStringAux___boxed(obj*, obj*, obj*); -uint8 l_String_OldIterator_hasNext___main(obj*); -namespace lean { -obj* nat_add(obj*, obj*); -} -obj* l_RBNode_lowerBound___main___at_Lean_FileMap_toPosition___spec__1(obj*, obj*, obj*); namespace lean { uint8 nat_dec_eq(obj*, obj*); } -obj* l_RBMap_ofList___main___at_Lean_FileMap_fromString___spec__1(obj*); -uint8 l_RBNode_isRed___main___rarg(obj*); -obj* l___private_init_lean_position_1__fromStringAux(obj*, obj*, obj*); -obj* l___private_init_lean_position_1__fromStringAux___main(obj*, obj*, obj*); -uint8 l_UInt32_decEq(uint32, uint32); uint8 l_Lean_Position_DecidableEq(obj*, obj*); obj* l_Lean_Position_lt___main___closed__2; obj* l_Nat_decLt___boxed(obj*, obj*); extern obj* l_Lean_formatKVMap___closed__1; uint8 l_Lean_Position_lt___main(obj*, obj*); -obj* l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(obj*, obj*, obj*); obj* l_Lean_fmt___at_Lean_Position_Lean_HasFormat___spec__1(obj*); uint8 l_prodHasDecidableLt___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_Lean_FileMap_toPosition(obj*, obj*); -obj* l_Lean_FileMap_fromString(obj*); -obj* l_Lean_FileMap_toPosition___boxed(obj*, obj*); -namespace lean { -obj* string_length(obj*); -} uint8 l_Lean_Position_DecidableEq(obj* x_1, obj* x_2) { _start: { @@ -256,2706 +226,9 @@ lean::cnstr_set(x_3, 1, x_2); return x_3; } } -obj* l___private_init_lean_position_1__fromStringAux___main(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; uint8 x_5; -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::nat_dec_eq(x_1, x_4); -if (x_5 == 0) -{ -obj* x_6; obj* x_7; uint8 x_8; -x_6 = lean::mk_nat_obj(1u); -x_7 = lean::nat_sub(x_1, x_6); -lean::dec(x_1); -x_8 = l_String_OldIterator_hasNext___main(x_2); -if (x_8 == 0) -{ -obj* x_9; -lean::dec(x_7); -lean::dec(x_2); -x_9 = lean::box(0); -return x_9; -} -else -{ -uint32 x_10; uint32 x_11; uint8 x_12; -x_10 = l_String_OldIterator_curr___main(x_2); -x_11 = 10; -x_12 = x_10 == x_11; -if (x_12 == 0) -{ -obj* x_13; -x_13 = l_String_OldIterator_next___main(x_2); -x_1 = x_7; -x_2 = x_13; -goto _start; -} -else -{ -obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; -x_15 = l_String_OldIterator_next___main(x_2); -x_16 = lean::cnstr_get(x_15, 1); -lean::inc(x_16); -x_17 = lean::nat_add(x_3, x_6); -lean::inc(x_17); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l___private_init_lean_position_1__fromStringAux___main(x_7, x_15, x_17); -lean::dec(x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_19); -return x_20; -} -} -} -else -{ -obj* x_21; -lean::dec(x_2); -lean::dec(x_1); -x_21 = lean::box(0); -return x_21; -} -} -} -obj* l___private_init_lean_position_1__fromStringAux___main___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_position_1__fromStringAux___main(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l___private_init_lean_position_1__fromStringAux(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_position_1__fromStringAux___main(x_1, x_2, x_3); -return x_4; -} -} -obj* l___private_init_lean_position_1__fromStringAux___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l___private_init_lean_position_1__fromStringAux(x_1, x_2, x_3); -lean::dec(x_3); -return x_4; -} -} -obj* l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -uint8 x_4; obj* x_5; -x_4 = 0; -x_5 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_3); -lean::cnstr_set(x_5, 3, x_1); -lean::cnstr_set_scalar(x_5, sizeof(void*)*4, x_4); -return x_5; -} -else -{ -uint8 x_6; -x_6 = lean::cnstr_get_scalar(x_1, sizeof(void*)*4); -if (x_6 == 0) -{ -uint8 x_7; -x_7 = !lean::is_exclusive(x_1); -if (x_7 == 0) -{ -obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; -x_8 = lean::cnstr_get(x_1, 0); -x_9 = lean::cnstr_get(x_1, 1); -x_10 = lean::cnstr_get(x_1, 2); -x_11 = lean::cnstr_get(x_1, 3); -x_12 = lean::nat_dec_lt(x_2, x_9); -if (x_12 == 0) -{ -uint8 x_13; -x_13 = lean::nat_dec_lt(x_9, x_2); -if (x_13 == 0) -{ -lean::dec(x_10); -lean::dec(x_9); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -obj* x_14; -x_14 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_11, x_2, x_3); -lean::cnstr_set(x_1, 3, x_14); -return x_1; -} -} -else -{ -obj* x_15; -x_15 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_8, x_2, x_3); -lean::cnstr_set(x_1, 0, x_15); -return x_1; -} -} -else -{ -obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; -x_16 = lean::cnstr_get(x_1, 0); -x_17 = lean::cnstr_get(x_1, 1); -x_18 = lean::cnstr_get(x_1, 2); -x_19 = lean::cnstr_get(x_1, 3); -lean::inc(x_19); -lean::inc(x_18); -lean::inc(x_17); -lean::inc(x_16); -lean::dec(x_1); -x_20 = lean::nat_dec_lt(x_2, x_17); -if (x_20 == 0) -{ -uint8 x_21; -x_21 = lean::nat_dec_lt(x_17, x_2); -if (x_21 == 0) -{ -obj* x_22; -lean::dec(x_18); -lean::dec(x_17); -x_22 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_22, 0, x_16); -lean::cnstr_set(x_22, 1, x_2); -lean::cnstr_set(x_22, 2, x_3); -lean::cnstr_set(x_22, 3, x_19); -lean::cnstr_set_scalar(x_22, sizeof(void*)*4, x_6); -return x_22; -} -else -{ -obj* x_23; obj* x_24; -x_23 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_19, x_2, x_3); -x_24 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_24, 0, x_16); -lean::cnstr_set(x_24, 1, x_17); -lean::cnstr_set(x_24, 2, x_18); -lean::cnstr_set(x_24, 3, x_23); -lean::cnstr_set_scalar(x_24, sizeof(void*)*4, x_6); -return x_24; -} -} -else -{ -obj* x_25; obj* x_26; -x_25 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_16, x_2, x_3); -x_26 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_17); -lean::cnstr_set(x_26, 2, x_18); -lean::cnstr_set(x_26, 3, x_19); -lean::cnstr_set_scalar(x_26, sizeof(void*)*4, x_6); -return x_26; -} -} -} -else -{ -uint8 x_27; -x_27 = !lean::is_exclusive(x_1); -if (x_27 == 0) -{ -obj* x_28; obj* x_29; obj* x_30; obj* x_31; uint8 x_32; -x_28 = lean::cnstr_get(x_1, 0); -x_29 = lean::cnstr_get(x_1, 1); -x_30 = lean::cnstr_get(x_1, 2); -x_31 = lean::cnstr_get(x_1, 3); -x_32 = lean::nat_dec_lt(x_2, x_29); -if (x_32 == 0) -{ -uint8 x_33; -x_33 = lean::nat_dec_lt(x_29, x_2); -if (x_33 == 0) -{ -lean::dec(x_30); -lean::dec(x_29); -lean::cnstr_set(x_1, 2, x_3); -lean::cnstr_set(x_1, 1, x_2); -return x_1; -} -else -{ -uint8 x_34; -x_34 = l_RBNode_isRed___main___rarg(x_31); -if (x_34 == 0) -{ -obj* x_35; -x_35 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_31, x_2, x_3); -lean::cnstr_set(x_1, 3, x_35); -return x_1; -} -else -{ -obj* x_36; -x_36 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_31, x_2, x_3); -if (lean::obj_tag(x_36) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_30); -lean::dec(x_29); -lean::dec(x_28); -return x_36; -} -else -{ -obj* x_37; -x_37 = lean::cnstr_get(x_36, 0); -lean::inc(x_37); -if (lean::obj_tag(x_37) == 0) -{ -obj* x_38; -x_38 = lean::cnstr_get(x_36, 3); -lean::inc(x_38); -if (lean::obj_tag(x_38) == 0) -{ -uint8 x_39; -x_39 = !lean::is_exclusive(x_36); -if (x_39 == 0) -{ -obj* x_40; obj* x_41; uint8 x_42; uint8 x_43; -x_40 = lean::cnstr_get(x_36, 3); -lean::dec(x_40); -x_41 = lean::cnstr_get(x_36, 0); -lean::dec(x_41); -x_42 = 0; -lean::cnstr_set(x_36, 0, x_38); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_42); -x_43 = 1; -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_43); -return x_1; -} -else -{ -obj* x_44; obj* x_45; uint8 x_46; obj* x_47; uint8 x_48; -x_44 = lean::cnstr_get(x_36, 1); -x_45 = lean::cnstr_get(x_36, 2); -lean::inc(x_45); -lean::inc(x_44); -lean::dec(x_36); -x_46 = 0; -x_47 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_47, 0, x_38); -lean::cnstr_set(x_47, 1, x_44); -lean::cnstr_set(x_47, 2, x_45); -lean::cnstr_set(x_47, 3, x_38); -lean::cnstr_set_scalar(x_47, sizeof(void*)*4, x_46); -x_48 = 1; -lean::cnstr_set(x_1, 3, x_47); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_48); -return x_1; -} -} -else -{ -uint8 x_49; -x_49 = lean::cnstr_get_scalar(x_38, sizeof(void*)*4); -if (x_49 == 0) -{ -uint8 x_50; -x_50 = !lean::is_exclusive(x_36); -if (x_50 == 0) -{ -obj* x_51; obj* x_52; obj* x_53; obj* x_54; uint8 x_55; -x_51 = lean::cnstr_get(x_36, 1); -x_52 = lean::cnstr_get(x_36, 2); -x_53 = lean::cnstr_get(x_36, 3); -lean::dec(x_53); -x_54 = lean::cnstr_get(x_36, 0); -lean::dec(x_54); -x_55 = !lean::is_exclusive(x_38); -if (x_55 == 0) -{ -obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; -x_56 = lean::cnstr_get(x_38, 0); -x_57 = lean::cnstr_get(x_38, 1); -x_58 = lean::cnstr_get(x_38, 2); -x_59 = lean::cnstr_get(x_38, 3); -x_60 = 1; -lean::cnstr_set(x_38, 3, x_37); -lean::cnstr_set(x_38, 2, x_30); -lean::cnstr_set(x_38, 1, x_29); -lean::cnstr_set(x_38, 0, x_28); -lean::cnstr_set_scalar(x_38, sizeof(void*)*4, x_60); -lean::cnstr_set(x_36, 3, x_59); -lean::cnstr_set(x_36, 2, x_58); -lean::cnstr_set(x_36, 1, x_57); -lean::cnstr_set(x_36, 0, x_56); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_60); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_38); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_61; obj* x_62; obj* x_63; obj* x_64; uint8 x_65; obj* x_66; -x_61 = lean::cnstr_get(x_38, 0); -x_62 = lean::cnstr_get(x_38, 1); -x_63 = lean::cnstr_get(x_38, 2); -x_64 = lean::cnstr_get(x_38, 3); -lean::inc(x_64); -lean::inc(x_63); -lean::inc(x_62); -lean::inc(x_61); -lean::dec(x_38); -x_65 = 1; -x_66 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_66, 0, x_28); -lean::cnstr_set(x_66, 1, x_29); -lean::cnstr_set(x_66, 2, x_30); -lean::cnstr_set(x_66, 3, x_37); -lean::cnstr_set_scalar(x_66, sizeof(void*)*4, x_65); -lean::cnstr_set(x_36, 3, x_64); -lean::cnstr_set(x_36, 2, x_63); -lean::cnstr_set(x_36, 1, x_62); -lean::cnstr_set(x_36, 0, x_61); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_65); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_52); -lean::cnstr_set(x_1, 1, x_51); -lean::cnstr_set(x_1, 0, x_66); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; obj* x_75; obj* x_76; -x_67 = lean::cnstr_get(x_36, 1); -x_68 = lean::cnstr_get(x_36, 2); -lean::inc(x_68); -lean::inc(x_67); -lean::dec(x_36); -x_69 = lean::cnstr_get(x_38, 0); -lean::inc(x_69); -x_70 = lean::cnstr_get(x_38, 1); -lean::inc(x_70); -x_71 = lean::cnstr_get(x_38, 2); -lean::inc(x_71); -x_72 = lean::cnstr_get(x_38, 3); -lean::inc(x_72); -if (lean::is_exclusive(x_38)) { - lean::cnstr_release(x_38, 0); - lean::cnstr_release(x_38, 1); - lean::cnstr_release(x_38, 2); - lean::cnstr_release(x_38, 3); - x_73 = x_38; -} else { - lean::dec_ref(x_38); - x_73 = lean::box(0); -} -x_74 = 1; -if (lean::is_scalar(x_73)) { - x_75 = lean::alloc_cnstr(1, 4, 1); -} else { - x_75 = x_73; -} -lean::cnstr_set(x_75, 0, x_28); -lean::cnstr_set(x_75, 1, x_29); -lean::cnstr_set(x_75, 2, x_30); -lean::cnstr_set(x_75, 3, x_37); -lean::cnstr_set_scalar(x_75, sizeof(void*)*4, x_74); -x_76 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_76, 0, x_69); -lean::cnstr_set(x_76, 1, x_70); -lean::cnstr_set(x_76, 2, x_71); -lean::cnstr_set(x_76, 3, x_72); -lean::cnstr_set_scalar(x_76, sizeof(void*)*4, x_74); -lean::cnstr_set(x_1, 3, x_76); -lean::cnstr_set(x_1, 2, x_68); -lean::cnstr_set(x_1, 1, x_67); -lean::cnstr_set(x_1, 0, x_75); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -else -{ -uint8 x_77; -x_77 = !lean::is_exclusive(x_36); -if (x_77 == 0) -{ -obj* x_78; obj* x_79; uint8 x_80; -x_78 = lean::cnstr_get(x_36, 3); -lean::dec(x_78); -x_79 = lean::cnstr_get(x_36, 0); -lean::dec(x_79); -x_80 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_80); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -else -{ -obj* x_81; obj* x_82; uint8 x_83; obj* x_84; -x_81 = lean::cnstr_get(x_36, 1); -x_82 = lean::cnstr_get(x_36, 2); -lean::inc(x_82); -lean::inc(x_81); -lean::dec(x_36); -x_83 = 0; -x_84 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_84, 0, x_37); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_82); -lean::cnstr_set(x_84, 3, x_38); -lean::cnstr_set_scalar(x_84, sizeof(void*)*4, x_83); -lean::cnstr_set(x_1, 3, x_84); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_49); -return x_1; -} -} -} -} -else -{ -uint8 x_85; -x_85 = lean::cnstr_get_scalar(x_37, sizeof(void*)*4); -if (x_85 == 0) -{ -uint8 x_86; -x_86 = !lean::is_exclusive(x_36); -if (x_86 == 0) -{ -obj* x_87; uint8 x_88; -x_87 = lean::cnstr_get(x_36, 0); -lean::dec(x_87); -x_88 = !lean::is_exclusive(x_37); -if (x_88 == 0) -{ -obj* x_89; obj* x_90; obj* x_91; obj* x_92; uint8 x_93; -x_89 = lean::cnstr_get(x_37, 0); -x_90 = lean::cnstr_get(x_37, 1); -x_91 = lean::cnstr_get(x_37, 2); -x_92 = lean::cnstr_get(x_37, 3); -x_93 = 1; -lean::cnstr_set(x_37, 3, x_89); -lean::cnstr_set(x_37, 2, x_30); -lean::cnstr_set(x_37, 1, x_29); -lean::cnstr_set(x_37, 0, x_28); -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_93); -lean::cnstr_set(x_36, 0, x_92); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_93); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_91); -lean::cnstr_set(x_1, 1, x_90); -lean::cnstr_set(x_1, 0, x_37); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_94; obj* x_95; obj* x_96; obj* x_97; uint8 x_98; obj* x_99; -x_94 = lean::cnstr_get(x_37, 0); -x_95 = lean::cnstr_get(x_37, 1); -x_96 = lean::cnstr_get(x_37, 2); -x_97 = lean::cnstr_get(x_37, 3); -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::dec(x_37); -x_98 = 1; -x_99 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_29); -lean::cnstr_set(x_99, 2, x_30); -lean::cnstr_set(x_99, 3, x_94); -lean::cnstr_set_scalar(x_99, sizeof(void*)*4, x_98); -lean::cnstr_set(x_36, 0, x_97); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_98); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set(x_1, 2, x_96); -lean::cnstr_set(x_1, 1, x_95); -lean::cnstr_set(x_1, 0, x_99); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; uint8 x_108; obj* x_109; obj* x_110; -x_100 = lean::cnstr_get(x_36, 1); -x_101 = lean::cnstr_get(x_36, 2); -x_102 = lean::cnstr_get(x_36, 3); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); -lean::dec(x_36); -x_103 = lean::cnstr_get(x_37, 0); -lean::inc(x_103); -x_104 = lean::cnstr_get(x_37, 1); -lean::inc(x_104); -x_105 = lean::cnstr_get(x_37, 2); -lean::inc(x_105); -x_106 = lean::cnstr_get(x_37, 3); -lean::inc(x_106); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_107 = x_37; -} else { - lean::dec_ref(x_37); - x_107 = lean::box(0); -} -x_108 = 1; -if (lean::is_scalar(x_107)) { - x_109 = lean::alloc_cnstr(1, 4, 1); -} else { - x_109 = x_107; -} -lean::cnstr_set(x_109, 0, x_28); -lean::cnstr_set(x_109, 1, x_29); -lean::cnstr_set(x_109, 2, x_30); -lean::cnstr_set(x_109, 3, x_103); -lean::cnstr_set_scalar(x_109, sizeof(void*)*4, x_108); -x_110 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_110, 0, x_106); -lean::cnstr_set(x_110, 1, x_100); -lean::cnstr_set(x_110, 2, x_101); -lean::cnstr_set(x_110, 3, x_102); -lean::cnstr_set_scalar(x_110, sizeof(void*)*4, x_108); -lean::cnstr_set(x_1, 3, x_110); -lean::cnstr_set(x_1, 2, x_105); -lean::cnstr_set(x_1, 1, x_104); -lean::cnstr_set(x_1, 0, x_109); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -obj* x_111; -x_111 = lean::cnstr_get(x_36, 3); -lean::inc(x_111); -if (lean::obj_tag(x_111) == 0) -{ -uint8 x_112; -x_112 = !lean::is_exclusive(x_36); -if (x_112 == 0) -{ -obj* x_113; obj* x_114; uint8 x_115; -x_113 = lean::cnstr_get(x_36, 3); -lean::dec(x_113); -x_114 = lean::cnstr_get(x_36, 0); -lean::dec(x_114); -x_115 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_115); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -else -{ -obj* x_116; obj* x_117; uint8 x_118; obj* x_119; -x_116 = lean::cnstr_get(x_36, 1); -x_117 = lean::cnstr_get(x_36, 2); -lean::inc(x_117); -lean::inc(x_116); -lean::dec(x_36); -x_118 = 0; -x_119 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_119, 0, x_37); -lean::cnstr_set(x_119, 1, x_116); -lean::cnstr_set(x_119, 2, x_117); -lean::cnstr_set(x_119, 3, x_111); -lean::cnstr_set_scalar(x_119, sizeof(void*)*4, x_118); -lean::cnstr_set(x_1, 3, x_119); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_85); -return x_1; -} -} -else -{ -uint8 x_120; -x_120 = lean::cnstr_get_scalar(x_111, sizeof(void*)*4); -if (x_120 == 0) -{ -uint8 x_121; -lean::free_heap_obj(x_1); -x_121 = !lean::is_exclusive(x_36); -if (x_121 == 0) -{ -obj* x_122; obj* x_123; uint8 x_124; -x_122 = lean::cnstr_get(x_36, 3); -lean::dec(x_122); -x_123 = lean::cnstr_get(x_36, 0); -lean::dec(x_123); -x_124 = !lean::is_exclusive(x_111); -if (x_124 == 0) -{ -obj* x_125; obj* x_126; obj* x_127; obj* x_128; uint8 x_129; -x_125 = lean::cnstr_get(x_111, 0); -x_126 = lean::cnstr_get(x_111, 1); -x_127 = lean::cnstr_get(x_111, 2); -x_128 = lean::cnstr_get(x_111, 3); -lean::inc(x_37); -lean::cnstr_set(x_111, 3, x_37); -lean::cnstr_set(x_111, 2, x_30); -lean::cnstr_set(x_111, 1, x_29); -lean::cnstr_set(x_111, 0, x_28); -x_129 = !lean::is_exclusive(x_37); -if (x_129 == 0) -{ -obj* x_130; obj* x_131; obj* x_132; obj* x_133; -x_130 = lean::cnstr_get(x_37, 3); -lean::dec(x_130); -x_131 = lean::cnstr_get(x_37, 2); -lean::dec(x_131); -x_132 = lean::cnstr_get(x_37, 1); -lean::dec(x_132); -x_133 = lean::cnstr_get(x_37, 0); -lean::dec(x_133); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -lean::cnstr_set(x_37, 3, x_128); -lean::cnstr_set(x_37, 2, x_127); -lean::cnstr_set(x_37, 1, x_126); -lean::cnstr_set(x_37, 0, x_125); -lean::cnstr_set(x_36, 3, x_37); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -else -{ -obj* x_134; -lean::dec(x_37); -lean::cnstr_set_scalar(x_111, sizeof(void*)*4, x_85); -x_134 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_134, 0, x_125); -lean::cnstr_set(x_134, 1, x_126); -lean::cnstr_set(x_134, 2, x_127); -lean::cnstr_set(x_134, 3, x_128); -lean::cnstr_set_scalar(x_134, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_134); -lean::cnstr_set(x_36, 0, x_111); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; -x_135 = lean::cnstr_get(x_111, 0); -x_136 = lean::cnstr_get(x_111, 1); -x_137 = lean::cnstr_get(x_111, 2); -x_138 = lean::cnstr_get(x_111, 3); -lean::inc(x_138); -lean::inc(x_137); -lean::inc(x_136); -lean::inc(x_135); -lean::dec(x_111); -lean::inc(x_37); -x_139 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_139, 0, x_28); -lean::cnstr_set(x_139, 1, x_29); -lean::cnstr_set(x_139, 2, x_30); -lean::cnstr_set(x_139, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_140 = x_37; -} else { - lean::dec_ref(x_37); - x_140 = lean::box(0); -} -lean::cnstr_set_scalar(x_139, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_140)) { - x_141 = lean::alloc_cnstr(1, 4, 1); -} else { - x_141 = x_140; -} -lean::cnstr_set(x_141, 0, x_135); -lean::cnstr_set(x_141, 1, x_136); -lean::cnstr_set(x_141, 2, x_137); -lean::cnstr_set(x_141, 3, x_138); -lean::cnstr_set_scalar(x_141, sizeof(void*)*4, x_85); -lean::cnstr_set(x_36, 3, x_141); -lean::cnstr_set(x_36, 0, x_139); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_120); -return x_36; -} -} -else -{ -obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; -x_142 = lean::cnstr_get(x_36, 1); -x_143 = lean::cnstr_get(x_36, 2); -lean::inc(x_143); -lean::inc(x_142); -lean::dec(x_36); -x_144 = lean::cnstr_get(x_111, 0); -lean::inc(x_144); -x_145 = lean::cnstr_get(x_111, 1); -lean::inc(x_145); -x_146 = lean::cnstr_get(x_111, 2); -lean::inc(x_146); -x_147 = lean::cnstr_get(x_111, 3); -lean::inc(x_147); -if (lean::is_exclusive(x_111)) { - lean::cnstr_release(x_111, 0); - lean::cnstr_release(x_111, 1); - lean::cnstr_release(x_111, 2); - lean::cnstr_release(x_111, 3); - x_148 = x_111; -} else { - lean::dec_ref(x_111); - x_148 = lean::box(0); -} -lean::inc(x_37); -if (lean::is_scalar(x_148)) { - x_149 = lean::alloc_cnstr(1, 4, 1); -} else { - x_149 = x_148; -} -lean::cnstr_set(x_149, 0, x_28); -lean::cnstr_set(x_149, 1, x_29); -lean::cnstr_set(x_149, 2, x_30); -lean::cnstr_set(x_149, 3, x_37); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_150 = x_37; -} else { - lean::dec_ref(x_37); - x_150 = lean::box(0); -} -lean::cnstr_set_scalar(x_149, sizeof(void*)*4, x_85); -if (lean::is_scalar(x_150)) { - x_151 = lean::alloc_cnstr(1, 4, 1); -} else { - x_151 = x_150; -} -lean::cnstr_set(x_151, 0, x_144); -lean::cnstr_set(x_151, 1, x_145); -lean::cnstr_set(x_151, 2, x_146); -lean::cnstr_set(x_151, 3, x_147); -lean::cnstr_set_scalar(x_151, sizeof(void*)*4, x_85); -x_152 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_152, 0, x_149); -lean::cnstr_set(x_152, 1, x_142); -lean::cnstr_set(x_152, 2, x_143); -lean::cnstr_set(x_152, 3, x_151); -lean::cnstr_set_scalar(x_152, sizeof(void*)*4, x_120); -return x_152; -} -} -else -{ -uint8 x_153; -x_153 = !lean::is_exclusive(x_36); -if (x_153 == 0) -{ -obj* x_154; obj* x_155; uint8 x_156; -x_154 = lean::cnstr_get(x_36, 3); -lean::dec(x_154); -x_155 = lean::cnstr_get(x_36, 0); -lean::dec(x_155); -x_156 = !lean::is_exclusive(x_37); -if (x_156 == 0) -{ -uint8 x_157; -lean::cnstr_set_scalar(x_37, sizeof(void*)*4, x_120); -x_157 = 0; -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_157); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -else -{ -obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; uint8 x_163; -x_158 = lean::cnstr_get(x_37, 0); -x_159 = lean::cnstr_get(x_37, 1); -x_160 = lean::cnstr_get(x_37, 2); -x_161 = lean::cnstr_get(x_37, 3); -lean::inc(x_161); -lean::inc(x_160); -lean::inc(x_159); -lean::inc(x_158); -lean::dec(x_37); -x_162 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_162, 0, x_158); -lean::cnstr_set(x_162, 1, x_159); -lean::cnstr_set(x_162, 2, x_160); -lean::cnstr_set(x_162, 3, x_161); -lean::cnstr_set_scalar(x_162, sizeof(void*)*4, x_120); -x_163 = 0; -lean::cnstr_set(x_36, 0, x_162); -lean::cnstr_set_scalar(x_36, sizeof(void*)*4, x_163); -lean::cnstr_set(x_1, 3, x_36); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -else -{ -obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; uint8 x_172; obj* x_173; -x_164 = lean::cnstr_get(x_36, 1); -x_165 = lean::cnstr_get(x_36, 2); -lean::inc(x_165); -lean::inc(x_164); -lean::dec(x_36); -x_166 = lean::cnstr_get(x_37, 0); -lean::inc(x_166); -x_167 = lean::cnstr_get(x_37, 1); -lean::inc(x_167); -x_168 = lean::cnstr_get(x_37, 2); -lean::inc(x_168); -x_169 = lean::cnstr_get(x_37, 3); -lean::inc(x_169); -if (lean::is_exclusive(x_37)) { - lean::cnstr_release(x_37, 0); - lean::cnstr_release(x_37, 1); - lean::cnstr_release(x_37, 2); - lean::cnstr_release(x_37, 3); - x_170 = x_37; -} else { - lean::dec_ref(x_37); - x_170 = lean::box(0); -} -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(1, 4, 1); -} else { - x_171 = x_170; -} -lean::cnstr_set(x_171, 0, x_166); -lean::cnstr_set(x_171, 1, x_167); -lean::cnstr_set(x_171, 2, x_168); -lean::cnstr_set(x_171, 3, x_169); -lean::cnstr_set_scalar(x_171, sizeof(void*)*4, x_120); -x_172 = 0; -x_173 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_173, 0, x_171); -lean::cnstr_set(x_173, 1, x_164); -lean::cnstr_set(x_173, 2, x_165); -lean::cnstr_set(x_173, 3, x_111); -lean::cnstr_set_scalar(x_173, sizeof(void*)*4, x_172); -lean::cnstr_set(x_1, 3, x_173); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_120); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -uint8 x_174; -x_174 = l_RBNode_isRed___main___rarg(x_28); -if (x_174 == 0) -{ -obj* x_175; -x_175 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_28, x_2, x_3); -lean::cnstr_set(x_1, 0, x_175); -return x_1; -} -else -{ -obj* x_176; -x_176 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_28, x_2, x_3); -if (lean::obj_tag(x_176) == 0) -{ -lean::free_heap_obj(x_1); -lean::dec(x_31); -lean::dec(x_30); -lean::dec(x_29); -return x_176; -} -else -{ -obj* x_177; -x_177 = lean::cnstr_get(x_176, 0); -lean::inc(x_177); -if (lean::obj_tag(x_177) == 0) -{ -obj* x_178; -x_178 = lean::cnstr_get(x_176, 3); -lean::inc(x_178); -if (lean::obj_tag(x_178) == 0) -{ -uint8 x_179; -x_179 = !lean::is_exclusive(x_176); -if (x_179 == 0) -{ -obj* x_180; obj* x_181; uint8 x_182; uint8 x_183; -x_180 = lean::cnstr_get(x_176, 3); -lean::dec(x_180); -x_181 = lean::cnstr_get(x_176, 0); -lean::dec(x_181); -x_182 = 0; -lean::cnstr_set(x_176, 0, x_178); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_182); -x_183 = 1; -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_183); -return x_1; -} -else -{ -obj* x_184; obj* x_185; uint8 x_186; obj* x_187; uint8 x_188; -x_184 = lean::cnstr_get(x_176, 1); -x_185 = lean::cnstr_get(x_176, 2); -lean::inc(x_185); -lean::inc(x_184); -lean::dec(x_176); -x_186 = 0; -x_187 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_187, 0, x_178); -lean::cnstr_set(x_187, 1, x_184); -lean::cnstr_set(x_187, 2, x_185); -lean::cnstr_set(x_187, 3, x_178); -lean::cnstr_set_scalar(x_187, sizeof(void*)*4, x_186); -x_188 = 1; -lean::cnstr_set(x_1, 0, x_187); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_188); -return x_1; -} -} -else -{ -uint8 x_189; -x_189 = lean::cnstr_get_scalar(x_178, sizeof(void*)*4); -if (x_189 == 0) -{ -uint8 x_190; -x_190 = !lean::is_exclusive(x_176); -if (x_190 == 0) -{ -obj* x_191; obj* x_192; obj* x_193; obj* x_194; uint8 x_195; -x_191 = lean::cnstr_get(x_176, 1); -x_192 = lean::cnstr_get(x_176, 2); -x_193 = lean::cnstr_get(x_176, 3); -lean::dec(x_193); -x_194 = lean::cnstr_get(x_176, 0); -lean::dec(x_194); -x_195 = !lean::is_exclusive(x_178); -if (x_195 == 0) -{ -obj* x_196; obj* x_197; obj* x_198; obj* x_199; uint8 x_200; -x_196 = lean::cnstr_get(x_178, 0); -x_197 = lean::cnstr_get(x_178, 1); -x_198 = lean::cnstr_get(x_178, 2); -x_199 = lean::cnstr_get(x_178, 3); -x_200 = 1; -lean::cnstr_set(x_178, 3, x_196); -lean::cnstr_set(x_178, 2, x_192); -lean::cnstr_set(x_178, 1, x_191); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set_scalar(x_178, sizeof(void*)*4, x_200); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_199); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_200); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_198); -lean::cnstr_set(x_1, 1, x_197); -lean::cnstr_set(x_1, 0, x_178); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_201; obj* x_202; obj* x_203; obj* x_204; uint8 x_205; obj* x_206; -x_201 = lean::cnstr_get(x_178, 0); -x_202 = lean::cnstr_get(x_178, 1); -x_203 = lean::cnstr_get(x_178, 2); -x_204 = lean::cnstr_get(x_178, 3); -lean::inc(x_204); -lean::inc(x_203); -lean::inc(x_202); -lean::inc(x_201); -lean::dec(x_178); -x_205 = 1; -x_206 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_206, 0, x_177); -lean::cnstr_set(x_206, 1, x_191); -lean::cnstr_set(x_206, 2, x_192); -lean::cnstr_set(x_206, 3, x_201); -lean::cnstr_set_scalar(x_206, sizeof(void*)*4, x_205); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_204); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_205); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_203); -lean::cnstr_set(x_1, 1, x_202); -lean::cnstr_set(x_1, 0, x_206); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; uint8 x_214; obj* x_215; obj* x_216; -x_207 = lean::cnstr_get(x_176, 1); -x_208 = lean::cnstr_get(x_176, 2); -lean::inc(x_208); -lean::inc(x_207); -lean::dec(x_176); -x_209 = lean::cnstr_get(x_178, 0); -lean::inc(x_209); -x_210 = lean::cnstr_get(x_178, 1); -lean::inc(x_210); -x_211 = lean::cnstr_get(x_178, 2); -lean::inc(x_211); -x_212 = lean::cnstr_get(x_178, 3); -lean::inc(x_212); -if (lean::is_exclusive(x_178)) { - lean::cnstr_release(x_178, 0); - lean::cnstr_release(x_178, 1); - lean::cnstr_release(x_178, 2); - lean::cnstr_release(x_178, 3); - x_213 = x_178; -} else { - lean::dec_ref(x_178); - x_213 = lean::box(0); -} -x_214 = 1; -if (lean::is_scalar(x_213)) { - x_215 = lean::alloc_cnstr(1, 4, 1); -} else { - x_215 = x_213; -} -lean::cnstr_set(x_215, 0, x_177); -lean::cnstr_set(x_215, 1, x_207); -lean::cnstr_set(x_215, 2, x_208); -lean::cnstr_set(x_215, 3, x_209); -lean::cnstr_set_scalar(x_215, sizeof(void*)*4, x_214); -x_216 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_216, 0, x_212); -lean::cnstr_set(x_216, 1, x_29); -lean::cnstr_set(x_216, 2, x_30); -lean::cnstr_set(x_216, 3, x_31); -lean::cnstr_set_scalar(x_216, sizeof(void*)*4, x_214); -lean::cnstr_set(x_1, 3, x_216); -lean::cnstr_set(x_1, 2, x_211); -lean::cnstr_set(x_1, 1, x_210); -lean::cnstr_set(x_1, 0, x_215); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -else -{ -uint8 x_217; -x_217 = !lean::is_exclusive(x_176); -if (x_217 == 0) -{ -obj* x_218; obj* x_219; uint8 x_220; -x_218 = lean::cnstr_get(x_176, 3); -lean::dec(x_218); -x_219 = lean::cnstr_get(x_176, 0); -lean::dec(x_219); -x_220 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_220); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -else -{ -obj* x_221; obj* x_222; uint8 x_223; obj* x_224; -x_221 = lean::cnstr_get(x_176, 1); -x_222 = lean::cnstr_get(x_176, 2); -lean::inc(x_222); -lean::inc(x_221); -lean::dec(x_176); -x_223 = 0; -x_224 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_224, 0, x_177); -lean::cnstr_set(x_224, 1, x_221); -lean::cnstr_set(x_224, 2, x_222); -lean::cnstr_set(x_224, 3, x_178); -lean::cnstr_set_scalar(x_224, sizeof(void*)*4, x_223); -lean::cnstr_set(x_1, 0, x_224); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_189); -return x_1; -} -} -} -} -else -{ -uint8 x_225; -x_225 = lean::cnstr_get_scalar(x_177, sizeof(void*)*4); -if (x_225 == 0) -{ -uint8 x_226; -x_226 = !lean::is_exclusive(x_176); -if (x_226 == 0) -{ -obj* x_227; obj* x_228; obj* x_229; obj* x_230; uint8 x_231; -x_227 = lean::cnstr_get(x_176, 1); -x_228 = lean::cnstr_get(x_176, 2); -x_229 = lean::cnstr_get(x_176, 3); -x_230 = lean::cnstr_get(x_176, 0); -lean::dec(x_230); -x_231 = !lean::is_exclusive(x_177); -if (x_231 == 0) -{ -uint8 x_232; -x_232 = 1; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_232); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_232); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_177); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_233; obj* x_234; obj* x_235; obj* x_236; uint8 x_237; obj* x_238; -x_233 = lean::cnstr_get(x_177, 0); -x_234 = lean::cnstr_get(x_177, 1); -x_235 = lean::cnstr_get(x_177, 2); -x_236 = lean::cnstr_get(x_177, 3); -lean::inc(x_236); -lean::inc(x_235); -lean::inc(x_234); -lean::inc(x_233); -lean::dec(x_177); -x_237 = 1; -x_238 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_238, 0, x_233); -lean::cnstr_set(x_238, 1, x_234); -lean::cnstr_set(x_238, 2, x_235); -lean::cnstr_set(x_238, 3, x_236); -lean::cnstr_set_scalar(x_238, sizeof(void*)*4, x_237); -lean::cnstr_set(x_176, 3, x_31); -lean::cnstr_set(x_176, 2, x_30); -lean::cnstr_set(x_176, 1, x_29); -lean::cnstr_set(x_176, 0, x_229); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_237); -lean::cnstr_set(x_1, 3, x_176); -lean::cnstr_set(x_1, 2, x_228); -lean::cnstr_set(x_1, 1, x_227); -lean::cnstr_set(x_1, 0, x_238); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; uint8 x_247; obj* x_248; obj* x_249; -x_239 = lean::cnstr_get(x_176, 1); -x_240 = lean::cnstr_get(x_176, 2); -x_241 = lean::cnstr_get(x_176, 3); -lean::inc(x_241); -lean::inc(x_240); -lean::inc(x_239); -lean::dec(x_176); -x_242 = lean::cnstr_get(x_177, 0); -lean::inc(x_242); -x_243 = lean::cnstr_get(x_177, 1); -lean::inc(x_243); -x_244 = lean::cnstr_get(x_177, 2); -lean::inc(x_244); -x_245 = lean::cnstr_get(x_177, 3); -lean::inc(x_245); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_246 = x_177; -} else { - lean::dec_ref(x_177); - x_246 = lean::box(0); -} -x_247 = 1; -if (lean::is_scalar(x_246)) { - x_248 = lean::alloc_cnstr(1, 4, 1); -} else { - x_248 = x_246; -} -lean::cnstr_set(x_248, 0, x_242); -lean::cnstr_set(x_248, 1, x_243); -lean::cnstr_set(x_248, 2, x_244); -lean::cnstr_set(x_248, 3, x_245); -lean::cnstr_set_scalar(x_248, sizeof(void*)*4, x_247); -x_249 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_249, 0, x_241); -lean::cnstr_set(x_249, 1, x_29); -lean::cnstr_set(x_249, 2, x_30); -lean::cnstr_set(x_249, 3, x_31); -lean::cnstr_set_scalar(x_249, sizeof(void*)*4, x_247); -lean::cnstr_set(x_1, 3, x_249); -lean::cnstr_set(x_1, 2, x_240); -lean::cnstr_set(x_1, 1, x_239); -lean::cnstr_set(x_1, 0, x_248); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -obj* x_250; -x_250 = lean::cnstr_get(x_176, 3); -lean::inc(x_250); -if (lean::obj_tag(x_250) == 0) -{ -uint8 x_251; -x_251 = !lean::is_exclusive(x_176); -if (x_251 == 0) -{ -obj* x_252; obj* x_253; uint8 x_254; -x_252 = lean::cnstr_get(x_176, 3); -lean::dec(x_252); -x_253 = lean::cnstr_get(x_176, 0); -lean::dec(x_253); -x_254 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_254); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -else -{ -obj* x_255; obj* x_256; uint8 x_257; obj* x_258; -x_255 = lean::cnstr_get(x_176, 1); -x_256 = lean::cnstr_get(x_176, 2); -lean::inc(x_256); -lean::inc(x_255); -lean::dec(x_176); -x_257 = 0; -x_258 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_258, 0, x_177); -lean::cnstr_set(x_258, 1, x_255); -lean::cnstr_set(x_258, 2, x_256); -lean::cnstr_set(x_258, 3, x_250); -lean::cnstr_set_scalar(x_258, sizeof(void*)*4, x_257); -lean::cnstr_set(x_1, 0, x_258); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_225); -return x_1; -} -} -else -{ -uint8 x_259; -x_259 = lean::cnstr_get_scalar(x_250, sizeof(void*)*4); -if (x_259 == 0) -{ -uint8 x_260; -lean::free_heap_obj(x_1); -x_260 = !lean::is_exclusive(x_176); -if (x_260 == 0) -{ -obj* x_261; obj* x_262; obj* x_263; obj* x_264; uint8 x_265; -x_261 = lean::cnstr_get(x_176, 1); -x_262 = lean::cnstr_get(x_176, 2); -x_263 = lean::cnstr_get(x_176, 3); -lean::dec(x_263); -x_264 = lean::cnstr_get(x_176, 0); -lean::dec(x_264); -x_265 = !lean::is_exclusive(x_250); -if (x_265 == 0) -{ -obj* x_266; obj* x_267; obj* x_268; obj* x_269; uint8 x_270; -x_266 = lean::cnstr_get(x_250, 0); -x_267 = lean::cnstr_get(x_250, 1); -x_268 = lean::cnstr_get(x_250, 2); -x_269 = lean::cnstr_get(x_250, 3); -lean::inc(x_177); -lean::cnstr_set(x_250, 3, x_266); -lean::cnstr_set(x_250, 2, x_262); -lean::cnstr_set(x_250, 1, x_261); -lean::cnstr_set(x_250, 0, x_177); -x_270 = !lean::is_exclusive(x_177); -if (x_270 == 0) -{ -obj* x_271; obj* x_272; obj* x_273; obj* x_274; -x_271 = lean::cnstr_get(x_177, 3); -lean::dec(x_271); -x_272 = lean::cnstr_get(x_177, 2); -lean::dec(x_272); -x_273 = lean::cnstr_get(x_177, 1); -lean::dec(x_273); -x_274 = lean::cnstr_get(x_177, 0); -lean::dec(x_274); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -lean::cnstr_set(x_177, 3, x_31); -lean::cnstr_set(x_177, 2, x_30); -lean::cnstr_set(x_177, 1, x_29); -lean::cnstr_set(x_177, 0, x_269); -lean::cnstr_set(x_176, 3, x_177); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -else -{ -obj* x_275; -lean::dec(x_177); -lean::cnstr_set_scalar(x_250, sizeof(void*)*4, x_225); -x_275 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_275, 0, x_269); -lean::cnstr_set(x_275, 1, x_29); -lean::cnstr_set(x_275, 2, x_30); -lean::cnstr_set(x_275, 3, x_31); -lean::cnstr_set_scalar(x_275, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_275); -lean::cnstr_set(x_176, 2, x_268); -lean::cnstr_set(x_176, 1, x_267); -lean::cnstr_set(x_176, 0, x_250); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_276; obj* x_277; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -x_276 = lean::cnstr_get(x_250, 0); -x_277 = lean::cnstr_get(x_250, 1); -x_278 = lean::cnstr_get(x_250, 2); -x_279 = lean::cnstr_get(x_250, 3); -lean::inc(x_279); -lean::inc(x_278); -lean::inc(x_277); -lean::inc(x_276); -lean::dec(x_250); -lean::inc(x_177); -x_280 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_280, 0, x_177); -lean::cnstr_set(x_280, 1, x_261); -lean::cnstr_set(x_280, 2, x_262); -lean::cnstr_set(x_280, 3, x_276); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_281 = x_177; -} else { - lean::dec_ref(x_177); - x_281 = lean::box(0); -} -lean::cnstr_set_scalar(x_280, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_281)) { - x_282 = lean::alloc_cnstr(1, 4, 1); -} else { - x_282 = x_281; -} -lean::cnstr_set(x_282, 0, x_279); -lean::cnstr_set(x_282, 1, x_29); -lean::cnstr_set(x_282, 2, x_30); -lean::cnstr_set(x_282, 3, x_31); -lean::cnstr_set_scalar(x_282, sizeof(void*)*4, x_225); -lean::cnstr_set(x_176, 3, x_282); -lean::cnstr_set(x_176, 2, x_278); -lean::cnstr_set(x_176, 1, x_277); -lean::cnstr_set(x_176, 0, x_280); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_259); -return x_176; -} -} -else -{ -obj* x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; -x_283 = lean::cnstr_get(x_176, 1); -x_284 = lean::cnstr_get(x_176, 2); -lean::inc(x_284); -lean::inc(x_283); -lean::dec(x_176); -x_285 = lean::cnstr_get(x_250, 0); -lean::inc(x_285); -x_286 = lean::cnstr_get(x_250, 1); -lean::inc(x_286); -x_287 = lean::cnstr_get(x_250, 2); -lean::inc(x_287); -x_288 = lean::cnstr_get(x_250, 3); -lean::inc(x_288); -if (lean::is_exclusive(x_250)) { - lean::cnstr_release(x_250, 0); - lean::cnstr_release(x_250, 1); - lean::cnstr_release(x_250, 2); - lean::cnstr_release(x_250, 3); - x_289 = x_250; -} else { - lean::dec_ref(x_250); - x_289 = lean::box(0); -} -lean::inc(x_177); -if (lean::is_scalar(x_289)) { - x_290 = lean::alloc_cnstr(1, 4, 1); -} else { - x_290 = x_289; -} -lean::cnstr_set(x_290, 0, x_177); -lean::cnstr_set(x_290, 1, x_283); -lean::cnstr_set(x_290, 2, x_284); -lean::cnstr_set(x_290, 3, x_285); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_291 = x_177; -} else { - lean::dec_ref(x_177); - x_291 = lean::box(0); -} -lean::cnstr_set_scalar(x_290, sizeof(void*)*4, x_225); -if (lean::is_scalar(x_291)) { - x_292 = lean::alloc_cnstr(1, 4, 1); -} else { - x_292 = x_291; -} -lean::cnstr_set(x_292, 0, x_288); -lean::cnstr_set(x_292, 1, x_29); -lean::cnstr_set(x_292, 2, x_30); -lean::cnstr_set(x_292, 3, x_31); -lean::cnstr_set_scalar(x_292, sizeof(void*)*4, x_225); -x_293 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_293, 0, x_290); -lean::cnstr_set(x_293, 1, x_286); -lean::cnstr_set(x_293, 2, x_287); -lean::cnstr_set(x_293, 3, x_292); -lean::cnstr_set_scalar(x_293, sizeof(void*)*4, x_259); -return x_293; -} -} -else -{ -uint8 x_294; -x_294 = !lean::is_exclusive(x_176); -if (x_294 == 0) -{ -obj* x_295; obj* x_296; uint8 x_297; -x_295 = lean::cnstr_get(x_176, 3); -lean::dec(x_295); -x_296 = lean::cnstr_get(x_176, 0); -lean::dec(x_296); -x_297 = !lean::is_exclusive(x_177); -if (x_297 == 0) -{ -uint8 x_298; -lean::cnstr_set_scalar(x_177, sizeof(void*)*4, x_259); -x_298 = 0; -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_298); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -else -{ -obj* x_299; obj* x_300; obj* x_301; obj* x_302; obj* x_303; uint8 x_304; -x_299 = lean::cnstr_get(x_177, 0); -x_300 = lean::cnstr_get(x_177, 1); -x_301 = lean::cnstr_get(x_177, 2); -x_302 = lean::cnstr_get(x_177, 3); -lean::inc(x_302); -lean::inc(x_301); -lean::inc(x_300); -lean::inc(x_299); -lean::dec(x_177); -x_303 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_303, 0, x_299); -lean::cnstr_set(x_303, 1, x_300); -lean::cnstr_set(x_303, 2, x_301); -lean::cnstr_set(x_303, 3, x_302); -lean::cnstr_set_scalar(x_303, sizeof(void*)*4, x_259); -x_304 = 0; -lean::cnstr_set(x_176, 0, x_303); -lean::cnstr_set_scalar(x_176, sizeof(void*)*4, x_304); -lean::cnstr_set(x_1, 0, x_176); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -else -{ -obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; uint8 x_313; obj* x_314; -x_305 = lean::cnstr_get(x_176, 1); -x_306 = lean::cnstr_get(x_176, 2); -lean::inc(x_306); -lean::inc(x_305); -lean::dec(x_176); -x_307 = lean::cnstr_get(x_177, 0); -lean::inc(x_307); -x_308 = lean::cnstr_get(x_177, 1); -lean::inc(x_308); -x_309 = lean::cnstr_get(x_177, 2); -lean::inc(x_309); -x_310 = lean::cnstr_get(x_177, 3); -lean::inc(x_310); -if (lean::is_exclusive(x_177)) { - lean::cnstr_release(x_177, 0); - lean::cnstr_release(x_177, 1); - lean::cnstr_release(x_177, 2); - lean::cnstr_release(x_177, 3); - x_311 = x_177; -} else { - lean::dec_ref(x_177); - x_311 = lean::box(0); -} -if (lean::is_scalar(x_311)) { - x_312 = lean::alloc_cnstr(1, 4, 1); -} else { - x_312 = x_311; -} -lean::cnstr_set(x_312, 0, x_307); -lean::cnstr_set(x_312, 1, x_308); -lean::cnstr_set(x_312, 2, x_309); -lean::cnstr_set(x_312, 3, x_310); -lean::cnstr_set_scalar(x_312, sizeof(void*)*4, x_259); -x_313 = 0; -x_314 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_314, 0, x_312); -lean::cnstr_set(x_314, 1, x_305); -lean::cnstr_set(x_314, 2, x_306); -lean::cnstr_set(x_314, 3, x_250); -lean::cnstr_set_scalar(x_314, sizeof(void*)*4, x_313); -lean::cnstr_set(x_1, 0, x_314); -lean::cnstr_set_scalar(x_1, sizeof(void*)*4, x_259); -return x_1; -} -} -} -} -} -} -} -} -} -else -{ -obj* x_315; obj* x_316; obj* x_317; obj* x_318; uint8 x_319; -x_315 = lean::cnstr_get(x_1, 0); -x_316 = lean::cnstr_get(x_1, 1); -x_317 = lean::cnstr_get(x_1, 2); -x_318 = lean::cnstr_get(x_1, 3); -lean::inc(x_318); -lean::inc(x_317); -lean::inc(x_316); -lean::inc(x_315); -lean::dec(x_1); -x_319 = lean::nat_dec_lt(x_2, x_316); -if (x_319 == 0) -{ -uint8 x_320; -x_320 = lean::nat_dec_lt(x_316, x_2); -if (x_320 == 0) -{ -obj* x_321; -lean::dec(x_317); -lean::dec(x_316); -x_321 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_321, 0, x_315); -lean::cnstr_set(x_321, 1, x_2); -lean::cnstr_set(x_321, 2, x_3); -lean::cnstr_set(x_321, 3, x_318); -lean::cnstr_set_scalar(x_321, sizeof(void*)*4, x_6); -return x_321; -} -else -{ -uint8 x_322; -x_322 = l_RBNode_isRed___main___rarg(x_318); -if (x_322 == 0) -{ -obj* x_323; obj* x_324; -x_323 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_318, x_2, x_3); -x_324 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_324, 0, x_315); -lean::cnstr_set(x_324, 1, x_316); -lean::cnstr_set(x_324, 2, x_317); -lean::cnstr_set(x_324, 3, x_323); -lean::cnstr_set_scalar(x_324, sizeof(void*)*4, x_6); -return x_324; -} -else -{ -obj* x_325; -x_325 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_318, x_2, x_3); -if (lean::obj_tag(x_325) == 0) -{ -lean::dec(x_317); -lean::dec(x_316); -lean::dec(x_315); -return x_325; -} -else -{ -obj* x_326; -x_326 = lean::cnstr_get(x_325, 0); -lean::inc(x_326); -if (lean::obj_tag(x_326) == 0) -{ -obj* x_327; -x_327 = lean::cnstr_get(x_325, 3); -lean::inc(x_327); -if (lean::obj_tag(x_327) == 0) -{ -obj* x_328; obj* x_329; obj* x_330; uint8 x_331; obj* x_332; uint8 x_333; obj* x_334; -x_328 = lean::cnstr_get(x_325, 1); -lean::inc(x_328); -x_329 = lean::cnstr_get(x_325, 2); -lean::inc(x_329); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_330 = x_325; -} else { - lean::dec_ref(x_325); - x_330 = lean::box(0); -} -x_331 = 0; -if (lean::is_scalar(x_330)) { - x_332 = lean::alloc_cnstr(1, 4, 1); -} else { - x_332 = x_330; -} -lean::cnstr_set(x_332, 0, x_327); -lean::cnstr_set(x_332, 1, x_328); -lean::cnstr_set(x_332, 2, x_329); -lean::cnstr_set(x_332, 3, x_327); -lean::cnstr_set_scalar(x_332, sizeof(void*)*4, x_331); -x_333 = 1; -x_334 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_334, 0, x_315); -lean::cnstr_set(x_334, 1, x_316); -lean::cnstr_set(x_334, 2, x_317); -lean::cnstr_set(x_334, 3, x_332); -lean::cnstr_set_scalar(x_334, sizeof(void*)*4, x_333); -return x_334; -} -else -{ -uint8 x_335; -x_335 = lean::cnstr_get_scalar(x_327, sizeof(void*)*4); -if (x_335 == 0) -{ -obj* x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_340; obj* x_341; obj* x_342; obj* x_343; uint8 x_344; obj* x_345; obj* x_346; obj* x_347; -x_336 = lean::cnstr_get(x_325, 1); -lean::inc(x_336); -x_337 = lean::cnstr_get(x_325, 2); -lean::inc(x_337); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_338 = x_325; -} else { - lean::dec_ref(x_325); - x_338 = lean::box(0); -} -x_339 = lean::cnstr_get(x_327, 0); -lean::inc(x_339); -x_340 = lean::cnstr_get(x_327, 1); -lean::inc(x_340); -x_341 = lean::cnstr_get(x_327, 2); -lean::inc(x_341); -x_342 = lean::cnstr_get(x_327, 3); -lean::inc(x_342); -if (lean::is_exclusive(x_327)) { - lean::cnstr_release(x_327, 0); - lean::cnstr_release(x_327, 1); - lean::cnstr_release(x_327, 2); - lean::cnstr_release(x_327, 3); - x_343 = x_327; -} else { - lean::dec_ref(x_327); - x_343 = lean::box(0); -} -x_344 = 1; -if (lean::is_scalar(x_343)) { - x_345 = lean::alloc_cnstr(1, 4, 1); -} else { - x_345 = x_343; -} -lean::cnstr_set(x_345, 0, x_315); -lean::cnstr_set(x_345, 1, x_316); -lean::cnstr_set(x_345, 2, x_317); -lean::cnstr_set(x_345, 3, x_326); -lean::cnstr_set_scalar(x_345, sizeof(void*)*4, x_344); -if (lean::is_scalar(x_338)) { - x_346 = lean::alloc_cnstr(1, 4, 1); -} else { - x_346 = x_338; -} -lean::cnstr_set(x_346, 0, x_339); -lean::cnstr_set(x_346, 1, x_340); -lean::cnstr_set(x_346, 2, x_341); -lean::cnstr_set(x_346, 3, x_342); -lean::cnstr_set_scalar(x_346, sizeof(void*)*4, x_344); -x_347 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_347, 0, x_345); -lean::cnstr_set(x_347, 1, x_336); -lean::cnstr_set(x_347, 2, x_337); -lean::cnstr_set(x_347, 3, x_346); -lean::cnstr_set_scalar(x_347, sizeof(void*)*4, x_335); -return x_347; -} -else -{ -obj* x_348; obj* x_349; obj* x_350; uint8 x_351; obj* x_352; obj* x_353; -x_348 = lean::cnstr_get(x_325, 1); -lean::inc(x_348); -x_349 = lean::cnstr_get(x_325, 2); -lean::inc(x_349); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_350 = x_325; -} else { - lean::dec_ref(x_325); - x_350 = lean::box(0); -} -x_351 = 0; -if (lean::is_scalar(x_350)) { - x_352 = lean::alloc_cnstr(1, 4, 1); -} else { - x_352 = x_350; -} -lean::cnstr_set(x_352, 0, x_326); -lean::cnstr_set(x_352, 1, x_348); -lean::cnstr_set(x_352, 2, x_349); -lean::cnstr_set(x_352, 3, x_327); -lean::cnstr_set_scalar(x_352, sizeof(void*)*4, x_351); -x_353 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_353, 0, x_315); -lean::cnstr_set(x_353, 1, x_316); -lean::cnstr_set(x_353, 2, x_317); -lean::cnstr_set(x_353, 3, x_352); -lean::cnstr_set_scalar(x_353, sizeof(void*)*4, x_335); -return x_353; -} -} -} -else -{ -uint8 x_354; -x_354 = lean::cnstr_get_scalar(x_326, sizeof(void*)*4); -if (x_354 == 0) -{ -obj* x_355; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_363; uint8 x_364; obj* x_365; obj* x_366; obj* x_367; -x_355 = lean::cnstr_get(x_325, 1); -lean::inc(x_355); -x_356 = lean::cnstr_get(x_325, 2); -lean::inc(x_356); -x_357 = lean::cnstr_get(x_325, 3); -lean::inc(x_357); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_358 = x_325; -} else { - lean::dec_ref(x_325); - x_358 = lean::box(0); -} -x_359 = lean::cnstr_get(x_326, 0); -lean::inc(x_359); -x_360 = lean::cnstr_get(x_326, 1); -lean::inc(x_360); -x_361 = lean::cnstr_get(x_326, 2); -lean::inc(x_361); -x_362 = lean::cnstr_get(x_326, 3); -lean::inc(x_362); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_363 = x_326; -} else { - lean::dec_ref(x_326); - x_363 = lean::box(0); -} -x_364 = 1; -if (lean::is_scalar(x_363)) { - x_365 = lean::alloc_cnstr(1, 4, 1); -} else { - x_365 = x_363; -} -lean::cnstr_set(x_365, 0, x_315); -lean::cnstr_set(x_365, 1, x_316); -lean::cnstr_set(x_365, 2, x_317); -lean::cnstr_set(x_365, 3, x_359); -lean::cnstr_set_scalar(x_365, sizeof(void*)*4, x_364); -if (lean::is_scalar(x_358)) { - x_366 = lean::alloc_cnstr(1, 4, 1); -} else { - x_366 = x_358; -} -lean::cnstr_set(x_366, 0, x_362); -lean::cnstr_set(x_366, 1, x_355); -lean::cnstr_set(x_366, 2, x_356); -lean::cnstr_set(x_366, 3, x_357); -lean::cnstr_set_scalar(x_366, sizeof(void*)*4, x_364); -x_367 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_367, 0, x_365); -lean::cnstr_set(x_367, 1, x_360); -lean::cnstr_set(x_367, 2, x_361); -lean::cnstr_set(x_367, 3, x_366); -lean::cnstr_set_scalar(x_367, sizeof(void*)*4, x_354); -return x_367; -} -else -{ -obj* x_368; -x_368 = lean::cnstr_get(x_325, 3); -lean::inc(x_368); -if (lean::obj_tag(x_368) == 0) -{ -obj* x_369; obj* x_370; obj* x_371; uint8 x_372; obj* x_373; obj* x_374; -x_369 = lean::cnstr_get(x_325, 1); -lean::inc(x_369); -x_370 = lean::cnstr_get(x_325, 2); -lean::inc(x_370); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_371 = x_325; -} else { - lean::dec_ref(x_325); - x_371 = lean::box(0); -} -x_372 = 0; -if (lean::is_scalar(x_371)) { - x_373 = lean::alloc_cnstr(1, 4, 1); -} else { - x_373 = x_371; -} -lean::cnstr_set(x_373, 0, x_326); -lean::cnstr_set(x_373, 1, x_369); -lean::cnstr_set(x_373, 2, x_370); -lean::cnstr_set(x_373, 3, x_368); -lean::cnstr_set_scalar(x_373, sizeof(void*)*4, x_372); -x_374 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_374, 0, x_315); -lean::cnstr_set(x_374, 1, x_316); -lean::cnstr_set(x_374, 2, x_317); -lean::cnstr_set(x_374, 3, x_373); -lean::cnstr_set_scalar(x_374, sizeof(void*)*4, x_354); -return x_374; -} -else -{ -uint8 x_375; -x_375 = lean::cnstr_get_scalar(x_368, sizeof(void*)*4); -if (x_375 == 0) -{ -obj* x_376; obj* x_377; obj* x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_387; -x_376 = lean::cnstr_get(x_325, 1); -lean::inc(x_376); -x_377 = lean::cnstr_get(x_325, 2); -lean::inc(x_377); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_378 = x_325; -} else { - lean::dec_ref(x_325); - x_378 = lean::box(0); -} -x_379 = lean::cnstr_get(x_368, 0); -lean::inc(x_379); -x_380 = lean::cnstr_get(x_368, 1); -lean::inc(x_380); -x_381 = lean::cnstr_get(x_368, 2); -lean::inc(x_381); -x_382 = lean::cnstr_get(x_368, 3); -lean::inc(x_382); -if (lean::is_exclusive(x_368)) { - lean::cnstr_release(x_368, 0); - lean::cnstr_release(x_368, 1); - lean::cnstr_release(x_368, 2); - lean::cnstr_release(x_368, 3); - x_383 = x_368; -} else { - lean::dec_ref(x_368); - x_383 = lean::box(0); -} -lean::inc(x_326); -if (lean::is_scalar(x_383)) { - x_384 = lean::alloc_cnstr(1, 4, 1); -} else { - x_384 = x_383; -} -lean::cnstr_set(x_384, 0, x_315); -lean::cnstr_set(x_384, 1, x_316); -lean::cnstr_set(x_384, 2, x_317); -lean::cnstr_set(x_384, 3, x_326); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_385 = x_326; -} else { - lean::dec_ref(x_326); - x_385 = lean::box(0); -} -lean::cnstr_set_scalar(x_384, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_385)) { - x_386 = lean::alloc_cnstr(1, 4, 1); -} else { - x_386 = x_385; -} -lean::cnstr_set(x_386, 0, x_379); -lean::cnstr_set(x_386, 1, x_380); -lean::cnstr_set(x_386, 2, x_381); -lean::cnstr_set(x_386, 3, x_382); -lean::cnstr_set_scalar(x_386, sizeof(void*)*4, x_354); -if (lean::is_scalar(x_378)) { - x_387 = lean::alloc_cnstr(1, 4, 1); -} else { - x_387 = x_378; -} -lean::cnstr_set(x_387, 0, x_384); -lean::cnstr_set(x_387, 1, x_376); -lean::cnstr_set(x_387, 2, x_377); -lean::cnstr_set(x_387, 3, x_386); -lean::cnstr_set_scalar(x_387, sizeof(void*)*4, x_375); -return x_387; -} -else -{ -obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395; obj* x_396; uint8 x_397; obj* x_398; obj* x_399; -x_388 = lean::cnstr_get(x_325, 1); -lean::inc(x_388); -x_389 = lean::cnstr_get(x_325, 2); -lean::inc(x_389); -if (lean::is_exclusive(x_325)) { - lean::cnstr_release(x_325, 0); - lean::cnstr_release(x_325, 1); - lean::cnstr_release(x_325, 2); - lean::cnstr_release(x_325, 3); - x_390 = x_325; -} else { - lean::dec_ref(x_325); - x_390 = lean::box(0); -} -x_391 = lean::cnstr_get(x_326, 0); -lean::inc(x_391); -x_392 = lean::cnstr_get(x_326, 1); -lean::inc(x_392); -x_393 = lean::cnstr_get(x_326, 2); -lean::inc(x_393); -x_394 = lean::cnstr_get(x_326, 3); -lean::inc(x_394); -if (lean::is_exclusive(x_326)) { - lean::cnstr_release(x_326, 0); - lean::cnstr_release(x_326, 1); - lean::cnstr_release(x_326, 2); - lean::cnstr_release(x_326, 3); - x_395 = x_326; -} else { - lean::dec_ref(x_326); - x_395 = lean::box(0); -} -if (lean::is_scalar(x_395)) { - x_396 = lean::alloc_cnstr(1, 4, 1); -} else { - x_396 = x_395; -} -lean::cnstr_set(x_396, 0, x_391); -lean::cnstr_set(x_396, 1, x_392); -lean::cnstr_set(x_396, 2, x_393); -lean::cnstr_set(x_396, 3, x_394); -lean::cnstr_set_scalar(x_396, sizeof(void*)*4, x_375); -x_397 = 0; -if (lean::is_scalar(x_390)) { - x_398 = lean::alloc_cnstr(1, 4, 1); -} else { - x_398 = x_390; -} -lean::cnstr_set(x_398, 0, x_396); -lean::cnstr_set(x_398, 1, x_388); -lean::cnstr_set(x_398, 2, x_389); -lean::cnstr_set(x_398, 3, x_368); -lean::cnstr_set_scalar(x_398, sizeof(void*)*4, x_397); -x_399 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_399, 0, x_315); -lean::cnstr_set(x_399, 1, x_316); -lean::cnstr_set(x_399, 2, x_317); -lean::cnstr_set(x_399, 3, x_398); -lean::cnstr_set_scalar(x_399, sizeof(void*)*4, x_375); -return x_399; -} -} -} -} -} -} -} -} -else -{ -uint8 x_400; -x_400 = l_RBNode_isRed___main___rarg(x_315); -if (x_400 == 0) -{ -obj* x_401; obj* x_402; -x_401 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_315, x_2, x_3); -x_402 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_402, 0, x_401); -lean::cnstr_set(x_402, 1, x_316); -lean::cnstr_set(x_402, 2, x_317); -lean::cnstr_set(x_402, 3, x_318); -lean::cnstr_set_scalar(x_402, sizeof(void*)*4, x_6); -return x_402; -} -else -{ -obj* x_403; -x_403 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_315, x_2, x_3); -if (lean::obj_tag(x_403) == 0) -{ -lean::dec(x_318); -lean::dec(x_317); -lean::dec(x_316); -return x_403; -} -else -{ -obj* x_404; -x_404 = lean::cnstr_get(x_403, 0); -lean::inc(x_404); -if (lean::obj_tag(x_404) == 0) -{ -obj* x_405; -x_405 = lean::cnstr_get(x_403, 3); -lean::inc(x_405); -if (lean::obj_tag(x_405) == 0) -{ -obj* x_406; obj* x_407; obj* x_408; uint8 x_409; obj* x_410; uint8 x_411; obj* x_412; -x_406 = lean::cnstr_get(x_403, 1); -lean::inc(x_406); -x_407 = lean::cnstr_get(x_403, 2); -lean::inc(x_407); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_408 = x_403; -} else { - lean::dec_ref(x_403); - x_408 = lean::box(0); -} -x_409 = 0; -if (lean::is_scalar(x_408)) { - x_410 = lean::alloc_cnstr(1, 4, 1); -} else { - x_410 = x_408; -} -lean::cnstr_set(x_410, 0, x_405); -lean::cnstr_set(x_410, 1, x_406); -lean::cnstr_set(x_410, 2, x_407); -lean::cnstr_set(x_410, 3, x_405); -lean::cnstr_set_scalar(x_410, sizeof(void*)*4, x_409); -x_411 = 1; -x_412 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_412, 0, x_410); -lean::cnstr_set(x_412, 1, x_316); -lean::cnstr_set(x_412, 2, x_317); -lean::cnstr_set(x_412, 3, x_318); -lean::cnstr_set_scalar(x_412, sizeof(void*)*4, x_411); -return x_412; -} -else -{ -uint8 x_413; -x_413 = lean::cnstr_get_scalar(x_405, sizeof(void*)*4); -if (x_413 == 0) -{ -obj* x_414; obj* x_415; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_420; obj* x_421; uint8 x_422; obj* x_423; obj* x_424; obj* x_425; -x_414 = lean::cnstr_get(x_403, 1); -lean::inc(x_414); -x_415 = lean::cnstr_get(x_403, 2); -lean::inc(x_415); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_416 = x_403; -} else { - lean::dec_ref(x_403); - x_416 = lean::box(0); -} -x_417 = lean::cnstr_get(x_405, 0); -lean::inc(x_417); -x_418 = lean::cnstr_get(x_405, 1); -lean::inc(x_418); -x_419 = lean::cnstr_get(x_405, 2); -lean::inc(x_419); -x_420 = lean::cnstr_get(x_405, 3); -lean::inc(x_420); -if (lean::is_exclusive(x_405)) { - lean::cnstr_release(x_405, 0); - lean::cnstr_release(x_405, 1); - lean::cnstr_release(x_405, 2); - lean::cnstr_release(x_405, 3); - x_421 = x_405; -} else { - lean::dec_ref(x_405); - x_421 = lean::box(0); -} -x_422 = 1; -if (lean::is_scalar(x_421)) { - x_423 = lean::alloc_cnstr(1, 4, 1); -} else { - x_423 = x_421; -} -lean::cnstr_set(x_423, 0, x_404); -lean::cnstr_set(x_423, 1, x_414); -lean::cnstr_set(x_423, 2, x_415); -lean::cnstr_set(x_423, 3, x_417); -lean::cnstr_set_scalar(x_423, sizeof(void*)*4, x_422); -if (lean::is_scalar(x_416)) { - x_424 = lean::alloc_cnstr(1, 4, 1); -} else { - x_424 = x_416; -} -lean::cnstr_set(x_424, 0, x_420); -lean::cnstr_set(x_424, 1, x_316); -lean::cnstr_set(x_424, 2, x_317); -lean::cnstr_set(x_424, 3, x_318); -lean::cnstr_set_scalar(x_424, sizeof(void*)*4, x_422); -x_425 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_425, 0, x_423); -lean::cnstr_set(x_425, 1, x_418); -lean::cnstr_set(x_425, 2, x_419); -lean::cnstr_set(x_425, 3, x_424); -lean::cnstr_set_scalar(x_425, sizeof(void*)*4, x_413); -return x_425; -} -else -{ -obj* x_426; obj* x_427; obj* x_428; uint8 x_429; obj* x_430; obj* x_431; -x_426 = lean::cnstr_get(x_403, 1); -lean::inc(x_426); -x_427 = lean::cnstr_get(x_403, 2); -lean::inc(x_427); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_428 = x_403; -} else { - lean::dec_ref(x_403); - x_428 = lean::box(0); -} -x_429 = 0; -if (lean::is_scalar(x_428)) { - x_430 = lean::alloc_cnstr(1, 4, 1); -} else { - x_430 = x_428; -} -lean::cnstr_set(x_430, 0, x_404); -lean::cnstr_set(x_430, 1, x_426); -lean::cnstr_set(x_430, 2, x_427); -lean::cnstr_set(x_430, 3, x_405); -lean::cnstr_set_scalar(x_430, sizeof(void*)*4, x_429); -x_431 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_431, 0, x_430); -lean::cnstr_set(x_431, 1, x_316); -lean::cnstr_set(x_431, 2, x_317); -lean::cnstr_set(x_431, 3, x_318); -lean::cnstr_set_scalar(x_431, sizeof(void*)*4, x_413); -return x_431; -} -} -} -else -{ -uint8 x_432; -x_432 = lean::cnstr_get_scalar(x_404, sizeof(void*)*4); -if (x_432 == 0) -{ -obj* x_433; obj* x_434; obj* x_435; obj* x_436; obj* x_437; obj* x_438; obj* x_439; obj* x_440; obj* x_441; uint8 x_442; obj* x_443; obj* x_444; obj* x_445; -x_433 = lean::cnstr_get(x_403, 1); -lean::inc(x_433); -x_434 = lean::cnstr_get(x_403, 2); -lean::inc(x_434); -x_435 = lean::cnstr_get(x_403, 3); -lean::inc(x_435); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_436 = x_403; -} else { - lean::dec_ref(x_403); - x_436 = lean::box(0); -} -x_437 = lean::cnstr_get(x_404, 0); -lean::inc(x_437); -x_438 = lean::cnstr_get(x_404, 1); -lean::inc(x_438); -x_439 = lean::cnstr_get(x_404, 2); -lean::inc(x_439); -x_440 = lean::cnstr_get(x_404, 3); -lean::inc(x_440); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_441 = x_404; -} else { - lean::dec_ref(x_404); - x_441 = lean::box(0); -} -x_442 = 1; -if (lean::is_scalar(x_441)) { - x_443 = lean::alloc_cnstr(1, 4, 1); -} else { - x_443 = x_441; -} -lean::cnstr_set(x_443, 0, x_437); -lean::cnstr_set(x_443, 1, x_438); -lean::cnstr_set(x_443, 2, x_439); -lean::cnstr_set(x_443, 3, x_440); -lean::cnstr_set_scalar(x_443, sizeof(void*)*4, x_442); -if (lean::is_scalar(x_436)) { - x_444 = lean::alloc_cnstr(1, 4, 1); -} else { - x_444 = x_436; -} -lean::cnstr_set(x_444, 0, x_435); -lean::cnstr_set(x_444, 1, x_316); -lean::cnstr_set(x_444, 2, x_317); -lean::cnstr_set(x_444, 3, x_318); -lean::cnstr_set_scalar(x_444, sizeof(void*)*4, x_442); -x_445 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_445, 0, x_443); -lean::cnstr_set(x_445, 1, x_433); -lean::cnstr_set(x_445, 2, x_434); -lean::cnstr_set(x_445, 3, x_444); -lean::cnstr_set_scalar(x_445, sizeof(void*)*4, x_432); -return x_445; -} -else -{ -obj* x_446; -x_446 = lean::cnstr_get(x_403, 3); -lean::inc(x_446); -if (lean::obj_tag(x_446) == 0) -{ -obj* x_447; obj* x_448; obj* x_449; uint8 x_450; obj* x_451; obj* x_452; -x_447 = lean::cnstr_get(x_403, 1); -lean::inc(x_447); -x_448 = lean::cnstr_get(x_403, 2); -lean::inc(x_448); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_449 = x_403; -} else { - lean::dec_ref(x_403); - x_449 = lean::box(0); -} -x_450 = 0; -if (lean::is_scalar(x_449)) { - x_451 = lean::alloc_cnstr(1, 4, 1); -} else { - x_451 = x_449; -} -lean::cnstr_set(x_451, 0, x_404); -lean::cnstr_set(x_451, 1, x_447); -lean::cnstr_set(x_451, 2, x_448); -lean::cnstr_set(x_451, 3, x_446); -lean::cnstr_set_scalar(x_451, sizeof(void*)*4, x_450); -x_452 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_452, 0, x_451); -lean::cnstr_set(x_452, 1, x_316); -lean::cnstr_set(x_452, 2, x_317); -lean::cnstr_set(x_452, 3, x_318); -lean::cnstr_set_scalar(x_452, sizeof(void*)*4, x_432); -return x_452; -} -else -{ -uint8 x_453; -x_453 = lean::cnstr_get_scalar(x_446, sizeof(void*)*4); -if (x_453 == 0) -{ -obj* x_454; obj* x_455; obj* x_456; obj* x_457; obj* x_458; obj* x_459; obj* x_460; obj* x_461; obj* x_462; obj* x_463; obj* x_464; obj* x_465; -x_454 = lean::cnstr_get(x_403, 1); -lean::inc(x_454); -x_455 = lean::cnstr_get(x_403, 2); -lean::inc(x_455); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_456 = x_403; -} else { - lean::dec_ref(x_403); - x_456 = lean::box(0); -} -x_457 = lean::cnstr_get(x_446, 0); -lean::inc(x_457); -x_458 = lean::cnstr_get(x_446, 1); -lean::inc(x_458); -x_459 = lean::cnstr_get(x_446, 2); -lean::inc(x_459); -x_460 = lean::cnstr_get(x_446, 3); -lean::inc(x_460); -if (lean::is_exclusive(x_446)) { - lean::cnstr_release(x_446, 0); - lean::cnstr_release(x_446, 1); - lean::cnstr_release(x_446, 2); - lean::cnstr_release(x_446, 3); - x_461 = x_446; -} else { - lean::dec_ref(x_446); - x_461 = lean::box(0); -} -lean::inc(x_404); -if (lean::is_scalar(x_461)) { - x_462 = lean::alloc_cnstr(1, 4, 1); -} else { - x_462 = x_461; -} -lean::cnstr_set(x_462, 0, x_404); -lean::cnstr_set(x_462, 1, x_454); -lean::cnstr_set(x_462, 2, x_455); -lean::cnstr_set(x_462, 3, x_457); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_463 = x_404; -} else { - lean::dec_ref(x_404); - x_463 = lean::box(0); -} -lean::cnstr_set_scalar(x_462, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_463)) { - x_464 = lean::alloc_cnstr(1, 4, 1); -} else { - x_464 = x_463; -} -lean::cnstr_set(x_464, 0, x_460); -lean::cnstr_set(x_464, 1, x_316); -lean::cnstr_set(x_464, 2, x_317); -lean::cnstr_set(x_464, 3, x_318); -lean::cnstr_set_scalar(x_464, sizeof(void*)*4, x_432); -if (lean::is_scalar(x_456)) { - x_465 = lean::alloc_cnstr(1, 4, 1); -} else { - x_465 = x_456; -} -lean::cnstr_set(x_465, 0, x_462); -lean::cnstr_set(x_465, 1, x_458); -lean::cnstr_set(x_465, 2, x_459); -lean::cnstr_set(x_465, 3, x_464); -lean::cnstr_set_scalar(x_465, sizeof(void*)*4, x_453); -return x_465; -} -else -{ -obj* x_466; obj* x_467; obj* x_468; obj* x_469; obj* x_470; obj* x_471; obj* x_472; obj* x_473; obj* x_474; uint8 x_475; obj* x_476; obj* x_477; -x_466 = lean::cnstr_get(x_403, 1); -lean::inc(x_466); -x_467 = lean::cnstr_get(x_403, 2); -lean::inc(x_467); -if (lean::is_exclusive(x_403)) { - lean::cnstr_release(x_403, 0); - lean::cnstr_release(x_403, 1); - lean::cnstr_release(x_403, 2); - lean::cnstr_release(x_403, 3); - x_468 = x_403; -} else { - lean::dec_ref(x_403); - x_468 = lean::box(0); -} -x_469 = lean::cnstr_get(x_404, 0); -lean::inc(x_469); -x_470 = lean::cnstr_get(x_404, 1); -lean::inc(x_470); -x_471 = lean::cnstr_get(x_404, 2); -lean::inc(x_471); -x_472 = lean::cnstr_get(x_404, 3); -lean::inc(x_472); -if (lean::is_exclusive(x_404)) { - lean::cnstr_release(x_404, 0); - lean::cnstr_release(x_404, 1); - lean::cnstr_release(x_404, 2); - lean::cnstr_release(x_404, 3); - x_473 = x_404; -} else { - lean::dec_ref(x_404); - x_473 = lean::box(0); -} -if (lean::is_scalar(x_473)) { - x_474 = lean::alloc_cnstr(1, 4, 1); -} else { - x_474 = x_473; -} -lean::cnstr_set(x_474, 0, x_469); -lean::cnstr_set(x_474, 1, x_470); -lean::cnstr_set(x_474, 2, x_471); -lean::cnstr_set(x_474, 3, x_472); -lean::cnstr_set_scalar(x_474, sizeof(void*)*4, x_453); -x_475 = 0; -if (lean::is_scalar(x_468)) { - x_476 = lean::alloc_cnstr(1, 4, 1); -} else { - x_476 = x_468; -} -lean::cnstr_set(x_476, 0, x_474); -lean::cnstr_set(x_476, 1, x_466); -lean::cnstr_set(x_476, 2, x_467); -lean::cnstr_set(x_476, 3, x_446); -lean::cnstr_set_scalar(x_476, sizeof(void*)*4, x_475); -x_477 = lean::alloc_cnstr(1, 4, 1); -lean::cnstr_set(x_477, 0, x_476); -lean::cnstr_set(x_477, 1, x_316); -lean::cnstr_set(x_477, 2, x_317); -lean::cnstr_set(x_477, 3, x_318); -lean::cnstr_set_scalar(x_477, sizeof(void*)*4, x_453); -return x_477; -} -} -} -} -} -} -} -} -} -} -} -} -obj* l_RBNode_insert___at_Lean_FileMap_fromString___spec__2(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint8 x_4; -x_4 = l_RBNode_isRed___main___rarg(x_1); -if (x_4 == 0) -{ -obj* x_5; -x_5 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_1, x_2, x_3); -return x_5; -} -else -{ -obj* x_6; obj* x_7; -x_6 = l_RBNode_ins___main___at_Lean_FileMap_fromString___spec__3(x_1, x_2, x_3); -x_7 = l_RBNode_setBlack___main___rarg(x_6); -return x_7; -} -} -} -obj* l_RBMap_ofList___main___at_Lean_FileMap_fromString___spec__1(obj* x_1) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -obj* x_2; -x_2 = lean::box(0); -return x_2; -} -else -{ -obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; -x_3 = lean::cnstr_get(x_1, 0); -lean::inc(x_3); -x_4 = lean::cnstr_get(x_1, 1); -lean::inc(x_4); -lean::dec(x_1); -x_5 = lean::cnstr_get(x_3, 0); -lean::inc(x_5); -x_6 = lean::cnstr_get(x_3, 1); -lean::inc(x_6); -lean::dec(x_3); -x_7 = l_RBMap_ofList___main___at_Lean_FileMap_fromString___spec__1(x_4); -x_8 = l_RBNode_insert___at_Lean_FileMap_fromString___spec__2(x_7, x_5, x_6); -return x_8; -} -} -} -obj* l_Lean_FileMap_fromString(obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; -x_2 = lean::string_length(x_1); -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_3); -lean::cnstr_set(x_4, 2, x_3); -x_5 = lean::mk_nat_obj(1u); -x_6 = l___private_init_lean_position_1__fromStringAux___main(x_2, x_4, x_5); -x_7 = l_RBMap_ofList___main___at_Lean_FileMap_fromString___spec__1(x_6); -return x_7; -} -} -obj* l_RBNode_lowerBound___main___at_Lean_FileMap_toPosition___spec__1(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -if (lean::obj_tag(x_1) == 0) -{ -return x_3; -} -else -{ -obj* x_4; obj* x_5; obj* x_6; obj* x_7; uint8 x_8; -x_4 = lean::cnstr_get(x_1, 0); -x_5 = lean::cnstr_get(x_1, 1); -x_6 = lean::cnstr_get(x_1, 2); -x_7 = lean::cnstr_get(x_1, 3); -x_8 = lean::nat_dec_lt(x_2, x_5); -if (x_8 == 0) -{ -uint8 x_9; -lean::dec(x_3); -x_9 = lean::nat_dec_lt(x_5, x_2); -if (x_9 == 0) -{ -obj* x_10; obj* x_11; -lean::inc(x_6); -lean::inc(x_5); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_6); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; -} -else -{ -obj* x_12; obj* x_13; -lean::inc(x_6); -lean::inc(x_5); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_5); -lean::cnstr_set(x_12, 1, x_6); -x_13 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_13, 0, x_12); -x_1 = x_7; -x_3 = x_13; -goto _start; -} -} -else -{ -x_1 = x_4; -goto _start; -} -} -} -} -obj* l_Lean_FileMap_toPosition(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; obj* x_4; -x_3 = lean::box(0); -x_4 = l_RBNode_lowerBound___main___at_Lean_FileMap_toPosition___spec__1(x_1, x_2, x_3); -if (lean::obj_tag(x_4) == 0) -{ -obj* x_5; obj* x_6; -x_5 = lean::mk_nat_obj(1u); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_2); -return x_6; -} -else -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; -x_7 = lean::cnstr_get(x_4, 0); -lean::inc(x_7); -lean::dec(x_4); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_9 = lean::cnstr_get(x_7, 1); -lean::inc(x_9); -lean::dec(x_7); -x_10 = lean::nat_sub(x_2, x_8); -lean::dec(x_8); -lean::dec(x_2); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_10); -return x_11; -} -} -} -obj* l_RBNode_lowerBound___main___at_Lean_FileMap_toPosition___spec__1___boxed(obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; -x_4 = l_RBNode_lowerBound___main___at_Lean_FileMap_toPosition___spec__1(x_1, x_2, x_3); -lean::dec(x_2); -lean::dec(x_1); -return x_4; -} -} -obj* l_Lean_FileMap_toPosition___boxed(obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; -x_3 = l_Lean_FileMap_toPosition(x_1, x_2); -lean::dec(x_1); -return x_3; -} -} obj* initialize_init_data_nat_default(obj*); obj* initialize_init_data_rbmap_default(obj*); obj* initialize_init_lean_format(obj*); -obj* initialize_init_lean_parser_parsec(obj*); static bool _G_initialized = false; obj* initialize_init_lean_position(obj* w) { if (_G_initialized) return w; @@ -2967,8 +240,6 @@ w = initialize_init_data_rbmap_default(w); if (io_result_is_error(w)) return w; w = initialize_init_lean_format(w); if (io_result_is_error(w)) return w; -w = initialize_init_lean_parser_parsec(w); -if (io_result_is_error(w)) return w; l_Lean_Position_lt___main___closed__1 = _init_l_Lean_Position_lt___main___closed__1(); lean::mark_persistent(l_Lean_Position_lt___main___closed__1); l_Lean_Position_lt___main___closed__2 = _init_l_Lean_Position_lt___main___closed__2();